Subversion Repositories Kolibri OS

Rev

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

Rev 5930 Rev 5935
Line 9... Line 9...
9 
include '../../develop/libraries/box_lib/trunk/box_lib.mac'
 9 
include '../../develop/libraries/box_lib/trunk/box_lib.mac'
10 
include '../../develop/libraries/TinyGL/asm_fork/opengl_const.inc'
 10 
include '../../develop/libraries/TinyGL/asm_fork/opengl_const.inc'
11 
include '../../dll.inc'
 11 
include '../../dll.inc'
12 
include 'lang.inc'
 12 
include 'lang.inc'
13 
include 'info_fun_float.inc'
 13 
include 'info_fun_float.inc'
- 
 
 14 
include 'info_menu.inc'
Line 14... Line 15...
14 
 
 15 
 
Line 15... Line 16...
15 
debug equ 0
 16 
debug equ 0
Line 127... Line 128...
127 
	jl .test_lib_open
 128 
	jl .test_lib_open
128 
	mcall 48,3,sc,sizeof.system_colors
 129 
	mcall 48,3,sc,sizeof.system_colors
129 
	mcall 40,0x27
 130 
	mcall 40,0x27
130 
	stdcall [OpenDialog_Init],OpenDialog_data ;¯®¤£®â®¢ª  ¤¨ «®£ 
 131 
	stdcall [OpenDialog_Init],OpenDialog_data ;¯®¤£®â®¢ª  ¤¨ «®£ 
Line -... Line 132...
- 
 
 132 
 
- 
 
 133 
	;kmenu initialisation
- 
 
 134 
	stdcall [kmenu_init],sc
- 
 
 135 
	stdcall [ksubmenu_new]
- 
 
 136 
	mov [main_menu], eax
- 
 
 137 
 
- 
 
 138 
	stdcall [ksubmenu_new]
- 
 
 139 
	mov [main_menu_view], eax
- 
 
 140 
	stdcall [kmenuitem_new], KMENUITEM_NORMAL, sz_main_menu_Veiw_Vertexes, 5
- 
 
 141 
	stdcall [ksubmenu_add], [main_menu_view], eax
- 
 
 142 
	stdcall [kmenuitem_new], KMENUITEM_NORMAL, sz_main_menu_Veiw_Faces, 6
- 
 
 143 
	stdcall [ksubmenu_add], [main_menu_view], eax
- 
 
 144 
	stdcall [kmenuitem_new], KMENUITEM_SEPARATOR, 0, 0
- 
 
 145 
	stdcall [ksubmenu_add], [main_menu_view], eax
- 
 
 146 
	stdcall [kmenuitem_new], KMENUITEM_NORMAL, sz_main_menu_Veiw_Light, 7
- 
 
 147 
	stdcall [ksubmenu_add], [main_menu_view], eax
- 
 
 148 
	stdcall [kmenuitem_new], KMENUITEM_SUBMENU, sz_main_menu_View, [main_menu_view]
- 
 
 149 
	stdcall [ksubmenu_add], [main_menu], eax
131 
 
 150 
 
132 
	mov dword[w_scr_t1.type],1
 151 
	mov dword[w_scr_t1.type],1
133 
	stdcall dword[tl_data_init], tree1
 152 
	stdcall dword[tl_data_init], tree1
134 
	;á¨á⥬­ë¥ ¨ª®­ª¨ 16*16 ¤«ï tree_list
 153 
	;á¨á⥬­ë¥ ¨ª®­ª¨ 16*16 ¤«ï tree_list
135 
	load_image_file 'tl_sys_16.png', icon_tl_sys,TREE_ICON_SYS16_BMP_SIZE
 154 
	load_image_file 'tl_sys_16.png', icon_tl_sys,TREE_ICON_SYS16_BMP_SIZE
Line 156... Line 175...
156 
	mov dword[open_file_lif],eax
 175 
	mov dword[open_file_lif],eax
