Subversion Repositories Kolibri OS

Rev

Rev 6693 | Show entire file | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 6693 Rev 9568
Line 1... Line 1...
1
; à®á⮩ ¯à¨¬¥à ¯à®£à ¬¬ë ¤«ï KolibriOS
1
; à®á⮩ ¯à¨¬¥à ¯à®£à ¬¬ë ¤«ï KolibriOS
2
; ®§¢ã稢 ¥â ª®¤ ­ ¦ â®© ª« ¢¨è¨
2
; ®§¢ã稢 ¥â ª®¤ ­ ¦ â®© ª« ¢¨è¨
3
; - ¯¥à¥¤¥« ­ ª ª ¯à¨¬¥à ¨á¯®«ì§®¢ ­¨ï tooltip
3
; - ¯¥à¥¤¥« ­ ª ª ¯à¨¬¥à ¨á¯®«ì§®¢ ­¨ï tooltip
Line 4... Line 4...
4
 
4
 
5
use32 ; ¢ª«îç¨âì 32-¡¨â­ë© ०¨¬  áᥬ¡«¥à 
5
use32 ; ¢ª«îç¨âì 32-¡¨â­ë© ०¨¬  áᥬ¡«¥à 
Line 6... Line 6...
6
org 0x0 ;  ¤à¥á æ¨ï á ­ã«ï
6
org 0 ;  ¤à¥á æ¨ï á ­ã«ï
7
 
7
 
8
db 'MENUET01' ; 8-¡ ©â­ë© ¨¤¥­â¨ä¨ª â®à MenuetOS
8
db 'MENUET01' ; 8-¡ ©â­ë© ¨¤¥­â¨ä¨ª â®à MenuetOS
9
dd 0x01 ; ¢¥àá¨ï § £®«®¢ª  (¢á¥£¤  1)
9
dd 1 ; ¢¥àá¨ï § £®«®¢ª  (¢á¥£¤  1)
10
dd START ;  ¤à¥á ¯¥à¢®© ª®¬ ­¤ë
10
dd START ;  ¤à¥á ¯¥à¢®© ª®¬ ­¤ë
11
dd CODE_END ; à §¬¥à ¯à®£à ¬¬ë
11
dd CODE_END ; à §¬¥à ¯à®£à ¬¬ë
12
dd DATA_END ; ª®«¨ç¥á⢮ ¯ ¬ïâ¨
12
dd DATA_END ; ª®«¨ç¥á⢮ ¯ ¬ïâ¨
13
dd STACK_END ;  ¤à¥á ¢¥à設ë áâíª 
13
dd STACK_END ;  ¤à¥á ¢¥à設ë áâíª 
Line 14... Line 14...
14
dd 0x0 ;  ¤à¥á ¡ãä¥à  ¤«ï ¯ à ¬¥â஢
14
dd 0 ;  ¤à¥á ¡ãä¥à  ¤«ï ¯ à ¬¥â஢
15
dd cur_dir_path      ; 㪠§ â¥«ì ­   ¤à¥á, ªã¤  ¯®¬¥é ¥âáï áâப , ᮤ¥à¦ é ï ¯ãâì ¤® ¯à®£à ¬¬ë ¢ ¬®¬¥­â § ¯ã᪠.
15
dd cur_dir_path      ; 㪠§ â¥«ì ­   ¤à¥á, ªã¤  ¯®¬¥é ¥âáï áâப , ᮤ¥à¦ é ï ¯ãâì ¤® ¯à®£à ¬¬ë ¢ ¬®¬¥­â § ¯ã᪠.
16
 
16
 
17
include '../../../../../proc32.inc'
17
include '../../../../../proc32.inc'
18
include '../../../../../macros.inc'
18
include '../../../../../macros.inc'
19
include '../../../../../KOSfuncs.inc'
19
include '../../../../../KOSfuncs.inc'
20
include '../../../../../dll.inc'	; malloc fn
-
 
21
include '../../trunk/box_lib.mac'
-
 
22
include '../../load_lib.mac'
-
 
-
 
20
include '../../../../../dll.inc'	; malloc fn
Line 23... Line 21...
23
;include 'proc32.inc'
21
include '../../trunk/box_lib.mac'
24
;include 'macros.inc'
22
include '../../../../../load_lib.mac'
25
;include 'KOSfuncs.inc'
23
 
26
 
24
 
