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


use32
	org 0
	db 'MENUET01' ;¨¤¥­â¨ä. ¨á¯®«­ï¥¬®£® ä ©«  ¢á¥£¤  8 ¡ ©â
	dd 1,start,i_end,mem,stacktop,openfile_path,sys_path
 
include '../../../../programs/macros.inc'
include '../../../../programs/proc32.inc'
include '../../../../programs/KOSfuncs.inc'
include '../../../../programs/load_img.inc'
include '../trunk/str.inc'
include 'lang.inc'
 
vox_offs_tree_table equ 4
vox_offs_data equ 12
txt_buf rb 8
include '../trunk/vox_rotate.inc'
 
@use_library_mem mem.Alloc,mem.Free,mem.ReAlloc,dll.Load
if lang eq ru
caption db '®§¤ â¥«ì ¢®ªá¥«¥© 04.05.20',0 ;¯®¤¯¨áì ®ª­ 
else
caption db 'Voxel creator 04.05.20',0
end if
 
BUF_STRUCT_SIZE equ 21
buf2d_data equ dword[edi] ;¤ ­­ë¥ ¡ãä¥à  ¨§®¡à ¦¥­¨ï
buf2d_w equ dword[edi+8] ;è¨à¨­  ¡ãä¥à 
buf2d_h equ dword[edi+12] ;¢ëá®â  ¡ãä¥à 
buf2d_l equ word[edi+4]
buf2d_t equ word[edi+6] ;®âáâã¯ á¢¥àåã
buf2d_size_lt equ dword[edi+4] ;®âáâã¯ á«¥¢  ¨ á¯à ¢  ¤«ï ¡ãä¥à 
buf2d_color equ dword[edi+16] ;æ¢¥â ä®­  ¡ãä¥à 
buf2d_bits equ byte[edi+20] ;ª®«¨ç¥áâ¢® ¡¨â ¢ 1-© â®çª¥ ¨§®¡à ¦¥­¨ï
 
 
 
 
run_file_70 FileInfoBlock
vox_obj_size dd 0 ;à §¬¥à ¢®ªá¥«ì­®£® ®¡ê¥ªâ  (¤«ï ãáª®à¥­¨ï ¢áâ ¢ª¨)
txt_space db ' ',0
if lang eq ru
txt_pref db ' ¡ ',0,' ¡',0,' ¡',0,' ¡',0 ;¯à¨áâ ¢ª¨: ª¨«®, ¬¥£ , £¨£ 
txt_f_size: db ' §¬¥à: '
else
txt_pref db ' b ',0,' Kb',0,' Mb',0,' Gb',0 ;¯à¨áâ ¢ª¨: ª¨«®, ¬¥£ , £¨£ 
txt_f_size: db 'Size: '
end if
.size: rb 16
 
IMAGE_TOOLBAR_ICON_SIZE equ 16*16*3
image_data_toolbar dd 0
 
max_open_file_size equ 1024*1024 ;1 Mb
 
align 4
start:
	load_libraries l_libs_start,l_libs_end
	;¯à®¢¥àª  ­  áª®«ìª® ã¤ ç­® § £ã§¨« áì ¡¨¡«¨®â¥ª 
	mov	ebp,lib_0
	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,0x27
	stdcall [OpenDialog_Init],OpenDialog_data ;¯®¤£®â®¢ª  ¤¨ «®£ 
 
	stdcall [buf2d_create], buf_0 ;á®§¤ ­¨¥ ¡ãä¥à 
	stdcall [buf2d_create], buf_0z
	stdcall [buf2d_vox_brush_create], buf_vox, vox_6_7_z
 
	include_image_file 'toolbar.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[open_file_img],eax
 
	mcall SF_SYSTEM_GET,SSF_TIME_COUNT
	mov [last_time],eax
	;¯à®¢¥àª  ª®¬ ­¤­®© áâà®ª¨
	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_SYSTEM_GET,SSF_TIME_COUNT
	mov ebx,[last_time]
	add ebx,10 ;§ ¤¥à¦ª 
	cmp ebx,eax
	jge @f
		mov ebx,eax
	@@:
	sub ebx,eax
	mcall SF_WAIT_EVENT_TIMEOUT
	cmp eax,0
	je timer_funct
 
	cmp al,1
	jz red_win
	cmp al,2
	jz key
	cmp al,3
	jz button
 
	jmp still
 
align 4
timer_funct:
	cmp byte[calc],0
	je still
 
	pushad
	mcall SF_SYSTEM_GET,SSF_TIME_COUNT
	mov [last_time],eax
 
	; áª¨¤ë¢ ¥¬ ãª § â¥«¨ ¡ãä¥à®¢ buf_npl_p, buf_npl, buf_npl_n
	mov edi,buf_npl_p
	mov eax,buf2d_data
	mov edi,buf_npl
	mov ebx,buf2d_data
	mov edi,buf_npl_n
	mov ecx,buf2d_data
	; change buffer data pointers
	mov buf2d_data,eax
	mov edi,buf_npl_p
	mov buf2d_data,ebx
	mov edi,buf_npl
	mov buf2d_data,ecx
 
	mov eax,[n_plane]
	mov ebx,buf2d_w
	dec ebx
 
	cmp ebx,eax
	jg @f
		stdcall create_obj_from_plane,buf_npl,eax ;á®§¤ ¥¬ § ¢¥àè îé¥¥ á¥ç¥­¨¥
		;¢ë¢®¤ ª®­¥ç­®£® à¥§ã«ìâ â 
		call draw_object
		mov byte[calc],0
		jmp .end_f
	@@:
 
	inc eax
	stdcall create_plane, buf_npl_n,eax
 
	; á®§¤ ­¨¥ ¢®áª¥«ì­®£® á¥ç¥­¨ï ­  ®á­®¢¥ ¡ãä¥à  buf_npl
	mov edi,buf_npl
	mov edx,[bby_min] ;0
	.cycle_0:
	mov ecx,[btx_min] ;0
	.cycle_1:
		stdcall [buf2d_get_pixel], edi,ecx,edx
		cmp eax,buf2d_color
		je @f
			mov esi,eax
			call need_node
			cmp eax,buf2d_color
			jne @f ;®âá¥¨¢ ¥¬ ¢­ãâà¥­­¨¥ ¢®ªá¥«¨, ¤«ï ®¯â¨¬¨§ æ¨¨ ¬®¤¥«¨
			mov eax,ebx
			sub eax,edx
			stdcall buf2d_vox_obj_create_node, [open_file_vox],ecx,[n_plane],\
				eax,[k_scale],esi
		@@:
		inc ecx
		cmp ecx,ebx
		jle .cycle_1
		inc edx
		cmp edx,ebx
		jle .cycle_0
 
	stdcall [buf2d_draw], buf_npl
	inc dword[n_plane] ;¯¥à¥¬¥é ¥¬ ¯«®áª®áâì á¥ç¥­¨ï
	call draw_pok
	.end_f:
	popad
	jmp still
 
align 4
proc create_plane, buf_img:dword, n_plane:dword
	pushad
	; ª®¯¨àã¥¬ «¨æ¥¢®¥ ¨§®¡à ¦¥­¨¥ ¢ ¡ãä¥à buf_img
	; bby_min - ¨á¯®«ì§ã¥¬ ¤«ï ®¯â¨¬¨§ æ¨¨ (¥á«¨ á¢¥àåã ¨§®¡à ¦¥­¨¥ ¯ãáâ®¥)
	mov eax,[bby_min]
	mov esi,buf_i2
	mov esi,[esi] ;buf2d_data
	mov edi,[buf_img]
	mov ecx,buf2d_w
	imul eax,ecx
	mov ebx,ecx
	imul ecx,ebx
	sub ecx,eax
	lea ecx,[ecx+ecx*2]
	mov edi,buf2d_data
	lea eax,[eax+eax*2]
	add edi,eax
	add esi,eax
	cld
	rep movsb
 
	mov ecx,ebx
	dec ebx
	mov edi,buf_i0
	.cycle_0:
		mov eax,ebx
		sub eax,[n_plane] ;eax - ¯¥à¥¢¥à­ãâ ï ª®®à¤¨­ â  n_plane
		stdcall [buf2d_get_pixel], edi,ecx,eax ;[n_plane]
		cmp eax,buf2d_color
		jne @f
			;¢ëç¥àª¨¢ ­¨¥ ¢¥àâ¨ª «ì­®© «¨­¨¨ ¨§ á¥ç¥­¨ï buf_img
			stdcall [buf2d_line], [buf_img],ecx,[bby_min],ecx,ebx, buf2d_color
			jmp .end_1
		@@:
			mov edx,[bby_min] ;xor edx,edx
			mov esi,eax
			.cycle_1: ;æ¨ª« ¤«ï ­ «®¦¥­¨ï ¢¥àå­¥© â¥ªáâãàë
			stdcall [buf2d_get_pixel], [buf_img],ecx,edx
			cmp eax, buf2d_color
			je .end_0
				stdcall [buf2d_set_pixel], [buf_img],ecx,edx, esi ;­ «®¦¥­¨¥ ¢¥àå­¥© â¥ªáâãàë
				jmp .end_1
			.end_0:
			inc edx
			cmp edx,ebx
			jle .cycle_1
		.end_1:
		loop .cycle_0
 
	;£®à¨§®­â «ì­ë¥ «¨­¨¨ ­  ®á­®¢¥ ¡®ª®¢®© £à ­¨
	mov ecx,[bby_min]
	mov edi,buf_i1
	.cycle_2:
		stdcall [buf2d_get_pixel], edi,[n_plane],ecx
		cmp eax,buf2d_color
		jne @f
			;¢ëç¥àª¨¢ ­¨¥ £®à¨§®­â «ì­®© «¨­¨¨ ¨§ á¥ç¥­¨ï buf_img
			stdcall [buf2d_line], [buf_img],[btx_min],ecx,[btx_max],ecx, buf2d_color
			jmp .end_3
		@@:
			mov edx,[btx_max] ;ebx
			mov esi,eax
			.cycle_3: ;æ¨ª« ¤«ï ­ «®¦¥­¨ï ¡®ª®¢®© â¥ªáâãàë
			stdcall [buf2d_get_pixel], [buf_img],edx,ecx
			cmp eax, buf2d_color
			je .end_2
				stdcall [buf2d_set_pixel], [buf_img],edx,ecx, esi ;­ «®¦¥­¨¥ ¡®ª®¢®© â¥ªáâãàë
				jmp .end_3
			.end_2:
			dec edx
			cmp edx,[btx_min]
			jge .cycle_3
		.end_3:
		inc ecx
		cmp ecx,ebx
		jle .cycle_2
	popad
	ret
endp
 
