WebSVN – Kolibri OS – Diff – /programs/media/voxel_editor/utilites/vox_mover.asm


use32
	org 0
	db 'MENUET01' ;¨¤¥­â¨ä. ¨á¯®«­ï¥¬®£® ä ©«  ¢á¥£¤  8 ¡ ©â
	dd 1, start, i_end, mem, stacktop, openfile_path, sys_path
 
include '../../../macros.inc'
include '../../../proc32.inc'
include '../../../KOSfuncs.inc'
include '../../../load_img.inc'
include '../../../load_lib.mac'
include '../trunk/vox_draw.inc'
include '../trunk/vox_rotate.inc'
include '../trunk/str.inc'
include 'lang.inc'
 
@use_library mem.Alloc,mem.Free,mem.ReAlloc,dll.Load
if lang eq ru
caption db '¥à¥¬¥é¥­¨¥ ¢®ªá¥«¥© 04.05.20',0 ;¯®¤¯¨áì ®ª­ 
else
caption db 'Voxel mover 04.05.20',0
end if
 
IMAGE_TOOLBAR_ICON_SIZE equ 16*16*3
image_data_toolbar dd 0
 
;§­ ç¥­¨ï § ¤ ¢ ¥¬ë¥ ¯® ã¬®«ç ­¨î, ¡¥§ ini ä ©« 
ini_def_window_t equ 10
ini_def_window_l equ 10
ini_def_window_w equ 550
ini_def_window_h equ 415
ini_def_buf_w equ 198 ;=192+6
ini_def_buf_h equ 231 ;=224+7
ini_def_s_zoom equ 5
ini_def_t_size equ 10
ini_def_color_b equ 0xffffff
;®¯¨á ­¨¥ ¯ à ¬ âà®¢ ¤«ï ini ä ©« 
ini_name db 'vox_mover.ini',0
ini_sec_window db 'Window',0
key_window_t db 't',0
key_window_l db 'l',0
key_window_w db 'w',0
key_window_h db 'h',0
key_buf_w db 'buf_w',0
key_buf_h db 'buf_h',0
ini_sec_options db 'Options',0
key_s_zoom db 's_zoom',0
key_t_size db 'tile_size',0
key_f_size db 'file_size',0
key_col_b db 'c_background',0
 
OT_MAP_X  equ  0
OT_MAP_Y  equ  0
OT_CAPT_X_COLOR equ  5 ;®âáâã¯ ¤«ï ¯®¤¯¨á¨ æ¢¥â 
OT_CAPT_Y_COLOR equ 30
PEN_MODE_NONE equ -1
PEN_MODE_CLEAR equ 0 ;à¥¦¨¬ áâ¨à ­¨ï
PEN_MODE_SELECT_COLOR equ 2 ;à¥¦¨¬ ¢ë¡®à  æ¢¥â 
 
align 4
start:
	load_libraries l_libs_start,l_libs_end
	;¯à®¢¥àª  ­  áª®«ìª® ã¤ ç­® § £ã§¨« áì ¡¨¡«¨®â¥ª 
	mov	ebp,lib0
	cmp	dword [ebp+ll_struc_size-4],0
	jz	@f
		mcall SF_TERMINATE_PROCESS
	@@:
	mcall SF_STYLE_SETTINGS,SSF_GET_COLORS,sc,sizeof.system_colors
	mcall SF_SET_EVENTS_MASK,0xC0000027
	stdcall [OpenDialog_Init],OpenDialog_data ;¯®¤£®â®¢ª  ¤¨ «®£ 
 
;--- load ini file ---
	copy_path ini_name,sys_path,file_name,0
	;window startup pozition
	stdcall dword[ini_get_int],file_name,ini_sec_window,key_window_l,ini_def_window_l
	mov word[wnd_s_pos+2],ax
	stdcall dword[ini_get_int],file_name,ini_sec_window,key_window_w,ini_def_window_w
	mov word[wnd_s_pos],ax
	stdcall dword[ini_get_int],file_name,ini_sec_window,key_window_t,ini_def_window_t
	mov word[wnd_s_pos+6],ax
	stdcall dword[ini_get_int],file_name,ini_sec_window,key_window_h,ini_def_window_h
	mov word[wnd_s_pos+4],ax
	;image buffer size
	stdcall dword[ini_get_int],file_name,ini_sec_window,key_buf_w,ini_def_buf_w
	mov [buf_0.w],eax
	mov [buf_0z.w],eax
	add ax,15
	mov [buf_pl.l],ax ;®âáâã¯ ¤«ï ¯à ¢®£® ®ª­ 
	stdcall dword[ini_get_int],file_name,ini_sec_window,key_buf_h,ini_def_buf_h
	mov [buf_0.h],eax
	mov [buf_0z.h],eax
	;æ¢¥â ä®­ 
	stdcall dword[ini_get_color],file_name,ini_sec_window,key_col_b,ini_def_color_b
	mov [buf_0.color],eax
	mov [buf_pl.color],eax
 
	;¬ áâ ¡, ¯®á«¥ ª®â®à®£® ¡ã¤¥â ã¢¥«¨ç¥­¨¥
	stdcall dword[ini_get_int],file_name,ini_sec_options,key_s_zoom,ini_def_s_zoom
	mov [scaled_zoom],eax
	;à §¬¥à ª¢ ¤à â¨ª  ­  ¯«®áª®áâ¨ á¥ç¥­¨ï
	stdcall dword[ini_get_int],file_name,ini_sec_options,key_t_size,ini_def_t_size
	mov [tile_size],eax
 
	stdcall dword[ini_get_int],file_name,ini_sec_options,key_f_size,64
	shl eax,10
	mov [max_open_file_size],eax
 
	mov ecx,[scaled_zoom]
	xor eax,eax
	inc eax
	shl eax,cl
	imul eax,[tile_size]
	mov [buf_pl.w],eax
	add eax,[tile_size]
	mov [buf_pl.h],eax
 
 
	stdcall [buf2d_create], buf_0 ;á®§¤ ­¨¥ ¡ãä¥à  ¨§®¡à ¦¥­¨ï
	stdcall [buf2d_create], buf_0z ;á®§¤ ­¨¥ ¡ãä¥à  £«ã¡¨­ë
	stdcall [buf2d_create], buf_pl ;á®§¤ ­¨¥ ¡ãä¥à  ¤«ï á¥ç¥­¨ï
 
	stdcall [buf2d_vox_brush_create], buf_vox, vox_6_7_z
 
	include_image_file 'toolbar_m.png', image_data_toolbar
 
	stdcall mem.Alloc,[max_open_file_size]
	mov dword[open_file_vox],eax
	stdcall mem.Alloc,[max_open_file_size]
	mov dword[moved_file_vox],eax
 
	stdcall but_new_file, [open_file_vox]
	stdcall but_new_file, [moved_file_vox]
	;¯à®¢¥àª  ª®¬ ­¤­®© áâà®ª¨
	cmp dword[openfile_path],0
	je @f
		call but_open_file_cmd_lin
	@@:
 
align 4
red_win:
	call draw_window
 
align 4
still:
	mcall SF_WAIT_EVENT
 
	cmp al,1
	jz red_win
	cmp al,2
	jz key
	cmp al,3
	jz button
	cmp al,6
	jne @f
		mcall SF_THREAD_INFO,procinfo,-1
		cmp ax,word[procinfo+4]
		jne @f ;®ª­® ­¥  ªâ¨¢­®
		call mouse
	@@:
	jmp still
 
align 4
mouse:
	pushad
	mcall SF_MOUSE_GET,SSF_BUTTON
	bt eax,1 ;right button
	jnc @f
		mcall SF_MOUSE_GET,SSF_WINDOW_POSITION
		mov ebx,eax
		shr ebx,16
		and eax,0xffff
		stdcall get_buf_color, buf_0
		stdcall get_buf_color, buf_pl
		jmp .end_f
	@@:
	bt eax,0 ;left button
	jnc .end_f
		mcall SF_MOUSE_GET,SSF_WINDOW_POSITION
		mov ebx,eax
		shr ebx,16
		and eax,0xffff
 
		push eax ebx
		mov edx,[v_zoom]
		cmp edx,[scaled_zoom]
		jle @f
		;à¥¦¨¬ ¬ áèâ ¡¨à®¢ ­¨ï ¨§®¡à ¦¥­¨ï
		sub edx,[scaled_zoom]
		sub ax,word[buf_0.t]
		sub bx,word[buf_0.l]
		stdcall get_mouse_ev_scale, buf_vox, ebx, eax, [scaled_zoom],edx
		cmp eax,0
		je @f
			mov ebx,eax
			and eax,0x3fffffff
			rol ebx,2
			and ebx,3
			dec ebx
 
			shl ebx,2
			add ebx,cam_x
			mov dword[ebx],eax ;change [cam_x] or [cam_y] or [cam_z]
			call draw_objects
 
			pop ebx eax
			jmp .end_f
		@@:
		pop ebx eax
 
 
		;eax - mouse coord y
		;ebx - mouse coord x
		movzx edx,word[buf_pl.t]
		add edx,OT_MAP_Y
		cmp eax,edx
		jl .end_f
			sub eax,edx
			xor edx,edx
			mov ecx,[tile_size] ;H
			div ecx
		movzx edx,word[buf_pl.l]
		add edx,OT_MAP_X
		cmp ebx,edx
		jl .end_f
			call convert_y ;¯à¥®¡à §®¢ ­¨¥ ª®®à¤¨­ âë y
			cmp eax,0
			jge .end_0 ;®£à ­¨ç¥­¨¥ ¯® ­¨¦­¥© ª®®à¤¨­ â¥ y
				cmp eax,-1
				jne .end_f
				;¬¥­ï¥¬ á¥ç¥­¨¥, ¯®¯ «¨ ­  ª¢ ¤à â¨ª
				sub ebx,edx
				mov eax,ebx
				xor edx,edx
				mov ecx,[tile_size] ;W
				div ecx
				mov [n_plane],eax
				jmp .end_1
			.end_0:
			mov [v_cur_y],eax ;Y-coord
			sub ebx,edx
			mov eax,ebx
			xor edx,edx
			mov ecx,[tile_size] ;W
			div ecx
			mov [v_cur_x],eax ;X-coord
 
			.end_1:
			call draw_objects
			call draw_pok
	.end_f:
	popad
	ret
 
;input:
; eax - coord y
; ebx - coord x
align 4
proc get_buf_color, buf:dword
pushad
	mov edi,[buf]
	cmp ax,buf2d_t
	jl .end_f
	sub ax,buf2d_t
	cmp eax,buf2d_h
	jg .end_f
	cmp bx,buf2d_l
	jl .end_f
	sub bx,buf2d_l
	cmp ebx,buf2d_w
	jg .end_f
		stdcall [buf2d_get_pixel], edi,ebx,eax
		mov [v_color],eax
		call on_change_color ;®â®¡à ¦ ¥¬ ¨§¬¥­¥­¨ï æ¢¥â 
	.end_f:
popad
	ret
endp
 
;¯à¥®¡à §®¢ë¢ ¥¬ ª®®à¤¨­ âã y (§­ ç¥­¨¥ ¤®«¦­® ã¢¥«¨ç¨¢ âìáï á ­¨§ã ¢¢¥àå)
align 4
convert_y:
	push ecx edx
	mov ecx,[v_zoom]
	cmp ecx,[scaled_zoom]
	jle @f
		mov ecx,[scaled_zoom]
	@@:
	mov edx,1
	cmp ecx,1
	jl @f
		shl edx,cl
	@@:
	sub edx,eax
	dec edx
	mov eax,edx
	pop edx ecx
	ret
 
