data/qcsrc/server/tturrets/system/turret_system_damage.qc

   1 /*\r
   2 * Trow a turret gib\r
   3 */\r
   4 void turret_gib_damage (entity inflictor, entity attacker, float damage, float deathtype, vector hitloc, vector vforce)\r
   5 {\r
   6     self.velocity += vforce;\r
   7 }\r
   8 \r
   9 void turret_trowgib(\r
  10     vector v_from, vector v_to, vector v_colormod,\r
  11     string smodel,\r
  12     float f_lifetime, float f_fadetime, float b_burn)\r
  13 {\r
  14     local entity gib;\r
  15     local entity burn;\r
  16 \r
  17     gib = spawn();\r
  18 \r
  19     gib.classname = "turret_gib";\r
  20     setmodel(gib,smodel);\r
  21     setorigin(gib,v_from);\r
  22     SUB_SetFade(gib,time + f_lifetime,2);\r
  23 \r
  24     gib.solid              = SOLID_BBOX;\r
  25 \r
  26     gib.movetype           = MOVETYPE_BOUNCE;\r
  27     gib.takedamage         = DAMAGE_YES;\r
  28     gib.event_damage       = turret_gib_damage;\r
  29     gib.health             = -1;\r
  30     gib.effects            = EF_LOWPRECISION;\r
  31     gib.flags              = FL_NOTARGET;\r
  32     gib.colormod           = v_colormod;\r
  33     gib.velocity           = v_to;\r
  34 \r
  35     if (b_burn)\r
  36     {\r
  37         burn = spawn();\r
  38         burn.effects        = EF_LOWPRECISION|EF_FLAME;\r
  39         setattachment(burn,gib,"");\r
  40         setorigin(burn,(gib.mins + gib.maxs) * 0.5);\r
  41         SUB_SetFade(burn,time + (f_lifetime * 0.5) ,2);\r
  42     }\r
  43 }\r
  44 \r
  45 void turret_gib_boom()\r
  46 {\r
  47     entity gib;\r
  48     float i;\r
  49     string s;\r
  50 \r
  51     for (i = 1; i < 5; i = i +1)\r
  52     {\r
  53         gib = spawn();\r
  54         gib.classname = "turret_gib";\r
  55 \r
  56         s = strcat("models/turrets/head-gib",ftos(i));\r
  57         s = strcat(s,".md3");\r
  58         // bprint("s:",s,"\n");\r
  59         setmodel(gib,s);\r
  60 \r
  61         setorigin(gib,self.origin);\r
  62 \r
  63         SUB_SetFade(gib,time + 5,2);\r
  64 \r
  65         gib.solid              = SOLID_BBOX;\r
  66 \r
  67         gib.movetype           = MOVETYPE_BOUNCE;\r
  68         gib.gravity            = 0.5;\r
  69         gib.damageforcescale   = 2;\r
  70         gib.takedamage         = DAMAGE_YES;\r
  71         gib.event_damage       = turret_gib_damage;\r
  72         gib.health             = -1;\r
  73         gib.effects            = EF_LOWPRECISION;\r
  74         gib.flags              = FL_NOTARGET;\r
  75         gib.velocity           = self.velocity + (randomvec() * 700);\r
  76         gib.avelocity          = randomvec() * 64;\r
  77     }\r
  78 \r
  79     WriteByte (MSG_BROADCAST, SVC_TEMPENTITY);\r
  80     WriteByte (MSG_BROADCAST, 78);\r
  81     WriteCoord (MSG_BROADCAST, self.origin_x);\r
  82     WriteCoord (MSG_BROADCAST, self.origin_y);\r
  83     WriteCoord (MSG_BROADCAST, self.origin_z);\r
  84 \r
  85     remove(self);\r
  86 }\r
  87 \r
  88 void turret_trowgib2(\r
  89     vector v_from, vector v_to, vector v_colormod,\r
  90     entity e_mimic, float boomtime)\r
  91 {\r
  92     entity gib;\r
  93 \r
  94     gib = spawn();\r
  95 \r
  96     gib.classname = "turret_gib";\r
  97     setmodel(gib,e_mimic.model);\r
  98     setorigin(gib,v_from);\r
  99 \r
 100     gib.solid              = SOLID_BBOX;\r
 101 \r
 102     gib.movetype           = MOVETYPE_BOUNCE;\r
 103     gib.gravity            = 0.75;\r
 104     gib.damageforcescale   = 2;\r
 105     gib.takedamage         = DAMAGE_YES;\r
 106     gib.event_damage       = turret_gib_damage;\r
 107     gib.health             = -1;\r
 108     gib.effects            = EF_LOWPRECISION;\r
 109     gib.flags              = FL_NOTARGET;\r
 110     gib.colormod           = v_colormod;\r
 111     gib.velocity           = v_to;\r
 112     gib.avelocity          = randomvec() * 32;\r
 113     gib.think              = turret_gib_boom;\r
 114     gib.nextthink          = boomtime;\r
 115     gib.effects            = EF_FLAME;\r
 116 \r
 117 \r
 118 }\r
 119 /*\r
 120 * Spawn a boom, trow fake bits arround\r
 121 * and hide the real ones.\r
 122 */\r
 123 void turret_stdproc_die()\r
 124 {\r
 125     vector org2;\r
 126     vector t_dir;\r
 127 \r
 128     // self.tur_active = 0;\r
 129 \r
 130     self.deadflag = DEAD_DEAD;\r
 131     self.tur_head.deadflag = self.deadflag;\r
 132 \r
 133     sound (self, CHAN_PLAYER, "weapons/rocket_impact.wav", 1, ATTN_NORM);\r
 134     org2 = self.origin + '0 0 40';\r
 135 \r
 136 // Explotion grafix\r
 137     WriteByte (MSG_BROADCAST, SVC_TEMPENTITY);\r
 138     WriteByte (MSG_BROADCAST, 78);\r
 139     WriteCoord (MSG_BROADCAST, org2_x);\r
 140     WriteCoord (MSG_BROADCAST, org2_y);\r
 141     WriteCoord (MSG_BROADCAST, org2_z);\r
 142 \r
 143 // Unsolidify and hide real parts\r
 144     self.solid = SOLID_NOT;\r
 145     self.tur_head.solid   = self.solid;\r
 146 \r
 147     self.alpha = -1;\r
 148     self.tur_head.alpha = -1;\r
 149 \r
 150     self.takedamage = DAMAGE_NO;\r
 151     self.tur_head.takedamage    = self.takedamage;\r
 152 \r
 153     self.effects = 0;\r
 154     self.tur_head.effects   = self.effects;\r
 155 \r
 156     self.health             = 0;\r
 157 \r
 158 \r
 159 // Trow fake parts arround\r
 160 \r
 161     // base\r
 162     makevectors(self.angles);\r
 163     if (random() > 0.5)\r
 164     {\r
 165         turret_trowgib(self.origin, '0 0 0','1 1 1',"models/turrets/base-gib2.md3",min(self.respawntime,20),1,1);\r
 166         t_dir = (v_up * 700) + (randomvec() * 300);\r
 167         turret_trowgib(self.origin, t_dir,'1 1 1',"models/turrets/base-gib3.md3",min(self.respawntime,10),1,1);\r
 168         t_dir = (v_up * 700) + (randomvec() * 300);\r
 169         turret_trowgib(self.origin, t_dir,'1 1 1',"models/turrets/base-gib4.md3",min(self.respawntime,10),1,1);\r
 170     }\r
 171     else\r
 172     {\r
 173         turret_trowgib(self.origin, '0 0 0','1 1 1',"models/turrets/base-gib1.md3",min(self.respawntime,20),1,1);\r
 174     }\r
 175 \r
 176     // Blow the top part up into the air\r
 177     turret_trowgib2( self.origin + (v_up * 50),\r
 178                      v_up * 150 + randomvec() * 50,\r
 179                      '0.2 0.2 0.2',\r
 180                      self.tur_head,time + 0.5 + (random() * 0.5));\r
 181 \r
 182 \r
 183 // Go boom\r
 184     RadiusDamage (self,self, min(self.ammo,50),min(self.ammo,50) * 0.25,250,world,min(self.ammo,50)*5,0,world);\r
 185 \r
 186 // Setup respawn\r
 187     self.nextthink      = time + self.respawntime;\r
 188     //self.think          = self.turret_spawnfunc;\r
 189     self.think          = turret_stdproc_respawn;\r
 190 \r
 191     if (self.turret_diehook)\r
 192         self.turret_diehook();\r
 193 }\r
 194 \r
 195 void turret_stdproc_respawn()\r
 196 {\r
 197     // self.tur_active = 1;\r
 198 \r
 199     // Make sure all parts belong to the same team since\r
 200     // this function doubles as "teamchange" function.\r
 201     self.tur_head.team = self.team;\r
 202         if (self.team == COLOR_TEAM1)\r
 203                 self.colormod = '1.4 0.8 0.8';\r
 204         else if (self.team == COLOR_TEAM2)\r
 205                 self.colormod = '0.8 0.8 1.4';\r
 206         else\r
 207                 self.colormod = '0 0 0'; // reset\r
 208 \r
 209     self.deadflag = DEAD_NO;\r
 210     self.tur_head.deadflag = self.deadflag;\r
 211     self.effects = self.tur_head.effects = 0;\r
 212 \r
 213     self.solid = SOLID_BBOX;\r
 214     self.tur_head.solid   = self.solid;\r
 215 \r
 216     self.alpha = 1;\r
 217     self.tur_head.alpha     = self.alpha;\r
 218 \r
 219     self.takedamage = DAMAGE_YES;\r
 220     self.tur_head.takedamage    = self.takedamage;\r
 221 \r
 222     self.avelocity = '0 0 0';\r
 223     self.tur_head.avelocity    = self.avelocity;\r
 224     self.tur_head.angles = self.idle_aim;\r
 225 \r
 226     self.health             = self.tur_health;\r
 227 \r
 228     self.enemy          = world;\r
 229     self.volly_counter  = self.shot_volly;\r
 230     self.ammo           = self.ammo_max;\r
 231 \r
 232     self.nextthink  = time + self.ticrate;\r
 233     self.think      = turret_think;\r
 234 \r
 235     if (self.turret_respawnhook)\r
 236         self.turret_respawnhook();\r
 237 \r
 238 }\r
 239 \r
 240 /*\r
 241 * Standard damage proc.\r
 242 */\r
 243 void turret_stdproc_damage (entity inflictor, entity attacker, float damage, float deathtype, vector hitloc, vector vforce)\r
 244 {\r
 245     entity baseent,oldself;\r
 246     // entity player;\r
 247 \r
 248     if (self.health <= 0) return;\r
 249 \r
 250     // Damage func is shared on all parts as standard, we need to know what the master entity of this turret is.\r
 251     // if ((self.classname == "turret_head")||(self.classname == "turret_gun")||(self.classname == "turret_badge"))\r
 252     if (self.owner)\r
 253         baseent = self.owner;\r
 254     else\r
 255         baseent = self;\r
 256 \r
 257     if (teamplay != 0)\r
 258     {\r
 259         if (self.team == attacker.team)\r
 260         {\r
 261             sprint(attacker, "\{1}Turret tells you: I'm on your team!\n");\r
 262             return;\r
 263         }\r
 264         else\r
 265         {\r
 266             /*\r
 267             // This will get enoying fast...\r
 268             FOR_EACH_PLAYER(player)\r
 269                 if(player.team == self.team)\r
 270                         sprint(player, "The enemy is attacking your base!");\r
 271 \r
 272             */\r
 273         }\r
 274 \r
 275     }\r
 276 \r
 277     baseent.health = baseent.health - damage;\r
 278 \r
 279     // thorw head slightly off aim when hit?\r
 280     if ((self.classname == "turret_head") || (self.classname == "turret_gun"))\r
 281         if (self.damage_flags & TFL_DMG_HEADSHAKE)\r
 282         {\r
 283             // makevectors(baseent.tur_head.v_angle);\r
 284             baseent.tur_head.angles = baseent.tur_head.angles + randomvec() * damage;\r
 285         }\r
 286 \r
 287     if (self.turrcaps_flags & TFL_TURRCAPS_MOVE)\r
 288     {\r
 289         self.velocity = self.velocity + vforce;\r
 290     }\r
 291 \r
 292 \r
 293     // Start burning when we have 10% or less health left\r
 294     if (self.health < (self.tur_health * 0.1))\r
 295         self.effects = EF_FLAME;\r
 296 \r
 297     if (self.health <= 0)\r
 298     {\r
 299         oldself = self;\r
 300         self = baseent;\r
 301         turret_stdproc_die();\r
 302         self = oldself;\r
 303 \r
 304         //baseent.turret_diefunc();\r
 305     }\r
 306 }\r
 307 \r
 308 \r