align 4
proc create_obj_from_plane, buf_img:dword, n_plane:dword
pushad
	; á®§¤ ­¨¥ ¢®áª¥«ì­®£® á¥ç¥­¨ï ­  ®á­®¢¥ ¡ãä¥à  buf_img
	mov edi,[buf_img]
	mov ebx,buf2d_w
	dec ebx
	mov edx,[bby_min] ;0
	.cycle_0:
	mov ecx,[btx_min] ;0
	.cycle_1:
		stdcall [buf2d_get_pixel], edi,ecx,edx
		cmp eax,buf2d_color
		je @f
			mov esi,eax
			;call need_node
			;cmp eax,buf2d_color
			;jne @f ;®âá¥¨¢ ¥¬ ¢­ãâà¥­­¨¥ ¢®ªá¥«¨, ¤«ï ®¯â¨¬¨§ æ¨¨ ¬®¤¥«¨
			mov eax,ebx
			sub eax,edx
			stdcall buf2d_vox_obj_create_node, [open_file_vox],ecx,[n_plane],\
				eax,[k_scale],esi
		@@:
		inc ecx
		cmp ecx,ebx
		jle .cycle_1
		inc edx
		cmp edx,ebx
		jle .cycle_0
	ret
popad
endp
 
;description:
; äã­ªæ¨ï ¯à®¢¥àï¥â ­ã¦­® «¨ ®âá¥¨¢ âì ¢®ªá¥«ì á ª®®à¤¨­ â ¬¨ [n_plane],ecx,edx
;input:
; ebx = max size y - 1
;output:
; eax = buf2d_color if node need
align 4
need_node:
	mov eax,buf2d_color
	cmp ecx,[btx_min] ;0
	jle .end_f
	cmp ecx,[btx_max] ;0
	jge .end_f
	cmp edx,[bby_min] ;0
	jle .end_f
	cmp edx,ebx ;max-1
	jge .end_f
		push ecx edx
		stdcall [buf2d_get_pixel], buf_npl_p,ecx,edx ;¯à®¢¥àª  ¯à¥¤ë¤ãé¥£® á¥ç¥­¨ï
		cmp eax,buf2d_color
		je @f
		stdcall [buf2d_get_pixel], buf_npl_n,ecx,edx ;¯à®¢¥àª  ¯®á«¥¤ãîé¥£® á¥ç¥­¨ï
		cmp eax,buf2d_color
		je @f
		dec ecx
		stdcall [buf2d_get_pixel], edi,ecx,edx
		cmp eax,buf2d_color
		je @f
		add ecx,2
		stdcall [buf2d_get_pixel], edi,ecx,edx
		cmp eax,buf2d_color
		je @f
		dec ecx
		dec edx
		stdcall [buf2d_get_pixel], edi,ecx,edx
		cmp eax,buf2d_color
		je @f
		add edx,2
		stdcall [buf2d_get_pixel], edi,ecx,edx
		;cmp eax,buf2d_color
		;je @f
		@@:
		pop edx ecx
	.end_f:
	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,(20 shl 16)+410,(20 shl 16)+520,,,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
 
	mov ebx,(55 shl 16)+20
	mov edx,5
	int 0x40
 
	mov ebx,(85 shl 16)+20
	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
 
	; *** à¨á®¢ ­¨¥ ¨ª®­®ª ­  ª­®¯ª å ***
	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) ;
	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_buffers
	call draw_pok
 
	mcall SF_REDRAW,SSF_END_DRAW
popad
	ret
 
align 4
draw_buffers:
	; *** à¨á®¢ ­¨¥ ¡ãä¥à  ***
	stdcall [buf2d_draw], buf_0
	stdcall [buf2d_draw], buf_i0
	stdcall [buf2d_draw], buf_i1
	stdcall [buf2d_draw], buf_i2
	ret
 
align 4
draw_pok:
	;®¡­®¢«¥­¨¥ ¯®¤¯¨á¨ à §¬¥à  ä ©« 
	mov edi,txt_f_size.size
	mov eax,dword[vox_obj_size]
	mov ebx,txt_pref
	.cycle:
		cmp eax,1024
		jl @f
		shr eax,10
		add ebx,4
		jmp .cycle
	@@:
 
	stdcall convert_int_to_str, 16
	stdcall str_cat, edi,ebx
	stdcall str_cat, edi,txt_space ;§ ¢¥àè îé¨© ¯à®¡¥«
 
	;à¨á®¢ ­¨¥ â¥ªáâ 
	mov ecx,[sc.work_text]
	or  ecx,0x80000000 or (1 shl 30)
	mov edi,[sc.work] ;æ¢¥â ä®­  ®ª­ 
	mcall SF_DRAW_TEXT,(275 shl 16)+7,,txt_f_size
 
	ret
 
align 4
key:
	mcall SF_GET_KEY
	jmp still
 
 
align 4
button:
	mcall SF_GET_BUTTON
	cmp ah,3
	jne @f
		call but_new_file
		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_1
		jmp still
	@@:
	cmp ah,7
	jne @f
		call but_2
		jmp still
	@@:
	cmp ah,8
	jne @f
		call but_3
		jmp still
	@@:
	cmp ah,9
	jne @f
		stdcall but_run, 0
		jmp still
	@@:
	cmp ah,10
	jne @f
		stdcall but_run, 1
		jmp still
	@@:
	cmp ah,11
	jne @f
		call but_stop
		jmp still
	@@:
	cmp ah,12
	jne @f
		call but_rot_z
		jmp still
	@@:
	cmp ah,1
	jne still
.exit:
	stdcall [buf2d_delete],buf_0
	stdcall [buf2d_delete],buf_0z
	stdcall [buf2d_vox_brush_delete],buf_vox
	stdcall [buf2d_delete],buf_i0
	stdcall [buf2d_delete],buf_i1
	stdcall [buf2d_delete],buf_i2
	stdcall [buf2d_delete],buf_npl_p
	stdcall [buf2d_delete],buf_npl
	stdcall [buf2d_delete],buf_npl_n
	stdcall mem.Free,[image_data_toolbar]
	stdcall mem.Free,[open_file_vox]
	stdcall mem.Free,[open_file_img]
	mcall SF_TERMINATE_PROCESS
 
 
align 4
vox_new_data:
	db 2,0,0,0
	db 000b,001b,010b,011b, 100b,101b,110b,111b ;default table
	dd 0 ;null node
 
align 4
proc but_new_file uses ecx edi esi
	mov ecx,vox_offs_data+4
	mov [vox_obj_size],ecx
	mov esi,vox_new_data
	mov edi,[open_file_vox]
	cld
	rep movsb
	ret
endp
 
align 4
open_file_vox dd 0 ;ãª § â¥«ì ­  ¯ ¬ïâì ¤«ï ®âªàëâ¨ï ä ©«®¢
open_file_img dd 0 ;ãª § â¥«ì ­  ¯ ¬ïâì ¤«ï ®âªàëâ¨ï â¥ªáâãà
 
align 4
but_open_file:
	pushad
	copy_path open_dialog_name,communication_area_default_path,file_name,0
	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
	mov [run_file_70.Count], dword max_open_file_size
	m2m [run_file_70.Buffer],dword[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
		; ¯à®¢¥àª  ­  ¯à ¢¨«ì­®áâì ¢®ªá¥«ì­®£® ä®à¬ â 
		mov edi,[open_file_vox]
		add edi,vox_offs_tree_table
		xor bx,bx
		mov ecx,8
		cld
		@@:
			movzx ax,byte[edi]
			add bx,ax
			inc edi
			loop @b
		cmp bx,28 ;28=0+1+2+...+7
		jne .err_open
 
		mcall SF_SET_CAPTION,1,openfile_path
		stdcall buf2d_vox_obj_get_size,[open_file_vox]
		mov [vox_obj_size],eax
		call draw_object
		
		jmp .end_open_file
	.err_open:
		call but_new_file
		stdcall [mb_create],msgbox_4,thread
	.end_open_file:
	popad
	ret
 
align 4
but_save_file:
	pushad
		copy_path open_dialog_name,communication_area_default_path,file_name,0
		mov [OpenDialog_data.type],1
		stdcall [OpenDialog_Start],OpenDialog_data
		cmp [OpenDialog_data.status],2
		je .end_save_file
		;ª®¤ ¯à¨ ã¤ ç­®¬ ®âªàëâ¨¨ ¤¨ «®£ 
 
		mov eax,6 ;dword[v_zoom] ;§ ¤ ¥¬ ¬ áèâ ¡ ¯® ã¬®«ç ­¨î
		mov ebx,[open_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[open_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_1:
	stdcall open_image_in_buf, buf_i0
	ret
 
align 4
but_2:
	stdcall open_image_in_buf, buf_i1
	call set_buf_tabs
	ret
 
align 4
but_3:
	stdcall open_image_in_buf, buf_i2
	call set_buf_tabs
	ret
 
;description:
; ¢ § ¢¨á¨¬®áâ¨ ®â è¨à¨­ë 1-£® ¡ãä¥à  ãáâ ­ ¢«¨¢ ¥¬ ®âáâã¯ë ¤«ï 2-£® ¨ 3-£® ¡ãä¥à®¢
align 4
set_buf_tabs:
push eax ebx edi
	mov edi,buf_i0
	cmp buf2d_data,0
	je @f
		movzx eax,buf2d_l
		mov ebx,buf2d_w
		cmp ebx,128
		jle .end_0
			mov ebx,128
		.end_0:
		mov edi,buf_i1
		mov buf2d_l,ax
		add buf2d_l,bx
		add buf2d_l,2
		shl ebx,1
		mov edi,buf_i2
		mov buf2d_l,ax
		add buf2d_l,bx
		add buf2d_l,4
	@@:	
pop edi ebx eax
	ret
 
align 4
get_scale:
push eax edi
	mov edi,buf_i0
	mov eax,buf2d_w
 
	mov dword[k_scale],-1
	.cycle_s:
	cmp eax,0
	je @f
		shr eax,1
		inc dword[k_scale]
		jmp .cycle_s
	@@:
pop edi eax
	ret
 
align 4
proc set_borders uses eax ebx ecx edx edi
	mov ecx,dword[k_scale]
	mov edx,1
	shl edx,cl
 
	;®¯à¥¤¥«ï¥¬ ¬¨­¨¬ «ì­ãî ª®®à¤¨­ âã y ­  «¨æ¥¢®© £à ­¨
	mov edi,buf_i2
	mov dword[bby_min],0
	xor ecx,ecx
	.cycle_0:
	xor ebx,ebx
	.cycle_1:
		stdcall [buf2d_get_pixel],edi,ebx,ecx
		cmp eax,buf2d_color
		jne @f
		inc ebx
		cmp ebx,edx
		jl .cycle_1
		inc dword[bby_min]
		inc ecx
		cmp ecx,edx
		jl .cycle_0
	@@:
 
	;®¯à¥¤¥«ï¥¬ ¬¨­¨¬ «ì­ãî ª®®à¤¨­ âã x ­  «¨æ¥¢®© £à ­¨
	mov dword[btx_min],0
	xor ebx,ebx
	.cycle_2:
	mov ecx,[bby_min]
	.cycle_3:
		stdcall [buf2d_get_pixel],edi,ebx,ecx
		cmp eax,buf2d_color
		jne @f
		inc ecx
		cmp ecx,edx
		jl .cycle_3
		inc dword[btx_min]
		inc ebx
		cmp ebx,edx
		jl .cycle_2
	@@:
 
	;®¯à¥¤¥«ï¥¬ ¬ ªá¨¬ «ì­ãî ª®®à¤¨­ âã x ­  «¨æ¥¢®© £à ­¨
	mov [btx_max],edx
	dec dword[btx_max]
	mov ebx,[btx_max]
	.cycle_4:
	mov ecx,[bby_min]
	.cycle_5:
		stdcall [buf2d_get_pixel],edi,ebx,ecx
		cmp eax,buf2d_color
		jne @f
		inc ecx
		cmp ecx,edx
		jl .cycle_5
		dec dword[btx_max]
		dec ebx
		cmp ebx,[btx_min]
		jg .cycle_4
	@@:
	
	;stdcall [buf2d_line], edi, 0,[bby_min],50,[bby_min],255
	ret
endp
 
align 4
btx_min dd 0 ;¡ãä¥à ¢¥àå­¨© ¬¨­. x
btx_max dd 0
bty_min dd 0 ;¡ãä¥à ¢¥àå­¨© ¬¨­. y
bty_max dd 0
;bbx_min dd 0
;bbx_max dd 0
bby_min dd 0 ;¡ãä¥à ¡®ª®¢®© ¬¨­. y
bby_max dd 0
k_scale dd 0
n_plane dd 0
 
calc db 0 ;¥á«¨ =1, â® ¨¤¥â á®§¤ ­¨¥ ®¡ê¥ªâ 
 
; á®§¤ ­¨¥ ¢®ªá¥«ï ¢ 3 íâ ¯ :
; 1) ¨é¥¬ ¬¥áâ® ¢ áâàãªâãà¥ ¤¥à¥¢ , ªã¤  ­ ¤® ¢áâ ¢¨âì (¥á«¨ ¢¥â¢ì áãé¥áâ¢ã¥â, 2-© íâ ¯ ¯à®¯ãáª ¥¬)
; 2) ¢áâ ¢«ï¥¬ ­®¢ãî ¢¥â¢ì á ¢®ªá¥«¥¬ (3-© íâ ¯ ã¦¥ ­¥ ¤¥« ¥¬)
; 3) ¬¥­ï¥¬ æ¢¥â ¢®ªá¥«ï
align 4
proc buf2d_vox_obj_create_node, v_obj:dword,coord_x:dword,coord_y:dword,\
coord_z:dword,k_scale:dword,color:dword
pushad
locals
	p_node dd 0 ;à®¤¨â¥«ìáª¨© ã§¥«
