3 /* ammotype */ ATTRIB(Hagar, ammo_field, .int, ammo_rockets)
4 /* impulse */ ATTRIB(Hagar, impulse, int, 8)
5 /* flags */ ATTRIB(Hagar, spawnflags, int, WEP_FLAG_NORMAL | WEP_FLAG_RELOADABLE | WEP_FLAG_CANCLIMB | WEP_TYPE_SPLASH);
6 /* rating */ ATTRIB(Hagar, bot_pickupbasevalue, float, BOT_PICKUP_RATING_MID);
7 /* color */ ATTRIB(Hagar, wpcolor, vector, '1 1 0.5');
8 /* modelname */ ATTRIB(Hagar, mdl, string, "hagar");
10 /* model */ ATTRIB(Hagar, m_model, Model, MDL_HAGAR_ITEM);
12 /* crosshair */ ATTRIB(Hagar, w_crosshair, string, "gfx/crosshairhagar");
13 /* crosshair */ ATTRIB(Hagar, w_crosshair_size, float, 0.8);
14 /* wepimg */ ATTRIB(Hagar, model2, string, "weaponhagar");
15 /* refname */ ATTRIB(Hagar, netname, string, "hagar");
16 /* wepname */ ATTRIB(Hagar, m_name, string, _("Hagar"));
18 #define X(BEGIN, P, END, class, prefix) \
20 P(class, prefix, ammo, float, BOTH) \
21 P(class, prefix, damageforcescale, float, BOTH) \
22 P(class, prefix, damage, float, BOTH) \
23 P(class, prefix, edgedamage, float, BOTH) \
24 P(class, prefix, force, float, BOTH) \
25 P(class, prefix, health, float, BOTH) \
26 P(class, prefix, lifetime, float, PRI) \
27 P(class, prefix, lifetime_min, float, SEC) \
28 P(class, prefix, lifetime_rand, float, SEC) \
29 P(class, prefix, load, float, SEC) \
30 P(class, prefix, load_abort, float, SEC) \
31 P(class, prefix, load_animtime, float, SEC) \
32 P(class, prefix, load_hold, float, SEC) \
33 P(class, prefix, load_linkexplode, float, SEC) \
34 P(class, prefix, load_max, float, SEC) \
35 P(class, prefix, load_releasedeath, float, SEC) \
36 P(class, prefix, load_speed, float, SEC) \
37 P(class, prefix, load_spread, float, SEC) \
38 P(class, prefix, load_spread_bias, float, SEC) \
39 P(class, prefix, radius, float, BOTH) \
40 P(class, prefix, refire, float, BOTH) \
41 P(class, prefix, reload_ammo, float, NONE) \
42 P(class, prefix, reload_time, float, NONE) \
43 P(class, prefix, secondary, float, NONE) \
44 P(class, prefix, speed, float, BOTH) \
45 P(class, prefix, spread, float, BOTH) \
46 P(class, prefix, switchdelay_drop, float, NONE) \
47 P(class, prefix, switchdelay_raise, float, NONE) \
48 P(class, prefix, weaponreplace, string,NONE) \
49 P(class, prefix, weaponstartoverride, float, NONE) \
50 P(class, prefix, weaponstart, float, NONE) \
51 P(class, prefix, weaponthrowable, float, NONE) \
53 W_PROPS(X, Hagar, hagar)
57 REGISTER_WEAPON(HAGAR, hagar, NEW(Hagar));
62 spawnfunc(weapon_hagar) { weapon_defaultspawnfunc(this, WEP_HAGAR); }
64 // NO bounce protection, as bounces are limited!
66 void W_Hagar_Explode()
68 self.event_damage = func_null;
69 RadiusDamage(self, self.realowner, WEP_CVAR_PRI(hagar, damage), WEP_CVAR_PRI(hagar, edgedamage), WEP_CVAR_PRI(hagar, radius), world, world, WEP_CVAR_PRI(hagar, force), self.projectiledeathtype, other);
74 void W_Hagar_Explode_use(entity this, entity actor, entity trigger)
76 WITHSELF(this, W_Hagar_Explode());
79 void W_Hagar_Explode2()
81 self.event_damage = func_null;
82 RadiusDamage(self, self.realowner, WEP_CVAR_SEC(hagar, damage), WEP_CVAR_SEC(hagar, edgedamage), WEP_CVAR_SEC(hagar, radius), world, world, WEP_CVAR_SEC(hagar, force), self.projectiledeathtype, other);
87 void W_Hagar_Explode2_use(entity this, entity actor, entity trigger)
89 WITHSELF(this, W_Hagar_Explode2());
92 void W_Hagar_Damage(entity this, entity inflictor, entity attacker, float damage, int deathtype, vector hitloc, vector force)
97 float is_linkexplode = ( ((inflictor.owner != world) ? (inflictor.owner == this.owner) : true)
98 && (inflictor.projectiledeathtype & HITTYPE_SECONDARY)
99 && (this.projectiledeathtype & HITTYPE_SECONDARY));
102 is_linkexplode = (is_linkexplode && WEP_CVAR_SEC(hagar, load_linkexplode));
104 is_linkexplode = -1; // not secondary load, so continue as normal without exception.
106 if(!W_CheckProjectileDamage(inflictor.realowner, this.realowner, deathtype, is_linkexplode))
107 return; // g_projectiles_damage says to halt
109 this.health = this.health - damage;
110 this.angles = vectoangles(this.velocity);
113 W_PrepareExplosionByDamage(this, attacker, this.think);
119 this.use1(this, NULL, NULL);
122 void W_Hagar_Touch2()
126 if(self.cnt > 0 || other.takedamage == DAMAGE_AIM) {
127 this.use1(this, NULL, NULL);
130 Send_Effect(EFFECT_HAGAR_BOUNCE, self.origin, self.velocity, 1);
131 self.angles = vectoangles(self.velocity);
133 self.projectiledeathtype |= HITTYPE_BOUNCE;
137 void W_Hagar_Attack(Weapon thiswep)
141 W_DecreaseAmmo(thiswep, self, WEP_CVAR_PRI(hagar, ammo));
143 W_SetupShot(self, false, 2, SND_HAGAR_FIRE, CH_WEAPON_A, WEP_CVAR_PRI(hagar, damage));
145 Send_Effect(EFFECT_HAGAR_MUZZLEFLASH, w_shotorg, w_shotdir * 1000, 1);
147 missile = new(missile);
148 missile.owner = missile.realowner = self;
149 missile.bot_dodge = true;
150 missile.bot_dodgerating = WEP_CVAR_PRI(hagar, damage);
152 missile.takedamage = DAMAGE_YES;
153 missile.health = WEP_CVAR_PRI(hagar, health);
154 missile.damageforcescale = WEP_CVAR_PRI(hagar, damageforcescale);
155 missile.event_damage = W_Hagar_Damage;
156 missile.damagedbycontents = true;
158 missile.touch = W_Hagar_Touch;
159 missile.use1 = W_Hagar_Explode_use;
160 missile.think = adaptor_think2use_hittype_splash;
161 missile.nextthink = time + WEP_CVAR_PRI(hagar, lifetime);
162 PROJECTILE_MAKETRIGGER(missile);
163 missile.projectiledeathtype = WEP_HAGAR.m_id;
164 setorigin(missile, w_shotorg);
165 setsize(missile, '0 0 0', '0 0 0');
167 missile.movetype = MOVETYPE_FLY;
168 W_SetupProjVelocity_PRI(missile, hagar);
170 missile.angles = vectoangles(missile.velocity);
171 missile.flags = FL_PROJECTILE;
172 missile.missile_flags = MIF_SPLASH;
174 CSQCProjectile(missile, true, PROJECTILE_HAGAR, true);
176 MUTATOR_CALLHOOK(EditProjectile, self, missile);
179 void W_Hagar_Attack2(Weapon thiswep)
183 W_DecreaseAmmo(thiswep, self, WEP_CVAR_SEC(hagar, ammo));
185 W_SetupShot(self, false, 2, SND_HAGAR_FIRE, CH_WEAPON_A, WEP_CVAR_SEC(hagar, damage));
187 Send_Effect(EFFECT_HAGAR_MUZZLEFLASH, w_shotorg, w_shotdir * 1000, 1);
189 missile = new(missile);
190 missile.owner = missile.realowner = self;
191 missile.bot_dodge = true;
192 missile.bot_dodgerating = WEP_CVAR_SEC(hagar, damage);
194 missile.takedamage = DAMAGE_YES;
195 missile.health = WEP_CVAR_SEC(hagar, health);
196 missile.damageforcescale = WEP_CVAR_SEC(hagar, damageforcescale);
197 missile.event_damage = W_Hagar_Damage;
198 missile.damagedbycontents = true;
200 missile.touch = W_Hagar_Touch2;
202 missile.use1 = W_Hagar_Explode2_use;
203 missile.think = adaptor_think2use_hittype_splash;
204 missile.nextthink = time + WEP_CVAR_SEC(hagar, lifetime_min) + random() * WEP_CVAR_SEC(hagar, lifetime_rand);
205 PROJECTILE_MAKETRIGGER(missile);
206 missile.projectiledeathtype = WEP_HAGAR.m_id | HITTYPE_SECONDARY;
207 setorigin(missile, w_shotorg);
208 setsize(missile, '0 0 0', '0 0 0');
210 missile.movetype = MOVETYPE_BOUNCEMISSILE;
211 W_SetupProjVelocity_SEC(missile, hagar);
213 missile.angles = vectoangles(missile.velocity);
214 missile.flags = FL_PROJECTILE;
215 missile.missile_flags = MIF_SPLASH;
217 CSQCProjectile(missile, true, PROJECTILE_HAGAR_BOUNCING, true);
219 MUTATOR_CALLHOOK(EditProjectile, self, missile);
222 .float hagar_loadstep, hagar_loadblock, hagar_loadbeep, hagar_warning;
223 void W_Hagar_Attack2_Load_Release(.entity weaponentity)
225 // time to release the rockets we've loaded
228 float counter, shots, spread_pershot;
230 vector forward, right, up;
235 weapon_prepareattack_do(self, weaponentity, true, WEP_CVAR_SEC(hagar, refire));
237 W_SetupShot(self, false, 2, SND_HAGAR_FIRE, CH_WEAPON_A, WEP_CVAR_SEC(hagar, damage));
238 Send_Effect(EFFECT_HAGAR_MUZZLEFLASH, w_shotorg, w_shotdir * 1000, 1);
244 shots = self.hagar_load;
246 for(counter = 0; counter < shots; ++counter)
248 missile = new(missile);
249 missile.owner = missile.realowner = self;
250 missile.bot_dodge = true;
251 missile.bot_dodgerating = WEP_CVAR_SEC(hagar, damage);
253 missile.takedamage = DAMAGE_YES;
254 missile.health = WEP_CVAR_SEC(hagar, health);
255 missile.damageforcescale = WEP_CVAR_SEC(hagar, damageforcescale);
256 missile.event_damage = W_Hagar_Damage;
257 missile.damagedbycontents = true;
259 missile.touch = W_Hagar_Touch; // not bouncy
260 missile.use1 = W_Hagar_Explode2_use;
261 missile.think = adaptor_think2use_hittype_splash;
262 missile.nextthink = time + WEP_CVAR_SEC(hagar, lifetime_min) + random() * WEP_CVAR_SEC(hagar, lifetime_rand);
263 PROJECTILE_MAKETRIGGER(missile);
264 missile.projectiledeathtype = WEP_HAGAR.m_id | HITTYPE_SECONDARY;
265 setorigin(missile, w_shotorg);
266 setsize(missile, '0 0 0', '0 0 0');
267 missile.movetype = MOVETYPE_FLY;
268 missile.missile_flags = MIF_SPLASH;
270 // per-shot spread calculation: the more shots there are, the less spread is applied (based on the bias cvar)
271 spread_pershot = ((shots - 1) / (WEP_CVAR_SEC(hagar, load_max) - 1));
272 spread_pershot = (1 - (spread_pershot * WEP_CVAR_SEC(hagar, load_spread_bias)));
273 spread_pershot = (WEP_CVAR_SEC(hagar, spread) * spread_pershot * g_weaponspreadfactor);
275 // pattern spread calculation
281 makevectors('0 360 0' * (0.75 + (counter - 0.5) / (shots - 1)));
285 s = s * WEP_CVAR_SEC(hagar, load_spread) * g_weaponspreadfactor;
287 W_SetupProjVelocity_Explicit(missile, w_shotdir + right * s.y + up * s.z, v_up, WEP_CVAR_SEC(hagar, speed), 0, 0, spread_pershot, false);
289 missile.angles = vectoangles(missile.velocity);
290 missile.flags = FL_PROJECTILE;
292 CSQCProjectile(missile, true, PROJECTILE_HAGAR, true);
294 MUTATOR_CALLHOOK(EditProjectile, self, missile);
297 weapon_thinkf(self, weaponentity, WFRAME_FIRE2, WEP_CVAR_SEC(hagar, load_animtime), w_ready);
298 self.hagar_loadstep = time + WEP_CVAR_SEC(hagar, refire) * W_WeaponRateFactor();
302 void W_Hagar_Attack2_Load(Weapon thiswep, .entity weaponentity)
304 // loadable hagar secondary attack, must always run each frame
306 if(time < game_starttime)
309 bool loaded = self.hagar_load >= WEP_CVAR_SEC(hagar, load_max);
311 // this is different than WR_CHECKAMMO when it comes to reloading
313 if(self.items & IT_UNLIMITED_WEAPON_AMMO)
315 else if(autocvar_g_balance_hagar_reload_ammo)
316 enough_ammo = self.(weapon_load[WEP_HAGAR.m_id]) >= WEP_CVAR_SEC(hagar, ammo);
318 enough_ammo = self.(thiswep.ammo_field) >= WEP_CVAR_SEC(hagar, ammo);
320 bool stopped = loaded || !enough_ammo;
322 if(PHYS_INPUT_BUTTON_ATCK2(self))
324 if(PHYS_INPUT_BUTTON_ATCK(self) && WEP_CVAR_SEC(hagar, load_abort))
328 // if we pressed primary fire while loading, unload all rockets and abort
329 self.(weaponentity).state = WS_READY;
330 W_DecreaseAmmo(thiswep, self, WEP_CVAR_SEC(hagar, ammo) * self.hagar_load * -1); // give back ammo
332 sound(self, CH_WEAPON_A, SND_HAGAR_BEEP, VOL_BASE, ATTN_NORM);
334 // pause until we can load rockets again, once we re-press the alt fire button
335 self.hagar_loadstep = time + WEP_CVAR_SEC(hagar, load_speed) * W_WeaponRateFactor();
337 // require letting go of the alt fire button before we can load again
338 self.hagar_loadblock = true;
343 // check if we can attempt to load another rocket
346 if(!self.hagar_loadblock && self.hagar_loadstep < time)
348 W_DecreaseAmmo(thiswep, self, WEP_CVAR_SEC(hagar, ammo));
349 self.(weaponentity).state = WS_INUSE;
350 self.hagar_load += 1;
351 sound(self, CH_WEAPON_B, SND_HAGAR_LOAD, VOL_BASE * 0.8, ATTN_NORM); // sound is too loud according to most
353 if(self.hagar_load >= WEP_CVAR_SEC(hagar, load_max))
356 self.hagar_loadstep = time + WEP_CVAR_SEC(hagar, load_speed) * W_WeaponRateFactor();
359 if(stopped && !self.hagar_loadbeep && self.hagar_load) // prevents the beep from playing each frame
361 // if this is the last rocket we can load, play a beep sound to notify the player
362 sound(self, CH_WEAPON_A, SND_HAGAR_BEEP, VOL_BASE, ATTN_NORM);
363 self.hagar_loadbeep = true;
364 self.hagar_loadstep = time + WEP_CVAR_SEC(hagar, load_hold) * W_WeaponRateFactor();
368 else if(self.hagar_loadblock)
370 // the alt fire button has been released, so re-enable loading if blocked
371 self.hagar_loadblock = false;
376 // play warning sound if we're about to release
377 if(stopped && self.hagar_loadstep - 0.5 < time && WEP_CVAR_SEC(hagar, load_hold) >= 0)
379 if(!self.hagar_warning) // prevents the beep from playing each frame
381 // we're about to automatically release after holding time, play a beep sound to notify the player
382 sound(self, CH_WEAPON_A, SND_HAGAR_BEEP, VOL_BASE, ATTN_NORM);
383 self.hagar_warning = true;
387 // release if player let go of button or if they've held it in too long
388 if(!PHYS_INPUT_BUTTON_ATCK2(self) || (stopped && self.hagar_loadstep < time && WEP_CVAR_SEC(hagar, load_hold) >= 0))
390 self.(weaponentity).state = WS_READY;
391 W_Hagar_Attack2_Load_Release(weaponentity);
396 self.hagar_loadbeep = false;
397 self.hagar_warning = false;
399 // we aren't checking ammo during an attack, so we must do it here
400 if(!(thiswep.wr_checkammo1(thiswep) + thiswep.wr_checkammo2(thiswep)))
401 if(!(self.items & IT_UNLIMITED_WEAPON_AMMO))
403 // note: this doesn't force the switch
404 W_SwitchToOtherWeapon(self);
410 METHOD(Hagar, wr_aim, void(entity thiswep))
414 PHYS_INPUT_BUTTON_ATCK(self) = bot_aim(self, WEP_CVAR_PRI(hagar, speed), 0, WEP_CVAR_PRI(hagar, lifetime), false);
415 else // not using secondary_speed since these are only 15% and should cause some ricochets without re-aiming
416 PHYS_INPUT_BUTTON_ATCK2(self) = bot_aim(self, WEP_CVAR_PRI(hagar, speed), 0, WEP_CVAR_PRI(hagar, lifetime), false);
418 METHOD(Hagar, wr_think, void(entity thiswep, entity actor, .entity weaponentity, int fire))
420 float loadable_secondary;
421 loadable_secondary = (WEP_CVAR_SEC(hagar, load) && WEP_CVAR(hagar, secondary));
423 if(loadable_secondary)
424 W_Hagar_Attack2_Load(thiswep, weaponentity); // must always run each frame
425 if(autocvar_g_balance_hagar_reload_ammo && actor.clip_load < min(WEP_CVAR_PRI(hagar, ammo), WEP_CVAR_SEC(hagar, ammo))) { // forced reload
426 thiswep.wr_reload(thiswep, actor, weaponentity);
427 } else if((fire & 1) && !actor.hagar_load && !actor.hagar_loadblock) // not while secondary is loaded or awaiting reset
429 if(weapon_prepareattack(thiswep, actor, weaponentity, false, WEP_CVAR_PRI(hagar, refire)))
431 W_Hagar_Attack(thiswep);
432 weapon_thinkf(actor, weaponentity, WFRAME_FIRE1, WEP_CVAR_PRI(hagar, refire), w_ready);
435 else if((fire & 2) && !loadable_secondary && WEP_CVAR(hagar, secondary))
437 if(weapon_prepareattack(thiswep, actor, weaponentity, true, WEP_CVAR_SEC(hagar, refire)))
439 W_Hagar_Attack2(thiswep);
440 weapon_thinkf(actor, weaponentity, WFRAME_FIRE2, WEP_CVAR_SEC(hagar, refire), w_ready);
444 METHOD(Hagar, wr_gonethink, void(entity thiswep))
447 // we lost the weapon and want to prepare switching away
450 .entity weaponentity = weaponentities[0]; // TODO: unhardcode
451 self.(weaponentity).state = WS_READY;
452 W_Hagar_Attack2_Load_Release(weaponentity);
455 METHOD(Hagar, wr_setup, void(entity thiswep))
458 self.hagar_loadblock = false;
462 W_DecreaseAmmo(thiswep, self, WEP_CVAR_SEC(hagar, ammo) * self.hagar_load * -1); // give back ammo if necessary
466 METHOD(Hagar, wr_checkammo1, bool(entity thiswep))
469 float ammo_amount = self.(thiswep.ammo_field) >= WEP_CVAR_PRI(hagar, ammo);
470 ammo_amount += self.(weapon_load[WEP_HAGAR.m_id]) >= WEP_CVAR_PRI(hagar, ammo);
473 METHOD(Hagar, wr_checkammo2, bool(entity thiswep))
476 float ammo_amount = self.(thiswep.ammo_field) >= WEP_CVAR_SEC(hagar, ammo);
477 ammo_amount += self.(weapon_load[WEP_HAGAR.m_id]) >= WEP_CVAR_SEC(hagar, ammo);
480 METHOD(Hagar, wr_resetplayer, void(entity thiswep))
485 METHOD(Hagar, wr_playerdeath, void(entity thiswep))
488 .entity weaponentity = weaponentities[0]; // TODO: unhardcode
489 // if we have any rockets loaded when we die, release them
490 if(self.hagar_load && WEP_CVAR_SEC(hagar, load_releasedeath))
491 W_Hagar_Attack2_Load_Release(weaponentity);
493 METHOD(Hagar, wr_reload, void(entity thiswep, entity actor, .entity weaponentity))
496 if(!self.hagar_load) // require releasing loaded rockets first
497 W_Reload(self, min(WEP_CVAR_PRI(hagar, ammo), WEP_CVAR_SEC(hagar, ammo)), SND_RELOAD);
499 METHOD(Hagar, wr_suicidemessage, Notification(entity thiswep))
501 return WEAPON_HAGAR_SUICIDE;
503 METHOD(Hagar, wr_killmessage, Notification(entity thiswep))
505 if(w_deathtype & HITTYPE_SECONDARY)
506 return WEAPON_HAGAR_MURDER_BURST;
508 return WEAPON_HAGAR_MURDER_SPRAY;
514 METHOD(Hagar, wr_impacteffect, void(entity thiswep))
518 org2 = w_org + w_backoff * 6;
519 pointparticles(EFFECT_HAGAR_EXPLODE, org2, '0 0 0', 1);
523 sound(self, CH_SHOTS, SND_HAGEXP1, VOL_BASE, ATTN_NORM);
524 else if(w_random<0.7)
525 sound(self, CH_SHOTS, SND_HAGEXP2, VOL_BASE, ATTN_NORM);
527 sound(self, CH_SHOTS, SND_HAGEXP3, VOL_BASE, ATTN_NORM);