WebSVN – Kolibri OS – Diff – /programs/develop/info3ds/info_wnd_coords.inc

+;
 ; ¢ íâ®¬ ä ©«¥ á®¡à ë äãªæ¨¨ ã¦ë¥ ¤«ï á®§¤ ¨ï ¨
-; à ¡®âë ®ª  á ª®®à¤¨ â ¬¨
+; à ¡®âë ®ª  á ª®®à¤¨ â ¬¨ ¢¥àè¨
+;
 prop_wnd_width equ 340 ;è¨à¨  ®ª  á® á¢®©áâ¢ ¬¨ ®¡ê¥ªâ
 prop_wnd_height equ 460
 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
+def_dr_mode equ 0x1111b
 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
 ;¤ ®¥ ®ª® (¯à®æ¥áá) ¢ë§ë¢ ¥âìáï äãªæ¨¥© 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,dword[eax] ;¯®«ãç ¥¬ § ç¥¨¥ á¤¢¨£  ¢ë¡à ®£® ¡«®ª
+		mov ebx,[eax] ;¯®«ãç ¥¬ § ç¥¨¥ á¤¢¨£  ¢ë¡à ®£® ¡«®ª
-		add ebx,dword[open_file_lif]
+		add ebx,[open_file_lif]
 		cmp word[ebx],CHUNK_VERTLIST
-		jne @f
+		jne .end_vlist
 			movzx edx,word[ebx+6] ;ª®««¨ç¥áâ¢® â®ç¥ª
 			add ebx,8
 			mov dword[capt_p],txt_4110
+			;¯®¨áª ¤ ëå ¤«ï âà¥ã£®«ìª®¢
+			mov ecx,eax
+			stdcall [tl_node_poi_get_info], tree1,0
+			@@:
+				mov esi,eax
+				stdcall [tl_node_poi_get_data], tree1,esi
+				cmp eax,ecx
+				je @f ;¥á«¨ ¯®¯ «¨   ¢ë¡à ë© ã§¥«
+				stdcall [tl_node_poi_get_next_info], tree1,esi
+				cmp eax,0
+				jne @b
-			jmp .no_points
+				jmp .set_points
-		@@:
+			@@:
+			;¥á«¨  è«¨ ¢ë¡à ë© ã§¥«, â® ¤ «¥¥ ¯ëâ ¥¬áï  ©â¨ ã§¥« á âà¥ã£®«ì¨ª ¬¨
+			movzx ecx,byte[esi+2] ;cl - ãà®¢¥ì ¢ë¡à ®£® ã§«
+			.cycle_0:
+				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_0
+			.found: ;¥á«¨  è«¨ ã§¥« â®£®¦¥ ãà®¢ï çâ® ¨ ¢ë¡à ë© ã§¥«
+				cmp eax,0
+				je .set_points
+				mov eax,[eax]
+				add eax,[open_file_lif]
+				cmp word[eax],CHUNK_FACELIST
+				jne .cycle_0
+				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],0xb013
+		cmp word[ebx],CHUNK_TRACKPIVOT
 		jne @f
 			inc edx
 			add ebx,6
 			mov dword[capt_p],txt_b013
-			jmp .no_points
+			jmp .set_points
 		@@:
 		cmp word[ebx],0xb014
 		jne @f
 			mov edx,2
 			add ebx,6
 			mov dword[capt_p],txt_b014
-			;jmp .no_points
+			;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_DATA 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
 popad
 	call prop_red_win
 ;¥ ®âàë¢ âì íâã äãªæ¨î ®â ¯à¥¤ë¤ãé¥©
 align 4
 prop_still:
 	pushad
-	mcall 10
+	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,0xffffd0+0x33000000
 	int 0x40
 	mov esi,[sc.work_button]
-	mcall 8, (5 shl 16)+20, (246 shl 16)+20, 3
+	mcall 8, (5 shl 16)+20, (266 shl 16)+20, 3
-	mcall , (30 shl 16)+20, (246 shl 16)+20, 4
+	mcall , (30 shl 16)+20, (266 shl 16)+20, 4
 	mov ebx,[image_data_toolbar]
 	add ebx,4*IMAGE_TOOLBAR_ICON_SIZE
-	mcall 7, , (16 shl 16)+16, (7 shl 16)+247 ;load
+	mcall 7, , (16 shl 16)+16, (7 shl 16)+268 ;load
 	sub ebx,IMAGE_TOOLBAR_ICON_SIZE
-	mov edx,(32 shl 16)+247 ;save
+	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:
+	mov dword[angle_x],0.0
+	mov dword[angle_y],0.0
+	mov dword[angle_z],0.0
+	mov dword[obj_poi_data],0
+	mov dword[obj_poi_count],0
+	mov dword[obj_tri_data],0
+	mov dword[obj_tri_count],0
+	mov dword[draw_mode],def_dr_mode
+	ret
 ;ãáâ ®¢ª  à §¬¥à®¢ ®¡ê¥ªâ
 align 4
 proc obj_set_sizes uses eax ebx esi
-	stdcall dword[tl_node_poi_get_info], tree3,0
-	cmp eax,0
+	cmp dword[obj_poi_count],0
-	je .end
-		stdcall [tl_node_poi_get_data], tree3,eax
+	je .end
 		finit
-		mov eax,[eax]
+		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]
-	stdcall dword[tl_node_poi_get_info], tree3,0
+	mov esi,[obj_poi_count]
 align 4
-	.cycle_0: ;à ¡®â  á ª®®à¤¨ â®© x
-		mov esi,eax
-		stdcall [tl_node_poi_get_data], tree3,esi
-		mov ebx,[eax]
 	.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:
-		stdcall dword[tl_node_poi_get_next_info], tree3,esi
+		add ebx,12
-		cmp eax,0
+		dec esi
-		jne .cycle_0
+		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]
-	stdcall dword[tl_node_poi_get_info], tree3,0
+	mov esi,[obj_poi_count]
 align 4
-	.cycle_1: ;à ¡®â  á ª®®à¤¨ â®© y
-		mov esi,eax
-		stdcall [tl_node_poi_get_data], tree3,esi
-		mov ebx,[eax]
 	.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:
-		stdcall dword[tl_node_poi_get_next_info], tree3,esi
+		add ebx,12
-		cmp eax,0
+		dec esi
-		jne .cycle_1
+		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]
-	stdcall dword[tl_node_poi_get_info], tree3,0
+	mov esi,[obj_poi_count]
 align 4
-	.cycle_2: ;à ¡®â  á ª®®à¤¨ â®© z
-		mov esi,eax
-		stdcall [tl_node_poi_get_data], tree3,esi
-		mov ebx,[eax]
 	.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:
-		stdcall dword[tl_node_poi_get_next_info], tree3,esi
+		add ebx,12
-		cmp eax,0
+		dec esi
-		jne .cycle_2
+		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]
 	.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 [glColor3f], 1.0,1.0,1.0
+		stdcall [glColor3f], 1.0,1.0,1.0
-	stdcall [glBegin],GL_POINTS
+		stdcall [glBegin],GL_POINTS
+		mov eax,[obj_poi_data]
-	stdcall dword[tl_node_poi_get_info], tree3,0
+		mov ebx,[obj_poi_count]
-	@@:
-		cmp eax,0
-		je @f
-		mov esi,eax
-		stdcall [tl_node_poi_get_data], tree3,esi
-		mov eax,[eax]
+		@@:
-		stdcall [glVertex3f], [eax],[eax+4],[eax+8]
+			stdcall [glVertex3f], [eax],[eax+4],[eax+8]
-		stdcall dword[tl_node_poi_get_next_info], tree3,esi
+			add eax,12
-		jmp @b
+			dec ebx
-	@@:
+			jnz @b
+		stdcall [glEnd]
+	.end_points:
 	stdcall [glEnd]
 	;à¨á®¢ ¨¥ ¢ë¤¥«¥®© â®çª¨
 	stdcall [tl_node_get_data],tree3
 	cmp eax,0
 	je @f
 		;¢ë¤¥«¥¨¥  ªâ¨¢®© â®çª¨
 		mov eax,[eax]
 		stdcall [glBegin],GL_LINES
 		stdcall [glColor3f], 1.0, 0.0, 0.0
 		stdcall [glVertex3f], [obj_x_min],[eax+4],[eax+8]
 		stdcall [glVertex3f], [obj_x_max],[eax+4],[eax+8]
 		stdcall [glColor3f], 0.0, 0.0, 1.0
 		stdcall [glVertex3f], [eax],[obj_y_min],[eax+8]
 		stdcall [glVertex3f], [eax],[obj_y_max],[eax+8]
 		stdcall [glColor3f], 0.0, 1.0, 0.0
 		stdcall [glVertex3f], [eax],[eax+4],[obj_z_min]
 		stdcall [glVertex3f], [eax],[eax+4],[obj_z_max]
 		stdcall [glEnd]
 		stdcall [glColor3f], 1.0, 1.0, 0.0
+		stdcall [glPushMatrix]
-		stdcall [glTranslatef], [eax],[eax+4],[eax+8]
+			stdcall [glTranslatef], [eax],[eax+4],[eax+8]
-		stdcall [gluSphere], [qObj], [sph_radius], 8,8
+			stdcall [gluSphere], [qObj], [sph_radius], 8,8
+		stdcall [glPopMatrix]
 	@@:
+	;à¨á®¢ ¨¥ £à ¥©
+	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
+		stdcall [glColor3f], 0.5,0.5,0.5
+		;bt dword[draw_mode],bit_faces_fill
+		;jnc @f
+		;@@:
+		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]
+	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 [kosglSwapBuffers]
+	stdcall [glEnable],GL_LIGHT0
 	ret
 align 4
-prop_key:
+proc prop_key uses eax ebx
-push eax
 	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
+		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:
-pop eax
 	ret
+endp
 align 4
 prop_mouse:
 	;push ecx edi
+	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 edi ecx
 	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
 			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_light_on_off
+		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_light_on_off:
+	xor dword[draw_mode], 1 shl bit_light
+	ret
+align 4
+draw_mode dd 0
+obj_poi_data dd 0 ;ãª § â¥«ì   ª®®à¤¨ âë ¢¥àè¨
+obj_poi_count 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, 0xffffff,0xb0d0ff,0x400040, 5,270,303,160, 16, 4,0, el_focus,\
+,16, 0xffffff,0xb0d0ff,0x400040, 5,290,303,140, 16, 4,0, el_focus,\
 	w_scr_t3,get_point_coords
-edit1 edit_box 80,  76, 249, 0xffd0d0, 0xff, 0x80ff, 0, 0x8000, 34, string1, mouse_dd, 0
+edit1 edit_box 80,  76, 269, 0xffd0d0, 0xff, 0x80ff, 0, 0x8000, 34, string1, mouse_dd, 0
-edit2 edit_box 80, 160, 249, 0xd0d0ff, 0xff, 0x80ff, 0, 0x8000, 34, string2, mouse_dd, 0
+edit2 edit_box 80, 160, 269, 0xd0d0ff, 0xff, 0x80ff, 0, 0x8000, 34, string2, mouse_dd, 0
-edit3 edit_box 80, 244, 249, 0xd0ffd0, 0xff, 0x80ff, 0, 0x8000, 34, string3, 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

Subversion Repositories Kolibri OS

(root)/programs/develop/info3ds/info_wnd_coords.inc – Rev 5930 → 5935