Line 157... Line 176...
157 
 
 176 
 
158 
	mcall 26,9
 177 
	mcall 26,9
Line 159... Line 178...
159 
	mov [last_time],eax
 178 
	mov [last_time],eax
160 
 
 179 
 
161 
	stdcall [kosglMakeCurrent], 5,3,320,240,ctx1
 180 
	stdcall [kosglMakeCurrent], 5,23,320,240,ctx1
162 
	stdcall [glEnable], GL_DEPTH_TEST
 181 
	stdcall [glEnable], GL_DEPTH_TEST
163 
	stdcall [glEnable], GL_NORMALIZE ;¤¥« ¬ ­®à¬ «¨ ®¤¨­ ª®¢®© ¢¥«¨ç¨­ë ¢® ¨§¡¥¦ ­¨¥  àâ¥ä ªâ®¢
 182 
	stdcall [glEnable], GL_NORMALIZE ;¤¥« ¬ ­®à¬ «¨ ®¤¨­ ª®¢®© ¢¥«¨ç¨­ë ¢® ¨§¡¥¦ ­¨¥  àâ¥ä ªâ®¢
164 
	stdcall [glClearColor], 0.0,0.0,0.0,0.0
 183 
	stdcall [glClearColor], 0.0,0.0,0.0,0.0
Line 206... Line 225...
206 
	ret
 225 
	ret
Line 207... Line 226...
207 
 
 226 
 
208 
align 4
 227 
align 4
209 
timer_funct:
 228 
timer_funct:
210 
	pushad
 - 
 
211 
if debug
 - 
 
212 
	mcall 4, (5 shl 16)+8, 0xff+0x80000000, txt_0002
 - 
 
213 
end if
 229 
	pushad
214 
	mcall 26,9
 230 
	mcall 26,9
Line 215... Line -...
215 
	mov [last_time],eax
 - 
 
- 
 
 231 
	mov [last_time],eax
216 
 
 232 
 
217 
	;
 233 
	;¯à®á¬ âਢ ¥¬ ¢ë¤¥«¥­­ë© ¡«®ª ¤ ­­ëå
218 
	stdcall [tl_node_get_data],tree1
 234 
	stdcall [tl_node_get_data],tree1
219 
	cmp eax,0
 235 
	cmp eax,0
220 
	je @f
 236 
	je @f
Line 225... Line 241...
225 
		stdcall hex_in_str, txt_3ds_offs.siz, ecx,8
 241 
		stdcall hex_in_str, txt_3ds_offs.siz, ecx,8
Line 226... Line 242...
226 
 
 242 
 
227 
		add eax,dword[open_file_lif] ;¯®«ãç ¥¬ §­ ç¥­¨¥ ᤢ¨£  ¢ ¯ ¬ïâ¨
 243 
		add eax,dword[open_file_lif] ;¯®«ãç ¥¬ §­ ç¥­¨¥ ᤢ¨£  ¢ ¯ ¬ïâ¨
228 
		cmp dword[offs_last_timer],eax
 244 
		cmp dword[offs_last_timer],eax
- 
 
 245 
		je @f
229 
		je @f
 246 
			;¥á«¨ ¢ë¤¥«¥­­ë© ¡«®ª ¤ ­­ëå ­¥ ᮢ¯ ¤ ¥â á ¯®á«¥¤­¨¬ § ¯®¬­¥­­ë¬
230 
			mov dword[offs_last_timer],eax
 247 
			mov dword[offs_last_timer],eax
231 
			call buf_draw_beg
 248 
			call buf_draw_beg
232 
			stdcall [buf2d_draw_text], buf_0, buf_1,txt_3ds_offs,5,35,0xb000
 249 
			stdcall [buf2d_draw_text], buf_0, buf_1,txt_3ds_offs,5,35,0xb000
233 
			mov edx,dword[ebx+list_offs_p_data]
 250 
			mov edx,dword[ebx+list_offs_p_data]
