1 /* $Id: slew.c,v 1.5 2004-08-28 23:17:45 schaffner Exp $ */
3 THE COMPUTER CODE CONTAINED HEREIN IS THE SOLE PROPERTY OF PARALLAX
4 SOFTWARE CORPORATION ("PARALLAX"). PARALLAX, IN DISTRIBUTING THE CODE TO
5 END-USERS, AND SUBJECT TO ALL OF THE TERMS AND CONDITIONS HEREIN, GRANTS A
6 ROYALTY-FREE, PERPETUAL LICENSE TO SUCH END-USERS FOR USE BY SUCH END-USERS
7 IN USING, DISPLAYING, AND CREATING DERIVATIVE WORKS THEREOF, SO LONG AS
8 SUCH USE, DISPLAY OR CREATION IS FOR NON-COMMERCIAL, ROYALTY OR REVENUE
9 FREE PURPOSES. IN NO EVENT SHALL THE END-USER USE THE COMPUTER CODE
10 CONTAINED HEREIN FOR REVENUE-BEARING PURPOSES. THE END-USER UNDERSTANDS
11 AND AGREES TO THE TERMS HEREIN AND ACCEPTS THE SAME BY USE OF THIS FILE.
12 COPYRIGHT 1993-1999 PARALLAX SOFTWARE CORPORATION. ALL RIGHTS RESERVED.
17 * Basic slew system for moving around the mine
27 static char rcsid[] = "$Id: slew.c,v 1.5 2004-08-28 23:17:45 schaffner Exp $";
44 //variables for slew system
46 object *slew_obj=NULL; //what object is slewing, or NULL if none
49 #define ROT_SPEED 8 //rate of rotation while key held down
50 #define VEL_SPEED (2*55) //rate of acceleration while key held down
52 short old_joy_x,old_joy_y; //position last time around
54 // Function Prototypes
58 // -------------------------------------------------------------------
59 //say start slewing with this object
60 void slew_init(object *obj)
64 slew_obj->control_type = CT_SLEW;
65 slew_obj->movement_type = MT_NONE;
67 slew_stop(); //make sure not moving
73 if (!slew_obj || slew_obj->control_type!=CT_SLEW) return 0;
75 vm_vec_zero(&slew_obj->mtype.phys_info.velocity);
79 void slew_reset_orient()
81 if (!slew_obj || slew_obj->control_type!=CT_SLEW) return;
83 slew_obj->orient.rvec.x = slew_obj->orient.uvec.y = slew_obj->orient.fvec.z = f1_0;
85 slew_obj->orient.rvec.y = slew_obj->orient.rvec.z = slew_obj->orient.uvec.x =
86 slew_obj->orient.uvec.z = slew_obj->orient.fvec.x = slew_obj->orient.fvec.y = 0;
90 int do_slew_movement(object *obj, int check_keys, int check_joy )
93 vms_vector svel, movement; //scaled velocity (per this frame)
94 vms_matrix rotmat,new_pm;
96 int joyx_moved,joyy_moved;
99 if (!slew_obj || slew_obj->control_type!=CT_SLEW) return 0;
102 if (Function_mode == FMODE_EDITOR) {
103 if (FindArg("-jasen"))
104 obj->mtype.phys_info.velocity.x += VEL_SPEED * (key_down_time(KEY_PAD3) - key_down_time(KEY_PAD1));
106 obj->mtype.phys_info.velocity.x += VEL_SPEED * (key_down_time(KEY_PAD9) - key_down_time(KEY_PAD7));
107 obj->mtype.phys_info.velocity.y += VEL_SPEED * (key_down_time(KEY_PADMINUS) - key_down_time(KEY_PADPLUS));
108 obj->mtype.phys_info.velocity.z += VEL_SPEED * (key_down_time(KEY_PAD8) - key_down_time(KEY_PAD2));
110 rotang.p = (key_down_time(KEY_LBRACKET) - key_down_time(KEY_RBRACKET))/ROT_SPEED ;
111 if (FindArg("-jasen"))
112 rotang.b = (key_down_time(KEY_PAD7) - key_down_time(KEY_PAD9))/ROT_SPEED;
114 rotang.b = (key_down_time(KEY_PAD1) - key_down_time(KEY_PAD3))/ROT_SPEED;
115 rotang.h = (key_down_time(KEY_PAD6) - key_down_time(KEY_PAD4))/ROT_SPEED;
118 obj->mtype.phys_info.velocity.x += VEL_SPEED * Controls.sideways_thrust_time;
119 obj->mtype.phys_info.velocity.y += VEL_SPEED * Controls.vertical_thrust_time;
120 obj->mtype.phys_info.velocity.z += VEL_SPEED * Controls.forward_thrust_time;
122 rotang.p = Controls.pitch_time/ROT_SPEED ;
123 rotang.b = Controls.bank_time/ROT_SPEED;
124 rotang.h = Controls.heading_time/ROT_SPEED;
128 rotang.p = rotang.b = rotang.h = 0;
130 //check for joystick movement
132 if (check_joy && joy_present && (Function_mode == FMODE_EDITOR) ) {
133 joy_get_pos(&joy_x,&joy_y);
136 joyx_moved = (abs(joy_x - old_joy_x)>JOY_NULL);
137 joyy_moved = (abs(joy_y - old_joy_y)>JOY_NULL);
139 if (abs(joy_x) < JOY_NULL) joy_x = 0;
140 if (abs(joy_y) < JOY_NULL) joy_y = 0;
143 if (!rotang.p) rotang.p = fixmul(-joy_y * 512,FrameTime); else;
145 if (joyy_moved) obj->mtype.phys_info.velocity.z = -joy_y * 8192;
147 if (!rotang.h) rotang.h = fixmul(joy_x * 512,FrameTime);
149 if (joyx_moved) old_joy_x = joy_x;
150 if (joyy_moved) old_joy_y = joy_y;
153 moved = rotang.p | rotang.b | rotang.h;
155 vm_angles_2_matrix(&rotmat,&rotang);
156 vm_matrix_x_matrix(&new_pm,&obj->orient,&rotmat);
157 obj->orient = new_pm;
158 vm_transpose_matrix(&new_pm); //make those columns rows
160 moved |= obj->mtype.phys_info.velocity.x | obj->mtype.phys_info.velocity.y | obj->mtype.phys_info.velocity.z;
162 svel = obj->mtype.phys_info.velocity;
163 vm_vec_scale(&svel,FrameTime); //movement in this frame
164 vm_vec_rotate(&movement,&svel,&new_pm);
166 // obj->last_pos = obj->pos;
167 vm_vec_add2(&obj->pos,&movement);
169 moved |= (movement.x || movement.y || movement.z);
172 update_object_seg(obj); //update segment id
177 //do slew for this frame
178 int slew_frame(int check_keys)
180 return do_slew_movement( slew_obj, !check_keys, 1 );