1 //#define TURRET_DEBUG_HK
7 void spawnfunc_turret_hk();
8 void turret_hk_dinit();
9 void turret_hk_attack();
12 float hk_is_valid_target(entity e_target)
14 if (e_target == world)
17 // If only this was used more..
18 if (e_target.flags & FL_NOTARGET)
22 if ((e_target.takedamage == DAMAGE_NO) || (e_target.health < 0))
26 if (e_target.flags & FL_CLIENT)
28 if (self.owner.target_select_playerbias < 0)
31 if (e_target.deadflag != DEAD_NO)
36 if ((e_target.flags & FL_PROJECTILE) && (self.owner.target_select_missilebias < 0))
40 if ((e_target.team == self.owner.team) || (self.owner.team == e_target.owner.team))
45 void turret_hk_missile_think()
47 vector vu, vd, vf, vl, vr, ve; // Vector (direction)
48 float fu, fd, ff, fl, fr, fe; // Fraction to solid
49 vector olddir,wishdir,newdir; // Final direction
50 float lt_for; // Length of Trace FORwrad
51 float lt_seek; // Length of Trace SEEK (left, right, up down)
52 float pt_seek; // Pitch of Trace SEEK (How mutch to angele left, right up, down trace towards v_forward)
58 self.nextthink = time + self.ticrate;
60 //if (self.cnt < time)
61 // turret_hk_missile_explode();
63 if (self.enemy.deadflag != DEAD_NO)
66 // Pick the closest valid target.
69 e = findradius(self.origin, 5000);
72 if (hk_is_valid_target(e))
77 if (vlen(self.origin - e.origin) < vlen(self.origin - self.enemy.origin))
84 self.angles = vectoangles(self.velocity);
85 self.angles_x = self.angles_x * -1;
86 makevectors(self.angles);
87 self.angles_x = self.angles_x * -1;
91 edist = vlen(self.origin - self.enemy.origin);
92 // Close enougth to do decent damage?
93 if ( edist <= (self.owner.shot_radius * 0.25) )
95 turret_projectile_explode();
99 // Get data on enemy position
100 pre_pos = self.enemy.origin +
101 self.enemy.velocity *
102 min((vlen(self.enemy.origin - self.origin) / vlen(self.velocity)),0.5);
104 traceline(self.origin, pre_pos,TRUE,self.enemy);
105 ve = normalize(pre_pos - self.origin);
114 if ((fe != 1) || (self.enemy == world) || (edist > 1000))
116 myspeed = vlen(self.velocity);
118 lt_for = myspeed * 3;
119 lt_seek = myspeed * 2.95;
122 traceline(self.origin, self.origin + v_forward * lt_for,FALSE,self);
126 // Find angular offset
127 ad = vlen(vectoangles(normalize(self.enemy.origin - self.origin)) - self.angles);
129 // To close to something, Slow down!
130 if ( ((ff < 0.7) || (ad > 4)) && (myspeed > autocvar_g_turrets_unit_hk_std_shot_speed) )
131 myspeed = max(myspeed * autocvar_g_turrets_unit_hk_std_shot_speed_decel, autocvar_g_turrets_unit_hk_std_shot_speed);
133 // Failry clear, accelerate.
134 if ( (ff > 0.7) && (myspeed < autocvar_g_turrets_unit_hk_std_shot_speed_max) )
135 myspeed = min(myspeed * autocvar_g_turrets_unit_hk_std_shot_speed_accel, autocvar_g_turrets_unit_hk_std_shot_speed_max);
139 pt_seek = bound(0.15,pt_seek,0.8);
140 if (ff < 0.5) pt_seek = 1;
143 traceline(self.origin, self.origin + (-1 * (v_right * pt_seek) + (v_forward * ff)) * lt_seek,FALSE,self);
148 traceline(self.origin, self.origin + ((v_right * pt_seek) + (v_forward * ff)) * lt_seek ,FALSE,self);
153 traceline(self.origin, self.origin + ((v_up * pt_seek) + (v_forward * ff)) * lt_seek ,FALSE,self);
158 traceline(self.origin, self.origin + (-1 * (v_up * pt_seek) + (v_forward * ff)) * lt_seek ,FALSE,self);
162 vl = normalize(vl - self.origin);
163 vr = normalize(vr - self.origin);
164 vu = normalize(vu - self.origin);
165 vd = normalize(vd - self.origin);
167 // Panic tresh passed, find a single direction and turn as hard as we can
171 if (fl > fr) wishdir = -1 * v_right;
172 if (fu > fl) wishdir = v_up;
173 if (fd > fu) wishdir = -1 * v_up;
177 // Normalize our trace vectors to make a smooth path
178 wishdir = normalize( (vl * fl) + (vr * fr) + (vu * fu) + (vd * fd) );
183 if (fe < 0.1) fe = 0.1; // Make sure we always try to move sligtly towards our target
184 wishdir = (wishdir * (1 - fe)) + (ve * fe);
189 // Got a clear path to target, speed up fast (if not at full speed) and go straight for it.
190 myspeed = vlen(self.velocity);
191 if (myspeed < autocvar_g_turrets_unit_hk_std_shot_speed_max)
192 myspeed = min(myspeed * autocvar_g_turrets_unit_hk_std_shot_speed_accel2,autocvar_g_turrets_unit_hk_std_shot_speed_max);
197 if ((myspeed > autocvar_g_turrets_unit_hk_std_shot_speed) && (self.cnt > time))
198 myspeed = min(myspeed * autocvar_g_turrets_unit_hk_std_shot_speed_accel2,autocvar_g_turrets_unit_hk_std_shot_speed_max);
203 self.cnt = time + 0.25;
205 self.movetype = MOVETYPE_BOUNCE;
209 // Calculate new heading
210 olddir = normalize(self.velocity);
211 newdir = normalize(olddir + wishdir * autocvar_g_turrets_unit_hk_std_shot_speed_turnrate);
213 // Set heading & speed
214 self.velocity = newdir * myspeed;
216 // Align model with new heading
217 self.angles = vectoangles(self.velocity);
220 #ifdef TURRET_DEBUG_HK
221 //if(self.atime < time) {
222 if ((fe <= 0.99)||(edist > 1000))
224 te_lightning2(world,self.origin, self.origin + vr * lt_seek);
225 te_lightning2(world,self.origin, self.origin + vl * lt_seek);
226 te_lightning2(world,self.origin, self.origin + vu * lt_seek);
227 te_lightning2(world,self.origin, self.origin + vd * lt_seek);
228 te_lightning2(world,self.origin, vf);
232 te_lightning2(world,self.origin, self.enemy.origin);
234 bprint("Speed: ", ftos(rint(myspeed)), "\n");
235 bprint("Trace to solid: ", ftos(rint(ff * 100)), "%\n");
236 bprint("Trace to target:", ftos(rint(fe * 100)), "%\n");
237 self.atime = time + 0.2;
241 UpdateCSQCProjectile(self);
244 void turret_hk_attack()
248 missile = turret_projectile("weapons/rocket_fire.wav", 6, 10, DEATH_TURRET_HK, PROJECTILE_ROCKET, FALSE, FALSE);
249 te_explosion (missile.origin);
251 missile.think = turret_hk_missile_think;
252 missile.nextthink = time + 0.25;
253 missile.movetype = MOVETYPE_BOUNCEMISSILE;
254 missile.velocity = self.tur_shotdir_updated * (self.shot_speed * 0.75);
255 missile.angles = vectoangles(missile.velocity);
256 missile.cnt = time + 30;
257 missile.ticrate = max(autocvar_sys_ticrate, 0.05);
259 if (self.tur_head.frame == 0)
260 self.tur_head.frame = self.tur_head.frame + 1;
264 void turret_hk_postthink()
266 if (self.tur_head.frame != 0)
267 self.tur_head.frame = self.tur_head.frame + 1;
269 if (self.tur_head.frame > 5)
270 self.tur_head.frame = 0;
273 float turret_hk_addtarget(entity e_target,entity e_sender)
277 if (turret_validate_target(self,e_target,self.target_validate_flags) > 0)
279 self.enemy = e_target;
287 void turret_hk_dinit()
289 if (self.netname == "")
290 self.netname = "Hunter-killer turret";
292 self.turrcaps_flags = TFL_TURRCAPS_RADIUSDMG | TFL_TURRCAPS_MEDPROJ | TFL_TURRCAPS_PLAYERKILL | TFL_TURRCAPS_RECIVETARGETS;
293 self.ammo_flags = TFL_AMMO_ROCKETS | TFL_AMMO_RECHARGE;
294 self.aim_flags = TFL_AIM_SIMPLE;
295 self.target_select_flags = TFL_TARGETSELECT_LOS | TFL_TARGETSELECT_PLAYERS | TFL_TARGETSELECT_TRIGGERTARGET | TFL_TARGETSELECT_RANGELIMTS | TFL_TARGETSELECT_TEAMCHECK;
296 self.firecheck_flags = TFL_FIRECHECK_DEAD | TFL_FIRECHECK_TEAMCECK | TFL_FIRECHECK_REFIRE | TFL_FIRECHECK_AFF;
297 self.shoot_flags = TFL_SHOOT_CLEARTARGET;
299 if (turret_stdproc_init("hk_std", "models/turrets/base.md3", "models/turrets/hk.md3", TID_HK) == 0)
305 self.target_validate_flags = TFL_TARGETSELECT_PLAYERS | TFL_TARGETSELECT_TEAMCHECK;
308 self.turret_firefunc = turret_hk_attack;
310 // re-color badge & handle recoil effect
311 self.turret_postthink = turret_hk_postthink;
313 // What to do when reciveing foreign target data
314 self.turret_addtarget = turret_hk_addtarget;
318 /*QUAKED turret_hk (0 .5 .8) ?
319 * Turret that fires Hunter-killer missiles.
320 * Missiles seek their target and try to avoid obstacles. If target dies early, they
321 * pick a new one on their own.
324 void spawnfunc_turret_hk()
326 precache_model ("models/turrets/base.md3");
327 precache_model ("models/turrets/hk.md3");
329 self.think = turret_hk_dinit;
330 self.nextthink = time + 0.5;