Line 238... Line 255...
238 
			add ecx,eax ;¯®«ãç ¥¬ à §¬¥à ¡«®ª 
 255 
			add ecx,eax ;¯®«ãç ¥¬ à §¬¥à ¡«®ª 
239 
			stdcall buf_draw_hex_table,eax,ecx ;¤®¡ ¢«¥­¨¥ 16-à¨ç­ëå ¤ ­­ëå
 256 
			stdcall buf_draw_hex_table,eax,ecx ;¤®¡ ¢«¥­¨¥ 16-à¨ç­ëå ¤ ­­ëå
240 
			stdcall [buf2d_draw], buf_0 ;®¡­®¢«ï¥¬ ¡ãä¥à ­  íªà ­¥
 257 
			stdcall [buf2d_draw], buf_0 ;®¡­®¢«ï¥¬ ¡ãä¥à ­  íªà ­¥
241 
	@@:
 258 
	@@:
242 
	popad
 259 
	popad
- 
 
 260 
 
- 
 
 261 
	;¯à®á¬®âà ®ª­  á ª®®à¤¨­ â ¬¨ â®ç¥ª
- 
 
 262 
	;cmp byte[prop_wnd_run],0
- 
 
 263 
	;je @f
- 
 
 264 
	;	call prop_timer_funct
- 
 
 265 
	;@@:
243 
	jmp still
 266 
	jmp still
Line 244... Line 267...
244 
 
 267 
 
245 
align 4
 268 
align 4
246 
buf_draw_beg:
 269 
buf_draw_beg:
Line 477... Line 500...
477 
	;mcall 71,1,openfile_path
 500 
	;mcall 71,1,openfile_path
Line 478... Line 501...
478 
 
 501 
 
479 
	mov byte[can_save],0
 502 
	mov byte[can_save],0
480 
	call init_tree
 503 
	call init_tree
481 
	stdcall [buf2d_draw], buf_0 ;®¡­®¢«ï¥¬ ¡ãä¥à ­  íªà ­¥
 - 
 
482 
	mov dword[angle_x],0.0
 - 
 
483 
	mov dword[angle_y],0.0
 504 
	stdcall [buf2d_draw], buf_0 ;®¡­®¢«ï¥¬ ¡ãä¥à ­  íªà ­¥
484 
	mov dword[angle_z],0.0
 505 
	call prop_wnd_clear_param ;ç¨á⨬ ¯ à ¬¥âàë ®ª­  á ª®®à¤¨­ â ¬¨
485 
	cmp byte[prop_wnd_run],0
 506 
	cmp byte[prop_wnd_run],0
486 
	je @f
 507 
	je @f
487 
		;ç¨á⨬ ®ª­® á ª®®à¤¨­ â ¬¨
 508 
		;ç¨á⨬ ®ª­® á ª®®à¤¨­ â ¬¨
488 
		stdcall [tl_info_clear], tree3
 509 
		stdcall [tl_info_clear], tree3
Line 776... Line 797...
776 
			mov esi,ecx
 797 
			mov esi,ecx
777 
			mov edi,buffer+list_offs_text+5
 798 
			mov edi,buffer+list_offs_text+5
778 
			mov ecx,size_one_list-(list_offs_text+5)
 799 
			mov ecx,size_one_list-(list_offs_text+5)
779 
			cld
 800 
			cld
780 
			rep movsb
 801 
			rep movsb
781 
			mov byte[buffer+size_one_list-1],0 ;0 - ᨬ¢®« ª®­¥æ  áâப¨
 802 
			mov byte[buffer+size_one_list-1],0 ;0 - ᨬ¢®« ª®­æ  áâப¨
782 
		.no_capt:
 803 
		.no_capt:
783 
		stdcall [tl_node_add], tree1, ebx, buffer
 804 
		stdcall [tl_node_add], tree1, ebx, buffer
784 
		stdcall [tl_cur_next], tree1
 805 
		stdcall [tl_cur_next], tree1
