Subversion Repositories Kolibri OS

Rev

Rev 1373 | Go to most recent revision | Show entire file | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 1373 Rev 3693
Line 7... Line 7...
7
			; ¯®á«¥ § £à㧪¨ ¯à¨«®¦¥­¨ï ¢ ¯ ¬ïâì
7
    ; ¯®á«¥ § £à㧪¨ ¯à¨«®¦¥­¨ï ¢ ¯ ¬ïâì
8
    dd i_end		    ; à §¬¥à ¯à¨«®¦¥­¨ï
8
    dd i_end             ; à §¬¥à ¯à¨«®¦¥­¨ï
9
    dd mem		    ; Ž¡ê¥¬ ¨á¯®«ì§ã¥¬®© ¯ ¬ïâ¨, ¤«ï á⥪  ®â¢¥¤¥¬ 0å100 ¡ ©â ¨ ¢ë஢­¨¬ ­  £à­¨æã 4 ¡ ©â 
9
    dd mem               ; Ž¡ê¥¬ ¨á¯®«ì§ã¥¬®© ¯ ¬ïâ¨, ¤«ï á⥪  ®â¢¥¤¥¬ 0å100 ¡ ©â ¨ ¢ë஢­¨¬ ­  £à­¨æã 4 ¡ ©â 
10
    dd mem		    ; à á¯®«®¦¨¬ ¯®§¨æ¨î á⥪  ¢ ®¡« á⨠¯ ¬ïâ¨, áࠧ㠧  ⥫®¬ ¯à®£à ¬¬ë. ‚¥à設  á⥪  ¢ ¤¨ ¯ §®­¥ ¯ ¬ïâ¨, 㪠§ ­­®¬ ¢ëè¥
10
    dd mem               ; à á¯®«®¦¨¬ ¯®§¨æ¨î á⥪  ¢ ®¡« á⨠¯ ¬ïâ¨, áࠧ㠧  ⥫®¬ ¯à®£à ¬¬ë. ‚¥à設  á⥪  ¢ ¤¨ ¯ §®­¥ ¯ ¬ïâ¨, 㪠§ ­­®¬ ¢ëè¥
11
    dd 0x0		; 㪠§ â¥«ì ­  áâபã á ¯ à ¬¥âà ¬¨.
11
    dd 0x0               ; 㪠§ â¥«ì ­  áâபã á ¯ à ¬¥âà ¬¨.
12
    dd cur_dir_path
-
 
13
 
-
 
-
 
12
    dd cur_dir_path      ; 㪠§ â¥«ì ­   ¤à¥á, ªã¤  ¯®¬¥é ¥âáï áâப , ᮤ¥à¦ é ï ¯ãâì ¤® ¯à®£à ¬¬ë ¢ ¬®¬¥­â § ¯ã᪠.
Line 14... Line 13...
14
 
13
 
15
include '../../../../../macros.inc'
14
include '../../../../../macros.inc'
16
include '../../trunk/box_lib.mac'
15
include '../../trunk/box_lib.mac'
17
include '../../load_lib.mac'
16
include '../../load_lib.mac'
Line 22... Line 21...
22
err_message_found_lib, head_f_l, myimport, err_message_import, head_f_i
21
err_message_found_lib, head_f_l, myimport, err_message_import, head_f_i
23
;if return code =-1 then exit, else nornary work
22
;if return code =-1 then exit, else nornary work
24
	cmp	eax,-1
23
    cmp      eax,-1
25
	jz	exit
24
    jz       exit
26
	mcall	40,0x27 	;ãáâ ­®¢¨âì ¬ áªã ¤«ï ®¦¨¤ ¥¬ëå ᮡë⨩
25
    mcall    40,0x27          ;ãáâ ­®¢¨âì ¬ áªã ¤«ï ®¦¨¤ ¥¬ëå ᮡë⨩
-
 
26
 
-
 
27
    push     dword check1     ;¯®¤áçñâ ¤¨­ë ⥪áâ  ¤«ï Checkbox'®¢
