Rev 6513 | Rev 7128 | Go to most recent revision | Details | Compare with Previous | Last modification | View Log | RSS feed
Rev | Author | Line No. | Line |
---|---|---|---|
2165 | IgorA | 1 | ; |
2 | ; в этом файле собраны функции нужные для создания и |
||
5935 | IgorA | 3 | ; работы окна с координатами вершин |
2165 | IgorA | 4 | ; |
5 | |||
5938 | IgorA | 6 | prop_wnd_width equ 340 ;ширина окна со свойствами объекта |
7 | prop_wnd_height equ 460 ;высота окна со свойствами объекта |
||
8 | 3d_wnd_l equ 5 ;отступ для tinygl буфера слева |
||
9 | 3d_wnd_t equ 23 ;отступ для tinygl буфера сверху |
||
10 | 3d_wnd_w equ 320 |
||
11 | 3d_wnd_h equ 240 |
||
2165 | IgorA | 12 | SIZE_ONE_FLOAT equ 14 |
13 | MAX_OBJECT_SIZE equ (4+SIZE_ONE_FLOAT*3+1) |
||
14 | |||
15 | prop_wnd_run db 0 ;переменная следящая за тем что-бы не запускать больше 1-го окна со свойствами одновременно |
||
16 | |||
2173 | IgorA | 17 | txt_q db '?',0 |
2165 | IgorA | 18 | txt_space: |
19 | db SIZE_ONE_FLOAT dup(' ') |
||
20 | .end: |
||
21 | db 0 |
||
22 | |||
23 | obj_point: ;добавляемый объект |
||
24 | dd 0 ;указатель |
||
25 | .text: |
||
26 | rb MAX_OBJECT_SIZE |
||
27 | |||
5944 | IgorA | 28 | if lang eq ru |
29 | txt_select_vert: db 'Выбрано: ' |
||
30 | else |
||
31 | txt_select_vert: db 'Select: ' |
||
32 | end if |
||
33 | .count: |
||
34 | dq 0,0 |
||
2165 | IgorA | 35 | |
36 | ;даное окно (процесс) вызываеться функцией but_wnd_coords |
||
37 | align 4 |
||
38 | prop_start: |
||
39 | pushad |
||
6081 | IgorA | 40 | mcall SF_SET_EVENTS_MASK,0x27 ;маска ожидаемых событий |
2165 | IgorA | 41 | inc byte[prop_wnd_run] |
5930 | IgorA | 42 | mov dword[w_scr_t3.type],1 |
6046 | IgorA | 43 | mov edi,o3d |
44 | stdcall obj_clear_param, edi |
||
6060 | IgorA | 45 | call mnu_reset_settings |
2165 | IgorA | 46 | |
47 | stdcall [tl_node_get_data],tree1 |
||
48 | xor edx,edx |
||
4332 | IgorA | 49 | mov dword[capt_p],txt_q |
5911 | IgorA | 50 | cmp eax,0 |
4332 | IgorA | 51 | je .no_points |
5935 | IgorA | 52 | mov ebx,[eax] ;получаем значение сдвига выбранного блока |
5938 | IgorA | 53 | add ebx,[open_file_data] |
2165 | IgorA | 54 | |
5938 | IgorA | 55 | cmp word[ebx],CHUNK_OBJBLOCK |
56 | jne .end_oblo |
||
57 | mov dword[capt_p],txt_4000 |
||
6060 | IgorA | 58 | stdcall obj_init,edi |
5938 | IgorA | 59 | jmp .no_points |
60 | .end_oblo: |
||
61 | cmp word[ebx],CHUNK_TRIMESH |
||
62 | jne .end_trim |
||
63 | mov dword[capt_p],txt_4100 |
||
6060 | IgorA | 64 | stdcall obj_init,edi |
5938 | IgorA | 65 | jmp .no_points |
66 | .end_trim: |
||
4332 | IgorA | 67 | cmp word[ebx],CHUNK_VERTLIST |
5935 | IgorA | 68 | jne .end_vlist |
5938 | IgorA | 69 | mov dword[capt_p],txt_4110 |
6060 | IgorA | 70 | stdcall obj_init,edi |
71 | jmp .no_points |
||
5935 | IgorA | 72 | .end_vlist: |
73 | cmp word[ebx],CHUNK_TRACKPIVOT |
||
4332 | IgorA | 74 | jne @f |
75 | inc edx |
||
76 | add ebx,6 |
||
77 | mov dword[capt_p],txt_b013 |
||
5935 | IgorA | 78 | jmp .set_points |
4332 | IgorA | 79 | @@: |
80 | cmp word[ebx],0xb014 |
||
81 | jne @f |
||
82 | mov edx,2 |
||
83 | add ebx,6 |
||
84 | mov dword[capt_p],txt_b014 |
||
5935 | IgorA | 85 | ;jmp .set_points |
4332 | IgorA | 86 | @@: |
5935 | IgorA | 87 | .set_points: |
6889 | IgorA | 88 | mov [edi+obj_3d.poi_data],ebx |
89 | mov [edi+obj_3d.poi_count],edx |
||
4332 | IgorA | 90 | .no_points: |
91 | |||
2165 | IgorA | 92 | ;настройка списка объектов |
6889 | IgorA | 93 | mov ebx,[edi+obj_3d.poi_data] |
2165 | IgorA | 94 | mov dword[tree3.info_max_count],2 |
6889 | IgorA | 95 | mov edx,[edi+obj_3d.poi_count] |
2165 | IgorA | 96 | add dword[tree3.info_max_count],edx ;ставим число узлов, равное колличеству точек (+2 на начало и конец списка) |
97 | stdcall dword[tl_data_init], tree3 |
||
98 | mov eax,dword[icon_tl_sys] |
||
99 | mov dword[tree3.data_img_sys],eax |
||
100 | mov eax,dword[icon_toolbar] |
||
101 | mov dword[tree3.data_img],eax |
||
102 | |||
4332 | IgorA | 103 | cmp edx,0 |
2165 | IgorA | 104 | je .no_object |
2173 | IgorA | 105 | mov word[NumberSymbolsAD],5 |
2165 | IgorA | 106 | finit |
6060 | IgorA | 107 | mov dword[w_scr_t3.redraw],0 |
2165 | IgorA | 108 | .new_point: |
109 | mov dword[obj_point],ebx |
||
110 | mov dword[obj_point.text],0 |
||
111 | cld |
||
112 | mov ecx,3 |
||
113 | @@: |
||
114 | fld dword[ebx] |
||
115 | fstp qword[Data_Double] |
||
116 | call DoubleFloat_to_String |
||
117 | add ebx,4 |
||
118 | stdcall str_len, Data_String |
||
119 | mov esi,txt_space |
||
120 | add esi,eax |
||
121 | cmp esi,txt_space.end |
||
122 | jl .normal_size |
||
123 | mov esi,txt_space.end-1 ;минимум 1 пробел нужно добавить, что-бы цифры не слипались |
||
124 | .normal_size: |
||
125 | stdcall str_cat, obj_point.text,esi |
||
126 | stdcall str_cat, obj_point.text,Data_String |
||
127 | loop @b |
||
5944 | IgorA | 128 | stdcall dword[tl_node_add], tree3,(ID_ICON_POINT shl 16),obj_point |
2165 | IgorA | 129 | stdcall dword[tl_cur_next], tree3 |
130 | dec edx |
||
131 | cmp edx,0 |
||
132 | jg .new_point |
||
6060 | IgorA | 133 | mov dword[w_scr_t3.redraw],1 |
2165 | IgorA | 134 | stdcall dword[tl_cur_beg], tree3 |
135 | .no_object: |
||
6046 | IgorA | 136 | stdcall obj_set_sizes, o3d |
137 | stdcall obj_set_normals, o3d |
||
2173 | IgorA | 138 | edit_boxes_set_sys_color edit1,editboxes_end,sc ;установка системных цветов |
139 | stdcall [edit_box_set_text], edit1, txt_q |
||
140 | stdcall [edit_box_set_text], edit2, txt_q |
||
141 | stdcall [edit_box_set_text], edit3, txt_q |
||
5938 | IgorA | 142 | mov eax,0xc0c0c0 |
143 | mov ebx,[color_ox] |
||
144 | shr ebx,2 |
||
145 | and ebx,0x3f3f3f |
||
146 | add eax,ebx |
||
147 | mov [edit1.color],eax |
||
148 | mov eax,0xc0c0c0 |
||
149 | mov ebx,[color_oy] |
||
150 | shr ebx,2 |
||
151 | and ebx,0x3f3f3f |
||
152 | add eax,ebx |
||
153 | mov [edit2.color],eax |
||
154 | mov eax,0xc0c0c0 |
||
155 | mov ebx,[color_oz] |
||
156 | shr ebx,2 |
||
157 | and ebx,0x3f3f3f |
||
158 | add eax,ebx |
||
159 | mov [edit3.color],eax |
||
2165 | IgorA | 160 | popad |
5930 | IgorA | 161 | call prop_red_win |
162 | |||
163 | ;не отрывать эту функцию от предыдущей |
||
2165 | IgorA | 164 | align 4 |
5930 | IgorA | 165 | prop_still: |
166 | pushad |
||
167 | |||
6081 | IgorA | 168 | mcall SF_WAIT_EVENT_TIMEOUT,10 |
5935 | IgorA | 169 | or eax,eax |
170 | jnz @f |
||
171 | call prop_timer_funct |
||
172 | jmp .end |
||
173 | @@: |
||
174 | |||
5930 | IgorA | 175 | cmp al,1 ;изм. положение окна |
176 | jne @f |
||
177 | call prop_red_win |
||
178 | jmp .end |
||
179 | @@: |
||
180 | cmp al,2 |
||
181 | jne @f |
||
182 | call prop_key |
||
183 | jmp .end |
||
184 | @@: |
||
185 | cmp al,3 |
||
186 | jz prop_button |
||
187 | cmp al,6 |
||
188 | jne @f |
||
189 | call prop_mouse |
||
190 | @@: |
||
191 | .end: |
||
192 | popad |
||
193 | jmp prop_still |
||
194 | |||
195 | align 4 |
||
2165 | IgorA | 196 | prop_red_win: |
197 | pushad |
||
6081 | IgorA | 198 | mcall SF_REDRAW,SSF_BEGIN_DRAW |
2165 | IgorA | 199 | |
200 | xor eax,eax |
||
4332 | IgorA | 201 | mov edi,dword[capt_p] ;children window caption |
2165 | IgorA | 202 | mov bx,word[procinfo.box.left] |
203 | add bx,word[buf_0.l] |
||
5930 | IgorA | 204 | add bx,5 ;ширина боковой рамки |
2165 | IgorA | 205 | shl ebx,16 |
206 | mov bx,prop_wnd_width |
||
207 | mov cx,word[procinfo.box.top] |
||
2173 | IgorA | 208 | add cx,word[buf_0.t] |
2165 | IgorA | 209 | shl ecx,16 |
5930 | IgorA | 210 | mov cx,prop_wnd_height |
5938 | IgorA | 211 | mov edx,[sc.work] |
212 | or edx,0x33000000 |
||
2165 | IgorA | 213 | int 0x40 |
214 | |||
2173 | IgorA | 215 | mov esi,[sc.work_button] |
6130 | leency | 216 | mcall SF_DEFINE_BUTTON, (5 shl 16)+20, (266 shl 16)+20, 0x40000003 |
217 | mcall , (30 shl 16)+20, (266 shl 16)+20, 0x40000004 |
||
2173 | IgorA | 218 | |
219 | mov ebx,[image_data_toolbar] |
||
5938 | IgorA | 220 | add ebx,3*IMAGE_TOOLBAR_ICON_SIZE |
6130 | leency | 221 | mcall SF_PUT_IMAGE, , (21 shl 16)+21, (5 shl 16)+266 ;load |
2173 | IgorA | 222 | |
223 | sub ebx,IMAGE_TOOLBAR_ICON_SIZE |
||
6130 | leency | 224 | mov edx,(30 shl 16)+266 ;save |
2173 | IgorA | 225 | int 0x40 |
226 | |||
2165 | IgorA | 227 | mov dword[w_scr_t3.all_redraw],1 |
228 | stdcall [scrollbar_ver_draw],dword w_scr_t3 |
||
229 | stdcall [tl_draw], tree3 |
||
2173 | IgorA | 230 | stdcall [edit_box_draw], edit1 |
231 | stdcall [edit_box_draw], edit2 |
||
232 | stdcall [edit_box_draw], edit3 |
||
5930 | IgorA | 233 | |
5935 | IgorA | 234 | stdcall [kmainmenu_draw], [main_menu] |
6046 | IgorA | 235 | stdcall draw_3d, o3d |
6081 | IgorA | 236 | mcall SF_REDRAW,SSF_END_DRAW |
2165 | IgorA | 237 | popad |
5930 | IgorA | 238 | ret |
2165 | IgorA | 239 | |
240 | align 4 |
||
5935 | IgorA | 241 | proc prop_key uses eax ebx |
6081 | IgorA | 242 | mcall SF_GET_KEY |
5930 | IgorA | 243 | |
244 | test word [edit1.flags],10b ;ed_focus |
||
245 | je @f |
||
246 | stdcall [edit_box_key], edit1 |
||
247 | jmp .end |
||
248 | @@: |
||
249 | test word [edit2.flags],10b |
||
250 | je @f |
||
251 | stdcall [edit_box_key], edit2 |
||
252 | jmp .end |
||
253 | @@: |
||
254 | test word [edit3.flags],10b |
||
255 | je @f |
||
256 | stdcall [edit_box_key], edit3 |
||
257 | jmp .end |
||
258 | @@: |
||
5935 | IgorA | 259 | cmp dword[el_focus], tree3 |
260 | jne @f |
||
261 | stdcall [tl_key], tree3 |
||
262 | jmp .end |
||
263 | @@: |
||
5930 | IgorA | 264 | |
265 | cmp ah,178 ;Up |
||
266 | jne @f |
||
267 | fld dword[angle_x] |
||
268 | fadd dword[delt_size] |
||
269 | fstp dword[angle_x] |
||
6046 | IgorA | 270 | stdcall draw_3d, o3d |
5930 | IgorA | 271 | jmp .end |
272 | @@: |
||
273 | cmp ah,177 ;Down |
||
274 | jne @f |
||
275 | fld dword[angle_x] |
||
276 | fsub dword[delt_size] |
||
277 | fstp dword[angle_x] |
||
6046 | IgorA | 278 | stdcall draw_3d, o3d |
5930 | IgorA | 279 | jmp .end |
280 | @@: |
||
281 | cmp ah,176 ;Left |
||
282 | jne @f |
||
283 | fld dword[angle_y] |
||
284 | fadd dword[delt_size] |
||
285 | fstp dword[angle_y] |
||
6046 | IgorA | 286 | stdcall draw_3d, o3d |
5930 | IgorA | 287 | jmp .end |
288 | @@: |
||
289 | cmp ah,179 ;Right |
||
290 | jne @f |
||
291 | fld dword[angle_y] |
||
292 | fsub dword[delt_size] |
||
293 | fstp dword[angle_y] |
||
6046 | IgorA | 294 | stdcall draw_3d, o3d |
5930 | IgorA | 295 | ;jmp .end |
296 | @@: |
||
297 | .end: |
||
2165 | IgorA | 298 | ret |
5935 | IgorA | 299 | endp |
2165 | IgorA | 300 | |
301 | align 4 |
||
302 | prop_mouse: |
||
5938 | IgorA | 303 | push eax ebx |
6081 | IgorA | 304 | mcall SF_MOUSE_GET,SSF_BUTTON_EXT |
5938 | IgorA | 305 | bt eax,0 |
306 | jnc .end_m |
||
307 | ;mouse l. but. move |
||
308 | cmp dword[mouse_drag],1 |
||
309 | jne .end_m |
||
6081 | IgorA | 310 | mcall SF_MOUSE_GET,SSF_WINDOW_POSITION ;get mouse coords |
5938 | IgorA | 311 | mov ebx,eax |
312 | shr ebx,16 ;mouse.x |
||
313 | cmp ebx,3d_wnd_l |
||
314 | jg @f |
||
315 | mov ebx,3d_wnd_l |
||
316 | @@: |
||
317 | sub ebx,3d_wnd_l |
||
318 | cmp ebx,3d_wnd_w |
||
319 | jle @f |
||
320 | mov ebx,3d_wnd_w |
||
321 | @@: |
||
322 | and eax,0xffff ;mouse.y |
||
323 | cmp eax,3d_wnd_t |
||
324 | jg @f |
||
325 | mov eax,3d_wnd_t |
||
326 | @@: |
||
327 | sub eax,3d_wnd_t |
||
328 | cmp eax,3d_wnd_h |
||
329 | jle @f |
||
330 | mov eax,3d_wnd_h |
||
331 | @@: |
||
332 | finit |
||
333 | fild dword[mouse_y] |
||
334 | mov [mouse_y],eax |
||
335 | fisub dword[mouse_y] |
||
336 | fdiv dword[angle_dxm] ;если курсор движется по оси y (вверх или вниз) то поворот делаем вокруг оси x |
||
337 | fadd dword[angle_x] |
||
338 | fstp dword[angle_x] |
||
339 | |||
340 | fild dword[mouse_x] |
||
341 | mov [mouse_x],ebx |
||
342 | fisub dword[mouse_x] |
||
343 | fdiv dword[angle_dym] ;если курсор движется по оси x (вверх или вниз) то поворот делаем вокруг оси y |
||
344 | fadd dword[angle_y] |
||
345 | fstp dword[angle_y] |
||
346 | |||
6046 | IgorA | 347 | stdcall draw_3d, o3d |
5938 | IgorA | 348 | jmp .end_d |
349 | .end_m: |
||
350 | bt eax,16 |
||
351 | jnc @f |
||
352 | ;mouse l. but. up |
||
353 | mov dword[mouse_drag],0 |
||
354 | jmp .end_d |
||
355 | @@: |
||
356 | bt eax,8 |
||
357 | jnc .end_d |
||
358 | ;mouse l. but. press |
||
6081 | IgorA | 359 | mcall SF_MOUSE_GET,SSF_WINDOW_POSITION ;get mouse coords |
5938 | IgorA | 360 | mov ebx,eax |
361 | shr ebx,16 ;mouse.x |
||
362 | cmp ebx,3d_wnd_l |
||
363 | jl .end_d |
||
364 | sub ebx,3d_wnd_l |
||
365 | cmp ebx,3d_wnd_w |
||
366 | jg .end_d |
||
367 | and eax,0xffff ;mouse.y |
||
368 | cmp eax,3d_wnd_t |
||
369 | jl .end_d |
||
370 | sub eax,3d_wnd_t |
||
371 | cmp eax,3d_wnd_h |
||
372 | jg .end_d |
||
373 | mov dword[mouse_drag],1 |
||
374 | mov dword[mouse_x],ebx |
||
375 | mov dword[mouse_y],eax |
||
376 | .end_d: |
||
377 | |||
5935 | IgorA | 378 | stdcall [kmainmenu_dispatch_cursorevent], [main_menu] |
2165 | IgorA | 379 | stdcall [tl_mouse], tree3 |
2173 | IgorA | 380 | stdcall [edit_box_mouse], edit1 |
381 | stdcall [edit_box_mouse], edit2 |
||
382 | stdcall [edit_box_mouse], edit3 |
||
5938 | IgorA | 383 | pop ebx eax |
2165 | IgorA | 384 | ret |
385 | |||
386 | align 4 |
||
387 | prop_button: |
||
6081 | IgorA | 388 | mcall SF_GET_BUTTON |
2165 | IgorA | 389 | |
2173 | IgorA | 390 | cmp ah,3 |
2165 | IgorA | 391 | jne @f |
5930 | IgorA | 392 | call get_point_coords |
6046 | IgorA | 393 | stdcall draw_3d, o3d |
5930 | IgorA | 394 | jmp prop_still.end |
2165 | IgorA | 395 | @@: |
2173 | IgorA | 396 | cmp ah,4 |
397 | jne @f |
||
5911 | IgorA | 398 | push eax ebx ecx edi esi |
2173 | IgorA | 399 | stdcall [tl_node_get_data],tree3 |
5911 | IgorA | 400 | cmp eax,0 |
2173 | IgorA | 401 | je .no_select_1 |
5911 | IgorA | 402 | mov ebx,[eax] |
2173 | IgorA | 403 | finit |
2165 | IgorA | 404 | |
2173 | IgorA | 405 | mov esi,string1 |
406 | mov edi,Data_String |
||
407 | cld |
||
5930 | IgorA | 408 | mov ecx,8 |
409 | rep movsd |
||
2173 | IgorA | 410 | call String_to_DoubleFloat |
411 | fld qword[Data_Double] ;считываем как double |
||
412 | fstp dword[ebx] ;сохраняем как float |
||
413 | |||
414 | mov esi,string2 |
||
415 | mov edi,Data_String |
||
416 | cld |
||
5930 | IgorA | 417 | mov ecx,8 |
418 | rep movsd |
||
2173 | IgorA | 419 | call String_to_DoubleFloat |
420 | fld qword[Data_Double] ;считываем как double |
||
421 | fstp dword[ebx+4] ;сохраняем как float |
||
422 | |||
423 | mov esi,string3 |
||
424 | mov edi,Data_String |
||
425 | cld |
||
5930 | IgorA | 426 | mov ecx,8 |
427 | rep movsd |
||
2173 | IgorA | 428 | call String_to_DoubleFloat |
429 | fld qword[Data_Double] ;считываем как double |
||
430 | fstp dword[ebx+8] ;сохраняем как float |
||
431 | |||
432 | ;обновление измененного узла в списке tree3 и главного окна (по таймеру) |
||
433 | mov word[NumberSymbolsAD],5 |
||
434 | mov dword[obj_point],ebx |
||
435 | mov dword[obj_point.text],0 |
||
436 | cld |
||
437 | mov ecx,3 |
||
438 | .coord: |
||
439 | fld dword[ebx] |
||
440 | fstp qword[Data_Double] |
||
441 | call DoubleFloat_to_String |
||
442 | add ebx,4 |
||
443 | stdcall str_len, Data_String |
||
444 | mov esi,txt_space |
||
445 | add esi,eax |
||
446 | cmp esi,txt_space.end |
||
447 | jl .normal_size |
||
448 | mov esi,txt_space.end-1 ;минимум 1 пробел нужно добавить, что-бы цифры не слипались |
||
449 | .normal_size: |
||
450 | stdcall str_cat, obj_point.text,esi |
||
451 | stdcall str_cat, obj_point.text,Data_String |
||
452 | loop .coord |
||
5944 | IgorA | 453 | mov byte[obj_point.text],'*' ;отмечаем что вершина изменялась |
5911 | IgorA | 454 | stdcall dword[tl_node_set_data], tree3,obj_point |
2173 | IgorA | 455 | stdcall dword[tl_draw], tree3 |
456 | mov byte[can_save],1 ;для показа кнопки 'Сохранить' |
||
457 | mov dword[offs_last_timer],0 ;для обновления блока в таймере |
||
6046 | IgorA | 458 | stdcall draw_3d, o3d |
2173 | IgorA | 459 | .no_select_1: |
5911 | IgorA | 460 | pop esi edi ecx ebx eax |
5930 | IgorA | 461 | jmp prop_still.end |
2173 | IgorA | 462 | @@: |
5935 | IgorA | 463 | cmp ah,5 |
464 | jne @f |
||
6060 | IgorA | 465 | call mnu_vertexes_on |
5935 | IgorA | 466 | jmp prop_still.end |
467 | @@: |
||
468 | cmp ah,6 |
||
469 | jne @f |
||
6060 | IgorA | 470 | call mnu_edges_on |
5935 | IgorA | 471 | jmp prop_still.end |
472 | @@: |
||
473 | cmp ah,7 |
||
474 | jne @f |
||
6060 | IgorA | 475 | call mnu_faces_on |
5938 | IgorA | 476 | jmp prop_still.end |
477 | @@: |
||
478 | cmp ah,8 |
||
479 | jne @f |
||
5935 | IgorA | 480 | call mnu_light_on_off |
481 | jmp prop_still.end |
||
482 | @@: |
||
5938 | IgorA | 483 | cmp ah,9 |
484 | jne @f |
||
6513 | IgorA | 485 | call mnu_smooth_on_off |
5938 | IgorA | 486 | jmp prop_still.end |
487 | @@: |
||
5944 | IgorA | 488 | cmp ah,10 |
489 | jne @f |
||
6513 | IgorA | 490 | call mnu_reset_settings |
5944 | IgorA | 491 | jmp prop_still.end |
492 | @@: |
||
493 | cmp ah,11 |
||
494 | jne @f |
||
6513 | IgorA | 495 | call mnu_vertexes_select |
5944 | IgorA | 496 | jmp prop_still.end |
497 | @@: |
||
498 | cmp ah,12 |
||
499 | jne @f |
||
6513 | IgorA | 500 | call mnu_vertexes_deselect |
5944 | IgorA | 501 | jmp prop_still.end |
502 | @@: |
||
503 | cmp ah,13 |
||
504 | jne @f |
||
6513 | IgorA | 505 | call mnu_reset_average_x |
5944 | IgorA | 506 | jmp prop_still.end |
507 | @@: |
||
508 | cmp ah,14 |
||
509 | jne @f |
||
6513 | IgorA | 510 | call mnu_reset_average_y |
511 | jmp prop_still.end |
||
512 | @@: |
||
513 | cmp ah,15 |
||
514 | jne @f |
||
5944 | IgorA | 515 | call mnu_reset_average_z |
516 | jmp prop_still.end |
||
517 | @@: |
||
2173 | IgorA | 518 | |
2165 | IgorA | 519 | cmp ah,1 |
5930 | IgorA | 520 | jne prop_still.end |
2165 | IgorA | 521 | .exit: |
522 | mov dword[tree3.data_img],0 ;чистим указатели на иконки что-бы их не удалил деструктор |
||
523 | mov dword[tree3.data_img_sys],0 ;т. к. они еще используються в других элементах |
||
524 | stdcall dword[tl_data_clear], tree3 |
||
6046 | IgorA | 525 | mov edi,o3d |
6889 | IgorA | 526 | stdcall mem.Free,[edi+obj_3d.normals_tri_data] |
527 | stdcall mem.Free,[edi+obj_3d.normals_poi_data] |
||
528 | mov dword[edi+obj_3d.normals_tri_data],0 |
||
529 | mov dword[edi+obj_3d.normals_poi_data],0 |
||
2165 | IgorA | 530 | mov byte[prop_wnd_run],0 ;обнуляем счетчик окон |
6081 | IgorA | 531 | mcall SF_TERMINATE_PROCESS ;выход из программы |
2165 | IgorA | 532 | |
5930 | IgorA | 533 | align 4 |
534 | get_point_coords: |
||
535 | ;загрузка координат в editbox-ы |
||
536 | push eax ebx |
||
537 | stdcall [tl_node_get_data],tree3 |
||
538 | cmp eax,0 |
||
539 | je @f |
||
540 | mov ebx,[eax] |
||
541 | mov word[NumberSymbolsAD],8 |
||
542 | finit |
||
543 | fld dword[ebx] |
||
544 | fstp qword[Data_Double] |
||
545 | call DoubleFloat_to_String |
||
546 | stdcall [edit_box_set_text], edit1, Data_String |
||
547 | fld dword[ebx+4] |
||
548 | fstp qword[Data_Double] |
||
549 | call DoubleFloat_to_String |
||
550 | stdcall [edit_box_set_text], edit2, Data_String |
||
551 | fld dword[ebx+8] |
||
552 | fstp qword[Data_Double] |
||
553 | call DoubleFloat_to_String |
||
554 | stdcall [edit_box_set_text], edit3, Data_String |
||
555 | stdcall [edit_box_draw], edit1 |
||
556 | stdcall [edit_box_draw], edit2 |
||
557 | stdcall [edit_box_draw], edit3 |
||
558 | @@: |
||
559 | pop ebx eax |
||
560 | ret |
||
561 | |||
562 | align 4 |
||
5935 | IgorA | 563 | proc prop_timer_funct uses eax |
564 | ;просматриваем выделенную координату |
||
565 | stdcall [tl_node_get_data],tree3 |
||
566 | cmp [cursor_last_draw],eax |
||
567 | je @f |
||
568 | mov [cursor_last_draw],eax |
||
6046 | IgorA | 569 | stdcall draw_3d, o3d |
5935 | IgorA | 570 | @@: |
571 | ret |
||
572 | endp |
||
573 | |||
574 | align 4 |
||
5944 | IgorA | 575 | proc mnu_vertexes_select uses eax ebx |
576 | stdcall [tl_node_get_data],tree3 |
||
577 | cmp eax,0 |
||
578 | je .no_points |
||
579 | stdcall found_block_data,tree3 |
||
580 | cmp eax,0 |
||
581 | je .no_points |
||
582 | mov bx,word[eax] |
||
583 | cmp bx,ID_ICON_POINT_SEL |
||
584 | je @f |
||
585 | mov word[eax],ID_ICON_POINT_SEL |
||
586 | inc dword[obj_poi_sel_c] |
||
587 | jmp .change |
||
588 | @@: |
||
589 | mov word[eax],ID_ICON_POINT |
||
590 | dec dword[obj_poi_sel_c] |
||
591 | .change: |
||
592 | mov eax,[obj_poi_sel_c] |
||
593 | stdcall convert_int_to_str, txt_select_vert.count,16 |
||
594 | .no_points: |
||
595 | ret |
||
596 | endp |
||
597 | |||
598 | align 4 |
||
599 | proc mnu_vertexes_deselect uses eax |
||
600 | cmp dword[obj_poi_sel_c],0 |
||
601 | je .no_points |
||
602 | mov dword[obj_poi_sel_c],0 |
||
603 | stdcall [tl_node_poi_get_info], tree3,0 |
||
604 | cmp eax,0 |
||
605 | je .no_points |
||
606 | @@: |
||
607 | mov word[eax],ID_ICON_POINT |
||
608 | stdcall [tl_node_poi_get_next_info], tree3,eax |
||
609 | cmp eax,0 |
||
610 | jne @b |
||
611 | .no_points: |
||
612 | ret |
||
613 | endp |
||
614 | |||
615 | align 4 |
||
616 | proc mnu_reset_average_x uses eax ebx ecx edx edi |
||
617 | cmp dword[obj_poi_sel_c],2 |
||
618 | jl .end_select |
||
619 | finit |
||
620 | fldz |
||
621 | mov ecx,dword[obj_poi_sel_c] |
||
622 | stdcall dword[tl_node_poi_get_info], tree3,0 |
||
623 | @@: |
||
624 | cmp eax,0 |
||
625 | je .end_select |
||
626 | mov ebx,eax |
||
627 | cmp word[ebx],ID_ICON_POINT_SEL |
||
628 | jne .next_sel0 |
||
629 | stdcall [tl_node_poi_get_data], tree3,ebx |
||
630 | mov eax,[eax] |
||
631 | fadd dword[eax] |
||
632 | dec ecx |
||
633 | jz @f |
||
634 | .next_sel0: |
||
635 | stdcall dword[tl_node_poi_get_next_info], tree3,ebx |
||
636 | jmp @b |
||
637 | @@: |
||
638 | fidiv dword[obj_poi_sel_c] |
||
639 | fstp dword[eax] |
||
640 | mov edx,[eax] |
||
641 | mov ecx,dword[obj_poi_sel_c] |
||
642 | stdcall dword[tl_node_poi_get_info], tree3,0 |
||
643 | @@: |
||
644 | cmp eax,0 |
||
645 | je .end_select |
||
646 | mov ebx,eax |
||
647 | cmp word[ebx],ID_ICON_POINT_SEL |
||
648 | jne .next_sel1 |
||
649 | stdcall [tl_node_poi_get_data], tree3,ebx |
||
650 | mov edi,eax |
||
651 | mov eax,[eax] |
||
652 | mov [eax],edx |
||
653 | stdcall update_tree, edi |
||
654 | dec ecx |
||
655 | jz @f |
||
656 | .next_sel1: |
||
657 | stdcall dword[tl_node_poi_get_next_info], tree3,ebx |
||
658 | jmp @b |
||
659 | @@: |
||
660 | .end_select: |
||
661 | ret |
||
662 | endp |
||
663 | |||
664 | align 4 |
||
665 | proc mnu_reset_average_y uses eax ebx ecx edx edi |
||
666 | cmp dword[obj_poi_sel_c],2 |
||
667 | jl .end_select |
||
668 | finit |
||
669 | fldz |
||
670 | mov ecx,dword[obj_poi_sel_c] |
||
671 | stdcall dword[tl_node_poi_get_info], tree3,0 |
||
672 | @@: |
||
673 | cmp eax,0 |
||
674 | je .end_select |
||
675 | mov ebx,eax |
||
676 | cmp word[ebx],ID_ICON_POINT_SEL |
||
677 | jne .next_sel0 |
||
678 | stdcall [tl_node_poi_get_data], tree3,ebx |
||
679 | mov eax,[eax] |
||
680 | fadd dword[eax+4] |
||
681 | dec ecx |
||
682 | jz @f |
||
683 | .next_sel0: |
||
684 | stdcall dword[tl_node_poi_get_next_info], tree3,ebx |
||
685 | jmp @b |
||
686 | @@: |
||
687 | fidiv dword[obj_poi_sel_c] |
||
688 | fstp dword[eax+4] |
||
689 | mov edx,[eax+4] |
||
690 | mov ecx,dword[obj_poi_sel_c] |
||
691 | stdcall dword[tl_node_poi_get_info], tree3,0 |
||
692 | @@: |
||
693 | cmp eax,0 |
||
694 | je .end_select |
||
695 | mov ebx,eax |
||
696 | cmp word[ebx],ID_ICON_POINT_SEL |
||
697 | jne .next_sel1 |
||
698 | stdcall [tl_node_poi_get_data], tree3,ebx |
||
699 | mov edi,eax |
||
700 | mov eax,[eax] |
||
701 | mov [eax+4],edx |
||
702 | stdcall update_tree, edi |
||
703 | dec ecx |
||
704 | jz @f |
||
705 | .next_sel1: |
||
706 | stdcall dword[tl_node_poi_get_next_info], tree3,ebx |
||
707 | jmp @b |
||
708 | @@: |
||
709 | .end_select: |
||
710 | ret |
||
711 | endp |
||
712 | |||
713 | align 4 |
||
714 | proc mnu_reset_average_z uses eax ebx ecx edx edi |
||
715 | cmp dword[obj_poi_sel_c],2 |
||
716 | jl .end_select |
||
717 | finit |
||
718 | fldz |
||
719 | mov ecx,dword[obj_poi_sel_c] |
||
720 | stdcall dword[tl_node_poi_get_info], tree3,0 |
||
721 | @@: |
||
722 | cmp eax,0 |
||
723 | je .end_select |
||
724 | mov ebx,eax |
||
725 | cmp word[ebx],ID_ICON_POINT_SEL |
||
726 | jne .next_sel0 |
||
727 | stdcall [tl_node_poi_get_data], tree3,ebx |
||
728 | mov eax,[eax] |
||
729 | fadd dword[eax+8] |
||
730 | dec ecx |
||
731 | jz @f |
||
732 | .next_sel0: |
||
733 | stdcall dword[tl_node_poi_get_next_info], tree3,ebx |
||
734 | jmp @b |
||
735 | @@: |
||
736 | fidiv dword[obj_poi_sel_c] |
||
737 | fstp dword[eax+8] |
||
738 | mov edx,[eax+8] |
||
739 | mov ecx,dword[obj_poi_sel_c] |
||
740 | stdcall dword[tl_node_poi_get_info], tree3,0 |
||
741 | @@: |
||
742 | cmp eax,0 |
||
743 | je .end_select |
||
744 | mov ebx,eax |
||
745 | cmp word[ebx],ID_ICON_POINT_SEL |
||
746 | jne .next_sel1 |
||
747 | stdcall [tl_node_poi_get_data], tree3,ebx |
||
748 | mov edi,eax |
||
749 | mov eax,[eax] |
||
750 | mov [eax+8],edx |
||
751 | stdcall update_tree, edi |
||
752 | dec ecx |
||
753 | jz @f |
||
754 | .next_sel1: |
||
755 | stdcall dword[tl_node_poi_get_next_info], tree3,ebx |
||
756 | jmp @b |
||
757 | @@: |
||
758 | .end_select: |
||
759 | ret |
||
760 | endp |
||
761 | |||
762 | align 4 |
||
763 | proc update_tree h_mem:dword |
||
764 | pushad |
||
765 | mov edi,[h_mem] |
||
766 | mov ebx,[edi] |
||
767 | finit |
||
768 | |||
769 | ;обновление измененного узла в списке tree3 и главного окна (по таймеру) |
||
770 | mov word[NumberSymbolsAD],5 |
||
771 | mov dword[obj_point.text],0 |
||
772 | cld |
||
773 | mov ecx,3 |
||
774 | .coord: |
||
775 | fld dword[ebx] |
||
776 | fstp qword[Data_Double] |
||
777 | call DoubleFloat_to_String |
||
778 | add ebx,4 |
||
779 | stdcall str_len, Data_String |
||
780 | mov esi,txt_space |
||
781 | add esi,eax |
||
782 | cmp esi,txt_space.end |
||
783 | jl .normal_size |
||
784 | mov esi,txt_space.end-1 ;минимум 1 пробел нужно добавить, что-бы цифры не слипались |
||
785 | .normal_size: |
||
786 | stdcall str_cat, obj_point.text,esi |
||
787 | stdcall str_cat, obj_point.text,Data_String |
||
788 | loop .coord |
||
789 | mov esi,obj_point.text |
||
790 | mov byte[esi],'*' ;отмечаем что вершина изменялась |
||
791 | mov byte[can_save],1 ;для показа кнопки 'Сохранить' |
||
792 | add edi,4 |
||
793 | mov ecx,MAX_OBJECT_SIZE-4 |
||
794 | rep movsb |
||
795 | popad |
||
796 | ret |
||
797 | endp |
||
798 | |||
799 | align 4 |
||
5938 | IgorA | 800 | angle_dxm dd 1.7775 ;~ 3d_wnd_w/180 - прибавление углов поворота сцены при вращении мышей |
801 | angle_dym dd 1.3335 ;~ 3d_wnd_h/180 |
||
5948 | IgorA | 802 | ratio dd 1.3333 ;~ 3d_wnd_w/3d_wnd_h |
5935 | IgorA | 803 | cursor_last_draw dd 0 ;положение курсора при последней прорисовке 3d окна |
4332 | IgorA | 804 | capt_p dd 0 |
805 | |||
2165 | IgorA | 806 | ;дерево с объектами в пользовательском файле |
5930 | IgorA | 807 | tree3 tree_list MAX_OBJECT_SIZE,3, tl_key_no_edit+tl_list_box_mode,\ |
5935 | IgorA | 808 | 16,16, 0xffffff,0xb0d0ff,0x400040, 5,290,303,140, 16, 4,0, el_focus,\ |
5930 | IgorA | 809 | w_scr_t3,get_point_coords |
2165 | IgorA | 810 | |
5935 | IgorA | 811 | edit1 edit_box 80, 76, 269, 0xffd0d0, 0xff, 0x80ff, 0, 0x8000, 34, string1, mouse_dd, 0 |
812 | edit2 edit_box 80, 160, 269, 0xd0d0ff, 0xff, 0x80ff, 0, 0x8000, 34, string2, mouse_dd, 0 |
||
813 | edit3 edit_box 80, 244, 269, 0xd0ffd0, 0xff, 0x80ff, 0, 0x8000, 34, string3, mouse_dd, 0 |
||
2173 | IgorA | 814 | editboxes_end: |
815 | |||
816 | string1 rb 34 |
||
817 | string2 rb 34 |
||
818 | string3 rb 34 |
||
819 | |||
2165 | IgorA | 820 | align 4 |
5930 | IgorA | 821 | w_scr_t3 scrollbar 16, 0,0,0, 15, 100,0,0, 0,0,0, 1 |