785 
		if debug
 806 
		if debug
786 
			stdcall print_err,sz_add_3ds_object,buffer+list_offs_text
 807 
			stdcall print_err,sz_add_3ds_object,buffer+list_offs_text
Line 817... Line 838...
817 
		cmp byte[esi],0
 838 
		cmp byte[esi],0
818 
		jne @b
 839 
		jne @b
819 
	popad
 840 
	popad
820 
	ret
 841 
	ret
821 
endp
 842 
endp
- 
 
 843 
 
- 
 
 844 
;input:
- 
 
 845 
; eax - value
- 
 
 846 
; edi - string buffer
- 
 
 847 
; len - buffer len
- 
 
 848 
;output:
- 
 
 849 
align 4
- 
 
 850 
proc convert_int_to_str, len:dword
- 
 
 851 
pushad
- 
 
 852 
	mov esi,[len]
- 
 
 853 
	add esi,edi
- 
 
 854 
	dec esi
- 
 
 855 
	call .str
- 
 
 856 
popad
- 
 
 857 
	ret
- 
 
 858 
endp
- 
 
 859 
 
- 
 
 860 
align 4
- 
 
 861 
.str:
- 
 
 862 
	mov ecx,0x0a
- 
 
 863 
	cmp eax,ecx
- 
 
 864 
	jb @f
- 
 
 865 
		xor edx,edx
- 
 
 866 
		div ecx
- 
 
 867 
		push edx
- 
 
 868 
		call .str
- 
 
 869 
		pop eax
- 
 
 870 
	@@:
- 
 
 871 
	cmp edi,esi
- 
 
 872 
	jge @f
- 
 
 873 
		or al,0x30
- 
 
 874 
		stosb
- 
 
 875 
		mov byte[edi],0
- 
 
 876 
	@@:
- 
 
 877 
	ret
- 
 
 878 
 
822 
end if
 879 
end if
Line 823... Line 880...
823 
 
 880 
 
824 
align 4
 881 
align 4
825 
proc hex_in_str, buf:dword,val:dword,zif:dword
 882 
proc hex_in_str, buf:dword,val:dword,zif:dword
Line 855... Line 912...
855 
	stdcall [OpenDialog_Start],OpenDialog_data
 912 
	stdcall [OpenDialog_Start],OpenDialog_data
856 
	cmp [OpenDialog_data.status],2
 913 
	cmp [OpenDialog_data.status],2
857 
	je .end_save_file
 914 
	je .end_save_file
858 
	;ª®¤ ¯à¨ 㤠筮¬ ®âªàë⨨ ¤¨ «®£ 
 915 
	;ª®¤ ¯à¨ 㤠筮¬ ®âªàë⨨ ¤¨ «®£ 
Line 859... Line -...
859 
 
 - 
 
860 
	mov eax,70 ;70-ï äã­ªæ¨ï à ¡®â  á ä ©« ¬¨
 916 
 
861 
	mov [run_file_70.Function], 2
 917 
	mov [run_file_70.Function], 2
862 
	mov [run_file_70.Position], 0
 918 
	mov [run_file_70.Position], 0
863 
	mov [run_file_70.Flags], 0
 919 
	mov [run_file_70.Flags], 0
864 
	mov ebx, dword[open_file_lif]
 920 
	mov ebx, dword[open_file_lif]
865 
	mov [run_file_70.Buffer], ebx
 921 
	mov [run_file_70.Buffer], ebx
866 
	mov ebx,dword[ebx+2]
 922 
	mov ebx,dword[ebx+2]
867 
	mov dword[run_file_70.Count], ebx ;à §¬¥à ä ©« 
 923 
	mov dword[run_file_70.Count], ebx ;à §¬¥à ä ©« 
868 
	mov byte[run_file_70+20], 0
 924 
	mov byte[run_file_70+20], 0
869 
	mov dword[run_file_70.FileName], openfile_path
 925 
	mov dword[run_file_70.FileName], openfile_path