-
 
28
    call     [init_checkbox]
-
 
29
 
-
 
30
    push     dword check2
-
 
31
    call     [init_checkbox]
-
 
32
 
27
red_win:
33
red_win:
28
    call draw_window		;¯¥à¢®­ ç «ì­® ­¥®¡å®¤¨¬® ­ à¨á®¢ âì ®ª­®
34
    call     draw_window      ;¯¥à¢®­ ç «ì­® ­¥®¡å®¤¨¬® ­ à¨á®¢ âì ®ª­®
29
align 4
35
align 4
30
still:				;®á­®¢­®© ®¡à ¡®â稪
36
still:                        ;®á­®¢­®© ®¡à ¡®â稪
31
	mcall	10		;Ž¦¨¤ âì ᮡëâ¨ï
37
    mcall    10               ;Ž¦¨¤ âì ᮡëâ¨ï
Line 58... Line 64...
58
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
64
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
59
button:
65
button:
60
	mcall	17	;¯®«ãç¨âì ¨¤¥­â¨ä¨ª â®à ­ ¦ â®© ª« ¢¨è¨
66
    mcall   17             ;¯®«ãç¨âì ¨¤¥­â¨ä¨ª â®à ­ ¦ â®© ª« ¢¨è¨
61
	test ah,ah	;¥á«¨ ¢ ah 0, â® ¯¥à¥©â¨ ­  ®¡à ¡®â稪 ᮡë⨩ still
67
    test    ah,ah          ;¥á«¨ ¢ ah 0, â® ¯¥à¥©â¨ ­  ®¡à ¡®â稪 ᮡë⨩ still
62
	jz  still
68
    jz      still
-
 
69
exit:
63
exit:	mcall	-1
70
    mcall   -1
64
key:
71
key:
65
	mcall	2	;§ £à㧨¬ §­ ç¥­¨¥ 2 ¢ ॣ¨áâ®à eax ¨ ¯®«ã稬 ª®¤ ­ ¦ â®© ª« ¢¨è¨
72
    mcall   2              ;§ £à㧨¬ §­ ç¥­¨¥ 2 ¢ ॣ¨áâ®à eax ¨ ¯®«ã稬 ª®¤ ­ ¦ â®© ª« ¢¨è¨
Line 66... Line 73...
66
 
73
 
67
	push	dword edit1
74
    push    dword edit1
Line 108... Line 115...
108
;... «î¡ ï ¯®á«¥¤®¢ â¥«ì­®áâì ¤àã£¨å ª®¬ ­¤ ¨ ®¯à¥¤¥«¥­¨©.
115
;... «î¡ ï ¯®á«¥¤®¢ â¥«ì­®áâì ¤àã£¨å ª®¬ ­¤ ¨ ®¯à¥¤¥«¥­¨©.
109
;library_name     db 'box_lib.obj',0
116
;library_name     db 'box_lib.obj',0
110
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
117
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
Line 111... Line 118...
111
 
118
 
-
 
119
err_message_found_lib    db 'Sorry I cannot load library box_lib.obj',0
112
err_message_found_lib	db 'Sorry I cannot load library box_lib.obj',0
120
 
113
head_f_i:
121
head_f_i:
114
head_f_l	db 'System error',0
122
head_f_l              db 'System error',0
Line 115... Line 123...
115
err_message_import	db 'Error on load import library box_lib.obj',0
123
err_message_import    db 'Error on load import library box_lib.obj',0
Line 119... Line 127...
119
edit_box_draw	dd	aEdit_box_draw
127
edit_box_draw    dd    aEdit_box_draw
120
edit_box_key	dd	aEdit_box_key
128
edit_box_key     dd    aEdit_box_key
121
edit_box_mouse	dd	aEdit_box_mouse
129
edit_box_mouse   dd    aEdit_box_mouse
122
version_ed	dd	aVersion_ed
130
version_ed       dd    aVersion_ed
Line -... Line 131...
-
 
131
 
123
 
