Subversion Repositories Kolibri OS

Rev

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

Rev 5949 Rev 6259
Line 3... Line 3...
3 
	db 'MENUET01' ;¨¤¥­â¨ä. ¨á¯®«­ï¥¬®£® ä ©«  ¢á¥£¤  8 ¡ ©â
 3 
	db 'MENUET01' ;¨¤¥­â¨ä. ¨á¯®«­ï¥¬®£® ä ©«  ¢á¥£¤  8 ¡ ©â
4 
	dd 1, start, i_end, mem, stacktop, 0, sys_path
 4 
	dd 1, start, i_end, mem, stacktop, 0, sys_path
Line 5... Line 5...
5 
 
 5 
 
6 
include '../../../../programs/macros.inc'
 6 
include '../../../../programs/macros.inc'
7 
include '../../../../programs/proc32.inc'
 7 
include '../../../../programs/proc32.inc'
8 
include '../../../../programs/develop/libraries/box_lib/load_lib.mac'
 8 
include '../../../../programs/KOSfuncs.inc'
9 
include '../../../../programs/dll.inc'
 9 
include '../../../../programs/load_img.inc'
10 
include '../../../../programs/develop/libraries/TinyGL/asm_fork/opengl_const.inc'
 10 
include '../../../../programs/develop/libraries/TinyGL/asm_fork/opengl_const.inc'
11 
include 'vox_3d.inc'
 11 
include 'vox_3d.inc'
Line 12... Line 12...
12 
include '../trunk/str.inc'
 12 
include '../trunk/str.inc'
13 
 
 13 
 
14 
@use_library_mem mem.Alloc,mem.Free,mem.ReAlloc,dll.Load
 - 
 
15 
caption db 'Voxel viewer 07.12.15',0 ;¯®¤¯¨áì ®ª­ 
 - 
 
16 
 
 - 
 
17 
struct FileInfoBlock
 - 
 
18 
	Function dd ?
 - 
 
19 
	Position dd ?
 - 
 
20 
	Flags	 dd ?
 - 
 
21 
	Count	 dd ?
 - 
 
22 
	Buffer	 dd ?
 - 
 
23 
		db ?
 - 
 
Line 24... Line 14...
24 
	FileName dd ?
 14 
@use_library_mem mem.Alloc,mem.Free,mem.ReAlloc,dll.Load
25 
ends
 15 
caption db 'Voxel viewer 19.02.16',0 ;¯®¤¯¨áì ®ª­ 
26 
 
 16 
 
27 
3d_wnd_l equ   5 ;®âáâ㯠¤«ï tinygl ¡ãä¥à  á«¥¢ 
 17 
3d_wnd_l equ   5 ;®âáâ㯠¤«ï tinygl ¡ãä¥à  á«¥¢ 
Line 28... Line -...
28 
3d_wnd_t equ  30 ;®âáâ㯠¤«ï tinygl ¡ãä¥à  ᢥàåã
 - 
 
29 
3d_wnd_w equ 512
 - 
 
30 
3d_wnd_h equ 512
 18 
3d_wnd_t equ  30 ;®âáâ㯠¤«ï tinygl ¡ãä¥à  ᢥàåã
31 
 
 19 
3d_wnd_w equ 512
32 
image_data dd 0 ;㪠§ â¥«ì ­  ¢à¥¬¥­­ãî ¯ ¬ïâì. ¤«ï ­ã¦¥­ ¯à¥®¡à §®¢ ­¨ï ¨§®¡à ¦¥­¨ï
 20 
3d_wnd_h equ 512
Line 33... Line 21...
33 
 
 21 
 
Line 34... Line -...
34 
IMAGE_TOOLBAR_ICON_SIZE equ 16*16*3
 - 
 
35 
IMAGE_TOOLBAR_SIZE equ IMAGE_TOOLBAR_ICON_SIZE*10
 - 
 
36 
image_data_toolbar dd 0
 - 
 
37 
 
 - 
 
38 
offs_zbuf_pbuf equ 24
 - 
 
39 
 
 - 
 
40 
macro load_image_file path,buf,size { ;¬ ªà®á ¤«ï § £à㧪¨ ¨§®¡à ¦¥­¨©
 - 
 
41 
	;path - ¬®¦¥â ¡ëâì ¯¥à¥¬¥­­®© ¨«¨ áâப®¢ë¬ ¯ à ¬¥â஬
 - 
 
42 
	if path eqtype '' ;¯à®¢¥à塞 § ¤ ­ «¨ áâப®© ¯ à ¬¥âà path
 - 
 
43 
		jmp @f
 - 
 
44 
			local .path_str
 - 
 
45 
			.path_str db path ;ä®à¬¨à㥬 «®ª «ì­ãî ¯¥à¥¬¥­­ãî
 - 
 
46 
			db 0
 - 
 
47 
		@@:
 - 
 
48 
		;32 - áâ ­¤ àâ­ë©  ¤à¥á ¯® ª®â®à®¬ã ¤®«¦¥­ ¡ëâì ¡ãä¥à á á¨á⥬­ë¬ ¯ã⥬
 - 
 
49 
		copy_path .path_str,[32],file_name,0
 - 
 
50 
	else
 - 
 
51 
		copy_path path,[32],file_name,0 ;ä®à¬¨à㥬 ¯®«­ë© ¯ãâì ª ä ©«ã ¨§®¡à ¦¥­¨ï, ¯®¤à §ã¬¥¢ ¥¬ çâ® ®­ ¢ ®¤­®© ¯ ¯ª¥ á ¯à®£à ¬¬®©
 - 
 
52 
	end if
 - 
 
53 
 
 - 
 
54 
	stdcall mem.Alloc, dword size ;¢ë¤¥«ï¥¬ ¯ ¬ïâì ¤«ï ¨§®¡à ¦¥­¨ï
 - 
 
55 
	mov [buf],eax
 - 
 
56 
 
 - 
 
57 
	mov [run_file_70.Function], 0
 - 
 
58 
	mov [run_file_70.Position], 0
 - 
 
59 
	mov [run_file_70.Flags], 0
 - 
 
60 
	mov [run_file_70.Count], dword size
 - 
 
61 
	mov [run_file_70.Buffer], eax
 - 
 
62 
	mov byte[run_file_70+20], 0
 - 
 
63 
	mov [run_file_70.FileName], file_name
 - 
 
64 
	mcall 70,run_file_70 ;§ £à㦠¥¬ ä ©« ¨§®¡à ¦¥­¨ï
 - 
 
65 
	cmp ebx,0xffffffff
 - 
 
66 
	je @f
 - 
 
67 
		;®¯à¥¤¥«ï¥¬ ¢¨¤ ¨§®¡à ¦¥­¨ï ¨ ¯¥à¥¢®¤¨¬ ¥£® ¢® ¢à¥¬¥­­ë© ¡ãä¥à image_data
 - 
 
68 
		stdcall dword[img_decode], dword[buf],ebx,0
 - 
 
69 
		mov dword[image_data],eax
 - 
 
70 
		;¯à¥®¡à §ã¥¬ ¨§®¡à ¦¥­¨¥ ª ä®à¬ âã rgb
 - 
 
71 
		stdcall dword[img_to_rgb2], dword[image_data],dword[buf]
 - 
 
72 
		;㤠«ï¥¬ ¢à¥¬¥­­ë© ¡ãä¥à image_data
 - 
 
73 
		stdcall dword[img_destroy], dword[image_data]
 22 
IMAGE_TOOLBAR_ICON_SIZE equ 16*16*3
74 
	@@:
 23 
IMAGE_TOOLBAR_SIZE equ IMAGE_TOOLBAR_ICON_SIZE*10
75 
}
 24 
image_data_toolbar dd 0
76 
 
 25 
 
77 
 
 26 
offs_zbuf_pbuf equ 24
78 
 
 27 
 
79 
align 4
 28 
align 4
80 
start:
 29 
start:
81 
	load_libraries l_libs_start,l_libs_end
 30 
	load_libraries l_libs_start,l_libs_end
82 
	;¯à®¢¥àª  ­  ᪮«ìª® 㤠筮 § £ã§¨« áì ¡¨¡«¨®â¥ª 
 31 
	;¯à®¢¥àª  ­  ᪮«ìª® 㤠筮 § £ã§¨« áì ¡¨¡«¨®â¥ª 
83 
	mov	ebp,lib_0
 32 
	mov	ebp,lib_0
84 
	cmp	dword [ebp+ll_struc_size-4],0
 33 
	cmp	dword [ebp+ll_struc_size-4],0
Line 85... Line 34...
85 
	jz	@f
 34 
	jz	@f
Line 86... Line 35...
86 
		mcall -1 ;exit not correct
 35 
		mcall SF_TERMINATE_PROCESS
87 
	@@:
 36 
	@@:
88 
	mcall 48,3,sc,sizeof.system_colors
 37 
	mcall SF_STYLE_SETTINGS,SSF_GET_COLORS,sc,sizeof.system_colors
89 
	mcall 40,0x27
 38 
	mcall SF_SET_EVENTS_MASK,0xC0000027
Line 90... Line 39...
90 
	stdcall [OpenDialog_Init],OpenDialog_data ;¯®¤£®â®¢ª  ¤¨ «®£ 
 39 
	stdcall [OpenDialog_Init],OpenDialog_data ;¯®¤£®â®¢ª  ¤¨ «®£ 
91 
 
 40 
 
Line 92... Line 41...
92 
	stdcall [buf2d_create], buf_0 ;ᮧ¤ ­¨¥ ¡ãä¥à 
 41 
	stdcall [buf2d_create], buf_0 ;ᮧ¤ ­¨¥ ¡ãä¥à 
93 
 
 42 
 
94 
	load_image_file 'toolbar_t.png', image_data_toolbar,IMAGE_TOOLBAR_SIZE*2 ;*2 for gray icons
 43 
	load_image_file 'toolbar_t.png', image_data_toolbar,,,6 ;6 - for gray icons
Line 112... Line 61...
112 
red_win:
 61 
red_win:
113 
	call draw_window
 62 
	call draw_window
Line 114... Line 63...
114 
 
 63 
 
115 
align 4
 64 
align 4
116 
still:
 65 
still:
117 
	mcall 26,9
 66 
	mcall SF_SYSTEM_GET,SSF_TIME_COUNT
118 
	mov ebx,[last_time]
 67 
	mov ebx,[last_time]
119 
	add ebx,50 ;§ ¤¥à¦ª 
 68 
	add ebx,50 ;§ ¤¥à¦ª 
120 
	cmp ebx,eax
 69 
	cmp ebx,eax
121 
	jge @f
 70 
	jge @f
122 
		mov ebx,eax
 71 
		mov ebx,eax
123 
	@@:
 72 
	@@:
124 
	sub ebx,eax
 73 
	sub ebx,eax
125 
	mcall 23
 74 
	mcall SF_WAIT_EVENT_TIMEOUT
126 
	bt word[opt_auto_rotate],0
 75 
	bt word[opt_auto_rotate],0
127 
	jnc @f
 76 
	jnc @f
128 
		or eax,eax
 77 
		or eax,eax
129 
		jz timer_funct
 78 
		jz timer_funct
Line 143... Line 92...
143 
	jmp still
 92 
	jmp still
Line 144... Line 93...
144 
 
 93 
 
145 
align 4
 94 
align 4
146 
timer_funct:
 95 
timer_funct:
147 
	pushad
 96 
	pushad
148 
	mcall 26,9
 97 
	mcall SF_SYSTEM_GET,SSF_TIME_COUNT
Line 149... Line 98...
149 
	mov [last_time],eax
 98 
	mov [last_time],eax
150 
 
 99 
 
151 
	; ¢â®¬ â¨ç¥áª®¥ ¨§¬¥­¥­¨¥ 㣫  ®¡§®à 
 100 
	; ¢â®¬ â¨ç¥áª®¥ ¨§¬¥­¥­¨¥ 㣫  ®¡§®à 
Line 159... Line 108...
159 
	jmp still
 108 
	jmp still
Line 160... Line 109...
160 
 
 109 
 
161 
align 4
 110 
align 4
162 
draw_window:
 111 
draw_window:
163 
pushad
 112 
pushad
Line 164... Line 113...
164 
	mcall 12,1
 113 
	mcall SF_REDRAW,SSF_BEGIN_DRAW
165 
 
 - 
 
166 
	; *** à¨á®¢ ­¨¥ £« ¢­®£® ®ª­  (¢ë¯®«­ï¥âáï 1 à § ¯à¨ § ¯ã᪥) ***
 114 
 
167 
	xor eax,eax
 115 
	; *** à¨á®¢ ­¨¥ £« ¢­®£® ®ª­  (¢ë¯®«­ï¥âáï 1 à § ¯à¨ § ¯ã᪥) ***
168 
	mov edx,[sc.work]
 116 
	mov edx,[sc.work]
Line 169... Line 117...
169 
	or  edx,(3 shl 24)+0x30000000
 117 
	or  edx,(3 shl 24)+0x30000000
170 
	mcall ,(20 shl 16)+800,(20 shl 16)+570,,,caption
 - 
 
171 
 
 118 
	mcall SF_CREATE_WINDOW,(20 shl 16)+800,(20 shl 16)+570,,,caption
Line 172... Line 119...
172 
	; *** ᮧ¤ ­¨¥ ª­®¯®ª ­  ¯ ­¥«ì ***
 119 
 
173 
	mov esi,[sc.work_button]
 120 
	; *** ᮧ¤ ­¨¥ ª­®¯®ª ­  ¯ ­¥«ì ***
174 
	mcall 8,(5 shl 16)+20,(5 shl 16)+20,3
 121 
	mcall SF_DEFINE_BUTTON,(5 shl 16)+20,(5 shl 16)+20,3,[sc.work_button]
175 
 
 122 
 
Line 204... Line 151...
204 
	call draw_toolbar_i
 151 
	call draw_toolbar_i
Line 205... Line 152...
205 
 
 152 
 
206 
	stdcall [buf2d_draw], buf_0
 153 
	stdcall [buf2d_draw], buf_0
Line 207... Line 154...
207 
	stdcall [kosglSwapBuffers]
 154 
	stdcall [kosglSwapBuffers]
208 
 
 155 
 
209 
	mcall 12,2
 156 
	mcall SF_REDRAW,SSF_END_DRAW
Line 210... Line 157...
210 
popad
 157 
popad
211 
	ret
 158 
	ret
212 
 
 159 
 
213 
 
 160 
 
214 
align 4
 161 
align 4
Line 215... Line 162...
215 
draw_toolbar_i:
 162 
draw_toolbar_i:
216 
	; *** à¨á®¢ ­¨¥ ¨ª®­®ª ­  ª­®¯ª å ***
 163 
	; *** à¨á®¢ ­¨¥ ¨ª®­®ª ­  ª­®¯ª å ***
217 
	mov edx,(7 shl 16)+7 ;icon new
 164 
	mov edx,(7 shl 16)+7 ;icon new
218 
	mcall 7,[image_data_toolbar],(16 shl 16)+16
 165 
	mcall SF_PUT_IMAGE,[image_data_toolbar],(16 shl 16)+16
Line 276... Line 223...
276 
	ret
 223 
	ret
Line 277... Line 224...
277 
 
 224 
 
278 
 
 225 
 
279 
align 4
 226 
align 4
Line 280... Line 227...
280 
key:
 227 
key:
281 
	mcall 2
 228 
	mcall SF_GET_KEY
282 
 
 229 
 
283 
	cmp ah,178 ;Up
 230 
	cmp ah,178 ;Up
Line 317... Line 264...
317 
 
 264 
 
318 
 
 265 
 
319 
align 4
 266 
align 4
320 
mouse:
 267 
mouse:
321 
	push eax ebx
 268 
	push eax ebx
322 
	mcall 37,3
 269 
	mcall SF_MOUSE_GET,SSF_BUTTON_EXT
323 
	bt eax,0
 270 
	bt eax,0
324 
	jnc .end_m
 271 
	jnc .end_m
325 
		;mouse l. but. move
 272 
		;mouse l. but. move
326 
		cmp dword[mouse_drag],1
 273 
		cmp dword[mouse_drag],1
327 
		jne .end_m
 274 
		jne .end_m
328 
		mcall 37,1 ;get mouse coords
 275 
		mcall SF_MOUSE_GET,SSF_WINDOW_POSITION
329 
		mov ebx,eax
 276 
		mov ebx,eax
330 
		shr ebx,16 ;mouse.x
 277 
		shr ebx,16 ;mouse.x
331 
		cmp ebx,3d_wnd_l
 278 
		cmp ebx,3d_wnd_l
Line 373... Line 320...
373 
		jmp .end_d
 320 
		jmp .end_d
374 
	@@:
 321 
	@@:
375 
	bt eax,8
 322 
	bt eax,8
376 
	jnc .end_d
 323 
	jnc .end_d
377 
		;mouse l. but. press
 324 
		;mouse l. but. press
378 
		mcall 37,1 ;get mouse coords
 325 
		mcall SF_MOUSE_GET,SSF_WINDOW_POSITION
379 
		mov ebx,eax
 326 
		mov ebx,eax
380 
		shr ebx,16 ;mouse.x
 327 
		shr ebx,16 ;mouse.x
381 
		cmp ebx,3d_wnd_l
 328 
		cmp ebx,3d_wnd_l
382 
		jl .end_d
 329 
		jl .end_d
383 
		sub ebx,3d_wnd_l
 330 
		sub ebx,3d_wnd_l
Line 398... Line 345...
398 
	pop ebx eax
 345 
	pop ebx eax
399 
	ret
 346 
	ret
Line 400... Line 347...
400 
 
 347 
 
401 
align 4
 348 
align 4
402 
button:
 349 
button:
403 
	mcall 17
 350 
	mcall SF_GET_BUTTON
404 
	cmp ah,3
 351 
	cmp ah,3
405 
	jne @f
 352 
	jne @f
406 
		call but_new_file
 353 
		call but_new_file
407 
	@@:
 354 
	@@:
Line 446... Line 393...
446 
.exit:
 393 
.exit:
447 
	stdcall [buf2d_delete],buf_0
 394 
	stdcall [buf2d_delete],buf_0
448 
	stdcall mem.Free,[image_data_toolbar]
 395 
	stdcall mem.Free,[image_data_toolbar]
449 
	stdcall mem.Free,[open_file_data]
 396 
	stdcall mem.Free,[open_file_data]
450 
	stdcall mem.Free,[open_file_ogl]
 397 
	stdcall mem.Free,[open_file_ogl]
451 
	mcall -1
 398 
	mcall SF_TERMINATE_PROCESS
Line 452... Line 399...
452 
 
 399 
 
453 
 
 400 
 
454 
align 4
 401 
align 4
Line 459... Line 406...
459 
	ret
 406 
	ret
Line 460... Line 407...
460 
 
 407 
 
461 
align 4
 408 
align 4
462 
open_file_data dd 0 ;㪠§ â¥«ì ­  ¯ ¬ïâì ¤«ï ®âªàëâ¨ï ä ©«®¢
 409 
open_file_data dd 0 ;㪠§ â¥«ì ­  ¯ ¬ïâì ¤«ï ®âªàëâ¨ï ä ©«®¢
463 
open_file_size dd 0 ;à §¬¥à ®âªàë⮣® ä ©« 
 - 
 
464 
open_b rb 560
 410 
open_file_size dd 0 ;à §¬¥à ®âªàë⮣® ä ©« 
465 
open_file_ogl dd 0 ;¤«ï § ¯¨á¨ ª®®à¤¨­ â èà ­¥© ¢®ªá¥«¥© ¢ ¯®ª §¥ opengl
 411 
open_file_ogl dd 0 ;¤«ï § ¯¨á¨ ª®®à¤¨­ â èà ­¥© ¢®ªá¥«¥© ¢ ¯®ª §¥ opengl
Line 466... Line 412...
466 
v_zoom dd 0
 412 
v_zoom dd 0
467 
 
 413 
 
Line 473... Line 419...
473 
	stdcall [OpenDialog_Start],OpenDialog_data
 419 
	stdcall [OpenDialog_Start],OpenDialog_data
474 
	cmp [OpenDialog_data.status],2
 420 
	cmp [OpenDialog_data.status],2
475 
	je .end_open_file
 421 
	je .end_open_file
476 
	;ª®¤ ¯à¨ 㤠筮¬ ®âªàë⨨ ¤¨ «®£ 
 422 
	;ª®¤ ¯à¨ 㤠筮¬ ®âªàë⨨ ¤¨ «®£ 
Line 477... Line -...
477 
 
 - 
 
478 
	mov eax,70 ;70-ï äã­ªæ¨ï à ¡®â  á ä ©« ¬¨
 423 
 
479 
	mov [run_file_70.Function], 5
 424 
	mov [run_file_70.Function], SSF_GET_INFO
480 
	mov [run_file_70.Position], 0
 425 
	mov [run_file_70.Position], 0
481 
	mov [run_file_70.Flags], 0
 426 
	mov [run_file_70.Flags], 0
482 
	mov dword[run_file_70.Count], 0
 427 
	mov dword[run_file_70.Count], 0
483 
	mov dword[run_file_70.Buffer], open_b
 428 
	mov dword[run_file_70.Buffer], open_b
484 
	mov byte[run_file_70+20], 0
 429 
	mov byte[run_file_70+20], 0
485 
	mov dword[run_file_70.FileName], openfile_path
 430 
	mov dword[run_file_70.FileName], openfile_path
486 
	mov ebx,run_file_70
 - 
 
Line 487... Line 431...
487 
	int 0x40
 431 
	mcall SF_FILE,run_file_70
488 
 
 432 
 
489 
	;mov eax,dword[open_b+32]
 433 
	;mov eax,dword[open_b+32]
490 
	;mov edi,txt_buf
 434 
	;mov edi,txt_buf
Line 491... Line 435...
491 
	;call conv_int_to_str
 435 
	;call conv_int_to_str
492 
	;notify_window_run txt_buf
 436 
	;notify_window_run txt_buf
493 
 
 437 
 
Line 494... Line -...
494 
	mov ecx,dword[open_b+32] ;+32 qword: à §¬¥à ä ©«  ¢ ¡ ©â å
 - 
 
495 
	stdcall mem.ReAlloc,[open_file_data],ecx
 438 
	mov ecx,dword[open_b+32] ;+32 qword: à §¬¥à ä ©«  ¢ ¡ ©â å
496 
	mov [open_file_data],eax
 439 
	stdcall mem.ReAlloc,[open_file_data],ecx
497
440 
	mov [open_file_data],eax
498 
	mov eax,70 ;70-ï äã­ªæ¨ï à ¡®â  á ä ©« ¬¨
 441
499 
	mov [run_file_70.Function], 0
 442 
	mov [run_file_70.Function], SSF_READ_FILE
500 
	mov [run_file_70.Position], 0
 443 
	mov [run_file_70.Position], 0
501 
	mov [run_file_70.Flags], 0
 444 
	mov [run_file_70.Flags], 0
502 
	mov dword[run_file_70.Count], ecx
 445 
	mov dword[run_file_70.Count], ecx
503 
	m2m dword[run_file_70.Buffer], dword[open_file_data]
 - 
 
504 
	mov byte[run_file_70+20], 0
 446 
	m2m dword[run_file_70.Buffer], dword[open_file_data]
505 
	mov dword[run_file_70.FileName], openfile_path
 447 
	mov byte[run_file_70+20], 0
Line 506... Line 448...
506 
	mov ebx,run_file_70
 448 
	mov dword[run_file_70.FileName], openfile_path
507 
	int 0x40 ;§ £à㦠¥¬ ä ©« ¨§®¡à ¦¥­¨ï
 449 
	mcall SF_FILE,run_file_70
Line 508... Line 450...
508 
	cmp ebx,0xffffffff
 450 
	cmp ebx,0xffffffff
509 
	je .end_open_file
 451 
	je .end_open_file
510 
 
 452 
 
511 
	mov [open_file_size],ebx
 453 
	mov [open_file_size],ebx
Line 622... Line 564...
622 
	stdcall [OpenDialog_Start],OpenDialog_data
 564 
	stdcall [OpenDialog_Start],OpenDialog_data
623 
	cmp [OpenDialog_data.status],2
 565 
	cmp [OpenDialog_data.status],2
624 
	je .end_save_file
 566 
	je .end_save_file
625 
	;ª®¤ ¯à¨ 㤠筮¬ ®âªàë⨨ ¤¨ «®£ 
 567 
	;ª®¤ ¯à¨ 㤠筮¬ ®âªàë⨨ ¤¨ «®£ 
Line 626... Line -...
626 
 
 - 
 
627 
	mov eax,70 ;70-ï äã­ªæ¨ï à ¡®â  á ä ©« ¬¨
 568 
 
628 
	mov [run_file_70.Function], 2
 569 
	mov [run_file_70.Function], SSF_CREATE_FILE
629 
	mov [run_file_70.Position], 0
 570 
	mov [run_file_70.Position], 0
630 
	mov [run_file_70.Flags], 0
 571 
	mov [run_file_70.Flags], 0
631 
	mov ebx, dword[open_file_data]
 572 
	mov ebx, dword[open_file_data]
632 
	;¯¨è¥¬ ¢ ä ©« ­®¢ë© ¬ áèâ ¡
 573 
	;¯¨è¥¬ ¢ ä ©« ­®¢ë© ¬ áèâ ¡
633 
	mov edx,dword[v_zoom]
 574 
	mov edx,dword[v_zoom]
634 
	mov byte[ebx],dl
 - 
 
635 
	;
 575 
	mov byte[ebx],dl
636 
	mov [run_file_70.Buffer], ebx
 576 
	mov [run_file_70.Buffer], ebx
637 
	mov ebx,[open_file_size]
 577 
	mov ebx,[open_file_size]
638 
	mov dword[run_file_70.Count], ebx ;à §¬¥à ä ©« 
 578 
	mov dword[run_file_70.Count], ebx ;à §¬¥à ä ©« 
639 
	mov byte[run_file_70+20], 0
 579 
	mov byte[run_file_70+20], 0
640 
	mov dword[run_file_70.FileName], openfile_path
 580 
	mov dword[run_file_70.FileName], openfile_path
641 
	mov ebx,run_file_70
 - 
 
642 
	int 0x40 ;á®å࠭塞 ä ©«
 581 
	mcall SF_FILE,run_file_70
643 
	;cmp ebx,0xffffffff
 582 
	;cmp ebx,0xffffffff
644 
	;je .end_save_file
 583 
	;je .end_save_file
Line 645... Line 584...
645 
	; ... á®®¡é¥­¨¥ ® ­¥ã¤ ç­®¬ á®åà ­¥­¨¨ ...
 584 
	; ... á®®¡é¥­¨¥ ® ­¥ã¤ ç­®¬ á®åà ­¥­¨¨ ...
Line 797... Line 736...
797 
	stdcall [glTranslatef], 0.0,0.0,0.5 ;ª®®à¤¨­ âë ¯® ®á¨ z ¤®«¦­ë ¡ëâì ¢ ¯à¥¤¥« å ®â 0.0 ¤® 1.0, ¨­ ç¥ ¨§®¡à ¦¥­¨¥ ¡ã¤¥â ®âᥪ âìáï
 736 
	stdcall [glTranslatef], 0.0,0.0,0.5 ;ª®®à¤¨­ âë ¯® ®á¨ z ¤®«¦­ë ¡ëâì ¢ ¯à¥¤¥« å ®â 0.0 ¤® 1.0, ¨­ ç¥ ¨§®¡à ¦¥­¨¥ ¡ã¤¥â ®âᥪ âìáï
798 
		;¢®ªá¥«ì­ë© ®¡ê¥ªâ ¨¬¥¥â ª®®à¤¨­ âë ¯® ®áï¬ ®â -0.5 ¤® 0.5, ¯®â®¬ã ¥£® ¤¢¨£ ¥¬ ­  +0.5
 737 
		;¢®ªá¥«ì­ë© ®¡ê¥ªâ ¨¬¥¥â ª®®à¤¨­ âë ¯® ®áï¬ ®â -0.5 ¤® 0.5, ¯®â®¬ã ¥£® ¤¢¨£ ¥¬ ­  +0.5
799 
		;­® ¢á¥ ¦¥ ¯à¨ ¯®¢®à®â å ¡ã¤ãâ ®âᥪ âáï ªà ï, ª®â®àë¥ ¢ë«¥§ãâ §  ¯à¥¤¥«ë ¯«®áª®á⥩ ®âá¥ç¥­¨ï
 738 
		;­® ¢á¥ ¦¥ ¯à¨ ¯®¢®à®â å ¡ã¤ãâ ®âᥪ âáï ªà ï, ª®â®àë¥ ¢ë«¥§ãâ §  ¯à¥¤¥«ë ¯«®áª®á⥩ ®âá¥ç¥­¨ï
800 
		;¢ ¢¥àᨨ opengl ¯®¤ Win ª®®à¤¨­ âë ¨¤ãâ ®â -1.0 ¤® 1.0 ¯®â®¬ã â ¬ í⮣® ¤¥« âì ­¥ ­ã¦­®
 739 
		;¢ ¢¥àᨨ opengl ¯®¤ Win ª®®à¤¨­ âë ¨¤ãâ ®â -1.0 ¤® 1.0 ¯®â®¬ã â ¬ í⮣® ¤¥« âì ­¥ ­ã¦­®
801 
	stdcall [glScalef], [scale], [scale], [scale] ;㢥«¨ç¨¢ ¥¬ ¢®ªá¥«ì­ë© ®¡ê¥ªâ, çâ®-¡ë ­¥ ¡ë« ®ç¥­ì ¬ «¥­ìª¨¬
 740 
	stdcall [glScalef], [scale], [scale], [scale] ;㢥«¨ç¨¢ ¥¬ ¢®ªá¥«ì­ë© ®¡ê¥ªâ, çâ®-¡ë ­¥ ¡ë« ®ç¥­ì ¬ «¥­ìª¨¬
802 
	stdcall [glScalef], 1.0, 1.0, 0.5 ;çâ®-¡ë ªà ï ®¡ê¥ªâ  ­¥ ¢ë« §¨«¨ §  £à ­¨ ®âá¥ç¥­¨ï
 741 
	stdcall [glScalef], 1.0, 1.0, 0.25 ;çâ®-¡ë ªà ï ®¡ê¥ªâ  ­¥ ¢ë« §¨«¨ §  £à ­¨ ®âá¥ç¥­¨ï
803 
	stdcall [glRotatef], [angle_x],1.0,0.0,0.0
 742 
	stdcall [glRotatef], [angle_x],1.0,0.0,0.0
804 
	stdcall [glRotatef], [angle_y],0.0,1.0,0.0
 743 
	stdcall [glRotatef], [angle_y],0.0,1.0,0.0
805 
	stdcall [glRotatef], [angle_z],0.0,0.0,1.0
 744 
	stdcall [glRotatef], [angle_z],0.0,0.0,1.0
806 
	stdcall draw_voxels_3d,[open_file_ogl]
 745 
	stdcall draw_voxels_3d,[open_file_ogl]
Line 913... Line 852...
913 
system_dir_2 db '/sys/lib/'
 852 
system_dir_2 db '/sys/lib/'
914 
lib_name_2 db 'buf2d.obj',0
 853 
lib_name_2 db 'buf2d.obj',0
915 
err_msg_found_lib_2 db '¥ ­ ©¤¥­  ¡¨¡«¨®â¥ª  ',39,'buf2d.obj',39,0
 854 
err_msg_found_lib_2 db '¥ ­ ©¤¥­  ¡¨¡«¨®â¥ª  ',39,'buf2d.obj',39,0
916 
err_msg_import_2 db 'Žè¨¡ª  ¯à¨ ¨¬¯®à⥠¡¨¡«¨®â¥ª¨ ',39,'buf2d',39,0
 855 
err_msg_import_2 db 'Žè¨¡ª  ¯à¨ ¨¬¯®à⥠¡¨¡«¨®â¥ª¨ ',39,'buf2d',39,0
Line -... Line 856...
- 
 
 856 
 
- 
 
 857 
system_dir_3 db '/kolibrios/lib/'
- 
 
 858 
lib_name_3 db 'tinygl.obj',0
- 
 
 859 
err_msg_found_lib_3 db '¥ ­ ©¤¥­  ¡¨¡«¨®â¥ª  ',39,'tinygl.obj',39,0
- 
 
 860 
err_msg_import_3 db 'Žè¨¡ª  ¯à¨ ¨¬¯®à⥠¡¨¡«¨®â¥ª¨ ',39,'tinygl',39,0
917 
 
 861 
 
918 
l_libs_start:
 862 
l_libs_start:
919 
	lib_0 l_libs lib_name_0, sys_path, file_name, system_dir_0,\
 863 
	lib_0 l_libs lib_name_0, sys_path, file_name, system_dir_0,\
920 
		err_message_found_lib_0, head_f_l, proclib_import,err_message_import_0, head_f_i
 864 
		err_message_found_lib_0, head_f_l, proclib_import,err_message_import_0, head_f_i
921 
	lib_1 l_libs lib_name_1, sys_path, file_name, system_dir_1,\
 865 
	lib_1 l_libs lib_name_1, sys_path, file_name, system_dir_1,\
Line 1047... Line 991...
1047 
{
 991 
{
1048 
	sz_#n db `n,0
 992 
	sz_#n db `n,0
1049 
}
 993 
}
1050 
include '../../../../programs/develop/libraries/TinyGL/asm_fork/export.inc'
 994 
include '../../../../programs/develop/libraries/TinyGL/asm_fork/export.inc'
Line 1051... Line -...
1051 
 
 - 
 
1052 
;--------------------------------------------------
 - 
 
1053 
system_dir_3 db '/sys/lib/'
 - 
 
1054 
lib_name_3 db 'tinygl.obj',0
 - 
 
1055 
err_msg_found_lib_3 db '¥ ­ ©¤¥­  ¡¨¡«¨®â¥ª  ',39,'tinygl.obj',39,0
 - 
 
1056 
err_msg_import_3 db 'Žè¨¡ª  ¯à¨ ¨¬¯®à⥠¡¨¡«¨®â¥ª¨ ',39,'tinygl',39,0
 - 
 
1057 
;--------------------------------------------------
 - 
 
1058 
 
 995 
 
Line 1059... Line 996...
1059 
last_time dd 0
 996 
last_time dd 0
1060 
 
 997 
 
1061 
align 4
 998 
align 4