Subversion Repositories Kolibri OS

Rev

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

Rev 5911 Rev 5930
Line 1... Line 1...
1 
use32
 1 
use32
2 
	org 0x0
 2 
	org 0x0
3 
	db 'MENUET01' ;¨¤¥­â¨ä. ¨á¯®«­ï¥¬®£® ä ©«  ¢á¥£¤  8 ¡ ©â
 3 
	db 'MENUET01' ;¨¤¥­â¨ä. ¨á¯®«­ï¥¬®£® ä ©«  ¢á¥£¤  8 ¡ ©â
4 
	dd 0x1
 - 
 
5 
	dd start
 - 
 
6 
	dd i_end ;à §¬¥à ¯à¨«®¦¥­¨ï
 4 
	dd 1, start, i_end, mem, stacktop, 0, sys_path
7 
	dd mem
 - 
 
8 
	dd stacktop
 - 
 
9 
	dd 0
 - 
 
10 
	dd sys_path
 - 
 
Line 11... Line 5...
11 
 
 5 
 
12 
include '../../macros.inc'
 6 
include '../../macros.inc'
13 
include '../../proc32.inc'
 7 
include '../../proc32.inc'
14 
include '../../develop/libraries/box_lib/load_lib.mac'
 8 
include '../../develop/libraries/box_lib/load_lib.mac'
- 
 
 9 
include '../../develop/libraries/box_lib/trunk/box_lib.mac'
15 
include '../../develop/libraries/box_lib/trunk/box_lib.mac'
 10 
include '../../develop/libraries/TinyGL/asm_fork/opengl_const.inc'
16 
include '../../dll.inc'
 11 
include '../../dll.inc'
17 
include 'lang.inc'
 12 
include 'lang.inc'
Line 18... Line 13...
18 
include 'info_fun_float.inc'
 13 
include 'info_fun_float.inc'
Line 35... Line 30...
35 
image_data dd 0 ;㪠§ â¥«ì ­  ¢à¥¬¥­­ãî ¯ ¬ïâì, ­ã¦¥­ ¤«ï ¯à¥®¡à §®¢ ­¨ï ¨§®¡à ¦¥­¨ï
 30 
image_data dd 0 ;㪠§ â¥«ì ­  ¢à¥¬¥­­ãî ¯ ¬ïâì, ­ã¦¥­ ¤«ï ¯à¥®¡à §®¢ ­¨ï ¨§®¡à ¦¥­¨ï
36 
open_file_lif dd 0 ;㪠§ â¥«ì ­  ¯ ¬ïâì ¤«ï ®âªàëâ¨ï ä ©«®¢ 3ds
 31 
open_file_lif dd 0 ;㪠§ â¥«ì ­  ¯ ¬ïâì ¤«ï ®âªàëâ¨ï ä ©«®¢ 3ds
37 
open_file_size dd 0 ;à §¬¥à ®âªàë⮣® ä ©« 
 32 
open_file_size dd 0 ;à §¬¥à ®âªàë⮣® ä ©« 
Line 38... Line 33...
38 
 
 33 
 
- 
 
 34 
;
39 
;
 35 
main_wnd_height equ 460 ;¢ëá®â  £« ¢­®£® ®ª­  ¯à®£à ¬¬ë
40 
fn_toolbar db 'toolbar.png',0
 36 
fn_toolbar db 'toolbar.png',0
41 
IMAGE_TOOLBAR_ICON_SIZE equ 16*16*3
 37 
IMAGE_TOOLBAR_ICON_SIZE equ 16*16*3
42 
IMAGE_TOOLBAR_SIZE equ IMAGE_TOOLBAR_ICON_SIZE*7
 38 
IMAGE_TOOLBAR_SIZE equ IMAGE_TOOLBAR_ICON_SIZE*7
43 
image_data_toolbar dd 0
 39 
image_data_toolbar dd 0
Line 68... Line 64...
68 
 
 64 
 
69 
	mov [run_file_70.Function], 0
 65 
	mov [run_file_70.Function], 0
70 
	mov [run_file_70.Position], 0
 66 
	mov [run_file_70.Position], 0
71 
	mov [run_file_70.Flags], 0
 67 
	mov [run_file_70.Flags], 0
72 
	mov [run_file_70.Count], dword size
 68 
	mov [run_file_70.Count], dword size
73 
	m2m [run_file_70.Buffer], eax
 69 
	mov [run_file_70.Buffer], eax
74 
	mov byte[run_file_70+20], 0
 70 
	mov byte[run_file_70+20], 0
75 
	mov [run_file_70.FileName], file_name
 71 
	mov [run_file_70.FileName], file_name
76 
	mcall 70,run_file_70 ;§ £à㦠¥¬ ä ©« ¨§®¡à ¦¥­¨ï
 72 
	mcall 70,run_file_70 ;§ £à㦠¥¬ ä ©« ¨§®¡à ¦¥­¨ï
77 
	cmp ebx,0xffffffff
 73 
	cmp ebx,0xffffffff
Line 118... Line 114...
118 
 
 114 
 
119 
align 4
 115 
align 4
120 
start:
 116 
start:
121 
	load_libraries l_libs_start,l_libs_end
 117 
	load_libraries l_libs_start,l_libs_end
122 
	;¯à®¢¥àª  ­  ᪮«ìª® 㤠筮 § £ã§¨«¨áì ¡¨¡«¨®â¥ª¨
 - 
 
123 
	cmp	dword [lib_0+ll_struc_size-4],0
 118 
	;¯à®¢¥àª  ­  ᪮«ìª® 㤠筮 § £ã§¨«¨áì ¡¨¡«¨®â¥ª¨
124 
	jnz @f
 119 
	mov	ebp,lib_0
125 
	cmp	dword [lib_1+ll_struc_size-4],0
 - 
 
126 
	jnz @f
 - 
 
127 
	cmp	dword [lib_2+ll_struc_size-4],0
 - 
 
128 
	jnz @f
 120 
	.test_lib_open:
129 
	cmp	dword [lib_3+ll_struc_size-4],0
 121 
	cmp	dword [ebp+ll_struc_size-4],0
130 
	jnz @f
 - 
 
131 
	jmp .lib
 - 
 
132 
	@@:
 122 
	jz	@f
133 
		mcall -1 ;exit not correct
 123 
		mcall -1 ;exit not correct
- 
 
 124 
	@@:
- 
 
 125 
	add ebp,ll_struc_size
- 
 
 126 
	cmp ebp,l_libs_end
134 
	.lib:
 127 
	jl .test_lib_open
135 
	mcall 48,3,sc,sizeof.system_colors
 128 
	mcall 48,3,sc,sizeof.system_colors
136 
	mcall 40,0x27
 129 
	mcall 40,0x27
Line 137... Line 130...
137 
	stdcall [OpenDialog_Init],OpenDialog_data ;¯®¤£®â®¢ª  ¤¨ «®£ 
 130 
	stdcall [OpenDialog_Init],OpenDialog_data ;¯®¤£®â®¢ª  ¤¨ «®£ 
Line 163... Line 156...
163 
	mov dword[open_file_lif],eax
 156 
	mov dword[open_file_lif],eax
Line 164... Line 157...
164 
 
 157 
 
165 
	mcall 26,9
 158 
	mcall 26,9
Line -... Line 159...
- 
 
 159 
	mov [last_time],eax
- 
 
 160 
 
- 
 
 161 
	stdcall [kosglMakeCurrent], 5,3,320,240,ctx1
- 
 
 162 
	stdcall [glEnable], GL_DEPTH_TEST
- 
 
 163 
	stdcall [glEnable], GL_NORMALIZE ;¤¥« ¬ ­®à¬ «¨ ®¤¨­ ª®¢®© ¢¥«¨ç¨­ë ¢® ¨§¡¥¦ ­¨¥  àâ¥ä ªâ®¢
166 
	mov [last_time],eax
 164 
	stdcall [glClearColor], 0.0,0.0,0.0,0.0
167 
 
 165 
	stdcall [glShadeModel], GL_SMOOTH
- 
 
 166 
	stdcall [gluNewQuadric]
168 
align 4
 167 
	mov [qObj],eax
Line 169... Line 168...
169 
red_win:
 168 
 
170 
	call draw_window
 169 
	call draw_window
171 
 
 170 
 
Line 177... Line 176...
177 
	cmp ebx,eax
 176 
	cmp ebx,eax
178 
	jge @f
 177 
	jge @f
179 
		mov ebx,eax
 178 
		mov ebx,eax
180 
	@@:
 179 
	@@:
181 
	sub ebx,eax
 180 
	sub ebx,eax
182 
	;cmp ebx,10 ;§ ¤¥à¦ª 
 - 
 
183 
	;ja timer_funct
 - 
 
184 
	;test ebx,ebx
 - 
 
185 
	;jz timer_funct
 - 
 
186 
	mcall 23
 181 
	mcall 23
187 
	cmp eax,0
 182 
	cmp eax,0
188 
	je timer_funct
 183 
	je timer_funct
Line 189... Line 184...
189 
 
 184 
 
- 
 
 185 
	cmp al,1
190 
	cmp al,1
 186 
	jne @f
- 
 
 187 
		call draw_window
- 
 
 188 
		jmp still
191 
	jz red_win
 189 
	@@:
192 
	cmp al,2
 190 
	cmp al,2
193 
	jz key
 191 
	jz key
194 
	cmp al,3
 192 
	cmp al,3
195 
	jz button
 193 
	jz button
Line 295... Line 293...
295 
	popad
 293 
	popad
296 
	ret
 294 
	ret
297 
endp
 295 
endp
Line 298... Line 296...
298 
 
 296 
 
299 
align 4
 297 
align 4
300 
proc draw_block_end_line, coord_y:dword
 - 
 
301 
	push eax ebx ecx
 298 
proc draw_block_end_line uses eax ebx ecx, coord_y:dword
302 
		add ebx,20 ;20 = width 2.5 symbols
 299 
	add ebx,20 ;20 = width 2.5 symbols
303 
		mov eax,[coord_y]
 300 
	mov eax,[coord_y]
304 
		sub eax,2
 301 
	sub eax,2
305 
		mov ecx,eax
 302 
	mov ecx,eax
306 
		add ecx,10
 303 
	add ecx,10
307 
		stdcall [buf2d_line], buf_0, 0,ecx,ebx,ecx ,0xff
 304 
	stdcall [buf2d_line], buf_0, 0,ecx,ebx,ecx ,0xff
308 
		stdcall [buf2d_line], buf_0, ebx,ecx,ebx,eax ,0xff
 305 
	stdcall [buf2d_line], buf_0, ebx,ecx,ebx,eax ,0xff
309 
		stdcall [buf2d_line], buf_0, ebx,eax,5+10*24-4,eax ,0xff
 - 
 
310 
	pop ecx ebx eax
 306 
	stdcall [buf2d_line], buf_0, ebx,eax,5+10*24-4,eax ,0xff
311 
	ret
 307 
	ret
Line 312... Line 308...
312 
endp
 308 
endp
313 
 
 309 
 
314 
align 4
 310 
align 4
315 
draw_window:
 311 
draw_window:
316 
pushad
 312 
pushad
317 
	mcall 12,1
 - 
 
318 
	xor eax,eax
 - 
 
319 
	mov ebx,(20 shl 16)+560
 313 
	mcall 12,1
320 
	mov ecx,(20 shl 16)+315
 314 
	xor eax,eax
321 
	mov edx,[sc.work]
 315 
	mov edx,[sc.work]
322 
	or  edx,(3 shl 24)+0x10000000+0x20000000
 316 
	or  edx,0x33000000
Line 323... Line 317...
323 
	mov edi,capt
 317 
	mov edi,capt
324 
	int 0x40
 318 
	mcall , (20 shl 16)+560, (20 shl 16)+main_wnd_height
325 
 
 319 
 
326 
	mcall 9,procinfo,-1
 320 
	mcall 9,procinfo,-1
Line 443... Line 437...
443 
	stdcall [tl_data_clear], tree1
 437 
	stdcall [tl_data_clear], tree1
444 
	stdcall [buf2d_delete],buf_0
 438 
	stdcall [buf2d_delete],buf_0
445 
	stdcall [buf2d_delete],buf_1 ;㤠«ï¥¬ ¡ãä¥à
 439 
	stdcall [buf2d_delete],buf_1 ;㤠«ï¥¬ ¡ãä¥à
446 
	stdcall mem.Free,[image_data_toolbar]
 440 
	stdcall mem.Free,[image_data_toolbar]
447 
	stdcall mem.Free,[open_file_lif]
 441 
	stdcall mem.Free,[open_file_lif]
- 
 
 442 
	stdcall [gluDeleteQuadric], [qObj]
448 
	mcall -1
 443 
	mcall -1
Line 449... Line 444...
449 
 
 444 
 
450 
 
 445 
 
Line 465... Line 460...
465 
	stdcall [OpenDialog_Start],OpenDialog_data
 460 
	stdcall [OpenDialog_Start],OpenDialog_data
466 
	cmp [OpenDialog_data.status],2
 461 
	cmp [OpenDialog_data.status],2
467 
	je .end_open_file
 462 
	je .end_open_file
468 
	;ª®¤ ¯à¨ 㤠筮¬ ®âªàë⨨ ¤¨ «®£ 
 463 
	;ª®¤ ¯à¨ 㤠筮¬ ®âªàë⨨ ¤¨ «®£ 
Line 469... Line -...
469 
 
 - 
 
470 
	mov eax,70 ;70-ï äã­ªæ¨ï à ¡®â  á ä ©« ¬¨
 464 
 
471 
	mov [run_file_70.Function], 0
 465 
	mov [run_file_70.Function], 0
472 
	mov [run_file_70.Position], 0
 466 
	mov [run_file_70.Position], 0
473 
	mov [run_file_70.Flags], 0
 467 
	mov [run_file_70.Flags], 0
474 
	mov dword[run_file_70.Count], MAX_FILE_SIZE
 468 
	mov dword[run_file_70.Count], MAX_FILE_SIZE
475 
	m2m [run_file_70.Buffer], dword[open_file_lif]
 469 
	m2m [run_file_70.Buffer], dword[open_file_lif]
476 
	mov byte[run_file_70+20], 0
 470 
	mov byte[run_file_70+20], 0
477 
	mov dword[run_file_70.FileName], openfile_path
 - 
 
478 
	mov ebx,run_file_70
 471 
	mov dword[run_file_70.FileName], openfile_path
479 
	int 0x40 ;§ £à㦠¥¬ ä ©« ¨§®¡à ¦¥­¨ï
 472 
	mcall 70,run_file_70 ;§ £à㦠¥¬ ä ©« ¨§®¡à ¦¥­¨ï
480 
	cmp ebx,0xffffffff
 473 
	cmp ebx,0xffffffff
Line 481... Line 474...
481 
	je .end_open_file
 474 
	je .end_open_file
482 
 
 475 
 
Line 483... Line 476...
483 
	mov [open_file_size],ebx
 476 
	mov [open_file_size],ebx
484 
	;mcall 71,1,openfile_path
 477 
	;mcall 71,1,openfile_path
485 
 
 478 
 
- 
 
 479 
	mov byte[can_save],0
- 
 
 480 
	call init_tree
- 
 
 481 
	stdcall [buf2d_draw], buf_0 ;®¡­®¢«ï¥¬ ¡ãä¥à ­  íªà ­¥
- 
 
 482 
	mov dword[angle_x],0.0
- 
 
 483 
	mov dword[angle_y],0.0
- 
 
 484 
	mov dword[angle_z],0.0
- 
 
 485 
	cmp byte[prop_wnd_run],0
- 
 
 486 
	je @f
Line 486... Line 487...
486 
	mov byte[can_save],0
 487 
		;ç¨á⨬ ®ª­® á ª®®à¤¨­ â ¬¨
487 
	call init_tree
 488 
		stdcall [tl_info_clear], tree3
488 
	stdcall [buf2d_draw], buf_0 ;®¡­®¢«ï¥¬ ¡ãä¥à ­  íªà ­¥
 489 
	@@:
Line 1048... Line 1049...
1048 
db 'TXT',0
 1049 
db 'TXT',0
1049 
.end:
 1050 
.end:
1050 
db 0
 1051 
db 0
Line 1051... Line -...
1051 
 
 - 
 
1052 
 
 1052 
 
1053 
 
 - 
 
1054 
head_f_i:
 - 
 
1055 
head_f_l db '‘¨á⥬­ ï ®è¨¡ª ',0
 1053 
 
1056 
 
 1054 
align 4
1057 
system_dir_0 db '/sys/lib/'
 - 
 
1058 
lib_name_0 db 'proc_lib.obj',0
 - 
 
1059 
err_message_found_lib_0 db '¥ ­ ©¤¥­  ¡¨¡«¨®â¥ª  ',39,'proc_lib.obj',39,0
 - 
 
1060 
err_message_import_0 db 'Žè¨¡ª  ¯à¨ ¨¬¯®à⥠¡¨¡«¨®â¥ª¨ ',39,'proc_lib.obj',39,0
 1055 
system_dir_0 db '/sys/lib/'
1061 
 
 1056 
lib_name_0 db 'proc_lib.obj',0
1062 
system_dir_1 db '/sys/lib/'
 - 
 
1063 
lib_name_1 db 'libimg.obj',0
 - 
 
1064 
err_message_found_lib_1 db '¥ ­ ©¤¥­  ¡¨¡«¨®â¥ª  ',39,'libimg.obj',39,0
 - 
 
1065 
err_message_import_1 db 'Žè¨¡ª  ¯à¨ ¨¬¯®à⥠¡¨¡«¨®â¥ª¨ ',39,'libimg.obj',39,0
 1057 
system_dir_1 db '/sys/lib/'
1066 
 
 1058 
lib_name_1 db 'libimg.obj',0
1067 
system_dir_2 db '/sys/lib/'
 - 
 
1068 
lib_name_2 db 'box_lib.obj',0
 - 
 
1069 
err_msg_found_lib_2 db '¥ ­ ©¤¥­  ¡¨¡«¨®â¥ª  ',39,'box_lib.obj',39,0
 - 
 
1070 
err_msg_import_2 db 'Žè¨¡ª  ¯à¨ ¨¬¯®à⥠¡¨¡«¨®â¥ª¨ ',39,'box_lib',39,0
 1059 
system_dir_2 db '/sys/lib/'
1071 
 
 1060 
lib_name_2 db 'box_lib.obj',0
- 
 
 1061 
system_dir_3 db '/sys/lib/'
- 
 
 1062 
lib_name_3 db 'buf2d.obj',0
- 
 
 1063 
system_dir_4 db '/sys/lib/'
- 
 
 1064 
lib_name_4 db 'kmenu.obj',0
- 
 
 1065 
system_dir_5 db '/sys/lib/'
- 
 
 1066 
lib_name_5 db 'tinygl.obj',0
- 
 
 1067 
 
- 
 
 1068 
if lang eq ru
- 
 
 1069 
	head_f_i:
- 
 
 1070 
	head_f_l db '‘¨á⥬­ ï ®è¨¡ª ',0
- 
 
 1071 
	err_msg_found_lib_0 db '¥ ­ ©¤¥­  ¡¨¡«¨®â¥ª  ',39,'proc_lib.obj',39,0
- 
 
 1072 
	err_msg_import_0 db 'Žè¨¡ª  ¯à¨ ¨¬¯®à⥠¡¨¡«¨®â¥ª¨ ',39,'proc_lib.obj',39,0
- 
 
 1073 
	err_msg_found_lib_1 db '¥ ­ ©¤¥­  ¡¨¡«¨®â¥ª  ',39,'libimg.obj',39,0
- 
 
 1074 
	err_msg_import_1 db 'Žè¨¡ª  ¯à¨ ¨¬¯®à⥠¡¨¡«¨®â¥ª¨ ',39,'libimg.obj',39,0
1072 
system_dir_3 db '/sys/lib/'
 1075 
	err_msg_found_lib_2 db '¥ ­ ©¤¥­  ¡¨¡«¨®â¥ª  ',39,'box_lib.obj',39,0
1073 
lib_name_3 db 'buf2d.obj',0
 1076 
	err_msg_import_2 db 'Žè¨¡ª  ¯à¨ ¨¬¯®à⥠¡¨¡«¨®â¥ª¨ ',39,'box_lib',39,0
- 
 
 1077 
	err_msg_found_lib_3 db '¥ ­ ©¤¥­  ¡¨¡«¨®â¥ª  ',39,'buf2d.obj',39,0
- 
 
 1078 
	err_msg_import_3 db 'Žè¨¡ª  ¯à¨ ¨¬¯®à⥠¡¨¡«¨®â¥ª¨ ',39,'buf2d',39,0
- 
 
 1079 
	err_msg_found_lib_4 db '¥ ­ ©¤¥­  ¡¨¡«¨®â¥ª  ',39,'kmenu.obj',39,0
- 
 
 1080 
	err_msg_import_4 db 'Žè¨¡ª  ¯à¨ ¨¬¯®à⥠¡¨¡«¨®â¥ª¨ ',39,'kmenu',39,0
- 
 
 1081 
	err_msg_found_lib_5 db '¥ ­ ©¤¥­  ¡¨¡«¨®â¥ª  ',39,'tinygl.obj',39,0
- 
 
 1082 
	err_msg_import_5 db 'Žè¨¡ª  ¯à¨ ¨¬¯®à⥠¡¨¡«¨®â¥ª¨ ',39,'tinygl',39,0
- 
 
 1083 
else
- 
 
 1084 
	head_f_i:
- 
 
 1085 
	head_f_l db 'System error',0
- 
 
 1086 
	err_msg_found_lib_0 db 'Sorry I cannot found library ',39,'proc_lib.obj',39,0
- 
 
 1087 
	err_msg_import_0 db 'Error on load import library ',39,'proc_lib.obj',39,0
- 
 
 1088 
	err_msg_found_lib_1 db 'Sorry I cannot found library ',39,'libimg.obj',39,0
- 
 
 1089 
	err_msg_import_1 db 'Error on load import library ',39,'libimg.obj',39,0
- 
 
 1090 
	err_msg_found_lib_2 db 'Sorry I cannot found library ',39,'box_lib.obj',39,0
- 
 
 1091 
	err_msg_import_2 db 'Error on load import library ',39,'box_lib.obj',39,0
- 
 
 1092 
	err_msg_found_lib_3 db 'Sorry I cannot found library ',39,'buf2d.obj',39,0
- 
 
 1093 
	err_msg_import_3 db 'Error on load import library ',39,'buf2d.obj',39,0
- 
 
 1094 
	err_msg_found_lib_4 db 'Sorry I cannot found library ',39,'kmenu.obj',39,0
- 
 
 1095 
	err_msg_import_4 db 'Error on load import library ',39,'kmenu.obj',39,0
- 
 
 1096 
	err_msg_found_lib_5 db 'Sorry I cannot found library ',39,'tinygl.obj',39,0
Line -... Line 1097...
- 
 
 1097 
	err_msg_import_5 db 'Error on load import library ',39,'tinygl',39,0
1074 
err_msg_found_lib_3 db '¥ ­ ©¤¥­  ¡¨¡«¨®â¥ª  ',39,'buf2d.obj',39,0
 1098 
end if
1075 
err_msg_import_3 db 'Žè¨¡ª  ¯à¨ ¨¬¯®à⥠¡¨¡«¨®â¥ª¨ ',39,'buf2d',39,0
 1099 
 
1076 
 
 1100 
align 4
1077 
l_libs_start:
 1101 
l_libs_start:
1078 
	lib_0 l_libs lib_name_0, sys_path, file_name, system_dir_0,\
 1102 
	lib_0 l_libs lib_name_0, sys_path, file_name, system_dir_0,\
1079 
		err_message_found_lib_0, head_f_l, proclib_import,err_message_import_0, head_f_i
 1103 
		err_msg_found_lib_0, head_f_l, proclib_import,err_msg_import_0, head_f_i
1080 
	lib_1 l_libs lib_name_1, sys_path, file_name, system_dir_1,\
 1104 
	lib_1 l_libs lib_name_1, sys_path, file_name, system_dir_1,\
1081 
		err_message_found_lib_1, head_f_l, import_libimg, err_message_import_1, head_f_i
 1105 
		err_msg_found_lib_1, head_f_l, import_libimg, err_msg_import_1, head_f_i
1082 
	lib_2 l_libs lib_name_2, sys_path, library_path, system_dir_2,\
 1106 
	lib_2 l_libs lib_name_2, sys_path, library_path,  system_dir_2,\
- 
 
 1107 
		err_msg_found_lib_2, head_f_l, import_box_lib,err_msg_import_2,head_f_i
- 
 
 1108 
	lib_3 l_libs lib_name_3, sys_path, library_path,  system_dir_3,\
- 
 
 1109 
		err_msg_found_lib_3, head_f_l, import_buf2d,  err_msg_import_3,head_f_i
- 
 
 1110 
	lib_4 l_libs lib_name_4, sys_path, library_path,  system_dir_4,\
1083 
		err_msg_found_lib_2,head_f_l,import_box_lib,err_msg_import_2,head_f_i
 1111 
		err_msg_found_lib_4, head_f_l, import_libkmenu,err_msg_import_4,head_f_i
Line 1084... Line 1112...
1084 
	lib_3 l_libs lib_name_3, sys_path, library_path, system_dir_3,\
 1112 
	lib_5 l_libs lib_name_5, sys_path, library_path,  system_dir_5,\
1085 
		err_msg_found_lib_3,head_f_l,import_buf2d,err_msg_import_3,head_f_i
 1113 
		err_msg_found_lib_5, head_f_l, import_lib_tinygl,err_msg_import_5,head_f_i
1086 
l_libs_end:
 1114 
l_libs_end:
Line 1263... Line 1291...
1263 
	sz_tl_node_lev_dec db 'tl_node_lev_dec',0
 1291 
	sz_tl_node_lev_dec db 'tl_node_lev_dec',0
1264 
	sz_tl_node_poi_get_info db 'tl_node_poi_get_info',0
 1292 
	sz_tl_node_poi_get_info db 'tl_node_poi_get_info',0
1265 
	sz_tl_node_poi_get_next_info db 'tl_node_poi_get_next_info',0
 1293 
	sz_tl_node_poi_get_next_info db 'tl_node_poi_get_next_info',0
1266 
	sz_tl_node_poi_get_data db 'tl_node_poi_get_data',0
 1294 
	sz_tl_node_poi_get_data db 'tl_node_poi_get_data',0
Line -... Line 1295...
- 
 
 1295 
 
- 
 
 1296 
align 4
- 
 
 1297 
import_libkmenu:
- 
 
 1298 
	kmenu_init		       dd akmenu_init
- 
 
 1299 
	kmainmenu_draw		       dd akmainmenu_draw
- 
 
 1300 
	kmainmenu_dispatch_cursorevent dd akmainmenu_dispatch_cursorevent
- 
 
 1301 
	ksubmenu_new		       dd aksubmenu_new
- 
 
 1302 
	ksubmenu_delete 	       dd aksubmenu_delete
- 
 
 1303 
	ksubmenu_draw		       dd aksubmenu_draw
- 
 
 1304 
	ksubmenu_add		       dd aksubmenu_add
- 
 
 1305 
	kmenuitem_new		       dd akmenuitem_new
- 
 
 1306 
	kmenuitem_delete	       dd akmenuitem_delete
- 
 
 1307 
	kmenuitem_draw		       dd akmenuitem_draw
- 
 
 1308 
dd 0,0
- 
 
 1309 
	akmenu_init			db 'kmenu_init',0
- 
 
 1310 
	akmainmenu_draw 		db 'kmainmenu_draw',0
- 
 
 1311 
	akmainmenu_dispatch_cursorevent db 'kmainmenu_dispatch_cursorevent',0
- 
 
 1312 
	aksubmenu_new			db 'ksubmenu_new',0
- 
 
 1313 
	aksubmenu_delete		db 'ksubmenu_delete',0
- 
 
 1314 
	aksubmenu_draw			db 'ksubmenu_draw',0
- 
 
 1315 
	aksubmenu_add			db 'ksubmenu_add',0
- 
 
 1316 
	akmenuitem_new			db 'kmenuitem_new',0
- 
 
 1317 
	akmenuitem_delete		db 'kmenuitem_delete',0
- 
 
 1318 
	akmenuitem_draw 		db 'kmenuitem_draw',0
- 
 
 1319 
 
- 
 
 1320 
align 4
- 
 
 1321 
import_lib_tinygl:
- 
 
 1322 
macro E_LIB n
- 
 
 1323 
{
- 
 
 1324 
	n dd sz_#n
- 
 
 1325 
}
- 
 
 1326 
include '../../develop/libraries/TinyGL/asm_fork/export.inc'
- 
 
 1327 
	dd 0,0
- 
 
 1328 
macro E_LIB n
- 
 
 1329 
{
- 
 
 1330 
	sz_#n db `n,0
- 
 
 1331 
}
Line 1267... Line 1332...
1267 
 
 1332 
include '../../develop/libraries/TinyGL/asm_fork/export.inc'
1268 
 
 1333 
 
1269 
align 4
 1334 
align 4
1270 
mouse_dd dd 0x0
 1335 
mouse_dd dd 0x0
Line 1274... Line 1339...
1274 
align 4
 1339 
align 4
1275 
buf_0: dd 0 ;㪠§ â¥«ì ­  ¡ãä¥à ¨§®¡à ¦¥­¨ï
 1340 
buf_0: dd 0 ;㪠§ â¥«ì ­  ¡ãä¥à ¨§®¡à ¦¥­¨ï
1276 
.l: dw 205 ;+4 left
 1341 
.l: dw 205 ;+4 left
1277 
.t: dw 35 ;+6 top
 1342 
.t: dw 35 ;+6 top
1278 
.w: dd 340 ;+8 w
 1343 
.w: dd 340 ;+8 w
1279 
.h: dd 250 ;+12 h
 1344 
.h: dd main_wnd_height-65 ;+12 h
1280 
.color: dd 0xffffd0 ;+16 color
 1345 
.color: dd 0xffffd0 ;+16 color
1281 
	db 24 ;+20 bit in pixel
 1346 
	db 24 ;+20 bit in pixel
Line 1282... Line 1347...
1282 
 
 1347 
 
1283 
align 4
 1348 
align 4
1284 
buf_1:
 1349 
buf_1:
1285 
	dd 0 ;㪠§ â¥«ì ­  ¡ãä¥à ¨§®¡à ¦¥­¨ï
 1350 
	dd 0 ;㪠§ â¥«ì ­  ¡ãä¥à ¨§®¡à ¦¥­¨ï
1286 
	dw 25 ;+4 left
 - 
 
1287 
	dw 25 ;+6 top
 1351 
	dw 25,25 ;+4 left,top
1288 
	dd 128 ;+8 w
 - 
 
1289 
	dd 144 ;+12 h
 - 
 
1290 
	dd 0 ;+16 color
 1352 
	dd 128,144 ;+8 w,h
Line 1291... Line 1353...
1291 
	db 24 ;+20 bit in pixel
 1353 
	dd 0,24 ;+16 color,bit in pixel
1292 
 
 1354 
 
1293 
align 4
 1355 
align 4
1294 
el_focus dd tree1
 1356 
el_focus dd tree1
1295 
tree1 tree_list size_one_list,300+2, tl_key_no_edit+tl_draw_par_line,\
 1357 
tree1 tree_list size_one_list,300+2, tl_key_no_edit+tl_draw_par_line,\
Line 1296... Line 1358...
1296 
	16,16, 0xffffff,0xb0d0ff,0xd000ff, 5,35,195-16,250, 16,list_offs_text,0, el_focus,\
 1358 
	16,16, 0xffffff,0xb0d0ff,0x400040, 5,35,195-16,250, 16,list_offs_text,0, el_focus,\
1297 
	w_scr_t1,0
 1359 
	w_scr_t1,0
- 
 
 1360 
 
- 
 
 1361 
align 4
- 
 
 1362 
w_scr_t1 scrollbar 16,0, 3,0, 15, 100, 0,0, 0,0,0, 1
- 
 
 1363 
 
- 
 
 1364 
align 4
- 
 
 1365 
ctx1 db 28 dup (0) ;TinyGLContext or KOSGLContext
- 
 
 1366 
;sizeof.TinyGLContext = 28
- 
 
 1367 
 
- 
 
 1368 
qObj dd 0
- 
 
 1369 
angle_x dd 0.0
- 
 
 1370 
angle_y dd 0.0
- 
 
 1371 
angle_z dd 0.0
- 
 
 1372 
delt_size dd 3.0
- 
 
 1373 
 
- 
 
 1374 
light_position dd 0.0, 0.0, 2.0, 1.0 ;  á¯®«®¦¥­¨¥ ¨áâ®ç­¨ª  [0][1][2]
- 
 
 1375 
	;[3] = (0.0 - ¡¥áª®­¥ç­® 㤠«¥­­ë© ¨áâ®ç­¨ª, 1.0 - ¨áâ®ç­¨ª á¢¥â  ­  ®¯à¥¤¥«¥­­®¬ à ááâ®ï­¨¨)
- 
 
 1376 
light_dir dd 0.0,0.0,0.0 ;­ ¯à ¢«¥­¨¥ « ¬¯ë
- 
 
 1377 
 
- 
 
 1378 
mat_specular dd 0.3, 0.3, 0.3, 1.0 ; –¢¥â ¡«¨ª 
Line 1298... Line 1379...
1298 
 
 1379 
mat_shininess dd 3.0 ;  §¬¥à ¡«¨ª  (®¡à â­ ï ¯à®¯®àæ¨ï)
1299 
align 4
 1380 
white_light dd 0.8, 0.8, 0.8, 1.0 ; –¢¥â ¨ ¨­â¥­á¨¢­®áâì ®á¢¥é¥­¨ï, £¥­¥à¨à㥬®£® ¨áâ®ç­¨ª®¬
1300 
w_scr_t1 scrollbar 16,0, 3,0, 15, 100, 0,0, 0xeeeeee, 0xbbddff, 0, 1
 1381 
lmodel_ambient dd 0.3, 0.3, 0.3, 1.0 ;  à ¬¥âàë ä®­®¢®£® ®á¢¥é¥­¨ï
1301 
 
 1382 
 
- 
 
 1383 
align 16
1302 
align 16
 1384 
i_end:
1303 
i_end:
 1385 
	procinfo process_information
1304 
	procinfo process_information
 1386 
	rb 2048
1305 
	rb 1024
 1387 
align 16
1306 
thread_coords:
 1388 
thread_coords:
1307 
	rb 1024
 - 
 
1308 
stacktop:
 1389 
	rb 2048
1309 
	sys_path rb 1024
 1390 
stacktop:
1310 
	file_name:
 1391 
	sys_path rb 2048
1311 
		rb 4096
1392 
	file_name rb 4096
1312 
	library_path rb 1024
 1393 
	library_path rb 2048