align 4
draw_window:
pushad
	mcall SF_REDRAW,SSF_BEGIN_DRAW
 
	; *** à¨á®¢ ­¨¥ £« ¢­®£® ®ª­  (¢ë¯®«­ï¥âáï 1 à § ¯à¨ § ¯ãáª¥) ***
	mov edx,[sc.work]
	or  edx,(3 shl 24)+0x30000000
	mcall SF_CREATE_WINDOW,dword[wnd_s_pos],dword[wnd_s_pos+4],,,caption
 
	; *** á®§¤ ­¨¥ ª­®¯®ª ­  ¯ ­¥«ì ***
	mov esi,[sc.work_button]
	mcall SF_DEFINE_BUTTON,(5 shl 16)+20,(5 shl 16)+20,3
 
	mov ebx,(30 shl 16)+20
	mov edx,4
	int 0x40
	add ebx,25 shl 16
	mov edx,5
	int 0x40
	add ebx,30 shl 16
	mov edx,6
	int 0x40
	add ebx,25 shl 16
	mov edx,7
	int 0x40
	add ebx,25 shl 16
	mov edx,8
	int 0x40
	add ebx,25 shl 16
	mov edx,9
	int 0x40
	add ebx,25 shl 16
	mov edx,10
	int 0x40
	add ebx,25 shl 16
	mov edx,11
	int 0x40
	add ebx,25 shl 16
	mov edx,12
	int 0x40
	add ebx,25 shl 16
	mov edx,13
	int 0x40
	add ebx,25 shl 16
	mov edx,14
	int 0x40
	add ebx,25 shl 16
	mov edx,15
	int 0x40
	add ebx,25 shl 16
	mov edx,16
	int 0x40
	add ebx,25 shl 16
	mov edx,17
	int 0x40
	add ebx,25 shl 16
	mov edx,18
	int 0x40
	add ebx,25 shl 16
	mov edx,19
	int 0x40
	add ebx,25 shl 16
	mov edx,20
	int 0x40
 
	; *** à¨á®¢ ­¨¥ ¨ª®­®ª ­  ª­®¯ª å ***
	mov edx,(7 shl 16)+7 ;icon new
	mcall SF_PUT_IMAGE,[image_data_toolbar],(16 shl 16)+16
 
	add ebx,IMAGE_TOOLBAR_ICON_SIZE
	add edx,(25 shl 16) ;icon open
	int 0x40
	add ebx,IMAGE_TOOLBAR_ICON_SIZE
	add edx,(25 shl 16) ;icon save
	int 0x40
 
	add ebx,IMAGE_TOOLBAR_ICON_SIZE
	add edx,(30 shl 16) ;ã¢¥«¨ç. ¬ áèâ ¡
	int 0x40
	add ebx,IMAGE_TOOLBAR_ICON_SIZE
	add edx,(25 shl 16) ;ã¬¥­ìè. ¬ áèâ ¡
	int 0x40
	add ebx,IMAGE_TOOLBAR_ICON_SIZE
	add edx,(25 shl 16) ;¯®¢®à®â 1
	int 0x40
	add ebx,IMAGE_TOOLBAR_ICON_SIZE
	add edx,(25 shl 16) ;¯®¢®à®â 2
	int 0x40
	add ebx,IMAGE_TOOLBAR_ICON_SIZE
	add edx,(25 shl 16) ;á¤¢¨£ ¯«®áª®áâ¨ +
	int 0x40
	add ebx,IMAGE_TOOLBAR_ICON_SIZE
	add edx,(25 shl 16) ;á¤¢¨£ ¯«®áª®áâ¨ -
	int 0x40
	add ebx,IMAGE_TOOLBAR_ICON_SIZE
	add edx,(25 shl 16) ;®á¢¥é¥­¨¥
	int 0x40
	add ebx,IMAGE_TOOLBAR_ICON_SIZE
	add edx,(25 shl 16) ;à¥­¤¥à 2*2
	int 0x40
	add ebx,IMAGE_TOOLBAR_ICON_SIZE
	add edx,(25 shl 16) ;
	int 0x40
	add ebx,IMAGE_TOOLBAR_ICON_SIZE
	add edx,(25 shl 16) ;
	int 0x40
	add ebx,IMAGE_TOOLBAR_ICON_SIZE
	add edx,(25 shl 16) ;
	int 0x40
	add ebx,IMAGE_TOOLBAR_ICON_SIZE
	add edx,(25 shl 16) ;
	int 0x40
	add ebx,IMAGE_TOOLBAR_ICON_SIZE
	add edx,(25 shl 16) ;
	int 0x40
	add ebx,IMAGE_TOOLBAR_ICON_SIZE
	add edx,(25 shl 16) ;
	int 0x40
	add ebx,IMAGE_TOOLBAR_ICON_SIZE
	add edx,(25 shl 16) ;
	int 0x40
 
	; *** à¨á®¢ ­¨¥ ¡ãä¥à®¢ ***
	call draw_objects
	call draw_pok
 
	mcall SF_REDRAW,SSF_END_DRAW
popad
	ret
 
align 4
draw_pok:
	mov esi,[sc.work_button_text]
	or  esi,(1 shl 30)
	mov edi,[sc.work_button]
	mcall SF_DRAW_NUMBER, (3 shl 16)+(1 shl 31), [v_zoom], ((350+6*9) shl 16)+OT_CAPT_Y_COLOR+2 ;¬ áèâ ¡
	mov ecx,[n_plane]
	add edx,115 shl 16 ;9
	int 0x40 ;­®¬¥à á¥ç¥­¨ï
 
	;®¡­®¢«¥­¨¥ ¯ à ¬¥âà®¢ ªãàá®à 
	mov dword[txt_curor.size],0
	mov eax,dword[v_cur_x]
	mov edi,txt_curor.size
	stdcall convert_int_to_str,10
	stdcall str_cat, edi,txt_mull
	mov eax,dword[v_cur_y]
	mov edi,txt_buf
	stdcall convert_int_to_str,16
	stdcall str_cat, txt_curor.size,edi
	stdcall str_cat, txt_curor.size,txt_space ;§ ¢¥àè îé¨© ¯à®¡¥«
 
	;®¡­®¢«¥­¨¥ ¯ à ¬¥âà®¢ ª¨áâ¨
	mov dword[txt_mov_offs.size],0
	mov eax,dword[mov_x]
	mov edi,txt_mov_offs.size
	stdcall convert_int_to_str,30
	stdcall str_cat, edi,txt_space
	mov eax,dword[mov_y]
	mov edi,txt_buf
	stdcall convert_int_to_str,16
	stdcall str_cat, txt_mov_offs.size,edi
	stdcall str_cat, txt_mov_offs.size,txt_space
	mov eax,dword[mov_z]
	mov edi,txt_buf
	stdcall convert_int_to_str,16
	stdcall str_cat, txt_mov_offs.size,edi
	stdcall str_cat, txt_mov_offs.size,txt_space ;§ ¢¥àè îé¨© ¯à®¡¥«
 
	;à¨á®¢ ­¨¥ â¥ªáâ 
	mov ecx,[sc.work_text]
	or  ecx,0x80000000 ;or (1 shl 30)
	mcall SF_DRAW_TEXT, (OT_CAPT_X_COLOR shl 16)+OT_CAPT_Y_COLOR+2,,txt_color
 
	mov edx,txt_curor
	add ebx,115 shl 16
	or  ecx,(1 shl 30)
	mov edi,[sc.work]
	int 0x40
 
	mov edx,txt_mov_offs
	add ebx,115 shl 16
	int 0x40
 
	mov edx,txt_zoom
	add ebx,115 shl 16
	int 0x40
 
	mov edx,txt_n_plane
	add ebx,115 shl 16
	int 0x40
 
	call on_change_color
	ret
 
align 4
on_change_color:
pushad
	mov ebx,((OT_CAPT_X_COLOR+35) shl 16)+16 ;¯® ®á¨ x
	mov ecx,(OT_CAPT_Y_COLOR shl 16)+12 ;¯® ®á¨ y
	mcall SF_DRAW_RECT,,,[v_color]
 
	mov ecx,edx
	mov edx,((OT_CAPT_X_COLOR+55) shl 16)+OT_CAPT_Y_COLOR+2
	mov esi,[sc.work_text]
	add esi,(1 shl 30)
	mov edi,[sc.work]
	mcall SF_DRAW_NUMBER,(1 shl 8)+(6 shl 16)
popad
	ret
 
align 4
key:
	mcall SF_GET_KEY
	jmp still
 
 
align 4
button:
	mcall SF_GET_BUTTON
	cmp ah,3
	jne @f
		stdcall but_new_file, [open_file_vox]
		call draw_objects
		call draw_pok
		jmp still
	@@:
	cmp ah,4
	jne @f
		call but_open_file
		jmp still
	@@:
	cmp ah,5
	jne @f
		call but_save_file
		jmp still
	@@:
	cmp ah,6
	jne @f
		call but_zoom_p
		jmp still
	@@:
	cmp ah,7
	jne @f
		call but_zoom_m
		jmp still
	@@:
	cmp ah,8
	jne @f
		call but_3
		jmp still
	@@:
	cmp ah,9
	jne @f
		call but_4
		jmp still
	@@:
	cmp ah,10
	jne @f
		call but_plane_inc
		jmp still
	@@:
	cmp ah,11
	jne @f
		call but_plane_dec
		jmp still
	@@:
	cmp ah,12
	jne @f
		call but_light
		jmp still
	@@:
	cmp ah,13
	jne @f
		call but_rend_2_2
		jmp still
	@@:
	cmp ah,14
	jne @f
		call but_move
		jmp still
	@@:
	cmp ah,15
	jne @f
		dec dword[mov_x]
		call draw_pok
		jmp still
	@@:
	cmp ah,16
	jne @f
		inc dword[mov_x]
		call draw_pok
		jmp still
	@@:
	cmp ah,17
	jne @f
		dec dword[mov_y]
		call draw_pok
		jmp still
	@@:
	cmp ah,18
	jne @f
		inc dword[mov_y]
		call draw_pok
		jmp still
	@@:
	cmp ah,19
	jne @f
		dec dword[mov_z]
		call draw_pok
		jmp still
	@@:
	cmp ah,20
	jne @f
		inc dword[mov_z]
		call draw_pok
		jmp still
	@@:
	cmp ah,1
	jne still
.exit:
	stdcall [buf2d_delete],buf_0
	stdcall [buf2d_delete],buf_0z
	cmp dword[buf_r_img],0
	je @f
		stdcall [buf2d_delete],buf_r_img
		stdcall [buf2d_delete],buf_r_z
	@@:
	stdcall [buf2d_vox_brush_delete], buf_vox
	stdcall mem.Free,[image_data_toolbar]
	stdcall mem.Free,[open_file_vox]
	stdcall mem.Free,[moved_file_vox]
	mcall SF_TERMINATE_PROCESS
 
;¤ ­­ë¥ ¤«ï ¨­¨æ¨ «¨§ æ¨¨ ¢®ªá¥«ì­®£® ®¡ê¥ªâ 
align 4
vox_new_data:
	db 2,0,0,0
	db 0,1,2,3, 4,5,6,7 ;default table
	dd 0 ;null node
 
;¨­¨æ¨ «¨§ æ¨ï ¢®ªá¥«ì­®£® ®¡ê¥ªâ 
align 4
proc but_new_file uses ecx edi esi, file_data:dword
	mov ecx,vox_offs_data+4
	mov esi,vox_new_data
	mov edi,[file_data]
	cld
	rep movsb
	ret
endp
 
align 4
open_file_vox dd 0 ;ãª § â¥«ì ­  ®¡« áâì ¤«ï ®âªàëâ¨ï ä ©«®¢
moved_file_vox dd 0
 
align 4
but_open_file:
	copy_path open_dialog_name,communication_area_default_path,file_name,0
pushad
	mov [OpenDialog_data.type],0
	stdcall [OpenDialog_Start],OpenDialog_data
	cmp [OpenDialog_data.status],2
	je @f
		;ª®¤ ¯à¨ ã¤ ç­®¬ ®âªàëâ¨¨ ¤¨ «®£ 
		call but_open_file_cmd_lin
	@@:
popad
	ret
 
align 4
but_open_file_cmd_lin:
pushad
	mov [run_file_70.Function], SSF_READ_FILE
	mov [run_file_70.Position], 0
	mov [run_file_70.Flags], 0
	m2m dword[run_file_70.Count], dword[max_open_file_size]
	m2m [run_file_70.Buffer], [open_file_vox]
	mov byte[run_file_70+20], 0
	mov dword[run_file_70.FileName], openfile_path
	mcall SF_FILE,run_file_70
	cmp ebx,0xffffffff
	je .end_open_file
 
	mcall SF_SET_CAPTION,1,openfile_path
 
	;---
	mov eax,[open_file_vox]
	movzx eax,byte[eax]
	and eax,0xff ;¡¥à¥¬ ¬ áèâ ¡ ¯® ã¬®«ç ­¨î
	mov dword[v_zoom],eax ;¡¥à¥¬ ¬ áèâ ¡ ¯® ã¬®«ç ­¨î
	mov dword[cam_x],0
	mov dword[cam_y],0
	mov dword[cam_z],0
	call draw_objects
	.end_open_file:
popad
	ret
 
align 4
but_save_file:
		copy_path open_dialog_name,communication_area_default_path,file_name,0
	pushad		
		mov [OpenDialog_data.type],1
		stdcall [OpenDialog_Start],OpenDialog_data
		cmp [OpenDialog_data.status],2
		je .end_save_file
		;ª®¤ ¯à¨ ã¤ ç­®¬ ®âªàëâ¨¨ ¤¨ «®£ 
 
		mov eax,dword[v_zoom] ;§ ¤ ¥¬ ¬ áèâ ¡ ¯® ã¬®«ç ­¨î
		mov ebx,[moved_file_vox]
		mov byte[ebx],al
 
		stdcall buf2d_vox_obj_get_size, ebx
		mov dword[run_file_70.Count], eax ;à §¬¥à ä ©« 
		mov [run_file_70.Function], SSF_CREATE_FILE
		mov [run_file_70.Position], 0
		mov [run_file_70.Flags], 0
		mov ebx, dword[moved_file_vox]
		mov [run_file_70.Buffer], ebx
		mov byte[run_file_70+20], 0
		mov dword[run_file_70.FileName], openfile_path
		mcall SF_FILE,run_file_70
		cmp ebx,0xffffffff
		je .end_save_file
 
		.end_save_file:
	popad
	ret
 