endl
 
	mov edi,[v_obj]
	add edi,vox_offs_data
	mov esi,[k_scale]
	cmp esi,1
	jl .change
	; *** (1) ***
	.found:
	stdcall vox_obj_get_node_position, [v_obj],[coord_x],[coord_y],[coord_z],esi
	movzx bx,byte[edi+3]
	mov [p_node],edi
	add edi,4
 
	cmp eax,0
	je .end_1
	mov ecx,eax
	cld
	@@: ;æ¨ª« ¤«ï ¯à®¯ãáª  ¯à¥¤ë¤ãé¨å ¯®¤¤¥à¥¢ì¥¢ ¢ ã§«¥
		bt bx,0 ;¯à®¢¥àï¥¬ ¥áâì «¨ ¤®ç¥à­¨¥ ã§«ë
		jnc .end_0
			xor eax,eax
			stdcall vox_obj_rec0 ;¢ eax ¢ëç¨á«ï¥âáï ç¨á«® ¤®ç¥à­¨å ã§«®¢, ¢ ¤ ­­®© ¢¥â¢¨
		.end_0:
		shr bx,1
		loop @b
	.end_1:
	bt bx,0
	jnc .creat ;¥á«¨ ¯®¤¤¥à¥¢  ­¥ áãé¥áâ¢ã¥â, ¯¥à¥å®¤¨¬ ª á®§¤ ­¨î
	dec esi
	cmp esi,0
	jg .found
	jmp .change
 
	; *** (2) ***
	.creat:
	mov edx,[color] ;¬¥­ï¥¬ æ¢¥â
	and edx,0xffffff ;¤«ï ¯à®ä¨« ªâ¨ª¨
	mov ecx,esi
	stdcall vox_obj_add_nodes_mem, [v_obj],edi,ecx ;à áè¨àï¥¬ ¬¥áâ® § ­¨¬ ¥¬®¥ ®¡ê¥ªâ®¬, ¤«ï ¤®¡ ¢«¥­¨ï ­®¢ëå ã§«®¢
	mov ebx,[p_node]
	cld
	@@:
		mov dword[edi],edx
		stdcall vox_obj_get_node_bit_mask, [v_obj],[coord_x],[coord_y],[coord_z],esi
		or byte[ebx+3],al
 
		mov ebx,edi
		add edi,4
		dec esi
		loop @b
	jmp .end_2
 
	; *** (3) ***
	.change:
	mov eax,[color] ;¬¥­ï¥¬ æ¢¥â
	mov word[edi],ax
	shr eax,16
	mov byte[edi+2],al
 
	.end_2:
popad
	ret
endp
 
; á¤¢¨£ ¥â ã§«ë ¤«ï ¤®¡ ¢«¥­¨ï ­®¢ëå ã§«®¢
;input:
; p_insert - ¯®§¨æ¨ï ¤«ï ¢áâ ¢ª¨
; count - ª®««¨ç¥áâ¢® ¢áâ ¢«ï¥¬ëå ã§«®¢
align 4
proc vox_obj_add_nodes_mem uses eax ecx edi esi, v_obj:dword,p_insert:dword,count:dword
	mov esi,[v_obj]
	;stdcall buf2d_vox_obj_get_size,esi
	add esi,[vox_obj_size] ;esi - ãª § â¥«ì ­  ª®­¥æ ä ©« 
	mov edi,[count]
	shl edi,2
	add [vox_obj_size],edi
	add edi,esi ;edi - ãª § â¥«ì ­  ¡ã¤ãé¨© ª®­¥æ ä ©« 
	mov ecx,esi
	sub ecx,[p_insert]
	shr ecx,2 ;ecx - ç¨á«® æ¨ª«®¢ ¤«ï ª®¯¨à®¢ ­¨ï
	sub esi,4 ;esi - ãª § â¥«ì ­  ¯®á«¥¤­¨© ã§¥«
	sub edi,4 ;edi - ãª § â¥«ì ­  ¡ã¤ãé¨© ¯®á«¥¤­¨© ã§¥«
	std
	rep movsd ;á¤¢¨£ ¥¬ ¯ ¬ïâì
	ret
endp
 
;???
; ®¯à¥¤¥«¥­¨¥ ¯®§¨æ¨¨ ã§«  ¢ ¤¥à¥¢¥ (®â 0 ¤® 7)
align 4
proc vox_obj_get_node_position uses ebx ecx edi, v_obj:dword,\
coord_x:dword,coord_y:dword,coord_z:dword,k_scale:dword
	mov ecx,[k_scale]
	dec ecx
	mov eax,[coord_x]
	mov ebx,[coord_y]
	mov edi,[coord_z]
	cmp ecx,1
	jl .end_0
		shr eax,cl
		shr ebx,cl
		shr edi,cl
	.end_0:
	and eax,1
	bt ebx,0
	jnc @f
		bts eax,1
	@@:
	bt edi,0
	jnc @f
		bts eax,2
	@@:
 
	mov edi,[v_obj]
	add edi,vox_offs_tree_table
	@@:
		cmp al,byte[edi]
		je @f
		inc edi
		jmp @b
	@@:
	sub edi,[v_obj]
	sub edi,vox_offs_tree_table
	mov eax,edi
	
	ret
endp
 
;???
;input:
; edi - ãª § â¥«ì ­  ¤ ­­ë¥ ¢®ªá¥«ì­®£® ®¡ê¥ªâ 
;output:
; eax - eax + ç¨á«® ã§«®¢ ¢ ¤ ­­ëå ¢®ªá. ®¡ê¥ªâ 
; edi - ãª § â¥«ì ­  á¬¥é¥­­ë¥ ¤ ­­ë¥ ¢®ªá. ®¡ê¥ªâ 
align 4
proc vox_obj_rec0
	inc eax
	cmp byte[edi+3],0 ;á¬®âà¨¬ ¥áâì «¨ ¯®¤¤¥à¥¢ìï
	je .sub_trees
 
		;à¥ªãàá¨¢­ë© ¯¥à¥¡®à ¯®¤¤¥à¥¢ì¥¢
		push ebx ecx
		mov bh,byte[edi+3]
		add edi,4
		mov bl,8
		.cycle:
			bt bx,8 ;â¥áâ¨àã¥¬ â®«ìª® bh
			jnc .c_next
				stdcall vox_obj_rec0
			.c_next:
			shr bh,1
			dec bl
			jnz .cycle
		pop ecx ebx
 
		jmp .end_f
	.sub_trees:
		add edi,4
	.end_f:
	ret
endp
 
;output:
; eax - 1,2,4,8,16, ... ,128
align 4
proc vox_obj_get_node_bit_mask uses ebx ecx edi, v_obj:dword,\
coord_x:dword,coord_y:dword,coord_z:dword,k_scale:dword
	mov ecx,[k_scale]
	dec ecx
	mov eax,[coord_x]
	mov ebx,[coord_y]
	mov edi,[coord_z]
	cmp ecx,1
	jl .end_0
		shr eax,cl
		shr ebx,cl
		shr edi,cl
	.end_0:
	and eax,1
	bt ebx,0
	jnc @f
		bts eax,1
	@@:
	bt edi,0
	jnc @f
		bts eax,2
	@@:
 
	mov ecx,[v_obj]
	add ecx,vox_offs_tree_table
	@@:
		cmp al,byte[ecx]
		je @f
		inc ecx
		jmp @b
	@@:
	mov eax,1 ;ãáâ ­ ¢«¨¢ ¥¬ ¯¥à¢®­ ç «ì­®¥ §­ ç¥­¨¥ ¡¨â 
	sub ecx,[v_obj]
	sub ecx,vox_offs_tree_table
	jz @f
		shl eax,cl ;á¤¢¨£ ¥¬ ¡¨â
	@@:
	
	ret
endp
 
 
;output:
; eax - à §¬¥à ¢ ¡ ©â å § ­¨¬ ¥¬ë© ®¡ê¥ªâ®¬ v_obj
align 4
proc buf2d_vox_obj_get_size uses edi, v_obj:dword
	mov edi,[v_obj]
	add edi,vox_offs_data
	xor eax,eax
	stdcall vox_obj_rec0 ;eax - ç¨á«® ã§«®¢ ¢ ®¡ê¥ªâ¥ v_obj
	shl eax,2
	add eax,vox_offs_data
	ret
endp
 
