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'
9 
include '../../../../programs/load_img.inc'
 9 
include '../../../../programs/load_img.inc'
10 
include '../trunk/vox_draw.inc'
 10 
include '../trunk/vox_draw.inc'
11 
include '../trunk/vox_rotate.inc'
 11 
include '../trunk/vox_rotate.inc'
Line 12... Line 12...
12 
include '../trunk/str.inc'
 12 
include '../trunk/str.inc'
13 
 
 13 
 
Line 14... Line 14...
14 
@use_library_mem mem.Alloc,mem.Free,mem.ReAlloc,dll.Load
 14 
@use_library_mem mem.Alloc,mem.Free,mem.ReAlloc,dll.Load
Line 15... Line 15...
15 
caption db 'Voxel mover 19.02.16',0 ;¯®¤¯¨áì ®ª­ 
 15 
caption db 'Voxel mover 22.03.18',0 ;¯®¤¯¨áì ®ª­ 
16 
 
 16 
 
Line 115... Line 115...
115 
	stdcall [buf2d_create], buf_0z ;ᮧ¤ ­¨¥ ¡ãä¥à  £«ã¡¨­ë
 115 
	stdcall [buf2d_create], buf_0z ;ᮧ¤ ­¨¥ ¡ãä¥à  £«ã¡¨­ë
116 
	stdcall [buf2d_create], buf_pl ;ᮧ¤ ­¨¥ ¡ãä¥à  ¤«ï á¥ç¥­¨ï
 116 
	stdcall [buf2d_create], buf_pl ;ᮧ¤ ­¨¥ ¡ãä¥à  ¤«ï á¥ç¥­¨ï
Line 117... Line 117...
117 
 
 117 
 
Line 118... Line 118...
118 
	stdcall [buf2d_vox_brush_create], buf_vox, vox_6_7_z
 118 
	stdcall [buf2d_vox_brush_create], buf_vox, vox_6_7_z
Line 119... Line 119...
119 
 
 119 
 
120 
	load_image_file 'toolbar_m.png', image_data_toolbar
 120 
	include_image_file 'toolbar_m.png', image_data_toolbar
121 
 
 121 
 
122 
	stdcall mem.Alloc,[max_open_file_size]
 122 
	stdcall mem.Alloc,[max_open_file_size]
Line 123... Line 123...
123 
	mov dword[open_file_vox],eax
 123 
	mov dword[open_file_vox],eax
124 
	stdcall mem.Alloc,[max_open_file_size]
 124 
	stdcall mem.Alloc,[max_open_file_size]
- 
 
 125 
	mov dword[moved_file_vox],eax
- 
 
 126 
 
- 
 
 127 
	stdcall but_new_file, [open_file_vox]
- 
 
 128 
	stdcall but_new_file, [moved_file_vox]
- 
 
 129 
	;¯à®¢¥àª  ª®¬ ­¤­®© áâப¨
Line 125... Line 130...
125 
	mov dword[moved_file_vox],eax
 130 
	cmp dword[openfile_path],0
126 
 
 131 
	je @f
127 
	stdcall but_new_file, [open_file_vox]
 132 
		call but_open_file_cmd_lin
Line 631... Line 636...
631 
	pushad
 636 
pushad
632 
	copy_path open_dialog_name,communication_area_default_path,file_name,0
 637 
	copy_path open_dialog_name,communication_area_default_path,file_name,0
633 
	mov [OpenDialog_data.type],0
 638 
	mov [OpenDialog_data.type],0
634 
	stdcall [OpenDialog_Start],OpenDialog_data
 639 
	stdcall [OpenDialog_Start],OpenDialog_data
635 
	cmp [OpenDialog_data.status],2
 640 
	cmp [OpenDialog_data.status],2
636 
	je .end_open_file
 641 
	je @f
637 
	;ª®¤ ¯à¨ 㤠筮¬ ®âªàë⨨ ¤¨ «®£ 
 642 
		;ª®¤ ¯à¨ 㤠筮¬ ®âªàë⨨ ¤¨ «®£ 
- 
 
 643 
		call but_open_file_cmd_lin
- 
 
 644 
	@@:
- 
 
 645 
popad
- 
 
 646 
	ret
Line -... Line 647...
- 
 
 647 
 
- 
 
 648 
align 4
- 
 
 649 
but_open_file_cmd_lin:
638 
 
 650 
pushad
639 
	mov [run_file_70.Function], SSF_READ_FILE
 651 
	mov [run_file_70.Function], SSF_READ_FILE
640 
	mov [run_file_70.Position], 0
 652 
	mov [run_file_70.Position], 0
641 
	mov [run_file_70.Flags], 0
 653 
	mov [run_file_70.Flags], 0
642 
	m2m dword[run_file_70.Count], dword[max_open_file_size]
 654 
	m2m dword[run_file_70.Count], dword[max_open_file_size]
Line 645... Line 657...
645 
	mov dword[run_file_70.FileName], openfile_path
 657 
	mov dword[run_file_70.FileName], openfile_path
646 
	mcall SF_FILE,run_file_70
 658 
	mcall SF_FILE,run_file_70
647 
	cmp ebx,0xffffffff
 659 
	cmp ebx,0xffffffff
648 
	je .end_open_file
 660 
	je .end_open_file
Line 649... Line -...
649 
 
 - 
 
650 
	;add ebx,[open_file_vox]
 - 
 
651 
	;mov byte[ebx],0 ;­  á«ãç © ¥á«¨ à ­¥¥ ¡ë« ®âªàëâ ä ©« ¡®«ì襣® à §¬¥à  ç¨á⨬ ª®­¥æ ¡ãä¥à  á ä ©«®¬
 661 
 
Line 652... Line 662...
652 
	mcall SF_SET_CAPTION,1,openfile_path
 662 
	mcall SF_SET_CAPTION,1,openfile_path
653 
 
 663 
 
654 
	;---
 664 
	;---