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/vox_draw.inc'
 11 
include '../trunk/vox_draw.inc'
11 
include '../trunk/vox_rotate.inc'
 12 
include '../trunk/vox_rotate.inc'
12 
include '../trunk/str.inc'
 13 
include '../trunk/str.inc'
Line 13... Line 14...
13 
include 'lang.inc'
 14 
include 'lang.inc'
14 
 
 15 
 
15 
@use_library_mem mem.Alloc,mem.Free,mem.ReAlloc,dll.Load
 16 
@use_library mem.Alloc,mem.Free,mem.ReAlloc,dll.Load
16 
if lang eq ru
 17 
if lang eq ru
17 
caption db '¥à¥¬¥é¥­¨¥ ¢®ªá¥«¥© 04.05.20',0 ;¯®¤¯¨áì ®ª­ 
 18 
caption db '¥à¥¬¥é¥­¨¥ ¢®ªá¥«¥© 04.05.20',0 ;¯®¤¯¨áì ®ª­ 
18 
else
 19 
else
Line 19... Line -...
19 
caption db 'Voxel mover 04.05.20',0
 - 
 
20 
end if
 - 
 
21 
 
 20 
caption db 'Voxel mover 04.05.20',0
22 
run_file_70 FileInfoBlock
 21 
end if
Line 23... Line 22...
23 
 
 22 
 
24 
IMAGE_TOOLBAR_ICON_SIZE equ 16*16*3
 23 
IMAGE_TOOLBAR_ICON_SIZE equ 16*16*3
Line 59... Line 58...
59 
 
 58 
 
60 
align 4
 59 
align 4
61 
start:
 60 
start:
62 
	load_libraries l_libs_start,l_libs_end
 61 
	load_libraries l_libs_start,l_libs_end
63 
	;¯à®¢¥àª  ­  ᪮«ìª® 㤠筮 § £ã§¨« áì ¡¨¡«¨®â¥ª 
 62 
	;¯à®¢¥àª  ­  ᪮«ìª® 㤠筮 § £ã§¨« áì ¡¨¡«¨®â¥ª 
64 
	mov	ebp,lib_2
 63 
	mov	ebp,lib0
65 
	cmp	dword [ebp+ll_struc_size-4],0
 64 
	cmp	dword [ebp+ll_struc_size-4],0
66 
	jz	@f
 65 
	jz	@f
67 
		mcall SF_TERMINATE_PROCESS
 66 
		mcall SF_TERMINATE_PROCESS
68 
	@@:
 67 
	@@:
Line 1331... Line 1330...
1331 
system_dir_2 db '/sys/lib/'
 1330 
system_dir_2 db '/sys/lib/'
1332 
lib_name_2 db 'buf2d.obj',0
 1331 
lib_name_2 db 'buf2d.obj',0
1333 
system_dir_3 db '/sys/lib/'
 1332 
system_dir_3 db '/sys/lib/'
1334 
lib_name_3 db 'libini.obj',0
 1333 
lib_name_3 db 'libini.obj',0
Line 1335... Line -...
1335 
 
 - 
 
1336 
align 4
 - 
 
1337 
head_f_i:
 - 
 
1338 
if lang eq ru
 - 
 
1339 
head_f_l db '"‘¨á⥬­ ï ®è¨¡ª ',0
 - 
 
1340 
err_message_found_lib_0 db '¥ ­ ©¤¥­  ¡¨¡«¨®â¥ª  ',39,'proc_lib.obj',39,'" -tE',0
 - 
 
1341 
err_message_import_0 db 'Žè¨¡ª  ¯à¨ ¨¬¯®à⥠¡¨¡«¨®â¥ª¨ ',39,'proc_lib.obj',39,'" -tE',0
 - 
 
1342 
err_message_found_lib_1 db '¥ ­ ©¤¥­  ¡¨¡«¨®â¥ª  ',39,'libimg.obj',39,'" -tE',0
 - 
 