;input:
; mode_add - ¥á«¨ ­¥ à ¢­® 0 â®£¤  á®§¤ ­¨¥ ¢ à¥¦¨¬¥ ¤®¡ ¢«¥­¨ï ¢®ªá¥«¥©
align 4
proc but_run uses eax ebx edi, mode_add:dword
	; ¯à®¢¥àª  à §¬¥à®¢ ¨§®¡à ¦¥­¨© (â¥ªáâãà)
	mov edi,buf_i0
	mov ebx,buf2d_h
	cmp ebx,2
	jle .err_size_t
	cmp buf2d_w,ebx
	jne .err_size_t
	;
	mov edi,buf_i1
	cmp ebx,buf2d_h
	jne .err_size_tb
	mov ebx,buf2d_h
	cmp ebx,2
	jle .err_size_b
	cmp buf2d_w,ebx
	jne .err_size_b
 
		cmp dword[vox_obj_size],vox_offs_data
		jl .n_file ;¥á«¨ à ­ìè¥ ­¥ ¡ë«® ®âªàëâëå ä ©«®¢
		cmp dword[mode_add],0
		jne @f
		.n_file:
			call but_new_file
		@@:
 
		mov edi,buf_i0
		mov eax,buf2d_w
		mov edi,buf_npl
		cmp buf2d_data,0
		jne @f
			; *** á®§¤ ¥¬ ¡ãä¥à 
			m2m buf2d_w,eax
			m2m buf2d_h,eax
			stdcall [buf2d_create],edi
			mov edi,buf_npl_p
			m2m buf2d_w,eax
			m2m buf2d_h,eax
			stdcall [buf2d_create],edi
			mov edi,buf_npl_n
			m2m buf2d_w,eax
			m2m buf2d_h,eax
			stdcall [buf2d_create],edi
			jmp .end_0
		@@:
			; *** ¨§¬¥­ï¥¬ à §¬¥àë ¡ãä¥à®¢
			stdcall [buf2d_resize], edi, eax,eax,1
			mov edi,buf_npl_p
			stdcall [buf2d_resize], edi, eax,eax,1
			mov edi,buf_npl_n
			stdcall [buf2d_resize], edi, eax,eax,1
		.end_0:
		mov dword[n_plane],1
		mov byte[calc],1
		call get_scale
		call set_borders
 
		stdcall create_plane,buf_npl,0
		stdcall create_plane,buf_npl_n,1
		stdcall create_obj_from_plane,buf_npl,0 ;á®§¤ ¥¬ ­ ç «ì­®¥ á¥ç¥­¨¥
 
		jmp @f
	.err_size_t:
		stdcall [mb_create],msgbox_0,thread
		jmp @f
	.err_size_b:
		stdcall [mb_create],msgbox_1,thread
		jmp @f
	.err_size_tb:
		stdcall [mb_create],msgbox_3,thread
		;jmp @f
	@@:
	ret
endp
 
;¯à¥ªà â¨âì á®§¤ ­¨¥ ®¡ê¥ªâ 
align 4
but_stop:
	cmp byte[calc],0
	je @f
		call draw_object
		mov byte[calc],0
	@@:
	ret
 
align 4
but_rot_z:
	stdcall vox_obj_rot_z, [open_file_vox]
	call draw_object
	ret
 
align 4
draw_object:
	;¢ë¢®¤ à¥§ã«ìâ â  ­  íªà ­
	stdcall [buf2d_clear], buf_0, [buf_0.color] ;ç¨áâ¨¬ ¡ãä¥à
	stdcall [buf2d_clear], buf_0z, 0 ;ç¨áâ¨¬ ¡ãä¥à
	stdcall [buf2d_vox_obj_draw_3g], buf_0, buf_0z, buf_vox,\
		[open_file_vox], 0,0, 0, 6 ;[k_scale]
	stdcall [buf2d_draw], buf_0 ;®¡­®¢«ï¥¬ ¡ãä¥à ­  íªà ­¥
	ret
 
align 4
proc open_image_in_buf, buf:dword
	pushad
	copy_path open_dialog_name,communication_area_default_path,file_name,0
	mov [OpenDialog_data.type],0
	stdcall [OpenDialog_Start],OpenDialog_data
	cmp [OpenDialog_data.status],2
	je .end_open_file
 
	;stdcall mem.Alloc, dword size ;¢ë¤¥«ï¥¬ ¯ ¬ïâì ¤«ï ¨§®¡à ¦¥­¨ï
	;mov [buf],eax
 
	mov [run_file_70.Function], SSF_READ_FILE
	mov [run_file_70.Position], 0
	mov [run_file_70.Flags], 0
	mov [run_file_70.Count], dword max_open_file_size
	m2m [run_file_70.Buffer],dword[open_file_img]
	mov byte[run_file_70+20], 0
	mov [run_file_70.FileName], openfile_path
	mcall SF_FILE,run_file_70
	cmp ebx,0xffffffff
	je .end_0
		;®¯à¥¤¥«ï¥¬ ¢¨¤ ¨§®¡à ¦¥­¨ï
		stdcall dword[img_decode], dword[open_file_img],ebx,0
		or eax,eax
		jz .end_0 ;¥á«¨ ­ àãè¥­ ä®à¬ â ä ©« 
		mov ebx,[eax+4] ;+4 = image width
		cmp ebx,[eax+8] ;+8 = image height
		jne .err_s0
		mov ebx,eax
		;¯à¥®¡à §ã¥¬ ¨§®¡à ¦¥­¨¥ ª ä®à¬ âã rgb
		stdcall dword[img_to_rgb2], ebx,dword[open_file_img]
 
		mov edi,[buf]
		cmp buf2d_data,0
		jne @f
			m2m buf2d_w,dword[ebx+4] ;+4 = image width
			m2m buf2d_h,dword[ebx+8] ;+8 = image height
			stdcall [buf2d_create_f_img], edi,[open_file_img]
			jmp .end_1
		@@:
			mov ecx,[ebx+8]
			stdcall [buf2d_resize], edi, [ebx+4],ecx,1 ;¨§¬¥­ï¥¬ à §¬¥àë ¡ãä¥à 
			imul ecx,[ebx+4]
			lea ecx,[ecx+ecx*2]
			mov edi,buf2d_data
			mov esi,[open_file_img]
			cld
			rep movsb ;copy image
			jmp .end_1
		.err_s0: ;®è¨¡ª , ¨§®¡à ¦¥­¨¥ ¤«ï ¯à¥®¡à §®¢ ­¨ï ­¥ ¯®¤å®¤¨â (­¥ ª¢ ¤à â­®¥)
			mov ebx,eax
			notify_window_run txt_img_not_square
		.end_1:
 
		;ã¤ «ï¥¬ ¢à¥¬¥­­ë© ¡ãä¥à ¢ ebx
		stdcall dword[img_destroy], ebx
	.end_0:
 
	call draw_buffers
	.end_open_file:
	popad
	ret
endp
 
msgbox_0:
	db 1,0
	db '­¨¬ ­¨¥',0
	db ' §¬¥à ¢¥àå­¥£® ¨§®¡à ¦¥­¨ï ­¥ ª®à¥ªâ­ë©',0
	db ' ªàëâì',0
	db 0
 
msgbox_1:
	db 1,0
	db '­¨¬ ­¨¥',0
	db ' §¬¥à ¡®ª®¢®£® ¨§®¡à ¦¥­¨ï ­¥ ª®à¥ªâ­ë©',0
	db ' ªàëâì',0
	db 0
 
msgbox_2:
	db 1,0
	db '­¨¬ ­¨¥',0
	db ' §¬¥à ¯¥à¥¤­¥£® ¨§®¡à ¦¥­¨ï ­¥ ª®à¥ªâ­ë©',0
	db ' ªàëâì',0
	db 0
 
msgbox_3:
	db 1,0
	db '­¨¬ ­¨¥',0
	db ' §¬¥àë ¢¥àå­¥£® ¨ ¡®ª®¢®£® ¨§®¡à ¦¥­¨© ­¥ á®¢¯ ¤ îâ',13,\
		'âªà®©â¥ ¨§®¡à ¦¥­¨ï ®¤¨­ ª®¢ëå à §¬¥à®¢',0
	db ' ªàëâì',0
	db 0
 
msgbox_4:
	db 1,0
	db '­¨¬ ­¨¥',0
	db 'âªàë¢ ¥¬ë© ä ©« á®¤¥à¦¨â ­¥ ¢®ªá¥«ì­ë© ä®à¬ â',0
	db ' ªàëâì',0
	db 0
 
txt_img_not_square db '"­¨¬ ­¨¥',13,10,'âªàë¢ ¥¬®¥ ¨§®¡à ¦¥­¨¥ ­¥ ª¢ ¤à â­®¥" -tW',0
 
;¤ ­­ë¥ ¤«ï ¤¨ «®£  ®âªàëâ¨ï ä ©«®¢
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 '/rd/1',0
 
communication_area_name:
	db 'FFFFFFFF_open_dialog',0
open_dialog_name:
	db 'opendial',0
communication_area_default_path:
	db '/rd/1/File managers/',0
 
Filter:
dd Filter.end - Filter ;.1
.1:
db 'PNG',0
db 'JPG',0
db 'JPEG',0
db 'BMP',0
db 'GIF',0
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 'msgbox.obj',0
 
align 4
head_f_i:
if lang eq ru
head_f_l db '"¨áâ¥¬­ ï ®è¨¡ª ',0
err_message_found_lib_0 db '¥ ­ ©¤¥­  ¡¨¡«¨®â¥ª  ',39,'proc_lib.obj',39,'" -tE',0
err_message_import_0 db 'è¨¡ª  ¯à¨ ¨¬¯®àâ¥ ¡¨¡«¨®â¥ª¨ ',39,'proc_lib.obj',39,'" -tE',0
err_message_found_lib_1 db '¥ ­ ©¤¥­  ¡¨¡«¨®â¥ª  ',39,'libimg.obj',39,'" -tE',0
err_message_import_1 db 'è¨¡ª  ¯à¨ ¨¬¯®àâ¥ ¡¨¡«¨®â¥ª¨ ',39,'libimg.obj',39,'" -tE',0
err_msg_found_lib_2 db '¥ ­ ©¤¥­  ¡¨¡«¨®â¥ª  ',39,'buf2d.obj',39,'" -tE',0
err_msg_import_2 db 'è¨¡ª  ¯à¨ ¨¬¯®àâ¥ ¡¨¡«¨®â¥ª¨ ',39,'buf2d',39,'" -tE',0
err_msg_found_lib_3 db '¥ ­ ©¤¥­  ¡¨¡«¨®â¥ª  ',39,'msgbox.obj',39,'" -tE',0
err_msg_import_3 db 'è¨¡ª  ¯à¨ ¨¬¯®àâ¥ ¡¨¡«¨®â¥ª¨ ',39,'msgbox',39,'" -tE',0
else
head_f_l db '"System error',0
err_message_found_lib_0 db 'Sorry I cannot found library ',39,'proc_lib.obj',39,'" -tE',0
err_message_import_0 db 'Error on load import library ',39,'proc_lib.obj',39,'" -tE',0
err_message_found_lib_1 db 'Sorry I cannot found library ',39,'libimg.obj',39,'" -tE',0
err_message_import_1 db 'Error on load import library ',39,'libimg.obj',39,'" -tE',0
err_msg_found_lib_2 db 'Sorry I cannot found library ',39,'buf2d.obj',39,'" -tE',0
err_msg_import_2 db 'Error on load import library ',39,'buf2d',39,'" -tE',0
err_msg_found_lib_3 db 'Sorry I cannot found library ',39,'msgbox.obj',39,'" -tE',0
err_msg_import_3 db 'Error on load import library ',39,'msgbox',39,'" -tE',0
end if
 