132
init_checkbox    dd    aInit_checkbox
124
check_box_draw	dd	aCheck_box_draw
133
check_box_draw   dd    aCheck_box_draw
125
check_box_mouse dd	aCheck_box_mouse
134
check_box_mouse  dd    aCheck_box_mouse
Line 126... Line 135...
126
version_ch	dd	aVersion_ch
135
version_ch       dd    aVersion_ch
Line 135... Line 144...
135
aEdit_box_draw	db 'edit_box',0
144
aEdit_box_draw   db 'edit_box',0
136
aEdit_box_key	db 'edit_box_key',0
145
aEdit_box_key    db 'edit_box_key',0
137
aEdit_box_mouse db 'edit_box_mouse',0
146
aEdit_box_mouse  db 'edit_box_mouse',0
138
aVersion_ed	db 'version_ed',0
147
aVersion_ed      db 'version_ed',0
Line -... Line 148...
-
 
148
 
139
 
149
aInit_checkbox   db 'init_checkbox2',0
140
aCheck_box_draw  db 'check_box_draw',0
150
aCheck_box_draw  db 'check_box_draw2',0
141
aCheck_box_mouse db 'check_box_mouse',0
151
aCheck_box_mouse db 'check_box_mouse2',0
Line 142... Line 152...
142
aVersion_ch	 db 'version_ch',0
152
aVersion_ch      db 'version_ch2',0
143
 
153
 
144
aOption_box_draw  db 'option_box_draw',0
154
aOption_box_draw  db 'option_box_draw',0
Line 145... Line -...
145
aOption_box_mouse db 'option_box_mouse',0
-
 
146
aVersion_op	  db 'version_op',0
-
 
147
 
155
aOption_box_mouse db 'option_box_mouse',0
148
 
156
aVersion_op       db 'version_op',0
Line 149... Line 157...
149
 
157
 
150
 
158
 
Line 151... Line 159...
151
check1 check_box 10,45,6,12,0x80AABBCC,0,0,check_text,14,ch_flag_en
159
check1 check_box2 (10 shl 16 + 12),(45 shl 16 + 12),5,0x80AABBCC,0,0,check_text1,ch_flag_en
Line 163... Line 171...
163
 
171
 
164
option_group1	dd op1	;㪠§ â¥«¨, ®­¨ ®â®¡à ¦ îâáï ¯® 㬮«ç ­¨î, ª®£¤  ¢ë¢®¤¨âáï 
172
option_group1    dd op1    ;㪠§ â¥«¨, ®­¨ ®â®¡à ¦ îâáï ¯® 㬮«ç ­¨î, ª®£¤  ¢ë¢®¤¨âáï
165
option_group2	dd op12 ;¯à¨«®¦¥­¨¥
173
option_group2    dd op12   ;¯à¨«®¦¥­¨¥
166
Option_boxs	dd  op1,op2,op3,0
174
Option_boxs    dd  op1,op2,op3,0
-
 
175
Option_boxs2   dd  op11,op12,op13,0
167
Option_boxs2	dd  op11,op12,op13,0
176
 
168
hed db	 'BOXs load from lib  date 27.04.2009',0
177
hed db     'BOXs load from lib  date 27.04.2009',0
-
 
178
hed_end:
169
hed_end:
179
 
170
rb  256
180
rb  256
171
check_text db 'First checkbox'
181
check_text1  db 'First checkbox',0
-
 
182
check_text2 db 'Second checkbox',0
172
check_text2 db 'Second checkbox'
183
 
173
op_text:		; ‘®¯à®¢®¦¤ î騩 ⥪áâ ¤«ï 祪 ¡®ªá®¢
184
op_text:        ; ‘®¯à®¢®¦¤ î騩 ⥪áâ ¤«ï Optionbox' 
174
.1 db 'Option_Box #1' 
185
.1 db 'Option_Box #1'
175
.e1:
186
.e1:
176
.2 db 'Option_Box #2'
187
.2 db 'Option_Box #2'
177
.e2:
188
.e2: