Subversion Repositories Kolibri OS

Rev

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

Rev 6175 Rev 6237
Line 4... Line 4...
4 
	dd 1, start, i_end, mem, stacktop, file_name, sys_path
 4 
	dd 1, start, i_end, mem, stacktop, file_name, sys_path
Line 5... Line 5...
5 
 
 5 
 
6 
include '../../macros.inc'
 6 
include '../../macros.inc'
7 
include '../../proc32.inc'
 7 
include '../../proc32.inc'
8 
include '../../KOSfuncs.inc'
 8 
include '../../KOSfuncs.inc'
9 
include '../../develop/libraries/box_lib/load_lib.mac'
 9 
include '../../load_img.inc'
10 
include '../../develop/libraries/box_lib/trunk/box_lib.mac'
 10 
include '../../develop/libraries/box_lib/trunk/box_lib.mac'
11 
include '../../develop/libraries/TinyGL/asm_fork/opengl_const.inc'
 - 
 
12 
include '../../dll.inc'
 11 
include '../../develop/libraries/TinyGL/asm_fork/opengl_const.inc'
13 
include 'lang.inc'
 12 
include 'lang.inc'
14 
include 'info_fun_float.inc'
 13 
include 'info_fun_float.inc'
15 
include 'info_menu.inc'
 14 
include 'info_menu.inc'
Line 16... Line 15...
16 
include 'data.inc'
 15 
include 'data.inc'
Line 17... Line 16...
17 
 
 16 
 
Line 18... Line -...
18 
version_edit equ 1
 - 
 
19 
 
 - 
 
20 
@use_library_mem mem.Alloc,mem.Free,mem.ReAlloc,dll.Load
 - 
 
21 
 
 - 
 
22 
struct FileInfoBlock
 - 
 
23 
	Function dd ?
 - 
 
24 
	Position dd ?
 - 
 
25 
	Flags	 dd ?
 - 
 
26 
	Count	 dd ?
 - 
 
27 
	Buffer	 dd ?
 - 
 
28 
		db ?
 17 
version_edit equ 1
29 
	FileName dd ?
 18 
 
30 
ends
 19 
@use_library_mem mem.Alloc,mem.Free,mem.ReAlloc,dll.Load
31 
 
 20 
 
32 
ID_ICON_CHUNK_MAIN equ 0 ;¨ª®­ª  £« ¢­®£® ¡«®ª 
 21 
ID_ICON_CHUNK_MAIN equ 0 ;¨ª®­ª  £« ¢­®£® ¡«®ª 
Line 33... Line 22...
33 
ID_ICON_CHUNK_NOT_FOUND equ 1 ;¨ª®­ª  ­¥ ¨§¢¥áâ­®£® ¡«®ª 
 22 
ID_ICON_CHUNK_NOT_FOUND equ 1 ;¨ª®­ª  ­¥ ¨§¢¥áâ­®£® ¡«®ª 
Line 34... Line 23...
34 
ID_ICON_DATA equ 2 ;¨ª®­ª  ¤«ï ¤ ­­ëå ¡«®ª , ­¥ ®¯à¥¤¥«¥­­®© áâàãªâãàë
 23 
ID_ICON_DATA equ 2 ;¨ª®­ª  ¤«ï ¤ ­­ëå ¡«®ª , ­¥ ®¯à¥¤¥«¥­­®© áâàãªâãàë
Line -... Line 24...
- 
 
 24 
ID_ICON_POINT equ 8
- 
 
 25 
ID_ICON_POINT_SEL equ 9
- 
 
 26 
 
35 
ID_ICON_POINT equ 8
 27 
FILE_ERROR_CHUNK_SIZE equ -3 ;®è¨¡ª  ¢ à §¬¥à¥ ¡«®ª 
36 
ID_ICON_POINT_SEL equ 9
 28 
 
37 
 
 - 
 
38 
FILE_ERROR_CHUNK_SIZE equ -3 ;®è¨¡ª  ¢ à §¬¥à¥ ¡«®ª 
 29 
include 'info_o3d.inc'
39 
 
 30 
 
40 
include 'info_o3d.inc'
 - 
 
41 
 
 - 
 
42 
align 4
 - 
 
43 
fl255 dd 255.0
 - 
 
44 
image_data dd 0 ;㪠§ â¥«ì ­  ¢à¥¬¥­­ãî ¯ ¬ïâì, ­ã¦¥­ ¤«ï ¯à¥®¡à §®¢ ­¨ï ¨§®¡à ¦¥­¨ï
 - 
 