align 4
l_libs_start:
	lib_0 l_libs lib_name_0, sys_path, file_name, system_dir_0,\
		err_message_found_lib_0, head_f_l, proclib_import,err_message_import_0, head_f_i
	lib_1 l_libs lib_name_1, sys_path, file_name, system_dir_1,\
		err_message_found_lib_1, head_f_l, import_libimg, err_message_import_1, head_f_i
	lib_2 l_libs lib_name_2, sys_path, library_path, system_dir_2,\
		err_msg_found_lib_2,head_f_l,import_buf2d,err_msg_import_2,head_f_i
	lib_3 l_libs lib_name_3, sys_path, library_path, system_dir_3,\
		err_msg_found_lib_3,head_f_l,import_msgbox_lib,err_msg_import_3,head_f_i
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
proclib_import: ;®¯¨á ­¨¥ íªá¯®àâ¨àã¥¬ëå äã­ªæ¨©
	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_resize dd sz_buf2d_resize
	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_resize db 'buf2d_resize',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_msgbox_lib:
	mb_create dd amb_create
;       mb_reinit dd amb_reinit
;       mb_setfunctions dd amb_setfunctions
dd 0,0
	amb_create db 'mb_create',0
;       amb_reinit db 'mb_reinit',0
;       amb_setfunctions db 'mb_setfunctions',0
 
mouse_dd dd 0
sc system_colors 
last_time dd 0
 
align 16
procinfo process_information 
 
align 4
buf_0: dd 0
	dw 5 ;+4 left
	dw 35 ;+6 top
.w: dd 6*64 ;+8 w
.h: dd 7*64 ;+12 h
.color: dd 0xffffff ;+16 color
	db 24 ;+20 bit in pixel
 
align 4
buf_0z: dd 0
	dw 5 ;+4 left
	dw 35 ;+6 top
.w: dd 6*64 ;+8 w
.h: dd 7*64 ;+12 h
.color: dd 0 ;+16 color
	db 32 ;+20 bit in pixel
 
;â¥ªáâãà  1 (¢¥àå­ïï)
align 4
buf_i0: dd 0
	dw 5 ;+4 left
	dw 35 ;+6 top
.w: dd 0 ;+8 w
.h: dd 0 ;+12 h
.color: dd 0 ;+16 color
	db 24 ;+20 bit in pixel
 
;â¥ªáâãà  2
align 4
buf_i1: dd 0
	dw 105 ;+4 left
	dw 35 ;+6 top
.w: dd 0 ;+8 w
.h: dd 0 ;+12 h
.color: dd 0 ;+16 color
	db 24 ;+20 bit in pixel
 
;â¥ªáâãà  3
align 4
buf_i2: dd 0
	dw 205 ;+4 left
	dw 35 ;+6 top
.w: dd 0 ;+8 w
.h: dd 0 ;+12 h
.color: dd 0 ;+16 color
	db 24 ;+20 bit in pixel
 
; «£®à¨â¬ á®§¤ ­¨ï ¬®¤¥«¨ ¨á¯®«ì§ã¥â 3 á¥ç¥­¨ï: 
; ¯à¥¤ë¤ãé¥¥, â¥ªãé¥¥, ¯®á«¥¤ãîé¥¥ (íâ® ­¥®¡å®¤¨¬® ¤«ï ®âá¥¨¢ ­¨ï ¢®ªá¥«¥© ¢­ãâà¨ ®¡ê¥ªâ )
 
;¯à¥¤ë¤ãé¥¥ á¥ç¥­¨¥
align 4
buf_npl_p: dd 0
	dw 0 ;+4 left
	dw 0 ;+6 top
.w: dd 0 ;+8 w
.h: dd 0 ;+12 h
.color: dd 0 ;+16 color
	db 24 ;+20 bit in pixel
 
;â¥ªãé¥¥ á¥ç¥­¨¥
align 4
buf_npl: dd 0
	dw 5 ;+4 left
	dw 35 ;+6 top
.w: dd 0 ;+8 w
.h: dd 0 ;+12 h
.color: dd 0 ;+16 color
	db 24 ;+20 bit in pixel
 
;¯®á«¥¤ãîé¥¥ á¥ç¥­¨¥
align 4
buf_npl_n: dd 0
	dw 0 ;+4 left
	dw 0 ;+6 top
.w: dd 0 ;+8 w
.h: dd 0 ;+12 h
.color: dd 0 ;+16 color
	db 24 ;+20 bit in pixel
 
;¤ ­­ë¥ ¤«ï á®§¤ ­¨ï ¬¨­¨¬ «ì­®£® ¥¤¨­¨ç­®£® ¢®ªá¥«ï
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*(2+1)
 
 
align 16
i_end:
		rb 2048
	thread:
		rb 2048
stacktop:
	sys_path rb 1024
	file_name:
		rb 1024 ;4096 
	library_path rb 1024
	plugin_path rb 4096
	openfile_path rb 4096
	filename_area rb 256
mem:

