data/qcsrc/server/gamec/g_world.c

   1
   2 void worldspawn (void)
   3 {
   4
   5         // Precache all player models
   6         // Workaround for "invisible players"
   7         precache_model("models/player/carni.zym");
   8         precache_model("models/player/crash.zym");
   9         precache_model("models/player/grunt.zym");
  10         precache_model("models/player/headhunter.zym");
  11         precache_model("models/player/insurrectionist.zym");
  12         precache_model("models/player/jeandarc.zym");
  13         precache_model("models/player/lurk.zym");
  14         precache_model("models/player/lycanthrope.zym");
  15         precache_model("models/player/marine.zym");
  16         precache_model("models/player/nexus.zym");
  17         precache_model("models/player/pyria.zym");
  18         precache_model("models/player/shock.zym");
  19         precache_model("models/player/skadi.zym");
  20         precache_model("models/player/specop.zym");
  21         precache_model("models/player/visitant.zym");
  22
  23         //precache_model ("progs/beam.mdl");
  24         precache_model ("models/bullet.mdl");
  25         precache_model ("models/casing_bronze.mdl");
  26         precache_model ("models/casing_shell.mdl");
  27         precache_model ("models/casing_steel.mdl");
  28         precache_model ("models/ebomb.mdl");
  29         precache_model ("models/elaser.mdl");
  30         precache_model ("models/flash.md3");
  31         precache_model ("models/gibs/bloodyskull.md3");
  32         precache_model ("models/gibs/chunk.mdl");
  33         precache_model ("models/gibs/eye.md3");
  34         precache_model ("models/gibs/gib1.md3");
  35         //precache_model ("models/gibs/gib2.md3");
  36         //precache_model ("models/gibs/gib3.md3");
  37         //precache_model ("models/gibs/gib4.md3");
  38         precache_model ("models/gibs/gib5.md3");
  39         //precache_model ("models/gibs/gib6.md3");
  40         precache_model ("models/gibs/gib1.mdl");
  41         precache_model ("models/gibs/gib2.mdl");
  42         precache_model ("models/gibs/gib3.mdl");
  43         precache_model ("models/grenademodel.md3");
  44         precache_model ("models/hagarmissile.mdl");
  45         precache_model ("models/items/a_bullets.mdl");
  46         precache_model ("models/items/a_cells.md3");
  47         precache_model ("models/items/a_rockets.md3");
  48         precache_model ("models/items/a_shells.md3");
  49         precache_model ("models/items/g_a1.md3");
  50         precache_model ("models/items/g_a25.md3");
  51         precache_model ("models/items/g_h1.md3");
  52         precache_model ("models/items/g_h25.md3");
  53         precache_model ("models/items/g_h100.md3");
  54         precache_model ("models/items/g_invincible.md3");
  55         precache_model ("models/items/g_strength.md3");
  56         precache_model ("models/laser.mdl");
  57         precache_model ("models/misc/chatbubble.spr");
  58         precache_model ("models/misc/teambubble.spr");
  59         precache_model ("models/nexflash.md3");
  60         precache_model ("models/plasma.mdl");
  61         precache_model ("models/plasmatrail.mdl");
  62         precache_model ("models/rocket.md3");
  63         precache_model ("models/sprites/grenexpl.spr");
  64         precache_model ("models/sprites/hagar.spr");
  65         precache_model ("models/sprites/muzzleflash.spr32");
  66         precache_model ("models/sprites/electrocombo.spr32");
  67         //precache_model ("models/sprites/plasmahitwall.spr32");
  68         //precache_model ("models/sprites/plasmashot.spr32");
  69         precache_model ("models/sprites/rockexpl.spr");
  70         precache_model ("models/tracer.mdl");
  71         precache_model ("models/uziflash.md3");
  72         precache_model ("models/weapons/g_crylink.md3");
  73         precache_model ("models/weapons/g_electro.md3");
  74         precache_model ("models/weapons/g_gl.md3");
  75         precache_model ("models/weapons/g_hagar.md3");
  76         precache_model ("models/weapons/g_nex.md3");
  77         precache_model ("models/weapons/g_rl.md3");
  78         precache_model ("models/weapons/g_shotgun.md3");
  79         precache_model ("models/weapons/g_uzi.md3");
  80         precache_model ("models/weapons/v_crylink.md3");
  81         precache_model ("models/weapons/v_electro.md3");
  82         precache_model ("models/weapons/v_gl.md3");
  83         precache_model ("models/weapons/v_hagar.md3");
  84         precache_model ("models/weapons/v_laser.md3");
  85         precache_model ("models/weapons/v_nex.md3");
  86         precache_model ("models/weapons/v_rl.md3");
  87         precache_model ("models/weapons/v_shotgun.md3");
  88         precache_model ("models/weapons/v_uzi.md3");
  89         precache_model ("models/weapons/w_crylink.zym");
  90         precache_model ("models/weapons/w_electro.zym");
  91         precache_model ("models/weapons/w_gl.zym");
  92         precache_model ("models/weapons/w_hagar.zym");
  93         precache_model ("models/weapons/w_laser.zym");
  94         precache_model ("models/weapons/w_nex.zym");
  95         precache_model ("models/weapons/w_rl.zym");
  96         precache_model ("models/weapons/w_shotgun.zym");
  97         precache_model ("models/weapons/w_uzi.zym");
  98
  99         // laser for laser-guided weapons
 100         precache_model ("models/laser_dot.mdl");
 101
 102         precache_sound ("misc/armor1.wav");
 103         precache_sound ("misc/armor25.wav");
 104         precache_sound ("misc/armorimpact.wav");
 105         precache_sound ("misc/bodyimpact1.wav");
 106         precache_sound ("misc/bodyimpact2.wav");
 107         precache_sound ("misc/gib.wav");
 108         precache_sound ("misc/gib_splat01.wav");
 109         precache_sound ("misc/gib_splat02.wav");
 110         precache_sound ("misc/gib_splat03.wav");
 111         precache_sound ("misc/gib_splat04.wav");
 112         //precache_sound ("misc/h2ohit.wav");
 113         precache_sound ("misc/hit.wav");
 114         precache_sound ("misc/footstep01.wav");
 115         precache_sound ("misc/footstep02.wav");
 116         precache_sound ("misc/footstep03.wav");
 117         precache_sound ("misc/footstep04.wav");
 118         precache_sound ("misc/footstep05.wav");
 119         precache_sound ("misc/footstep06.wav");
 120         precache_sound ("misc/hitground1.ogg");
 121         precache_sound ("misc/hitground2.ogg");
 122         precache_sound ("misc/hitground3.ogg");
 123         precache_sound ("misc/hitground4.ogg");
 124         precache_sound ("misc/itempickup.ogg");
 125         precache_sound ("misc/itemrespawn.ogg");
 126         precache_sound ("misc/jumppad.ogg");
 127         precache_sound ("misc/mediumhealth.ogg");
 128         precache_sound ("misc/megahealth.ogg");
 129         precache_sound ("misc/minihealth.ogg");
 130         precache_sound ("misc/powerup.ogg");
 131         precache_sound ("misc/powerup_shield.ogg");
 132         precache_sound ("misc/talk.wav");
 133         precache_sound ("misc/teleport.ogg");
 134         precache_sound ("plats/medplat1.wav");
 135         precache_sound ("plats/medplat2.wav");
 136         precache_sound ("player/lava.wav");
 137         precache_sound ("player/slime.wav");
 138         precache_sound ("weapons/crylink_fire.ogg");
 139         precache_sound ("weapons/electro_bounce.ogg");
 140         precache_sound ("weapons/electro_fire.ogg");
 141         precache_sound ("weapons/electro_fire2.ogg");
 142         precache_sound ("weapons/electro_fly.wav");
 143         precache_sound ("weapons/electro_impact.ogg");
 144         precache_sound ("weapons/electro_impact_combo.ogg");
 145         precache_sound ("weapons/grenade_bounce.ogg");
 146         precache_sound ("weapons/grenade_fire.ogg");
 147         precache_sound ("weapons/grenade_impact.ogg");
 148         precache_sound ("weapons/hagar_fire.ogg");
 149         precache_sound ("weapons/hagexp1.ogg");
 150         precache_sound ("weapons/hagexp2.ogg");
 151         precache_sound ("weapons/hagexp3.ogg");
 152         precache_sound ("weapons/hook_fire.ogg");
 153         precache_sound ("weapons/hook_impact.ogg");
 154         precache_sound ("weapons/lasergun_fire.ogg");
 155         precache_sound ("weapons/laserimpact.ogg");
 156         precache_sound ("weapons/nexfire.ogg");
 157         precache_sound ("weapons/neximpact.ogg");
 158         precache_sound ("weapons/ric1.ogg");
 159         precache_sound ("weapons/ric2.ogg");
 160         precache_sound ("weapons/ric3.ogg");
 161         precache_sound ("weapons/rocket_fire.ogg");
 162         precache_sound ("weapons/rocket_fly.wav");
 163         precache_sound ("weapons/rocket_impact.ogg");
 164         precache_sound ("weapons/shotgun_fire.ogg");
 165         precache_sound ("weapons/tink1.ogg");
 166         precache_sound ("weapons/uzi_fire.ogg");
 167         precache_sound ("weapons/weapon_switch.ogg");
 168         precache_sound ("weapons/weaponpickup.ogg");
 169         precache_sound ("weapons/strength_fire.ogg");
 170
 171         //precache_sound ("announce/male/kill10.ogg");
 172         //precache_sound ("announce/male/kill15.ogg");
 173         //precache_sound ("announce/male/kill20.ogg");
 174         //precache_sound ("announce/male/kill25.ogg");
 175         //precache_sound ("announce/male/kill3.ogg");
 176         //precache_sound ("announce/male/kill30.ogg");
 177         //precache_sound ("announce/male/kill4.ogg");
 178         //precache_sound ("announce/male/kill5.ogg");
 179         //precache_sound ("announce/male/kill6.ogg");
 180         //precache_sound ("announce/male/mapkill1.ogg");
 181         //precache_sound ("announce/robotic/last_second_save.ogg");
 182         //precache_sound ("announce/robotic/narrowly_averted.ogg");
 183         //precache_sound ("minstagib/mockery.ogg");
 184
 185         // announcer sounds - male
 186         precache_sound ("announcer/male/03kills.ogg");
 187         precache_sound ("announcer/male/05kills.ogg");
 188         precache_sound ("announcer/male/10kills.ogg");
 189         precache_sound ("announcer/male/15kills.ogg");
 190         precache_sound ("announcer/male/20kills.ogg");
 191         precache_sound ("announcer/male/25kills.ogg");
 192         precache_sound ("announcer/male/30kills.ogg");
 193         precache_sound ("announcer/male/botlike.ogg");
 194         precache_sound ("announcer/male/electrobitch.ogg");
 195         precache_sound ("announcer/male/welcome.ogg");
 196         precache_sound ("announcer/male/yoda.ogg");
 197
 198         // announcer sounds - robotic
 199         precache_sound ("announcer/robotic/1fragleft.ogg");
 200         precache_sound ("announcer/robotic/1minuteremains.ogg");
 201         precache_sound ("announcer/robotic/2fragsleft.ogg");
 202         precache_sound ("announcer/robotic/3fragsleft.ogg");
 203         precache_sound ("announcer/robotic/lastsecond.ogg");
 204         precache_sound ("announcer/robotic/narrowly.ogg");
 205
 206         // plays music for the level if there is any
 207         if (self.noise)
 208         {
 209                 precache_sound (self.noise);
 210                 ambientsound ('0 0 0', self.noise, 1.00, ATTN_NONE);
 211         }
 212
 213                 // 0 normal
 214         lightstyle(0, "m");
 215
 216         // 1 FLICKER (first variety)
 217         lightstyle(1, "mmnmmommommnonmmonqnmmo");
 218
 219         // 2 SLOW STRONG PULSE
 220         lightstyle(2, "abcdefghijklmnopqrstuvwxyzyxwvutsrqponmlkjihgfedcba");
 221
 222         // 3 CANDLE (first variety)
 223         lightstyle(3, "mmmmmaaaaammmmmaaaaaabcdefgabcdefg");
 224
 225         // 4 FAST STROBE
 226         lightstyle(4, "mamamamamama");
 227
 228         // 5 GENTLE PULSE 1
 229         lightstyle(5,"jklmnopqrstuvwxyzyxwvutsrqponmlkj");
 230
 231         // 6 FLICKER (second variety)
 232         lightstyle(6, "nmonqnmomnmomomno");
 233
 234         // 7 CANDLE (second variety)
 235         lightstyle(7, "mmmaaaabcdefgmmmmaaaammmaamm");
 236
 237         // 8 CANDLE (third variety)
 238         lightstyle(8, "mmmaaammmaaammmabcdefaaaammmmabcdefmmmaaaa");
 239
 240         // 9 SLOW STROBE (fourth variety)
 241         lightstyle(9, "aaaaaaaazzzzzzzz");
 242
 243         // 10 FLUORESCENT FLICKER
 244         lightstyle(10, "mmamammmmammamamaaamammma");
 245
 246         // 11 SLOW PULSE NOT FADE TO BLACK
 247         lightstyle(11, "abcdefghijklmnopqrrqponmlkjihgfedcba");
 248
 249         // styles 32-62 are assigned by the light program for switchable lights
 250
 251         // 63 testing
 252         lightstyle(63, "a");
 253
 254         player_count = 0;
 255         lms_dead_count = 0;
 256         lms_lowest_lives = 0;
 257
 258         InitGameplayMode();
 259         //if (cvar("g_domination"))
 260         //      dom_init();
 261
 262         // Urrebot setting
 263         urrebots_navopt = cvar("urrebots_navopt");
 264 }
 265
 266 void light (void)
 267 {
 268         makestatic (self);
 269 }
 270
 271 float( string pFilename ) TryFile =
 272 {
 273         local float lHandle;
 274         dprint("TryFile(\"", pFilename, "\")\n");
 275         lHandle = fopen( pFilename, FILE_READ );
 276         if( lHandle != -1 ) {
 277                 fclose( lHandle );
 278                 return TRUE;
 279         } else {
 280                 return FALSE;
 281         }
 282 };
 283
 284 void() GotoNextMap =
 285 {
 286         //local string nextmap;
 287         //local float n, nummaps;
 288         //local string s;
 289         string exit_cfg;
 290         if (alreadychangedlevel)
 291                 return;
 292         alreadychangedlevel = TRUE;
 293         if (cvar("samelevel")) // if samelevel is set, stay on same level
 294         {
 295                 // this does not work because it tries to exec maps/nexdm01.mapcfg (which doesn't exist, it should be trying maps/dm_nexdm01.mapcfg for example)
 296                 //localcmd(strcat("exec \"maps/", mapname, ".mapcfg\"\n"));
 297                 // so instead just restart the current map using the restart command (DOES NOT WORK PROPERLY WITH exit_cfg STUFF)
 298                 localcmd("restart\n");
 299                 //changelevel (mapname);
 300                 return;
 301         }
 302
 303         // if an exit cfg is defined by exiting map, exec it.
 304         exit_cfg = cvar_string("exit_cfg");
 305         if(exit_cfg != "")
 306                 localcmd(strcat("exec \"", exit_cfg, "\"\n"));
 307
 308         ResetGameCvars();
 309
 310
 311         if (cvar("lastlevel"))
 312         {
 313                 localcmd(strcat("set lastlevel 0\n"));
 314                 localcmd(strcat("togglemenu\n"));
 315         }
 316         else
 317         {
 318                 // method 0
 319                 local float lCurrent;
 320                 local float lSize;
 321                 local float lOldCurrent;
 322                 local float pass;
 323
 324                 pass = 0;
 325                 while (pass < 2)
 326                 {
 327                         pass = pass + 1;
 328                         local string temp;
 329                         temp = cvar_string( "g_maplist" );
 330                         dprint("g_maplist is ", temp, "\n");
 331                         lSize = tokenize( temp );
 332                         lCurrent = cvar( "g_maplist_index" );
 333                         lOldCurrent = lCurrent;
 334                         dprint(ftos(lOldCurrent), " / ", ftos(lSize), " (start)\n");
 335                         while( 1 ) {
 336                                 local string lFilename;
 337
 338                                 lCurrent = lCurrent + 1;
 339                                 dprint(ftos(lCurrent), " / ", ftos(lSize), "\n");
 340                                 if( lCurrent >= lSize ) {
 341                                         lCurrent = 0;
 342                                 }
 343                                 if( lOldCurrent == lCurrent ) {
 344                                         // we couldn't find a valid map at all
 345                                         if (pass == 1)
 346                                         {
 347                                                 bprint( "Maplist is bad/messed up. Not one good mapcfg can be found in it!  Resetting it to default map list.\n" );
 348                                                 cvar_set("g_maplist", cvar_string("g_maplist_defaultlist"));
 349                                                 // let the loop restart with the default list now
 350                                         }
 351                                         else
 352                                         {
 353                                                 bprint( "Both g_maplist and g_maplist_defaultlist are messed up!  complain to developers!\n" );
 354                                                 localcmd( "disconnect\n" );
 355                                         }
 356                                         break;
 357                                 }
 358
 359                                 cvar_set( "g_maplist_index", ftos( lCurrent ) );
 360
 361                                 lFilename = strcat( "maps/", argv( lCurrent ), ".mapcfg" );
 362                                 if( TryFile( lFilename ) ) {
 363                                         localcmd(strcat("exec \"", lFilename ,"\"\n"));
 364                                         pass = 2; // exit the outer loop
 365                                         break;
 366                                 } else {
 367                                         dprint( "Couldn't find '", lFilename, "'..\n" );
 368                                 }
 369                                 //changelevel( argv( lCurrent ) );
 370                         }
 371                 }
 372
 373                 /*
 374                 // method 1
 375
 376                 //local entity pos;
 377                 local float fh;
 378                 local string line;
 379
 380                 // restart current map if no cycle is found
 381                 nextmap = strzone(mapname);
 382                 fh = fopen("maplist.cfg", FILE_READ);
 383                 if (fh >= 0)
 384                 {
 385                         while (1)
 386                         {
 387                                 line = fgets(fh);
 388                                 if (nextmap == mapname)
 389                                 {
 390                                         strunzone(nextmap);
 391                                         nextmap = strzone(line);
 392                                 }
 393                                 if (!line)
 394                                         break;
 395                                 if (line == mapname)
 396                                 {
 397                                         line = fgets(fh);
 398                                         if (!line)
 399                                                 break;
 400                                         strunzone(nextmap);
 401                                         nextmap = strzone(line);
 402                                         break;
 403                                 }
 404                         }
 405                         fclose(fh);
 406                 }
 407                 changelevel (nextmap);
 408                 strunzone(nextmap);*/
 409
 410                 // method 3
 411                 /*
 412                 s = cvar_string("g_maplist");
 413                 nummaps = tokenize(s);
 414                 // if no map list, restart current one
 415                 nextmap = mapname;
 416                 if (nummaps >= 1)
 417                 {
 418                         n = 0;
 419                         while (n < nummaps)
 420                         {
 421                                 if (argv(n) == mapname)
 422                                         break;
 423                                 n = n + 1;
 424                         }
 425                         n = n + 1;
 426                         if (n >= nummaps)
 427                                 n = 0;
 428                         nextmap = argv(n);
 429                 }
 430                 changelevel (nextmap);
 431                 */
 432         }
 433 };
 434
 435
 436 /*
 437 ============
 438 IntermissionThink
 439
 440 When the player presses attack or jump, change to the next level
 441 ============
 442 */
 443 void() IntermissionThink =
 444 {
 445         if (time < intermission_exittime)
 446                 return;
 447
 448         if (time < intermission_exittime + 10 && !self.button0 && !self.button1 && !self.button2 && !self.button3)
 449                 return;
 450
 451         GotoNextMap ();
 452 };
 453
 454 /*
 455 ============
 456 FindIntermission
 457
 458 Returns the entity to view from
 459 ============
 460 */
 461 /*
 462 entity() FindIntermission =
 463 {
 464         local   entity spot;
 465         local   float cyc;
 466
 467 // look for info_intermission first
 468         spot = find (world, classname, "info_intermission");
 469         if (spot)
 470         {       // pick a random one
 471                 cyc = random() * 4;
 472                 while (cyc > 1)
 473                 {
 474                         spot = find (spot, classname, "info_intermission");
 475                         if (!spot)
 476                                 spot = find (spot, classname, "info_intermission");
 477                         cyc = cyc - 1;
 478                 }
 479                 return spot;
 480         }
 481
 482 // then look for the start position
 483         spot = find (world, classname, "info_player_start");
 484         if (spot)
 485                 return spot;
 486
 487 // testinfo_player_start is only found in regioned levels
 488         spot = find (world, classname, "testplayerstart");
 489         if (spot)
 490                 return spot;
 491
 492 // then look for the start position
 493         spot = find (world, classname, "info_player_deathmatch");
 494         if (spot)
 495                 return spot;
 496
 497         //objerror ("FindIntermission: no spot");
 498         return world;
 499 };
 500 */
 501
 502 /*
 503 ===============================================================================
 504
 505 RULES
 506
 507 ===============================================================================
 508 */
 509
 510 void() DumpStats =
 511 {
 512         local float file, now;
 513         local string gametype, s;
 514
 515         if(cvar("_printstats"))
 516                 cvar_set("_printstats", "0");
 517         else if(!gameover)
 518                 return;
 519
 520         now = time;
 521
 522         if (cvar("g_tdm"))
 523                 gametype = "tdm";
 524         else if (cvar("g_ctf"))
 525                 gametype = "ctf";
 526         else if (cvar("g_domination"))
 527                 gametype = "dom";
 528         else if (cvar("g_runematch"))
 529                 gametype = "rune";
 530         else
 531                 gametype = "dm";
 532
 533         if(gameover)
 534                 s = ":scores:";
 535         else
 536                 s = ":status:";
 537
 538         s = strcat(s, gametype, "_", mapname, ":", ftos(rint(now)), "\n");
 539
 540         if(cvar("sv_logscores_console"))
 541                 localcmd(strcat("echo ", s));
 542         if(cvar("sv_logscores_file"))
 543         {
 544                 file = fopen(cvar_string("sv_logscores_filename"), FILE_APPEND);
 545                 fputs(file, s);
 546         }
 547
 548         other = findchain(classname, "player");
 549         while (other)
 550         {
 551                 if ((clienttype(other) == CLIENTTYPE_REAL) || (clienttype(other) == CLIENTTYPE_BOT && cvar("sv_logscores_bots")))
 552                 {
 553                         s = strcat(":player:", ftos(other.frags), ":");
 554                         s = strcat(s, ftos(other.deaths), ":");
 555                         s = strcat(s, ftos(rint(now - other.jointime)), ":");
 556                         s = strcat(s, ftos(other.team), ":", other.netname, "\n");
 557
 558                         if(cvar("sv_logscores_console"))
 559                                 localcmd(strcat("echo ", s));
 560                         if(cvar("sv_logscores_file"))
 561                                 fputs(file, s);
 562                 }
 563                 other = other.chain;
 564         }
 565
 566         if(cvar("sv_logscores_console"))
 567                 localcmd("echo :end\n");
 568         if(cvar("sv_logscores_file"))
 569         {
 570                 fputs(file, ":end\n");
 571                 fclose(file);
 572         }
 573 }
 574
 575
 576 /*
 577 go to the next level for deathmatch
 578 only called if a time or frag limit has expired
 579 */
 580 void() NextLevel =
 581 {
 582         gameover = TRUE;
 583
 584         intermission_running = 1;
 585
 586 // enforce a wait time before allowing changelevel
 587         intermission_exittime = time + cvar("sv_mapchange_delay");
 588
 589         WriteByte (MSG_ALL, SVC_CDTRACK);
 590         WriteByte (MSG_ALL, 3);
 591         WriteByte (MSG_ALL, 3);
 592
 593         //pos = FindIntermission ();
 594
 595         VoteReset();
 596
 597         DumpStats();
 598
 599         other = findchainflags(flags, FL_CLIENT);
 600         while (other != world)
 601         {
 602                 //other.nextthink = time + 0.5;
 603                 other.takedamage = DAMAGE_NO;
 604                 other.solid = SOLID_NOT;
 605                 other.movetype = MOVETYPE_NONE;
 606                 other.angles = other.v_angle;
 607                 other.angles_x = other.angles_x * -1;
 608
 609                 self = other;
 610                 weapon_action(other.weapon, WR_IDLE);
 611
 612                 /*
 613                 if (pos != world);
 614                 {
 615                         other.modelindex = 0;
 616                         other.weaponentity = world; // remove weapon model
 617                         other.view_ofs = '0 0 0';
 618                         other.angles = other.v_angle = pos.mangle;
 619                         if (!other.angles)
 620                         {
 621                                 other.angles = other.v_angle = pos.angles;
 622                                 other.v_angle_x = other.v_angle_x * -1;
 623                         }
 624                         other.fixangle = TRUE;          // turn this way immediately
 625                         setorigin (other, pos.origin);
 626                 }
 627                 */
 628                 other = other.chain;
 629         }
 630
 631         WriteByte (MSG_ALL, SVC_INTERMISSION);
 632 };
 633
 634 /*
 635 ============
 636 CheckRules_Player
 637
 638 Exit deathmatch games upon conditions
 639 ============
 640 */
 641 void() CheckRules_Player =
 642 {
 643         local float fraglimit;
 644
 645         if (gameover)   // someone else quit the game already
 646                 return;
 647
 648         // fixme: don't check players; instead check dom_team and ctf_team entities
 649
 650         fraglimit = cvar("fraglimit");
 651
 652         if(!cvar("g_lms") && !(cvar("g_tdm") || (cvar("teamplay") && cvar("g_runematch"))))
 653         {
 654                 if (fraglimit && self.frags >= fraglimit)
 655                 {
 656                         NextLevel ();
 657                         return;
 658                 }
 659         }
 660 };
 661
 662 float checkrules_oneminutewarning;
 663 float checkrules_leaderfrags;
 664 entity checkrules_leader;
 665 float tdm_max_score, tdm_old_score;
 666
 667 /*
 668 ============
 669 CheckRules_World
 670
 671 Exit deathmatch games upon conditions
 672 ============
 673 */
 674 void() CheckRules_World =
 675 {
 676         local float timelimit;
 677         local float fraglimit;
 678         local float checkrules_oldleaderfrags;
 679         local entity checkrules_oldleader;
 680         local entity head;
 681
 682         VoteThink();
 683
 684         if (intermission_running)
 685         if (time >= intermission_exittime + 60)
 686         {
 687                 GotoNextMap();
 688                 return;
 689         }
 690
 691         if (gameover)   // someone else quit the game already
 692                 return;
 693
 694         DumpStats();
 695
 696         timelimit = cvar("timelimit") * 60;
 697         fraglimit = cvar("fraglimit");
 698
 699         if (timelimit && time >= timelimit)
 700         {
 701                 NextLevel ();
 702                 return;
 703         }
 704
 705         if (!checkrules_oneminutewarning && timelimit && time > timelimit - 60)
 706         {
 707                 checkrules_oneminutewarning = TRUE;
 708                 sound(world, CHAN_AUTO, "announcer/robotic/1minuteremains.ogg", 1, ATTN_NONE);
 709         }
 710
 711         // last man camping winning conditions
 712         if(cvar("g_lms"))
 713         {
 714                 if(lms_dead_count < 0)
 715                         lms_dead_count = 0;
 716
 717                 // goto next map if only one player is alive or
 718                 // if there is only one player as spectator (could happen with g_lms_join_anytime 1)
 719                 if((player_count > 1 && (player_count - lms_dead_count) <= 1) ||
 720                   (player_count == 1 && lms_dead_count == 1))
 721                         NextLevel();
 722                 return;
 723         }
 724
 725         if((cvar("g_tdm") || (cvar("teamplay") && cvar("g_runematch"))) && fraglimit)
 726         {
 727                 team1_score = team2_score = team3_score = team4_score = 0;
 728
 729                 head = findchain(classname, "player");
 730                 while (head)
 731                 {
 732                         if(head.team == COLOR_TEAM1)
 733                                 team1_score += head.frags;
 734                         else if(head.team == COLOR_TEAM2)
 735                                 team2_score += head.frags;
 736                         else if(head.team == COLOR_TEAM3)
 737                                 team3_score += head.frags;
 738                         else if(head.team == COLOR_TEAM4)
 739                                 team4_score += head.frags;
 740                         head = head.chain;
 741                 }
 742
 743                 tdm_old_score = tdm_max_score;
 744                 tdm_max_score = max(team1_score, team2_score, team3_score, team4_score);
 745
 746                 if(tdm_max_score >= fraglimit)
 747                         NextLevel();
 748
 749                 if(!cvar("g_domination") && !cvar("g_runematch"))
 750                 if(tdm_max_score != tdm_old_score)
 751                 {
 752                         if(tdm_max_score == fraglimit - 1)
 753                                 sound(world, CHAN_AUTO, "announcer/robotic/1fragleft.ogg", 1, ATTN_NONE);
 754                         else if(tdm_max_score == fraglimit - 2)
 755                                 sound(world, CHAN_AUTO, "announcer/robotic/2fragsleft.ogg", 1, ATTN_NONE);
 756                         else if(tdm_max_score == fraglimit - 3)
 757                                 sound(world, CHAN_AUTO, "announcer/robotic/3fragsleft.ogg", 1, ATTN_NONE);
 758                 }
 759                 return;
 760         }
 761
 762         checkrules_oldleader = checkrules_leader;
 763         checkrules_oldleaderfrags = checkrules_leaderfrags;
 764         checkrules_leaderfrags = 0;
 765         checkrules_leader = world;
 766         head = findchain(classname, "player");
 767         while (head)
 768         {
 769                 if (checkrules_leaderfrags < head.frags)
 770                 {
 771                         checkrules_leaderfrags = head.frags;
 772                         checkrules_leader = head;
 773                 }
 774                 head = head.chain;
 775         }
 776         if (checkrules_leaderfrags <= 0)
 777         {
 778                 checkrules_leader = world;
 779                 checkrules_leaderfrags = 0;
 780         }
 781         checkrules_leaderfrags = floor(checkrules_leaderfrags);
 782
 783         if (!cvar("g_domination") && !cvar("g_runematch"))
 784         if (checkrules_leaderfrags != checkrules_oldleaderfrags)
 785         {
 786                 if (checkrules_leaderfrags == fraglimit - 1)
 787                         sound(world, CHAN_AUTO, "announcer/robotic/1fragleft.ogg", 1, ATTN_NONE);
 788                 else if (checkrules_leaderfrags == fraglimit - 2)
 789                         sound(world, CHAN_AUTO, "announcer/robotic/2fragsleft.ogg", 1, ATTN_NONE);
 790                 else if (checkrules_leaderfrags == fraglimit - 3)
 791                         sound(world, CHAN_AUTO, "announcer/robotic/3fragsleft.ogg", 1, ATTN_NONE);
 792         }
 793 //      if (checkrules_leader != checkrules_oldleader)// && checkrules_leaderfrags > checkrules_oldleaderfrags)
 794 //              bprint("^1",checkrules_leader.netname, " has taken the lead with ", ftos(checkrules_leaderfrags), " frags\n");
 795 };