qcsrc/common/items.qh

   1 float BOT_PICKUP_RATING_LOW     = 2500;
   2 float BOT_PICKUP_RATING_MID     = 5000;
   3 float BOT_PICKUP_RATING_HIGH    = 10000;
   4
   5 float WEP_TYPE_OTHER          =  0x00; // not for damaging people
   6 float WEP_TYPE_SPLASH         =  0x01; // splash damage
   7 float WEP_TYPE_HITSCAN        =  0x02; // hitscan
   8 float WEP_TYPEMASK            =  0x0F;
   9 float WEP_FLAG_CANCLIMB       =  0x10; // can be used for movement
  10 float WEP_FLAG_NORMAL         =  0x20; // in "most weapons" set
  11 float WEP_FLAG_HIDDEN         =  0x40; // hides from menu
  12 float WEP_FLAG_RELOADABLE     =  0x80; // can has reload
  13 float WEP_FLAG_SUPERWEAPON    = 0x100; // powerup timer
  14 float WEP_FLAG_MUTATORBLOCKED = 0x200; // hides from impulse 99 etc. (mutators are allowed to clear this flag)
  15
  16 float   IT_UNLIMITED_WEAPON_AMMO     = 1;
  17 // when this bit is set, using a weapon does not reduce ammo. Checkpoints can give this powerup.
  18 float   IT_UNLIMITED_SUPERWEAPONS    = 2;
  19 // when this bit is set, superweapons don't expire. Checkpoints can give this powerup.
  20 float   IT_CTF_SHIELDED              = 4; // set for the flag shield
  21 float   IT_USING_JETPACK             = 8; // confirmation that button is pressed
  22 float   IT_JETPACK                   = 16; // actual item
  23 float   IT_FUEL_REGEN                = 32; // fuel regeneration trigger
  24 float   IT_SHELLS                    = 256;
  25 float   IT_NAILS                     = 512;
  26 float   IT_ROCKETS                   = 1024;
  27 float   IT_CELLS                     = 2048;
  28 float   IT_SUPERWEAPON               = 4096;
  29 float   IT_FUEL                      = 128;
  30 float   IT_STRENGTH                  = 8192;
  31 float   IT_INVINCIBLE                = 16384;
  32 float   IT_HEALTH                    = 32768;
  33 // union:
  34         // for items:
  35         float   IT_KEY1              = 131072;
  36         float   IT_KEY2              = 262144;
  37         // for players:
  38         float   IT_RED_FLAG_TAKEN    = 32768;
  39         float   IT_RED_FLAG_LOST     = 65536;
  40         float   IT_RED_FLAG_CARRING  = 98304;
  41         float   IT_BLUE_FLAG_TAKEN   = 131072;
  42         float   IT_BLUE_FLAG_LOST    = 262144;
  43         float   IT_BLUE_FLAG_CARRING = 393216;
  44 // end
  45 float   IT_5HP                       = 524288;
  46 float   IT_25HP                      = 1048576;
  47 float   IT_ARMOR_SHARD               = 2097152;
  48 float   IT_ARMOR                     = 4194304;
  49
  50 float   IT_AMMO                      = 3968; // IT_SHELLS | IT_NAILS | IT_ROCKETS | IT_CELLS | IT_FUEL;
  51 float   IT_PICKUPMASK                = 51; // IT_FUEL_REGEN | IT_JETPACK | IT_UNLIMITED_AMMO; // strength and invincible are handled separately
  52 float   IT_UNLIMITED_AMMO            = 3; // IT_UNLIMITED_SUPERWEAPONS | IT_UNLIMITED_WEAPON_AMMO;
  53
  54 float AMMO_COUNT = 4; // amount of ammo types to show in the inventory panel
  55
  56 // variables:
  57 string weaponorder_byid;
  58
  59 // functions:
  60 entity get_weaponinfo(float id);
  61 string W_FixWeaponOrder(string order, float complete);
  62 string W_NameWeaponOrder(string order);
  63 string W_NumberWeaponOrder(string order);
  64
  65 // ammo types
  66 .float ammo_shells;
  67 .float ammo_nails;
  68 .float ammo_rockets;
  69 .float ammo_cells;
  70 .float ammo_fuel;
  71 .float ammo_batteries; // dummy
  72
  73 // entity properties of weaponinfo:
  74 .float weapon; // WEP_...
  75 .string netname; // short name
  76 .string message; // human readable name
  77 .float items; // IT_...
  78 .float(float) weapon_func; // w_...
  79 .string mdl; // modelname without g_, v_, w_
  80 .string model; // full name of g_ model
  81 .float spawnflags; // WEPSPAWNFLAG_... combined
  82 .float impulse; // weapon impulse
  83 .float bot_pickupbasevalue; // bot weapon priority
  84 .string model2; // wpn- sprite name
  85 ..float ammo_field; // main ammo field
  86 // also, weaponinfo ents can act as a WEPSET
  87
  88 // dynamic weapon adding
  89 float w_null(float dummy);
  90 void register_weapon(float id, float(float) func, float ammotype, float i, float weapontype, float pickupbasevalue, string modelname, string shortname, string wname);
  91 void register_weapons_done();
  92
  93 #define WEP_FIRST 1
  94 float WEP_COUNT;
  95 float WEP_LAST;
  96
  97 #if 1
  98 # define WEP_MAXCOUNT 24
  99 // default storage
 100 .float _WS_weapons;
 101 # define WEPSET_BIT(a)                  power2of((a) - WEP_FIRST)
 102 # define WEPSET_DECLARE_A(a)            float _WS_##a
 103 # define WEPSET_CLEAR_E(e)              ((e)._WS_weapons = 0)
 104 # define WEPSET_CLEAR_A(a)              ((_WS_##a) = 0)
 105 # define WEPSET_EMPTY_E(e)              ((e)._WS_weapons == 0)
 106 # define WEPSET_EMPTY_A(a)              ((_WS_##a) == 0)
 107 # define WEPSET_COPY_AS(a)              ((_WS_##a) = getstati(STAT_WEAPONS))
 108 # define WEPSET_ADDSTAT()               addstat(STAT_WEAPONS, AS_INT, _WS_weapons)
 109 # define WEPSET_OP1_EE(a,b,mergeop,x)   ((a)._WS_weapons x (b)._WS_weapons)
 110 # define WEPSET_OP2_EE(a,b,mergeop,x,y) ((a)._WS_weapons x (b)._WS_weapons y (a)._WS_weapons)
 111 # define WEPSET_OP1_EA(a,b,mergeop,x)   ((a)._WS_weapons x _WS_##b)
 112 # define WEPSET_OP2_EA(a,b,mergeop,x,y) ((a)._WS_weapons x _WS_##b y (a)._WS_weapons)
 113 # define WEPSET_OP1_EW(a,b,mergeop,x)   ((a)._WS_weapons x WEPSET_BIT(b))
 114 # define WEPSET_OP2_EW(a,b,mergeop,x,y) ((a)._WS_weapons x WEPSET_BIT(b) y (a)._WS_weapons)
 115 # define WEPSET_OP1_AE(a,b,mergeop,x)   (_WS_##a x (b)._WS_weapons)
 116 # define WEPSET_OP2_AE(a,b,mergeop,x,y) (_WS_##a x (b)._WS_weapons y _WS_##a)
 117 # define WEPSET_OP1_AA(a,b,mergeop,x)   (_WS_##a x _WS_##b)
 118 # define WEPSET_OP2_AA(a,b,mergeop,x,y) (_WS_##a x _WS_##b y _WS_##a)
 119 # define WEPSET_OP1_AW(a,b,mergeop,x)   (_WS_##a x WEPSET_BIT(b))
 120 # define WEPSET_OP2_AW(a,b,mergeop,x,y) (_WS_##a x WEPSET_BIT(b) y _WS_##a)
 121 #else
 122 /*
 123 -----BEGIN PGP MESSAGE-----
 124 Version: GnuPG v1.4.12 (GNU/Linux)
 125
 126 hQQOA3jo81SSHof3EA//XCpTcmXeu0gaVIG9Iv/furnASpPnnbqXnnrpV/Ohoefa
 127 LY6Ul1pKGnnXtrbLz/Dofx7y3ynY8MIaOMyrWEqJrhweogkyTEPE6jA7VaeW0ata
 128 ZNU+M+BUfmPJeXEl/W/foSe9A2vRNCUdq4lzS9aZ+nFO4aWOpkH475sKf+rpZOlo
 129 PL3g7QgC6zsAaHqn8J6VMNKvKqsIy0HN9WTeFpiSbmrixb7NA47vyz6Bc3sS5IIi
 130 gnZeBJ6Em+47nbTJcFEld8ng2vmgL3OqPBGDjzNYTRW2Ef9mJN4+cb/NNPiIKOGf
 131 7gjvpCoeXN8Rf6XlHj8HEAzzoXN/RjalQy1KES4XkcUgNTdaaYWnWW6tQtHVyUyL
 132 wvLXzLQuYjiTB81ljTWpLNU4l/ZEX+ArnHNGa0FD+qmBz/9AxhUmAI5lCaybvUZ6
 133 /VD1mA2mc8zEhoiEZkSLevvkTqpp/siKwNYB2yZyFivyI0UMjfK/EjIJwir6LofE
 134 27DJtNLjgFcInXRluZmjI3BvNxIez0q91tQah1F+WD4+UT8siXuMpIjiJx390VJr
 135 i1eu5CpFoiWb2YbnF97WoyK39nIOqUPyM3H7YIXIXYWBfxN5UXBfRqorosa3WsGL
 136 6MGus1EqG2NOUXhCRtCgxS9ZRk/YuNb4cu5beP81VyPd05Ggzdh0Jmy8xvwqxMAP
 137 +wS9MnlgLQCSKcIOZ2Bb1Yttw9+hktLjG0LE59w9qrBUyO0q8WsF3y/bZ5BPH8am
 138 jnuMhhVGhksFc4Yu9eSjXVR5F6jSjs86U0QyATPfo729VFPuJjRej8O9Rdf0kUs+
 139 m7PNpP88gSBKGgLfCR5nyjlUR0bafS8Zvjok0e+6eIQVkRTg7IHykvMV5X/ty7nU
 140 qSTgbyzkE+5nb8aQzKTeee+pYvXdR5J7rxmXf8b2ZkA3hWbtCzulJ2rYrzdGBUI6
 141 z2/3LIxb6vTm+a4YtShGb8rraPExgbZfYPG29h5ZiFyeE+AsFtkQJwz104j6yUJv
 142 v7cawBwCuU91DKs+2Mb/SjhJ/W+guqk8tz2LxE9ltPguujvB2eVWKigfFtamQWPX
 143 aaP6vp845+89p6yv7j4nK02kBKVtqWpcKZanwx80gEdQU1uYkE82nul1tGgXPAZy
 144 iLYSWZj1+dlV3biALiM7IZjFRO6OlSmHg9PzRk7fRP9aziCP8ujcyavkoO7JO7hi
 145 m/YSHoPYA4Sr/VIc5I3TrcpndEqBr0pmotkrt+phSm+1cyCuTeBt4omRaVNNxvMT
 146 eNmnspO7CoIzHmbr6hwTNWHiolBMMnbqOeKcXa5NQ6MCDG+5y+Izx1U3EcDwS60C
 147 6FD9/LOmDryoen90TrVfyB5n7BQptwS6UyxrLRx55sdphQQOA/mCoN4jiQDeEA//
 148 UnUUyW0ZgzFNCxoY2uI7UtyvCby934PaeiY1ipokx3ZwtjH+azNGkD24p6QFHVJY
 149 hHGrMF14tIgUL2GssOWcNV9XW925zUARP7WI9S1SACVuc/URC6tVidoRZmvv1afZ
 150 aFT/NvL9Jdcp9PfUVMEdWYungxlmmRV0WkOrOB/UI/TqUnXvB4FD2xo7HSg1+L+p
 151 nRLU6PjEIugAd3rPp/ox7KDeaecZMc4DxyhClpQbBjZzSN/+E9Lzb/IQP3Ghmo45
 152 Hlba9+1qph7WaepNKKOphffzISQoG1Grv9HYrwp6nvUYxlrolmMdE1KDr2OvaFbe
 153 5UDkfcFU12NwWOcKZcdCwBJDv9O/wyK4AVncNH8n+63HBktKXdgm5uU+Ae54ZC/8
 154 Kmt4tiheeD2y3xwcHM3TSu1cSYGd0rKv5mvhBVh3g+7+P8GftX8OiaqL8MAy4ABc
 155 4lHvp3HsUgrM2dIt6KMA04jr01b+oPzmbVXIGPPj9AknG946ied2BQbKFttIafZa
 156 hW4H80zqYfmo1mz1r26ukag6bwYuqGGHh5GqE842LC/6Oa2RKOCqVK6gbz1euli6
 157 4cOnfsrzxzUIHl3lsOf5I+QuIsE21jzgENhfhJ4pnJsWCs2XnRqoqXmGUt27mDL/
 158 rndcrtBo9CbEQoX2Q6VDJngU4sQ6RDRSGGhyC3adi/EP/iPITofsSFeCsTkx3Vl7
 159 U7DsNX6jUM4+G1LeKRyQgHwttfVc3prE5QXPi5DLUXBRYBZSGMbgQigN68e/VXEo
 160 EjSFGEuuRKtm+Oc+w0P8Ut96Y0HUgqo61YqvndNv8Ydzmr7yn4VjsMYLGIzy0jCX
 161 Zh/pUYm00G7Ixc7bA0LrQRV895ULthwdreHL62xbHs8niMu2ApSpkTRPeMNk+e5E
 162 BUmaJOZQTe8pLUi3eDYKgQxUSyUWiD6CNLdNLh1/WlIaqhqXPR0wGtPIKPwZm5i8
 163 zXNnDaDn6tpbCmlzj1F2bjJLTDS12O6Syo/Mq+qE/VrQIfdD5dvqBK/ZNMQM/Z35
 164 ZryIA+inLRC0JNIQjBvJv7qQPVaKH62dOXRVrBwYFrW6qFl8AsYx8tBP8bJwqnys
 165 GfYaqB1bSuz+UCATXizoHs2RJoj/j0wHQFv3M4M2BVxvpLcip5k8jY4YlIlnbZMx
 166 yKm0sVX8W7Eto35PSruo01QBVJlq3eeAM95uIOZhJcFQtFoHi49z/u45Xy8oPoim
 167 r5wfOD1k7J+JPC5PRMwk+XyqqZ0uB+KKW+CR31WQxyH7ewYswJEbXUhrsxJ1T/N/
 168 gIcUAVc5o5mvSxa+vImW+rV2N+qaFhXoDY2jiEjf4a/efc3ocM5WTdhaC3mimWjn
 169 ji4UoOLPYSWO80J/U/YclFZB0ukBQU9NCUenSvYFHP5PhW+J9r9JUP1oG1kzB1DO
 170 PnJb9ucJ5PYIcAnFb9/Bfl5azD4oKqYGXgl6vfQN+Y51iuYzX9tZ4CINF363984s
 171 8WOhx8GNGeRF/lh3Chj3oODlXWCg22FLHXnKPi3prlsf40LmihfUi+K8TI6LsXZu
 172 S/gNLMLs6tPGjjYc8M0dDaHQtSY/ef5FbYCxlZsdvSAXdJVh5l0TF9tKUScH9K9r
 173 EFRxi+fs2oGwnUtvlon7pPudToU/KWaEfiMc9urXuuMr4rS1X/Y3gzxItzbjIhLw
 174 HZ2DCgyjw77Uk3tLIXQCV1ZvFEWg7K8wfubeux9K1X5otPzquj0Utxpyca17JeB1
 175 +8ghTDPJLq8BRGjU4h1S0+ZXauLsSTo2BcAtciegZYE6iw10o5DsVQLof352APNB
 176 s6/2/MTkZMv/k1KCQ3kMwa+fzSNa1lj7G+FweUdbLzeuuOtyQAlRUn/J2OcUZGbl
 177 tU52Ds3N18ib+D1tthoVE9IsC4lM4qQqI/LnNtyCtd3415sXNTqRO54GQa4YfvJV
 178 dw/xOX4PipfpsSS5xdbLIdAtaAOqkJ8j4x7MXyykNcC2TayqL1nEFIteoCfVmlOq
 179 I7YaTGIsr4miVaIvZ+BC490dZrHkftuE6zjtEBfLk5WiW6xcCn8wqm5Rh4KC7U4y
 180 x562Rh2ZzVNi2Y46rIVimcBuz2vVeEridXW1dqK/eNFT5w==
 181 =/PJI
 182 -----END PGP MESSAGE-----
 183 */
 184 #endif
 185
 186 #define XX ,
 187
 188 #define WEPSET_COPY_EE(a,b)            WEPSET_OP1_EE(a,b,XX,=)
 189 #define WEPSET_EQ_EE(a,b)              WEPSET_OP1_EE(a,b,&&,==)
 190 #define WEPSET_OR_EE(a,b)              WEPSET_OP1_EE(a,b,XX,|=)
 191 #define WEPSET_AND_EE(a,b)             WEPSET_OP2_EE(a,b,XX,=,&)
 192 #define WEPSET_ANDNOT_EE(a,b)          WEPSET_OP1_EE(a,b,XX,&~=)
 193 #define WEPSET_CONTAINS_ANY_EE(a,b) !!(WEPSET_OP1_EE(a,b,||,&))
 194 #define WEPSET_CONTAINS_ALL_EE(a,b)    WEPSET_OP2_EE(b,a,&&,==,&)
 195
 196 #define WEPSET_COPY_EA(a,b)            WEPSET_OP1_EA(a,b,XX,=)
 197 #define WEPSET_EQ_EA(a,b)              WEPSET_OP1_EA(a,b,&&,==)
 198 #define WEPSET_OR_EA(a,b)              WEPSET_OP1_EA(a,b,XX,|=)
 199 #define WEPSET_AND_EA(a,b)             WEPSET_OP2_EA(a,b,XX,=,&)
 200 #define WEPSET_ANDNOT_EA(a,b)          WEPSET_OP1_EA(a,b,XX,&~=)
 201 #define WEPSET_CONTAINS_ANY_EA(a,b) !!(WEPSET_OP1_EA(a,b,||,&))
 202 #define WEPSET_CONTAINS_ALL_EA(a,b)    WEPSET_OP2_EA(b,a,&&,==,&)
 203
 204 #define WEPSET_COPY_EW(a,b)            WEPSET_OP1_EW(a,b,XX,=)
 205 #define WEPSET_EQ_EW(a,b)              WEPSET_OP1_EW(a,b,&&,==)
 206 #define WEPSET_OR_EW(a,b)              WEPSET_OP1_EW(a,b,XX,|=)
 207 #define WEPSET_AND_EW(a,b)             WEPSET_OP2_EW(a,b,XX,=,&)
 208 #define WEPSET_ANDNOT_EW(a,b)          WEPSET_OP1_EW(a,b,XX,&~=)
 209 #define WEPSET_CONTAINS_EW(a,b)     !!(WEPSET_OP1_EW(a,b,||,&))
 210
 211 #define WEPSET_COPY_AE(a,b)            WEPSET_OP1_AE(a,b,XX,=)
 212 #define WEPSET_EQ_AE(a,b)              WEPSET_OP1_AE(a,b,&&,==)
 213 #define WEPSET_OR_AE(a,b)              WEPSET_OP1_AE(a,b,XX,|=)
 214 #define WEPSET_AND_AE(a,b)             WEPSET_OP2_AE(a,b,XX,=,&)
 215 #define WEPSET_ANDNOT_AE(a,b)          WEPSET_OP1_AE(a,b,XX,&~=)
 216 #define WEPSET_CONTAINS_ANY_AE(a,b) !!(WEPSET_OP1_AE(a,b,||,&))
 217 #define WEPSET_CONTAINS_ALL_AE(a,b)    WEPSET_OP2_AE(b,a,&&,==,&)
 218
 219 #define WEPSET_COPY_AA(a,b)            WEPSET_OP1_AA(a,b,XX,=)
 220 #define WEPSET_EQ_AA(a,b)              WEPSET_OP1_AA(a,b,&&,==)
 221 #define WEPSET_OR_AA(a,b)              WEPSET_OP1_AA(a,b,XX,|=)
 222 #define WEPSET_AND_AA(a,b)             WEPSET_OP2_AA(a,b,XX,=,&)
 223 #define WEPSET_ANDNOT_AA(a,b)          WEPSET_OP1_AA(a,b,XX,&~=)
 224 #define WEPSET_CONTAINS_ANY_AA(a,b) !!(WEPSET_OP1_AA(a,b,||,&))
 225 #define WEPSET_CONTAINS_ALL_AA(a,b)    WEPSET_OP2_AA(b,a,&&,==,&)
 226
 227 #define WEPSET_COPY_AW(a,b)            WEPSET_OP1_AW(a,b,XX,=)
 228 #define WEPSET_EQ_AW(a,b)              WEPSET_OP1_AW(a,b,&&,==)
 229 #define WEPSET_OR_AW(a,b)              WEPSET_OP1_AW(a,b,XX,|=)
 230 #define WEPSET_AND_AW(a,b)             WEPSET_OP2_AW(a,b,XX,=,&)
 231 #define WEPSET_ANDNOT_AW(a,b)          WEPSET_OP1_AW(a,b,XX,&~=)
 232 #define WEPSET_CONTAINS_AW(a,b)     !!(WEPSET_OP1_AW(a,b,||,&))
 233
 234 WEPSET_DECLARE_A(WEPBIT_ALL);
 235 WEPSET_DECLARE_A(WEPBIT_SUPERWEAPONS);
 236 // note: the fabs call is just there to hide "if result is constant" warning
 237 #define REGISTER_WEAPON_2(id,func,ammotype,i,weapontype,pickupbasevalue,modelname,shortname,wname) \
 238         float id; \
 239         float func(float); \
 240         void RegisterWeapons_##id() \
 241         { \
 242                 WEP_LAST = (id = WEP_FIRST + WEP_COUNT); \
 243                 WEPSET_OR_AW(WEPBIT_ALL, id); \
 244                 if(fabs(weapontype & WEP_FLAG_SUPERWEAPON)) \
 245                         WEPSET_OR_AW(WEPBIT_SUPERWEAPONS, id); \
 246                 ++WEP_COUNT; \
 247                 register_weapon(id,func,ammotype,i,weapontype,pickupbasevalue,modelname,shortname,wname); \
 248         } \
 249         ACCUMULATE_FUNCTION(RegisterWeapons, RegisterWeapons_##id)
 250 #ifdef MENUQC
 251 #define REGISTER_WEAPON(id,func,ammotype,i,weapontype,pickupbasevalue,modelname,shortname,wname) \
 252         REGISTER_WEAPON_2(WEP_##id,w_null,ammotype,i,weapontype,pickupbasevalue,modelname,shortname,wname)
 253 #else
 254 #define REGISTER_WEAPON(id,func,ammotype,i,weapontype,pickupbasevalue,modelname,shortname,wname) \
 255         REGISTER_WEAPON_2(WEP_##id,func,ammotype,i,weapontype,pickupbasevalue,modelname,shortname,wname)
 256 #endif
 257
 258 #include "../server/w_all.qc"
 259
 260 #undef REGISTER_WEAPON
 261 ACCUMULATE_FUNCTION(RegisterWeapons, register_weapons_done)
 262
 263
 264 string W_FixWeaponOrder(string order, float complete);
 265 string W_NumberWeaponOrder(string order);
 266 string W_NameWeaponOrder(string order);
 267 string W_FixWeaponOrder_BuildImpulseList(string o);
 268 string W_FixWeaponOrder_AllowIncomplete(string order);
 269 string W_FixWeaponOrder_ForceComplete(string order);
 270
 271 void W_RandomWeapons(entity e, float n);