45 
open_file_data dd 0 ;㪠§ â¥«ì ­  ¯ ¬ïâì ¤«ï ®âªàëâ¨ï ä ©«®¢ 3ds
 - 
 
46 
open_file_size dd 0 ;à §¬¥à ®âªàë⮣® ä ©« 
 - 
 
47 
open_b rb 560
 31 
main_wnd_height equ 460 ;¢ëá®â  £« ¢­®£® ®ª­  ¯à®£à ¬¬ë
48 
 
 - 
 
49 
;
 - 
 
50 
main_wnd_height equ 460 ;¢ëá®â  £« ¢­®£® ®ª­  ¯à®£à ¬¬ë
 32 
IMAGE_TOOLBAR_ICON_SIZE equ 21*21*3
51 
fn_toolbar db 'toolbar.png',0
 33 
 
52 
IMAGE_TOOLBAR_ICON_SIZE equ 21*21*3
 - 
 
53 
IMAGE_TOOLBAR_SIZE equ IMAGE_TOOLBAR_ICON_SIZE*12+54
 - 
 
54 
image_data_toolbar dd 0
 - 
 
55 
;
 - 
 
56 
TREE_ICON_SYS16_BMP_SIZE equ IMAGE_TOOLBAR_ICON_SIZE*11+54 ;à §¬¥à bmp ä ©«  á á¨á⥬­ë¬¨ ¨ª®­ª ¬¨
 - 
 
57 
icon_tl_sys dd 0 ;㪠§ â¥¥«ì ­  ¯ ¬ïâì ¤«ï åà ­¥­¨ï á¨á⥬­ëå ¨ª®­®ª
 - 
 
58 
icon_toolbar dd 0 ;㪠§ â¥¥«ì ­  ¯ ¬ïâì ¤«ï åà ­¥­¨ï ¨ª®­®ª ®¡ê¥ªâ®¢
 - 
 
59 
IMAGE_CHUNKS_SIZE equ IMAGE_TOOLBAR_ICON_SIZE*12+54 ;à §¬¥à bmp ä ©«  á ¨ª®­ª ¬¨ ®¡ê¥ªâ®¢
 - 
 
60 
;
 - 
 
61 
IMAGE_FILE1_SIZE equ 128*144*3+54 ;à §¬¥à ä ©«  á ¨§®¡à ¦¥­¨¥¬
 - 
 
62 
 
 - 
 
