forked from KolibriOS/kolibrios
bee21cb588
2) 'info3ds' correct scale on axis x and y git-svn-id: svn://kolibrios.org@5948 a494cfbc-eb01-0410-851d-a64ba20cac60
1330 lines
29 KiB
PHP
1330 lines
29 KiB
PHP
;
|
||
; ¢ í⮬ ä ©«¥ ᮡà ë äãªæ¨¨ ã¦ë¥ ¤«ï ᮧ¤ ¨ï ¨
|
||
; à ¡®âë ®ª á ª®®à¤¨ â ¬¨ ¢¥àè¨
|
||
;
|
||
|
||
prop_wnd_width equ 340 ;è¨à¨ ®ª ᮠ᢮©á⢠¬¨ ®¡ê¥ªâ
|
||
prop_wnd_height equ 460 ;¢ëá®â ®ª ᮠ᢮©á⢠¬¨ ®¡ê¥ªâ
|
||
3d_wnd_l equ 5 ;®âáâ㯠¤«ï tinygl ¡ãä¥à á«¥¢
|
||
3d_wnd_t equ 23 ;®âáâ㯠¤«ï tinygl ¡ãä¥à ᢥàåã
|
||
3d_wnd_w equ 320
|
||
3d_wnd_h equ 240
|
||
SIZE_ONE_FLOAT equ 14
|
||
MAX_OBJECT_SIZE equ (4+SIZE_ONE_FLOAT*3+1)
|
||
|
||
bit_vertexes equ 0
|
||
bit_faces equ 1
|
||
bit_faces_fill equ 2
|
||
bit_light equ 3
|
||
|
||
ini_name db 'info3ds.ini',0
|
||
ini_sec_w3d db 'Window 3d',0
|
||
key_dv db 'draw_vertices',0
|
||
key_df db 'draw_faces',0
|
||
key_dff db 'draw_faces_fill',0
|
||
key_dl db 'draw_light',0
|
||
key_ox db 'col_ox',0
|
||
key_oy db 'col_oy',0
|
||
key_oz db 'col_oz',0
|
||
key_bk db 'col_bkgnd',0
|
||
key_vert db 'col_vertices',0
|
||
key_face db 'col_faces',0
|
||
key_select db 'col_select',0
|
||
|
||
prop_wnd_run db 0 ;¯¥à¥¬¥ ï á«¥¤ïé ï § ⥬ çâ®-¡ë ¥ § ¯ã᪠âì ¡®«ìè¥ 1-£® ®ª ᮠ᢮©á⢠¬¨ ®¤®¢à¥¬¥®
|
||
|
||
txt_q db '?',0
|
||
txt_space:
|
||
db SIZE_ONE_FLOAT dup(' ')
|
||
.end:
|
||
db 0
|
||
|
||
rad_c dd 150 ;¤«ï ¢ëç¨á«¥¨ï à ¤¨ãá
|
||
|
||
obj_point: ;¤®¡ ¢«ï¥¬ë© ®¡ê¥ªâ
|
||
dd 0 ;㪠§ ⥫ì
|
||
.text:
|
||
rb MAX_OBJECT_SIZE
|
||
|
||
if lang eq ru
|
||
txt_select_vert: db '‚ë¡à ®: '
|
||
else
|
||
txt_select_vert: db 'Select: '
|
||
end if
|
||
.count:
|
||
dq 0,0
|
||
|
||
;¤ ®¥ ®ª® (¯à®æ¥áá) ¢ë§ë¢ ¥âìáï äãªæ¨¥© but_wnd_coords
|
||
align 4
|
||
prop_start:
|
||
pushad
|
||
mcall 40,0x27 ;¬ ᪠®¦¨¤ ¥¬ëå ᮡë⨩
|
||
inc byte[prop_wnd_run]
|
||
mov dword[w_scr_t3.type],1
|
||
call prop_wnd_clear_param
|
||
|
||
stdcall [tl_node_get_data],tree1
|
||
xor edx,edx
|
||
mov dword[capt_p],txt_q
|
||
cmp eax,0
|
||
je .no_points
|
||
mov ebx,[eax] ;¯®«ãç ¥¬ § 票¥ ᤢ¨£ ¢ë¡à ®£® ¡«®ª
|
||
add ebx,[open_file_data]
|
||
|
||
cmp word[ebx],CHUNK_OBJBLOCK
|
||
jne .end_oblo
|
||
mov dword[capt_p],txt_4000
|
||
stdcall found_block_data, tree1
|
||
cmp eax,0
|
||
je .no_points
|
||
mov esi,eax
|
||
movzx ecx,byte[esi+2] ;cl - ã஢¥ì ¢ë¡à ®£® 㧫
|
||
.cycle_0:
|
||
stdcall [tl_node_poi_get_next_info], tree1,esi
|
||
cmp eax,0
|
||
je .no_points
|
||
cmp byte[eax+2],cl
|
||
jle .no_points
|
||
mov esi,eax
|
||
stdcall [tl_node_poi_get_data], tree1,esi
|
||
mov ebx,[eax]
|
||
add ebx,[open_file_data]
|
||
cmp word[ebx],CHUNK_VERTLIST
|
||
je .ini_vlist
|
||
jmp .cycle_0
|
||
jmp .no_points
|
||
.end_oblo:
|
||
cmp word[ebx],CHUNK_TRIMESH
|
||
jne .end_trim
|
||
mov dword[capt_p],txt_4100
|
||
stdcall found_block_data, tree1
|
||
cmp eax,0
|
||
je .no_points
|
||
mov esi,eax
|
||
movzx ecx,byte[esi+2] ;cl - ã஢¥ì ¢ë¡à ®£® 㧫
|
||
.cycle_1:
|
||
stdcall [tl_node_poi_get_next_info], tree1,esi
|
||
cmp eax,0
|
||
je .no_points
|
||
cmp byte[eax+2],cl
|
||
jle .no_points
|
||
mov esi,eax
|
||
stdcall [tl_node_poi_get_data], tree1,esi
|
||
mov ebx,[eax]
|
||
add ebx,[open_file_data]
|
||
cmp word[ebx],CHUNK_VERTLIST
|
||
je .ini_vlist
|
||
jmp .cycle_1
|
||
jmp .no_points
|
||
.end_trim:
|
||
cmp word[ebx],CHUNK_VERTLIST
|
||
jne .end_vlist
|
||
mov dword[capt_p],txt_4110
|
||
.ini_vlist:
|
||
movzx edx,word[ebx+6] ;ª®««¨ç¥á⢮ â®ç¥ª
|
||
add ebx,8
|
||
;¯®¨áª ¤ ëå ¤«ï âà¥ã£®«ìª®¢
|
||
stdcall found_block_data, tree1
|
||
cmp eax,0
|
||
je .set_points
|
||
mov esi,eax
|
||
;¥á«¨ 諨 ¢ë¡à ë© ã§¥«, â® ¤ «¥¥ ¯ëâ ¥¬áï ©â¨ ã§¥« á âà¥ã£®«ì¨ª ¬¨
|
||
movzx ecx,byte[esi+2] ;cl - ã஢¥ì ¢ë¡à ®£® 㧫
|
||
.cycle_2:
|
||
stdcall [tl_node_poi_get_next_info], tree1,esi
|
||
cmp eax,0
|
||
je .set_points
|
||
mov esi,eax
|
||
stdcall [tl_node_poi_get_data], tree1,esi
|
||
cmp byte[esi+2],cl
|
||
jl .set_points
|
||
je .found
|
||
jmp .cycle_2
|
||
.found: ;¥á«¨ 諨 㧥« ⮣®¦¥ ã஢ï çâ® ¨ ¢ë¡à ë© ã§¥«
|
||
cmp eax,0
|
||
je .set_points
|
||
mov eax,[eax]
|
||
add eax,[open_file_data]
|
||
cmp word[eax],CHUNK_FACELIST
|
||
jne .cycle_2
|
||
movzx ecx,word[eax+6]
|
||
mov [obj_tri_count],ecx
|
||
add eax,8 ;2+4+2 (chunk+size+count)
|
||
mov [obj_tri_data],eax
|
||
jmp .set_points
|
||
.end_vlist:
|
||
cmp word[ebx],CHUNK_TRACKPIVOT
|
||
jne @f
|
||
inc edx
|
||
add ebx,6
|
||
mov dword[capt_p],txt_b013
|
||
jmp .set_points
|
||
@@:
|
||
cmp word[ebx],0xb014
|
||
jne @f
|
||
mov edx,2
|
||
add ebx,6
|
||
mov dword[capt_p],txt_b014
|
||
;jmp .set_points
|
||
@@:
|
||
.set_points:
|
||
mov [obj_poi_data],ebx
|
||
mov [obj_poi_count],edx
|
||
.no_points:
|
||
|
||
; áâனª ᯨ᪠®¡ê¥ªâ®¢
|
||
mov dword[tree3.info_max_count],2
|
||
add dword[tree3.info_max_count],edx ;áâ ¢¨¬ ç¨á«® 㧫®¢, à ¢®¥ ª®««¨ç¥áâ¢ã â®ç¥ª (+2 ç «® ¨ ª®¥æ ᯨ᪠)
|
||
stdcall dword[tl_data_init], tree3
|
||
mov eax,dword[icon_tl_sys]
|
||
mov dword[tree3.data_img_sys],eax
|
||
mov eax,dword[icon_toolbar]
|
||
mov dword[tree3.data_img],eax
|
||
|
||
cmp edx,0
|
||
je .no_object
|
||
mov word[NumberSymbolsAD],5
|
||
finit
|
||
.new_point:
|
||
mov dword[obj_point],ebx
|
||
mov dword[obj_point.text],0
|
||
cld
|
||
mov ecx,3
|
||
@@:
|
||
fld dword[ebx]
|
||
fstp qword[Data_Double]
|
||
call DoubleFloat_to_String
|
||
add ebx,4
|
||
stdcall str_len, Data_String
|
||
mov esi,txt_space
|
||
add esi,eax
|
||
cmp esi,txt_space.end
|
||
jl .normal_size
|
||
mov esi,txt_space.end-1 ;¬¨¨¬ã¬ 1 ¯à®¡¥« 㦮 ¤®¡ ¢¨âì, çâ®-¡ë æ¨äàë ¥ ᫨¯ «¨áì
|
||
.normal_size:
|
||
stdcall str_cat, obj_point.text,esi
|
||
stdcall str_cat, obj_point.text,Data_String
|
||
loop @b
|
||
stdcall dword[tl_node_add], tree3,(ID_ICON_POINT shl 16),obj_point
|
||
stdcall dword[tl_cur_next], tree3
|
||
dec edx
|
||
cmp edx,0
|
||
jg .new_point
|
||
stdcall dword[tl_cur_beg], tree3
|
||
.no_object:
|
||
call obj_set_sizes
|
||
edit_boxes_set_sys_color edit1,editboxes_end,sc ;ãáâ ®¢ª á¨á⥬ëå 梥⮢
|
||
stdcall [edit_box_set_text], edit1, txt_q
|
||
stdcall [edit_box_set_text], edit2, txt_q
|
||
stdcall [edit_box_set_text], edit3, txt_q
|
||
mov eax,0xc0c0c0
|
||
mov ebx,[color_ox]
|
||
shr ebx,2
|
||
and ebx,0x3f3f3f
|
||
add eax,ebx
|
||
mov [edit1.color],eax
|
||
mov eax,0xc0c0c0
|
||
mov ebx,[color_oy]
|
||
shr ebx,2
|
||
and ebx,0x3f3f3f
|
||
add eax,ebx
|
||
mov [edit2.color],eax
|
||
mov eax,0xc0c0c0
|
||
mov ebx,[color_oz]
|
||
shr ebx,2
|
||
and ebx,0x3f3f3f
|
||
add eax,ebx
|
||
mov [edit3.color],eax
|
||
|
||
mov eax,dword[ctx1] ;eax -> TinyGLContext.GLContext
|
||
mov eax,[eax] ;eax -> ZBuffer
|
||
mov eax,[eax+offs_zbuf_pbuf] ;eax -> ZBuffer.pbuf
|
||
mov dword[buf_ogl],eax
|
||
popad
|
||
|
||
call prop_red_win
|
||
|
||
;¥ ®âàë¢ âì íâã äãªæ¨î ®â ¯à¥¤ë¤ã饩
|
||
align 4
|
||
prop_still:
|
||
pushad
|
||
|
||
mcall 23,10
|
||
or eax,eax
|
||
jnz @f
|
||
call prop_timer_funct
|
||
jmp .end
|
||
@@:
|
||
|
||
cmp al,1 ;¨§¬. ¯®«®¦¥¨¥ ®ª
|
||
jne @f
|
||
call prop_red_win
|
||
jmp .end
|
||
@@:
|
||
cmp al,2
|
||
jne @f
|
||
call prop_key
|
||
jmp .end
|
||
@@:
|
||
cmp al,3
|
||
jz prop_button
|
||
cmp al,6
|
||
jne @f
|
||
call prop_mouse
|
||
@@:
|
||
.end:
|
||
popad
|
||
jmp prop_still
|
||
|
||
align 4
|
||
prop_red_win:
|
||
pushad
|
||
mcall 12,1
|
||
|
||
xor eax,eax
|
||
mov edi,dword[capt_p] ;children window caption
|
||
mov bx,word[procinfo.box.left]
|
||
add bx,word[buf_0.l]
|
||
add bx,5 ;è¨à¨ ¡®ª®¢®© à ¬ª¨
|
||
shl ebx,16
|
||
mov bx,prop_wnd_width
|
||
mov cx,word[procinfo.box.top]
|
||
add cx,word[buf_0.t]
|
||
shl ecx,16
|
||
mov cx,prop_wnd_height
|
||
mov edx,[sc.work]
|
||
or edx,0x33000000
|
||
int 0x40
|
||
|
||
mov esi,[sc.work_button]
|
||
mcall 8, (5 shl 16)+20, (266 shl 16)+20, 3
|
||
mcall , (30 shl 16)+20, (266 shl 16)+20, 4
|
||
|
||
mov ebx,[image_data_toolbar]
|
||
add ebx,3*IMAGE_TOOLBAR_ICON_SIZE
|
||
mcall 7, , (16 shl 16)+16, (7 shl 16)+268 ;load
|
||
|
||
sub ebx,IMAGE_TOOLBAR_ICON_SIZE
|
||
mov edx,(32 shl 16)+268 ;save
|
||
int 0x40
|
||
|
||
mov dword[w_scr_t3.all_redraw],1
|
||
stdcall [scrollbar_ver_draw],dword w_scr_t3
|
||
stdcall [tl_draw], tree3
|
||
stdcall [edit_box_draw], edit1
|
||
stdcall [edit_box_draw], edit2
|
||
stdcall [edit_box_draw], edit3
|
||
|
||
stdcall [kmainmenu_draw], [main_menu]
|
||
call draw_3d
|
||
mcall 12,2
|
||
popad
|
||
ret
|
||
|
||
;ãáâ ®¢ª ¢á¥å ®á®¢ëå ¯¥à¥¬¥ëå ¯® 㬮«ç ¨î
|
||
align 4
|
||
prop_wnd_clear_param:
|
||
;ãáâ ®¢ª ¯ à ¬¥â஢ ®â®¡à ¦¥¨ï
|
||
call mnu_reset_settings
|
||
|
||
;®¡ã«¥¨¥ 㪠§ ⥫¥© ¤ ë¥ ®¡ê¥ªâ®¢
|
||
mov dword[obj_poi_data],0
|
||
mov dword[obj_poi_count],0
|
||
mov dword[obj_poi_sel_c],0
|
||
mov dword[obj_tri_data],0
|
||
mov dword[obj_tri_count],0
|
||
ret
|
||
|
||
;¯®¨áª ¤ ëå
|
||
;input:
|
||
;eax - ⥪ã騩 㧥«
|
||
;output:
|
||
;eax - áâàãªâãà ⥪ã饣® 㧫 (¨«¨ 0 ¯à¨ ¥ã¤ ç¥)
|
||
align 4
|
||
proc found_block_data uses ebx ecx edx, tlist:dword
|
||
mov edx,[tlist]
|
||
mov ecx,eax
|
||
stdcall [tl_node_poi_get_info], edx,0
|
||
@@:
|
||
mov ebx,eax
|
||
stdcall [tl_node_poi_get_data], edx,ebx
|
||
cmp eax,ecx
|
||
je @f ;¥á«¨ ¯®¯ «¨ ¢ë¡à ë© ã§¥«
|
||
stdcall [tl_node_poi_get_next_info], edx,ebx
|
||
cmp eax,0
|
||
jne @b
|
||
jmp .end
|
||
@@:
|
||
mov eax,ebx
|
||
.end:
|
||
ret
|
||
endp
|
||
|
||
;ãáâ ®¢ª à §¬¥à®¢ ®¡ê¥ªâ
|
||
align 4
|
||
proc obj_set_sizes uses eax ebx esi
|
||
cmp dword[obj_poi_count],0
|
||
je .end
|
||
finit
|
||
mov eax,[obj_poi_data]
|
||
mov ebx,dword[eax]
|
||
mov [obj_x_min],ebx
|
||
mov [obj_x_max],ebx
|
||
mov ebx,dword[eax+4]
|
||
mov [obj_y_min],ebx
|
||
mov [obj_y_max],ebx
|
||
mov ebx,dword[eax+8]
|
||
mov [obj_z_min],ebx
|
||
mov [obj_z_max],ebx
|
||
|
||
mov ebx,[obj_poi_data]
|
||
mov esi,[obj_poi_count]
|
||
align 4
|
||
.cycle_0: ;à ¡®â á ª®®à¤¨ ⮩ x
|
||
fld dword[ebx]
|
||
fld dword[obj_x_min]
|
||
fcomp
|
||
fstsw ax
|
||
sahf
|
||
jb @f
|
||
mov eax,[ebx]
|
||
mov [obj_x_min],eax
|
||
ffree st0
|
||
fincstp
|
||
jmp .next_x
|
||
@@:
|
||
fld dword[obj_x_max]
|
||
fcompp
|
||
fstsw ax
|
||
sahf
|
||
ja .next_x
|
||
mov eax,[ebx]
|
||
mov [obj_x_max],eax
|
||
.next_x:
|
||
|
||
add ebx,12
|
||
dec esi
|
||
jnz .cycle_0
|
||
|
||
fld1
|
||
fld dword[obj_x_max]
|
||
fsub dword[obj_x_min]
|
||
fst dword[obj_x_centr]
|
||
fdivp ;1/size.x
|
||
fstp dword[obj_x_scale]
|
||
|
||
fld dword[obj_x_centr]
|
||
fld1
|
||
fld1
|
||
faddp
|
||
fdivp ;centr.x = size.x/2
|
||
fadd dword[obj_x_min]
|
||
fchs
|
||
fstp dword[obj_x_centr]
|
||
|
||
mov ebx,[obj_poi_data]
|
||
mov esi,[obj_poi_count]
|
||
align 4
|
||
.cycle_1: ;à ¡®â á ª®®à¤¨ ⮩ y
|
||
fld dword[ebx+4]
|
||
fld dword[obj_y_min]
|
||
fcomp
|
||
fstsw ax
|
||
sahf
|
||
jb @f
|
||
mov eax,[ebx+4]
|
||
mov [obj_y_min],eax
|
||
ffree st0
|
||
fincstp
|
||
jmp .next_y
|
||
@@:
|
||
fld dword[obj_y_max]
|
||
fcompp
|
||
fstsw ax
|
||
sahf
|
||
ja .next_y
|
||
mov eax,[ebx+4]
|
||
mov [obj_y_max],eax
|
||
.next_y:
|
||
|
||
add ebx,12
|
||
dec esi
|
||
jnz .cycle_1
|
||
|
||
fld1
|
||
fld dword[obj_y_max]
|
||
fsub dword[obj_y_min]
|
||
fst dword[obj_y_centr]
|
||
fdivp ;1/size.y
|
||
fstp dword[obj_y_scale]
|
||
|
||
fld dword[obj_y_centr]
|
||
fld1
|
||
fld1
|
||
faddp
|
||
fdivp ;centr.y = size.y/2
|
||
fadd dword[obj_y_min]
|
||
fchs
|
||
fstp dword[obj_y_centr]
|
||
|
||
mov ebx,[obj_poi_data]
|
||
mov esi,[obj_poi_count]
|
||
align 4
|
||
.cycle_2: ;à ¡®â á ª®®à¤¨ ⮩ z
|
||
fld dword[ebx+8]
|
||
fld dword[obj_z_min]
|
||
fcomp
|
||
fstsw ax
|
||
sahf
|
||
jb @f
|
||
mov eax,[ebx+8]
|
||
mov [obj_z_min],eax
|
||
ffree st0
|
||
fincstp
|
||
jmp .next_z
|
||
@@:
|
||
fld dword[obj_z_max]
|
||
fcompp
|
||
fstsw ax
|
||
sahf
|
||
ja .next_z
|
||
mov eax,[ebx+8]
|
||
mov [obj_z_max],eax
|
||
.next_z:
|
||
|
||
add ebx,12
|
||
dec esi
|
||
jnz .cycle_2
|
||
|
||
fld1
|
||
fld dword[obj_z_max]
|
||
fsub dword[obj_z_min]
|
||
fst dword[obj_z_centr]
|
||
fdivp ;1/size.z
|
||
fstp dword[obj_z_scale]
|
||
|
||
fld dword[obj_z_centr]
|
||
fld1
|
||
fld1
|
||
faddp
|
||
fdivp ;centr.z = size.z/2
|
||
fadd dword[obj_z_min]
|
||
fchs
|
||
fstp dword[obj_z_centr]
|
||
|
||
; 室¨¬ à ¤¨ãá ¤«ï áä¥àë
|
||
fld dword[obj_x_max]
|
||
fsub dword[obj_x_min]
|
||
fld dword[obj_y_max]
|
||
fsub dword[obj_y_min]
|
||
faddp
|
||
fild dword[rad_c]
|
||
fdivp ;radius=(size.x+size.y)/rad_c
|
||
fstp dword[sph_radius]
|
||
|
||
;¤¥« ¥¬ ®¤¨ ª®¢ë© ¬ áèâ ¡ ¯® ®áï¬ x ¨ y, çâ®-¡ë ¥ àãè «¨áì ¯à®¯®à樨 ¨§®¡à ¦¥¨ï
|
||
fld dword[obj_y_scale]
|
||
fdiv dword[ratio] ;¯à¨¢¥¤¥¨¥ ¬ áèâ ¡ ¯® ®á¨ y ãç¨âë¢ ï çâ® ¯® ¢ëá®â¥ íªà ¬¥ìè¥
|
||
fcomp dword[obj_x_scale]
|
||
fstsw ax
|
||
sahf
|
||
jb @f
|
||
;ᦠ⨥ ¬ áèâ ¡ ¯® y
|
||
fld dword[obj_x_scale]
|
||
fmul dword[ratio]
|
||
fstp dword[obj_y_scale] ;¬ áèâ ¡ ¯® ®á¨ y = ¬ áèâ ¡ ¯® ®á¨ x
|
||
jmp .end
|
||
@@:
|
||
;ᦠ⨥ ¬ áèâ ¡ ¯® x >...<
|
||
fld dword[obj_x_scale]
|
||
fdiv dword[ratio]
|
||
fstp dword[obj_x_scale]
|
||
.end:
|
||
ret
|
||
endp
|
||
|
||
;à¨á®¢ ¨¥ â®ç¥ª ¢ 3d
|
||
align 4
|
||
draw_3d:
|
||
cmp dword[obj_poi_count],2
|
||
jl .end_f
|
||
stdcall [glClear], GL_COLOR_BUFFER_BIT + GL_DEPTH_BUFFER_BIT ;®ç¨á⨬ ¡ãä¥à 梥⠨ £«ã¡¨ë
|
||
stdcall [glPushMatrix]
|
||
bt dword[draw_mode],bit_light
|
||
jnc @f
|
||
call SetLight
|
||
jmp .end_l
|
||
@@:
|
||
stdcall [glDisable],GL_LIGHTING
|
||
.end_l:
|
||
stdcall [glTranslatef], 0.0,0.0,0.5 ;correct for z
|
||
stdcall [glScalef], [obj_x_scale],[obj_y_scale],[obj_z_scale]
|
||
stdcall [glScalef], 1.0,1.0,0.7 ;correct for z
|
||
stdcall [glRotatef], [angle_z],0.0,0.0,1.0
|
||
stdcall [glRotatef], [angle_y],0.0,1.0,0.0
|
||
stdcall [glRotatef], [angle_x],1.0,0.0,0.0
|
||
stdcall [glTranslatef], [obj_x_centr],[obj_y_centr],[obj_z_centr]
|
||
|
||
;à¨á®¢ ¨¥ â®ç¥ª
|
||
bt dword[draw_mode],bit_vertexes
|
||
jnc .end_points
|
||
stdcall [glColor3ub],[color_vert+2],[color_vert+1],[color_vert]
|
||
stdcall [glBegin],GL_POINTS
|
||
mov eax,[obj_poi_data]
|
||
mov ebx,[obj_poi_count]
|
||
@@:
|
||
stdcall [glVertex3f], [eax],[eax+4],[eax+8]
|
||
add eax,12
|
||
dec ebx
|
||
jnz @b
|
||
stdcall [glEnd]
|
||
.end_points:
|
||
|
||
;à¨á®¢ ¨¥ ªâ¨¢®© â®çª¨
|
||
stdcall [tl_node_get_data],tree3
|
||
cmp eax,0
|
||
je @f
|
||
;¢ë¤¥«¥¨¥ ªâ¨¢®© â®çª¨
|
||
mov eax,[eax]
|
||
|
||
stdcall [glBegin],GL_LINES
|
||
stdcall [glColor3ub],[color_ox+2],[color_ox+1],[color_ox]
|
||
stdcall [glVertex3f], [obj_x_min],[eax+4],[eax+8]
|
||
stdcall [glVertex3f], [obj_x_max],[eax+4],[eax+8]
|
||
stdcall [glColor3ub],[color_oy+2],[color_oy+1],[color_oy]
|
||
stdcall [glVertex3f], [eax],[obj_y_min],[eax+8]
|
||
stdcall [glVertex3f], [eax],[obj_y_max],[eax+8]
|
||
stdcall [glColor3ub],[color_oz+2],[color_oz+1],[color_oz]
|
||
stdcall [glVertex3f], [eax],[eax+4],[obj_z_min]
|
||
stdcall [glVertex3f], [eax],[eax+4],[obj_z_max]
|
||
stdcall [glEnd]
|
||
|
||
stdcall [glColor3ub],[color_select+2],[color_select+1],[color_select]
|
||
stdcall [glPushMatrix]
|
||
stdcall [glTranslatef], [eax],[eax+4],[eax+8]
|
||
stdcall [gluSphere], [qObj], [sph_radius], 8,8
|
||
stdcall [glPopMatrix]
|
||
@@:
|
||
|
||
;à¨á®¢ ¨¥ ¢ë¤¥«¥ëå â®ç¥ª
|
||
cmp dword[obj_poi_sel_c],0
|
||
je .end_select
|
||
mov ecx,dword[obj_poi_sel_c]
|
||
stdcall [glColor3ub],[color_select+2],[color_select+1],[color_select]
|
||
stdcall dword[tl_node_poi_get_info], tree3,0
|
||
@@:
|
||
cmp eax,0
|
||
je .end_select
|
||
mov ebx,eax
|
||
cmp word[ebx],ID_ICON_POINT_SEL
|
||
jne .next_sel
|
||
stdcall [tl_node_poi_get_data], tree3,ebx
|
||
mov eax,[eax]
|
||
stdcall [glPushMatrix]
|
||
stdcall [glTranslatef], [eax],[eax+4],[eax+8]
|
||
stdcall [gluSphere], [qObj], [sph_radius], 4,4
|
||
stdcall [glPopMatrix]
|
||
dec ecx
|
||
jz .end_select
|
||
.next_sel:
|
||
stdcall dword[tl_node_poi_get_next_info], tree3,ebx
|
||
jmp @b
|
||
.end_select:
|
||
|
||
;à¨á®¢ ¨¥ £à ¥©
|
||
bt dword[draw_mode],bit_faces
|
||
jnc .end_triangles
|
||
cmp dword[obj_tri_count],0
|
||
je .end_triangles
|
||
cmp dword[obj_poi_count],0
|
||
je .end_triangles
|
||
bt dword[draw_mode],bit_faces_fill
|
||
jc @f
|
||
push GL_LINE
|
||
jmp .end_0
|
||
@@:
|
||
push GL_FILL
|
||
.end_0:
|
||
stdcall [glPolygonMode], GL_FRONT_AND_BACK ;mode - 㦥 ¢ á⥪¥
|
||
stdcall [glColor3ub],[color_face+2],[color_face+1],[color_face]
|
||
stdcall [glBegin],GL_TRIANGLES
|
||
mov eax,[obj_tri_data]
|
||
mov ecx,[obj_tri_count]
|
||
@@:
|
||
movzx ebx,word[eax] ;1-ï ¢¥àè¨
|
||
imul ebx,12
|
||
add ebx,[obj_poi_data]
|
||
stdcall [glVertex3f], [ebx],[ebx+4],[ebx+8]
|
||
movzx ebx,word[eax+2] ;2-ï ¢¥àè¨
|
||
imul ebx,12
|
||
add ebx,[obj_poi_data]
|
||
stdcall [glVertex3f], [ebx],[ebx+4],[ebx+8]
|
||
movzx ebx,word[eax+4] ;3-ï ¢¥àè¨
|
||
imul ebx,12
|
||
add ebx,[obj_poi_data]
|
||
stdcall [glVertex3f], [ebx],[ebx+4],[ebx+8]
|
||
add eax,8 ;à §¬¥à âà¥ã£®«ì¨ª = (3 ¢¥àè¨ë (¯® 2¡) + ᢮©á⢠(2¡))
|
||
dec ecx
|
||
jnz @b
|
||
stdcall [glEnd]
|
||
.end_triangles:
|
||
|
||
stdcall [glPopMatrix]
|
||
cmp dword[obj_poi_sel_c],0
|
||
je @f
|
||
stdcall [buf2d_draw_text], buf_ogl, buf_1,txt_select_vert,5,3,[color_select]
|
||
@@:
|
||
stdcall [kosglSwapBuffers]
|
||
.end_f:
|
||
ret
|
||
|
||
align 4
|
||
SetLight:
|
||
stdcall [glLightfv], GL_LIGHT0, GL_POSITION, light_position
|
||
stdcall [glLightfv], GL_LIGHT0, GL_SPOT_DIRECTION, light_dir
|
||
|
||
stdcall [glLightfv], GL_LIGHT0, GL_DIFFUSE, white_light
|
||
stdcall [glLightfv], GL_LIGHT0, GL_SPECULAR, white_light
|
||
|
||
stdcall [glEnable], GL_COLOR_MATERIAL
|
||
stdcall [glColorMaterial], GL_FRONT, GL_AMBIENT_AND_DIFFUSE
|
||
stdcall [glMaterialfv], GL_FRONT, GL_SPECULAR, mat_specular
|
||
stdcall [glMaterialf], GL_FRONT, GL_SHININESS, mat_shininess
|
||
stdcall [glLightModelfv], GL_LIGHT_MODEL_AMBIENT, lmodel_ambient
|
||
|
||
stdcall [glEnable],GL_LIGHTING
|
||
stdcall [glEnable],GL_LIGHT0
|
||
ret
|
||
|
||
align 4
|
||
proc prop_key uses eax ebx
|
||
mcall 2
|
||
|
||
test word [edit1.flags],10b ;ed_focus
|
||
je @f
|
||
stdcall [edit_box_key], edit1
|
||
jmp .end
|
||
@@:
|
||
test word [edit2.flags],10b
|
||
je @f
|
||
stdcall [edit_box_key], edit2
|
||
jmp .end
|
||
@@:
|
||
test word [edit3.flags],10b
|
||
je @f
|
||
stdcall [edit_box_key], edit3
|
||
jmp .end
|
||
@@:
|
||
cmp dword[el_focus], tree3
|
||
jne @f
|
||
stdcall [tl_key], tree3
|
||
jmp .end
|
||
@@:
|
||
|
||
cmp ah,178 ;Up
|
||
jne @f
|
||
fld dword[angle_x]
|
||
fadd dword[delt_size]
|
||
fstp dword[angle_x]
|
||
call draw_3d
|
||
jmp .end
|
||
@@:
|
||
cmp ah,177 ;Down
|
||
jne @f
|
||
fld dword[angle_x]
|
||
fsub dword[delt_size]
|
||
fstp dword[angle_x]
|
||
call draw_3d
|
||
jmp .end
|
||
@@:
|
||
cmp ah,176 ;Left
|
||
jne @f
|
||
fld dword[angle_y]
|
||
fadd dword[delt_size]
|
||
fstp dword[angle_y]
|
||
call draw_3d
|
||
jmp .end
|
||
@@:
|
||
cmp ah,179 ;Right
|
||
jne @f
|
||
fld dword[angle_y]
|
||
fsub dword[delt_size]
|
||
fstp dword[angle_y]
|
||
call draw_3d
|
||
;jmp .end
|
||
@@:
|
||
.end:
|
||
ret
|
||
endp
|
||
|
||
align 4
|
||
prop_mouse:
|
||
push eax ebx
|
||
mcall 37,3
|
||
bt eax,0
|
||
jnc .end_m
|
||
;mouse l. but. move
|
||
cmp dword[mouse_drag],1
|
||
jne .end_m
|
||
mcall 37,1 ;get mouse coords
|
||
mov ebx,eax
|
||
shr ebx,16 ;mouse.x
|
||
cmp ebx,3d_wnd_l
|
||
jg @f
|
||
mov ebx,3d_wnd_l
|
||
@@:
|
||
sub ebx,3d_wnd_l
|
||
cmp ebx,3d_wnd_w
|
||
jle @f
|
||
mov ebx,3d_wnd_w
|
||
@@:
|
||
and eax,0xffff ;mouse.y
|
||
cmp eax,3d_wnd_t
|
||
jg @f
|
||
mov eax,3d_wnd_t
|
||
@@:
|
||
sub eax,3d_wnd_t
|
||
cmp eax,3d_wnd_h
|
||
jle @f
|
||
mov eax,3d_wnd_h
|
||
@@:
|
||
finit
|
||
fild dword[mouse_y]
|
||
mov [mouse_y],eax
|
||
fisub dword[mouse_y]
|
||
fdiv dword[angle_dxm] ;¥á«¨ ªãàá®à ¤¢¨¦¥âáï ¯® ®á¨ y (¢¢¥àå ¨«¨ ¢¨§) â® ¯®¢®à®â ¤¥« ¥¬ ¢®ªà㣠®á¨ x
|
||
fadd dword[angle_x]
|
||
fstp dword[angle_x]
|
||
|
||
fild dword[mouse_x]
|
||
mov [mouse_x],ebx
|
||
fisub dword[mouse_x]
|
||
fdiv dword[angle_dym] ;¥á«¨ ªãàá®à ¤¢¨¦¥âáï ¯® ®á¨ x (¢¢¥àå ¨«¨ ¢¨§) â® ¯®¢®à®â ¤¥« ¥¬ ¢®ªà㣠®á¨ y
|
||
fadd dword[angle_y]
|
||
fstp dword[angle_y]
|
||
|
||
call draw_3d
|
||
jmp .end_d
|
||
.end_m:
|
||
bt eax,16
|
||
jnc @f
|
||
;mouse l. but. up
|
||
mov dword[mouse_drag],0
|
||
jmp .end_d
|
||
@@:
|
||
bt eax,8
|
||
jnc .end_d
|
||
;mouse l. but. press
|
||
mcall 37,1 ;get mouse coords
|
||
mov ebx,eax
|
||
shr ebx,16 ;mouse.x
|
||
cmp ebx,3d_wnd_l
|
||
jl .end_d
|
||
sub ebx,3d_wnd_l
|
||
cmp ebx,3d_wnd_w
|
||
jg .end_d
|
||
and eax,0xffff ;mouse.y
|
||
cmp eax,3d_wnd_t
|
||
jl .end_d
|
||
sub eax,3d_wnd_t
|
||
cmp eax,3d_wnd_h
|
||
jg .end_d
|
||
mov dword[mouse_drag],1
|
||
mov dword[mouse_x],ebx
|
||
mov dword[mouse_y],eax
|
||
.end_d:
|
||
|
||
stdcall [kmainmenu_dispatch_cursorevent], [main_menu]
|
||
stdcall [tl_mouse], tree3
|
||
stdcall [edit_box_mouse], edit1
|
||
stdcall [edit_box_mouse], edit2
|
||
stdcall [edit_box_mouse], edit3
|
||
pop ebx eax
|
||
ret
|
||
|
||
align 4
|
||
prop_button:
|
||
mcall 17 ;¯®«ãç¨âì ª®¤ ¦ ⮩ ª®¯ª¨
|
||
|
||
cmp ah,3
|
||
jne @f
|
||
call get_point_coords
|
||
call draw_3d
|
||
jmp prop_still.end
|
||
@@:
|
||
cmp ah,4
|
||
jne @f
|
||
push eax ebx ecx edi esi
|
||
stdcall [tl_node_get_data],tree3
|
||
cmp eax,0
|
||
je .no_select_1
|
||
mov ebx,[eax]
|
||
finit
|
||
|
||
mov esi,string1
|
||
mov edi,Data_String
|
||
cld
|
||
mov ecx,8
|
||
rep movsd
|
||
call String_to_DoubleFloat
|
||
fld qword[Data_Double] ;áç¨âë¢ ¥¬ ª ª double
|
||
fstp dword[ebx] ;á®åà 塞 ª ª float
|
||
|
||
mov esi,string2
|
||
mov edi,Data_String
|
||
cld
|
||
mov ecx,8
|
||
rep movsd
|
||
call String_to_DoubleFloat
|
||
fld qword[Data_Double] ;áç¨âë¢ ¥¬ ª ª double
|
||
fstp dword[ebx+4] ;á®åà 塞 ª ª float
|
||
|
||
mov esi,string3
|
||
mov edi,Data_String
|
||
cld
|
||
mov ecx,8
|
||
rep movsd
|
||
call String_to_DoubleFloat
|
||
fld qword[Data_Double] ;áç¨âë¢ ¥¬ ª ª double
|
||
fstp dword[ebx+8] ;á®åà 塞 ª ª float
|
||
|
||
;®¡®¢«¥¨¥ ¨§¬¥¥®£® 㧫 ¢ ᯨ᪥ tree3 ¨ £« ¢®£® ®ª (¯® â ©¬¥àã)
|
||
mov word[NumberSymbolsAD],5
|
||
mov dword[obj_point],ebx
|
||
mov dword[obj_point.text],0
|
||
cld
|
||
mov ecx,3
|
||
.coord:
|
||
fld dword[ebx]
|
||
fstp qword[Data_Double]
|
||
call DoubleFloat_to_String
|
||
add ebx,4
|
||
stdcall str_len, Data_String
|
||
mov esi,txt_space
|
||
add esi,eax
|
||
cmp esi,txt_space.end
|
||
jl .normal_size
|
||
mov esi,txt_space.end-1 ;¬¨¨¬ã¬ 1 ¯à®¡¥« 㦮 ¤®¡ ¢¨âì, çâ®-¡ë æ¨äàë ¥ ᫨¯ «¨áì
|
||
.normal_size:
|
||
stdcall str_cat, obj_point.text,esi
|
||
stdcall str_cat, obj_point.text,Data_String
|
||
loop .coord
|
||
mov byte[obj_point.text],'*' ;®â¬¥ç ¥¬ çâ® ¢¥àè¨ ¨§¬¥ï« áì
|
||
stdcall dword[tl_node_set_data], tree3,obj_point
|
||
stdcall dword[tl_draw], tree3
|
||
mov byte[can_save],1 ;¤«ï ¯®ª § ª®¯ª¨ '‘®åà ¨âì'
|
||
mov dword[offs_last_timer],0 ;¤«ï ®¡®¢«¥¨ï ¡«®ª ¢ â ©¬¥à¥
|
||
call draw_3d
|
||
.no_select_1:
|
||
pop esi edi ecx ebx eax
|
||
jmp prop_still.end
|
||
@@:
|
||
cmp ah,5
|
||
jne @f
|
||
call mnu_vertexes_on_off
|
||
jmp prop_still.end
|
||
@@:
|
||
cmp ah,6
|
||
jne @f
|
||
call mnu_faces_on_off
|
||
jmp prop_still.end
|
||
@@:
|
||
cmp ah,7
|
||
jne @f
|
||
call mnu_faces_fill_on_off
|
||
jmp prop_still.end
|
||
@@:
|
||
cmp ah,8
|
||
jne @f
|
||
call mnu_light_on_off
|
||
jmp prop_still.end
|
||
@@:
|
||
cmp ah,9
|
||
jne @f
|
||
call mnu_reset_settings
|
||
jmp prop_still.end
|
||
@@:
|
||
cmp ah,10
|
||
jne @f
|
||
call mnu_vertexes_select
|
||
jmp prop_still.end
|
||
@@:
|
||
cmp ah,11
|
||
jne @f
|
||
call mnu_vertexes_deselect
|
||
jmp prop_still.end
|
||
@@:
|
||
cmp ah,12
|
||
jne @f
|
||
call mnu_reset_average_x
|
||
jmp prop_still.end
|
||
@@:
|
||
cmp ah,13
|
||
jne @f
|
||
call mnu_reset_average_y
|
||
jmp prop_still.end
|
||
@@:
|
||
cmp ah,14
|
||
jne @f
|
||
call mnu_reset_average_z
|
||
jmp prop_still.end
|
||
@@:
|
||
|
||
cmp ah,1
|
||
jne prop_still.end
|
||
.exit:
|
||
mov dword[tree3.data_img],0 ;ç¨á⨬ 㪠§ ⥫¨ ¨ª®ª¨ çâ®-¡ë ¨å ¥ 㤠«¨« ¤¥áâàãªâ®à
|
||
mov dword[tree3.data_img_sys],0 ;â. ª. ®¨ ¥é¥ ¨á¯®«ì§ãîâìáï ¢ ¤à㣨å í«¥¬¥â å
|
||
stdcall dword[tl_data_clear], tree3
|
||
mov byte[prop_wnd_run],0 ;®¡ã«ï¥¬ áç¥â稪 ®ª®
|
||
mcall -1 ;¢ë室 ¨§ ¯à®£à ¬¬ë
|
||
|
||
align 4
|
||
get_point_coords:
|
||
;§ £à㧪 ª®®à¤¨ â ¢ editbox-ë
|
||
push eax ebx
|
||
stdcall [tl_node_get_data],tree3
|
||
cmp eax,0
|
||
je @f
|
||
mov ebx,[eax]
|
||
mov word[NumberSymbolsAD],8
|
||
finit
|
||
fld dword[ebx]
|
||
fstp qword[Data_Double]
|
||
call DoubleFloat_to_String
|
||
stdcall [edit_box_set_text], edit1, Data_String
|
||
fld dword[ebx+4]
|
||
fstp qword[Data_Double]
|
||
call DoubleFloat_to_String
|
||
stdcall [edit_box_set_text], edit2, Data_String
|
||
fld dword[ebx+8]
|
||
fstp qword[Data_Double]
|
||
call DoubleFloat_to_String
|
||
stdcall [edit_box_set_text], edit3, Data_String
|
||
stdcall [edit_box_draw], edit1
|
||
stdcall [edit_box_draw], edit2
|
||
stdcall [edit_box_draw], edit3
|
||
@@:
|
||
pop ebx eax
|
||
ret
|
||
|
||
align 4
|
||
proc prop_timer_funct uses eax
|
||
;¯à®á¬ âਢ ¥¬ ¢ë¤¥«¥ãî ª®®à¤¨ âã
|
||
stdcall [tl_node_get_data],tree3
|
||
cmp [cursor_last_draw],eax
|
||
je @f
|
||
mov [cursor_last_draw],eax
|
||
call draw_3d
|
||
@@:
|
||
ret
|
||
endp
|
||
|
||
;¨§¬¥ï¥¬ ०¨¬ à¨á®¢ ¨ï ¢¥àè¨
|
||
align 4
|
||
mnu_vertexes_on_off:
|
||
xor dword[draw_mode], 1 shl bit_vertexes
|
||
ret
|
||
|
||
;¨§¬¥ï¥¬ ०¨¬ à¨á®¢ ¨ï £à ¥©
|
||
align 4
|
||
mnu_faces_on_off:
|
||
xor dword[draw_mode], 1 shl bit_faces
|
||
ret
|
||
|
||
;¨§¬¥ï¥¬ ª ઠáë¥ ¨«¨ ᯫ®èë¥ £à ¨
|
||
align 4
|
||
mnu_faces_fill_on_off:
|
||
xor dword[draw_mode], 1 shl bit_faces_fill
|
||
or dword[draw_mode], 1 shl bit_faces ;¢ª«îç ¥¬ ०¨¬ à¨á®¢ ¨ï £à ¥© (¥á«¨ ¢¤à㣠¡ë« ®âª«îç¥)
|
||
ret
|
||
|
||
;¢ª«îç ¥¬ ¨«¨ ®âª«îç ¥¬ ®á¢¥é¥¨¥
|
||
align 4
|
||
mnu_light_on_off:
|
||
xor dword[draw_mode], 1 shl bit_light
|
||
ret
|
||
|
||
align 4
|
||
mnu_reset_settings:
|
||
mov dword[angle_x],0.0
|
||
mov dword[angle_y],0.0
|
||
mov dword[angle_z],0.0
|
||
m2m dword[draw_mode],dword[def_dr_mode]
|
||
ret
|
||
|
||
align 4
|
||
proc mnu_vertexes_select uses eax ebx
|
||
stdcall [tl_node_get_data],tree3
|
||
cmp eax,0
|
||
je .no_points
|
||
stdcall found_block_data,tree3
|
||
cmp eax,0
|
||
je .no_points
|
||
mov bx,word[eax]
|
||
cmp bx,ID_ICON_POINT_SEL
|
||
je @f
|
||
mov word[eax],ID_ICON_POINT_SEL
|
||
inc dword[obj_poi_sel_c]
|
||
jmp .change
|
||
@@:
|
||
mov word[eax],ID_ICON_POINT
|
||
dec dword[obj_poi_sel_c]
|
||
.change:
|
||
mov eax,[obj_poi_sel_c]
|
||
stdcall convert_int_to_str, txt_select_vert.count,16
|
||
.no_points:
|
||
ret
|
||
endp
|
||
|
||
align 4
|
||
proc mnu_vertexes_deselect uses eax
|
||
cmp dword[obj_poi_sel_c],0
|
||
je .no_points
|
||
mov dword[obj_poi_sel_c],0
|
||
stdcall [tl_node_poi_get_info], tree3,0
|
||
cmp eax,0
|
||
je .no_points
|
||
@@:
|
||
mov word[eax],ID_ICON_POINT
|
||
stdcall [tl_node_poi_get_next_info], tree3,eax
|
||
cmp eax,0
|
||
jne @b
|
||
.no_points:
|
||
ret
|
||
endp
|
||
|
||
align 4
|
||
proc mnu_reset_average_x uses eax ebx ecx edx edi
|
||
cmp dword[obj_poi_sel_c],2
|
||
jl .end_select
|
||
finit
|
||
fldz
|
||
mov ecx,dword[obj_poi_sel_c]
|
||
stdcall dword[tl_node_poi_get_info], tree3,0
|
||
@@:
|
||
cmp eax,0
|
||
je .end_select
|
||
mov ebx,eax
|
||
cmp word[ebx],ID_ICON_POINT_SEL
|
||
jne .next_sel0
|
||
stdcall [tl_node_poi_get_data], tree3,ebx
|
||
mov eax,[eax]
|
||
fadd dword[eax]
|
||
dec ecx
|
||
jz @f
|
||
.next_sel0:
|
||
stdcall dword[tl_node_poi_get_next_info], tree3,ebx
|
||
jmp @b
|
||
@@:
|
||
fidiv dword[obj_poi_sel_c]
|
||
fstp dword[eax]
|
||
mov edx,[eax]
|
||
mov ecx,dword[obj_poi_sel_c]
|
||
stdcall dword[tl_node_poi_get_info], tree3,0
|
||
@@:
|
||
cmp eax,0
|
||
je .end_select
|
||
mov ebx,eax
|
||
cmp word[ebx],ID_ICON_POINT_SEL
|
||
jne .next_sel1
|
||
stdcall [tl_node_poi_get_data], tree3,ebx
|
||
mov edi,eax
|
||
mov eax,[eax]
|
||
mov [eax],edx
|
||
stdcall update_tree, edi
|
||
dec ecx
|
||
jz @f
|
||
.next_sel1:
|
||
stdcall dword[tl_node_poi_get_next_info], tree3,ebx
|
||
jmp @b
|
||
@@:
|
||
.end_select:
|
||
ret
|
||
endp
|
||
|
||
align 4
|
||
proc mnu_reset_average_y uses eax ebx ecx edx edi
|
||
cmp dword[obj_poi_sel_c],2
|
||
jl .end_select
|
||
finit
|
||
fldz
|
||
mov ecx,dword[obj_poi_sel_c]
|
||
stdcall dword[tl_node_poi_get_info], tree3,0
|
||
@@:
|
||
cmp eax,0
|
||
je .end_select
|
||
mov ebx,eax
|
||
cmp word[ebx],ID_ICON_POINT_SEL
|
||
jne .next_sel0
|
||
stdcall [tl_node_poi_get_data], tree3,ebx
|
||
mov eax,[eax]
|
||
fadd dword[eax+4]
|
||
dec ecx
|
||
jz @f
|
||
.next_sel0:
|
||
stdcall dword[tl_node_poi_get_next_info], tree3,ebx
|
||
jmp @b
|
||
@@:
|
||
fidiv dword[obj_poi_sel_c]
|
||
fstp dword[eax+4]
|
||
mov edx,[eax+4]
|
||
mov ecx,dword[obj_poi_sel_c]
|
||
stdcall dword[tl_node_poi_get_info], tree3,0
|
||
@@:
|
||
cmp eax,0
|
||
je .end_select
|
||
mov ebx,eax
|
||
cmp word[ebx],ID_ICON_POINT_SEL
|
||
jne .next_sel1
|
||
stdcall [tl_node_poi_get_data], tree3,ebx
|
||
mov edi,eax
|
||
mov eax,[eax]
|
||
mov [eax+4],edx
|
||
stdcall update_tree, edi
|
||
dec ecx
|
||
jz @f
|
||
.next_sel1:
|
||
stdcall dword[tl_node_poi_get_next_info], tree3,ebx
|
||
jmp @b
|
||
@@:
|
||
.end_select:
|
||
ret
|
||
endp
|
||
|
||
align 4
|
||
proc mnu_reset_average_z uses eax ebx ecx edx edi
|
||
cmp dword[obj_poi_sel_c],2
|
||
jl .end_select
|
||
finit
|
||
fldz
|
||
mov ecx,dword[obj_poi_sel_c]
|
||
stdcall dword[tl_node_poi_get_info], tree3,0
|
||
@@:
|
||
cmp eax,0
|
||
je .end_select
|
||
mov ebx,eax
|
||
cmp word[ebx],ID_ICON_POINT_SEL
|
||
jne .next_sel0
|
||
stdcall [tl_node_poi_get_data], tree3,ebx
|
||
mov eax,[eax]
|
||
fadd dword[eax+8]
|
||
dec ecx
|
||
jz @f
|
||
.next_sel0:
|
||
stdcall dword[tl_node_poi_get_next_info], tree3,ebx
|
||
jmp @b
|
||
@@:
|
||
fidiv dword[obj_poi_sel_c]
|
||
fstp dword[eax+8]
|
||
mov edx,[eax+8]
|
||
mov ecx,dword[obj_poi_sel_c]
|
||
stdcall dword[tl_node_poi_get_info], tree3,0
|
||
@@:
|
||
cmp eax,0
|
||
je .end_select
|
||
mov ebx,eax
|
||
cmp word[ebx],ID_ICON_POINT_SEL
|
||
jne .next_sel1
|
||
stdcall [tl_node_poi_get_data], tree3,ebx
|
||
mov edi,eax
|
||
mov eax,[eax]
|
||
mov [eax+8],edx
|
||
stdcall update_tree, edi
|
||
dec ecx
|
||
jz @f
|
||
.next_sel1:
|
||
stdcall dword[tl_node_poi_get_next_info], tree3,ebx
|
||
jmp @b
|
||
@@:
|
||
.end_select:
|
||
ret
|
||
endp
|
||
|
||
align 4
|
||
proc update_tree h_mem:dword
|
||
pushad
|
||
mov edi,[h_mem]
|
||
mov ebx,[edi]
|
||
finit
|
||
|
||
;®¡®¢«¥¨¥ ¨§¬¥¥®£® 㧫 ¢ ᯨ᪥ tree3 ¨ £« ¢®£® ®ª (¯® â ©¬¥àã)
|
||
mov word[NumberSymbolsAD],5
|
||
mov dword[obj_point.text],0
|
||
cld
|
||
mov ecx,3
|
||
.coord:
|
||
fld dword[ebx]
|
||
fstp qword[Data_Double]
|
||
call DoubleFloat_to_String
|
||
add ebx,4
|
||
stdcall str_len, Data_String
|
||
mov esi,txt_space
|
||
add esi,eax
|
||
cmp esi,txt_space.end
|
||
jl .normal_size
|
||
mov esi,txt_space.end-1 ;¬¨¨¬ã¬ 1 ¯à®¡¥« 㦮 ¤®¡ ¢¨âì, çâ®-¡ë æ¨äàë ¥ ᫨¯ «¨áì
|
||
.normal_size:
|
||
stdcall str_cat, obj_point.text,esi
|
||
stdcall str_cat, obj_point.text,Data_String
|
||
loop .coord
|
||
mov esi,obj_point.text
|
||
mov byte[esi],'*' ;®â¬¥ç ¥¬ çâ® ¢¥àè¨ ¨§¬¥ï« áì
|
||
mov byte[can_save],1 ;¤«ï ¯®ª § ª®¯ª¨ '‘®åà ¨âì'
|
||
add edi,4
|
||
mov ecx,MAX_OBJECT_SIZE-4
|
||
rep movsb
|
||
popad
|
||
ret
|
||
endp
|
||
|
||
align 4
|
||
def_dr_mode dd 0 ;०¨¬ à¨á®¢ ¨ï ¯® 㬮«ç ¨î
|
||
delt_size dd 3.0 ;¨§¬¥¥¨¥ 㣫®¢ ¯à¨ ¯®¢®à®â å á ª«¨¢¨ âãàë
|
||
mouse_drag dd 0 ;०¨¬ ¯®¢®à®â áæ¥ë ®â ¯¥à¥¬¥é¥¨¨ ªãàá®à ¬ëè¨
|
||
mouse_x dd 0
|
||
mouse_y dd 0
|
||
angle_dxm dd 1.7775 ;~ 3d_wnd_w/180 - ¯à¨¡ ¢«¥¨¥ 㣫®¢ ¯®¢®à®â áæ¥ë ¯à¨ ¢à 饨¨ ¬ë襩
|
||
angle_dym dd 1.3335 ;~ 3d_wnd_h/180
|
||
ratio dd 1.3333 ;~ 3d_wnd_w/3d_wnd_h
|
||
;angle_dzm dd ?
|
||
draw_mode dd 0 ;०¨¬ à¨á®¢ ¨ï ®¡ê¥ªâ
|
||
obj_poi_data dd 0 ;㪠§ â¥«ì ª®®à¤¨ âë ¢¥àè¨
|
||
obj_poi_count dd 0 ;ª®««¨ç¥á⢮ ¢¥àè¨
|
||
obj_poi_sel_c dd 0 ;ª®««¨ç¥á⢮ ¢ë¤¥«¥ëå ¢¥àè¨
|
||
obj_tri_data dd 0 ;㪠§ â¥«ì ¤ ë¥ âà¥ã£®«ì¨ª®¢
|
||
obj_tri_count dd 0 ;ª®««¨ç¥á⢮ âà¥ã£®«ì¨ª®¢
|
||
cursor_last_draw dd 0 ;¯®«®¦¥¨¥ ªãàá®à ¯à¨ ¯®á«¥¤¥© ¯à®à¨á®¢ª¥ 3d ®ª
|
||
sph_radius dd 0 ;à ¤¨ãá áä¥àë ¤«ï ¢ë¤¥«¥¨ï ªâ¨¢®© â®çª¨
|
||
obj_x_max dd 0
|
||
obj_x_min dd 0
|
||
obj_x_centr dd 0
|
||
obj_x_scale dd 1.0
|
||
obj_y_max dd 0
|
||
obj_y_min dd 0
|
||
obj_y_centr dd 0
|
||
obj_y_scale dd 1.0
|
||
obj_z_max dd 0
|
||
obj_z_min dd 0
|
||
obj_z_centr dd 0
|
||
obj_z_scale dd 1.0
|
||
|
||
capt_p dd 0
|
||
|
||
;¤¥à¥¢® á ®¡ê¥ªâ ¬¨ ¢ ¯®«ì§®¢ ⥫ì᪮¬ ä ©«¥
|
||
tree3 tree_list MAX_OBJECT_SIZE,3, tl_key_no_edit+tl_list_box_mode,\
|
||
16,16, 0xffffff,0xb0d0ff,0x400040, 5,290,303,140, 16, 4,0, el_focus,\
|
||
w_scr_t3,get_point_coords
|
||
|
||
edit1 edit_box 80, 76, 269, 0xffd0d0, 0xff, 0x80ff, 0, 0x8000, 34, string1, mouse_dd, 0
|
||
edit2 edit_box 80, 160, 269, 0xd0d0ff, 0xff, 0x80ff, 0, 0x8000, 34, string2, mouse_dd, 0
|
||
edit3 edit_box 80, 244, 269, 0xd0ffd0, 0xff, 0x80ff, 0, 0x8000, 34, string3, mouse_dd, 0
|
||
editboxes_end:
|
||
|
||
string1 rb 34
|
||
string2 rb 34
|
||
string3 rb 34
|
||
|
||
align 4
|
||
w_scr_t3 scrollbar 16, 0,0,0, 15, 100,0,0, 0,0,0, 1
|