2 ===========================================================================
4 CLIENT WEAPONSYSTEM CODE
5 Bring back W_Weaponframe
7 ===========================================================================
12 // VorteX: static frame globals
13 float WFRAME_FIRE1 = 0;
14 float WFRAME_FIRE2 = 1;
15 float WFRAME_IDLE = 2;
17 void(float fr, float t, void() func) weapon_thinkf;
22 // this function calculates w_shotorg and w_shotdir based on the weapon model
23 // offset, trueaim and antilag, and won't put w_shotorg inside a wall.
24 // make sure you call makevectors first (FIXME?)
25 void(entity ent, vector vecs, float antilag, float recoil, string snd) W_SetupShot =
27 float nudge = 1; // added to traceline target and subtracted from result
28 local vector trueaimpoint;
29 traceline_antilag(self, self.origin + self.view_ofs, self.origin + self.view_ofs + v_forward * MAX_SHOT_DISTANCE, MOVE_NOMONSTERS, self, 0);
30 trueaimpoint = trace_endpos;
32 if (cvar("g_shootfromeye"))
33 w_shotorg = ent.origin + ent.view_ofs;
34 else if (cvar("g_shootfromcenter"))
35 w_shotorg = ent.origin + ent.view_ofs + '0 0 1' * vecs_z;
37 w_shotorg = ent.origin + ent.view_ofs + v_right * vecs_y + v_up * vecs_z;
38 // now move the shotorg forward as much as requested if possible
39 traceline(w_shotorg, w_shotorg + v_forward * (vecs_x + nudge), MOVE_NORMAL, self);
40 w_shotorg = trace_endpos - v_forward * nudge;
41 // calculate the shotdir from the chosen shotorg
42 w_shotdir = normalize(trueaimpoint - w_shotorg);
44 // explanation of g_antilag:
45 // if client reports it was aiming at a player, and the serverside trace
46 // says it would miss, change the aim point to the player's new origin,
47 // but only if the shot at the player's new origin would hit of course
49 // FIXME: a much better method for bullet weapons would be to leave a
50 // trail of lagged 'ghosts' behind players, and see if the bullet hits the
51 // ghost corresponding to this player's ping time, and if so it would do
52 // damage to the real player
54 if (self.cursor_trace_ent) // client was aiming at someone
55 if (self.cursor_trace_ent != self) // just to make sure
56 if (self.cursor_trace_ent.takedamage) // and that person is killable
57 if (self.cursor_trace_ent.classname == "player") // and actually a player
58 if (cvar("g_antilag") == 1)
60 // verify that the shot would miss without antilag
61 // (avoids an issue where guns would always shoot at their origin)
62 traceline(w_shotorg, w_shotorg + w_shotdir * MAX_SHOT_DISTANCE, MOVE_NORMAL, self);
63 if (!trace_ent.takedamage)
65 // verify that the shot would hit if altered
66 traceline(w_shotorg, self.cursor_trace_ent.origin, MOVE_NORMAL, self);
67 if (trace_ent == self.cursor_trace_ent)
69 // verify that the shot would hit in the past
70 if(self.antilag_debug)
71 antilag_takeback(self.cursor_trace_ent, time - self.antilag_debug);
73 antilag_takeback(self.cursor_trace_ent, time - self.ping * 0.001);
75 traceline(self.origin + self.view_ofs, self.origin + self.view_ofs + v_forward * MAX_SHOT_DISTANCE, MOVE_NORMAL, self);
76 antilag_restore(self.cursor_trace_ent);
78 if(trace_ent == self.cursor_trace_ent)
81 w_shotdir = normalize(self.cursor_trace_ent.origin - w_shotorg);
82 dprint("ANTILAG HIT for ", self.netname, "\n");
86 // prydon cursor aimbot or odd network conditions
87 dprint("WARNING: antilag ghost trace for ", self.netname, " failed!\n");
90 if(cvar("developer") >= 2)
94 v = antilag_takebackorigin(self.cursor_trace_ent, time - (self.ping * 0.001 ));
95 vplus = antilag_takebackorigin(self.cursor_trace_ent, time - (self.ping * 0.001 + 0.01));
96 vel = (vplus - v) * (1 / 0.01);
97 // solve: v + X * vel = closest to self.origin + self.view_ofs, v_forward axis
98 v -= (self.origin + self.view_ofs);
99 // solve: v + X * vel = closest to v_forward axis
100 // project into 2D by subtracting v_forward components:
101 v -= (v * v_forward) * v_forward;
102 vel -= (vel * v_forward) * v_forward;
103 // solve: v + X * vel = closest to origin
104 // (v + X * vel)^2 closest to 0
105 // v^2 + 2 * X * (v * vel) + X^2 * vel^2 closest to 0
106 X = -(v * vel) / (vel * vel);
107 dprint("dead center needs adjustment of ", ftos(X * 1000), " (that is, ", ftos(self.ping + X * 1000), " instead of ", ftos(self.ping), "\n");
114 self.punchangle_x = recoil * -1;
117 sound (self, CHAN_WEAPON, snd, 1, ATTN_NORM);
119 if (self.items & IT_STRENGTH)
121 sound (self, CHAN_AUTO, "weapons/strength_fire.wav", 1, ATTN_NORM);
124 void LaserTarget_Think()
131 // list of weapons that will use the laser, and the options that enable it
132 if(self.owner.laser_on && self.owner.weapon == WEP_ROCKET_LAUNCHER && g_laserguided_missile)
135 //if(self.owner.weapon == WEP_ELECTRO && cvar("g_laserguided_electro"))
140 // if a laser-enabled weapon isn't selected, delete any existing laser and quit
143 // rocket launcher isn't selected, so no laser target.
144 if(self.lasertarget != world)
146 remove(self.lasertarget);
147 self.lasertarget = world;
152 if(!self.lasertarget)
154 // we don't have a lasertarget entity, so spawn one
155 //bprint("create laser target\n");
156 e = self.lasertarget = spawn();
157 e.owner = self.owner; // Its owner is my owner
158 e.classname = "laser_target";
159 e.movetype = MOVETYPE_NOCLIP; // don't touch things
160 setmodel(e, "models/laser_dot.mdl"); // what it looks like, precision set below
161 e.scale = 1.25; // make it larger
162 e.alpha = 0.25; // transparency
163 e.colormod = '255 0 0' * (1/255) * 8; // change colors
164 e.effects = EF_FULLBRIGHT | EF_LOWPRECISION;
165 // make it dynamically glow
166 // you should avoid over-using this, as it can slow down the player's computer.
167 e.glow_color = 251; // red color
171 e = self.lasertarget;
173 // move the laser dot to where the player is looking
175 makevectors(self.owner.v_angle); // set v_forward etc to the direction the player is looking
176 offset = '0 0 26' + v_right*3;
177 traceline(self.owner.origin + offset, self.owner.origin + offset + v_forward * MAX_SHOT_DISTANCE, FALSE, self); // trace forward until you hit something, like a player or wall
178 setorigin(e, trace_endpos + v_forward*8); // move me to where the traceline ended
179 if(trace_plane_normal != '0 0 0')
180 e.angles = vectoangles(trace_plane_normal);
182 e.angles = vectoangles(v_forward);
185 float CL_Weaponentity_CustomizeEntityForClient()
187 self.viewmodelforclient = self.owner;
188 if(other.classname == "spectator")
189 if(other.enemy == self.owner)
190 self.viewmodelforclient = other;
195 void() CL_Weaponentity_Think =
197 self.nextthink = time;
198 if (intermission_running)
199 self.frame = WFRAME_IDLE;
200 if (self.owner.weaponentity != self)
205 if (self.owner.deadflag != DEAD_NO)
210 if (self.cnt != self.owner.weapon || self.dmg != self.owner.modelindex || self.deadflag != self.owner.deadflag)
212 self.cnt = self.owner.weapon;
213 self.dmg = self.owner.modelindex;
214 self.deadflag = self.owner.deadflag;
215 if (self.owner.weaponname != "")
216 setmodel(self, strcat("models/weapons/w_", self.owner.weaponname, ".zym")); // precision set below
220 self.effects = self.owner.effects | EF_LOWPRECISION;
221 self.effects = self.effects - (self.effects & (EF_FULLBRIGHT)); // can mask team color, so get rid of it
223 if (self.flags & FL_FLY)
224 // owner is currently being teleported, so don't apply EF_NODRAW otherwise the viewmodel would "blink"
225 self.effects = self.effects - (self.effects & EF_NODRAW);
227 if(self.owner.alpha >= 0)
228 self.alpha = self.owner.alpha;
231 self.colormap = self.owner.colormap;
233 self.angles = '0 0 0';
236 if (self.state == WS_RAISE)
237 f = (self.owner.weapon_nextthink - time) / cvar("g_balance_weaponswitchdelay");
238 else if (self.state == WS_DROP)
239 f = 1 - (self.owner.weapon_nextthink - time) / cvar("g_balance_weaponswitchdelay");
240 else if (self.state == WS_CLEAR)
242 self.angles_x = -90 * f * f;
244 // create or update the lasertarget entity
248 void() CL_ExteriorWeaponentity_Think =
251 self.nextthink = time;
252 if (self.owner.exteriorweaponentity != self)
257 if (self.owner.deadflag != DEAD_NO)
262 if (self.cnt != self.owner.weapon || self.dmg != self.owner.modelindex || self.deadflag != self.owner.deadflag)
264 self.cnt = self.owner.weapon;
265 self.dmg = self.owner.modelindex;
266 self.deadflag = self.owner.deadflag;
267 if (self.owner.weaponname != "")
268 setmodel(self, strcat("models/weapons/v_", self.owner.weaponname, ".md3")); // precision set below
272 if((tag_found = gettagindex(self.owner, "tag_weapon")))
274 self.tag_index = tag_found;
275 self.tag_entity = self.owner;
278 setattachment(self, self.owner, "bip01 r hand");
280 // if that didn't find a tag, hide the exterior weapon model
284 self.effects = self.owner.effects | EF_LOWPRECISION;
285 self.effects = self.effects - (self.effects & (EF_BLUE | EF_RED)); // eat performance
286 if(self.owner.alpha >= 0)
287 self.alpha = self.owner.alpha;
290 self.colormap = self.owner.colormap;
293 // spawning weaponentity for client
294 void() CL_SpawnWeaponentity =
296 self.weaponentity = spawn();
297 self.weaponentity.solid = SOLID_NOT;
298 self.weaponentity.owner = self;
299 self.weaponentity.weaponentity = self.weaponentity;
300 setmodel(self.weaponentity, ""); // precision set when changed
301 self.weaponentity.origin = '0 0 0';
302 self.weaponentity.angles = '0 0 0';
303 self.weaponentity.viewmodelforclient = self;
304 self.weaponentity.flags = 0;
305 self.weaponentity.think = CL_Weaponentity_Think;
306 self.weaponentity.customizeentityforclient = CL_Weaponentity_CustomizeEntityForClient;
307 self.weaponentity.nextthink = time;
308 self.weaponentity.scale = 0.61;
310 self.exteriorweaponentity = spawn();
311 self.exteriorweaponentity.solid = SOLID_NOT;
312 self.exteriorweaponentity.exteriorweaponentity = self.exteriorweaponentity;
313 self.exteriorweaponentity.owner = self;
314 self.exteriorweaponentity.origin = '0 0 0';
315 self.exteriorweaponentity.angles = '0 0 0';
316 self.exteriorweaponentity.think = CL_ExteriorWeaponentity_Think;
317 self.exteriorweaponentity.nextthink = time;
320 float(entity cl, float wpn, float andammo, float complain) client_hasweapon =
322 local float itemcode, f;
323 local entity oldself;
325 if (wpn < WEP_FIRST || wpn > WEP_LAST)
328 sprint(self, "Invalid weapon\n");
331 itemcode = W_ItemCode(wpn);
332 if (cl.items & itemcode)
338 f = weapon_action(wpn, WR_CHECKAMMO1);
339 f = f + weapon_action(wpn, WR_CHECKAMMO2);
344 sprint(self, "You don't have any ammo for that weapon\n");
353 // Report Proper Weapon Status / Modified Weapon Ownership Message
354 if(itemsInMap & itemcode)
355 sprint(self, strcat("You do not have the ^2", W_Name(wpn), "\n") );
357 sprint(self, strcat("The ^2", W_Name(wpn), "^7 is ^1NOT AVAILABLE^7 in this map\n") );
365 if (self.weapon != -1)
367 if (self.weaponentity)
369 self.weaponentity.state = WS_CLEAR;
370 // self.weaponname = ""; // next frame will setmodel it to "" when needed anyway
371 self.weaponentity.effects = 0;
377 if (self.weaponentity)
378 self.weaponentity.state = WS_READY;
379 weapon_thinkf(WFRAME_IDLE, 1000000, w_ready);
382 // FIXME: add qw-style client-custom weaponrating (cl_weaponrating)?
383 float(entity e) w_getbestweapon
384 {// add new weapons here
385 if (client_hasweapon(e, WEP_ROCKET_LAUNCHER, TRUE, FALSE))
386 return WEP_ROCKET_LAUNCHER;
387 else if (client_hasweapon(e, WEP_NEX, TRUE, FALSE))
389 else if (client_hasweapon(e, WEP_HAGAR, TRUE, FALSE))
391 else if (client_hasweapon(e, WEP_GRENADE_LAUNCHER, TRUE, FALSE))
392 return WEP_GRENADE_LAUNCHER;
393 else if (client_hasweapon(e, WEP_ELECTRO, TRUE, FALSE))
395 else if (client_hasweapon(e, WEP_CRYLINK, TRUE, FALSE))
397 else if (client_hasweapon(e, WEP_UZI, TRUE, FALSE))
399 else if (client_hasweapon(e, WEP_SHOTGUN, TRUE, FALSE))
401 else if (client_hasweapon(e, WEP_LASER, FALSE, FALSE))
407 // Setup weapon for client (after this raise frame will be launched)
408 void(float windex, string wname, float hudammo) weapon_setup =
410 self.items = self.items - (self.items & (IT_SHELLS | IT_NAILS | IT_ROCKETS | IT_CELLS));
411 self.items = self.items | hudammo;
413 // the two weapon entities will notice this has changed and update their models
414 self.weapon = windex;
415 self.weaponname = wname;
418 // perform weapon to attack (weaponstate and attack_finished check is here)
419 float(float secondary, float attacktime) weapon_prepareattack =
421 if (!weapon_action(self.weapon, WR_CHECKAMMO1 + secondary))
423 self.switchweapon = w_getbestweapon(self);
424 if (self.switchweapon != self.weapon)
425 self.cnt = self.weapon;
428 // don't fire if previous attack is not finished
429 if (ATTACK_FINISHED(self) > time + frametime * 0.5)
431 // don't fire while changing weapon
432 if (self.weaponentity.state != WS_READY)
434 self.weaponentity.state = WS_INUSE;
435 // if the weapon hasn't been firing continuously, reset the timer
436 if (ATTACK_FINISHED(self) < time - frametime * 1.5)
438 ATTACK_FINISHED(self) = time;
439 //dprint("resetting attack finished to ", ftos(time), "\n");
441 ATTACK_FINISHED(self) = ATTACK_FINISHED(self) + attacktime;
442 //dprint("attack finished ", ftos(ATTACK_FINISHED(self)), "\n");
446 void(float fr, float t, void() func) weapon_thinkf =
450 if (self.weaponentity != world)
451 self.weaponentity.frame = fr;
454 if(self.weapon_think == w_ready && func != w_ready && self.weaponentity.state == WS_RAISE)
456 backtrace("Tried to override initial weapon think function - should this really happen?");
461 if(self.runes & RUNE_SPEED)
463 if(self.runes & CURSE_SLOW)
464 t = t * cvar("g_balance_rune_speed_combo_atkrate");
466 t = t * cvar("g_balance_rune_speed_atkrate");
468 else if(self.runes & CURSE_SLOW)
470 t = t * cvar("g_balance_curse_slow_atkrate");
474 // VorteX: haste can be added here
475 if (self.weapon_think == w_ready)
477 self.weapon_nextthink = time;
478 //dprint("started firing at ", ftos(time), "\n");
480 if (self.weapon_nextthink < time - frametime * 1.5 || self.weapon_nextthink > time + frametime * 1.5)
482 self.weapon_nextthink = time;
483 //dprint("reset weapon animation timer at ", ftos(time), "\n");
485 self.weapon_nextthink = self.weapon_nextthink + t;
486 self.weapon_think = func;
487 //dprint("next ", ftos(self.weapon_nextthink), "\n");
489 if (fr == WFRAME_FIRE1 || fr == WFRAME_FIRE2)
491 if (!self.crouch) // shoot anim stands up, this looks bad
494 anim = self.anim_shoot;
496 player_setanim(anim, FALSE, TRUE, TRUE);
500 void(float spd, vector org) weapon_boblayer1 =
502 // VorteX: haste can be added here
505 vector(vector pvelocity, vector mvelocity) W_CalculateProjectileVelocity =
513 mdirection = normalize(mvelocity);
514 mspeed = vlen(mvelocity);
516 nstyle = cvar("g_projectiles_newton_style");
520 outvelocity = mvelocity;
524 // true Newtonian projectiles
525 outvelocity = pvelocity + mvelocity;
529 // true Newtonian projectiles with automatic aim adjustment
531 // solve: |outspeed * mdirection - pvelocity| = mspeed
532 // outspeed^2 - 2 * outspeed * (mdirection * pvelocity) + pvelocity^2 - mspeed^2 = 0
533 // outspeed = (mdirection * pvelocity) +- sqrt((mdirection * pvelocity)^2 - pvelocity^2 + mspeed^2)
537 // pvelocity^2 - (mdirection * pvelocity)^2 > mspeed^2
538 // velocity without mdirection component > mspeed
539 // fire at smallest possible mspeed that works?
540 // |(mdirection * pvelocity) * pvelocity - pvelocity| = mspeed
545 p = mdirection * pvelocity;
546 q = pvelocity * pvelocity - mspeed * mspeed;
550 //dprint("impossible shot, adjusting\n");
553 outspeed = p + sqrt(D);
554 outspeed = bound(mspeed * 0.7, outspeed, mspeed * 5.0);
555 outvelocity = mdirection * outspeed;
560 outspeed = mspeed + mdirection * pvelocity;
561 outspeed = bound(mspeed * 0.7, outspeed, mspeed * 5.0);
562 outvelocity = mdirection * outspeed;
567 outspeed = mspeed + vlen(pvelocity);
568 outvelocity = mdirection * outspeed;
571 error("g_projectiles_newton_style must be 0 (absolute), 1 (Newtonian), 2 (Newtonian + aimfix), 3 (pseudo Newtonian) or 4 (tZorkian)!");
576 void(entity missile) W_SetupProjectileVelocity =
578 if(missile.owner == world)
579 error("Unowned missile");
581 missile.velocity = W_CalculateProjectileVelocity(missile.owner.velocity, missile.velocity);
584 void(float wepcode, float minammo) weapon_register =
588 s = strcat("register_bestweapon ", ftos(wepcode), " "); // char for bestweapon
589 s = strcat(s, ftos(wepcode), " "); // impulse
590 s = strcat(s, ftos(W_ItemCode(wepcode)), " "); // item code
591 s = strcat(s, ftos(wepcode), " "); // self.weapon code
594 itemcode = W_AmmoItemCode(wepcode);
595 if(itemcode == IT_SHELLS)
597 else if(itemcode == IT_NAILS)
599 else if(itemcode == IT_ROCKETS)
601 else // if(itemcode == IT_CELLS)
604 s = strcat(s, ftos(minammo), "\n");