Subversion Repositories Kolibri OS

Rev

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

Rev 6259 Rev 7205
Line 1... Line 1...
1 
use32
 1 
use32
2 
	org 0x0
 2 
	org 0
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,openfile_path,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/KOSfuncs.inc'
 8 
include '../../../../programs/KOSfuncs.inc'
Line 13... Line 13...
13 
vox_offs_data equ 12
 13 
vox_offs_data equ 12
14 
txt_buf rb 8
 14 
txt_buf rb 8
15 
include '../trunk/vox_rotate.inc'
 15 
include '../trunk/vox_rotate.inc'
Line 16... Line 16...
16 
 
 16 
 
17 
@use_library_mem mem.Alloc,mem.Free,mem.ReAlloc,dll.Load
 17 
@use_library_mem mem.Alloc,mem.Free,mem.ReAlloc,dll.Load
Line 18... Line 18...
18 
caption db 'Voxel creator 19.02.16',0 ;¯®¤¯¨áì ®ª­ 
 18 
caption db 'Voxel creator 22.03.18',0 ;¯®¤¯¨áì ®ª­ 
19 
 
 19 
 
20 
BUF_STRUCT_SIZE equ 21
 20 
BUF_STRUCT_SIZE equ 21
21 
buf2d_data equ dword[edi] ;¤ ­­ë¥ ¡ãä¥à  ¨§®¡à ¦¥­¨ï
 21 
buf2d_data equ dword[edi] ;¤ ­­ë¥ ¡ãä¥à  ¨§®¡à ¦¥­¨ï
Line 35... Line 35...
35 
txt_space db ' ',0
 35 
txt_space db ' ',0
36 
txt_pref db ' ¡ ',0,' Š¡',0,' Œ¡',0,' ƒ¡',0 ;¯à¨áâ ¢ª¨: ª¨«®, ¬¥£ , £¨£ 
 36 
txt_pref db ' ¡ ',0,' Š¡',0,' Œ¡',0,' ƒ¡',0 ;¯à¨áâ ¢ª¨: ª¨«®, ¬¥£ , £¨£ 
37 
txt_f_size: db ' §¬¥à: '
 37 
txt_f_size: db ' §¬¥à: '
38 
.size: rb 16
 38 
.size: rb 16
Line 39... Line -...
39 
 
 - 
 
40 
fn_toolbar db 'toolbar.png',0
 39 
 
41 
IMAGE_TOOLBAR_ICON_SIZE equ 16*16*3
 40 
IMAGE_TOOLBAR_ICON_SIZE equ 16*16*3
Line 42... Line 41...
42 
image_data_toolbar dd 0
 41 
image_data_toolbar dd 0
Line 58... Line 57...
58 
 
 57 
 
59 
	stdcall [buf2d_create], buf_0 ;ᮧ¤ ­¨¥ ¡ãä¥à 
 58 
	stdcall [buf2d_create], buf_0 ;ᮧ¤ ­¨¥ ¡ãä¥à 
60 
	stdcall [buf2d_create], buf_0z
 59 
	stdcall [buf2d_create], buf_0z
Line 61... Line 60...
61 
	stdcall [buf2d_vox_brush_create], buf_vox, vox_6_7_z
 60 
	stdcall [buf2d_vox_brush_create], buf_vox, vox_6_7_z
Line 62... Line 61...
62 
 
 61 
 
63 
	load_image_file fn_toolbar, image_data_toolbar
 62 
	include_image_file 'toolbar.png', image_data_toolbar
64 
 
 63 
 
65 
	stdcall mem.Alloc,max_open_file_size
 64 
	stdcall mem.Alloc,max_open_file_size
Line 66... Line 65...
66 
	mov dword[open_file_vox],eax
 65 
	mov dword[open_file_vox],eax
67 
	stdcall mem.Alloc,max_open_file_size
 66 
	stdcall mem.Alloc,max_open_file_size
- 
 
 67 
	mov dword[open_file_img],eax
- 
 
 68 
 
- 
 
 69 
	mcall SF_SYSTEM_GET,SSF_TIME_COUNT
- 
 
 70 
	mov [last_time],eax
- 
 
 71 
	;¯à®¢¥àª  ª®¬ ­¤­®© áâப¨
Line 68... Line 72...
68 
	mov dword[open_file_img],eax
 72 
	cmp dword[openfile_path],0
69 
 
 73 
	je @f
70 
	mcall SF_SYSTEM_GET,SSF_TIME_COUNT
 74 
		call but_open_file_cmd_lin
Line 546... Line 550...
546 
	pushad
 550 
	pushad
547 
	copy_path open_dialog_name,communication_area_default_path,file_name,0
 551 
	copy_path open_dialog_name,communication_area_default_path,file_name,0
548 
	mov [OpenDialog_data.type],0
 552 
	mov [OpenDialog_data.type],0
549 
	stdcall [OpenDialog_Start],OpenDialog_data
 553 
	stdcall [OpenDialog_Start],OpenDialog_data
550 
	cmp [OpenDialog_data.status],2
 554 
	cmp [OpenDialog_data.status],2
551 
	je .end_open_file
 555 
	je @f
552 
	;ª®¤ ¯à¨ 㤠筮¬ ®âªàë⨨ ¤¨ «®£ 
 556 
		;ª®¤ ¯à¨ 㤠筮¬ ®âªàë⨨ ¤¨ «®£ 
- 
 
 557 
		call but_open_file_cmd_lin
- 
 
 558 
	@@:
- 
 
 559 
popad
- 
 
 560 
	ret
Line -... Line 561...
- 
 
 561 
 
- 
 
 562 
align 4
- 
 
 563 
but_open_file_cmd_lin:
553 
 
 564 
pushad
554 
	mov [run_file_70.Function], SSF_READ_FILE
 565 
	mov [run_file_70.Function], SSF_READ_FILE
555 
	mov [run_file_70.Position], 0
 566 
	mov [run_file_70.Position], 0
556 
	mov [run_file_70.Flags], 0
 567 
	mov [run_file_70.Flags], 0
557 
	mov [run_file_70.Count], dword max_open_file_size
 568 
	mov [run_file_70.Count], dword max_open_file_size