data/qcsrc/server/tturrets/system/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.deadflag           = DEAD_DEAD;\r
 129     self.tur_head.deadflag  = self.deadflag;\r
 130 \r
 131     sound (self, CHAN_PLAYER, "weapons/rocket_impact.wav", 1, ATTN_NORM);\r
 132     org2 = self.origin + '0 0 40';\r
 133 \r
 134 // Explotion grafix\r
 135     WriteByte (MSG_BROADCAST, SVC_TEMPENTITY);\r
 136     WriteByte (MSG_BROADCAST, 78);\r
 137     WriteCoord (MSG_BROADCAST, org2_x);\r
 138     WriteCoord (MSG_BROADCAST, org2_y);\r
 139     WriteCoord (MSG_BROADCAST, org2_z);\r
 140 \r
 141 // Unsolidify and hide real parts\r
 142     self.solid              = SOLID_NOT;\r
 143     self.tur_head.solid     = self.solid;\r
 144 \r
 145     self.alpha             = -1;\r
 146     self.tur_head.alpha    = self.alpha;\r
 147 \r
 148     self.event_damage           = SUB_Null;\r
 149     self.tur_head.event_damage  = SUB_Null;\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     self.health             = 0;\r
 156 \r
 157 // Trow fake parts arround\r
 158     // base\r
 159     if not(self.damage_flags & RFL_DMG_DEATH_NOGIBS)\r
 160     {\r
 161         makevectors(self.angles);\r
 162         if (random() > 0.5)\r
 163         {\r
 164             turret_trowgib(self.origin, '0 0 0','1 1 1',"models/turrets/base-gib2.md3",min(self.respawntime,20),1,1);\r
 165             t_dir = (v_up * 700) + (randomvec() * 300);\r
 166             turret_trowgib(self.origin, t_dir,'1 1 1',"models/turrets/base-gib3.md3",min(self.respawntime,10),1,1);\r
 167             t_dir = (v_up * 700) + (randomvec() * 300);\r
 168             turret_trowgib(self.origin, t_dir,'1 1 1',"models/turrets/base-gib4.md3",min(self.respawntime,10),1,1);\r
 169         }\r
 170         else\r
 171         {\r
 172             turret_trowgib(self.origin, '0 0 0','1 1 1',"models/turrets/base-gib1.md3",min(self.respawntime,20),1,1);\r
 173         }\r
 174 \r
 175         // Blow the top part up into the air\r
 176         turret_trowgib2( self.origin + (v_up * 50),\r
 177                          v_up * 150 + randomvec() * 50,\r
 178                          '0.2 0.2 0.2',\r
 179                          self.tur_head,time + 0.5 + (random() * 0.5));\r
 180     }\r
 181 \r
 182 // Go boom\r
 183     RadiusDamage (self,self, min(self.ammo,50),min(self.ammo,50) * 0.25,250,world,min(self.ammo,50)*5,0,world);\r
 184 \r
 185     if(self.damage_flags & TFL_DMG_DEATH_NORESPAWN)\r
 186     {\r
 187         if (self.turret_diehook)\r
 188             self.turret_diehook();\r
 189 \r
 190         remove(self.tur_head);\r
 191         remove(self);\r
 192     }\r
 193     else\r
 194     {\r
 195     // Setup respawn\r
 196         self.nextthink      = time + self.respawntime;\r
 197         //self.think          = self.turret_spawnfunc;\r
 198         self.think          = turret_stdproc_respawn;\r
 199         if (self.turret_diehook)\r
 200             self.turret_diehook();\r
 201     }\r
 202 \r
 203 }\r
 204 \r
 205 void turret_stdproc_respawn()\r
 206 {\r
 207     // Make sure all parts belong to the same team since\r
 208     // this function doubles as "teamchange" function.\r
 209 \r
 210     self.tur_head.team = self.team;\r
 211 \r
 212     /*\r
 213     COLOR_TEAM1       = 4;  // red\r
 214     COLOR_TEAM2       = 13; // blue\r
 215     COLOR_TEAM3       = 12; // yellow\r
 216     COLOR_TEAM4       = 9; // pink\r
 217     */\r
 218 \r
 219         self.colormod = '0 0 0';\r
 220 \r
 221         switch(self.team)\r
 222         {\r
 223         case COLOR_TEAM1: // Red\r
 224             self.colormod = '1.4 0.8 0.8';\r
 225             break;\r
 226 \r
 227         case COLOR_TEAM2: // Blue\r
 228             self.colormod = '0.8 0.8 1.4';\r
 229             break;\r
 230 \r
 231         case COLOR_TEAM3: // Yellow\r
 232             self.colormod = '1.4 1.4 0.6';\r
 233             break;\r
 234 \r
 235         case COLOR_TEAM4: // Pink\r
 236             self.colormod = '1.4 0.6 1.4';\r
 237             break;\r
 238         }\r
 239 \r
 240     self.deadflag           = DEAD_NO;\r
 241     self.tur_head.deadflag  = self.deadflag;\r
 242     self.effects            = 0;\r
 243     self.tur_head.effects   = self.effects;\r
 244 \r
 245     self.solid              = SOLID_BBOX;\r
 246     self.tur_head.solid     = self.solid;\r
 247 \r
 248     self.alpha = 1;\r
 249     self.tur_head.alpha     = self.alpha;\r
 250 \r
 251     self.takedamage = DAMAGE_AIM;\r
 252     self.tur_head.takedamage    = self.takedamage;\r
 253 \r
 254     self.event_damage           = turret_stdproc_damage;\r
 255     self.tur_head.event_damage  = self.event_damage;\r
 256 \r
 257     self.avelocity              = '0 0 0';\r
 258     self.tur_head.avelocity     = self.avelocity;\r
 259     self.tur_head.angles        = self.idle_aim;\r
 260     self.health                 = self.tur_health;\r
 261     self.enemy                  = world;\r
 262     self.volly_counter          = self.shot_volly;\r
 263     self.ammo                   = self.ammo_max;\r
 264 \r
 265     self.nextthink  = time + self.ticrate;\r
 266     self.think      = turret_think;\r
 267 \r
 268     if (self.turret_respawnhook)\r
 269         self.turret_respawnhook();\r
 270 \r
 271 }\r
 272 \r
 273 /*\r
 274 * Standard damage proc.\r
 275 */\r
 276 void turret_stdproc_damage (entity inflictor, entity attacker, float damage, float deathtype, vector hitloc, vector vforce)\r
 277 {\r
 278     entity baseent,oldself;\r
 279 \r
 280     if (self.health <= 0) return;\r
 281 \r
 282     // Damage func is shared on all parts as standard, we need to know what the master entity of this turret is.\r
 283     if (self.owner)\r
 284         baseent = self.owner;\r
 285     else\r
 286         baseent = self;\r
 287 \r
 288     oldself = self;\r
 289     self = baseent;\r
 290 \r
 291     if (teamplay != 0)\r
 292     {\r
 293         if (self.team == attacker.team)\r
 294         {\r
 295             sprint(attacker, "\{1}Turret tells you: I'm on your team!\n");\r
 296             return;\r
 297         }\r
 298         else\r
 299         {\r
 300             /*\r
 301             // This will get enoying fast...\r
 302             FOR_EACH_PLAYER(player)\r
 303                 if(player.team == self.team)\r
 304                         sprint(player, "The enemy is attacking your base!");\r
 305             */\r
 306         }\r
 307     }\r
 308 \r
 309     baseent.health = baseent.health - damage;\r
 310 \r
 311     // thorw head slightly off aim when hit?\r
 312     if (oldself.classname == "turret_head")\r
 313         if (self.damage_flags & TFL_DMG_HEADSHAKE)\r
 314             self.tur_head.angles = self.tur_head.angles + randomvec() * damage;\r
 315 \r
 316     if (self.turrcaps_flags & TFL_TURRCAPS_MOVE)\r
 317         self.velocity = self.velocity + vforce;\r
 318 \r
 319     // Start burning when we have 10% or less health left\r
 320     if (self.health < (self.tur_health * 0.1))\r
 321         self.tur_head.effects = EF_FLAME;\r
 322 \r
 323     self = oldself;\r
 324 \r
 325     if (baseent.health <= 0)\r
 326     {\r
 327         baseent.event_damage           = SUB_Null;\r
 328         baseent.tur_head.event_damage  = SUB_Null;\r
 329         baseent.takedamage             = DAMAGE_NO;\r
 330         baseent.tur_head.takedamage    = baseent.takedamage;\r
 331         baseent.nextthink = time;\r
 332         baseent.think = turret_stdproc_die;\r
 333     }\r
 334 \r
 335 \r
 336 \r
 337 }\r
 338 \r
 339 \r