1343 
err_message_import_1 db 'Žè¨¡ª  ¯à¨ ¨¬¯®à⥠¡¨¡«¨®â¥ª¨ ',39,'libimg.obj',39,'" -tE',0
 - 
 
1344 
err_msg_found_lib_2 db '¥ ­ ©¤¥­  ¡¨¡«¨®â¥ª  ',39,'buf2d.obj',39,'" -tE',0
 - 
 
1345 
err_msg_import_2 db 'Žè¨¡ª  ¯à¨ ¨¬¯®à⥠¡¨¡«¨®â¥ª¨ ',39,'buf2d',39,'" -tE',0
 - 
 
1346 
err_msg_found_lib_3 db '¥ ­ ©¤¥­  ¡¨¡«¨®â¥ª  ',39,'libini.obj',39,'" -tE',0
 - 
 
1347 
err_msg_import_3 db 'Žè¨¡ª  ¯à¨ ¨¬¯®à⥠¡¨¡«¨®â¥ª¨ ',39,'libini',39,'" -tE',0
 - 
 
1348 
else
 - 
 
1349 
head_f_l db '"System error',0
 - 
 
1350 
err_message_found_lib_0 db 'Sorry I cannot found library ',39,'proc_lib.obj',39,'" -tE',0
 - 
 
1351 
err_message_import_0 db 'Error on load import library ',39,'proc_lib.obj',39,'" -tE',0
 - 
 
1352 
err_message_found_lib_1 db 'Sorry I cannot found library ',39,'libimg.obj',39,'" -tE',0
 - 
 
1353 
err_message_import_1 db 'Error on load import library ',39,'libimg.obj',39,'" -tE',0
 - 
 
1354 
err_msg_found_lib_2 db 'Sorry I cannot found library ',39,'buf2d.obj',39,'" -tE',0
 - 
 
1355 
err_msg_import_2 db 'Error on load import library ',39,'buf2d',39,'" -tE',0
 - 
 
1356 
err_msg_found_lib_3 db 'Sorry I cannot found library ',39,'libini.obj',39,'" -tE',0
 - 
 
1357 
err_msg_import_3 db 'Error on load import library ',39,'libini',39,'" -tE',0
 - 
 
1358 
end if
 - 
 
1359 
 
 1334 
 
1360 
l_libs_start:
 1335 
l_libs_start:
1361 
	lib0 l_libs lib_name_0, sys_path, file_name, system_dir_0,\
 - 
 
1362 
		err_message_found_lib_0, head_f_l, proclib_import,err_message_import_0, head_f_i
 1336 
	lib0 l_libs lib_name_0, file_name, system_dir_0, import_proclib
1363 
	lib1 l_libs lib_name_1, sys_path, file_name, system_dir_1,\
 - 
 
1364 
		err_message_found_lib_1, head_f_l, import_libimg, err_message_import_1, head_f_i
 1337 
	lib1 l_libs lib_name_1, file_name, system_dir_1, import_libimg
1365 
	lib_2 l_libs lib_name_2, sys_path, library_path, system_dir_2,\
 - 
 
1366 
		err_msg_found_lib_2,head_f_l,import_buf2d,err_msg_import_2,head_f_i
 1338 
	lib2 l_libs lib_name_2, file_name, system_dir_2, import_buf2d
1367 
	lib_3 l_libs lib_name_3, sys_path, library_path, system_dir_3,\
 - 
 
1368 
		err_msg_found_lib_3,head_f_l,import_libini,err_msg_import_3,head_f_i
 1339 
	lib3 l_libs lib_name_3, file_name, system_dir_3, import_libini
Line 1369... Line 1340...
1369 
l_libs_end:
 1340 
l_libs_end:
1370 
 
 1341 
 
1371 
align 4
 1342 
align 4
Line 1414... Line 1385...
1414 
	aimg_rotate  db 'img_rotate',0
 1385 
	aimg_rotate  db 'img_rotate',0
1415 
	aimg_rotate_layer db 'img_rotate_layer',0
 1386 
	aimg_rotate_layer db 'img_rotate_layer',0
1416 
	aimg_draw    db 'img_draw',0
 1387 
	aimg_draw    db 'img_draw',0