870 
	mov ebx,run_file_70
 - 
 
871 
	int 0x40 ;§ £à㦠¥¬ ä ©« ¨§®¡à ¦¥­¨ï
 926 
	mcall 70,run_file_70
872 
	cmp ebx,0xffffffff
 927 
	cmp ebx,0xffffffff
873 
	je .end_save_file
 - 
 
- 
 
 928 
	je .end_save_file
874 
 
 929 
		;...á®®¡é¥­¨¥...
875 
	.end_save_file:
 930 
	.end_save_file:
876 
	popad
 931 
	popad
Line 877... Line 932...
877 
	ret
 932 
	ret
Line 1331... Line 1386...
1331 
}
 1386 
}
1332 
include '../../develop/libraries/TinyGL/asm_fork/export.inc'
 1387 
include '../../develop/libraries/TinyGL/asm_fork/export.inc'
Line 1333... Line 1388...
1333 
 
 1388 
 
1334 
align 4
 1389 
align 4
1335 
mouse_dd dd 0x0
 - 
 
1336 
sc system_colors
1390 
mouse_dd dd 0x0
Line 1337... Line 1391...
1337 
last_time dd 0
 1391 
last_time dd 0
1338 
 
 1392 
 
1339 
align 4
 1393 
align 4
Line 1369... Line 1423...
1369 
angle_x dd 0.0
 1423 
angle_x dd 0.0
1370 
angle_y dd 0.0
 1424 
angle_y dd 0.0
1371 
angle_z dd 0.0
 1425 
angle_z dd 0.0
1372 
delt_size dd 3.0
 1426 
delt_size dd 3.0
Line 1373... Line 1427...
1373 
 
 1427 
 
1374 
light_position dd 0.0, 0.0, 2.0, 1.0 ;  á¯®«®¦¥­¨¥ ¨áâ®ç­¨ª  [0][1][2]
 1428 
light_position dd 0.0, 0.0, -2.0, 1.0 ;  á¯®«®¦¥­¨¥ ¨áâ®ç­¨ª  [0][1][2]
1375 
	;[3] = (0.0 - ¡¥áª®­¥ç­® 㤠«¥­­ë© ¨áâ®ç­¨ª, 1.0 - ¨áâ®ç­¨ª á¢¥â  ­  ®¯à¥¤¥«¥­­®¬ à ááâ®ï­¨¨)
 1429 
	;[3] = (0.0 - ¡¥áª®­¥ç­® 㤠«¥­­ë© ¨áâ®ç­¨ª, 1.0 - ¨áâ®ç­¨ª á¢¥â  ­  ®¯à¥¤¥«¥­­®¬ à ááâ®ï­¨¨)
Line 1376... Line 1430...
1376 
light_dir dd 0.0,0.0,0.0 ;­ ¯à ¢«¥­¨¥ « ¬¯ë
 1430 
light_dir dd 0.0,0.0,0.0 ;­ ¯à ¢«¥­¨¥ « ¬¯ë
1377 
 
 1431 
 
Line 1381... Line 1435...
1381 
lmodel_ambient dd 0.3, 0.3, 0.3, 1.0 ;  à ¬¥âàë ä®­®¢®£® ®á¢¥é¥­¨ï
 1435 
lmodel_ambient dd 0.3, 0.3, 0.3, 1.0 ;  à ¬¥âàë ä®­®¢®£® ®á¢¥é¥­¨ï
Line 1382... Line 1436...
1382 
 
 1436 
 
1383 
align 16
 1437 
align 16
1384 
i_end:
 1438 
i_end:
- 
 
 1439 
	procinfo process_information
1385 
	procinfo process_information
 1440 
	sc system_colors
1386 
	rb 2048
 1441 
	rb 2048
1387 
align 16
 1442 
align 16
1388 
thread_coords:
 1443 
thread_coords:
1389 
	rb 2048
 1444 
	rb 2048