;ã¢¥«¨ç¥­¨¥ ¬ áèâ ¡ 
align 4
but_zoom_p:
	cmp dword[v_zoom],10 ;¬ ªá¨¬ «ì­ë© à §¬¥à, ¤® ª®â®à®£® ¬®¦­® ã¢¥«¨ç¨âì 2^10=1024
	jge @f
		inc dword[v_zoom]
		shl dword[n_plane],1
		push eax
		mov eax,[v_zoom]
		cmp eax,[scaled_zoom]
		jl .end_0
			push ecx
			mov ecx,[scaled_zoom]
			xor eax,eax
			inc eax
			shl eax,cl
			shl dword[cam_x],1
			shl dword[cam_y],1
			shl dword[cam_z],1
			cmp eax,[n_plane]
			jg .end_1
				;ª®à¥ªâ¨à®¢ª  ¯®«§ã­ª 
				sub [n_plane],eax
				inc dword[cam_y]
			.end_1:
			pop ecx
		.end_0:
		pop eax
		call draw_objects
		call draw_pok
	@@:
	ret
 
;ã¬¥­ìè¥­¨¥ ¬ áèâ ¡ 
align 4
but_zoom_m:
	cmp dword[v_zoom],1
	jl @f
		dec dword[v_zoom]
		shr dword[n_plane],1
		push eax
		mov eax,[v_zoom]
		cmp eax,[scaled_zoom]
		jl .end_0
			shr dword[cam_x],1
			shr dword[cam_y],1
			jnc .end_1
				;ª®à¥ªâ¨à®¢ª  ¯®«§ã­ª 
				push ecx
				mov ecx,[scaled_zoom]
				dec ecx
				xor eax,eax
				inc eax
				shl eax,cl
				add [n_plane],eax
				pop ecx
			.end_1:
			shr dword[cam_z],1
		.end_0:
		pop eax
		call draw_objects
		call draw_pok
	@@:
	ret
 
align 4
but_3:
	stdcall vox_obj_rot_z, [open_file_vox]
	call draw_objects
	ret
 
align 4
but_4:
	stdcall vox_obj_rot_x, [open_file_vox]
	call draw_objects
	ret
 
;á¤¢¨£ ¥¬ ¯«®áª®áâì áà¥§ 
align 4
but_plane_inc:
push eax ecx
	inc dword[n_plane]
	mov eax,[v_zoom]
	cmp eax,[scaled_zoom]
	jle .end_0
		;¯à®¨áå®¤¨â ¬ áèâ ¡¨à®¢ ­¨¥
		mov ecx,[scaled_zoom]
		xor eax,eax
		inc eax
		shl eax,cl
		cmp eax,[n_plane]
		jg @f
			mov dword[n_plane],0
			inc dword[cam_y] ;¯¥à¥å®¤¨¬ ¢ á®á¥¤­¨© ªã¡
			neg ecx
			;inc ecx
			add ecx,[v_zoom]
			xor eax,eax
			inc eax
			shl eax,cl
			cmp eax,[cam_y]
			jg @f
				mov dword[cam_y],0 ;§ æ¨ª«¨¢ ¥¬ ¥á«¨ ¢ë«¥§«¨ §  ¯à¥¤¥«ë ¯®á«¥¤­¥£® ªã¡ 
		@@:
		jmp .end_1
	.end_0:
		;¬ áèâ ¡¨à®¢ ­¨¥ ­¥ ¯à®¨áå®¤¨â
		mov ecx,eax
		xor eax,eax
		inc eax
		shl eax,cl
		cmp eax,[n_plane]
		jg .end_1
			mov dword[n_plane],0
	.end_1:
	call draw_objects
	call draw_pok
pop ecx eax
	ret
 
;á¤¢¨£ ¥¬ ¯«®áª®áâì áà¥§ 
align 4
but_plane_dec:
	dec dword[n_plane]
	cmp dword[n_plane],0
	jge .end_f
push eax ecx
	mov ecx,[scaled_zoom]
	xor eax,eax
	inc eax
	shl eax,cl
	dec eax
	mov dword[n_plane],eax
 
	mov eax,[v_zoom]
	cmp eax,[scaled_zoom]
	jle .end_0
		;¯à®¨áå®¤¨â ¬ áèâ ¡¨à®¢ ­¨¥
		dec dword[cam_y] ;¯¥à¥å®¤¨¬ ¢ á®á¥¤­¨© ªã¡
		cmp dword[cam_y],0
		jge .end_0
 
		mov ecx,eax
		sub ecx,[scaled_zoom]
		xor eax,eax
		inc eax
		shl eax,cl
		dec eax
		mov dword[cam_y],eax ;¥á«¨ ­®¬¥à ªã¡  ®ª § «áï ¬¥­ìè¥ 0 ¨á¯à ¢«ï¥¬ ­  ¬ ªá¨¬ «ì­®¥ §­ ç¥­¨¥
	.end_0:
pop ecx eax
	.end_f:
	call draw_objects
	call draw_pok
	ret
 
align 4
but_light:
	xor dword[mode_light],1
	call draw_objects
	ret
 
align 4
but_rend_2_2:
push edi
	cmp dword[buf_r_img],0
	jne @f
		;á®§¤ ­¨¥ ¡ãä¥à  ¤«ï à¥­¤¥à 
		push ecx esi
		mov edi,buf_r_img
		mov esi,buf_0
		mov ecx,BUF_STRUCT_SIZE
		cld
		rep movsb ;ª®¯¨àã¥¬ ¢á¥ ¯ à ¬¥âàë á ®á­®¢­®£® ¡ãä¥à 
		mov edi,buf_r_img
		mov buf2d_data,0
		shl buf2d_w,1 ;ã¢¥«¨ç¨¢ ¥¬ à §¬¥à ¡ãä¥à 
		shl buf2d_h,1
		stdcall [buf2d_create],buf_r_img
 
		mov edi,buf_r_z
		mov esi,buf_0z
		mov ecx,BUF_STRUCT_SIZE
		cld
		rep movsb ;ª®¯¨àã¥¬ ¢á¥ ¯ à ¬¥âàë á ®á­®¢­®£® ¡ãä¥à 
		mov edi,buf_r_z
		mov buf2d_data,0
		shl buf2d_w,1 ;ã¢¥«¨ç¨¢ ¥¬ à §¬¥à ¡ãä¥à 
		shl buf2d_h,1
		stdcall [buf2d_create],buf_r_z
		pop esi ecx
	@@:
	stdcall [buf2d_clear], buf_r_img, [buf_0.color] ;ç¨áâ¨¬ ¡ãä¥à
	stdcall [buf2d_clear], buf_r_z, 0 ;ç¨áâ¨¬ ¡ãä¥à
 
	push eax ebx ecx
		mov eax,[v_zoom]
		cmp eax,[scaled_zoom]
		jle .end_scaled
			;à¥­¤¥à ã¢¥«¨ç¥­­®© ç áâ¨ ®¡ê¥ªâ 
			mov ebx,[scaled_zoom]
			sub eax,ebx
			inc ebx
			stdcall [buf2d_vox_obj_draw_3g_scaled], buf_r_img, buf_r_z, buf_vox,\
				[open_file_vox], 0,0, 0, ebx, [cam_x],[cam_y],[cam_z],eax, [sc.work_graph]
			bt dword[mode_light],0
			jnc @f
				stdcall [buf2d_vox_obj_draw_3g_shadows], buf_r_img, buf_r_z, buf_vox, 0,0, 0, ebx, 3
			@@:
			xor ebx,ebx
			xor ecx,ecx
			mov edi,buf_r_img
			stdcall [buf2d_img_hdiv2], edi
			shr buf2d_h,1
			stdcall [buf2d_img_wdiv2], edi
			shr buf2d_w,1
			jmp .show
		.end_scaled:
 
		inc eax
		stdcall [buf2d_vox_obj_draw_3g], buf_r_img, buf_r_z, buf_vox, [open_file_vox], 0,0, 0, eax
		stdcall [buf2d_vox_obj_draw_1g], buf_r_img, buf_r_z, [open_file_vox], 0,0, eax
		bt dword[mode_light],0
		jnc @f
			stdcall [buf2d_vox_obj_draw_3g_shadows], buf_r_img, buf_r_z, buf_vox, 0,0, 0, eax, 3
		@@:
 
		mov edi,buf_r_img
		stdcall [buf2d_img_hdiv2], edi
		shr buf2d_h,1
		stdcall [buf2d_img_wdiv2], edi
		shr buf2d_w,1
 
		stdcall [buf2d_vox_obj_get_img_w_3g], buf_vox,[v_zoom]
		mov ebx,[buf_0.w]
		sub ebx,eax
		shr ebx,1 ;ebx - ¤«ï æ¥­âà®¢ª¨ ¬ «¥­ìª¨å ¨§®¡à ¦¥­¨© ¯® £®à¨§®­â «¨
		stdcall [buf2d_vox_obj_get_img_h_3g], buf_vox,[v_zoom]
		cmp eax,[buf_0.h]
		jg @f
			mov ecx,[buf_0.h]
			sub ecx,eax
			shr ecx,1 ;ecx - ¤«ï æ¥­âà®¢ª¨ ¬ «¥­ìª¨å ¨§®¡à ¦¥­¨© ¯® ¢¥àâ¨ª «¨
		@@:
		.show:
		stdcall [buf2d_bit_blt], buf_0, ebx,ecx, edi
		shl buf2d_h,1
		shl buf2d_w,1
	pop ecx ebx eax
pop edi
	stdcall [buf2d_draw], buf_0 ;®¡­®¢«ï¥¬ ¡ãä¥à ­  íªà ­¥
	ret
 
align 4
but_move:
push eax
	stdcall but_new_file, [moved_file_vox]
	mov eax,[v_zoom]
	stdcall buf_vox_obj_recreat, [open_file_vox], [moved_file_vox],\
		[mov_x],[mov_y],[mov_z], eax
 
	stdcall [buf2d_clear], buf_0, [buf_0.color] ;ç¨áâ¨¬ ¡ãä¥à
	stdcall [buf2d_clear], buf_0z, 0 ;ç¨áâ¨¬ ¡ãä¥à
	cmp eax,[scaled_zoom]
	jle @f
		mov eax,[scaled_zoom]
	@@:
	stdcall [buf2d_vox_obj_draw_3g], buf_0, buf_0z, buf_vox, [moved_file_vox],		0,0,0, eax
pop eax
	stdcall [buf2d_draw], buf_0 ;®¡­®¢«ï¥¬ ¡ãä¥à ­  íªà ­¥
	ret
 
;description:
; äã­ªæ¨ï à¨áãîé ï ¢®ªá¥«ì­ë© ®¡ê¥ªâ (¢¨¤­® 3 £à ­¨)
;input:
; v_obj - ¢®ªá¥«ì­ë© ®¡ê¥ªâ
; k_scale - ª®íä. ¤«ï ¬ áèâ ¡¨à®¢ ­¨ï ¨§®¡à ¦¥­¨ï
align 4
proc buf_vox_obj_recreat, v_obj:dword, obj_n:dword,\
coord_x:dword, coord_y:dword, coord_z:dword, k_scale:dword
pushad
	mov edi,[v_obj]
	mov ecx,[k_scale]
	mov ebx,[coord_x]
	mov edx,[coord_y]
	add edi,vox_offs_data
	mov esi,[coord_z]
	stdcall vox_go_in_node, [v_obj], [obj_n]
popad
	ret
endp
 
;input:
; ebx - coord_x
; edx - coord_y
; esi - coord_z
; ecx - ãà®¢¥­ì â¥ªãè¥£® ã§« 
; edi - ãª § â¥«ì ­  ¤ ­­ë¥ ¢®ªá¥«ì­®£® ®¡ê¥ªâ 
align 4
proc vox_go_in_node, v_obj:dword, obj_n:dword
	cmp byte[edi+3],0 ;á¬®âà¨¬ ¥áâì «¨ ¯®¤¤¥à¥¢ìï
	je .sub_trees
		;à¥ªãàá¨¢­ë© ¯¥à¥¡®à ¯®¤¤¥à¥¢ì¥¢
		push eax edx
 
		;¯à®à¨á®¢ª  à ¬ª¨ ¥á«¨ à §¬¥à ã§«  = 1
		cmp ecx,0
		jne @f
			stdcall buf2d_vox_obj_create_node, [obj_n], ebx,edx,esi, [v_zoom], [edi]
		@@:
 
		;¢å®¤ ¢­ãâàì ã§« 
		dec ecx
		mov ah,byte[edi+3]
		add edi,4
		mov al,8
		.cycle:
			bt ax,8 ;â¥áâ¨àã¥¬ â®«ìª® ah
			jnc .c_next
				push ebx edx esi
				stdcall vox_corect_coords, [v_obj]
				stdcall vox_go_in_node, [v_obj], [obj_n]
				pop esi edx ebx
			.c_next:
			shr ah,1
			dec al
			jnz .cycle
 
		;¢ëå®¤ ¨§ ã§« 
		inc ecx
		pop edx eax
 
		jmp .end_f
	.sub_trees:
		;à¨áã¥¬ ã§¥«
		cmp ecx,0
		jne @f
			stdcall buf2d_vox_obj_create_node, [obj_n], ebx,edx,esi, [v_zoom], [edi]
		@@:
 
		add edi,4
	.end_f:
	ret