63 
macro load_image_file path,buf,size { ;¬ ªà®á ¤«ï § £à㧪¨ ¨§®¡à ¦¥­¨©
 - 
 
64 
	;path - ¬®¦¥â ¡ëâì ¯¥à¥¬¥­­®© ¨«¨ áâப®¢ë¬ ¯ à ¬¥â஬
 - 
 
65 
	if path eqtype '' ;¯à®¢¥à塞 § ¤ ­ «¨ áâப®© ¯ à ¬¥âà path
 - 
 
66 
		jmp @f
 - 
 
67 
			local .path_str
 - 
 
68 
			.path_str db path ;ä®à¬¨à㥬 «®ª «ì­ãî ¯¥à¥¬¥­­ãî
 - 
 
69 
			db 0
 - 
 
70 
		@@:
 - 
 
71 
		;32 - áâ ­¤ àâ­ë©  ¤à¥á ¯® ª®â®à®¬ã ¤®«¦¥­ ¡ëâì ¡ãä¥à á á¨á⥬­ë¬ ¯ã⥬
 - 
 
72 
		copy_path .path_str,[32],file_name,0
 - 
 
73 
	else
 - 
 
74 
		copy_path path,[32],file_name,0 ;ä®à¬¨à㥬 ¯®«­ë© ¯ãâì ª ä ©«ã ¨§®¡à ¦¥­¨ï, ¯®¤à §ã¬¥¢ ¥¬ çâ® ®­ ¢ ®¤­®© ¯ ¯ª¥ á ¯à®£à ¬¬®©
 - 
 
75 
	end if
 - 
 
76 
 
 - 
 
77 
	stdcall mem.Alloc, dword size ;¢ë¤¥«ï¥¬ ¯ ¬ïâì ¤«ï ¨§®¡à ¦¥­¨ï
 - 
 
78 
	mov [buf],eax
 34 
align 4
79 
 
 - 
 
80 
	mov [run_file_70.Function], SSF_READ_FILE
 - 
 
81 
	mov [run_file_70.Position], 0
 - 
 
82 
	mov [run_file_70.Flags], 0
 - 
 
83 
	mov [run_file_70.Count], dword size
 - 
 
84 
	mov [run_file_70.Buffer], eax
 - 
 
85 
	mov byte[run_file_70+20], 0
 - 
 
86 
	mov [run_file_70.FileName], file_name
 - 
 
87 
	mcall SF_FILE,run_file_70 ;§ £à㦠¥¬ ä ©« ¨§®¡à ¦¥­¨ï
 - 
 
88 
	cmp ebx,0xffffffff
 - 
 
89 
	je @f
 - 
 
90 
		;®¯à¥¤¥«ï¥¬ ¢¨¤ ¨§®¡à ¦¥­¨ï ¨ ¯¥à¥¢®¤¨¬ ¥£® ¢® ¢à¥¬¥­­ë© ¡ãä¥à image_data
 - 
 
91 
		stdcall dword[img_decode], dword[buf],ebx,0
 - 
 
Line 92... Line 35...
92 
		mov dword[image_data],eax
 35 
fl255 dd 255.0
93 
		;¯à¥®¡à §ã¥¬ ¨§®¡à ¦¥­¨¥ ª ä®à¬ âã rgb
 36 
open_file_data dd 0 ;㪠§ â¥«ì ­  ¯ ¬ïâì ¤«ï ®âªàëâ¨ï ä ©«®¢ 3ds
94 
		stdcall dword[img_to_rgb2], dword[image_data],dword[buf]
 37 
open_file_size dd 0 ;à §¬¥à ®âªàë⮣® ä ©« 
Line 95... Line 38...
95 
		;㤠«ï¥¬ ¢à¥¬¥­­ë© ¡ãä¥à image_data
 38 
image_data_toolbar dd 0
96 
		stdcall dword[img_destroy], dword[image_data]
 39 
icon_tl_sys dd 0 ;㪠§ â¥¥«ì ­  ¯ ¬ïâì ¤«ï åà ­¥­¨ï á¨á⥬­ëå ¨ª®­®ª
Line 189... Line 132...
189 
	stdcall [ksubmenu_add], [main_menu], eax
 132 
	stdcall [ksubmenu_add], [main_menu], eax
Line 190... Line 133...
190 
 
 133 
 
191 
	mov dword[w_scr_t1.type],1
 134 
	mov dword[w_scr_t1.type],1
192 
	stdcall dword[tl_data_init], tree1
 135 
	stdcall dword[tl_data_init], tree1
193 
	;á¨á⥬­ë¥ ¨ª®­ª¨ 16*16 ¤«ï tree_list
 136 
	;á¨á⥬­ë¥ ¨ª®­ª¨ 16*16 ¤«ï tree_list
194 
	load_image_file 'tl_sys_16.png', icon_tl_sys,TREE_ICON_SYS16_BMP_SIZE
 137 
	load_image_file 'tl_sys_16.png', icon_tl_sys
195 
	;¥á«¨ ¨§®¡à ¦¥­¨¥ ­¥ ®âªàë«®áì, â® ¢ icon_tl_sys ¡ã¤ãâ
 138 
	;¥á«¨ ¨§®¡à ¦¥­¨¥ ­¥ ®âªàë«®áì, â® ¢ icon_tl_sys ¡ã¤ãâ
196 
	;­¥ ¨­¨æ¨ «¨§¨à®¢ ­­ë¥ ¤ ­­ë¥, ­® ®è¨¡ª¨ ­¥ ¡ã¤¥â, â. ª. ¡ãä¥à ­ã¦­®£® à §¬¥à 
 139 
	;­¥ ¨­¨æ¨ «¨§¨à®¢ ­­ë¥ ¤ ­­ë¥, ­® ®è¨¡ª¨ ­¥ ¡ã¤¥â, â. ª. ¡ãä¥à ­ã¦­®£® à §¬¥à 
197 
	mov eax,dword[icon_tl_sys]
 140 
	mov eax,dword[icon_tl_sys]
Line 198... Line 141...
198 
	mov dword[tree1.data_img_sys],eax
 141 
	mov dword[tree1.data_img_sys],eax
199 
 
 142 
 
200 
	load_image_file 'objects.png', icon_toolbar,IMAGE_CHUNKS_SIZE
 143 
	load_image_file 'objects.png', icon_toolbar
Line 201... Line 144...
201 
	mov eax,dword[icon_toolbar]
 144 
	mov eax,dword[icon_toolbar]
Line 202... Line 145...
202 
	mov dword[tree1.data_img],eax
 145 
	mov dword[tree1.data_img],eax
203 
 
 146 
 
204 
	stdcall [buf2d_create], buf_0 ;ᮧ¤ ­¨¥ ¡ãä¥à 
 147 
	stdcall [buf2d_create], buf_0 ;ᮧ¤ ­¨¥ ¡ãä¥à 
205 
 
 148 
 
206 
	load_image_file 'font8x9.bmp', image_data_toolbar,IMAGE_FILE1_SIZE
 149 
	load_image_file 'font8x9.bmp', image_data_toolbar
Line 207... Line 150...
207 
	stdcall [buf2d_create_f_img], buf_1,[image_data_toolbar] ;ᮧ¤ ¥¬ ¡ãä¥à
 150 
	stdcall [buf2d_create_f_img], buf_1,[image_data_toolbar] ;ᮧ¤ ¥¬ ¡ãä¥à
Line 208... Line 151...
208 
	stdcall mem.Free,[image_data_toolbar] ;®á¢®¡®¦¤ ¥¬ ¯ ¬ïâì
 151 
	stdcall mem.Free,[image_data_toolbar] ;®á¢®¡®¦¤ ¥¬ ¯ ¬ïâì
209 
	stdcall [buf2d_conv_24_to_8], buf_1,1 ;¤¥« ¥¬ ¡ãä¥à ¯à®§à ç­®á⨠8 ¡¨â
 152 
	stdcall [buf2d_conv_24_to_8], buf_1,1 ;¤¥« ¥¬ ¡ãä¥à ¯à®§à ç­®á⨠8 ¡¨â
210 
	stdcall [buf2d_convert_text_matrix], buf_1
 153 
	stdcall [buf2d_convert_text_matrix], buf_1
211 
 
 154 
 
Line 1131... Line 1074...
1131 
l_libs_start:
 1074 
l_libs_start:
1132 
	lib_0 l_libs lib_name_0, sys_path, file_name, system_dir_0,\
 1075 
	lib_0 l_libs lib_name_0, sys_path, file_name, system_dir_0,\
1133 
		err_msg_found_lib_0, head_f_l, proclib_import,err_msg_import_0, head_f_i
 1076 
		err_msg_found_lib_0, head_f_l, proclib_import,err_msg_import_0, head_f_i
1134 
	lib_1 l_libs lib_name_1, sys_path, file_name, system_dir_1,\
 1077 
	lib_1 l_libs lib_name_1, sys_path, file_name, system_dir_1,\
1135 
		err_msg_found_lib_1, head_f_l, import_libimg, err_msg_import_1, head_f_i
 1078 
		err_msg_found_lib_1, head_f_l, import_libimg, err_msg_import_1, head_f_i
1136 
	lib_2 l_libs lib_name_2, sys_path, library_path,  system_dir_2,\
 1079 
	lib_2 l_libs lib_name_2, sys_path, file_name,  system_dir_2,\
1137 
		err_msg_found_lib_2, head_f_l, import_box_lib,err_msg_import_2,head_f_i
 1080 
		err_msg_found_lib_2, head_f_l, import_box_lib,err_msg_import_2,head_f_i
1138 
	lib_3 l_libs lib_name_3, sys_path, library_path,  system_dir_3,\
 1081 
	lib_3 l_libs lib_name_3, sys_path, file_name,  system_dir_3,\
1139 
		err_msg_found_lib_3, head_f_l, import_buf2d,  err_msg_import_3,head_f_i
 1082 
		err_msg_found_lib_3, head_f_l, import_buf2d,  err_msg_import_3,head_f_i
1140 
	lib_4 l_libs lib_name_4, sys_path, library_path,  system_dir_4,\
 1083 
	lib_4 l_libs lib_name_4, sys_path, file_name,  system_dir_4,\
1141 
		err_msg_found_lib_4, head_f_l, import_libkmenu,err_msg_import_4,head_f_i
 1084 
		err_msg_found_lib_4, head_f_l, import_libkmenu,err_msg_import_4,head_f_i
1142 
	lib_5 l_libs lib_name_5, sys_path, library_path,  system_dir_5,\
 1085 
	lib_5 l_libs lib_name_5, sys_path, file_name,  system_dir_5,\
1143 
		err_msg_found_lib_5, head_f_l, import_lib_tinygl,err_msg_import_5,head_f_i
 1086 
		err_msg_found_lib_5, head_f_l, import_lib_tinygl,err_msg_import_5,head_f_i
1144 
	lib_6 l_libs lib_name_6, sys_path, library_path,  system_dir_6,\
 1087 
	lib_6 l_libs lib_name_6, sys_path, file_name,  system_dir_6,\
1145 
		err_msg_found_lib_6, head_f_l, import_libini, err_msg_import_6,head_f_i
1088 
		err_msg_found_lib_6, head_f_l, import_libini, err_msg_import_6,head_f_i
1146 
l_libs_end:
 1089 
l_libs_end:
Line 1147... Line 1090...
1147 
 
 1090 
 
1148 
align 4
 1091 
align 4
Line 1388... Line 1331...
1388 
	dd 0,24 ;+16 color,bit in pixel
 1331 
	dd 0,24 ;+16 color,bit in pixel
Line 1389... Line 1332...
1389 
 
 1332 
 
1390 
align 4
 1333 
align 4
1391 
buf_1:
 1334 
buf_1:
1392 
	dd 0 ;㪠§ â¥«ì ­  ¡ãä¥à ¨§®¡à ¦¥­¨ï
 1335 
	dd 0 ;㪠§ â¥«ì ­  ¡ãä¥à ¨§®¡à ¦¥­¨ï
1393 
	dw 25,25 ;+4 left,top
 1336 
	dw 0,0 ;+4 left,top
1394 
	dd 128,144 ;+8 w,h
 1337 
	dd 128,144 ;+8 w,h
Line 1395... Line 1338...
1395 
	dd 0,24 ;+16 color,bit in pixel
 1338 
	dd 0,24 ;+16 color,bit in pixel
1396 
 
 1339 
 
Line 1417... Line 1360...
1417 
mat_shininess dd 3.0 ;  §¬¥à ¡«¨ª  (®¡à â­ ï ¯à®¯®àæ¨ï)
 1360 
mat_shininess dd 3.0 ;  §¬¥à ¡«¨ª  (®¡à â­ ï ¯à®¯®àæ¨ï)
1418 
white_light dd 0.8, 0.8, 0.8, 1.0 ; –¢¥â ¨ ¨­â¥­á¨¢­®áâì ®á¢¥é¥­¨ï, £¥­¥à¨à㥬®£® ¨áâ®ç­¨ª®¬
 1361 
white_light dd 0.8, 0.8, 0.8, 1.0 ; –¢¥â ¨ ¨­â¥­á¨¢­®áâì ®á¢¥é¥­¨ï, £¥­¥à¨à㥬®£® ¨áâ®ç­¨ª®¬
1419 
lmodel_ambient dd 0.3, 0.3, 0.3, 1.0 ;  à ¬¥âàë ä®­®¢®£® ®á¢¥é¥­¨ï
 1362 
lmodel_ambient dd 0.3, 0.3, 0.3, 1.0 ;  à ¬¥âàë ä®­®¢®£® ®á¢¥é¥­¨ï
Line 1420... Line 1363...
1420 
 
 1363 
 
1421 
if lang eq ru
 1364 
if lang eq ru
1422 
capt db 'info 3ds ¢¥àá¨ï 08.02.16',0 ;¯®¤¯¨áì ®ª­ 
 1365 
capt db 'info 3ds ¢¥àá¨ï 16.02.16',0 ;¯®¤¯¨áì ®ª­ 
1423 
else
 1366 
else
1424 
capt db 'info 3ds version 08.02.16',0 ;window caption
 1367 
capt db 'info 3ds version 16.02.16',0 ;window caption
Line 1425... Line 1368...
1425 
end if
 1368 
end if
1426 
 
 1369 
 
1427 
align 16
 1370 
align 16
Line 1443... Line 1386...
1443 
	o3d obj_3d
 1386 
	o3d obj_3d
1444 
	rb 2048
 1387 
	rb 2048
1445 
align 16
 1388 
align 16
1446 
thread_coords:
 1389 
thread_coords:
1447 
	rb 2048
 1390 
	rb 2048
- 
 
 1391 
align 16
1448 
stacktop:
 1392 
stacktop:
1449 
	sys_path rb 2048
 1393 
	sys_path rb 2048
1450 
	file_name rb 4096
1394 
	file_name rb 4096
1451 
	library_path rb 2048
 - 
 
1452 
	plugin_path rb 4096
 1395 
	plugin_path rb 4096
1453 
	openfile_path rb 4096
 1396 
	openfile_path rb 4096
1454 
	filename_area rb 256
 1397 
	filename_area rb 256
1455 
mem:
 1398 
mem: