Subversion Repositories Kolibri OS

Rev

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

Rev 491 Rev 583
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 
        include '..\..\..\..\macros.inc'
 6 
        include '..\..\..\..\macros.inc'
7 
;        include 'macros.inc'
 - 
 
8 
        include 'editbox.inc'
 7 
        include 'editbox.inc'
9 
meos_app_start
 8 
meos_app_start
10 
align 4
 9 
align 4
11 
        use_edit_box procinfo,22,5
 10 
        use_edit_box procinfo,22,5
12 
;Ž¡« áâì ª®¤ 
 11 
;Ž¡« áâì ª®¤ 
13 
code
 - 
 
14 
;start:                          ;’®çª  ¢å®¤  ¢ ¯à®£à ¬¬ã
 12 
code                            ;’®çª  ¢å®¤  ¢ ¯à®£à ¬¬ã
15 
        mcall   40,0x27         ;ãáâ ­®¢¨âì ¬ áªã ¤«ï ®¦¨¤ ¥¬ëå ᮡë⨩
 13 
        mcall   40,0x27         ;ãáâ ­®¢¨âì ¬ áªã ¤«ï ®¦¨¤ ¥¬ëå ᮡë⨩
16 
 ;á¨á⥬  ¡ã¤¥â ॠ£¨à®¢ âì ⮫쪮 ­  á®®¡é¥­¨¥ ® ¯¥à¥à¨á®¢ª¥,­ ¦ â  ª­®¯ª , ®¯à¥¤¥«ñ­­ ï à ­¥¥, ᮡë⨥ ®â ¬ëè¨ (çâ®-â® á«ã稫®áì - ­ ¦ â¨¥ ­  ª­®¯ªã ¬ëè¨ ¨«¨ ¯¥à¥¬¥é¥­¨¥; á¡à á뢠¥âáï ¯à¨ ¯à®ç⥭¨¨) ¨ ­ ¦ â¨¥ ª« ¢¨è¨
 14 
;á¨á⥬  ¡ã¤¥â ॠ£¨à®¢ âì ⮫쪮 ­  á®®¡é¥­¨¥ ® ¯¥à¥à¨á®¢ª¥,­ ¦ â  ª­®¯ª , ®¯à¥¤¥«ñ­­ ï à ­¥¥, ᮡë⨥ ®â ¬ëè¨ (çâ®-â® á«ã稫®áì - ­ ¦ â¨¥ ­  ª­®¯ªã ¬ëè¨ ¨«¨ ¯¥à¥¬¥é¥­¨¥; á¡à á뢠¥âáï ¯à¨ ¯à®ç⥭¨¨) ¨ ­ ¦ â¨¥ ª« ¢¨è¨
17 
red_win:
 15 
red_win:
18 
    call draw_window            ;¯¥à¢®­ ç «ì­® ­¥®¡å®¤¨¬® ­ à¨á®¢ âì ®ª­®
 16 
    call draw_window            ;¯¥à¢®­ ç «ì­® ­¥®¡å®¤¨¬® ­ à¨á®¢ âì ®ª­®
19 
align 4
 17 
align 4
20 
still:                          ;®á­®¢­®© ®¡à ¡®â稪
18 
still:                          ;®á­®¢­®© ®¡à ¡®â稪
21 
        mcall   10              ;Ž¦¨¤ âì ᮡëâ¨ï
 19 
        mcall   10              ;Ž¦¨¤ âì ᮡëâ¨ï
22 
        cmp al,0x1    ;¥á«¨ ¨§¬¥­¨«®áì ¯®«®¦¥­¨¥ ®ª­ 
 20 
        dec  eax
23 
        jz red_win
 21 
        jz   red_win
24 
        cmp al,0x2    ;¥á«¨ ­ ¦ â  ª« ¢¨è  â® ¯¥à¥©â¨
 22 
        dec  eax
25 
        jz key
 23 
        jz   key
26 
        cmp al,0x3    ;¥á«¨ ­ ¦ â  ª­®¯ª  â® ¯¥à¥©â¨
 24 
        dec  eax
27 
        jz button
 25 
        jz   button
28 
        mouse_edit_boxes editboxes,editboxes_end
 26 
        mouse_edit_boxes editboxes,editboxes_end
29 
        jmp still    ;¥á«¨ ­¨ç¥£® ¨§ ¯¥à¥ç¨á«¥­­®£® â® á­®¢  ¢ 横«
 27 
        jmp still    ;¥á«¨ ­¨ç¥£® ¨§ ¯¥à¥ç¨á«¥­­®£® â® á­®¢  ¢ 横«
30 
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 28 
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
31 
button:
 29 
button:
32 
        mcall   17      ;¯®«ãç¨âì ¨¤¥­â¨ä¨ª â®à ­ ¦ â®© ª« ¢¨è¨
 30 
        mcall   17      ;¯®«ãç¨âì ¨¤¥­â¨ä¨ª â®à ­ ¦ â®© ª« ¢¨è¨
33 
        test ah,ah              ;¥á«¨ ¢ ah 0, â® ¯¥à¥©â¨ ­  ®¡à ¡®â稪 ᮡë⨩ still
 31 
        test ah,ah              ;¥á«¨ ¢ ah 0, â® ¯¥à¥©â¨ ­  ®¡à ¡®â稪 ᮡë⨩ still
34 
        jz  still
 32 
        jz  still
35 
        mcall   -1
 33 
        mcall   -1
36 
key:
 34 
key:
37 
        mcall   2       ;§ £à㧨¬ §­ ç¥­¨¥ 2 ¢ ॣ¨áâ®à eax ¨ ¯®«ã稬 ª®¤ ­ ¦ â®© ª« ¢¨è¨
 35 
        mcall   2       ;§ £à㧨¬ §­ ç¥­¨¥ 2 ¢ ॣ¨áâ®à eax ¨ ¯®«ã稬 ª®¤ ­ ¦ â®© ª« ¢¨è¨
38 
        key_edit_boxes editboxes,editboxes_end
36 
        key_edit_boxes editboxes,editboxes_end
39 
    jmp still
 37 
    jmp still
40 
 
 38 
 
41 
;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
 39 
;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
42 
align 4
 40 
align 4
43 
draw_window:            ;à¨á®¢ ­¨¥ ®ª­  ¯à¨«®¦¥­¨ï
 41 
draw_window:            ;à¨á®¢ ­¨¥ ®ª­  ¯à¨«®¦¥­¨ï
44 
        mcall   12,1
 42 
        mcall   12,1
45 
        mcall   0,(50*65536+390),(30*65536+200),0xb3AABBCC,0x805080DD,hed
 43 
        mcall   0,(50*65536+390),(30*65536+200),0xb3AABBCC,0x805080DD,hed
46 
        draw_edit_boxes editboxes,editboxes_end,use_f9,procinfo  ;à¨á®¢ ­¨¥ edit box'®¢
 44 
        draw_edit_boxes editboxes,editboxes_end,use_f9,procinfo  ;à¨á®¢ ­¨¥ edit box'®¢
47 
        mcall   12,2
 45 
        mcall   12,2
48 
    ret
 46 
    ret
49 
;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
 47 
;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
50 
;DATA ¤ ­­ë¥
48 
;DATA ¤ ­­ë¥
51 
editboxes:
 49 
editboxes:
52 
edit1 edit_box 168,5,10,0xffffff,0x6a9480,0,0,0,99,ed_buffer.2,ed_figure_only
 50 
edit1 edit_box 168,5,10,0xffffff,0x6a9480,0,0,0,99,ed_buffer.2,ed_figure_only
53 
edit2 edit_box 250,5,30,0xffffff,0x6a9480,0,0xAABBCC,0,308,hed,ed_focus,53,53
 51 
edit2 edit_box 250,5,30,0xffffff,0x6a9480,0,0xAABBCC,0,308,hed,ed_focus,53,53
54 
edit3 edit_box 35,5,50,0xffffff,0x6a9480,0,0,0,9,ed_buffer.3,ed_figure_only
 52 
edit3 edit_box 35,5,50,0xffffff,0x6a9480,0,0,0,9,ed_buffer.3,ed_figure_only
55 
edit4 edit_box 16,5,70,0xffffff,0x6a9480,0,0,0,1,ed_buffer.4,ed_figure_only
 53 
edit4 edit_box 16,5,70,0xffffff,0x6a9480,0,0,0,1,ed_buffer.4,ed_figure_only
56 
editboxes_end:
 54 
editboxes_end:
57 
data_of_code dd 0
 55 
data_of_code dd 0
58 
mouse_flag dd 0x0
 56 
mouse_flag dd 0x0
59 
hed db   'EDITBOX optimization and retype  date 14.05.2007',0
 57 
hed db   'EDITBOX optimization and retype  date 20.07.2007',0
60 
rb  256
 58 
rb  256
61 
ed_buffer:
 59 
ed_buffer:
62 
;.1: rb 514;256
 60 
;.1: rb 514;256
63 
.2: rb 101
 61 
.2: rb 101
64 
.3: rb 11
 62 
.3: rb 11
65 
.4: rb 3
 63 
.4: rb 3
66 
;¤¢  § ¯ á­ëå ¡ ©â  ­¥®¡å®¤¨¬ë ¤«ï ⮣® çâ® ¡ë ­¥ ¯¥¯¥à¥¯¨á âì á«¥¤ãî騥© ¡ ©âë, ¢ ª®­æ¥ ¡ãä¥à  0
 64 
;¤¢  § ¯ á­ëå ¡ ©â  ­¥®¡å®¤¨¬ë ¤«ï ⮣® çâ® ¡ë ­¥ ¯¥¯¥à¥¯¨á âì á«¥¤ãî騥© ¡ ©âë, ¢ ª®­æ¥ ¡ãä¥à  0
67 
buffer_end:
 65 
buffer_end:
68 
align 16
 66 
align 16
69 
procinfo process_information
 67 
procinfo process_information
70 
meos_app_end
68 
meos_app_end
71 
udata
 69 
udata