Subversion Repositories Kolibri OS

Rev

Rev 468 | Rev 491 | Go to most recent revision | Only display areas with differences | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 468 Rev 483
1 
; á¯à®áâà ­ï¥âáï ¯® «¨æ¥­§¨¨ GPL  SEE YOU File FAQ.txt and HISTORY. Good Like!
1 
; á¯à®áâà ­ï¥âáï ¯® «¨æ¥­§¨¨ GPL  SEE YOU File FAQ.txt and HISTORY. Good Like!
2 
;Ž¯â¨¬¨§¨à®¢ ­­ë© ª®¬¯®­¥­â EditBox (ˆá室­ë© ¢ à¨ ­â ®â Maxxxx32)
 2 
;Ž¯â¨¬¨§¨à®¢ ­­ë© ª®¬¯®­¥­â EditBox (ˆá室­ë© ¢ à¨ ­â ®â Maxxxx32)
3 
;Ž¯â¨¬¨§ æ¨ï ª®¬ ­¤.
 3 
;Ž¯â¨¬¨§ æ¨ï ª®¬ ­¤.
4 
;  - ’¥¯«®¢ €«¥ªá¥©  www.lrz.land.ru
 4 
;  - ’¥¯«®¢ €«¥ªá¥©  www.lrz.land.ru
5 
;§ £®«®¢®ª ¯à¨«®¦¥­¨ï
 5 
;§ £®«®¢®ª ¯à¨«®¦¥­¨ï
6 
use32           ; âà ­á«ïâ®à, ¨á¯®«ì§ãî騩 32 à §à來ëå ª®¬ ­¤ë
 6 
use32           ; âà ­á«ïâ®à, ¨á¯®«ì§ãî騩 32 à §à來ëå ª®¬ ­¤ë
7 
    org 0x0             ; ¡ §®¢ë©  ¤à¥á ª®¤ , ¢á¥£¤  0x0
 7 
    org 0x0             ; ¡ §®¢ë©  ¤à¥á ª®¤ , ¢á¥£¤  0x0
8 
    db 'MENUET01'       ; ¨¤¥­â¨ä¨ª â®à ¨á¯®«­ï¥¬®£® ä ©«  (8 ¡ ©â)
 8 
    db 'MENUET01'       ; ¨¤¥­â¨ä¨ª â®à ¨á¯®«­ï¥¬®£® ä ©«  (8 ¡ ©â)
9 
    dd 0x1              ; ¢¥àá¨ï ä®à¬ â  § £®«®¢ª  ¨á¯®«­ï¥¬®£® ä ©« 
 9 
    dd 0x1              ; ¢¥àá¨ï ä®à¬ â  § £®«®¢ª  ¨á¯®«­ï¥¬®£® ä ©« 
10 
    dd start            ;  ¤à¥á, ­  ª®â®àë© á¨á⥬  ¯¥à¥¤ ñâ ã¯à ¢«¥­¨¥
 10 
    dd start            ;  ¤à¥á, ­  ª®â®àë© á¨á⥬  ¯¥à¥¤ ñâ ã¯à ¢«¥­¨¥
11 
                        ; ¯®á«¥ § £à㧪¨ ¯à¨«®¦¥­¨ï ¢ ¯ ¬ïâì
 11 
                        ; ¯®á«¥ § £à㧪¨ ¯à¨«®¦¥­¨ï ¢ ¯ ¬ïâì
12 
    dd i_end            ; à §¬¥à ¯à¨«®¦¥­¨ï
 12 
    dd i_end            ; à §¬¥à ¯à¨«®¦¥­¨ï
13 
    dd i_end and not 3  ; Ž¡ê¥¬ ¨á¯®«ì§ã¥¬®© ¯ ¬ïâ¨, ¤«ï á⥪  ®â¢¥¤¥¬ 0å100 ¡ ©â ¨ ¢ë஢­¨¬ ­  £à­¨æã 4 ¡ ©â 
 13 
    dd i_end            ; Ž¡ê¥¬ ¨á¯®«ì§ã¥¬®© ¯ ¬ïâ¨, ¤«ï á⥪  ®â¢¥¤¥¬ 0å100 ¡ ©â ¨ ¢ë஢­¨¬ ­  £à­¨æã 4 ¡ ©â 
