Subversion Repositories Kolibri OS

Rev

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

Rev 1064 Rev 1068
Line 11... Line 11...
11 
    dd 0x0              ; 㪠§ â¥«ì ­  áâபã á ¯ à ¬¥âà ¬¨.
 11 
    dd 0x0              ; 㪠§ â¥«ì ­  áâபã á ¯ à ¬¥âà ¬¨.
12 
    dd cur_dir_path
 12 
    dd cur_dir_path
13 
include 'macros.inc'
 13 
include 'macros.inc'
14 
include 'editbox_ex.mac'
 14 
include 'editbox_ex.mac'
15 
include 'load_lib.mac'
 15 
include 'load_lib.mac'
- 
 
 16 
	@use_library	;use load lib macros
16 
start:
 17 
start:
17 
;universal load library/librarys
 18 
;universal load library/librarys
18 
load_library  library_name, cur_dir_path, library_path, system_path, \
 19 
sys_load_library  library_name, cur_dir_path, library_path, system_path, \
19 
err_message_found_lib, head_f_l, myimport, err_message_import, head_f_i
 20 
err_message_found_lib, head_f_l, myimport, err_message_import, head_f_i
- 
 
 21 
;if return code =-1 then exit, else nornary work
- 
 
 22 
        cmp     eax,-1
- 
 
 23 
        jz      exit
20 
        mcall   40,0x27         ;ãáâ ­®¢¨âì ¬ áªã ¤«ï ®¦¨¤ ¥¬ëå ᮡë⨩
 24 
        mcall   40,0x27         ;ãáâ ­®¢¨âì ¬ áªã ¤«ï ®¦¨¤ ¥¬ëå ᮡë⨩
21 
red_win:
 25 
red_win:
22 
    call draw_window            ;¯¥à¢®­ ç «ì­® ­¥®¡å®¤¨¬® ­ à¨á®¢ âì ®ª­®
 26 
    call draw_window            ;¯¥à¢®­ ç «ì­® ­¥®¡å®¤¨¬® ­ à¨á®¢ âì ®ª­®
23 
align 4
 27 
align 4
24 
still:                          ;®á­®¢­®© ®¡à ¡®â稪
 28 
still:                          ;®á­®¢­®© ®¡à ¡®â稪
Line 92... Line 96...
92 
 
 96 
 
93 
        mcall   12,2
 97 
        mcall   12,2
94 
    ret
 98 
    ret
95 
;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
 99 
;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
- 
 
 100 
;DATA ¤ ­­ë¥
96 
;DATA ¤ ­­ë¥
 101 
;‚ᥣ¤  ᮡ«î¤ âì ¯®á«¥¤®¢ â¥«ì­®áâì ¢ ¨¬¥­¨.
97 
system_path      db '/sys/lib/box_lib.obj',0
 102 
system_path      db '/sys/lib/'
- 
 
 103 
library_name     db 'box_lib.obj',0
- 
 
 104 
; …᫨ ¥áâì ¦¥« ­¨¥ ࠧꥤ¨­¨âì, â® ­ã¦­® ¨á¯®«ì§®¢ âì á«¥¤ãîé¨î ª®­áâàãªæ¨î
- 
 
 105 
;system_path      db '/sys/lib/box_lib.obj',0
- 
 
 106 
;... «î¡ ï ¯®á«¥¤®¢ â¥«ì­®áâì ¤àã£¨å ª®¬ ­¤ ¨ ®¯à¥¤¥«¥­¨©.
- 
 
 107 
;library_name     db 'box_lib.obj',0
- 
 
 108 
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
98 
library_name     db 'box_lib.obj',0
 109 
 
99 
err_message_found_lib   db 'Sorry I cannot found library box_lib.obj',0
 110 
err_message_found_lib   db 'Sorry I cannot load library box_lib.obj',0
100 
head_f_i:
 111 
head_f_i:
101 
head_f_l        db 'System error',0
 112 
head_f_l        db 'System error',0
Line 102... Line 113...
102 
err_message_import      db 'Error on load import library box_lib.obj',0
 113 
err_message_import      db 'Error on load import library box_lib.obj',0
Line 150... Line 161...
150 
 
 161 
 
151 
option_group1   dd op1  ;㪠§ â¥«¨, ®­¨ ®â®¡à ¦ îâáï ¯® 㬮«ç ­¨î, ª®£¤  ¢ë¢®¤¨âáï
162 
option_group1   dd op1  ;㪠§ â¥«¨, ®­¨ ®â®¡à ¦ îâáï ¯® 㬮«ç ­¨î, ª®£¤  ¢ë¢®¤¨âáï
152 
option_group2   dd op12 ;¯à¨«®¦¥­¨¥
 163 
option_group2   dd op12 ;¯à¨«®¦¥­¨¥
153 
Option_boxs     dd  op1,op2,op3,0
 164 
Option_boxs     dd  op1,op2,op3,0
154 
Option_boxs2    dd  op11,op12,op13,0
 165 
Option_boxs2    dd  op11,op12,op13,0
155 
hed db   'BOXs load from lib  date 27.09.2007',0
 166 
hed db   'BOXs load from lib  date 27.04.2009',0
156 
hed_end:
 167 
hed_end:
157 
rb  256
 168 
rb  256
158 
check_text db 'First checkbox'
 169 
check_text db 'First checkbox'
159 
check_text2 db 'Second checkbox'
 170 
check_text2 db 'Second checkbox'
Line 164... Line 175...
164 
.e2:
 175 
.e2:
165 
.3 db 'Option_Box #3'
 176 
.3 db 'Option_Box #3'
166 
.e3:
 177 
.e3:
167 
ed_buffer       rb 100
 178 
ed_buffer       rb 100
168 
;-----------------------
 179 
;-----------------------
- 
 
 180 
;sc      system_colors
- 
 
 181 
p_info  process_information
169 
cur_dir_path    rb 4096
 182 
cur_dir_path    rb 4096
170 
library_path    rb 4096
 183 
library_path    rb 4096
171 
i_end:
 184 
i_end:
172 
rb 1024
 185 
rb 1024
173 
mem:
 186 
mem:
174 

            187