endp
 
;description:
;äã­ªæ¨ï ¤«ï ª®à¥ªâ¨à®¢ª¨ ª®®à¤¨­ â
;­ ¯à ¢«¥­¨ï ®á¥© ª®®à¤¨­ â ¢ ¢®ªá¥«¥:
;*z
;|
;+
;  * y
; /
;+
; \
;  * x
;input:
;  al - ­®¬¥à ã§«  ¢ ¤¥à¥¢¥ (®â 1 ¤® 8)
; ebx - ª®®à¤¨­ â  x
; edx - ª®®à¤¨­ â  y
; esi - ª®®à¤¨­ â  z
; ecx - ãà®¢¥­ì â¥ªãè¥£® ã§« 
;output:
; ebx - ­®¢ ï ª®®à¤¨­ â  x
; edx - ­®¢ ï ª®®à¤¨­ â  y
; esi - ­®¢ ï ª®®à¤¨­ â  z
align 4
proc vox_corect_coords, v_obj:dword
	cmp ecx,0
	jl .end_f ;¤«ï ãáª®à¥­¨ï ®âà¨á®¢ª¨
 
	push eax edi
	and eax,15 ;¢ë¤¥«ï¥¬ ­®¬¥à ã§«  ¢ ¤¥à¥¢¥
	mov edi,[v_obj]
	add edi,vox_offs_tree_table
	add edi,8
	sub edi,eax
 
	xor eax,eax
	inc eax
	cmp ecx,1
	jl .no_scale ;¢® ¨§¡¥¦ ­¨¥ § æ¨ª«¨¢ ­¨ï
		shl eax,cl
	.no_scale:
 
	bt word[edi],0 ;test voxel coord x
	jnc @f
		add ebx,eax
	@@:
	bt word[edi],1 ;test voxel coord y
	jnc @f
		add edx,eax
	@@:
	bt word[edi],2 ;test voxel coord z
	jnc @f
		add esi,eax
	@@:
	pop edi eax
	.end_f:
	ret
endp
 
align 4
v_zoom dd 3 ;â¥ªãé¨© ¬ áèâ ¡
v_cur_x dd 0 ;ª®®à¤¨­ â  ªãàá®à  x
v_cur_y dd 0 ;ª®®à¤¨­ â  ªãàá®à  y (­® ®áì ¢ ®¡ê¥ªâ¥ z)
n_plane dd 0 ;¯«®áª®áâì á¥ç¥­¨ï
v_color dd 0xff ;æ¢¥â ª à ­¤ è 
mode_light dd 1 ;à¥¦¨¬ ®á¢¥é¥­¨ï
cam_x dd 0
cam_y dd 0
cam_z dd 0
;á¤¢¨£¨ ®¡ê¥ªâ  ¯à¨ ¯¥à¥á®§¤ ­¨¨ (¯¥à¥¤¢¨¦¥­¨¨)
mov_x dd 0
mov_y dd 0
mov_z dd 0
scaled_zoom dd 5 ;¬ áèâ ¡ ¯®á«¥ ª®â®à®£® ­ ç¨­ ¥âáï à¨á®¢ ­¨¥ ç áâ¨ ¨§®¡à ¦¥­¨ï
tile_size dd ? ;à §¬¥à ª¢ ¤à â¨ª  ­  ¯«®áª®áâ¨ á á¥ç¥­¨¥¬
max_open_file_size dd ?
brush_w dd 5 ;è¨à¨­  ª¨áâ¨
brush_h dd 5 ;¢ëá®â  ª¨áâ¨
brush_data dd 1 shl 31,1 shl 30,1 shl 30,1 shl 30,1 shl 31
dd 1 shl 30,1 shl 30,1 shl 30,1 shl 30,1 shl 30
dd 1 shl 30,1 shl 30,1 shl 30,1 shl 30,1 shl 30
dd 1 shl 30,1 shl 30,1 shl 30,1 shl 30,1 shl 30
dd 1 shl 31,1 shl 30,1 shl 30,1 shl 30,1 shl 31
rd 999 ;32*32-25
 
if lang eq ru
txt_zoom db ' áèâ ¡:',0
txt_curor: db 'ãàá®à: '
.size: rb 10
txt_n_plane db '¥ç¥­¨¥:',0
txt_color db '¢¥â:',0
txt_mov_offs: db '¬¥é¥­¨¥: '
else
txt_zoom db 'Scale:',0
txt_curor: db 'Cursor: '
.size: rb 10
txt_n_plane db 'Section:',0
txt_color db 'Color:',0
txt_mov_offs: db 'Offset: '
end if
.size: rb 30
txt_mull db '*',0
txt_space db ' ',0
txt_buf rb 16
 
align 4
draw_objects:
	stdcall [buf2d_clear], buf_0, [buf_0.color] ;ç¨áâ¨¬ ¡ãä¥à
	stdcall [buf2d_clear], buf_0z, 0 ;ç¨áâ¨¬ ¡ãä¥à
	stdcall [buf2d_clear], buf_pl, [buf_pl.color] ;ç¨áâ¨¬ ¡ãä¥à
 
	push eax ebx ecx
	stdcall [buf2d_vox_obj_get_img_w_3g], buf_vox,[v_zoom]
	mov ebx,[buf_0.w]
	sub ebx,eax
	shr ebx,1 ;ebx - ¤«ï æ¥­âà®¢ª¨ ¬ «¥­ìª¨å ¨§®¡à ¦¥­¨© ¯® £®à¨§®­â «¨
 
	xor ecx,ecx
	stdcall [buf2d_vox_obj_get_img_h_3g], buf_vox,[v_zoom]
	cmp eax,[buf_0.h]
	jg @f
		mov ecx,[buf_0.h]
		sub ecx,eax
		shr ecx,1 ;ecx - ¤«ï æ¥­âà®¢ª¨ ¬ «¥­ìª¨å ¨§®¡à ¦¥­¨© ¯®
	@@:
 
	mov eax,[v_zoom]
	cmp eax,[scaled_zoom]
	jg @f
		;®¡ëç­ë© à¥¦¨¬ ¨§®¡à ¦¥­¨ï
		stdcall [buf2d_vox_obj_draw_3g], buf_0, buf_0z, buf_vox,\
			[open_file_vox], ebx,ecx, 0, eax
		stdcall [buf2d_vox_obj_draw_pl], buf_pl, [open_file_vox],\
			OT_MAP_X,OT_MAP_Y,[tile_size], eax, [n_plane], [sc.work_graph]
		stdcall [buf2d_vox_obj_draw_1g], buf_0, buf_0z,\
			[open_file_vox], 0,0, eax
		bt dword[mode_light],0
		jnc .end_1
			stdcall [buf2d_vox_obj_draw_3g_shadows], buf_0, buf_0z, buf_vox, ebx,ecx, 0, eax, 3
		.end_1:
		jmp .end_0
	@@:
		;à¥¦¨¬ ¬ áèâ ¡¨à®¢ ­¨ï ¨§®¡à ¦¥­¨ï
		sub eax,[scaled_zoom]
		stdcall [buf2d_vox_obj_draw_3g_scaled], buf_0, buf_0z, buf_vox,\
			[open_file_vox], 0,0, 0, [scaled_zoom], [cam_x],[cam_y],[cam_z],eax, [sc.work_graph] ;scroll -> 2^eax
		stdcall [buf2d_vox_obj_draw_pl_scaled], buf_pl, [open_file_vox],\
			OT_MAP_X,OT_MAP_Y,[tile_size], [scaled_zoom], [n_plane], [sc.work_graph],[cam_x],[cam_y],[cam_z],eax
		bt dword[mode_light],0
		jnc .end_2
			stdcall [buf2d_vox_obj_draw_3g_shadows], buf_0, buf_0z, buf_vox, 0,0, 0, [scaled_zoom], 3
		.end_2:
	.end_0:
	pop ecx ebx eax
 
	call draw_vox_cursor
	stdcall [buf2d_draw], buf_0 ;®¡­®¢«ï¥¬ ¡ãä¥à ­  íªà ­¥
	stdcall [buf2d_draw], buf_pl ;®¡­®¢«ï¥¬ ¡ãä¥à ­  íªà ­¥
	.end_f:
	ret
 
;à¨á®¢ ­¨¥ ªãàá®à 
align 4
draw_vox_cursor:
pushad
	mov ecx,[v_zoom]
	cmp ecx,[scaled_zoom]
	jle @f
		mov ecx,[scaled_zoom]
	@@:
	xor edx,edx
	inc edx
	shl edx,cl
 
	mov eax,[v_cur_x]
	cmp eax,edx
	jge .end_f ;ªãàá®à §  ¯à¥¤¥« ¬¨ ¯®«ï
	mov edi,[tile_size]
	imul eax,edi
	add eax,OT_MAP_X
	mov ebx,edx
	dec ebx
	sub ebx,[v_cur_y]
	imul ebx,edi
	add ebx,OT_MAP_Y
	inc eax
	inc ebx
	sub edi,2
	stdcall [buf2d_rect_by_size], buf_pl, eax,ebx, edi,edi,[sc.work_graph]
	dec ebx
	add edi,2
 
	;£®à¨§®­â «ì­ë¥ «¨­¨¨
	sub eax,2
	mov ecx,edi
	imul edi,edx
	shr ecx,1
	add ebx,ecx ;æ¥­âà®¢ª  ¯® á¥à¥¤¨­¥ ª«¥âª¨
	mov ecx,OT_MAP_X
	add edi,ecx
	stdcall [buf2d_line], buf_pl, ecx,ebx, eax,ebx,[sc.work_graph]
	add eax,[tile_size]
	inc eax
	cmp eax,edi
	jge @f ;¥á«¨ ªãàá®à ­  ªà î ¯®«ï
		dec edi
		stdcall [buf2d_line], buf_pl, eax,ebx, edi,ebx,[sc.work_graph]
	@@:
 
	.end_f:
popad
	ret
 
 
;¤ ­­ë¥ ¤«ï ¤¨ «®£  ®âªàëâ¨ï ä ©«®¢
align 4
OpenDialog_data:
.type			dd 0 ;0 - ®âªàëâì, 1 - á®åà ­¨âì, 2 - ¢ë¡à âì ¤âà¥ªâ®à¨î
.procinfo		dd procinfo	;+4
.com_area_name		dd communication_area_name	;+8
.com_area		dd 0	;+12
.opendir_path		dd plugin_path	;+16
.dir_default_path	dd default_dir ;+20
.start_path		dd file_name ;+24 ¯ãâì ª ¤¨ «®£ã ®âªàëâ¨ï ä ©«®¢
.draw_window		dd draw_window	;+28
.status 		dd 0	;+32
.openfile_path		dd openfile_path	;+36 ¯ãâì ª ®âªàë¢ ¥¬®¬ã ä ©«ã
.filename_area		dd filename_area	;+40
.filter_area		dd Filter
.x:
.x_size 		dw 420 ;+48 ; Window X size
.x_start		dw 10 ;+50 ; Window X position
.y:
.y_size 		dw 320 ;+52 ; Window y size
.y_start		dw 10 ;+54 ; Window Y position
 
default_dir db '/sys',0
 
communication_area_name:
	db 'FFFFFFFF_open_dialog',0
open_dialog_name:
	db 'opendial',0
communication_area_default_path:
	db '/sys/File managers/',0
 
Filter:
dd Filter.end - Filter ;.1
.1:
db 'VOX',0
.end:
db 0
 
 
system_dir_0 db '/sys/lib/'
lib_name_0 db 'proc_lib.obj',0
system_dir_1 db '/sys/lib/'
lib_name_1 db 'libimg.obj',0
system_dir_2 db '/sys/lib/'
lib_name_2 db 'buf2d.obj',0
system_dir_3 db '/sys/lib/'
lib_name_3 db 'libini.obj',0
 
l_libs_start:
	lib0 l_libs lib_name_0, file_name, system_dir_0, import_proclib
	lib1 l_libs lib_name_1, file_name, system_dir_1, import_libimg
	lib2 l_libs lib_name_2, file_name, system_dir_2, import_buf2d
	lib3 l_libs lib_name_3, file_name, system_dir_3, import_libini
l_libs_end:
 