27
;---------------------------------------------------------------------
25
;---------------------------------------------------------------------
28
;--- €—€‹Ž Žƒ€ŒŒ› ----------------------------------------------
26
;--- €—€‹Ž Žƒ€ŒŒ› ----------------------------------------------
29
;---------------------------------------------------------------------
27
;---------------------------------------------------------------------
Line 30... Line 28...
30
; íâ®â ¬ ªà®á ®¡ï§ â¥«¥­ ¤«ï ¢á¥å ª®¬¯®­¥â®¢, ¨á¯®«ì§ãîé¨å heap
28
; íâ®â ¬ ªà®á ®¡ï§ â¥«¥­ ¤«ï ¢á¥å ª®¬¯®­¥â®¢, ¨á¯®«ì§ãîé¨å heap
31
; ªà®¬¥ ⮣®, ®¡ï§ â¥«ì­® ¨¬®àâ¨à®¢ âì lib_init - ¯à¨ ¨¬¯®à⥠®¯à¥¤¥«ïîâáï
29
; ªà®¬¥ ⮣®, ®¡ï§ â¥«ì­® ¨¬®àâ¨à®¢ âì lib_init - ¯à¨ ¨¬¯®à⥠®¯à¥¤¥«ïîâáï
32
; ä㭪樨 娯  ¤«ï ¡¨¡«¨®â¥ª¨
30
; ä㭪樨 娯  ¤«ï ¡¨¡«¨®â¥ª¨
33
@use_library_mem mem.Alloc,mem.Free,mem.ReAlloc,dll.Load
31
@use_library mem.Alloc,mem.Free,mem.ReAlloc,dll.Load
34
 
-
 
35
START:
-
 
36
;---------------------------------------------------------------------
-
 
37
;--- ˆˆ–ˆ€‹ˆ‡€–ˆŸ ----------------------------------------
-
 
38
;---------------------------------------------------------------------
-
 
39
;mov eax, mem_alloc
-
 
40
;mov [mem.alloc], eax
32
 
Line 41... Line 33...
41
;mov eax, mem_realloc
33
START:
Line 42... Line 34...
42
;mov [mem.realloc], eax
34
;---------------------------------------------------------------------
43
;mov eax, mem_free
-
 
44
;mov [mem.free], eax
35
;--- ˆˆ–ˆ€‹ˆ‡€–ˆŸ ----------------------------------------
45
mcall	68, 11
36
;---------------------------------------------------------------------
46
 
37
mcall	68, 11
47
mcall 40, $C0000027 ; ¬ áª  ᮡë⨩ - ¬ëèì ⮫쪮 ¢  ªâ¨¢­®¬ ®ª­¥
38
 
Line 142... Line 133...
142
;sys_path	db '/tmp0/1/'
133
;sys_path	db '/tmp0/1/'
143
lib_name    db 'box_lib.obj',0
134
lib_name    db 'box_lib.obj',0
144
cur_dir_path    rb 4096
135
cur_dir_path    rb 4096
145
lib_path    rb 4096
136
lib_path    rb 4096
Line 146... Line -...
146
 
-
 
147
e_notfound_lib    db 'Sorry I cannot load library box_lib.obj',0
-
 
148
 
-
 
149
head_f_i:
-
 
150
head_f_l    db 'System error',0
-
 
151
e_import    db 'Error on load import library box_lib.obj',0
-
 
152
 
137
 
153
myimport:
138
myimport:
154
				dd sz_lib_init ;äã­ªæ¨ï § ¯ã᪠¥âáï ¬ ªà®á®¬ 1 à § ¯à¨ ¯®¤ª«î祭¨¨ 
139
				dd sz_lib_init ;äã­ªæ¨ï § ¯ã᪠¥âáï ¬ ªà®á®¬ 1 à § ¯à¨ ¯®¤ª«î祭¨¨ 
155
;¡¨¡«¨®â¥ª¨, ¯®â®¬ã ¢ ¯à®£à ¬¬¥ ¬¥âª  ­  ­¥¥ ­¥ ­ã¦­ 
140
;¡¨¡«¨®â¥ª¨, ¯®â®¬ã ¢ ¯à®£à ¬¬¥ ¬¥âª  ­  ­¥¥ ­¥ ­ã¦­ 
156
tooltip_init  	dd sz_tooltip_init
141
tooltip_init  	dd sz_tooltip_init
157
tooltip_delete	dd sz_tooltip_delete
142
tooltip_delete	dd sz_tooltip_delete
158
tooltip_test_show	dd sz_tooltip_test_show
143
tooltip_test_show	dd sz_tooltip_test_show
159
tooltip_mouse	dd sz_tooltip_mouse
144
tooltip_mouse	dd sz_tooltip_mouse
160
get_font_size	dd sz_get_font_size
-
 
161
    dd    0
145
get_font_size	dd sz_get_font_size
Line 162... Line 146...
162
    dd    0
146
    dd    0,0
163
 
147
 
164
sz_lib_init 			db 'lib_init',0
148
sz_lib_init 			db 'lib_init',0
165
sz_tooltip_init			db 'tooltip_init', 0
149
sz_tooltip_init			db 'tooltip_init', 0