qcsrc/server/cl_weapons.qc

   1 void W_Reload()
   2 {
   3         if(self.switchweapon == self.weapon)
   4         if(self.weaponentity.state == WS_READY)
   5                 weapon_action(self.weapon, WR_RELOAD);
   6 }
   7
   8 // switch between weapons
   9 void W_SwitchWeapon(float imp)
  10 {
  11         if (self.switchweapon != imp)
  12         {
  13                 if (client_hasweapon(self, imp, TRUE, TRUE))
  14                         W_SwitchWeapon_Force(self, imp);
  15         }
  16         else
  17         {
  18                 W_Reload();
  19         }
  20 };
  21
  22 .float weaponcomplainindex;
  23 float W_GetCycleWeapon(entity pl, string weaponorder, float dir, float imp, float complain)
  24 {
  25         // We cannot tokenize in this function, as GiveItems calls this
  26         // function. Thus we must use car/cdr.
  27         float weaponwant, first_valid, prev_valid, switchtonext, switchtolast, c;
  28         string rest;
  29         switchtonext = switchtolast = 0;
  30         first_valid = prev_valid = 0;
  31
  32         if(dir == 0)
  33                 switchtonext = 1;
  34
  35         c = 0;
  36
  37         rest = weaponorder;
  38         while(rest != "")
  39         {
  40                 weaponwant = stof(car(rest)); rest = cdr(rest);
  41                 if(imp >= 0)
  42                         if((get_weaponinfo(weaponwant)).impulse != imp)
  43                                 continue;
  44
  45                 ++c;
  46
  47                 if(client_hasweapon(pl, weaponwant, TRUE, FALSE))
  48                 {
  49                         if(switchtonext)
  50                                 return weaponwant;
  51                         if(!first_valid)
  52                                 first_valid = weaponwant;
  53                         if(weaponwant == pl.switchweapon)
  54                         {
  55                                 if(dir >= 0)
  56                                         switchtonext = 1;
  57                                 else if(prev_valid)
  58                                         return prev_valid;
  59                                 else
  60                                         switchtolast = 1;
  61                         }
  62                         prev_valid = weaponwant;
  63                 }
  64         }
  65         if(first_valid)
  66         {
  67                 if(switchtolast)
  68                         return prev_valid;
  69                 else
  70                         return first_valid;
  71         }
  72         // complain (but only for one weapon on the button that has been pressed)
  73         if(complain)
  74         {
  75                 self.weaponcomplainindex += 1;
  76                 c = mod(self.weaponcomplainindex, c) + 1;
  77                 rest = weaponorder;
  78                 while(rest != "")
  79                 {
  80                         weaponwant = stof(car(rest)); rest = cdr(rest);
  81                         if(imp >= 0)
  82                                 if((get_weaponinfo(weaponwant)).impulse != imp)
  83                                         continue;
  84
  85                         --c;
  86                         if(c == 0)
  87                         {
  88                                 client_hasweapon(pl, weaponwant, TRUE, TRUE);
  89                                 break;
  90                         }
  91                 }
  92         }
  93         return 0;
  94 }
  95
  96 void W_CycleWeapon(string weaponorder, float dir)
  97 {
  98         float w;
  99         w = W_GetCycleWeapon(self, weaponorder, dir, -1, 1);
 100         if(w > 0)
 101                 W_SwitchWeapon(w);
 102 }
 103
 104 void W_NextWeaponOnImpulse(float imp)
 105 {
 106         float w;
 107         w = W_GetCycleWeapon(self, self.cvar_cl_weaponpriority, +1, imp, 1);
 108         if(w > 0)
 109                 W_SwitchWeapon(w);
 110 }
 111
 112 // next weapon
 113 void W_NextWeapon(float list)
 114 {
 115         if(list == 0)
 116                 W_CycleWeapon(weaponpriority_hudselector_0, -1);
 117         else if(list == 1)
 118                 W_CycleWeapon(weaponpriority_hudselector_1, -1);
 119         else if(list == 2)
 120                 W_CycleWeapon(self.cvar_cl_weaponpriority, -1);
 121 }
 122
 123 // prev weapon
 124 void W_PreviousWeapon(float list)
 125 {
 126         if(list == 0)
 127                 W_CycleWeapon(weaponpriority_hudselector_0, +1);
 128         else if(list == 1)
 129                 W_CycleWeapon(weaponpriority_hudselector_1, +1);
 130         else if(list == 2)
 131                 W_CycleWeapon(self.cvar_cl_weaponpriority, +1);
 132 }
 133
 134 string W_FixWeaponOrder_AllowIncomplete(string order)
 135 {
 136         return W_FixWeaponOrder(order, 0);
 137 }
 138
 139 string W_FixWeaponOrder_ForceComplete(string order)
 140 {
 141         if(order == "")
 142                 order = W_NumberWeaponOrder(cvar_string("cl_weaponpriority"));
 143         return W_FixWeaponOrder(order, 1);
 144 }
 145
 146 float w_getbestweapon(entity e)
 147 {
 148         return W_GetCycleWeapon(e, e.cvar_cl_weaponpriority, 0, -1, 0);
 149 };
 150
 151 // generic weapons table
 152 // TODO should they be macros instead?
 153 float weapon_action(float wpn, float wrequest)
 154 {
 155         return (get_weaponinfo(wpn)).weapon_func(wrequest);
 156 };
 157
 158 string W_Name(float weaponid)
 159 {
 160         return (get_weaponinfo(weaponid)).message;
 161 }
 162
 163 float W_WeaponBit(float wpn)
 164 {
 165         return (get_weaponinfo(wpn)).weapons;
 166 }
 167
 168 float W_AmmoItemCode(float wpn)
 169 {
 170         return (get_weaponinfo(wpn)).items;
 171 }
 172
 173 void thrown_wep_think()
 174 {
 175         self.solid = SOLID_TRIGGER;
 176         self.owner = world;
 177         SUB_SetFade(self, time + 20, 1);
 178 }
 179
 180 // returns amount of ammo used as string, or -1 for failure, or 0 for no ammo count
 181 string W_ThrowNewWeapon(entity own, float wpn, float doreduce, vector org, vector velo)
 182 {
 183         entity oldself, wep;
 184         float wa, thisammo, i, j;
 185         string s;
 186         var .float ammofield;
 187
 188         wep = spawn();
 189
 190         setorigin(wep, org);
 191         wep.classname = "droppedweapon";
 192         wep.velocity = velo;
 193         wep.owner = wep.enemy = own;
 194         wep.flags |= FL_TOSSED;
 195         wep.colormap = own.colormap;
 196
 197         wa = W_AmmoItemCode(wpn);
 198         if(wa == IT_SUPERWEAPON || wa == 0)
 199         {
 200                 oldself = self;
 201                 self = wep;
 202                 weapon_defaultspawnfunc(wpn);
 203                 self = oldself;
 204                 if(startitem_failed)
 205                         return string_null;
 206                 wep.think = thrown_wep_think;
 207                 wep.nextthink = time + 0.5;
 208                 return "";
 209         }
 210         else
 211         {
 212                 s = "";
 213                 oldself = self;
 214                 self = wep;
 215                 weapon_defaultspawnfunc(wpn);
 216                 self = oldself;
 217                 if(startitem_failed)
 218                         return string_null;
 219                 if(doreduce)
 220                 {
 221                         for(i = 0, j = 1; i < 24; ++i, j *= 2)
 222                         {
 223                                 if(wa & j)
 224                                 {
 225                                         ammofield = Item_CounterField(j);
 226                                         thisammo = min(own.ammofield, wep.ammofield);
 227                                         wep.ammofield = thisammo;
 228                                         own.ammofield -= thisammo;
 229                                         s = strcat(s, " and ", ftos(thisammo), " ", Item_CounterFieldName(j));
 230                                 }
 231                         }
 232                         s = substring(s, 5, -1);
 233                 }
 234                 wep.think = thrown_wep_think;
 235                 wep.nextthink = time + 0.5;
 236                 return s;
 237         }
 238 }
 239
 240 float W_IsWeaponThrowable(float w)
 241 {
 242         float wb, wa;
 243         wb = W_WeaponBit(w);
 244         if(!wb)
 245                 return 0;
 246         wa = W_AmmoItemCode(w);
 247         if(start_weapons & wb)
 248         {
 249                 if(wa == IT_SUPERWEAPON && start_items & IT_UNLIMITED_SUPERWEAPONS)
 250                         return 0;
 251                 if(wa != IT_SUPERWEAPON && start_items & IT_UNLIMITED_WEAPON_AMMO)
 252                         return 0;
 253                 // start weapons that take no ammo can't be dropped (this prevents dropping the laser, as long as it continues to use no ammo)
 254                 if(wa == 0)
 255                         return 0;
 256         }
 257
 258         return 1;
 259 }
 260
 261 // toss current weapon
 262 void W_ThrowWeapon(vector velo, vector delta, float doreduce)
 263 {
 264         local float w, wb;
 265         string a;
 266
 267         w = self.weapon;
 268         if (w == 0)
 269                 return; // just in case
 270         if(MUTATOR_CALLHOOK(ForbidThrowCurrentWeapon))
 271                 return;
 272         if (g_weaponarena)
 273                 return;
 274         if (g_lms)
 275                 return;
 276         if (g_nexball && w == WEP_GRENADE_LAUNCHER)
 277                 return;
 278         if (!cvar("g_pickup_items"))
 279                 return;
 280         if (g_ca)
 281                 return;
 282         if(!cvar("g_weapon_throwable"))
 283                 return;
 284         if(cvar("g_weapon_stay") == 1)
 285                 return;
 286         if(!W_IsWeaponThrowable(w))
 287                 return;
 288
 289         wb = W_WeaponBit(w);
 290         if(self.weapons & wb != wb)
 291                 return;
 292
 293         self.weapons &~= wb;
 294         W_SwitchWeapon_Force(self, w_getbestweapon(self));
 295         a = W_ThrowNewWeapon(self, w, doreduce, self.origin + delta, velo);
 296         if not(a)
 297                 return;
 298         if(self.health >= 1)
 299         {
 300                 if(a == "")
 301                         sprint(self, strcat("You dropped the ^2", W_Name(w), "\n"));
 302                 else
 303                         sprint(self, strcat("You dropped the ^2", W_Name(w), " with ", a, "\n"));
 304         }
 305 };
 306
 307 // Bringed back weapon frame
 308 void W_WeaponFrame()
 309 {
 310         vector fo, ri, up;
 311
 312         if (frametime)
 313                 self.weapon_frametime = frametime;
 314
 315         if(((arena_roundbased || g_ca) && time < warmup) || ((time < game_starttime) && !cvar("sv_ready_restart_after_countdown")))
 316                 return;
 317
 318         if (!self.weaponentity || self.health < 1)
 319                 return; // Dead player can't use weapons and injure impulse commands
 320
 321         if(!self.switchweapon)
 322         {
 323                 self.weapon = 0;
 324                 self.weaponentity.state = WS_CLEAR;
 325                 self.weaponname = "";
 326                 self.items &~= IT_AMMO;
 327                 return;
 328         }
 329
 330         makevectors(self.v_angle);
 331         fo = v_forward; // save them in case the weapon think functions change it
 332         ri = v_right;
 333         up = v_up;
 334
 335         // Change weapon
 336         if (self.weapon != self.switchweapon)
 337         {
 338                 if (self.weaponentity.state == WS_CLEAR)
 339                 {
 340                         setanim(self, self.anim_draw, FALSE, TRUE, TRUE);
 341                         self.weaponentity.state = WS_RAISE;
 342                         weapon_action(self.switchweapon, WR_SETUP);
 343                         // VorteX: add player model weapon select frame here
 344                         // setcustomframe(PlayerWeaponRaise);
 345                         weapon_thinkf(WFRAME_IDLE, cvar("g_balance_weaponswitchdelay"), w_ready);
 346                         weapon_boblayer1(PLAYER_WEAPONSELECTION_SPEED, '0 0 0');
 347                 }
 348                 else if (self.weaponentity.state == WS_READY)
 349                 {
 350 #ifndef INDEPENDENT_ATTACK_FINISHED
 351                         if(ATTACK_FINISHED(self) <= time + self.weapon_frametime * 0.5)
 352                         {
 353 #endif
 354                         // UGLY WORKAROUND: play this on CHAN_WEAPON2 so it can't cut off fire sounds
 355                         sound (self, CHAN_WEAPON2, "weapons/weapon_switch.wav", VOL_BASE, ATTN_NORM);
 356                         self.weaponentity.state = WS_DROP;
 357                         // set up weapon switch think in the future, and start drop anim
 358                         weapon_thinkf(WFRAME_DONTCHANGE, cvar("g_balance_weaponswitchdelay"), w_clear);
 359                         weapon_boblayer1(PLAYER_WEAPONSELECTION_SPEED, PLAYER_WEAPONSELECTION_RANGE);
 360 #ifndef INDEPENDENT_ATTACK_FINISHED
 361                         }
 362 #endif
 363                 }
 364         }
 365
 366         // LordHavoc: network timing test code
 367         //if (self.button0)
 368         //      print(ftos(frametime), " ", ftos(time), " >= ", ftos(ATTACK_FINISHED(self)), " >= ", ftos(self.weapon_nextthink), "\n");
 369
 370         float wb;
 371         wb = W_WeaponBit(self.weapon);
 372
 373         // call the think code which may fire the weapon
 374         // and do so multiple times to resolve framerate dependency issues if the
 375         // server framerate is very low and the weapon fire rate very high
 376         local float c;
 377         c = 0;
 378         while (c < 5)
 379         {
 380                 c = c + 1;
 381                 if(wb && ((self.weapons & wb) == 0))
 382                 {
 383                         W_SwitchWeapon_Force(self, w_getbestweapon(self));
 384                         wb = 0;
 385                 }
 386                 if(wb)
 387                 {
 388                         v_forward = fo;
 389                         v_right = ri;
 390                         v_up = up;
 391                         weapon_action(self.weapon, WR_THINK);
 392                 }
 393                 if (time + self.weapon_frametime * 0.5 >= self.weapon_nextthink)
 394                 {
 395                         if(self.weapon_think)
 396                         {
 397                                 v_forward = fo;
 398                                 v_right = ri;
 399                                 v_up = up;
 400                                 self.weapon_think();
 401                         }
 402                         else
 403                                 bprint("\{1}^1ERROR: undefined weapon think function for ", self.netname, "\n");
 404                 }
 405         }
 406
 407         // don't let attack_finished fall behind when not firing (must be after weapon_setup calls!)
 408         //if (ATTACK_FINISHED(self) < time)
 409         //      ATTACK_FINISHED(self) = time;
 410
 411         //if (self.weapon_nextthink < time)
 412         //      self.weapon_nextthink = time;
 413
 414         // update currentammo incase it has changed
 415 #if 0
 416         if (self.items & IT_CELLS)
 417                 self.currentammo = self.ammo_cells;
 418         else if (self.items & IT_ROCKETS)
 419                 self.currentammo = self.ammo_rockets;
 420         else if (self.items & IT_NAILS)
 421                 self.currentammo = self.ammo_nails;
 422         else if (self.items & IT_SHELLS)
 423                 self.currentammo = self.ammo_shells;
 424         else
 425                 self.currentammo = 1;
 426 #endif
 427 };