14 
    dd i_end and not 3  ; à á¯®«®¦¨¬ ¯®§¨æ¨î á⥪  ¢ ®¡« á⨠¯ ¬ïâ¨, áࠧ㠧  ⥫®¬ ¯à®£à ¬¬ë. ‚¥à設  á⥪  ¢ ¤¨ ¯ §®­¥ ¯ ¬ïâ¨, 㪠§ ­­®¬ ¢ëè¥
 14 
    dd i_end            ; à á¯®«®¦¨¬ ¯®§¨æ¨î á⥪  ¢ ®¡« á⨠¯ ¬ïâ¨, áࠧ㠧  ⥫®¬ ¯à®£à ¬¬ë. ‚¥à設  á⥪  ¢ ¤¨ ¯ §®­¥ ¯ ¬ïâ¨, 㪠§ ­­®¬ ¢ëè¥
15 
    dd 0x0,0x0          ; 㪠§ â¥«ì ­  áâபã á ¯ à ¬¥âà ¬¨.
 15 
    dd 0x0,0x0          ; 㪠§ â¥«ì ­  áâபã á ¯ à ¬¥âà ¬¨.
16 
        include 'macros.inc'
 16 
        include 'macros.inc'
17 
        include 'editbox.inc'
 17 
        include 'editbox.inc'
- 
 
 18 
align 4
18 
        use_edit_box structure_of_potock,22,5
 19 
        use_edit_box procinfo,22,5
19 
;Ž¡« áâì ª®¤ 
 20 
;Ž¡« áâì ª®¤ 
20 
start:                          ;’®çª  ¢å®¤  ¢ ¯à®£à ¬¬ã
 21 
start:                          ;’®çª  ¢å®¤  ¢ ¯à®£à ¬¬ã
21 
        mcall   40,0x27         ;ãáâ ­®¢¨âì ¬ áªã ¤«ï ®¦¨¤ ¥¬ëå ᮡë⨩
 22 
        mcall   40,0x27         ;ãáâ ­®¢¨âì ¬ áªã ¤«ï ®¦¨¤ ¥¬ëå ᮡë⨩
22 
 ;á¨á⥬  ¡ã¤¥â ॠ£¨à®¢ âì ⮫쪮 ­  á®®¡é¥­¨¥ ® ¯¥à¥à¨á®¢ª¥,­ ¦ â  ª­®¯ª , ®¯à¥¤¥«ñ­­ ï à ­¥¥, ᮡë⨥ ®â ¬ëè¨ (çâ®-â® á«ã稫®áì - ­ ¦ â¨¥ ­  ª­®¯ªã ¬ëè¨ ¨«¨ ¯¥à¥¬¥é¥­¨¥; á¡à á뢠¥âáï ¯à¨ ¯à®ç⥭¨¨) ¨ ­ ¦ â¨¥ ª« ¢¨è¨
 23 
 ;á¨á⥬  ¡ã¤¥â ॠ£¨à®¢ âì ⮫쪮 ­  á®®¡é¥­¨¥ ® ¯¥à¥à¨á®¢ª¥,­ ¦ â  ª­®¯ª , ®¯à¥¤¥«ñ­­ ï à ­¥¥, ᮡë⨥ ®â ¬ëè¨ (çâ®-â® á«ã稫®áì - ­ ¦ â¨¥ ­  ª­®¯ªã ¬ëè¨ ¨«¨ ¯¥à¥¬¥é¥­¨¥; á¡à á뢠¥âáï ¯à¨ ¯à®ç⥭¨¨) ¨ ­ ¦ â¨¥ ª« ¢¨è¨
23 
red_win:
 24 
red_win:
24 
    call draw_window            ;¯¥à¢®­ ç «ì­® ­¥®¡å®¤¨¬® ­ à¨á®¢ âì ®ª­®
 25 
    call draw_window            ;¯¥à¢®­ ç «ì­® ­¥®¡å®¤¨¬® ­ à¨á®¢ âì ®ª­®
- 
 
 26 
align 4
25 
still:                          ;®á­®¢­®© ®¡à ¡®â稪
27 
still:                          ;®á­®¢­®© ®¡à ¡®â稪
26 
        mcall   10              ;Ž¦¨¤ âì ᮡëâ¨ï
 28 
        mcall   10              ;Ž¦¨¤ âì ᮡëâ¨ï
27 
        cmp al,0x1    ;¥á«¨ ¨§¬¥­¨«®áì ¯®«®¦¥­¨¥ ®ª­ 
 29 
        cmp al,0x1    ;¥á«¨ ¨§¬¥­¨«®áì ¯®«®¦¥­¨¥ ®ª­ 
28 
        jz red_win
 30 
        jz red_win
29 
        cmp al,0x2    ;¥á«¨ ­ ¦ â  ª« ¢¨è  â® ¯¥à¥©â¨
 31 
        cmp al,0x2    ;¥á«¨ ­ ¦ â  ª« ¢¨è  â® ¯¥à¥©â¨
30 
        jz key
 32 
        jz key
31 
        cmp al,0x3    ;¥á«¨ ­ ¦ â  ª­®¯ª  â® ¯¥à¥©â¨
 33 
        cmp al,0x3    ;¥á«¨ ­ ¦ â  ª­®¯ª  â® ¯¥à¥©â¨
32 
        jz button
 34 
        jz button
33 
        mouse_edit_boxes editboxes,editboxes_end
 35 
        mouse_edit_boxes editboxes,editboxes_end
34 
        jmp still    ;¥á«¨ ­¨ç¥£® ¨§ ¯¥à¥ç¨á«¥­­®£® â® á­®¢  ¢ 横«
 36 
        jmp still    ;¥á«¨ ­¨ç¥£® ¨§ ¯¥à¥ç¨á«¥­­®£® â® á­®¢  ¢ 横«
35 
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 37 
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
36 
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 38 
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
37 
button:
 39 
button:
38 
        mcall   17      ;¯®«ãç¨âì ¨¤¥­â¨ä¨ª â®à ­ ¦ â®© ª« ¢¨è¨
 40 
        mcall   17      ;¯®«ãç¨âì ¨¤¥­â¨ä¨ª â®à ­ ¦ â®© ª« ¢¨è¨
39 
        test ah,ah              ;¥á«¨ ¢ ah 0, â® ¯¥à¥©â¨ ­  ®¡à ¡®â稪 ᮡë⨩ still
 41 
        test ah,ah              ;¥á«¨ ¢ ah 0, â® ¯¥à¥©â¨ ­  ®¡à ¡®â稪 ᮡë⨩ still
40 
        jz  still
 42 
        jz  still
41 
        mcall   -1
 43 
        mcall   -1
42 
key:
 44 
key:
43 
        mcall   2       ;§ £à㧨¬ §­ ç¥­¨¥ 2 ¢ ॣ¨áâ®à eax ¨ ¯®«ã稬 ª®¤ ­ ¦ â®© ª« ¢¨è¨
 45 
        mcall   2       ;§ £à㧨¬ §­ ç¥­¨¥ 2 ¢ ॣ¨áâ®à eax ¨ ¯®«ã稬 ª®¤ ­ ¦ â®© ª« ¢¨è¨
44 
        key_edit_boxes editboxes,editboxes_end
46 
        key_edit_boxes editboxes,editboxes_end
45 
    jmp still
 47 
    jmp still
46 
 
 48 
 
47 
;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
 49 
;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
- 
 
 50 
align 4
48 
draw_window:            ;à¨á®¢ ­¨¥ ®ª­  ¯à¨«®¦¥­¨ï
 51 
