qcsrc/common/weapons/w_blaster.qc

   1 #ifdef REGISTER_WEAPON
   2 REGISTER_WEAPON(
   3 /* WEP_##id */ LASER,
   4 /* function */ W_Laser,
   5 /* ammotype */ 0,
   6 /* impulse  */ 1,
   7 /* flags    */ WEP_FLAG_NORMAL | WEP_FLAG_RELOADABLE | WEP_FLAG_CANCLIMB | WEP_TYPE_SPLASH,
   8 /* rating   */ 0,
   9 /* model    */ "laser",
  10 /* netname  */ "laser",
  11 /* fullname */ _("Blaster")
  12 );
  13 #else
  14 #ifdef SVQC
  15 void spawnfunc_weapon_laser() { weapon_defaultspawnfunc(WEP_LASER); }
  16 void(float imp) W_SwitchWeapon;
  17 void() W_LastWeapon;
  18 .float swing_prev;
  19 .entity swing_alreadyhit;
  20
  21 void SendCSQCShockwaveParticle(vector endpos)
  22 {
  23         //endpos = WarpZone_UnTransformOrigin(transform, endpos);
  24
  25         WriteByte(MSG_BROADCAST, SVC_TEMPENTITY);
  26         WriteByte(MSG_BROADCAST, TE_CSQC_SHOCKWAVEPARTICLE);
  27         WriteCoord(MSG_BROADCAST, w_shotorg_x);
  28         WriteCoord(MSG_BROADCAST, w_shotorg_y);
  29         WriteCoord(MSG_BROADCAST, w_shotorg_z);
  30         WriteCoord(MSG_BROADCAST, endpos_x);
  31         WriteCoord(MSG_BROADCAST, endpos_y);
  32         WriteCoord(MSG_BROADCAST, endpos_z);
  33         WriteByte(MSG_BROADCAST, bound(0, autocvar_g_balance_laser_shockwave_spread_max, 255));
  34         WriteByte(MSG_BROADCAST, bound(0, autocvar_g_balance_laser_shockwave_spread_min, 255));
  35         WriteByte(MSG_BROADCAST, num_for_edict(self));
  36 }
  37
  38 void W_Laser_Touch()
  39 {
  40         PROJECTILE_TOUCH;
  41
  42         self.event_damage = func_null;
  43
  44         if(self.dmg)
  45                 RadiusDamage(self, self.realowner, autocvar_g_balance_laser_secondary_damage, autocvar_g_balance_laser_secondary_edgedamage, autocvar_g_balance_laser_secondary_radius, world, world, autocvar_g_balance_laser_secondary_force, self.projectiledeathtype, other);
  46         else
  47                 RadiusDamage(self, self.realowner, autocvar_g_balance_laser_primary_damage, autocvar_g_balance_laser_primary_edgedamage, autocvar_g_balance_laser_primary_radius, world, world, autocvar_g_balance_laser_primary_force, self.projectiledeathtype, other);
  48
  49         remove(self);
  50 }
  51
  52 void W_Laser_Think()
  53 {
  54         self.movetype = MOVETYPE_FLY;
  55         self.think = SUB_Remove;
  56
  57         if(self.dmg)
  58                 self.nextthink = time + autocvar_g_balance_laser_secondary_lifetime;
  59         else
  60                 self.nextthink = time + autocvar_g_balance_laser_primary_lifetime;
  61
  62         CSQCProjectile(self, TRUE, PROJECTILE_LASER, TRUE);
  63 }
  64
  65
  66 float W_Laser_Shockwave_CheckSpread(vector targetorg, vector nearest_on_line, vector sw_shotorg, vector attack_endpos)
  67 {
  68         float spreadlimit;
  69         float distance_of_attack = vlen(sw_shotorg - attack_endpos);
  70         float distance_from_line = vlen(targetorg - nearest_on_line);
  71
  72         spreadlimit = (distance_of_attack ? min(1, (vlen(sw_shotorg - nearest_on_line) / distance_of_attack)) : 1);
  73         spreadlimit = (autocvar_g_balance_laser_shockwave_spread_min * (1 - spreadlimit) + autocvar_g_balance_laser_shockwave_spread_max * spreadlimit);
  74
  75         if(spreadlimit && (distance_from_line <= spreadlimit) && ((vlen(normalize(targetorg - sw_shotorg) - normalize(attack_endpos - sw_shotorg)) * RAD2DEG) <= 90))
  76                 return bound(0, (distance_from_line / spreadlimit), 1);
  77         else
  78                 return FALSE;
  79 }
  80
  81 float W_Laser_Shockwave_IsVisible(entity head, vector nearest_on_line, vector sw_shotorg, vector attack_endpos)
  82 {
  83         vector nearest_to_attacker = head.WarpZone_findradius_nearest;
  84         vector center = (head.origin + (head.mins + head.maxs) * 0.5);
  85         vector corner;
  86         float i;
  87
  88         // STEP ONE: Check if the nearest point is clear
  89         if(W_Laser_Shockwave_CheckSpread(nearest_to_attacker, nearest_on_line, sw_shotorg, attack_endpos))
  90         {
  91                 WarpZone_TraceLine(sw_shotorg, nearest_to_attacker, MOVE_NOMONSTERS, self);
  92                 if(trace_fraction == 1) { return TRUE; } // yes, the nearest point is clear and we can allow the damage
  93         }
  94
  95         // STEP TWO: Check if shotorg to center point is clear
  96         if(W_Laser_Shockwave_CheckSpread(center, nearest_on_line, sw_shotorg, attack_endpos))
  97         {
  98                 WarpZone_TraceLine(sw_shotorg, center, MOVE_NOMONSTERS, self);
  99                 if(trace_fraction == 1) { return TRUE; } // yes, the center point is clear and we can allow the damage
 100         }
 101
 102         // STEP THREE: Check each corner to see if they are clear
 103         for(i=1; i<=8; ++i)
 104         {
 105                 corner = get_corner_position(head, i);
 106                 if(W_Laser_Shockwave_CheckSpread(corner, nearest_on_line, sw_shotorg, attack_endpos))
 107                 {
 108                         WarpZone_TraceLine(sw_shotorg, corner, MOVE_NOMONSTERS, self);
 109                         if(trace_fraction == 1) { return TRUE; } // yes, this corner is clear and we can allow the damage
 110                 }
 111         }
 112
 113         return FALSE;
 114 }
 115
 116 #define PLAYER_CENTER(ent) (ent.origin + ((ent.classname == "player") ? ent.view_ofs : ((ent.mins + ent.maxs) * 0.5)))
 117
 118 entity shockwave_hit[32];
 119 float shockwave_hit_damage[32];
 120 vector shockwave_hit_force[32];
 121
 122 float W_Laser_Shockwave_CheckHit(float queue, entity head, vector final_force, float final_damage)
 123 {
 124         if not(head) { return FALSE; }
 125         float i;
 126
 127         ++queue;
 128
 129         for(i = 1; i <= queue; ++i)
 130         {
 131                 if(shockwave_hit[i] == head)
 132                 {
 133                         if(vlen(final_force) > vlen(shockwave_hit_force[i])) { shockwave_hit_force[i] = final_force; }
 134                         if(final_damage > shockwave_hit_damage[i]) { shockwave_hit_damage[i] = final_damage; }
 135                         return FALSE;
 136                 }
 137         }
 138
 139         shockwave_hit[queue] = head;
 140         shockwave_hit_force[queue] = final_force;
 141         shockwave_hit_damage[queue] = final_damage;
 142         return TRUE;
 143 }
 144
 145 void W_Laser_Shockwave()
 146 {
 147         // declarations
 148         float multiplier, multiplier_from_accuracy, multiplier_from_distance;
 149         float final_damage; //, final_spread;
 150         vector final_force, center, vel;
 151         entity head, next;
 152
 153         float i, queue = 0;
 154
 155         // set up the shot direction
 156         W_SetupShot(self, FALSE, 3, "weapons/lasergun_fire.wav", CH_WEAPON_B, autocvar_g_balance_laser_shockwave_damage);
 157         vector attack_endpos = (w_shotorg + (w_shotdir * autocvar_g_balance_laser_shockwave_distance));
 158         WarpZone_TraceLine(w_shotorg, attack_endpos, MOVE_NOMONSTERS, self);
 159         vector attack_hitpos = trace_endpos;
 160         float distance_to_end = vlen(w_shotorg - attack_endpos);
 161         float distance_to_hit = vlen(w_shotorg - attack_hitpos);
 162         //entity transform = WarpZone_trace_transform;
 163
 164         // do the firing effect now
 165         SendCSQCShockwaveParticle(attack_endpos);
 166         Damage_DamageInfo(attack_hitpos, autocvar_g_balance_laser_shockwave_splash_damage, autocvar_g_balance_laser_shockwave_splash_edgedamage, autocvar_g_balance_laser_shockwave_splash_radius, w_shotdir * autocvar_g_balance_laser_shockwave_splash_force, WEP_LASER, 0, self);
 167
 168         // splash damage/jumping trace
 169         head = WarpZone_FindRadius(attack_hitpos, max(autocvar_g_balance_laser_shockwave_splash_radius, autocvar_g_balance_laser_shockwave_jump_radius), FALSE);
 170         while(head)
 171         {
 172                 next = head.chain;
 173
 174                 if(head.takedamage)
 175                 {
 176                         center = PLAYER_CENTER(head);
 177
 178                         float distance_to_head = vlen(attack_hitpos - head.WarpZone_findradius_nearest);
 179
 180                         if((head == self) && (distance_to_head <= autocvar_g_balance_laser_shockwave_jump_radius))
 181                         {
 182                                 multiplier_from_accuracy = (1 - (distance_to_head ? min(1, (distance_to_head / autocvar_g_balance_laser_shockwave_jump_radius)) : 0));
 183                                 multiplier_from_distance = (1 - (distance_to_hit ? min(1, (distance_to_hit / distance_to_end)) : 0));
 184                                 multiplier = max(autocvar_g_balance_laser_shockwave_jump_multiplier_min, ((multiplier_from_accuracy * autocvar_g_balance_laser_shockwave_jump_multiplier_accuracy) + (multiplier_from_distance * autocvar_g_balance_laser_shockwave_jump_multiplier_distance)));
 185
 186                                 final_force = ((normalize(center - attack_hitpos) * autocvar_g_balance_laser_shockwave_jump_force) * multiplier);
 187                                 vel = head.velocity; vel_z = 0;
 188                                 vel = normalize(vel) * bound(0, vlen(vel) / autocvar_sv_maxspeed, 1) * autocvar_g_balance_laser_shockwave_jump_force_velocitybias;
 189                                 final_force = (vlen(final_force) * normalize(normalize(final_force) + vel));
 190                                 final_force_z *= autocvar_g_balance_laser_shockwave_jump_force_zscale;
 191                                 final_damage = (autocvar_g_balance_laser_shockwave_jump_damage * multiplier + autocvar_g_balance_laser_shockwave_jump_edgedamage * (1 - multiplier));
 192
 193                                 Damage(head, self, self, final_damage, WEP_LASER, head.origin, final_force);
 194                                 //print("SELF HIT: multiplier = ", ftos(multiplier), strcat(", damage = ", ftos(final_damage), ", force = ", ftos(vlen(final_force))),"... multiplier_from_accuracy = ", ftos(multiplier_from_accuracy), ", multiplier_from_distance = ", ftos(multiplier_from_distance), ".\n");
 195                         }
 196                         else if (distance_to_head <= autocvar_g_balance_laser_shockwave_splash_radius)
 197                         {
 198                                 multiplier_from_accuracy = (1 - (distance_to_head ? min(1, (distance_to_head / autocvar_g_balance_laser_shockwave_splash_radius)) : 0));
 199                                 multiplier_from_distance = (1 - (distance_to_hit ? min(1, (distance_to_hit / distance_to_end)) : 0));
 200                                 multiplier = max(autocvar_g_balance_laser_shockwave_splash_multiplier_min, ((multiplier_from_accuracy * autocvar_g_balance_laser_shockwave_splash_multiplier_accuracy) + (multiplier_from_distance * autocvar_g_balance_laser_shockwave_splash_multiplier_distance)));
 201
 202                                 final_force = normalize(center - (attack_hitpos - (w_shotdir * autocvar_g_balance_laser_shockwave_splash_force_forwardbias)));
 203                                 //te_lightning2(world, attack_hitpos, (attack_hitpos + (final_force * 200)));
 204                                 final_force = ((final_force * autocvar_g_balance_laser_shockwave_splash_force) * multiplier);
 205                                 final_force_z *= autocvar_g_balance_laser_shockwave_force_zscale;
 206                                 final_damage = (autocvar_g_balance_laser_shockwave_splash_damage * multiplier + autocvar_g_balance_laser_shockwave_splash_edgedamage * (1 - multiplier));
 207
 208                                 if(W_Laser_Shockwave_CheckHit(queue, head, final_force, final_damage)) { ++queue; }
 209                                 //print("SPLASH HIT: multiplier = ", ftos(multiplier), strcat(", damage = ", ftos(final_damage), ", force = ", ftos(vlen(final_force))),"... multiplier_from_accuracy = ", ftos(multiplier_from_accuracy), ", multiplier_from_distance = ", ftos(multiplier_from_distance), ".\n");
 210                         }
 211                 }
 212                 head = next;
 213         }
 214
 215         // cone damage trace
 216         head = WarpZone_FindRadius(w_shotorg, autocvar_g_balance_laser_shockwave_distance, FALSE);
 217         while(head)
 218         {
 219                 next = head.chain;
 220
 221                 if((head != self) && head.takedamage)
 222                 {
 223                         // if it's a player, use the view origin as reference (stolen from RadiusDamage functions in g_damage.qc)
 224                         center = PLAYER_CENTER(head);
 225
 226                         // find the closest point on the enemy to the center of the attack
 227                         float ang; // angle between shotdir and h
 228                         float h; // hypotenuse, which is the distance between attacker to head
 229                         float a; // adjacent side, which is the distance between attacker and the point on w_shotdir that is closest to head.origin
 230
 231                         h = vlen(center - self.origin);
 232                         ang = acos(dotproduct(normalize(center - self.origin), w_shotdir));
 233                         a = h * cos(ang);
 234
 235                         vector nearest_on_line = (w_shotorg + a * w_shotdir);
 236                         vector nearest_to_attacker = WarpZoneLib_NearestPointOnBox(center + head.mins, center + head.maxs, nearest_on_line);
 237                         float distance_to_target = vlen(w_shotorg - nearest_to_attacker); // todo: use the findradius function for this
 238
 239                         if((distance_to_target <= autocvar_g_balance_laser_shockwave_distance)
 240                                 && (W_Laser_Shockwave_IsVisible(head, nearest_on_line, w_shotorg, attack_endpos)))
 241                         {
 242                                 multiplier_from_accuracy = (1 - W_Laser_Shockwave_CheckSpread(nearest_to_attacker, nearest_on_line, w_shotorg, attack_endpos));
 243                                 multiplier_from_distance = (1 - (distance_to_hit ? min(1, (distance_to_target / distance_to_end)) : 0));
 244                                 multiplier = max(autocvar_g_balance_laser_shockwave_multiplier_min, ((multiplier_from_accuracy * autocvar_g_balance_laser_shockwave_multiplier_accuracy) + (multiplier_from_distance * autocvar_g_balance_laser_shockwave_multiplier_distance)));
 245
 246                                 final_force = normalize(center - (nearest_on_line - (w_shotdir * autocvar_g_balance_laser_shockwave_force_forwardbias)));
 247                                 //te_lightning2(world, nearest_on_line, (attack_hitpos + (final_force * 200)));
 248                                 final_force = ((final_force * autocvar_g_balance_laser_shockwave_force) * multiplier);
 249                                 final_force_z *= autocvar_g_balance_laser_shockwave_force_zscale;
 250                                 final_damage = (autocvar_g_balance_laser_shockwave_damage * multiplier + autocvar_g_balance_laser_shockwave_edgedamage * (1 - multiplier));
 251
 252                                 if(W_Laser_Shockwave_CheckHit(queue, head, final_force, final_damage)) { ++queue; }
 253                                 //print("CONE HIT: multiplier = ", ftos(multiplier), strcat(", damage = ", ftos(final_damage), ", force = ", ftos(vlen(final_force))),"... multiplier_from_accuracy = ", ftos(multiplier_from_accuracy), ", multiplier_from_distance = ", ftos(multiplier_from_distance), ".\n");
 254                         }
 255                 }
 256                 head = next;
 257         }
 258
 259         for(i = 1; i <= queue; ++i)
 260         {
 261                 head = shockwave_hit[i];
 262                 final_force = shockwave_hit_force[i];
 263                 final_damage = shockwave_hit_damage[i];
 264
 265                 Damage(head, self, self, final_damage, WEP_LASER, head.origin, final_force);
 266                 print("SHOCKWAVE by ", self.netname, ": damage = ", ftos(final_damage), ", force = ", ftos(vlen(final_force)), ".\n");
 267
 268                 shockwave_hit[i] = world;
 269                 shockwave_hit_force[i] = '0 0 0';
 270                 shockwave_hit_damage[i] = 0;
 271         }
 272         //print("queue was ", ftos(queue), ".\n\n");
 273 }
 274
 275 void W_Laser_Melee_Think()
 276 {
 277         // declarations
 278         float i, f, swing, swing_factor, swing_damage, meleetime, is_player;
 279         entity target_victim;
 280         vector targpos;
 281
 282         if(!self.cnt) // set start time of melee
 283         {
 284                 self.cnt = time;
 285                 W_PlayStrengthSound(self.realowner);
 286         }
 287
 288         makevectors(self.realowner.v_angle); // update values for v_* vectors
 289
 290         // calculate swing percentage based on time
 291         meleetime = autocvar_g_balance_laser_melee_time * W_WeaponRateFactor();
 292         swing = bound(0, (self.cnt + meleetime - time) / meleetime, 10);
 293         f = ((1 - swing) * autocvar_g_balance_laser_melee_traces);
 294
 295         // check to see if we can still continue, otherwise give up now
 296         if((self.realowner.deadflag != DEAD_NO) && autocvar_g_balance_laser_melee_no_doubleslap)
 297         {
 298                 remove(self);
 299                 return;
 300         }
 301
 302         // if okay, perform the traces needed for this frame
 303         for(i=self.swing_prev; i < f; ++i)
 304         {
 305                 swing_factor = ((1 - (i / autocvar_g_balance_laser_melee_traces)) * 2 - 1);
 306
 307                 targpos = (self.realowner.origin + self.realowner.view_ofs
 308                         + (v_forward * autocvar_g_balance_laser_melee_range)
 309                         + (v_up * swing_factor * autocvar_g_balance_laser_melee_swing_up)
 310                         + (v_right * swing_factor * autocvar_g_balance_laser_melee_swing_side));
 311
 312                 WarpZone_traceline_antilag(self.realowner, self.realowner.origin + self.realowner.view_ofs, targpos, FALSE, self.realowner, ANTILAG_LATENCY(self.realowner));
 313
 314                 // draw lightning beams for debugging
 315                 te_lightning2(world, targpos, self.realowner.origin + self.realowner.view_ofs + v_forward * 5 - v_up * 5);
 316                 te_customflash(targpos, 40,  2, '1 1 1');
 317
 318                 is_player = (trace_ent.classname == "player" || trace_ent.classname == "body");
 319
 320                 if((trace_fraction < 1) // if trace is good, apply the damage and remove self
 321                         && (trace_ent.takedamage == DAMAGE_AIM)
 322                         && (trace_ent != self.swing_alreadyhit)
 323                         && (is_player || autocvar_g_balance_laser_melee_nonplayerdamage))
 324                 {
 325                         target_victim = trace_ent; // so it persists through other calls
 326
 327                         if(is_player) // this allows us to be able to nerf the non-player damage done in e.g. assault or onslaught.
 328                                 swing_damage = (autocvar_g_balance_laser_melee_damage * min(1, swing_factor + 1));
 329                         else
 330                                 swing_damage = (autocvar_g_balance_laser_melee_nonplayerdamage * min(1, swing_factor + 1));
 331
 332                         //print(strcat(self.realowner.netname, " hitting ", target_victim.netname, " with ", strcat(ftos(swing_damage), " damage (factor: ", ftos(swing_factor), ") at "), ftos(time), " seconds.\n"));
 333
 334                         Damage(target_victim, self.realowner, self.realowner,
 335                                 swing_damage, WEP_LASER | HITTYPE_SECONDARY,
 336                                 self.realowner.origin + self.realowner.view_ofs,
 337                                 v_forward * autocvar_g_balance_laser_melee_force);
 338
 339                         if(accuracy_isgooddamage(self.realowner, target_victim)) { accuracy_add(self.realowner, WEP_LASER, 0, swing_damage); }
 340
 341                         if(autocvar_g_balance_laser_melee_multihit) // allow multiple hits with one swing, but not against the same player twice.
 342                         {
 343                                 self.swing_alreadyhit = target_victim;
 344                                 continue; // move along to next trace
 345                         }
 346                         else
 347                         {
 348                                 remove(self);
 349                                 return;
 350                         }
 351                 }
 352         }
 353
 354         if(time >= self.cnt + meleetime)
 355         {
 356                 // melee is finished
 357                 remove(self);
 358                 return;
 359         }
 360         else
 361         {
 362                 // set up next frame
 363                 self.swing_prev = i;
 364                 self.nextthink = time;
 365         }
 366 }
 367
 368 void W_Laser_Melee()
 369 {
 370         sound(self, CH_WEAPON_A, "weapons/shotgun_melee.wav", VOL_BASE, ATTN_NORM);
 371         weapon_thinkf(WFRAME_FIRE2, autocvar_g_balance_laser_melee_animtime, w_ready);
 372
 373         entity meleetemp;
 374         meleetemp = spawn();
 375         meleetemp.owner = meleetemp.realowner = self;
 376         meleetemp.think = W_Laser_Melee_Think;
 377         meleetemp.nextthink = time + autocvar_g_balance_laser_melee_delay * W_WeaponRateFactor();
 378         W_SetupShot_Range(self, TRUE, 0, "", 0, autocvar_g_balance_laser_melee_damage, autocvar_g_balance_laser_melee_range);
 379 }
 380
 381 void W_Laser_Attack(float issecondary)
 382 {
 383         entity missile;
 384         vector s_forward;
 385         float a;
 386
 387         a = autocvar_g_balance_laser_primary_shotangle;
 388         s_forward = v_forward * cos(a * DEG2RAD) + v_up * sin(a * DEG2RAD);
 389
 390         //if(nodamage)
 391         //      W_SetupShot_Dir(self, s_forward, FALSE, 3, "weapons/lasergun_fire.wav", CH_WEAPON_B, 0);
 392         /*else*/if(issecondary == 1)
 393                 W_SetupShot_Dir(self, s_forward, FALSE, 3, "weapons/lasergun_fire.wav", CH_WEAPON_B, autocvar_g_balance_laser_secondary_damage);
 394         else
 395                 W_SetupShot_Dir(self, s_forward, FALSE, 3, "weapons/lasergun_fire.wav", CH_WEAPON_B, autocvar_g_balance_laser_primary_damage);
 396         pointparticles(particleeffectnum("laser_muzzleflash"), w_shotorg, w_shotdir * 1000, 1);
 397
 398         missile = spawn();
 399         missile.owner = missile.realowner = self;
 400         missile.classname = "laserbolt";
 401         missile.dmg = 0;
 402         missile.bot_dodge = TRUE;
 403         missile.bot_dodgerating = autocvar_g_balance_laser_primary_damage;
 404
 405         PROJECTILE_MAKETRIGGER(missile);
 406         missile.projectiledeathtype = WEP_LASER;
 407
 408         setorigin(missile, w_shotorg);
 409         setsize(missile, '0 0 0', '0 0 0');
 410
 411         W_SETUPPROJECTILEVELOCITY(missile, g_balance_laser_primary);
 412         missile.angles = vectoangles(missile.velocity);
 413         //missile.glow_color = 250; // 244, 250
 414         //missile.glow_size = 120;
 415         missile.touch = W_Laser_Touch;
 416
 417         missile.flags = FL_PROJECTILE;
 418         missile.missile_flags = MIF_SPLASH;
 419
 420         missile.think = W_Laser_Think;
 421         missile.nextthink = time + autocvar_g_balance_laser_primary_delay;
 422
 423         other = missile; MUTATOR_CALLHOOK(EditProjectile);
 424
 425         if(time >= missile.nextthink)
 426         {
 427                 entity oldself;
 428                 oldself = self;
 429                 self = missile;
 430                 self.think();
 431                 self = oldself;
 432         }
 433 }
 434
 435 float W_Laser(float request)
 436 {
 437         switch(request)
 438         {
 439                 case WR_AIM:
 440                 {
 441                         if((autocvar_g_balance_laser_secondary == 2) && (vlen(self.origin-self.enemy.origin) <= autocvar_g_balance_laser_melee_range))
 442                                 self.BUTTON_ATCK2 = bot_aim(1000000, 0, 0.001, FALSE);
 443                         else
 444                                 self.BUTTON_ATCK = bot_aim(1000000, 0, 1, FALSE);
 445                         return TRUE;
 446                 }
 447
 448                 case WR_THINK:
 449                 {
 450                         if(autocvar_g_balance_laser_reload_ammo && self.clip_load < 1) // forced reload
 451                                 WEP_ACTION(self.weapon, WR_RELOAD);
 452                         else if(self.BUTTON_ATCK)
 453                         {
 454                                 if(weapon_prepareattack(0, autocvar_g_balance_laser_primary_refire))
 455                                 {
 456                                         W_DecreaseAmmo(ammo_none, 1, TRUE);
 457
 458                                         if not(autocvar_g_balance_laser_primary)
 459                                                 W_Laser_Shockwave();
 460                                         else
 461                                                 W_Laser_Attack(FALSE);
 462
 463                                         weapon_thinkf(WFRAME_FIRE1, autocvar_g_balance_laser_primary_animtime, w_ready);
 464                                 }
 465                         }
 466                         else if(self.BUTTON_ATCK2)
 467                         {
 468                                 switch(autocvar_g_balance_laser_secondary)
 469                                 {
 470                                         case 0: // switch to last used weapon
 471                                         {
 472                                                 if(self.switchweapon == WEP_LASER) // don't do this if already switching
 473                                                         W_LastWeapon();
 474
 475                                                 break;
 476                                         }
 477
 478                                         case 1: // normal projectile secondary
 479                                         {
 480                                                 if(weapon_prepareattack(1, autocvar_g_balance_laser_secondary_refire))
 481                                                 {
 482                                                         W_DecreaseAmmo(ammo_none, 1, TRUE);
 483                                                         W_Laser_Attack(TRUE);
 484                                                         weapon_thinkf(WFRAME_FIRE2, autocvar_g_balance_laser_secondary_animtime, w_ready);
 485                                                 }
 486
 487                                                 break;
 488                                         }
 489
 490                                         case 2: // melee attack secondary
 491                                         {
 492                                                 if(!self.crouch) // we are not currently crouching; this fixes an exploit where your melee anim is not visible, and besides wouldn't make much sense
 493                                                 if(weapon_prepareattack(1, autocvar_g_balance_laser_melee_refire))
 494                                                 {
 495                                                         // attempt forcing playback of the anim by switching to another anim (that we never play) here...
 496                                                         W_Laser_Melee();
 497                                                         weapon_thinkf(WFRAME_FIRE1, autocvar_g_balance_laser_melee_animtime, w_ready);
 498                                                 }
 499                                         }
 500                                 }
 501                         }
 502                         return TRUE;
 503                 }
 504
 505                 case WR_INIT:
 506                 {
 507                         precache_model("models/weapons/g_laser.md3");
 508                         precache_model("models/weapons/v_laser.md3");
 509                         precache_model("models/weapons/h_laser.iqm");
 510                         precache_sound("weapons/lasergun_fire.wav");
 511                         return TRUE;
 512                 }
 513
 514                 case WR_SETUP:
 515                 {
 516                         self.current_ammo = ammo_none;
 517                         return TRUE;
 518                 }
 519
 520                 case WR_CHECKAMMO1:
 521                 case WR_CHECKAMMO2:
 522                 {
 523                         return TRUE; // laser has infinite ammo
 524                 }
 525
 526                 case WR_RELOAD:
 527                 {
 528                         W_Reload(0, autocvar_g_balance_laser_reload_ammo, autocvar_g_balance_laser_reload_time, "weapons/reload.wav");
 529                         return TRUE;
 530                 }
 531
 532                 case WR_SUICIDEMESSAGE:
 533                 {
 534                         return WEAPON_LASER_SUICIDE;
 535                 }
 536
 537                 case WR_KILLMESSAGE:
 538                 {
 539                         return WEAPON_LASER_MURDER;
 540                 }
 541         }
 542
 543         return TRUE;
 544 }
 545 #endif
 546 #ifdef CSQC
 547 float W_Laser(float request)
 548 {
 549         switch(request)
 550         {
 551                 case WR_IMPACTEFFECT:
 552                 {
 553                         vector org2;
 554                         org2 = w_org + w_backoff * 6;
 555                         pointparticles(particleeffectnum("new_laser_impact"), org2, w_backoff * 1000, 1);
 556                         if(!w_issilent) { sound(self, CH_SHOTS, "weapons/laserimpact.wav", VOL_BASE, ATTN_NORM); }
 557                         return TRUE;
 558                 }
 559
 560                 case WR_INIT:
 561                 {
 562                         precache_sound("weapons/laserimpact.wav");
 563                         return TRUE;
 564                 }
 565         }
 566
 567         return TRUE;
 568 }
 569 #endif
 570 #endif