qcsrc/common/turrets/turret/mlrs.qc

   1 #ifndef TUR_MLRS_H
   2 #define TUR_MLRS_H
   3
   4 CLASS(MLRSTurretAttack, PortoLaunch)
   5 /* flags     */ ATTRIB(MLRSTurretAttack, spawnflags, int, WEP_TYPE_OTHER);
   6 /* impulse   */ ATTRIB(MLRSTurretAttack, impulse, int, 9);
   7 /* refname   */ ATTRIB(MLRSTurretAttack, netname, string, "turret_mlrs");
   8 /* wepname   */ ATTRIB(MLRSTurretAttack, message, string, _("MLRS"));
   9 ENDCLASS(MLRSTurretAttack)
  10 REGISTER_WEAPON(TUR_MLRS, NEW(MLRSTurretAttack));
  11
  12 CLASS(MLRSTurret, Turret)
  13 /* spawnflags */ ATTRIB(MLRSTurret, spawnflags, int, TUR_FLAG_SPLASH | TUR_FLAG_MEDPROJ | TUR_FLAG_PLAYER);
  14 /* mins       */ ATTRIB(MLRSTurret, mins, vector, '-32 -32 0');
  15 /* maxs       */ ATTRIB(MLRSTurret, maxs, vector, '32 32 64');
  16 /* modelname  */ ATTRIB(MLRSTurret, mdl, string, "base.md3");
  17 /* model      */ ATTRIB(MLRSTurret, model, string, strzone(strcat("models/turrets/", this.mdl)));
  18 /* head_model */ ATTRIB(MLRSTurret, head_model, string, strzone(strcat("models/turrets/", "mlrs.md3")));
  19 /* netname    */ ATTRIB(MLRSTurret, netname, string, "mlrs");
  20 /* fullname   */ ATTRIB(MLRSTurret, turret_name, string, _("MLRS Turret"));
  21     ATTRIB(MLRSTurret, m_weapon, Weapon, WEP_TUR_MLRS);
  22 ENDCLASS(MLRSTurret)
  23 REGISTER_TURRET(MLRS, NEW(MLRSTurret));
  24
  25 #endif
  26
  27 #ifdef IMPLEMENTATION
  28 #ifdef SVQC
  29 METHOD(MLRSTurretAttack, wr_think, bool(entity thiswep, bool fire1, bool fire2)) {
  30         SELFPARAM();
  31         bool isPlayer = IS_PLAYER(self);
  32         if (fire1)
  33         if (!isPlayer || weapon_prepareattack(false, WEP_CVAR(machinegun, sustained_refire))) {
  34                 if (isPlayer) {
  35             turret_initparams(self);
  36             W_SetupShot_Dir(self, v_forward, false, 0, W_Sound("electro_fire"), CH_WEAPON_B, 0);
  37             self.tur_shotdir_updated = w_shotdir;
  38             self.tur_shotorg = w_shotorg;
  39             self.tur_head = self;
  40             self.shot_radius = 500;
  41             weapon_thinkf(WFRAME_FIRE1, 0, w_ready);
  42         }
  43         turret_tag_fire_update();
  44         entity missile = turret_projectile(SND(ROCKET_FIRE), 6, 10, DEATH_TURRET_MLRS, PROJECTILE_ROCKET, TRUE, TRUE);
  45         missile.nextthink = time + max(self.tur_impacttime,(self.shot_radius * 2) / self.shot_speed);
  46         missile.missile_flags = MIF_SPLASH;
  47         te_explosion (missile.origin);
  48         }
  49         return true;
  50 }
  51
  52 void spawnfunc_turret_mlrs() { SELFPARAM(); if(!turret_initialize(TUR_MLRS)) remove(self); }
  53
  54         METHOD(MLRSTurret, tr_think, void(MLRSTurret thistur))
  55         {
  56             // 0 = full, 6 = empty
  57             self.tur_head.frame = bound(0, 6 - floor(0.1 + self.ammo / self.shot_dmg), 6);
  58             if(self.tur_head.frame < 0)
  59             {
  60                 LOG_TRACE("ammo:",ftos(self.ammo),"\n");
  61                 LOG_TRACE("shot_dmg:",ftos(self.shot_dmg),"\n");
  62             }
  63         }
  64         METHOD(MLRSTurret, tr_setup, void(MLRSTurret this, entity it))
  65         {
  66             it.ammo_flags = TFL_AMMO_ROCKETS | TFL_AMMO_RECHARGE;
  67             it.aim_flags = TFL_AIM_LEAD | TFL_AIM_SHOTTIMECOMPENSATE;
  68
  69             it.damage_flags |= TFL_DMG_HEADSHAKE;
  70             it.shoot_flags  |= TFL_SHOOT_VOLLYALWAYS;
  71             it.volly_counter = it.shot_volly;
  72         }
  73
  74 #endif // SVQC
  75 #endif