Line 1417... Line 1388...
1417 
 
 1388 
 
1418 
align 4
 1389 
align 4
1419 
proclib_import: ;®¯¨á ­¨¥ íªá¯®àâ¨à㥬ëå ä㭪権
 1390 
import_proclib:
1420 
	OpenDialog_Init dd aOpenDialog_Init
 1391 
	OpenDialog_Init dd aOpenDialog_Init
1421 
	OpenDialog_Start dd aOpenDialog_Start
 1392 
	OpenDialog_Start dd aOpenDialog_Start
1422 
dd 0,0
 1393 
dd 0,0
1423 
	aOpenDialog_Init db 'OpenDialog_init',0
 1394 
	aOpenDialog_Init db 'OpenDialog_init',0
Line 1508... Line 1479...
1508 
	alib_init2     db 'lib_init',0
 1479 
	alib_init2     db 'lib_init',0
1509 
	aini_get_str   db 'ini_get_str',0
 1480 
	aini_get_str   db 'ini_get_str',0
1510 
	aini_get_int   db 'ini_get_int',0
 1481 
	aini_get_int   db 'ini_get_int',0
1511 
	aini_get_color db 'ini_get_color',0
 1482 
	aini_get_color db 'ini_get_color',0
Line 1512... Line -...
1512 
 
 - 
 
1513 
mouse_dd dd 0
 - 
 
1514 
sc system_colors
- 
 
1515 
 
 - 
 
1516 
align 16
 - 
 
1517 
procinfo process_information
- 
 
1518 
 
 1483 
 
1519 
;¡ãä¥à ®á­®¢­®£® ¨§®¡à ¦¥­¨ï
 1484 
;¡ãä¥à ®á­®¢­®£® ¨§®¡à ¦¥­¨ï
1520 
align 4
 1485 
align 4
1521 
buf_0: dd 0 ;㪠§ â¥«ì ­  ¤a­ë¥ ¨§®¡à ¦¥­¨ï
 1486 
buf_0: dd 0 ;㪠§ â¥«ì ­  ¤a­ë¥ ¨§®¡à ¦¥­¨ï
1522 
.l: dw 5 ;+4 left
 1487 
.l: dw 5 ;+4 left
Line 1574... Line 1539...
1574 
	db 6,7,4,3 ;w,h,h_osn,n
 1539 
	db 6,7,4,3 ;w,h,h_osn,n
1575 
	rb BUF_STRUCT_SIZE*(3+1)
 1540 
	rb BUF_STRUCT_SIZE*(3+1)
Line 1576... Line 1541...
1576 
 
 1541 
 
1577 
align 16
 1542 
align 16
- 
 
 1543 
i_end:
- 
 
 1544 
	procinfo process_information
- 
 
 1545 
	sc system_colors
- 
 
 1546 
	run_file_70 FileInfoBlock
1578 
i_end:
 1547 
	mouse_dd dd ?
1579 
	wnd_s_pos: ;¬¥áâ® ¤«ï ­ áâ஥ª áâ à⮢®© ¯®§¨æ¨¨ ®ª­ 
 1548 
	wnd_s_pos: ;¬¥áâ® ¤«ï ­ áâ஥ª áâ à⮢®© ¯®§¨æ¨¨ ®ª­ 
1580 
		rq 0
 1549 
		rq 0
1581 
	rb 4096 ;2048
 1550 
	rb 4096 ;2048
1582 
stacktop:
 1551 
stacktop:
1583 
	sys_path rb 1024
 - 
 
1584 
	file_name:
 1552 
	sys_path rb 1024
1585 
		rb 1024 ;4096
- 
 
1586 
	library_path rb 1024
 1553 
	file_name rb 2048 ;4096
1587 
	plugin_path rb 1024 ;4096
 1554 
	plugin_path rb 1024 ;4096
1588 
	openfile_path rb 1024 ;4096
 1555 
	openfile_path rb 1024 ;4096
1589 
	filename_area rb 256
 1556 
	filename_area rb 256