2 THE COMPUTER CODE CONTAINED HEREIN IS THE SOLE PROPERTY OF PARALLAX
3 SOFTWARE CORPORATION ("PARALLAX"). PARALLAX, IN DISTRIBUTING THE CODE TO
4 END-USERS, AND SUBJECT TO ALL OF THE TERMS AND CONDITIONS HEREIN, GRANTS A
5 ROYALTY-FREE, PERPETUAL LICENSE TO SUCH END-USERS FOR USE BY SUCH END-USERS
6 IN USING, DISPLAYING, AND CREATING DERIVATIVE WORKS THEREOF, SO LONG AS
7 SUCH USE, DISPLAY OR CREATION IS FOR NON-COMMERCIAL, ROYALTY OR REVENUE
8 FREE PURPOSES. IN NO EVENT SHALL THE END-USER USE THE COMPUTER CODE
9 CONTAINED HEREIN FOR REVENUE-BEARING PURPOSES. THE END-USER UNDERSTANDS
10 AND AGREES TO THE TERMS HEREIN AND ACCEPTS THE SAME BY USE OF THIS FILE.
11 COPYRIGHT 1993-1998 PARALLAX SOFTWARE CORPORATION. ALL RIGHTS RESERVED.
16 * Miscellaneous functions stripped out of med.c
43 #include "editor/editor.h"
50 #include "texpage.h" // For texpage_goto_first
51 #include "meddraw.h" // For draw_World
54 //return 2d distance, i.e, sqrt(x*x + y*y)
56 long dist_2d(long x,long y);
58 #pragma aux dist_2d parm [eax] [ebx] value [eax] modify [ecx edx] = \
68 long dist_2d(long x,long y) {
69 return (long)sqrt((double)x * (double)x + (double)y * (double)y);
73 // Given mouse movement in dx, dy, returns a 3x3 rotation matrix in RotMat.
74 // Taken from Graphics Gems III, page 51, "The Rolling Ball"
76 void GetMouseRotation( int idx, int idy, vms_matrix * RotMat )
78 fix dr, cos_theta, sin_theta, denom, cos_theta1;
79 fix Radius = i2f(100);
85 dx = i2f(idx); dy = i2f(idy);
89 denom = dist_2d(Radius,dr);
91 cos_theta = fixdiv(Radius,denom);
92 sin_theta = fixdiv(dr,denom);
94 cos_theta1 = f1_0 - cos_theta;
99 RotMat->rvec.x = cos_theta + fixmul(fixmul(dydr,dydr),cos_theta1);
100 RotMat->uvec.x = - fixmul(fixmul(dxdr,dydr),cos_theta1);
101 RotMat->fvec.x = fixmul(dxdr,sin_theta);
103 RotMat->rvec.y = RotMat->uvec.x;
104 RotMat->uvec.y = cos_theta + fixmul(fixmul(dxdr,dxdr),cos_theta1);
105 RotMat->fvec.y = fixmul(dydr,sin_theta);
107 RotMat->rvec.z = -RotMat->fvec.x;
108 RotMat->uvec.z = -RotMat->fvec.y;
109 RotMat->fvec.z = cos_theta;
113 int Gameview_lockstep; //if set, view is locked to Curseg
117 Gameview_lockstep = !Gameview_lockstep;
118 if (Gameview_lockstep == 0) {
119 if (last_keypress != KEY_L)
120 diagnostic_message("[L] - Lock mode OFF");
122 diagnostic_message("Lock mode OFF");
124 if (Gameview_lockstep) {
125 if (last_keypress != KEY_L)
126 diagnostic_message("[L] Lock mode ON");
128 diagnostic_message("Lock mode ON");
130 Cursegp = &Segments[ConsoleObject->segnum];
131 med_create_new_segment_from_cursegp();
132 set_view_target_from_segment(Cursegp);
133 Update_flags = UF_ED_STATE_CHANGED;
135 return Gameview_lockstep;
138 int medlisp_delete_segment(void)
140 if (!med_delete_segment(Cursegp)) {
141 if (Lock_view_to_cursegp)
142 set_view_target_from_segment(Cursegp);
143 autosave_mine(mine_filename);
144 strcpy(undo_status[Autosave_count], "Delete Segment UNDONE.");
145 Update_flags |= UF_WORLD_CHANGED;
147 diagnostic_message("Segment deleted.");
148 warn_if_concave_segments(); // This could be faster -- just check if deleted segment was concave, warn accordingly
154 int medlisp_scale_segment(void)
159 scale.x = fl2f((float) func_get_param(0));
160 scale.y = fl2f((float) func_get_param(1));
161 scale.z = fl2f((float) func_get_param(2));
162 med_create_new_segment(&scale);
163 med_rotate_segment(Cursegp,vm_angles_2_matrix(&rotmat,&Seg_orientation));
164 Update_flags |= UF_WORLD_CHANGED;
170 int medlisp_rotate_segment(void)
174 Seg_orientation.p = func_get_param(0);
175 Seg_orientation.b = func_get_param(1);
176 Seg_orientation.h = func_get_param(2);
177 med_rotate_segment(Cursegp,vm_angles_2_matrix(&rotmat,&Seg_orientation));
178 Update_flags |= UF_WORLD_CHANGED | UF_VIEWPOINT_MOVED;
183 int ToggleLockViewToCursegp(void)
185 Lock_view_to_cursegp = !Lock_view_to_cursegp;
186 Update_flags = UF_ED_STATE_CHANGED;
187 if (Lock_view_to_cursegp) {
188 if (last_keypress != KEY_V+KEY_CTRLED)
189 diagnostic_message("[ctrl-V] View locked to Cursegp.");
191 diagnostic_message("View locked to Cursegp.");
192 set_view_target_from_segment(Cursegp);
194 if (last_keypress != KEY_V+KEY_CTRLED)
195 diagnostic_message("[ctrl-V] View not locked to Cursegp.");
197 diagnostic_message("View not locked to Cursegp.");
199 return Lock_view_to_cursegp;
202 int ToggleDrawAllSegments()
204 Draw_all_segments = !Draw_all_segments;
205 Update_flags = UF_ED_STATE_CHANGED;
206 if (Draw_all_segments == 1) {
207 if (last_keypress != KEY_A+KEY_CTRLED)
208 diagnostic_message("[ctrl-A] Draw all segments ON.");
210 diagnostic_message("Draw all segments ON.");
212 if (Draw_all_segments == 0) {
213 if (last_keypress != KEY_A+KEY_CTRLED)
214 diagnostic_message("[ctrl-A] Draw all segments OFF.");
216 diagnostic_message("Draw all segments OFF.");
218 return Draw_all_segments;
223 int IncreaseDrawDepth(void)
226 Update_flags = UF_ED_STATE_CHANGED;
230 int DecreaseDrawDepth(void)
234 Update_flags = UF_ED_STATE_CHANGED;
240 int ToggleCoordAxes()
242 // Toggle display of coordinate axes.
243 Show_axes_flag = !Show_axes_flag;
244 LargeView.ev_changed = 1;
245 if (Show_axes_flag == 1) {
246 if (last_keypress != KEY_D+KEY_CTRLED)
247 diagnostic_message("[ctrl-D] Coordinate axes ON.");
249 diagnostic_message("Coordinate axes ON.");
251 if (Show_axes_flag == 0) {
252 if (last_keypress != KEY_D+KEY_CTRLED)
253 diagnostic_message("[ctrl-D] Coordinate axes OFF.");
255 diagnostic_message("Coordinate axes OFF.");
257 return Show_axes_flag;
260 int med_keypad_goto_prev()
266 int med_keypad_goto_next()
272 int med_keypad_goto()
274 ui_pad_goto(func_get_param(0));
278 int render_3d_in_big_window=0;
280 int medlisp_update_screen()
284 if (!render_3d_in_big_window)
285 for (vn=0;vn<N_views;vn++)
286 if (Views[vn]->ev_changed || (Update_flags & (UF_WORLD_CHANGED|UF_VIEWPOINT_MOVED|UF_ED_STATE_CHANGED))) {
287 draw_world(Views[vn]->ev_canv,Views[vn],Cursegp,Big_depth);
288 Views[vn]->ev_changed = 0;
291 if (Update_flags & (UF_WORLD_CHANGED|UF_GAME_VIEW_CHANGED|UF_ED_STATE_CHANGED)) {
292 grs_canvas temp_canvas;
293 grs_canvas *render_canv,*show_canv;
295 if (render_3d_in_big_window) {
297 gr_init_sub_canvas(&temp_canvas,canv_offscreen,0,0,
298 LargeView.ev_canv->cv_bitmap.bm_w,LargeView.ev_canv->cv_bitmap.bm_h);
300 render_canv = &temp_canvas;
301 show_canv = LargeView.ev_canv;
305 render_canv = VR_offscreen_buffer;
306 show_canv = Canv_editor_game;
309 gr_set_current_canvas(render_canv);
312 Assert(render_canv->cv_bitmap.bm_w == show_canv->cv_bitmap.bm_w &&
313 render_canv->cv_bitmap.bm_h == show_canv->cv_bitmap.bm_h);
316 gr_bm_ubitblt(show_canv->cv_bitmap.bm_w,show_canv->cv_bitmap.bm_h,
317 0,0,0,0,&render_canv->cv_bitmap,&show_canv->cv_bitmap);
321 Update_flags=UF_NONE; //clear flags
326 void med_point_2_vec(grs_canvas *canv,vms_vector *v,short sx,short sy)
328 gr_set_current_canvas(canv);
331 g3_set_view_matrix(&Viewer->pos,&Viewer->orient,Render_zoom);
333 g3_point_2_vec(v,sx,sy);
340 void draw_world_from_game(void)
343 draw_world(Views[0]->ev_canv,Views[0],Cursegp,Big_depth);
350 if (Lock_view_to_cursegp)
351 set_view_target_from_segment(Cursegp);
353 if (Autosave_count==9) diagnostic_message(undo_status[0]);
355 diagnostic_message(undo_status[Autosave_count+1]);
358 if (u == 1) diagnostic_message("Can't Undo.");
360 if (u == 2) diagnostic_message("Can't Undo - Autosave OFF");
361 Update_flags |= UF_WORLD_CHANGED;
363 warn_if_concave_segments();
370 Autosave_flag = !Autosave_flag;
371 if (Autosave_flag == 1)
372 diagnostic_message("Autosave ON.");
374 diagnostic_message("Autosave OFF.");
375 return Autosave_flag;
381 if (med_attach_segment(Cursegp, &New_segment, Curside, AttachSide)==4) // Used to be WBACK instead of Curside
382 diagnostic_message("Cannot attach segment - already a connection on current side.");
384 if (Lock_view_to_cursegp)
385 set_view_target_from_segment(Cursegp);
386 vm_angvec_make(&Seg_orientation,0,0,0);
388 Update_flags |= UF_WORLD_CHANGED;
389 autosave_mine(mine_filename);
390 strcpy(undo_status[Autosave_count], "Attach Segment UNDONE.\n");
392 warn_if_concave_segment(Cursegp);
397 int ForceTotalRedraw()
399 Update_flags = UF_ALL;
407 // Make large view be same as one of the orthogonal views.
408 Large_view_index = (Large_view_index + 1) % 3; // keep in 0,1,2 for top, front, right
409 switch (Large_view_index) {
410 case 0: LargeView.ev_matrix = TopView.ev_matrix; break;
411 case 1: LargeView.ev_matrix = FrontView.ev_matrix; break;
412 case 2: LargeView.ev_matrix = RightView.ev_matrix; break;
414 Update_flags |= UF_VIEWPOINT_MOVED;
419 int DeleteCurSegment()
421 // Delete current segment.
422 med_delete_segment(Cursegp);
423 autosave_mine(mine_filename);
424 strcpy(undo_status[Autosave_count], "Delete segment UNDONE.");
425 if (Lock_view_to_cursegp)
426 set_view_target_from_segment(Cursegp);
427 Update_flags |= UF_WORLD_CHANGED;
429 diagnostic_message("Segment deleted.");
430 warn_if_concave_segments(); // This could be faster -- just check if deleted segment was concave, warn accordingly
435 int CreateDefaultNewSegment()
437 // Create a default segment for New_segment.
439 med_create_new_segment(vm_vec_make(&tempvec,DEFAULT_X_SIZE,DEFAULT_Y_SIZE,DEFAULT_Z_SIZE));
445 int CreateDefaultNewSegmentandAttach()
447 CreateDefaultNewSegment();
453 int ExchangeMarkandCurseg()
455 // If Markedsegp != Cursegp, and Markedsegp->segnum != -1, exchange Markedsegp and Cursegp
457 if (Markedsegp->segnum != -1) {
460 tempsegp = Markedsegp; Markedsegp = Cursegp; Cursegp = tempsegp;
461 tempside = Markedside; Markedside = Curside; Curside = tempside;
462 med_create_new_segment_from_cursegp();
463 Update_flags |= UF_ED_STATE_CHANGED;
469 int medlisp_add_segment()
472 //segment *ocursegp = Cursegp;
473 // med_attach_segment(Cursegp, &New_segment, Curside, WFRONT); // Used to be WBACK instead of Curside
474 //med_propagate_tmaps_to_segments(ocursegp,Cursegp);
475 // set_view_target_from_segment(Cursegp);
476 //// while (!vm_angvec_make(&Seg_orientation,0,0,0));
483 int ClearSelectedList(void)
486 Update_flags |= UF_WORLD_CHANGED;
488 diagnostic_message("Selected list cleared.");
494 int ClearFoundList(void)
497 Update_flags |= UF_WORLD_CHANGED;
499 diagnostic_message("Found list cleared.");
507 // ---------------------------------------------------------------------------------------------------
509 // View current segment (Cursegp) from the previous segment.
510 void set_chase_matrix(segment *sp)
513 vms_vector forvec = ZERO_VECTOR, upvec;
514 vms_vector tv = ZERO_VECTOR;
517 // move back two segments, if possible, else move back one, if possible, else use current
518 if (IS_CHILD(sp->children[WFRONT])) {
519 psp = &Segments[sp->children[WFRONT]];
520 if (IS_CHILD(psp->children[WFRONT]))
521 psp = &Segments[psp->children[WFRONT]];
525 for (v=0; v<MAX_VERTICES_PER_SEGMENT; v++)
526 vm_vec_add2(&forvec,&Vertices[sp->verts[v]]);
527 vm_vec_scale(&forvec,F1_0/MAX_VERTICES_PER_SEGMENT);
529 for (v=0; v<MAX_VERTICES_PER_SEGMENT; v++)
530 vm_vec_add2(&tv,&Vertices[psp->verts[v]]);
531 vm_vec_scale(&tv,F1_0/MAX_VERTICES_PER_SEGMENT);
533 Ed_view_target = forvec;
535 vm_vec_sub2(&forvec,&tv);
537 extract_up_vector_from_segment(psp,&upvec);
539 if (!((forvec.x == 0) && (forvec.y == 0) && (forvec.z == 0)))
540 vm_vector_2_matrix(&LargeView.ev_matrix,&forvec,&upvec,NULL);
545 // ---------------------------------------------------------------------------------------------------
546 void set_view_target_from_segment(segment *sp)
548 vms_vector tv = ZERO_VECTOR;
551 if (Funky_chase_mode)
553 mprintf((0, "Trying to set chase mode\n"));
554 //set_chase_matrix(sp);
557 for (v=0; v<MAX_VERTICES_PER_SEGMENT; v++)
558 vm_vec_add2(&tv,&Vertices[sp->verts[v]]);
560 vm_vec_scale(&tv,F1_0/MAX_VERTICES_PER_SEGMENT);
565 Update_flags |= UF_VIEWPOINT_MOVED;