Rev 7205	Rev 7861
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 '../../../../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/str.inc'	10	include '../trunk/str.inc'
-		11	include 'lang.inc'
11		12
12	vox_offs_tree_table equ 4	13	vox_offs_tree_table equ 4
13	vox_offs_data equ 12	14	vox_offs_data equ 12
14	txt_buf rb 8	15	txt_buf rb 8
15	include '../trunk/vox_rotate.inc'	16	include '../trunk/vox_rotate.inc'
16		17
17	@use_library_mem mem.Alloc,mem.Free,mem.ReAlloc,dll.Load	18	@use_library_mem mem.Alloc,mem.Free,mem.ReAlloc,dll.Load
-		19	if lang eq ru
18	caption db 'Voxel creator 22.03.18',0 ;¯®¤¯¨áì ®ª	20	caption db '®§¤ â¥«ì ¢®ªá¥«¥© 04.05.20',0 ;¯®¤¯¨áì ®ª
-		21	else
-		22	caption db 'Voxel creator 04.05.20',0
-		23	end if
19		24
20	BUF_STRUCT_SIZE equ 21	25	BUF_STRUCT_SIZE equ 21
21	buf2d_data equ dword[edi] ;¤ ë¥ ¡ãä¥à ¨§®¡à ¦¥¨ï	26	buf2d_data equ dword[edi] ;¤ ë¥ ¡ãä¥à ¨§®¡à ¦¥¨ï
22	buf2d_w equ dword[edi+8] ;è¨à¨ ¡ãä¥à	27	buf2d_w equ dword[edi+8] ;è¨à¨ ¡ãä¥à
23	buf2d_h equ dword[edi+12] ;¢ëá®â ¡ãä¥à	28	buf2d_h equ dword[edi+12] ;¢ëá®â ¡ãä¥à
24	buf2d_l equ word[edi+4]	29	buf2d_l equ word[edi+4]
25	buf2d_t equ word[edi+6] ;®âáâã¯ á¢¥àåã	30	buf2d_t equ word[edi+6] ;®âáâã¯ á¢¥àåã
26	buf2d_size_lt equ dword[edi+4] ;®âáâã¯ á«¥¢ ¨ á¯à ¢ ¤«ï ¡ãä¥à	31	buf2d_size_lt equ dword[edi+4] ;®âáâã¯ á«¥¢ ¨ á¯à ¢ ¤«ï ¡ãä¥à
27	buf2d_color equ dword[edi+16] ;æ¢¥â ä® ¡ãä¥à	32	buf2d_color equ dword[edi+16] ;æ¢¥â ä® ¡ãä¥à
28	buf2d_bits equ byte[edi+20] ;ª®«¨ç¥áâ¢® ¡¨â ¢ 1-© â®çª¥ ¨§®¡à ¦¥¨ï	33	buf2d_bits equ byte[edi+20] ;ª®«¨ç¥áâ¢® ¡¨â ¢ 1-© â®çª¥ ¨§®¡à ¦¥¨ï
29		-
30	vox_offs_tree_table equ 4	-
31	vox_offs_data equ 12	-
32		34
33	run_file_70 FileInfoBlock	35	run_file_70 FileInfoBlock
34	vox_obj_size dd 0 ;à §¬¥à ¢®ªá¥«ì®£® ®¡ê¥ªâ (¤«ï ãáª®à¥¨ï ¢áâ ¢ª¨)	36	vox_obj_size dd 0 ;à §¬¥à ¢®ªá¥«ì®£® ®¡ê¥ªâ (¤«ï ãáª®à¥¨ï ¢áâ ¢ª¨)
35	txt_space db ' ',0	37	txt_space db ' ',0
-		38	if lang eq ru
36	txt_pref db ' ¡ ',0,' ¡',0,' ¡',0,' ¡',0 ;¯à¨áâ ¢ª¨: ª¨«®, ¬¥£ , £¨£	39	txt_pref db ' ¡ ',0,' ¡',0,' ¡',0,' ¡',0 ;¯à¨áâ ¢ª¨: ª¨«®, ¬¥£ , £¨£
37	txt_f_size: db ' §¬¥à: '	40	txt_f_size: db ' §¬¥à: '
-		41	else
-		42	txt_pref db ' b ',0,' Kb',0,' Mb',0,' Gb',0 ;¯à¨áâ ¢ª¨: ª¨«®, ¬¥£ , £¨£
-		43	txt_f_size: db 'Size: '
-		44	end if
38	.size: rb 16	45	.size: rb 16
39		46
40	IMAGE_TOOLBAR_ICON_SIZE equ 16163	47	IMAGE_TOOLBAR_ICON_SIZE equ 16163
41	image_data_toolbar dd 0	48	image_data_toolbar dd 0
42		49
43	max_open_file_size equ 1024*1024 ;1 Mb	50	max_open_file_size equ 1024*1024 ;1 Mb
44		51
45	align 4	52	align 4
46	start:	53	start:
47	load_libraries l_libs_start,l_libs_end	54	load_libraries l_libs_start,l_libs_end
48	;¯à®¢¥àª áª®«ìª® ã¤ ç® § £ã§¨« áì ¡¨¡«¨®â¥ª	55	;¯à®¢¥àª áª®«ìª® ã¤ ç® § £ã§¨« áì ¡¨¡«¨®â¥ª
49	mov ebp,lib_0	56	mov ebp,lib_0
50	cmp dword [ebp+ll_struc_size-4],0	57	cmp dword [ebp+ll_struc_size-4],0
51	jz @f	58	jz @f
52	mcall SF_TERMINATE_PROCESS	59	mcall SF_TERMINATE_PROCESS
53	@@:	60	@@:
54	mcall SF_STYLE_SETTINGS,SSF_GET_COLORS,sc,sizeof.system_colors	61	mcall SF_STYLE_SETTINGS,SSF_GET_COLORS,sc,sizeof.system_colors
55	mcall SF_SET_EVENTS_MASK,0x27	62	mcall SF_SET_EVENTS_MASK,0x27
56	stdcall [OpenDialog_Init],OpenDialog_data ;¯®¤£®â®¢ª ¤¨ «®£	63	stdcall [OpenDialog_Init],OpenDialog_data ;¯®¤£®â®¢ª ¤¨ «®£
57		64
58	stdcall [buf2d_create], buf_0 ;á®§¤ ¨¥ ¡ãä¥à	65	stdcall [buf2d_create], buf_0 ;á®§¤ ¨¥ ¡ãä¥à
59	stdcall [buf2d_create], buf_0z	66	stdcall [buf2d_create], buf_0z
60	stdcall [buf2d_vox_brush_create], buf_vox, vox_6_7_z	67	stdcall [buf2d_vox_brush_create], buf_vox, vox_6_7_z
61		68
62	include_image_file 'toolbar.png', image_data_toolbar	69	include_image_file 'toolbar.png', image_data_toolbar
63		70
64	stdcall mem.Alloc,max_open_file_size	71	stdcall mem.Alloc,max_open_file_size
65	mov dword[open_file_vox],eax	72	mov dword[open_file_vox],eax
66	stdcall mem.Alloc,max_open_file_size	73	stdcall mem.Alloc,max_open_file_size
67	mov dword[open_file_img],eax	74	mov dword[open_file_img],eax
68		75
69	mcall SF_SYSTEM_GET,SSF_TIME_COUNT	76	mcall SF_SYSTEM_GET,SSF_TIME_COUNT
70	mov [last_time],eax	77	mov [last_time],eax
71	;¯à®¢¥àª ª®¬ ¤®© áâà®ª¨	78	;¯à®¢¥àª ª®¬ ¤®© áâà®ª¨
72	cmp dword[openfile_path],0	79	cmp dword[openfile_path],0
73	je @f	80	je @f
74	call but_open_file_cmd_lin	81	call but_open_file_cmd_lin
75	@@:	82	@@:
76		83
77	align 4	84	align 4
78	red_win:	85	red_win:
79	call draw_window	86	call draw_window
80		87
81	align 4	88	align 4
82	still:	89	still:
83	mcall SF_SYSTEM_GET,SSF_TIME_COUNT	90	mcall SF_SYSTEM_GET,SSF_TIME_COUNT
84	mov ebx,[last_time]	91	mov ebx,[last_time]
85	add ebx,10 ;§ ¤¥à¦ª	92	add ebx,10 ;§ ¤¥à¦ª
86	cmp ebx,eax	93	cmp ebx,eax
87	jge @f	94	jge @f
88	mov ebx,eax	95	mov ebx,eax
89	@@:	96	@@:
90	sub ebx,eax	97	sub ebx,eax
91	mcall SF_WAIT_EVENT_TIMEOUT	98	mcall SF_WAIT_EVENT_TIMEOUT
92	cmp eax,0	99	cmp eax,0
93	je timer_funct	100	je timer_funct
94		101
95	cmp al,1	102	cmp al,1
96	jz red_win	103	jz red_win
97	cmp al,2	104	cmp al,2
98	jz key	105	jz key
99	cmp al,3	106	cmp al,3
100	jz button	107	jz button
101		108
102	jmp still	109	jmp still
103		110
104	align 4	111	align 4
105	timer_funct:	112	timer_funct:
106	cmp byte[calc],0	113	cmp byte[calc],0
107	je still	114	je still
108		115
109	pushad	116	pushad
110	mcall SF_SYSTEM_GET,SSF_TIME_COUNT	117	mcall SF_SYSTEM_GET,SSF_TIME_COUNT
111	mov [last_time],eax	118	mov [last_time],eax
112		119
113	; áª¨¤ë¢ ¥¬ ãª § â¥«¨ ¡ãä¥à®¢ buf_npl_p, buf_npl, buf_npl_n	120	; áª¨¤ë¢ ¥¬ ãª § â¥«¨ ¡ãä¥à®¢ buf_npl_p, buf_npl, buf_npl_n
114	mov edi,buf_npl_p	121	mov edi,buf_npl_p
115	mov eax,buf2d_data	122	mov eax,buf2d_data
116	mov edi,buf_npl	123	mov edi,buf_npl
117	mov ebx,buf2d_data	124	mov ebx,buf2d_data
118	mov edi,buf_npl_n	125	mov edi,buf_npl_n
119	mov ecx,buf2d_data	126	mov ecx,buf2d_data
120	; change buffer data pointers	127	; change buffer data pointers
121	mov buf2d_data,eax	128	mov buf2d_data,eax
122	mov edi,buf_npl_p	129	mov edi,buf_npl_p
123	mov buf2d_data,ebx	130	mov buf2d_data,ebx
124	mov edi,buf_npl	131	mov edi,buf_npl
125	mov buf2d_data,ecx	132	mov buf2d_data,ecx
126		133
127	mov eax,[n_plane]	134	mov eax,[n_plane]
128	mov ebx,buf2d_w	135	mov ebx,buf2d_w
129	dec ebx	136	dec ebx
130		137
131	cmp ebx,eax	138	cmp ebx,eax
132	jg @f	139	jg @f
133	stdcall create_obj_from_plane,buf_npl,eax ;á®§¤ ¥¬ § ¢¥àè îé¥¥ á¥ç¥¨¥	140	stdcall create_obj_from_plane,buf_npl,eax ;á®§¤ ¥¬ § ¢¥àè îé¥¥ á¥ç¥¨¥
134	;¢ë¢®¤ ª®¥ç®£® à¥§ã«ìâ â	141	;¢ë¢®¤ ª®¥ç®£® à¥§ã«ìâ â
135	call draw_object	142	call draw_object
136	mov byte[calc],0	143	mov byte[calc],0
137	jmp .end_f	144	jmp .end_f
138	@@:	145	@@:
139		146
140	inc eax	147	inc eax
141	stdcall create_plane, buf_npl_n,eax	148	stdcall create_plane, buf_npl_n,eax
142		149
143	; á®§¤ ¨¥ ¢®áª¥«ì®£® á¥ç¥¨ï ®á®¢¥ ¡ãä¥à buf_npl	150	; á®§¤ ¨¥ ¢®áª¥«ì®£® á¥ç¥¨ï ®á®¢¥ ¡ãä¥à buf_npl
144	mov edi,buf_npl	151	mov edi,buf_npl
145	mov edx,[bby_min] ;0	152	mov edx,[bby_min] ;0
146	.cycle_0:	153	.cycle_0:
147	mov ecx,[btx_min] ;0	154	mov ecx,[btx_min] ;0
148	.cycle_1:	155	.cycle_1:
149	stdcall [buf2d_get_pixel], edi,ecx,edx	156	stdcall [buf2d_get_pixel], edi,ecx,edx
150	cmp eax,buf2d_color	157	cmp eax,buf2d_color
151	je @f	158	je @f
152	mov esi,eax	159	mov esi,eax
153	call need_node	160	call need_node
154	cmp eax,buf2d_color	161	cmp eax,buf2d_color
155	jne @f ;®âá¥¨¢ ¥¬ ¢ãâà¥¨¥ ¢®ªá¥«¨, ¤«ï ®¯â¨¬¨§ æ¨¨ ¬®¤¥«¨	162	jne @f ;®âá¥¨¢ ¥¬ ¢ãâà¥¨¥ ¢®ªá¥«¨, ¤«ï ®¯â¨¬¨§ æ¨¨ ¬®¤¥«¨
156	mov eax,ebx	163	mov eax,ebx
157	sub eax,edx	164	sub eax,edx
158	stdcall buf2d_vox_obj_create_node, [open_file_vox],ecx,[n_plane],\	165	stdcall buf2d_vox_obj_create_node, [open_file_vox],ecx,[n_plane],\
159	eax,[k_scale],esi	166	eax,[k_scale],esi
160	@@:	167	@@:
161	inc ecx	168	inc ecx
162	cmp ecx,ebx	169	cmp ecx,ebx
163	jle .cycle_1	170	jle .cycle_1
164	inc edx	171	inc edx
165	cmp edx,ebx	172	cmp edx,ebx
166	jle .cycle_0	173	jle .cycle_0
167		174
168	stdcall [buf2d_draw], buf_npl	175	stdcall [buf2d_draw], buf_npl
169	inc dword[n_plane] ;¯¥à¥¬¥é ¥¬ ¯«®áª®áâì á¥ç¥¨ï	176	inc dword[n_plane] ;¯¥à¥¬¥é ¥¬ ¯«®áª®áâì á¥ç¥¨ï
170	call draw_pok	177	call draw_pok
171	.end_f:	178	.end_f:
172	popad	179	popad
173	jmp still	180	jmp still
174		181
175	align 4	182	align 4
176	proc create_plane, buf_img:dword, n_plane:dword	183	proc create_plane, buf_img:dword, n_plane:dword
177	pushad	184	pushad
178	; ª®¯¨àã¥¬ «¨æ¥¢®¥ ¨§®¡à ¦¥¨¥ ¢ ¡ãä¥à buf_img	185	; ª®¯¨àã¥¬ «¨æ¥¢®¥ ¨§®¡à ¦¥¨¥ ¢ ¡ãä¥à buf_img
179	; bby_min - ¨á¯®«ì§ã¥¬ ¤«ï ®¯â¨¬¨§ æ¨¨ (¥á«¨ á¢¥àåã ¨§®¡à ¦¥¨¥ ¯ãáâ®¥)	186	; bby_min - ¨á¯®«ì§ã¥¬ ¤«ï ®¯â¨¬¨§ æ¨¨ (¥á«¨ á¢¥àåã ¨§®¡à ¦¥¨¥ ¯ãáâ®¥)
180	mov eax,[bby_min]	187	mov eax,[bby_min]
181	mov esi,buf_i2	188	mov esi,buf_i2
182	mov esi,[esi] ;buf2d_data	189	mov esi,[esi] ;buf2d_data
183	mov edi,[buf_img]	190	mov edi,[buf_img]
184	mov ecx,buf2d_w	191	mov ecx,buf2d_w
185	imul eax,ecx	192	imul eax,ecx
186	mov ebx,ecx	193	mov ebx,ecx
187	imul ecx,ebx	194	imul ecx,ebx
188	sub ecx,eax	195	sub ecx,eax
189	lea ecx,[ecx+ecx*2]	196	lea ecx,[ecx+ecx*2]
190	mov edi,buf2d_data	197	mov edi,buf2d_data
191	lea eax,[eax+eax*2]	198	lea eax,[eax+eax*2]
192	add edi,eax	199	add edi,eax
193	add esi,eax	200	add esi,eax
194	cld	201	cld
195	rep movsb	202	rep movsb
196		203
197	mov ecx,ebx	204	mov ecx,ebx
198	dec ebx	205	dec ebx
199	mov edi,buf_i0	206	mov edi,buf_i0
200	.cycle_0:	207	.cycle_0:
201	mov eax,ebx	208	mov eax,ebx
202	sub eax,[n_plane] ;eax - ¯¥à¥¢¥àãâ ï ª®®à¤¨ â n_plane	209	sub eax,[n_plane] ;eax - ¯¥à¥¢¥àãâ ï ª®®à¤¨ â n_plane
203	stdcall [buf2d_get_pixel], edi,ecx,eax ;[n_plane]	210	stdcall [buf2d_get_pixel], edi,ecx,eax ;[n_plane]
204	cmp eax,buf2d_color	211	cmp eax,buf2d_color
205	jne @f	212	jne @f
206	;¢ëç¥àª¨¢ ¨¥ ¢¥àâ¨ª «ì®© «¨¨¨ ¨§ á¥ç¥¨ï buf_img	213	;¢ëç¥àª¨¢ ¨¥ ¢¥àâ¨ª «ì®© «¨¨¨ ¨§ á¥ç¥¨ï buf_img
207	stdcall [buf2d_line], [buf_img],ecx,[bby_min],ecx,ebx, buf2d_color	214	stdcall [buf2d_line], [buf_img],ecx,[bby_min],ecx,ebx, buf2d_color
208	jmp .end_1	215	jmp .end_1
209	@@:	216	@@:
210	mov edx,[bby_min] ;xor edx,edx	217	mov edx,[bby_min] ;xor edx,edx
211	mov esi,eax	218	mov esi,eax
212	.cycle_1: ;æ¨ª« ¤«ï «®¦¥¨ï ¢¥àå¥© â¥ªáâãàë	219	.cycle_1: ;æ¨ª« ¤«ï «®¦¥¨ï ¢¥àå¥© â¥ªáâãàë
213	stdcall [buf2d_get_pixel], [buf_img],ecx,edx	220	stdcall [buf2d_get_pixel], [buf_img],ecx,edx
214	cmp eax, buf2d_color	221	cmp eax, buf2d_color
215	je .end_0	222	je .end_0
216	stdcall [buf2d_set_pixel], [buf_img],ecx,edx, esi ; «®¦¥¨¥ ¢¥àå¥© â¥ªáâãàë	223	stdcall [buf2d_set_pixel], [buf_img],ecx,edx, esi ; «®¦¥¨¥ ¢¥àå¥© â¥ªáâãàë
217	jmp .end_1	224	jmp .end_1
218	.end_0:	225	.end_0:
219	inc edx	226	inc edx
220	cmp edx,ebx	227	cmp edx,ebx
221	jle .cycle_1	228	jle .cycle_1
222	.end_1:	229	.end_1:
223	loop .cycle_0	230	loop .cycle_0
224		231
225	;£®à¨§®â «ìë¥ «¨¨¨ ®á®¢¥ ¡®ª®¢®© £à ¨	232	;£®à¨§®â «ìë¥ «¨¨¨ ®á®¢¥ ¡®ª®¢®© £à ¨
226	mov ecx,[bby_min]	233	mov ecx,[bby_min]
227	mov edi,buf_i1	234	mov edi,buf_i1
228	.cycle_2:	235	.cycle_2:
229	stdcall [buf2d_get_pixel], edi,[n_plane],ecx	236	stdcall [buf2d_get_pixel], edi,[n_plane],ecx
230	cmp eax,buf2d_color	237	cmp eax,buf2d_color
231	jne @f	238	jne @f
232	;¢ëç¥àª¨¢ ¨¥ £®à¨§®â «ì®© «¨¨¨ ¨§ á¥ç¥¨ï buf_img	239	;¢ëç¥àª¨¢ ¨¥ £®à¨§®â «ì®© «¨¨¨ ¨§ á¥ç¥¨ï buf_img
233	stdcall [buf2d_line], [buf_img],[btx_min],ecx,[btx_max],ecx, buf2d_color	240	stdcall [buf2d_line], [buf_img],[btx_min],ecx,[btx_max],ecx, buf2d_color
234	jmp .end_3	241	jmp .end_3
235	@@:	242	@@:
236	mov edx,[btx_max] ;ebx	243	mov edx,[btx_max] ;ebx
237	mov esi,eax	244	mov esi,eax
238	.cycle_3: ;æ¨ª« ¤«ï «®¦¥¨ï ¡®ª®¢®© â¥ªáâãàë	245	.cycle_3: ;æ¨ª« ¤«ï «®¦¥¨ï ¡®ª®¢®© â¥ªáâãàë
239	stdcall [buf2d_get_pixel], [buf_img],edx,ecx	246	stdcall [buf2d_get_pixel], [buf_img],edx,ecx
240	cmp eax, buf2d_color	247	cmp eax, buf2d_color
241	je .end_2	248	je .end_2
242	stdcall [buf2d_set_pixel], [buf_img],edx,ecx, esi ; «®¦¥¨¥ ¡®ª®¢®© â¥ªáâãàë	249	stdcall [buf2d_set_pixel], [buf_img],edx,ecx, esi ; «®¦¥¨¥ ¡®ª®¢®© â¥ªáâãàë
243	jmp .end_3	250	jmp .end_3
244	.end_2:	251	.end_2:
245	dec edx	252	dec edx
246	cmp edx,[btx_min]	253	cmp edx,[btx_min]
247	jge .cycle_3	254	jge .cycle_3
248	.end_3:	255	.end_3:
249	inc ecx	256	inc ecx
250	cmp ecx,ebx	257	cmp ecx,ebx
251	jle .cycle_2	258	jle .cycle_2
252	popad	259	popad
253	ret	260	ret
254	endp	261	endp
255		262
256	align 4	263	align 4
257	proc create_obj_from_plane, buf_img:dword, n_plane:dword	264	proc create_obj_from_plane, buf_img:dword, n_plane:dword
258	pushad	265	pushad
259	; á®§¤ ¨¥ ¢®áª¥«ì®£® á¥ç¥¨ï ®á®¢¥ ¡ãä¥à buf_img	266	; á®§¤ ¨¥ ¢®áª¥«ì®£® á¥ç¥¨ï ®á®¢¥ ¡ãä¥à buf_img
260	mov edi,[buf_img]	267	mov edi,[buf_img]
261	mov ebx,buf2d_w	268	mov ebx,buf2d_w
262	dec ebx	269	dec ebx
263	mov edx,[bby_min] ;0	270	mov edx,[bby_min] ;0
264	.cycle_0:	271	.cycle_0:
265	mov ecx,[btx_min] ;0	272	mov ecx,[btx_min] ;0
266	.cycle_1:	273	.cycle_1:
267	stdcall [buf2d_get_pixel], edi,ecx,edx	274	stdcall [buf2d_get_pixel], edi,ecx,edx
268	cmp eax,buf2d_color	275	cmp eax,buf2d_color
269	je @f	276	je @f
270	mov esi,eax	277	mov esi,eax
271	;call need_node	278	;call need_node
272	;cmp eax,buf2d_color	279	;cmp eax,buf2d_color
273	;jne @f ;®âá¥¨¢ ¥¬ ¢ãâà¥¨¥ ¢®ªá¥«¨, ¤«ï ®¯â¨¬¨§ æ¨¨ ¬®¤¥«¨	280	;jne @f ;®âá¥¨¢ ¥¬ ¢ãâà¥¨¥ ¢®ªá¥«¨, ¤«ï ®¯â¨¬¨§ æ¨¨ ¬®¤¥«¨
274	mov eax,ebx	281	mov eax,ebx
275	sub eax,edx	282	sub eax,edx
276	stdcall buf2d_vox_obj_create_node, [open_file_vox],ecx,[n_plane],\	283	stdcall buf2d_vox_obj_create_node, [open_file_vox],ecx,[n_plane],\
277	eax,[k_scale],esi	284	eax,[k_scale],esi
278	@@:	285	@@:
279	inc ecx	286	inc ecx
280	cmp ecx,ebx	287	cmp ecx,ebx
281	jle .cycle_1	288	jle .cycle_1
282	inc edx	289	inc edx
283	cmp edx,ebx	290	cmp edx,ebx
284	jle .cycle_0	291	jle .cycle_0
285	ret	292	ret
286	popad	293	popad
287	endp	294	endp
288		295
289	;description:	296	;description:
290	; äãªæ¨ï ¯à®¢¥àï¥â ã¦® «¨ ®âá¥¨¢ âì ¢®ªá¥«ì á ª®®à¤¨ â ¬¨ [n_plane],ecx,edx	297	; äãªæ¨ï ¯à®¢¥àï¥â ã¦® «¨ ®âá¥¨¢ âì ¢®ªá¥«ì á ª®®à¤¨ â ¬¨ [n_plane],ecx,edx
291	;input:	298	;input:
292	; ebx = max size y - 1	299	; ebx = max size y - 1
293	;output:	300	;output:
294	; eax = buf2d_color if node need	301	; eax = buf2d_color if node need
295	align 4	302	align 4
296	need_node:	303	need_node:
297	mov eax,buf2d_color	304	mov eax,buf2d_color
298	cmp ecx,[btx_min] ;0	305	cmp ecx,[btx_min] ;0
299	jle .end_f	306	jle .end_f
300	cmp ecx,[btx_max] ;0	307	cmp ecx,[btx_max] ;0
301	jge .end_f	308	jge .end_f
302	cmp edx,[bby_min] ;0	309	cmp edx,[bby_min] ;0
303	jle .end_f	310	jle .end_f
304	cmp edx,ebx ;max-1	311	cmp edx,ebx ;max-1
305	jge .end_f	312	jge .end_f
306	push ecx edx	313	push ecx edx
307	stdcall [buf2d_get_pixel], buf_npl_p,ecx,edx ;¯à®¢¥àª ¯à¥¤ë¤ãé¥£® á¥ç¥¨ï	314	stdcall [buf2d_get_pixel], buf_npl_p,ecx,edx ;¯à®¢¥àª ¯à¥¤ë¤ãé¥£® á¥ç¥¨ï
308	cmp eax,buf2d_color	315	cmp eax,buf2d_color
309	je @f	316	je @f
310	stdcall [buf2d_get_pixel], buf_npl_n,ecx,edx ;¯à®¢¥àª ¯®á«¥¤ãîé¥£® á¥ç¥¨ï	317	stdcall [buf2d_get_pixel], buf_npl_n,ecx,edx ;¯à®¢¥àª ¯®á«¥¤ãîé¥£® á¥ç¥¨ï
311	cmp eax,buf2d_color	318	cmp eax,buf2d_color
312	je @f	319	je @f
313	dec ecx	320	dec ecx
314	stdcall [buf2d_get_pixel], edi,ecx,edx	321	stdcall [buf2d_get_pixel], edi,ecx,edx
315	cmp eax,buf2d_color	322	cmp eax,buf2d_color
316	je @f	323	je @f
317	add ecx,2	324	add ecx,2
318	stdcall [buf2d_get_pixel], edi,ecx,edx	325	stdcall [buf2d_get_pixel], edi,ecx,edx
319	cmp eax,buf2d_color	326	cmp eax,buf2d_color
320	je @f	327	je @f
321	dec ecx	328	dec ecx
322	dec edx	329	dec edx
323	stdcall [buf2d_get_pixel], edi,ecx,edx	330	stdcall [buf2d_get_pixel], edi,ecx,edx
324	cmp eax,buf2d_color	331	cmp eax,buf2d_color
325	je @f	332	je @f
326	add edx,2	333	add edx,2
327	stdcall [buf2d_get_pixel], edi,ecx,edx	334	stdcall [buf2d_get_pixel], edi,ecx,edx
328	;cmp eax,buf2d_color	335	;cmp eax,buf2d_color
329	;je @f	336	;je @f
330	@@:	337	@@:
331	pop edx ecx	338	pop edx ecx
332	.end_f:	339	.end_f:
333	ret	340	ret
334		341
335	align 4	342	align 4
336	draw_window:	343	draw_window:
337	pushad	344	pushad
338	mcall SF_REDRAW,SSF_BEGIN_DRAW	345	mcall SF_REDRAW,SSF_BEGIN_DRAW
339		346
340	; * à¨á®¢ ¨¥ £« ¢®£® ®ª (¢ë¯®«ï¥âáï 1 à § ¯à¨ § ¯ãáª¥) *	347	; * à¨á®¢ ¨¥ £« ¢®£® ®ª (¢ë¯®«ï¥âáï 1 à § ¯à¨ § ¯ãáª¥) *
341	mov edx,[sc.work]	348	mov edx,[sc.work]
342	or edx,(3 shl 24)+0x30000000	349	or edx,(3 shl 24)+0x30000000
343	mcall SF_CREATE_WINDOW,(20 shl 16)+410,(20 shl 16)+520,,,caption	350	mcall SF_CREATE_WINDOW,(20 shl 16)+410,(20 shl 16)+520,,,caption
344		351
345	; * á®§¤ ¨¥ ª®¯®ª ¯ ¥«ì *	352	; * á®§¤ ¨¥ ª®¯®ª ¯ ¥«ì *
346	mov esi,[sc.work_button]	353	mov esi,[sc.work_button]
347	mcall SF_DEFINE_BUTTON,(5 shl 16)+20,(5 shl 16)+20,3	354	mcall SF_DEFINE_BUTTON,(5 shl 16)+20,(5 shl 16)+20,3
348		355
349	mov ebx,(30 shl 16)+20	356	mov ebx,(30 shl 16)+20
350	mov edx,4	357	mov edx,4
351	int 0x40	358	int 0x40
352		359
353	mov ebx,(55 shl 16)+20	360	mov ebx,(55 shl 16)+20
354	mov edx,5	361	mov edx,5
355	int 0x40	362	int 0x40
356		363
357	mov ebx,(85 shl 16)+20	364	mov ebx,(85 shl 16)+20
358	mov edx,6	365	mov edx,6
359	int 0x40	366	int 0x40
360		367
361	add ebx,25 shl 16	368	add ebx,25 shl 16
362	mov edx,7	369	mov edx,7
363	int 0x40	370	int 0x40
364		371
365	add ebx,25 shl 16	372	add ebx,25 shl 16
366	mov edx,8	373	mov edx,8
367	int 0x40	374	int 0x40
368		375
369	add ebx,25 shl 16	376	add ebx,25 shl 16
370	mov edx,9	377	mov edx,9
371	int 0x40	378	int 0x40
372		379
373	add ebx,25 shl 16	380	add ebx,25 shl 16
374	mov edx,10	381	mov edx,10
375	int 0x40	382	int 0x40
376		383
377	add ebx,25 shl 16	384	add ebx,25 shl 16
378	mov edx,11	385	mov edx,11
379	int 0x40	386	int 0x40
380		387
381	add ebx,25 shl 16	388	add ebx,25 shl 16
382	mov edx,12	389	mov edx,12
383	int 0x40	390	int 0x40
384		391
385	; * à¨á®¢ ¨¥ ¨ª®®ª ª®¯ª å *	392	; * à¨á®¢ ¨¥ ¨ª®®ª ª®¯ª å *
386	mov edx,(7 shl 16)+7 ;icon new	393	mov edx,(7 shl 16)+7 ;icon new
387	mcall SF_PUT_IMAGE,[image_data_toolbar],(16 shl 16)+16	394	mcall SF_PUT_IMAGE,[image_data_toolbar],(16 shl 16)+16
388		395
389	add ebx,IMAGE_TOOLBAR_ICON_SIZE	396	add ebx,IMAGE_TOOLBAR_ICON_SIZE
390	add edx,(25 shl 16) ;icon open	397	add edx,(25 shl 16) ;icon open
391	int 0x40	398	int 0x40
392	add ebx,IMAGE_TOOLBAR_ICON_SIZE	399	add ebx,IMAGE_TOOLBAR_ICON_SIZE
393	add edx,(25 shl 16) ;icon save	400	add edx,(25 shl 16) ;icon save
394	int 0x40	401	int 0x40
395		402
396	add ebx,IMAGE_TOOLBAR_ICON_SIZE	403	add ebx,IMAGE_TOOLBAR_ICON_SIZE
397	add edx,(30 shl 16) ;	404	add edx,(30 shl 16) ;
398	int 0x40	405	int 0x40
399	add ebx,IMAGE_TOOLBAR_ICON_SIZE	406	add ebx,IMAGE_TOOLBAR_ICON_SIZE
400	add edx,(25 shl 16) ;	407	add edx,(25 shl 16) ;
401	int 0x40	408	int 0x40
402	add ebx,IMAGE_TOOLBAR_ICON_SIZE	409	add ebx,IMAGE_TOOLBAR_ICON_SIZE
403	add edx,(25 shl 16) ;	410	add edx,(25 shl 16) ;
404	int 0x40	411	int 0x40
405	add ebx,IMAGE_TOOLBAR_ICON_SIZE	412	add ebx,IMAGE_TOOLBAR_ICON_SIZE
406	add edx,(25 shl 16) ;	413	add edx,(25 shl 16) ;
407	int 0x40	414	int 0x40
408	add ebx,IMAGE_TOOLBAR_ICON_SIZE	415	add ebx,IMAGE_TOOLBAR_ICON_SIZE
409	add edx,(25 shl 16) ;	416	add edx,(25 shl 16) ;
410	int 0x40	417	int 0x40
411	add ebx,IMAGE_TOOLBAR_ICON_SIZE	418	add ebx,IMAGE_TOOLBAR_ICON_SIZE
412	add edx,(25 shl 16) ;	419	add edx,(25 shl 16) ;
413	int 0x40	420	int 0x40
414	add ebx,IMAGE_TOOLBAR_ICON_SIZE	421	add ebx,IMAGE_TOOLBAR_ICON_SIZE
415	add edx,(25 shl 16) ;	422	add edx,(25 shl 16) ;
416	int 0x40	423	int 0x40
417		424
418	call draw_buffers	425	call draw_buffers
419	call draw_pok	426	call draw_pok
420		427
421	mcall SF_REDRAW,SSF_END_DRAW	428	mcall SF_REDRAW,SSF_END_DRAW
422	popad	429	popad
423	ret	430	ret
424		431
425	align 4	432	align 4
426	draw_buffers:	433	draw_buffers:
427	; * à¨á®¢ ¨¥ ¡ãä¥à *	434	; * à¨á®¢ ¨¥ ¡ãä¥à *
428	stdcall [buf2d_draw], buf_0	435	stdcall [buf2d_draw], buf_0
429	stdcall [buf2d_draw], buf_i0	436	stdcall [buf2d_draw], buf_i0
430	stdcall [buf2d_draw], buf_i1	437	stdcall [buf2d_draw], buf_i1
431	stdcall [buf2d_draw], buf_i2	438	stdcall [buf2d_draw], buf_i2
432	ret	439	ret
433		440
434	align 4	441	align 4
435	draw_pok:	442	draw_pok:
436	;®¡®¢«¥¨¥ ¯®¤¯¨á¨ à §¬¥à ä ©«	443	;®¡®¢«¥¨¥ ¯®¤¯¨á¨ à §¬¥à ä ©«
437	mov edi,txt_f_size.size	444	mov edi,txt_f_size.size
438	mov eax,dword[vox_obj_size]	445	mov eax,dword[vox_obj_size]
439	mov ebx,txt_pref	446	mov ebx,txt_pref
440	.cycle:	447	.cycle:
441	cmp eax,1024	448	cmp eax,1024
442	jl @f	449	jl @f
443	shr eax,10	450	shr eax,10
444	add ebx,4	451	add ebx,4
445	jmp .cycle	452	jmp .cycle
446	@@:	453	@@:
447		454
448	stdcall convert_int_to_str, 16	455	stdcall convert_int_to_str, 16
449	stdcall str_cat, edi,ebx	456	stdcall str_cat, edi,ebx
450	stdcall str_cat, edi,txt_space ;§ ¢¥àè îé¨© ¯à®¡¥«	457	stdcall str_cat, edi,txt_space ;§ ¢¥àè îé¨© ¯à®¡¥«
451		458
452	;à¨á®¢ ¨¥ â¥ªáâ	459	;à¨á®¢ ¨¥ â¥ªáâ
453	mov ecx,[sc.work_text]	460	mov ecx,[sc.work_text]
454	or ecx,0x80000000 or (1 shl 30)	461	or ecx,0x80000000 or (1 shl 30)
455	mov edi,[sc.work] ;æ¢¥â ä® ®ª	462	mov edi,[sc.work] ;æ¢¥â ä® ®ª
456	mcall SF_DRAW_TEXT,(275 shl 16)+7,,txt_f_size	463	mcall SF_DRAW_TEXT,(275 shl 16)+7,,txt_f_size
457		464
458	ret	465	ret
459		466
460	align 4	467	align 4
461	key:	468	key:
462	mcall SF_GET_KEY	469	mcall SF_GET_KEY
463	jmp still	470	jmp still
464		471
465		472
466	align 4	473	align 4
467	button:	474	button:
468	mcall SF_GET_BUTTON	475	mcall SF_GET_BUTTON
469	cmp ah,3	476	cmp ah,3
470	jne @f	477	jne @f
471	call but_new_file	478	call but_new_file
-		479	jmp still
472	@@:	480	@@:
473	cmp ah,4	481	cmp ah,4
474	jne @f	482	jne @f
-		483	call but_open_file ;®âªàëâ¨¥ ¢®ªá¥«ì®£® ä ©«
475	call but_open_file	484	jmp still
476	@@:	485	@@:
477	cmp ah,5	486	cmp ah,5
478	jne @f	487	jne @f
479	call but_save_file	488	call but_save_file
-		489	jmp still
480	@@:	490	@@:
481	cmp ah,6	491	cmp ah,6
482	jne @f	492	jne @f
483	call but_1	493	call but_1
-		494	jmp still
484	@@:	495	@@:
485	cmp ah,7	496	cmp ah,7
486	jne @f	497	jne @f

Subversion Repositories Kolibri OS

(root)/programs/media/voxel_editor/utilites/vox_creator.asm – Rev 7205 → 7861