align 4
import_libimg:
	dd alib_init1
	img_is_img  dd aimg_is_img
	img_info    dd aimg_info
	img_from_file dd aimg_from_file
	img_to_file dd aimg_to_file
	img_from_rgb dd aimg_from_rgb
	img_to_rgb  dd aimg_to_rgb
	img_to_rgb2 dd aimg_to_rgb2
	img_decode  dd aimg_decode
	img_encode  dd aimg_encode
	img_create  dd aimg_create
	img_destroy dd aimg_destroy
	img_destroy_layer dd aimg_destroy_layer
	img_count   dd aimg_count
	img_lock_bits dd aimg_lock_bits
	img_unlock_bits dd aimg_unlock_bits
	img_flip    dd aimg_flip
	img_flip_layer dd aimg_flip_layer
	img_rotate  dd aimg_rotate
	img_rotate_layer dd aimg_rotate_layer
	img_draw    dd aimg_draw
 
	dd 0,0
	alib_init1   db 'lib_init',0
	aimg_is_img  db 'img_is_img',0 ;®¯à¥¤¥«ï¥â ¯® ¤ ­­ë¬, ¬®¦¥â «¨ ¡¨¡«¨®â¥ª  á¤¥« âì ¨§ ­¨å ¨§®¡à ¦¥­¨¥
	aimg_info    db 'img_info',0
	aimg_from_file db 'img_from_file',0
	aimg_to_file db 'img_to_file',0
	aimg_from_rgb db 'img_from_rgb',0
	aimg_to_rgb  db 'img_to_rgb',0 ;¯à¥®¡à §®¢ ­¨¥ ¨§®¡à ¦¥­¨ï ¢ ¤ ­­ë¥ RGB
	aimg_to_rgb2 db 'img_to_rgb2',0
	aimg_decode  db 'img_decode',0 ; ¢â®¬ â¨ç¥áª¨ ®¯à¥¤¥«ï¥â ä®à¬ â £à ä¨ç¥áª¨å ¤ ­­ëå
	aimg_encode  db 'img_encode',0
	aimg_create  db 'img_create',0
	aimg_destroy db 'img_destroy',0
	aimg_destroy_layer db 'img_destroy_layer',0
	aimg_count   db 'img_count',0
	aimg_lock_bits db 'img_lock_bits',0
	aimg_unlock_bits db 'img_unlock_bits',0
	aimg_flip    db 'img_flip',0
	aimg_flip_layer db 'img_flip_layer',0
	aimg_rotate  db 'img_rotate',0
	aimg_rotate_layer db 'img_rotate_layer',0
	aimg_draw    db 'img_draw',0
 
align 4
import_proclib:
	OpenDialog_Init dd aOpenDialog_Init
	OpenDialog_Start dd aOpenDialog_Start
dd 0,0
	aOpenDialog_Init db 'OpenDialog_init',0
	aOpenDialog_Start db 'OpenDialog_start',0
 
align 4
import_buf2d:
	init dd sz_init
	buf2d_create dd sz_buf2d_create
	buf2d_create_f_img dd sz_buf2d_create_f_img
	buf2d_clear dd sz_buf2d_clear
	buf2d_draw dd sz_buf2d_draw
	buf2d_delete dd sz_buf2d_delete
	buf2d_line dd sz_buf2d_line
	buf2d_rect_by_size dd sz_buf2d_rect_by_size
	buf2d_filled_rect_by_size dd sz_buf2d_filled_rect_by_size
	buf2d_circle dd sz_buf2d_circle
	buf2d_img_hdiv2 dd sz_buf2d_img_hdiv2
	buf2d_img_wdiv2 dd sz_buf2d_img_wdiv2
	buf2d_conv_24_to_8 dd sz_buf2d_conv_24_to_8
	buf2d_conv_24_to_32 dd sz_buf2d_conv_24_to_32
	buf2d_bit_blt dd sz_buf2d_bit_blt
	buf2d_bit_blt_transp dd sz_buf2d_bit_blt_transp
	buf2d_bit_blt_alpha dd sz_buf2d_bit_blt_alpha
	buf2d_curve_bezier dd sz_buf2d_curve_bezier
	buf2d_convert_text_matrix dd sz_buf2d_convert_text_matrix
	buf2d_draw_text dd sz_buf2d_draw_text
	buf2d_crop_color dd sz_buf2d_crop_color
	buf2d_offset_h dd sz_buf2d_offset_h
	buf2d_flood_fill dd sz_buf2d_flood_fill
	buf2d_set_pixel dd sz_buf2d_set_pixel
	buf2d_get_pixel dd sz_buf2d_get_pixel
	buf2d_vox_brush_create dd sz_buf2d_vox_brush_create
	buf2d_vox_brush_delete dd sz_buf2d_vox_brush_delete
	buf2d_vox_obj_get_img_w_3g dd sz_buf2d_vox_obj_get_img_w_3g
	buf2d_vox_obj_get_img_h_3g dd sz_buf2d_vox_obj_get_img_h_3g
	buf2d_vox_obj_draw_1g dd sz_buf2d_vox_obj_draw_1g
	buf2d_vox_obj_draw_3g dd sz_buf2d_vox_obj_draw_3g
	buf2d_vox_obj_draw_3g_scaled dd sz_buf2d_vox_obj_draw_3g_scaled
	buf2d_vox_obj_draw_3g_shadows dd sz_buf2d_vox_obj_draw_3g_shadows
	buf2d_vox_obj_draw_pl dd sz_buf2d_vox_obj_draw_pl
	buf2d_vox_obj_draw_pl_scaled dd sz_buf2d_vox_obj_draw_pl_scaled
 
	dd 0,0
	sz_init db 'lib_init',0
	sz_buf2d_create db 'buf2d_create',0
	sz_buf2d_create_f_img db 'buf2d_create_f_img',0
	sz_buf2d_clear db 'buf2d_clear',0
	sz_buf2d_draw db 'buf2d_draw',0
	sz_buf2d_delete db 'buf2d_delete',0
	sz_buf2d_line db 'buf2d_line',0
	sz_buf2d_rect_by_size db 'buf2d_rect_by_size',0
	sz_buf2d_filled_rect_by_size db 'buf2d_filled_rect_by_size',0
	sz_buf2d_circle db 'buf2d_circle',0
	sz_buf2d_img_hdiv2 db 'buf2d_img_hdiv2',0
	sz_buf2d_img_wdiv2 db 'buf2d_img_wdiv2',0
	sz_buf2d_conv_24_to_8 db 'buf2d_conv_24_to_8',0
	sz_buf2d_conv_24_to_32 db 'buf2d_conv_24_to_32',0
	sz_buf2d_bit_blt db 'buf2d_bit_blt',0
	sz_buf2d_bit_blt_transp db 'buf2d_bit_blt_transp',0
	sz_buf2d_bit_blt_alpha db 'buf2d_bit_blt_alpha',0
	sz_buf2d_curve_bezier db 'buf2d_curve_bezier',0
	sz_buf2d_convert_text_matrix db 'buf2d_convert_text_matrix',0
	sz_buf2d_draw_text db 'buf2d_draw_text',0
	sz_buf2d_crop_color db 'buf2d_crop_color',0
	sz_buf2d_offset_h db 'buf2d_offset_h',0
	sz_buf2d_flood_fill db 'buf2d_flood_fill',0
	sz_buf2d_set_pixel db 'buf2d_set_pixel',0
	sz_buf2d_get_pixel db 'buf2d_get_pixel',0
	sz_buf2d_vox_brush_create db 'buf2d_vox_brush_create',0
	sz_buf2d_vox_brush_delete db 'buf2d_vox_brush_delete',0
	sz_buf2d_vox_obj_get_img_w_3g db 'buf2d_vox_obj_get_img_w_3g',0
	sz_buf2d_vox_obj_get_img_h_3g db 'buf2d_vox_obj_get_img_h_3g',0
	sz_buf2d_vox_obj_draw_1g db 'buf2d_vox_obj_draw_1g',0
	sz_buf2d_vox_obj_draw_3g db 'buf2d_vox_obj_draw_3g',0
	sz_buf2d_vox_obj_draw_3g_scaled db 'buf2d_vox_obj_draw_3g_scaled',0
	sz_buf2d_vox_obj_draw_3g_shadows db 'buf2d_vox_obj_draw_3g_shadows',0
	sz_buf2d_vox_obj_draw_pl db 'buf2d_vox_obj_draw_pl',0
	sz_buf2d_vox_obj_draw_pl_scaled db 'buf2d_vox_obj_draw_pl_scaled',0
 
align 4
import_libini:
	dd alib_init2
	ini_get_str   dd aini_get_str
	ini_get_int   dd aini_get_int
	ini_get_color dd aini_get_color
dd 0,0
	alib_init2     db 'lib_init',0
	aini_get_str   db 'ini_get_str',0
	aini_get_int   db 'ini_get_int',0
	aini_get_color db 'ini_get_color',0
 
;¡ãä¥à ®á­®¢­®£® ¨§®¡à ¦¥­¨ï
align 4
buf_0: dd 0 ;ãª § â¥«ì ­  ¤a­ë¥ ¨§®¡à ¦¥­¨ï
.l: dw 5 ;+4 left
.t: dw 45 ;+6 top
.w: dd 192+6 ;+8 w
.h: dd 224+7 ;+12 h
.color: dd 0xffffff ;+16 color
	db 24 ;+20 bit in pixel
 
;¡ãä¥à £«ã¡¨­ë ®á­®¢­®£® ¨§®¡à ¦¥­¨ï
align 4
buf_0z: dd 0
	dw 0 ;+4 left
	dw 0 ;+6 top
.w: dd 192+6 ;+8 w
.h: dd 224+7 ;+12 h
.color: dd 0 ;+16 color
	db 32 ;+20 bit in pixel
 
;¡ãä¥à ¤«ï à¨á®¢ ­¨ï áà¥§  ®¡ê¥ªâ 
align 4
buf_pl: dd 0
.l: dw 15+192+6 ;+4 left
.t: dw 45 ;+6 top
.w: dd 320 ;+8 w
.h: dd 330 ;+12 h
.color: dd 0xffffff ;+16 color
	db 24 ;+20 bit in pixel
 
;¡ãä¥à ¤«ï ã«ãçè¥­®£® à¥­¤¥à 
align 4
buf_r_img:
	rb BUF_STRUCT_SIZE
align 4
buf_r_z:
	rb BUF_STRUCT_SIZE
 
align 4
cursor_pointer dd 0 ;ãª § â¥«ì ­  ¤ ­­ë¥ ¤«ï ªãàá®à 
 
 
;¤ ­­ë¥ ¤«ï á®§¤ ­¨ï ¬¨­¨¬ «ì­®£® ¥¤¨­¨ç­®£® ¢®ªá¥«ï
align 4
vox_6_7_z:
dd 0,0,1,1,0,0,\
   0,2,2,2,2,0,\
   2,2,2,2,2,2,\
   2,3,2,2,3,2,\
   2,3,3,3,3,2,\
   0,3,3,3,3,0,\
   0,0,3,3,0,0
 
align 4
buf_vox:
	db 6,7,4,3 ;w,h,h_osn,n
	rb BUF_STRUCT_SIZE*(3+1)
 
align 16
i_end:
	procinfo process_information
	sc system_colors
	run_file_70 FileInfoBlock
	mouse_dd dd ?
	wnd_s_pos: ;¬¥áâ® ¤«ï ­ áâà®¥ª áâ àâ®¢®© ¯®§¨æ¨¨ ®ª­ 
		rq 0
	rb 4096 ;2048
stacktop:
	sys_path rb 1024
	file_name rb 2048 ;4096 
	plugin_path rb 1024 ;4096
	openfile_path rb 1024 ;4096
	filename_area rb 256
mem:

