Subversion Repositories Kolibri OS

Rev

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

Rev 7861 Rev 8442
Line 1... Line 1...
1 
use32
 1 
use32
2 
	org 0
 2 
	org 0
3 
	db 'MENUET01' ;¨¤¥­â¨ä. ¨á¯®«­ï¥¬®£® ä ©«  ¢á¥£¤  8 ¡ ©â
 3 
	db 'MENUET01' ;¨¤¥­â¨ä. ¨á¯®«­ï¥¬®£® ä ©«  ¢á¥£¤  8 ¡ ©â
4 
	dd 1,start,i_end,mem,stacktop,openfile_path,sys_path
 4 
	dd 1,start,i_end,mem,stacktop,openfile_path,sys_path
Line 5... Line 5...
5 
 
 5 
 
6 
include '../../../../programs/macros.inc'
 6 
include '../../../macros.inc'
7 
include '../../../../programs/proc32.inc'
 7 
include '../../../proc32.inc'
8 
include '../../../../programs/KOSfuncs.inc'
 8 
include '../../../KOSfuncs.inc'
- 
 
 9 
include '../../../load_img.inc'
9 
include '../../../../programs/load_img.inc'
 10 
include '../../../load_lib.mac'
10 
include '../trunk/str.inc'
 11 
include '../trunk/str.inc'
Line 11... Line 12...
11 
include 'lang.inc'
 12 
include 'lang.inc'
12 
 
 13 
 
13 
vox_offs_tree_table equ 4
 14 
vox_offs_tree_table equ 4
14 
vox_offs_data equ 12
 15 
vox_offs_data equ 12
Line 15... Line 16...
15 
txt_buf rb 8
 16 
txt_buf rb 8
16 
include '../trunk/vox_rotate.inc'
 17 
include '../trunk/vox_rotate.inc'
17 
 
 18 
 
18 
@use_library_mem mem.Alloc,mem.Free,mem.ReAlloc,dll.Load
 19 
@use_library mem.Alloc,mem.Free,mem.ReAlloc,dll.Load
19 
if lang eq ru
 20 
if lang eq ru
20 
caption db '‘®§¤ â¥«ì ¢®ªá¥«¥© 04.05.20',0 ;¯®¤¯¨áì ®ª­ 
 21 
caption db '‘®§¤ â¥«ì ¢®ªá¥«¥© 04.05.20',0 ;¯®¤¯¨áì ®ª­ 
Line 30... Line 31...
30 
buf2d_t equ word[edi+6] ;®âáâ㯠ᢥàåã
 31 
buf2d_t equ word[edi+6] ;®âáâ㯠ᢥàåã
31 
buf2d_size_lt equ dword[edi+4] ;®âáâ㯠᫥¢  ¨ á¯à ¢  ¤«ï ¡ãä¥à 
 32 
buf2d_size_lt equ dword[edi+4] ;®âáâ㯠᫥¢  ¨ á¯à ¢  ¤«ï ¡ãä¥à 
32 
buf2d_color equ dword[edi+16] ;梥â ä®­  ¡ãä¥à 
 33 
buf2d_color equ dword[edi+16] ;梥â ä®­  ¡ãä¥à 
33 
buf2d_bits equ byte[edi+20] ;ª®«¨ç¥á⢮ ¡¨â ¢ 1-© â®çª¥ ¨§®¡à ¦¥­¨ï
 34 
buf2d_bits equ byte[edi+20] ;ª®«¨ç¥á⢮ ¡¨â ¢ 1-© â®çª¥ ¨§®¡à ¦¥­¨ï
Line 34... Line -...
34 
 
 - 
 
35 
run_file_70 FileInfoBlock
 35 
 
36 
vox_obj_size dd 0 ;à §¬¥à ¢®ªá¥«ì­®£® ®¡ê¥ªâ  (¤«ï ã᪮७¨ï ¢áâ ¢ª¨)
 36 
vox_obj_size dd 0 ;à §¬¥à ¢®ªá¥«ì­®£® ®¡ê¥ªâ  (¤«ï ã᪮७¨ï ¢áâ ¢ª¨)
37 
txt_space db ' ',0
 37 
txt_space db ' ',0
38 
if lang eq ru
 38 
if lang eq ru
39 
txt_pref db ' ¡ ',0,' Š¡',0,' Œ¡',0,' ƒ¡',0 ;¯à¨áâ ¢ª¨: ª¨«®, ¬¥£ , £¨£ 
 39 