draw_window:            ;à¨á®¢ ­¨¥ ®ª­  ¯à¨«®¦¥­¨ï
49 
        mcall   12,1
 52 
        mcall   12,1
50 
        mcall   0,(50*65536+390),(30*65536+200),0xb3AABBCC,0x805080DD,hed
 53 
        mcall   0,(50*65536+390),(30*65536+200),0xb3AABBCC,0x805080DD,hed
51 
        draw_edit_boxes editboxes,editboxes_end,use_f9,structure_of_potock  ;à¨á®¢ ­¨¥ edit box'®¢
 54 
        draw_edit_boxes editboxes,editboxes_end,use_f9,procinfo  ;à¨á®¢ ­¨¥ edit box'®¢
52 
        mcall   12,2
 55 
        mcall   12,2
53 
    ret
 56 
    ret
54 
;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
 57 
;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
55 
;DATA ¤ ­­ë¥
58 
;DATA ¤ ­­ë¥
56 
editboxes:
 59 
editboxes:
57 
edit1 edit_box 168,5,10,0xffffff,0x6a9480,0,0,0,99,ed_buffer.2,ed_figure_only
 60 
edit1 edit_box 168,5,10,0xffffff,0x6a9480,0,0,0,99,ed_buffer.2,ed_figure_only
58 
edit2 edit_box 250,5,30,0xffffff,0x6a9480,0,0xAABBCC,0,308,hed,ed_focus,53,53
 61 
edit2 edit_box 250,5,30,0xffffff,0x6a9480,0,0xAABBCC,0,308,hed,ed_focus,53,53
59 
edit3 edit_box 35,5,50,0xffffff,0x6a9480,0,0,0,9,ed_buffer.3,ed_figure_only
 62 
edit3 edit_box 35,5,50,0xffffff,0x6a9480,0,0,0,9,ed_buffer.3,ed_figure_only
60 
edit4 edit_box 16,5,70,0xffffff,0x6a9480,0,0,0,1,ed_buffer.4,ed_figure_only
 63 
edit4 edit_box 16,5,70,0xffffff,0x6a9480,0,0,0,1,ed_buffer.4,ed_figure_only
61 
editboxes_end:
 64 
editboxes_end:
62 
data_of_code dd 0
 65 
data_of_code dd 0
63 
mouse_flag dd 0x0
 66 
mouse_flag dd 0x0
64 
hed db   'EDITBOX optimization and retype  date 19.04.2007',0
 67 
hed db   'EDITBOX optimization and retype  date 09.05.2007',0
65 
rb  256
 68 
rb  256
66 
ed_buffer:
 69 
ed_buffer:
67 
;.1: rb 514;256
 70 
;.1: rb 514;256
68 
.2: rb 101
 71 
.2: rb 101
69 
.3: rb 11
 72 
.3: rb 11
70 
.4: rb 3
 73 
.4: rb 3
71 
;¤¢  § ¯ á­ëå ¡ ©â  ­¥®¡å®¤¨¬ë ¤«ï ⮣® çâ® ¡ë ­¥ ¯¥¯¥à¥¯¨á âì á«¥¤ãî騥© ¡ ©âë, ¢ ª®­æ¥ ¡ãä¥à  0
 74 
;¤¢  § ¯ á­ëå ¡ ©â  ­¥®¡å®¤¨¬ë ¤«ï ⮣® çâ® ¡ë ­¥ ¯¥¯¥à¥¯¨á âì á«¥¤ãî騥© ¡ ©âë, ¢ ª®­æ¥ ¡ãä¥à  0
72 
buffer_end:
 75 
buffer_end:
- 
 
 76 
align 16
73 
structure_of_potock:
 77 
procinfo:
74 
rb 1024 ;1 ª¡ ¤«ï ¯®«ã祭¨ï ®¡é¥© áâàãªâãàë
78 
rb 1024 ;1 ª¡ ¤«ï ¯®«ã祭¨ï ®¡é¥© áâàãªâãàë
75 
rb 1024
 79 
rb 1024 ;Stack
76 
i_end:
 80 
i_end:
77 

            81