data/qcsrc/server/gamec/campaign.c

   1 // campaign cvars:
   2 //   _campaign_index: index of CURRENT map
   3 //   g_campaign_index: index of current LAST map (saved)
   4 //   g_campaign_skill: bot skill offset
   5
   6 float campaign_level;
   7 float campaign_won;
   8
   9 void(string s) CampaignBailout =
  10 {
  11         cvar_set("g_campaign", "0");
  12         bprint(strcat("campaign initialization failed: ", s, "\n"));
  13         //error(strcat("campaign initialization failed: ", s, "\n"));
  14         return;
  15 }
  16
  17 string fstrunzone(string s)
  18 {
  19         string t;
  20         t = strcat(s);
  21         strunzone(s);
  22         return t;
  23 }
  24
  25 // NOTE: s may not be a tempstring here
  26 string Campaign_wordwrap(string s, float l)
  27 {
  28         string t;
  29         string word;
  30
  31         float lleft;
  32         float i;
  33
  34         float startidx;
  35
  36         startidx = 0;
  37
  38         t = strzone("");
  39
  40         lleft = l;
  41         for(i = 0; i <= strlen(s); ++i)
  42         {
  43                 if(i != strlen(s) && substring(s, i, 1) != " ")
  44                         continue;
  45
  46                 word = substring(s, startidx, i - startidx);
  47                 startidx = i + 1;
  48
  49                 if(word == "+++")
  50                 {
  51                         t = fstrunzone(t);
  52                         t = strzone(strcat(t, "\n\n"));
  53                         lleft = l;
  54                 }
  55                 else if(strlen(word) < lleft)
  56                 {
  57                         t = fstrunzone(t);
  58                         if(lleft != l)
  59                         {
  60                                 t = strcat(t, " ");
  61                                 lleft = lleft - 1;
  62                         }
  63                         t = strzone(strcat(t, word));
  64                         lleft = lleft - strlen(word);
  65                 }
  66                 else
  67                 {
  68                         t = fstrunzone(t);
  69                         t = strzone(strcat(t, "\n", word));
  70                         lleft = l - strlen(word);
  71                 }
  72         }
  73         t = fstrunzone(t);
  74         return t;
  75 }
  76
  77 void() CampaignPreInit =
  78 {
  79         float baseskill;
  80         string title;
  81         campaign_level = cvar("_campaign_index");
  82         CampaignFile_Load(campaign_level, 2);
  83         if(campaign_entries < 1)
  84                 return CampaignBailout("unknown map");
  85         cvar_set("bot_number", ftos(campaign_bots[0]));
  86
  87         baseskill = cvar("g_campaign_skill");
  88         baseskill = baseskill + campaign_botskill[0];
  89         if(baseskill < 0)
  90                 baseskill = 0;
  91         cvar_set("skill", ftos(baseskill));
  92
  93         cvar_set("sv_public", "0");
  94         cvar_set("pausable", "1");
  95
  96         title = campaign_shortdesc[0];
  97         campaign_message = strzone(strcat("\n\n\n\n\n\n\n\n\n\n^1\n", title, "\n^3\n", Campaign_wordwrap(campaign_longdesc[0], 50), "\n\n^1press jump to enter the game"));
  98 }
  99
 100 string GetMapname();
 101 void() CampaignPostInit =
 102 {
 103         // now some sanity checks
 104         string thismapname, wantedmapname;
 105         thismapname = GetMapname();
 106         wantedmapname = campaign_gametype[0];
 107         wantedmapname = strcat(wantedmapname, "_", campaign_mapname[0]);
 108         if(wantedmapname != thismapname)
 109                 return CampaignBailout(strcat("wrong map: ", wantedmapname, " != ", thismapname));
 110         cvar_set("fraglimit", ftos(campaign_fraglimit[0]));
 111         cvar_set("timelimit", "0");
 112 }
 113
 114 void() CampaignPreIntermission =
 115 {
 116         entity head;
 117         float won;
 118         float lost;
 119
 120         won = 0;
 121
 122         head = findchain(classname, "player");
 123         while(head)
 124         {
 125                 if(clienttype(head) == CLIENTTYPE_REAL)
 126                 {
 127                         if(head.winning)
 128                                 won = won + 1;
 129                         else
 130                                 lost = lost + 1;
 131                 }
 132                 head = head.chain;
 133         }
 134
 135         if(won == 1 && lost == 0)
 136         {
 137                 campaign_won = 1;
 138                 bprint("The current level has been WON.\n");
 139                 // sound!
 140         }
 141         else
 142         {
 143                 campaign_won = 0;
 144                 bprint("The current level has been LOST.\n");
 145                 // sound!
 146         }
 147
 148         if(campaign_won)
 149         {
 150                 if(campaign_level == cvar("g_campaign_index"))
 151                 {
 152                         // advance level
 153                         localcmd("set g_campaign_index ");
 154                         localcmd(ftos(campaign_level + 1));
 155                         localcmd("\n");
 156                 }
 157                 if(campaign_entries < 2)
 158                 {
 159                         localcmd("set g_campaign_index 0\n");
 160                         localcmd("set g_campaign_won 1\n");
 161                 }
 162         }
 163 }
 164
 165 void() CampaignPostIntermission =
 166 {
 167         // NOTE: campaign_won is 0 or 1, that is, points to the next level
 168
 169         if(campaign_won && campaign_entries < 2)
 170         {
 171                 // last map won!
 172                 localcmd("togglemenu\n");
 173                 CampaignFile_Unload();
 174                 return;
 175         }
 176
 177         CampaignSetup(campaign_won);
 178         CampaignFile_Unload();
 179         strunzone(campaign_message);
 180 }
 181
 182
 183
 184 void(float n) CampaignLevelWarp =
 185 {
 186         if(!cvar("sv_cheats"))
 187                 return;
 188         CampaignFile_Unload();
 189         CampaignFile_Load(n, 1);
 190         if(campaign_entries)
 191                 CampaignSetup(0);
 192         else
 193                 error("Sorry, cheater. You are NOT WELCOME.");
 194         CampaignFile_Unload();
 195 }