txt_pref db ' ¡ ',0,' Š¡',0,' Œ¡',0,' ƒ¡',0 ;¯à¨áâ ¢ª¨: ª¨«®, ¬¥£ , £¨£ 
Line 1277... Line 1277...
1277 
lib_name_2 db 'buf2d.obj',0
 1277 
lib_name_2 db 'buf2d.obj',0
1278 
system_dir_3 db '/sys/lib/'
 1278 
system_dir_3 db '/sys/lib/'
1279 
lib_name_3 db 'msgbox.obj',0
 1279 
lib_name_3 db 'msgbox.obj',0
Line 1280... Line 1280...
1280 
 
 1280 
 
1281 
align 4
 - 
 
1282 
head_f_i:
 - 
 
1283 
if lang eq ru
 - 
 
1284 
head_f_l db '"‘¨á⥬­ ï ®è¨¡ª ',0
 - 
 
1285 
err_message_found_lib_0 db '¥ ­ ©¤¥­  ¡¨¡«¨®â¥ª  ',39,'proc_lib.obj',39,'" -tE',0
 - 
 
1286 
err_message_import_0 db 'Žè¨¡ª  ¯à¨ ¨¬¯®à⥠¡¨¡«¨®â¥ª¨ ',39,'proc_lib.obj',39,'" -tE',0
 - 
 
1287 
err_message_found_lib_1 db '¥ ­ ©¤¥­  ¡¨¡«¨®â¥ª  ',39,'libimg.obj',39,'" -tE',0
 - 
 
1288 
err_message_import_1 db 'Žè¨¡ª  ¯à¨ ¨¬¯®à⥠¡¨¡«¨®â¥ª¨ ',39,'libimg.obj',39,'" -tE',0
 - 
 
1289 
err_msg_found_lib_2 db '¥ ­ ©¤¥­  ¡¨¡«¨®â¥ª  ',39,'buf2d.obj',39,'" -tE',0
 - 
 
1290 
err_msg_import_2 db 'Žè¨¡ª  ¯à¨ ¨¬¯®à⥠¡¨¡«¨®â¥ª¨ ',39,'buf2d',39,'" -tE',0
 - 
 
1291 
err_msg_found_lib_3 db '¥ ­ ©¤¥­  ¡¨¡«¨®â¥ª  ',39,'msgbox.obj',39,'" -tE',0
 - 
 
1292 
err_msg_import_3 db 'Žè¨¡ª  ¯à¨ ¨¬¯®à⥠¡¨¡«¨®â¥ª¨ ',39,'msgbox',39,'" -tE',0
 - 
 
1293 
else
 - 
 
1294 
head_f_l db '"System error',0
 - 
 
1295 
err_message_found_lib_0 db 'Sorry I cannot found library ',39,'proc_lib.obj',39,'" -tE',0
 - 
 
1296 
err_message_import_0 db 'Error on load import library ',39,'proc_lib.obj',39,'" -tE',0
 - 
 
1297 
err_message_found_lib_1 db 'Sorry I cannot found library ',39,'libimg.obj',39,'" -tE',0
 - 
 
1298 
err_message_import_1 db 'Error on load import library ',39,'libimg.obj',39,'" -tE',0
 - 
 
1299 
err_msg_found_lib_2 db 'Sorry I cannot found library ',39,'buf2d.obj',39,'" -tE',0
 - 
 
1300 
err_msg_import_2 db 'Error on load import library ',39,'buf2d',39,'" -tE',0
 - 
 
1301 
err_msg_found_lib_3 db 'Sorry I cannot found library ',39,'msgbox.obj',39,'" -tE',0
 - 
 
1302 
err_msg_import_3 db 'Error on load import library ',39,'msgbox',39,'" -tE',0
 - 
 
1303 
end if
 - 
 
1304 
 
 - 
 
1305 
align 4
 1281 
align 4
1306 
l_libs_start:
 1282 
l_libs_start:
1307 
	lib_0 l_libs lib_name_0, sys_path, file_name, system_dir_0,\
 - 
 
1308 
		err_message_found_lib_0, head_f_l, proclib_import,err_message_import_0, head_f_i
 1283 
	lib_0 l_libs lib_name_0, file_name, system_dir_0, import_proclib
1309 
	lib_1 l_libs lib_name_1, sys_path, file_name, system_dir_1,\
 - 
 
1310 
		err_message_found_lib_1, head_f_l, import_libimg, err_message_import_1, head_f_i
 1284 
	lib_1 l_libs lib_name_1, file_name, system_dir_1, import_libimg
