forked from KolibriOS/kolibrios
1558 lines
35 KiB
NASM
1558 lines
35 KiB
NASM
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 '<27>¥à¥¬¥é¥¨¥ ¢®ªá¥«¥© 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:
|