qcsrc/common/weapons/all.qh

   1 #ifndef WEAPONS_ALL_H
   2 #define WEAPONS_ALL_H
   3
   4 #include "../command/all.qh"
   5 #include "config.qh"
   6
   7 // weapon sets
   8 typedef vector WepSet;
   9 #define WEPSET(id) WepSet_FromWeapon(WEP_##id.m_id)
  10 WepSet WepSet_FromWeapon(int a);
  11 #ifdef SVQC
  12 void WepSet_AddStat();
  13 void WepSet_AddStat_InMap();
  14 void WriteWepSet(float dest, WepSet w);
  15 #endif
  16
  17 #ifdef CSQC
  18 WepSet WepSet_GetFromStat();
  19 WepSet WepSet_GetFromStat_InMap();
  20 WepSet ReadWepSet();
  21 #endif
  22
  23 #include "weapon.qh"
  24
  25 #ifndef MENUQC
  26 #include "calculations.qh"
  27 #include "../models/all.qh"
  28 #endif
  29
  30 #include "../util.qh"
  31
  32 #ifdef SVQC
  33 #include "../../server/bot/aim.qh"
  34 #endif
  35
  36 REGISTRY(Weapons, 72) // Increase as needed. Can be up to 72.
  37 REGISTER_REGISTRY(RegisterWeapons)
  38 entity get_weaponinfo(int id);
  39
  40
  41 GENERIC_COMMAND(dumpweapons, "Dump all weapons into weapons_dump.txt") // WEAPONTODO: make this work with other progs than just server
  42 {
  43     switch(request)
  44     {
  45         case CMD_REQUEST_COMMAND:
  46         {
  47             #ifdef SVQC
  48             wep_config_file = -1;
  49             wep_config_alsoprint = -1;
  50             string filename = argv(1);
  51
  52             if(filename == "")
  53             {
  54                 filename = "weapons_dump.cfg";
  55                 wep_config_alsoprint = false;
  56             }
  57             else if(filename == "-")
  58             {
  59                 filename = "weapons_dump.cfg";
  60                 wep_config_alsoprint = true;
  61             }
  62             wep_config_file = fopen(filename, FILE_WRITE);
  63
  64             if(wep_config_file >= 0)
  65             {
  66                 Dump_Weapon_Settings();
  67                 LOG_INFO(sprintf("Dumping weapons... File located in ^2data/data/%s^7.\n", filename));
  68                 fclose(wep_config_file);
  69                 wep_config_file = -1;
  70                 wep_config_alsoprint = -1;
  71             }
  72             else
  73             {
  74                 LOG_INFO(sprintf("^1Error: ^7Could not open file '%s'!\n", filename));
  75             }
  76             #else
  77             LOG_INFO(_("Weapons dump command only works with sv_cmd.\n"));
  78             #endif
  79             return;
  80         }
  81
  82         default:
  83         case CMD_REQUEST_USAGE:
  84         {
  85             LOG_INFO(strcat("\nUsage:^3 ", GetProgramCommandPrefix(), " dumpweapons [filename]"));
  86             LOG_INFO("  Where 'filename' is the file to write (default is weapons_dump.cfg),\n");
  87             LOG_INFO("  if supplied with '-' output to console as well as default,\n");
  88             LOG_INFO("  if left blank, it will only write to default.\n");
  89             return;
  90         }
  91     }
  92 }
  93
  94 #define REGISTER_WEAPON(id, inst) \
  95     /* WepSet WEPSET_##id; */ \
  96     REGISTER(RegisterWeapons, WEP, Weapons, id, m_id, inst)
  97
  98 // create cvars for weapon settings
  99 #define WEP_ADD_CVAR_NONE(wepname,name) [[last]] float autocvar_g_balance_##wepname##_##name;
 100
 101 #define WEP_ADD_CVAR_PRI(wepname,name) WEP_ADD_CVAR_NONE(wepname, primary_##name)
 102 #define WEP_ADD_CVAR_SEC(wepname,name) WEP_ADD_CVAR_NONE(wepname, secondary_##name)
 103 #define WEP_ADD_CVAR_BOTH(wepname,name) \
 104     WEP_ADD_CVAR_PRI(wepname, name) \
 105     WEP_ADD_CVAR_SEC(wepname, name)
 106
 107 #define WEP_ADD_CVAR(wepid,wepname,mode,name) WEP_ADD_CVAR_##mode(wepname, name)
 108
 109 // create properties for weapon settings
 110 #define WEP_ADD_PROP(wepid,wepname,type,prop,name) \
 111     .type prop; \
 112     [[last]] type autocvar_g_balance_##wepname##_##name;
 113
 114 // read cvars from weapon settings
 115 #define WEP_CVAR(wepname,name) autocvar_g_balance_##wepname##_##name
 116 #define WEP_CVAR_PRI(wepname,name) WEP_CVAR(wepname, primary_##name)
 117 #define WEP_CVAR_SEC(wepname,name) WEP_CVAR(wepname, secondary_##name)
 118 #define WEP_CVAR_BOTH(wepname,isprimary,name) ((isprimary) ? WEP_CVAR_PRI(wepname, name) : WEP_CVAR_SEC(wepname, name))
 119
 120 // set initialization values for weapon settings
 121 #define WEP_SKIP_CVAR(unuseda,unusedb,unusedc,unusedd) /* skip cvars */
 122 #define WEP_SET_PROP(wepid,wepname,type,prop,name) WEP_##wepid.prop = autocvar_g_balance_##wepname##_##name;
 123
 124 const int WEP_FIRST = 1;
 125 #define WEP_LAST (Weapons_COUNT - 1)
 126 WepSet WEPSET_ALL;
 127 WepSet WEPSET_SUPERWEAPONS;
 128
 129 REGISTER_WEAPON(Null, NEW(Weapon));
 130
 131 #include "all.inc"
 132
 133 entity get_weaponinfo(int id)
 134 {
 135     if (id >= WEP_FIRST && id <= WEP_LAST) {
 136         Weapon w = Weapons[id];
 137         if (w) return w;
 138     }
 139     return WEP_Null;
 140 }
 141
 142 // TODO: remove after 0.8.2. Retains impulse number compatibility because 0.8.1 clients don't reload the weapons.cfg
 143 #define WEP_HARDCODED_IMPULSES 22
 144
 145 // TODO: invert after 0.8.2. Will require moving 'best weapon' impulses
 146 #define WEP_IMPULSE_BEGIN 230
 147 #define WEP_IMPULSE_END bound(WEP_IMPULSE_BEGIN, WEP_IMPULSE_BEGIN + (Weapons_COUNT - 1) - 1, 253)
 148
 149 REGISTRY_SORT(Weapons, netname, WEP_HARDCODED_IMPULSES + 1)
 150
 151 STATIC_INIT(register_weapons_done)
 152 {
 153     FOREACH(Weapons, true, LAMBDA(
 154         it.m_id = i;
 155         WepSet set = WepSet_FromWeapon(it.m_id);
 156         WEPSET_ALL |= set;
 157         if ((it.spawnflags) & WEP_FLAG_SUPERWEAPON) WEPSET_SUPERWEAPONS |= set;
 158         it.weapon = it.m_id;
 159         it.weapons = set;
 160         int imp = WEP_IMPULSE_BEGIN + it.m_id - 1;
 161         if (imp <= WEP_IMPULSE_END)
 162             localcmd(sprintf("alias weapon_%s \"impulse %d\"\n", it.netname, imp));
 163         else
 164             LOG_TRACEF(_("Impulse limit exceeded, weapon will not be directly accessible: %s\n"), it.netname);
 165     ));
 166     #ifdef CSQC
 167     FOREACH(Weapons, true, LAMBDA(it.wr_init(it)));
 168     #endif
 169     weaponorder_byid = "";
 170     for (int i = Weapons_MAX - 1; i >= 1; --i)
 171         if (Weapons[i])
 172             weaponorder_byid = strcat(weaponorder_byid, " ", ftos(i));
 173     weaponorder_byid = strzone(substring(weaponorder_byid, 1, strlen(weaponorder_byid) - 1));
 174 }
 175
 176 #endif