Subversion Repositories Kolibri OS

Rev

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

Rev 3105 Rev 8236
Line 1... Line 1...
1 
use32
 1 
use32
2 
	org 0x0
 2 
	org 0
3 
	db 'MENUET01' ;èäåíòèô. èñïîëíÿåìîãî ôàéëà âñåãäà 8 áàéò
 - 
 
4 
	dd 0x1
 - 
 
5 
	dd start
 - 
 
6 
	dd i_end ;ðàçìåð ïðèëîæåíèÿ
 - 
 
7 
	dd mem,stacktop
 3 
	db 'MENUET01'
8 
	dd 0,cur_dir_path
 4 
	dd 1,start,i_end,mem,stacktop,0,cur_dir_path
Line -... Line 5...
- 
 
 5 
 
9 
 
 6 
include '../../../../../KOSfuncs.inc'
10 
include '../../../../../macros.inc'
 7 
include '../../../../../macros.inc'
11 
include '../../../../../proc32.inc'
 8 
include '../../../../../proc32.inc'
12 
include '../../../../../develop/libraries/box_lib/load_lib.mac'
 9 
include '../../../../../load_lib.mac'
Line 13... Line 10...
13 
include '../../../../../dll.inc'
 10 
include '../../../../../dll.inc'
Line 14... Line 11...
14 
 
 11 
 
15 
@use_library_mem mem.Alloc,mem.Free,mem.ReAlloc, 0 ;dll.Load
 12 
@use_library mem.Alloc,mem.Free,mem.ReAlloc, 0 ;dll.Load
Line 16... Line 13...
16 
 
 13 
 
17 
buf2d_l equ word[edi+4] ;îòñòóï ñëåâà
 14 
buf2d_l equ word[edi+4] ;îòñòóï ñëåâà
18 
buf2d_t equ word[edi+6] ;îòñòóï ñâåðõó
 15 
buf2d_t equ word[edi+6] ;îòñòóï ñâåðõó
19 
 
 - 
 
20 
align 4
 16 
 
21 
start:
 17 
align 4
Line 22... Line 18...
22 
	load_library vectors_name, cur_dir_path, library_path, system_path, \
 18 
start:
23 
		err_message_found_lib, head_f_l, import_buf2d_lib, err_message_import, head_f_i
 19 
	load_library lib0_name, library_path, system_path, import_buf2d_lib
Line 169... Line 165...
169 
.color: dd 0xffffff ;+16 color
 165 
.color: dd 0xffffff ;+16 color
170 
	db 24 ;+20 bit in pixel
 166 
	db 24 ;+20 bit in pixel
Line 171... Line 167...
171 
 
 167 
 
172 
;--------------------------------------------------
 168 
;--------------------------------------------------
173 
system_path db '/sys/lib/'
 169 
system_path db '/sys/lib/'
174 
vectors_name db 'buf2d.obj',0
 - 
 
175 
err_message_found_lib db 'Sorry I cannot load library buf2d.obj',0
 - 
 
176 
head_f_i:
 - 
 
177 
head_f_l db 'System error',0
 - 
 
178 
err_message_import db 'Error on load import library buf2d.obj',0
 170 
lib0_name db 'buf2d.obj',0
Line 179... Line 171...
179 
;--------------------------------------------------
 171 
;--------------------------------------------------
180 
 
 172 
 
181 
i_end: ;êîíåö êîäà
 173 
i_end: ;êîíåö êîäà