Rev 8442	Rev 9587
1	use32	1	use32
2	org 0	2	org 0
3	db 'MENUET01' ;¨¤¥â¨ä. ¨á¯®«ï¥¬®£® ä ©« ¢á¥£¤ 8 ¡ ©â	3	db 'MENUET01' ;¨¤¥â¨ä. ¨á¯®«ï¥¬®£® ä ©« ¢á¥£¤ 8 ¡ ©â
4	dd 1, start, i_end, mem, stacktop, openfile_path, sys_path	4	dd 1, start, i_end, mem, stacktop, openfile_path, sys_path
5		5
6	include '../../../macros.inc'	6	include '../../../macros.inc'
7	include '../../../proc32.inc'	7	include '../../../proc32.inc'
8	include '../../../KOSfuncs.inc'	8	include '../../../KOSfuncs.inc'
9	include '../../../load_img.inc'	9	include '../../../load_img.inc'
10	include '../../../load_lib.mac'	10	include '../../../load_lib.mac'
11	include '../trunk/vox_draw.inc'	11	include '../trunk/vox_draw.inc'
12	include '../trunk/vox_rotate.inc'	12	include '../trunk/vox_rotate.inc'
13	include '../trunk/str.inc'	13	include '../trunk/str.inc'
14	include 'lang.inc'	14	include 'lang.inc'
15		15
16	@use_library mem.Alloc,mem.Free,mem.ReAlloc,dll.Load	16	@use_library mem.Alloc,mem.Free,mem.ReAlloc,dll.Load
17	if lang eq ru	17	if lang eq ru
18	caption db '¥à¥¬¥é¥¨¥ ¢®ªá¥«¥© 04.05.20',0 ;¯®¤¯¨áì ®ª	18	caption db '¥à¥¬¥é¥¨¥ ¢®ªá¥«¥© 04.05.20',0 ;¯®¤¯¨áì ®ª
19	else	19	else
20	caption db 'Voxel mover 04.05.20',0	20	caption db 'Voxel mover 04.05.20',0
21	end if	21	end if
22		22
23	IMAGE_TOOLBAR_ICON_SIZE equ 16163	23	IMAGE_TOOLBAR_ICON_SIZE equ 16163
24	image_data_toolbar dd 0	24	image_data_toolbar dd 0
25		25
26	;§ ç¥¨ï § ¤ ¢ ¥¬ë¥ ¯® ã¬®«ç ¨î, ¡¥§ ini ä ©«	26	;§ ç¥¨ï § ¤ ¢ ¥¬ë¥ ¯® ã¬®«ç ¨î, ¡¥§ ini ä ©«
27	ini_def_window_t equ 10	27	ini_def_window_t equ 10
28	ini_def_window_l equ 10	28	ini_def_window_l equ 10
29	ini_def_window_w equ 550	29	ini_def_window_w equ 550
30	ini_def_window_h equ 415	30	ini_def_window_h equ 415
31	ini_def_buf_w equ 198 ;=192+6	31	ini_def_buf_w equ 198 ;=192+6
32	ini_def_buf_h equ 231 ;=224+7	32	ini_def_buf_h equ 231 ;=224+7
33	ini_def_s_zoom equ 5	33	ini_def_s_zoom equ 5
34	ini_def_t_size equ 10	34	ini_def_t_size equ 10
35	ini_def_color_b equ 0xffffff	35	ini_def_color_b equ 0xffffff
36	;®¯¨á ¨¥ ¯ à ¬ âà®¢ ¤«ï ini ä ©«	36	;®¯¨á ¨¥ ¯ à ¬ âà®¢ ¤«ï ini ä ©«
37	ini_name db 'vox_mover.ini',0	37	ini_name db 'vox_mover.ini',0
38	ini_sec_window db 'Window',0	38	ini_sec_window db 'Window',0
39	key_window_t db 't',0	39	key_window_t db 't',0
40	key_window_l db 'l',0	40	key_window_l db 'l',0
41	key_window_w db 'w',0	41	key_window_w db 'w',0
42	key_window_h db 'h',0	42	key_window_h db 'h',0
43	key_buf_w db 'buf_w',0	43	key_buf_w db 'buf_w',0
44	key_buf_h db 'buf_h',0	44	key_buf_h db 'buf_h',0
45	ini_sec_options db 'Options',0	45	ini_sec_options db 'Options',0
46	key_s_zoom db 's_zoom',0	46	key_s_zoom db 's_zoom',0
47	key_t_size db 'tile_size',0	47	key_t_size db 'tile_size',0
48	key_f_size db 'file_size',0	48	key_f_size db 'file_size',0
49	key_col_b db 'c_background',0	49	key_col_b db 'c_background',0
50		50
51	OT_MAP_X equ 0	51	OT_MAP_X equ 0
52	OT_MAP_Y equ 0	52	OT_MAP_Y equ 0
53	OT_CAPT_X_COLOR equ 5 ;®âáâã¯ ¤«ï ¯®¤¯¨á¨ æ¢¥â	53	OT_CAPT_X_COLOR equ 5 ;®âáâã¯ ¤«ï ¯®¤¯¨á¨ æ¢¥â
54	OT_CAPT_Y_COLOR equ 30	54	OT_CAPT_Y_COLOR equ 30
55	PEN_MODE_NONE equ -1	55	PEN_MODE_NONE equ -1
56	PEN_MODE_CLEAR equ 0 ;à¥¦¨¬ áâ¨à ¨ï	56	PEN_MODE_CLEAR equ 0 ;à¥¦¨¬ áâ¨à ¨ï
57	PEN_MODE_SELECT_COLOR equ 2 ;à¥¦¨¬ ¢ë¡®à æ¢¥â	57	PEN_MODE_SELECT_COLOR equ 2 ;à¥¦¨¬ ¢ë¡®à æ¢¥â
58		58
59	align 4	59	align 4
60	start:	60	start:
61	load_libraries l_libs_start,l_libs_end	61	load_libraries l_libs_start,l_libs_end
62	;¯à®¢¥àª áª®«ìª® ã¤ ç® § £ã§¨« áì ¡¨¡«¨®â¥ª	62	;¯à®¢¥àª áª®«ìª® ã¤ ç® § £ã§¨« áì ¡¨¡«¨®â¥ª
63	mov ebp,lib0	63	mov ebp,lib0
64	cmp dword [ebp+ll_struc_size-4],0	64	cmp dword [ebp+ll_struc_size-4],0
65	jz @f	65	jz @f
66	mcall SF_TERMINATE_PROCESS	66	mcall SF_TERMINATE_PROCESS
67	@@:	67	@@:
68	mcall SF_STYLE_SETTINGS,SSF_GET_COLORS,sc,sizeof.system_colors	68	mcall SF_STYLE_SETTINGS,SSF_GET_COLORS,sc,sizeof.system_colors
69	mcall SF_SET_EVENTS_MASK,0xC0000027	69	mcall SF_SET_EVENTS_MASK,0xC0000027
70	stdcall [OpenDialog_Init],OpenDialog_data ;¯®¤£®â®¢ª ¤¨ «®£	70	stdcall [OpenDialog_Init],OpenDialog_data ;¯®¤£®â®¢ª ¤¨ «®£
71		71
72	;--- load ini file ---	72	;--- load ini file ---
73	copy_path ini_name,sys_path,file_name,0	73	copy_path ini_name,sys_path,file_name,0
74	;window startup pozition	74	;window startup pozition
75	stdcall dword[ini_get_int],file_name,ini_sec_window,key_window_l,ini_def_window_l	75	stdcall dword[ini_get_int],file_name,ini_sec_window,key_window_l,ini_def_window_l
76	mov word[wnd_s_pos+2],ax	76	mov word[wnd_s_pos+2],ax
77	stdcall dword[ini_get_int],file_name,ini_sec_window,key_window_w,ini_def_window_w	77	stdcall dword[ini_get_int],file_name,ini_sec_window,key_window_w,ini_def_window_w
78	mov word[wnd_s_pos],ax	78	mov word[wnd_s_pos],ax
79	stdcall dword[ini_get_int],file_name,ini_sec_window,key_window_t,ini_def_window_t	79	stdcall dword[ini_get_int],file_name,ini_sec_window,key_window_t,ini_def_window_t
80	mov word[wnd_s_pos+6],ax	80	mov word[wnd_s_pos+6],ax
81	stdcall dword[ini_get_int],file_name,ini_sec_window,key_window_h,ini_def_window_h	81	stdcall dword[ini_get_int],file_name,ini_sec_window,key_window_h,ini_def_window_h
82	mov word[wnd_s_pos+4],ax	82	mov word[wnd_s_pos+4],ax
83	;image buffer size	83	;image buffer size
84	stdcall dword[ini_get_int],file_name,ini_sec_window,key_buf_w,ini_def_buf_w	84	stdcall dword[ini_get_int],file_name,ini_sec_window,key_buf_w,ini_def_buf_w
85	mov [buf_0.w],eax	85	mov [buf_0.w],eax
86	mov [buf_0z.w],eax	86	mov [buf_0z.w],eax
87	add ax,15	87	add ax,15
88	mov [buf_pl.l],ax ;®âáâã¯ ¤«ï ¯à ¢®£® ®ª	88	mov [buf_pl.l],ax ;®âáâã¯ ¤«ï ¯à ¢®£® ®ª
89	stdcall dword[ini_get_int],file_name,ini_sec_window,key_buf_h,ini_def_buf_h	89	stdcall dword[ini_get_int],file_name,ini_sec_window,key_buf_h,ini_def_buf_h
90	mov [buf_0.h],eax	90	mov [buf_0.h],eax
91	mov [buf_0z.h],eax	91	mov [buf_0z.h],eax
92	;æ¢¥â ä®	92	;æ¢¥â ä®
93	stdcall dword[ini_get_color],file_name,ini_sec_window,key_col_b,ini_def_color_b	93	stdcall dword[ini_get_color],file_name,ini_sec_window,key_col_b,ini_def_color_b
94	mov [buf_0.color],eax	94	mov [buf_0.color],eax
95	mov [buf_pl.color],eax	95	mov [buf_pl.color],eax
96		96
97	;¬ áâ ¡, ¯®á«¥ ª®â®à®£® ¡ã¤¥â ã¢¥«¨ç¥¨¥	97	;¬ áâ ¡, ¯®á«¥ ª®â®à®£® ¡ã¤¥â ã¢¥«¨ç¥¨¥
98	stdcall dword[ini_get_int],file_name,ini_sec_options,key_s_zoom,ini_def_s_zoom	98	stdcall dword[ini_get_int],file_name,ini_sec_options,key_s_zoom,ini_def_s_zoom
99	mov [scaled_zoom],eax	99	mov [scaled_zoom],eax
100	;à §¬¥à ª¢ ¤à â¨ª ¯«®áª®áâ¨ á¥ç¥¨ï	100	;à §¬¥à ª¢ ¤à â¨ª ¯«®áª®áâ¨ á¥ç¥¨ï
101	stdcall dword[ini_get_int],file_name,ini_sec_options,key_t_size,ini_def_t_size	101	stdcall dword[ini_get_int],file_name,ini_sec_options,key_t_size,ini_def_t_size
102	mov [tile_size],eax	102	mov [tile_size],eax
103		103
104	stdcall dword[ini_get_int],file_name,ini_sec_options,key_f_size,64	104	stdcall dword[ini_get_int],file_name,ini_sec_options,key_f_size,64
105	shl eax,10	105	shl eax,10
106	mov [max_open_file_size],eax	106	mov [max_open_file_size],eax
107		107
108	mov ecx,[scaled_zoom]	108	mov ecx,[scaled_zoom]
109	xor eax,eax	109	xor eax,eax
110	inc eax	110	inc eax
111	shl eax,cl	111	shl eax,cl
112	imul eax,[tile_size]	112	imul eax,[tile_size]
113	mov [buf_pl.w],eax	113	mov [buf_pl.w],eax
114	add eax,[tile_size]	114	add eax,[tile_size]
115	mov [buf_pl.h],eax	115	mov [buf_pl.h],eax
116		116
117		117
118	stdcall [buf2d_create], buf_0 ;á®§¤ ¨¥ ¡ãä¥à ¨§®¡à ¦¥¨ï	118	stdcall [buf2d_create], buf_0 ;á®§¤ ¨¥ ¡ãä¥à ¨§®¡à ¦¥¨ï
119	stdcall [buf2d_create], buf_0z ;á®§¤ ¨¥ ¡ãä¥à £«ã¡¨ë	119	stdcall [buf2d_create], buf_0z ;á®§¤ ¨¥ ¡ãä¥à £«ã¡¨ë
120	stdcall [buf2d_create], buf_pl ;á®§¤ ¨¥ ¡ãä¥à ¤«ï á¥ç¥¨ï	120	stdcall [buf2d_create], buf_pl ;á®§¤ ¨¥ ¡ãä¥à ¤«ï á¥ç¥¨ï
121		121
122	stdcall [buf2d_vox_brush_create], buf_vox, vox_6_7_z	122	stdcall [buf2d_vox_brush_create], buf_vox, vox_6_7_z
123		123
124	include_image_file 'toolbar_m.png', image_data_toolbar	124	include_image_file 'toolbar_m.png', image_data_toolbar
125		125
126	stdcall mem.Alloc,[max_open_file_size]	126	stdcall mem.Alloc,[max_open_file_size]
127	mov dword[open_file_vox],eax	127	mov dword[open_file_vox],eax
128	stdcall mem.Alloc,[max_open_file_size]	128	stdcall mem.Alloc,[max_open_file_size]
129	mov dword[moved_file_vox],eax	129	mov dword[moved_file_vox],eax
130		130
131	stdcall but_new_file, [open_file_vox]	131	stdcall but_new_file, [open_file_vox]
132	stdcall but_new_file, [moved_file_vox]	132	stdcall but_new_file, [moved_file_vox]
133	;¯à®¢¥àª ª®¬ ¤®© áâà®ª¨	133	;¯à®¢¥àª ª®¬ ¤®© áâà®ª¨
134	cmp dword[openfile_path],0	134	cmp dword[openfile_path],0
135	je @f	135	je @f
136	call but_open_file_cmd_lin	136	call but_open_file_cmd_lin
137	@@:	137	@@:
138		138
139	align 4	139	align 4
140	red_win:	140	red_win:
141	call draw_window	141	call draw_window
142		142
143	align 4	143	align 4
144	still:	144	still:
145	mcall SF_WAIT_EVENT	145	mcall SF_WAIT_EVENT
146		146
147	cmp al,1	147	cmp al,1
148	jz red_win	148	jz red_win
149	cmp al,2	149	cmp al,2
150	jz key	150	jz key
151	cmp al,3	151	cmp al,3
152	jz button	152	jz button
153	cmp al,6	153	cmp al,6
154	jne @f	154	jne @f
155	mcall SF_THREAD_INFO,procinfo,-1	155	mcall SF_THREAD_INFO,procinfo,-1
156	cmp ax,word[procinfo+4]	156	cmp ax,word[procinfo+4]
157	jne @f ;®ª® ¥ ªâ¨¢®	157	jne @f ;®ª® ¥ ªâ¨¢®
158	call mouse	158	call mouse
159	@@:	159	@@:
160	jmp still	160	jmp still
161		161
162	align 4	162	align 4
163	mouse:	163	mouse:
164	pushad	164	pushad
165	mcall SF_MOUSE_GET,SSF_BUTTON	165	mcall SF_MOUSE_GET,SSF_BUTTON
166	bt eax,1 ;right button	166	bt eax,1 ;right button
167	jnc @f	167	jnc @f
168	mcall SF_MOUSE_GET,SSF_WINDOW_POSITION	168	mcall SF_MOUSE_GET,SSF_WINDOW_POSITION
169	mov ebx,eax	169	mov ebx,eax
170	shr ebx,16	170	shr ebx,16
171	and eax,0xffff	171	and eax,0xffff
172	stdcall get_buf_color, buf_0	172	stdcall get_buf_color, buf_0
173	stdcall get_buf_color, buf_pl	173	stdcall get_buf_color, buf_pl
174	jmp .end_f	174	jmp .end_f
175	@@:	175	@@:
176	bt eax,0 ;left button	176	bt eax,0 ;left button
177	jnc .end_f	177	jnc .end_f
178	mcall SF_MOUSE_GET,SSF_WINDOW_POSITION	178	mcall SF_MOUSE_GET,SSF_WINDOW_POSITION
179	mov ebx,eax	179	mov ebx,eax
180	shr ebx,16	180	shr ebx,16
181	and eax,0xffff	181	and eax,0xffff
182		182
183	push eax ebx	183	push eax ebx
184	mov edx,[v_zoom]	184	mov edx,[v_zoom]
185	cmp edx,[scaled_zoom]	185	cmp edx,[scaled_zoom]
186	jle @f	186	jle @f
187	;à¥¦¨¬ ¬ áèâ ¡¨à®¢ ¨ï ¨§®¡à ¦¥¨ï	187	;à¥¦¨¬ ¬ áèâ ¡¨à®¢ ¨ï ¨§®¡à ¦¥¨ï
188	sub edx,[scaled_zoom]	188	sub edx,[scaled_zoom]
189	sub ax,word[buf_0.t]	189	sub ax,word[buf_0.t]
190	sub bx,word[buf_0.l]	190	sub bx,word[buf_0.l]
191	stdcall get_mouse_ev_scale, buf_vox, ebx, eax, [scaled_zoom],edx	191	stdcall get_mouse_ev_scale, buf_vox, ebx, eax, [scaled_zoom],edx
192	cmp eax,0	192	cmp eax,0
193	je @f	193	je @f
194	mov ebx,eax	194	mov ebx,eax
195	and eax,0x3fffffff	195	and eax,0x3fffffff
196	rol ebx,2	196	rol ebx,2
197	and ebx,3	197	and ebx,3
198	dec ebx	198	dec ebx
199		199
200	shl ebx,2	200	shl ebx,2
201	add ebx,cam_x	201	add ebx,cam_x
202	mov dword[ebx],eax ;change [cam_x] or [cam_y] or [cam_z]	202	mov dword[ebx],eax ;change [cam_x] or [cam_y] or [cam_z]
203	call draw_objects	203	call draw_objects
204		204
205	pop ebx eax	205	pop ebx eax
206	jmp .end_f	206	jmp .end_f
207	@@:	207	@@:
208	pop ebx eax	208	pop ebx eax
209		209
210		210
211	;eax - mouse coord y	211	;eax - mouse coord y
212	;ebx - mouse coord x	212	;ebx - mouse coord x
213	movzx edx,word[buf_pl.t]	213	movzx edx,word[buf_pl.t]
214	add edx,OT_MAP_Y	214	add edx,OT_MAP_Y
215	cmp eax,edx	215	cmp eax,edx
216	jl .end_f	216	jl .end_f
217	sub eax,edx	217	sub eax,edx
218	xor edx,edx	218	xor edx,edx
219	mov ecx,[tile_size] ;H	219	mov ecx,[tile_size] ;H
220	div ecx	220	div ecx
221	movzx edx,word[buf_pl.l]	221	movzx edx,word[buf_pl.l]
222	add edx,OT_MAP_X	222	add edx,OT_MAP_X
223	cmp ebx,edx	223	cmp ebx,edx
224	jl .end_f	224	jl .end_f
225	call convert_y ;¯à¥®¡à §®¢ ¨¥ ª®®à¤¨ âë y	225	call convert_y ;¯à¥®¡à §®¢ ¨¥ ª®®à¤¨ âë y
226	cmp eax,0	226	cmp eax,0
227	jge .end_0 ;®£à ¨ç¥¨¥ ¯® ¨¦¥© ª®®à¤¨ â¥ y	227	jge .end_0 ;®£à ¨ç¥¨¥ ¯® ¨¦¥© ª®®à¤¨ â¥ y
228	cmp eax,-1	228	cmp eax,-1
229	jne .end_f	229	jne .end_f
230	;¬¥ï¥¬ á¥ç¥¨¥, ¯®¯ «¨ ª¢ ¤à â¨ª	230	;¬¥ï¥¬ á¥ç¥¨¥, ¯®¯ «¨ ª¢ ¤à â¨ª
231	sub ebx,edx	231	sub ebx,edx
232	mov eax,ebx	232	mov eax,ebx
233	xor edx,edx	233	xor edx,edx
234	mov ecx,[tile_size] ;W	234	mov ecx,[tile_size] ;W
235	div ecx	235	div ecx
236	mov [n_plane],eax	236	mov [n_plane],eax
237	jmp .end_1	237	jmp .end_1
238	.end_0:	238	.end_0:
239	mov [v_cur_y],eax ;Y-coord	239	mov [v_cur_y],eax ;Y-coord
240	sub ebx,edx	240	sub ebx,edx
241	mov eax,ebx	241	mov eax,ebx
242	xor edx,edx	242	xor edx,edx
243	mov ecx,[tile_size] ;W	243	mov ecx,[tile_size] ;W
244	div ecx	244	div ecx
245	mov [v_cur_x],eax ;X-coord	245	mov [v_cur_x],eax ;X-coord
246		246
247	.end_1:	247	.end_1:
248	call draw_objects	248	call draw_objects
249	call draw_pok	249	call draw_pok
250	.end_f:	250	.end_f:
251	popad	251	popad
252	ret	252	ret
253		253
254	;input:	254	;input:
255	; eax - coord y	255	; eax - coord y
256	; ebx - coord x	256	; ebx - coord x
257	align 4	257	align 4
258	proc get_buf_color, buf:dword	258	proc get_buf_color, buf:dword
259	pushad	259	pushad
260	mov edi,[buf]	260	mov edi,[buf]
261	cmp ax,buf2d_t	261	cmp ax,buf2d_t
262	jl .end_f	262	jl .end_f
263	sub ax,buf2d_t	263	sub ax,buf2d_t
264	cmp eax,buf2d_h	264	cmp eax,buf2d_h
265	jg .end_f	265	jg .end_f
266	cmp bx,buf2d_l	266	cmp bx,buf2d_l
267	jl .end_f	267	jl .end_f
268	sub bx,buf2d_l	268	sub bx,buf2d_l
269	cmp ebx,buf2d_w	269	cmp ebx,buf2d_w
270	jg .end_f	270	jg .end_f
271	stdcall [buf2d_get_pixel], edi,ebx,eax	271	stdcall [buf2d_get_pixel], edi,ebx,eax
272	mov [v_color],eax	272	mov [v_color],eax
273	call on_change_color ;®â®¡à ¦ ¥¬ ¨§¬¥¥¨ï æ¢¥â	273	call on_change_color ;®â®¡à ¦ ¥¬ ¨§¬¥¥¨ï æ¢¥â
274	.end_f:	274	.end_f:
275	popad	275	popad
276	ret	276	ret
277	endp	277	endp
278		278
279	;¯à¥®¡à §®¢ë¢ ¥¬ ª®®à¤¨ âã y (§ ç¥¨¥ ¤®«¦® ã¢¥«¨ç¨¢ âìáï á ¨§ã ¢¢¥àå)	279	;¯à¥®¡à §®¢ë¢ ¥¬ ª®®à¤¨ âã y (§ ç¥¨¥ ¤®«¦® ã¢¥«¨ç¨¢ âìáï á ¨§ã ¢¢¥àå)
280	align 4	280	align 4
281	convert_y:	281	convert_y:
282	push ecx edx	282	push ecx edx
283	mov ecx,[v_zoom]	283	mov ecx,[v_zoom]
284	cmp ecx,[scaled_zoom]	284	cmp ecx,[scaled_zoom]
285	jle @f	285	jle @f
286	mov ecx,[scaled_zoom]	286	mov ecx,[scaled_zoom]
287	@@:	287	@@:
288	mov edx,1	288	mov edx,1
289	cmp ecx,1	289	cmp ecx,1
290	jl @f	290	jl @f
291	shl edx,cl	291	shl edx,cl
292	@@:	292	@@:
293	sub edx,eax	293	sub edx,eax
294	dec edx	294	dec edx
295	mov eax,edx	295	mov eax,edx
296	pop edx ecx	296	pop edx ecx
297	ret	297	ret
298		298
299	align 4	299	align 4
300	draw_window:	300	draw_window:
301	pushad	301	pushad
302	mcall SF_REDRAW,SSF_BEGIN_DRAW	302	mcall SF_REDRAW,SSF_BEGIN_DRAW
303		303
304	; * à¨á®¢ ¨¥ £« ¢®£® ®ª (¢ë¯®«ï¥âáï 1 à § ¯à¨ § ¯ãáª¥) *	304	; * à¨á®¢ ¨¥ £« ¢®£® ®ª (¢ë¯®«ï¥âáï 1 à § ¯à¨ § ¯ãáª¥) *
305	mov edx,[sc.work]	305	mov edx,[sc.work]
306	or edx,(3 shl 24)+0x30000000	306	or edx,(3 shl 24)+0x30000000
307	mcall SF_CREATE_WINDOW,dword[wnd_s_pos],dword[wnd_s_pos+4],,,caption	307	mcall SF_CREATE_WINDOW,dword[wnd_s_pos],dword[wnd_s_pos+4],,,caption
308		308
309	; * á®§¤ ¨¥ ª®¯®ª ¯ ¥«ì *	309	; * á®§¤ ¨¥ ª®¯®ª ¯ ¥«ì *
310	mov esi,[sc.work_button]	310	mov esi,[sc.work_button]
311	mcall SF_DEFINE_BUTTON,(5 shl 16)+20,(5 shl 16)+20,3	311	mcall SF_DEFINE_BUTTON,(5 shl 16)+20,(5 shl 16)+20,3
312		312
313	mov ebx,(30 shl 16)+20	313	mov ebx,(30 shl 16)+20
314	mov edx,4	314	mov edx,4
315	int 0x40	315	int 0x40
316	add ebx,25 shl 16	316	add ebx,25 shl 16
317	mov edx,5	317	mov edx,5
318	int 0x40	318	int 0x40
319	add ebx,30 shl 16	319	add ebx,30 shl 16
320	mov edx,6	320	mov edx,6
321	int 0x40	321	int 0x40
322	add ebx,25 shl 16	322	add ebx,25 shl 16
323	mov edx,7	323	mov edx,7
324	int 0x40	324	int 0x40
325	add ebx,25 shl 16	325	add ebx,25 shl 16
326	mov edx,8	326	mov edx,8
327	int 0x40	327	int 0x40
328	add ebx,25 shl 16	328	add ebx,25 shl 16
329	mov edx,9	329	mov edx,9
330	int 0x40	330	int 0x40
331	add ebx,25 shl 16	331	add ebx,25 shl 16
332	mov edx,10	332	mov edx,10
333	int 0x40	333	int 0x40
334	add ebx,25 shl 16	334	add ebx,25 shl 16
335	mov edx,11	335	mov edx,11
336	int 0x40	336	int 0x40
337	add ebx,25 shl 16	337	add ebx,25 shl 16
338	mov edx,12	338	mov edx,12
339	int 0x40	339	int 0x40
340	add ebx,25 shl 16	340	add ebx,25 shl 16
341	mov edx,13	341	mov edx,13
342	int 0x40	342	int 0x40
343	add ebx,25 shl 16	343	add ebx,25 shl 16
344	mov edx,14	344	mov edx,14
345	int 0x40	345	int 0x40
346	add ebx,25 shl 16	346	add ebx,25 shl 16
347	mov edx,15	347	mov edx,15
348	int 0x40	348	int 0x40
349	add ebx,25 shl 16	349	add ebx,25 shl 16
350	mov edx,16	350	mov edx,16
351	int 0x40	351	int 0x40
352	add ebx,25 shl 16	352	add ebx,25 shl 16
353	mov edx,17	353	mov edx,17
354	int 0x40	354	int 0x40
355	add ebx,25 shl 16	355	add ebx,25 shl 16
356	mov edx,18	356	mov edx,18
357	int 0x40	357	int 0x40
358	add ebx,25 shl 16	358	add ebx,25 shl 16
359	mov edx,19	359	mov edx,19
360	int 0x40	360	int 0x40
361	add ebx,25 shl 16	361	add ebx,25 shl 16
362	mov edx,20	362	mov edx,20
363	int 0x40	363	int 0x40
364		364
365	; * à¨á®¢ ¨¥ ¨ª®®ª ª®¯ª å *	365	; * à¨á®¢ ¨¥ ¨ª®®ª ª®¯ª å *
366	mov edx,(7 shl 16)+7 ;icon new	366	mov edx,(7 shl 16)+7 ;icon new
367	mcall SF_PUT_IMAGE,[image_data_toolbar],(16 shl 16)+16	367	mcall SF_PUT_IMAGE,[image_data_toolbar],(16 shl 16)+16
368		368
369	add ebx,IMAGE_TOOLBAR_ICON_SIZE	369	add ebx,IMAGE_TOOLBAR_ICON_SIZE
370	add edx,(25 shl 16) ;icon open	370	add edx,(25 shl 16) ;icon open
371	int 0x40	371	int 0x40
372	add ebx,IMAGE_TOOLBAR_ICON_SIZE	372	add ebx,IMAGE_TOOLBAR_ICON_SIZE
373	add edx,(25 shl 16) ;icon save	373	add edx,(25 shl 16) ;icon save
374	int 0x40	374	int 0x40
375		375
376	add ebx,IMAGE_TOOLBAR_ICON_SIZE	376	add ebx,IMAGE_TOOLBAR_ICON_SIZE
377	add edx,(30 shl 16) ;ã¢¥«¨ç. ¬ áèâ ¡	377	add edx,(30 shl 16) ;ã¢¥«¨ç. ¬ áèâ ¡
378	int 0x40	378	int 0x40
379	add ebx,IMAGE_TOOLBAR_ICON_SIZE	379	add ebx,IMAGE_TOOLBAR_ICON_SIZE
380	add edx,(25 shl 16) ;ã¬¥ìè. ¬ áèâ ¡	380	add edx,(25 shl 16) ;ã¬¥ìè. ¬ áèâ ¡
381	int 0x40	381	int 0x40
382	add ebx,IMAGE_TOOLBAR_ICON_SIZE	382	add ebx,IMAGE_TOOLBAR_ICON_SIZE
383	add edx,(25 shl 16) ;¯®¢®à®â 1	383	add edx,(25 shl 16) ;¯®¢®à®â 1
384	int 0x40	384	int 0x40
385	add ebx,IMAGE_TOOLBAR_ICON_SIZE	385	add ebx,IMAGE_TOOLBAR_ICON_SIZE
386	add edx,(25 shl 16) ;¯®¢®à®â 2	386	add edx,(25 shl 16) ;¯®¢®à®â 2
387	int 0x40	387	int 0x40
388	add ebx,IMAGE_TOOLBAR_ICON_SIZE	388	add ebx,IMAGE_TOOLBAR_ICON_SIZE
389	add edx,(25 shl 16) ;á¤¢¨£ ¯«®áª®áâ¨ +	389	add edx,(25 shl 16) ;á¤¢¨£ ¯«®áª®áâ¨ +
390	int 0x40	390	int 0x40
391	add ebx,IMAGE_TOOLBAR_ICON_SIZE	391	add ebx,IMAGE_TOOLBAR_ICON_SIZE
392	add edx,(25 shl 16) ;á¤¢¨£ ¯«®áª®áâ¨ -	392	add edx,(25 shl 16) ;á¤¢¨£ ¯«®áª®áâ¨ -
393	int 0x40	393	int 0x40
394	add ebx,IMAGE_TOOLBAR_ICON_SIZE	394	add ebx,IMAGE_TOOLBAR_ICON_SIZE
395	add edx,(25 shl 16) ;®á¢¥é¥¨¥	395	add edx,(25 shl 16) ;®á¢¥é¥¨¥
396	int 0x40	396	int 0x40
397	add ebx,IMAGE_TOOLBAR_ICON_SIZE	397	add ebx,IMAGE_TOOLBAR_ICON_SIZE
398	add edx,(25 shl 16) ;à¥¤¥à 2*2	398	add edx,(25 shl 16) ;à¥¤¥à 2*2
399	int 0x40	399	int 0x40
400	add ebx,IMAGE_TOOLBAR_ICON_SIZE	400	add ebx,IMAGE_TOOLBAR_ICON_SIZE
401	add edx,(25 shl 16) ;	401	add edx,(25 shl 16) ;
402	int 0x40	402	int 0x40
403	add ebx,IMAGE_TOOLBAR_ICON_SIZE	403	add ebx,IMAGE_TOOLBAR_ICON_SIZE
404	add edx,(25 shl 16) ;	404	add edx,(25 shl 16) ;
405	int 0x40	405	int 0x40
406	add ebx,IMAGE_TOOLBAR_ICON_SIZE	406	add ebx,IMAGE_TOOLBAR_ICON_SIZE
407	add edx,(25 shl 16) ;	407	add edx,(25 shl 16) ;
408	int 0x40	408	int 0x40
409	add ebx,IMAGE_TOOLBAR_ICON_SIZE	409	add ebx,IMAGE_TOOLBAR_ICON_SIZE
410	add edx,(25 shl 16) ;	410	add edx,(25 shl 16) ;
411	int 0x40	411	int 0x40
412	add ebx,IMAGE_TOOLBAR_ICON_SIZE	412	add ebx,IMAGE_TOOLBAR_ICON_SIZE
413	add edx,(25 shl 16) ;	413	add edx,(25 shl 16) ;
414	int 0x40	414	int 0x40
415	add ebx,IMAGE_TOOLBAR_ICON_SIZE	415	add ebx,IMAGE_TOOLBAR_ICON_SIZE
416	add edx,(25 shl 16) ;	416	add edx,(25 shl 16) ;
417	int 0x40	417	int 0x40
418	add ebx,IMAGE_TOOLBAR_ICON_SIZE	418	add ebx,IMAGE_TOOLBAR_ICON_SIZE
419	add edx,(25 shl 16) ;	419	add edx,(25 shl 16) ;
420	int 0x40	420	int 0x40
421		421
422	; * à¨á®¢ ¨¥ ¡ãä¥à®¢ *	422	; * à¨á®¢ ¨¥ ¡ãä¥à®¢ *
423	call draw_objects	423	call draw_objects
424	call draw_pok	424	call draw_pok
425		425
426	mcall SF_REDRAW,SSF_END_DRAW	426	mcall SF_REDRAW,SSF_END_DRAW
427	popad	427	popad
428	ret	428	ret
429		429
430	align 4	430	align 4
431	draw_pok:	431	draw_pok:
432	mov esi,[sc.work_button_text]	432	mov esi,[sc.work_button_text]
433	or esi,(1 shl 30)	433	or esi,(1 shl 30)
434	mov edi,[sc.work_button]	434	mov edi,[sc.work_button]
435	mcall SF_DRAW_NUMBER, (3 shl 16)+(1 shl 31), [v_zoom], ((350+6*9) shl 16)+OT_CAPT_Y_COLOR+2 ;¬ áèâ ¡	435	mcall SF_DRAW_NUMBER, (3 shl 16)+(1 shl 31), [v_zoom], ((350+6*9) shl 16)+OT_CAPT_Y_COLOR+2 ;¬ áèâ ¡
436	mov ecx,[n_plane]	436	mov ecx,[n_plane]
437	add edx,115 shl 16 ;9	437	add edx,115 shl 16 ;9
438	int 0x40 ;®¬¥à á¥ç¥¨ï	438	int 0x40 ;®¬¥à á¥ç¥¨ï
439		439
440	;®¡®¢«¥¨¥ ¯ à ¬¥âà®¢ ªãàá®à	440	;®¡®¢«¥¨¥ ¯ à ¬¥âà®¢ ªãàá®à
441	mov dword[txt_curor.size],0	441	mov dword[txt_curor.size],0
442	mov eax,dword[v_cur_x]	442	mov eax,dword[v_cur_x]
443	mov edi,txt_curor.size	443	mov edi,txt_curor.size
444	stdcall convert_int_to_str,10	444	stdcall convert_int_to_str,10
445	stdcall str_cat, edi,txt_mull	445	stdcall str_cat, edi,txt_mull
446	mov eax,dword[v_cur_y]	446	mov eax,dword[v_cur_y]
447	mov edi,txt_buf	447	mov edi,txt_buf
448	stdcall convert_int_to_str,16	448	stdcall convert_int_to_str,16
449	stdcall str_cat, txt_curor.size,edi	449	stdcall str_cat, txt_curor.size,edi
450	stdcall str_cat, txt_curor.size,txt_space ;§ ¢¥àè îé¨© ¯à®¡¥«	450	stdcall str_cat, txt_curor.size,txt_space ;§ ¢¥àè îé¨© ¯à®¡¥«
451		451
452	;®¡®¢«¥¨¥ ¯ à ¬¥âà®¢ ª¨áâ¨	452	;®¡®¢«¥¨¥ ¯ à ¬¥âà®¢ ª¨áâ¨
453	mov dword[txt_mov_offs.size],0	453	mov dword[txt_mov_offs.size],0
454	mov eax,dword[mov_x]	454	mov eax,dword[mov_x]
455	mov edi,txt_mov_offs.size	455	mov edi,txt_mov_offs.size
456	stdcall convert_int_to_str,30	456	stdcall convert_int_to_str,30
457	stdcall str_cat, edi,txt_space	457	stdcall str_cat, edi,txt_space
458	mov eax,dword[mov_y]	458	mov eax,dword[mov_y]
459	mov edi,txt_buf	459	mov edi,txt_buf
460	stdcall convert_int_to_str,16	460	stdcall convert_int_to_str,16
461	stdcall str_cat, txt_mov_offs.size,edi	461	stdcall str_cat, txt_mov_offs.size,edi
462	stdcall str_cat, txt_mov_offs.size,txt_space	462	stdcall str_cat, txt_mov_offs.size,txt_space
463	mov eax,dword[mov_z]	463	mov eax,dword[mov_z]
464	mov edi,txt_buf	464	mov edi,txt_buf
465	stdcall convert_int_to_str,16	465	stdcall convert_int_to_str,16
466	stdcall str_cat, txt_mov_offs.size,edi	466	stdcall str_cat, txt_mov_offs.size,edi
467	stdcall str_cat, txt_mov_offs.size,txt_space ;§ ¢¥àè îé¨© ¯à®¡¥«	467	stdcall str_cat, txt_mov_offs.size,txt_space ;§ ¢¥àè îé¨© ¯à®¡¥«
468		468
469	;à¨á®¢ ¨¥ â¥ªáâ	469	;à¨á®¢ ¨¥ â¥ªáâ
470	mov ecx,[sc.work_text]	470	mov ecx,[sc.work_text]
471	or ecx,0x80000000 ;or (1 shl 30)	471	or ecx,0x80000000 ;or (1 shl 30)
472	mcall SF_DRAW_TEXT, (OT_CAPT_X_COLOR shl 16)+OT_CAPT_Y_COLOR+2,,txt_color	472	mcall SF_DRAW_TEXT, (OT_CAPT_X_COLOR shl 16)+OT_CAPT_Y_COLOR+2,,txt_color
473		473
474	mov edx,txt_curor	474	mov edx,txt_curor
475	add ebx,115 shl 16	475	add ebx,115 shl 16
476	or ecx,(1 shl 30)	476	or ecx,(1 shl 30)
477	mov edi,[sc.work]	477	mov edi,[sc.work]
478	int 0x40	478	int 0x40
479		479
480	mov edx,txt_mov_offs	480	mov edx,txt_mov_offs
481	add ebx,115 shl 16	481	add ebx,115 shl 16
482	int 0x40	482	int 0x40
483		483
484	mov edx,txt_zoom	484	mov edx,txt_zoom
485	add ebx,115 shl 16	485	add ebx,115 shl 16
486	int 0x40	486	int 0x40
487		487
488	mov edx,txt_n_plane	488	mov edx,txt_n_plane
489	add ebx,115 shl 16	489	add ebx,115 shl 16
490	int 0x40	490	int 0x40
491		491
492	call on_change_color	492	call on_change_color
493	ret	493	ret
494		494
495	align 4	495	align 4
496	on_change_color:	496	on_change_color:
497	pushad	497	pushad
498	mov ebx,((OT_CAPT_X_COLOR+35) shl 16)+16 ;¯® ®á¨ x	498	mov ebx,((OT_CAPT_X_COLOR+35) shl 16)+16 ;¯® ®á¨ x
499	mov ecx,(OT_CAPT_Y_COLOR shl 16)+12 ;¯® ®á¨ y	499	mov ecx,(OT_CAPT_Y_COLOR shl 16)+12 ;¯® ®á¨ y
500	mcall SF_DRAW_RECT,,,[v_color]	500	mcall SF_DRAW_RECT,,,[v_color]

Subversion Repositories Kolibri OS

(root)/programs/media/voxel_editor/utilites/vox_mover.asm – Rev 8442 → 9587