1311 
	lib_2 l_libs lib_name_2, sys_path, library_path, system_dir_2,\
 - 
 
1312 
		err_msg_found_lib_2,head_f_l,import_buf2d,err_msg_import_2,head_f_i
 1285 
	lib_2 l_libs lib_name_2, file_name, system_dir_2, import_buf2d
1313 
	lib_3 l_libs lib_name_3, sys_path, library_path, system_dir_3,\
 - 
 
1314 
		err_msg_found_lib_3,head_f_l,import_msgbox_lib,err_msg_import_3,head_f_i
 1286 
	lib_3 l_libs lib_name_3, file_name, system_dir_3, import_msgbox_lib
Line 1315... Line 1287...
1315 
l_libs_end:
 1287 
l_libs_end:
1316 
 
 1288 
 
1317 
align 4
 1289 
align 4
Line 1360... Line 1332...
1360 
	aimg_rotate  db 'img_rotate',0
 1332 
	aimg_rotate  db 'img_rotate',0
1361 
	aimg_rotate_layer db 'img_rotate_layer',0
 1333 
	aimg_rotate_layer db 'img_rotate_layer',0
1362 
	aimg_draw    db 'img_draw',0
 1334 
	aimg_draw    db 'img_draw',0
Line 1363... Line 1335...
1363 
 
 1335 
 
1364 
align 4
 1336 
align 4
1365 
proclib_import: ;®¯¨á ­¨¥ íªá¯®àâ¨à㥬ëå ä㭪権
 1337 
import_proclib:
1366 
	OpenDialog_Init dd aOpenDialog_Init
 1338 
	OpenDialog_Init dd aOpenDialog_Init
1367 
	OpenDialog_Start dd aOpenDialog_Start
 1339 
	OpenDialog_Start dd aOpenDialog_Start
1368 
dd 0,0
 1340 
dd 0,0
1369 
	aOpenDialog_Init db 'OpenDialog_init',0
 1341 
	aOpenDialog_Init db 'OpenDialog_init',0
Line 1453... Line 1425...
1453 
dd 0,0
 1425 
dd 0,0
1454 
	amb_create db 'mb_create',0
 1426 
	amb_create db 'mb_create',0
1455 
;       amb_reinit db 'mb_reinit',0
 1427 
;       amb_reinit db 'mb_reinit',0
1456 
;       amb_setfunctions db 'mb_setfunctions',0
 1428 
;       amb_setfunctions db 'mb_setfunctions',0
Line 1457... Line -...
1457 
 
 - 
 
1458 
mouse_dd dd 0
 - 
 
1459 
sc system_colors
- 
 
1460 
last_time dd 0
 - 
 
1461 
 
 - 
 
1462 
align 16
 - 
 
1463 
procinfo process_information
- 
 
1464 
 
 1429 
 
1465 
align 4
 1430 
align 4
1466 
buf_0: dd 0
 1431 
buf_0: dd 0
1467 
	dw 5 ;+4 left
 1432 
	dw 5 ;+4 left
1468 
	dw 35 ;+6 top
 1433 
	dw 35 ;+6 top
Line 1560... Line 1525...
1560 
	rb BUF_STRUCT_SIZE*(2+1)
 1525 
	rb BUF_STRUCT_SIZE*(2+1)
Line 1561... Line 1526...
1561 
 
 1526 
 
1562 
 
 1527 
 
- 
 
 1528 
align 16
- 
 
 1529 
i_end:
- 
 
 1530 
	procinfo process_information
- 
 
 1531 
	sc system_colors
- 
 
 1532 
	run_file_70 FileInfoBlock
1563 
align 16
 1533 
	mouse_dd dd ?
1564 
i_end:
 1534 
	last_time dd ?
1565 
		rb 2048
 1535 
		rb 2048
1566 
	thread:
 1536 
	thread:
1567 
		rb 2048
 1537 
		rb 2048
1568 
stacktop:
 - 
 
1569 
	sys_path rb 1024
 1538 
stacktop:
1570 
	file_name:
 - 
 
1571 
		rb 1024 ;4096
1539 
	sys_path rb 1024
1572 
	library_path rb 1024
 1540 
	file_name rb 2048 ;4096
1573 
	plugin_path rb 4096
 1541 
	plugin_path rb 4096
1574 
	openfile_path rb 4096
 1542 
	openfile_path rb 4096