data/qcsrc/server/campaign.qc

   1 // campaign cvars:\r
   2 //   _campaign_index: index of CURRENT map\r
   3 //   _campaign_name: name of the current campaign\r
   4 //   g_campaign(name)_index: index of current LAST map (saved)\r
   5 //   g_campaign_skill: bot skill offset\r
   6 \r
   7 float campaign_level;\r
   8 float campaign_won;\r
   9 string campaign_index_var;\r
  10 float checkrules_equality;\r
  11 \r
  12 float CampaignBailout(string s)\r
  13 {\r
  14         cvar = cvar_normal;\r
  15         cvar_string = cvar_string_normal;\r
  16         cvar_set = cvar_set_normal;\r
  17         cvar_set("g_campaign", "0");\r
  18         print("campaign initialization failed: ", s, "\n");\r
  19         return 1;\r
  20 }\r
  21 \r
  22 string cvar_campaignwrapper_list; // string of format ; var value; var value; var value; \r
  23 string cvar_string_campaignwrapper(string theCvar)\r
  24 {\r
  25         float p, q;\r
  26         p = strstrofs(cvar_campaignwrapper_list, strcat("; ", theCvar, " "), 0);\r
  27         if(p < 0)\r
  28                 return cvar_defstring(theCvar);\r
  29         p += strlen(theCvar) + 3;\r
  30         q = strstrofs(cvar_campaignwrapper_list, ";", p);\r
  31         if(q < 0)\r
  32                 return cvar_defstring(theCvar);\r
  33         return substring(cvar_campaignwrapper_list, p, q - p);\r
  34 }\r
  35 float cvar_campaignwrapper(string theCvar)\r
  36 {\r
  37         return stof(cvar_string_campaignwrapper(theCvar));\r
  38 }\r
  39 void cvar_set_campaignwrapper(string theCvar, string theValue)\r
  40 {\r
  41         if(cvar_string_campaignwrapper(theCvar) == theValue)\r
  42                 return;\r
  43         string s;\r
  44         s = cvar_campaignwrapper_list;\r
  45         cvar_campaignwrapper_list = strzone(strcat("; ", theCvar, " ", theValue, s));\r
  46         strunzone(s);\r
  47         //print(cvar_campaignwrapper_list, "\n");\r
  48 }\r
  49 \r
  50 float Campaign_Invalid()\r
  51 {\r
  52         string thismapname, wantedmapname;\r
  53         thismapname = GetMapname();\r
  54         wantedmapname = campaign_gametype[0];\r
  55         if(MapInfo_CurrentGametype() != MapInfo_Type_FromString(wantedmapname))\r
  56                 return CampaignBailout("wrong game type!");\r
  57         wantedmapname = campaign_mapname[0];\r
  58         if(wantedmapname != thismapname)\r
  59                 return CampaignBailout(strcat("wrong map: ", wantedmapname, " != ", thismapname));\r
  60         return 0;\r
  61 }\r
  62 \r
  63 void CampaignPreInit()\r
  64 {\r
  65         float baseskill;\r
  66         string title;\r
  67         if(cvar("sv_cheats"))\r
  68         {\r
  69                 CampaignBailout("JOLLY CHEATS AHAHAHAHAHAHAH))");\r
  70                 return;\r
  71         }\r
  72         campaign_level = cvar("_campaign_index");\r
  73         campaign_name = strzone(cvar_string("_campaign_name"));\r
  74         campaign_index_var = strzone(strcat("g_campaign", campaign_name, "_index"));\r
  75         CampaignFile_Load(campaign_level, 2);\r
  76         if(campaign_entries < 1)\r
  77         {\r
  78                 CampaignBailout("unknown map");\r
  79                 return;\r
  80         }\r
  81 \r
  82         baseskill = cvar("g_campaign_skill");\r
  83         baseskill = baseskill + campaign_botskill[0];\r
  84         if(baseskill < 0)\r
  85                 baseskill = 0;\r
  86 \r
  87         cvar_set("sv_public", "0");\r
  88         cvar_set("pausable", "1");\r
  89 \r
  90         cvar_campaignwrapper_list = strzone(strcat("; ", campaign_mutators[0], "; "));\r
  91 \r
  92         cvar = cvar_campaignwrapper;\r
  93         cvar_string = cvar_string_campaignwrapper;\r
  94         cvar_set = cvar_set_campaignwrapper;\r
  95 \r
  96         cvar_set("g_campaign", "1");\r
  97         cvar_set("g_dm", "0");\r
  98         cvar_set("skill", ftos(baseskill));\r
  99         cvar_set("bot_number", ftos(campaign_bots[0]));\r
 100         MapInfo_SwitchGameType(MapInfo_Type_FromString(campaign_gametype[0]));\r
 101 \r
 102         // copy sv_gravity cvar, as the engine needs it too (sorry, this will mess\r
 103         // with the menu a little still...)\r
 104         cvar_set_normal("sv_gravity", cvar_string("sv_gravity"));\r
 105 \r
 106         if(Campaign_Invalid())\r
 107                 return;\r
 108 \r
 109         title = campaign_shortdesc[0];\r
 110         title = strzone(strcat("Level ", ftos(campaign_level + 1), ": ", title));\r
 111         campaign_message = strzone(strcat("\n\n\n\n\n\n\n\n\n\n^1\n", title, "\n^3\n", campaign_longdesc[0], "\n\n^1press jump to enter the game"));\r
 112         strunzone(title);\r
 113 }\r
 114 \r
 115 string GetMapname();\r
 116 void CampaignPostInit()\r
 117 {\r
 118         // now some sanity checks\r
 119         if(Campaign_Invalid())\r
 120                 return;\r
 121         cvar_set("fraglimit", ftos(campaign_fraglimit[0]));\r
 122         cvar_set("timelimit", "0");\r
 123         cvar_set_normal("fraglimit", ftos(campaign_fraglimit[0]));\r
 124         cvar_set_normal("timelimit", "0");\r
 125 }\r
 126 \r
 127 void CampaignSaveCvar(string cvarname, float value)\r
 128 {\r
 129         float fh;\r
 130         float len;\r
 131         string contents;\r
 132         string l;\r
 133 \r
 134         registercvar(cvarname, ftos(value));\r
 135         cvar_set_normal(cvarname, ftos(value));\r
 136         // note: cvarname must be remembered\r
 137 \r
 138         fh = fopen("campaign.cfg", FILE_READ);\r
 139         contents = "";\r
 140         if(fh >= 0)\r
 141         {\r
 142                 while((l = fgets(fh)))\r
 143                 {\r
 144                         len = tokenize_console(l);\r
 145                         if(len != 3)\r
 146                                 continue;\r
 147                         if(argv(0) != "set")\r
 148                                 continue;\r
 149                         if(argv(1) == cvarname)\r
 150                                 continue;\r
 151                         contents = strcat(contents, "set ", argv(1), " ", argv(2), "\n");\r
 152                 }\r
 153                 fclose(fh);\r
 154         }\r
 155         contents = strcat(contents, "set ", cvarname,  " ", ftos(value), "\n");\r
 156         fh = fopen("campaign.cfg", FILE_WRITE);\r
 157         if(fh >= 0)\r
 158         {\r
 159                 fputs(fh, contents);\r
 160         }\r
 161         else\r
 162         {\r
 163                 error("Cannot write to campaign file");\r
 164         }\r
 165 }\r
 166 \r
 167 void CampaignPreIntermission()\r
 168 {\r
 169         entity head;\r
 170         float won;\r
 171         float lost;\r
 172         local string savevar;\r
 173 \r
 174         won = 0;\r
 175 \r
 176         head = findchain(classname, "player");\r
 177         while(head)\r
 178         {\r
 179                 if(clienttype(head) == CLIENTTYPE_REAL)\r
 180                 {\r
 181                         if(head.winning)\r
 182                                 won = won + 1;\r
 183                         else\r
 184                                 lost = lost + 1;\r
 185                 }\r
 186                 head = head.chain;\r
 187         }\r
 188 \r
 189         if(won == 1 && lost == 0 && checkrules_equality == 0 && cheatcount_total == 0)\r
 190         {\r
 191                 campaign_won = 1;\r
 192                 bprint("The current level has been WON.\n");\r
 193                 // sound!\r
 194         }\r
 195         else\r
 196         {\r
 197                 campaign_won = 0;\r
 198                 bprint("The current level has been LOST.\n");\r
 199                 // sound!\r
 200         }\r
 201 \r
 202         if(campaign_won)\r
 203         {\r
 204                 if(campaign_entries < 2)\r
 205                 {\r
 206                         // I have won\r
 207                         savevar = strcat("g_campaign", campaign_name, "_won");\r
 208                         CampaignSaveCvar(savevar, 1);\r
 209                         // advance level (for menu to show it right)\r
 210                         CampaignSaveCvar(campaign_index_var, campaign_level + 1);\r
 211                 }\r
 212                 else if(campaign_level == cvar_normal(campaign_index_var))\r
 213                 {\r
 214                         // advance level\r
 215                         CampaignSaveCvar(campaign_index_var, campaign_level + 1);\r
 216                 }\r
 217         }\r
 218 }\r
 219 \r
 220 void CampaignPostIntermission()\r
 221 {\r
 222         // NOTE: campaign_won is 0 or 1, that is, points to the next level\r
 223 \r
 224         if(campaign_won && campaign_entries < 2)\r
 225         {\r
 226                 // last map won!\r
 227                 localcmd("togglemenu 1\n");\r
 228                 CampaignFile_Unload();\r
 229                 return;\r
 230         }\r
 231 \r
 232         CampaignSetup(campaign_won);\r
 233         CampaignFile_Unload();\r
 234         strunzone(campaign_message);\r
 235         strunzone(campaign_index_var);\r
 236         strunzone(campaign_name);\r
 237         campaign_name = "";\r
 238 }\r
 239 \r
 240 \r
 241 \r
 242 void CampaignLevelWarp(float n)\r
 243 {\r
 244         CampaignFile_Unload();\r
 245         CampaignFile_Load(n, 1);\r
 246         if(campaign_entries)\r
 247                 CampaignSetup(0);\r
 248         else\r
 249                 error("Sorry, cheater. You are NOT WELCOME.");\r
 250         CampaignFile_Unload();\r
 251 }\r