fteqw/quakec/fallout2/world.qc

1679 lines
39 KiB
C++
Raw Normal View History

void() InitBodyQue;
void() sci_think;
void() hostage_pain;
void() hostage_think;
void() hostage_die;
void(entity stuff) spawn_zombie;
void() main =
{
dprint ("main function\n");
// these are just commands the the prog compiler to copy these files
precache_file ("progs.dat");
precache_file ("gfx.wad");
precache_file ("quake.rc");
precache_file ("default.cfg");
precache_file ("end1.bin");
precache_file2 ("end2.bin");
precache_file ("demo1.dem");
precache_file ("demo2.dem");
precache_file ("demo3.dem");
//
// these are all of the lumps from the cached.ls files
//
precache_file ("gfx/palette.lmp");
precache_file ("gfx/colormap.lmp");
precache_file2 ("gfx/pop.lmp");
precache_file ("gfx/complete.lmp");
precache_file ("gfx/inter.lmp");
precache_file ("gfx/ranking.lmp");
precache_file ("gfx/vidmodes.lmp");
precache_file ("gfx/finale.lmp");
precache_file ("gfx/conback.lmp");
precache_file ("gfx/qplaque.lmp");
precache_file ("gfx/menudot1.lmp");
precache_file ("gfx/menudot2.lmp");
precache_file ("gfx/menudot3.lmp");
precache_file ("gfx/menudot4.lmp");
precache_file ("gfx/menudot5.lmp");
precache_file ("gfx/menudot6.lmp");
precache_file ("gfx/menuplyr.lmp");
precache_file ("gfx/bigbox.lmp");
precache_file ("gfx/dim_modm.lmp");
precache_file ("gfx/dim_drct.lmp");
precache_file ("gfx/dim_ipx.lmp");
precache_file ("gfx/dim_tcp.lmp");
precache_file ("gfx/dim_mult.lmp");
precache_file ("gfx/mainmenu.lmp");
precache_file ("gfx/box_tl.lmp");
precache_file ("gfx/box_tm.lmp");
precache_file ("gfx/box_tr.lmp");
precache_file ("gfx/box_ml.lmp");
precache_file ("gfx/box_mm.lmp");
precache_file ("gfx/box_mm2.lmp");
precache_file ("gfx/box_mr.lmp");
precache_file ("gfx/box_bl.lmp");
precache_file ("gfx/box_bm.lmp");
precache_file ("gfx/box_br.lmp");
precache_file ("gfx/sp_menu.lmp");
precache_file ("gfx/ttl_sgl.lmp");
precache_file ("gfx/ttl_main.lmp");
precache_file ("gfx/ttl_cstm.lmp");
precache_file ("gfx/mp_menu.lmp");
precache_file ("gfx/netmen1.lmp");
precache_file ("gfx/netmen2.lmp");
precache_file ("gfx/netmen3.lmp");
precache_file ("gfx/netmen4.lmp");
precache_file ("gfx/netmen5.lmp");
precache_file ("gfx/sell.lmp");
precache_file ("gfx/help0.lmp");
precache_file ("gfx/help1.lmp");
precache_file ("gfx/help2.lmp");
precache_file ("gfx/help3.lmp");
precache_file ("gfx/help4.lmp");
precache_file ("gfx/help5.lmp");
precache_file ("gfx/pause.lmp");
precache_file ("gfx/loading.lmp");
precache_file ("gfx/p_option.lmp");
precache_file ("gfx/p_load.lmp");
precache_file ("gfx/p_save.lmp");
precache_file ("gfx/p_multi.lmp");
// sounds loaded by C code
precache_sound ("misc/menu1.wav");
precache_sound ("misc/menu2.wav");
precache_sound ("misc/menu3.wav");
precache_sound ("ambience/water1.wav");
precache_sound ("ambience/wind2.wav");
// shareware
precache_file ("maps/start.bsp");
precache_file ("maps/e1m1.bsp");
precache_file ("maps/e1m2.bsp");
precache_file ("maps/e1m3.bsp");
precache_file ("maps/e1m4.bsp");
precache_file ("maps/e1m5.bsp");
precache_file ("maps/e1m6.bsp");
precache_file ("maps/e1m7.bsp");
precache_file ("maps/e1m8.bsp");
// registered
precache_file2 ("gfx/pop.lmp");
precache_file2 ("maps/e2m1.bsp");
precache_file2 ("maps/e2m2.bsp");
precache_file2 ("maps/e2m3.bsp");
precache_file2 ("maps/e2m4.bsp");
precache_file2 ("maps/e2m5.bsp");
precache_file2 ("maps/e2m6.bsp");
precache_file2 ("maps/e2m7.bsp");
precache_file2 ("maps/e3m1.bsp");
precache_file2 ("maps/e3m2.bsp");
precache_file2 ("maps/e3m3.bsp");
precache_file2 ("maps/e3m4.bsp");
precache_file2 ("maps/e3m5.bsp");
precache_file2 ("maps/e3m6.bsp");
precache_file2 ("maps/e3m7.bsp");
precache_file2 ("maps/e4m1.bsp");
precache_file2 ("maps/e4m2.bsp");
precache_file2 ("maps/e4m3.bsp");
precache_file2 ("maps/e4m4.bsp");
precache_file2 ("maps/e4m5.bsp");
precache_file2 ("maps/e4m6.bsp");
precache_file2 ("maps/e4m7.bsp");
precache_file2 ("maps/e4m8.bsp");
precache_file2 ("maps/end.bsp");
precache_file2 ("maps/dm1.bsp");
precache_file2 ("maps/dm2.bsp");
precache_file2 ("maps/dm3.bsp");
precache_file2 ("maps/dm4.bsp");
precache_file2 ("maps/dm5.bsp");
precache_file2 ("maps/dm6.bsp");
};
void () ResetHostages =
{
local entity te;
local entity ze;
local entity ge;
te = find (world, classname, "hostage");
while (te)
{
te.cnt = MULTICAST_ALL;
te.rescued = MULTICAST_ALL;
te.deathtype = "";
setorigin (te, te.home);
traceline (te.origin, (te.origin - (v_up * IT_NAILS)), FALSE, te);
setorigin (te, (trace_endpos + '0 0 24'));
te.movetype = MOVETYPE_STEP;
te.velocity = VEC_ORIGIN;
te.touch = SUB_Null;
te.classname = "hostage";
te.takedamage = DAMAGE_AIM;
setsize (te, VEC_HULL_MIN, VEC_HULL_MAX);
te.health = 70;
te.think = hostage_think;
te.nextthink = (time + WEAPON_SHOTGUN);
te.solid = SOLID_BBOX;
te.th_die = hostage_die;
te.th_pain = hostage_pain;
te.angles_y = floor ((random () * 360));
te.netname = "citizen";
te.angles_z = MULTICAST_ALL;
te.angles_x = MULTICAST_ALL;
te = find (te, classname, "hostage");
}
te = find (world, classname, "scientist");
while (te)
{
te.frame = 1;
te.movetype = MOVETYPE_STEP;
te.velocity = VEC_ORIGIN;
te.touch = SUB_Null;
te.classname = "scientist";
te.takedamage = DAMAGE_AIM;
setsize (te, VEC_HULL_MIN, VEC_HULL_MAX);
setmodel (te, "progs/hosguy.mdl");
te.health = 70;
te.think = hostage_think;
te.nextthink = (time + 3);
te.team = 3;
te.solid = SOLID_BBOX;
te.th_die = hostage_die;
te.th_pain = hostage_pain;
te.rescued = MULTICAST_ALL;
te.think = sci_think;
te.nextthink = (time + 1);
te = find (te, classname, "scientist");
}
};
void () ResetGhouls =
{
local entity te;
local entity ze;
ze = find (world, classname, "ighoul");
while (ze)
{
remove (ze);
ze = find (ze, classname, "ighoul");
}
ze = find (world, classname, "ghoul");
while (ze)
{
spawn_zombie (self);
ze = find (ze, classname, "ghoul");
}
};
void (float won) ReplacePlayers =
{
local entity te;
local entity spot;
local float qq;
round_end = 1.9;
te = find (world, classname, "camera");
while (te)
{
setmodel (te, "progs/camera.mdl");
te = find (te, classname, "camera");
}
te = find (world, classname, "player");
while (te)
{
if ((te.team == WEAPON_SHOTGUN))
{
qq = team1win;
}
if ((te.team == WEAPON_ROCKET))
{
qq = team2win;
}
if ((te.team == won))
{
te.ammo_shells = ((te.ammo_shells + TE_LIGHTNING3) + (qq / 1.25));
}
else
{
te.ammo_shells = ((te.ammo_shells + TE_LIGHTNING2) + (qq / WEAPON_ROCKET));
}
te.nextthink = time;
te.think = PutClientInServer;
te.maxspeed = 0;
te = find (te, classname, "player");
}
gtimer = 180;
};
void () ObjectSweep =
{
local entity te;
te = find (world, classname, "doggy");
while (te)
{
remove (te);
te = find (te, classname, "doggy");
}
te = find (world, classname, "bot");
while (te)
{
remove (te);
te = find (te, classname, "bot");
}
te = find (world, classname, "dropped_weapon");
while (te)
{
remove (te);
te = find (te, classname, "dropped_weapon");
}
te = find (world, classname, "c4");
while (te)
{
remove (te);
te = find (te, classname, "c4");
}
te = find (world, classname, "active_c4");
while (te)
{
remove (te);
te = find (te, classname, "active_c4");
}
};
void () ResetTriggers =
{
local entity te;
te = find (world, classname, "trigger_once");
while (te)
{
te.wait = 0.5;
te = find (te, classname, "trigger_once");
}
te = find (world, classname, "func_button");
while (te)
{
te.wait = 0.5;
te = find (te, classname, "func_button");
}
};
void () RoundReset =
{
round_end = WEAPON_ROCKET;
red_kill = MULTICAST_ALL;
blue_kill = MULTICAST_ALL;
teamthatwon = 0;
team_blue = MULTICAST_ALL;
team_red = MULTICAST_ALL;
bombed = MULTICAST_ALL;
ResetTriggers ();
ResetGhouls ();
ResetHostages ();
ObjectSweep ();
ReplacePlayers (0);
};
void () CountGhouls =
{
local entity te;
zombies = 0;
te = find (world, classname, "ighoul");
while (te)
{
if ((te.health > 0))
{
zombies = (zombies + 1);
}
te = find (te, classname, "ighoul");
}
};
void () CountScientists =
{
local entity te;
hostages = MULTICAST_ALL;
te = find (world, classname, "scientist");
while (te)
{
if ((te.health > MULTICAST_ALL))
{
hostages = (hostages + WEAPON_SHOTGUN);
}
te = find (te, classname, "scientist");
}
};
void () RemoveDeadGhouls =
{
local entity te;
te = find (world, classname, "ighoul");
while (te)
{
if ((te.health < MULTICAST_ALL))
{
te.nextthink = (time + WEAPON_SHOTGUN);
te.think = SUB_Remove;
}
te = find (te, classname, "ighoul");
}
};
void () SpawnRandomGhouls =
{
local entity te;
local float playercount;
local float zomcount;
te = find (world, classname, "info");
CountGhouls ();
if (te.attack == 1)
{
te = find (world, classname, "player");
while (te)
{
if (((te.ghost == 0) && (te.health > 0)))
{
playercount = (playercount + 1);
}
te = find (te, classname, "player");
}
zomcount = (15 * playercount);
if ((zomcount > 55))
{
zomcount = 55;
}
}
if (te.attack == 2)
{
te = find (world, classname, "player");
while (te)
{
if (((te.ghost == 0) && (te.health > 0)))
{
playercount = (playercount + 1);
}
te = find (te, classname, "player");
}
zomcount = (30 * playercount);
if ((zomcount > 200))
{
zomcount = 200;
}
}
te = find (world, classname, "ghoul");
while (te)
{
if ((zombies < zomcount))
{
spawn_zombie (te);
zombies = (zombies + 1);
}
te = find (te, classname, "ghoul");
}
};
void () DisplayGhoulsLeft =
{
local string ghoulsleft;
bprint (WEAPON_ROCKET, "rangers: ");
ghoulsleft = ftos (blue_kill);
bprint (WEAPON_ROCKET, ghoulsleft);
bprint (WEAPON_ROCKET, " raiders: ");
ghoulsleft = ftos (red_kill);
bprint (WEAPON_ROCKET, ghoulsleft);
bprint (WEAPON_ROCKET, " ");
bprint (WEAPON_ROCKET, "left: ");
ghoulsleft = ftos (zombies);
bprint (WEAPON_ROCKET, ghoulsleft);
bprint (WEAPON_ROCKET, "\n");
};
void () CountHostages =
{
local entity te;
hostages = MULTICAST_ALL;
dead_hostage = MULTICAST_ALL;
te = find (world, classname, "hostage");
while (te)
{
if (((te.health > MULTICAST_ALL) && (te.rescued == MULTICAST_ALL)))
{
hostages = (hostages + WEAPON_SHOTGUN);
}
if ((te.health < MULTICAST_ALL))
{
dead_hostage = (dead_hostage + WEAPON_SHOTGUN);
}
te = find (te, classname, "hostage");
}
};
void () CheckZombie1 =
{
CountGhouls ();
if ((msgcount == MULTICAST_ALL))
{
DisplayGhoulsLeft ();
RemoveDeadGhouls ();
SpawnRandomGhouls ();
msgcount = TE_LAVASPLASH;
}
CountHostages ();
msgcount = (msgcount - WEAPON_SHOTGUN);
if ((dead_hostage >= WEAPON_ROCKET))
{
max_zombies = 400;
sound (self, CHAN_BODY, "misc/zombies.wav", WEAPON_SHOTGUN, ATTN_NONE);
bprint (PRINT_MEDIUM, "*** THE ZOMBIES WIN! ***\n");
bprint (PRINT_MEDIUM, "*** HOSTAGES HAVE BEEN KILLED ***\n");
RoundReset ();
return;
}
if ((hostages == MULTICAST_ALL))
{
max_zombies = 400;
sound (self, CHAN_BODY, "misc/zombies.wav", WEAPON_SHOTGUN, ATTN_NONE);
bprint (PRINT_MEDIUM, "*** THE PLAYERS WIN! ***\n");
bprint (PRINT_MEDIUM, "*** HOSTAGES HAVE BEEN SAVED! ***\n");
team1win = (team1win + WEAPON_SHOTGUN);
RoundReset ();
return;
}
if ((gtimer <= WEAPON_SHOTGUN))
{
max_zombies = 400;
sound (self, CHAN_BODY, "misc/zombies.wav", WEAPON_SHOTGUN, ATTN_NONE);
bprint (PRINT_MEDIUM, "*** THE ZOMBIES WIN! ***\n");
bprint (PRINT_MEDIUM, "*** HOSTAGES HAVE NOT BEEN SAVED! ***\n");
RoundReset ();
return;
}
};
void () CheckZombie2 =
{
local entity te;
local float team1, team2;
CountGhouls ();
if ((msgcount == 0))
{
DisplayGhoulsLeft ();
RemoveDeadGhouls ();
SpawnRandomGhouls ();
msgcount = TE_LAVASPLASH;
}
msgcount = (msgcount - WEAPON_SHOTGUN);
CountScientists ();
if ((hostages <= 2))
{
max_zombies = 400;
bprint (PRINT_MEDIUM, ">>> THE ZOMBIES WIN! <<<\n");
bprint (PRINT_MEDIUM, ">>> A SCIENTIST HAS BEEN KILLED <<<\n");
RoundReset ();
return;
}
if ((zombies <= 0))
{
max_zombies = 400;
bprint (PRINT_MEDIUM, ">>> THE PLAYERS WIN! <<<\n");
bprint (PRINT_MEDIUM, ">>> ZOMBIES HAVE BEEN SLAUGHTERED <<<\n");
team1win = (team1win + 1);
RoundReset ();
return;
}
if ((gtimer <= 1))
{
max_zombies = 400;
bprint (PRINT_MEDIUM, "*** THE PLAYERS WIN! ***\n");
bprint (PRINT_MEDIUM, "*** SCIENTISTS WERE PROTECTED!! ***\n");
team1win = (team1win + 1);
RoundReset ();
return;
}
te = find (world, classname, "player");
while (te)
{
if (te.classname == "player" && te.team == 1 && te.ghost == 0)
team1 = team1 + 1;
te = find (te, classname, "player");
}
if (team1 == 0 && team_blue != 0)
{
max_zombies = 400;
bprint (PRINT_MEDIUM, "*** THE PLAYERS WIN! ***\n");
bprint (PRINT_MEDIUM, "*** YOUR TEAM WAS SLAUGHTERED!! ***\n");
RoundReset ();
return;
}
};
void () CheckHostage =
{
local entity te;
hostages = 0;
dead_hostage = 0;
te = find (world, classname, "hostage");
while (te)
{
if (((te.health > 0) && (te.rescued == 0)))
{
hostages = (hostages + WEAPON_SHOTGUN);
}
if ((te.health < 0))
{
dead_hostage = (dead_hostage + 1);
}
te = find (te, classname, "hostage");
}
if (((dead_hostage >= 2) && (blue_kill >= 2)))
{
bprint (PRINT_MEDIUM, ">>> RANGERS KILLED HOSTAGES <<<\n");
bprint (PRINT_MEDIUM, ">>> RANGERS LOSE!! <<<\n");
team2win = (team2win + WEAPON_SHOTGUN);
RoundReset ();
return;
}
if (((dead_hostage >= 2) && (red_kill >= 2)))
{
bprint (PRINT_MEDIUM, ">>> RAIDERS KILLED HOSTAGES <<<\n");
bprint (PRINT_MEDIUM, ">>> RAIDERS LOSE!! <<<\n");
team1win = (team1win + WEAPON_SHOTGUN);
RoundReset ();
return;
}
if ((hostages == 0))
{
bprint (PRINT_MEDIUM, ">>> THE HOSTAGES WERE SAVED <<<\n");
bprint (PRINT_MEDIUM, ">>> RANGERS WIN THE ROUND!! <<<\n");
team1win = (team1win + WEAPON_SHOTGUN);
RoundReset ();
return;
}
};
void () CheckDefuse =
{
if ((bombed == 1))
{
bprint (PRINT_MEDIUM, ">>> RAIDERS WIN THE ROUND! <<<\n");
team2win = (team2win + WEAPON_SHOTGUN);
RoundReset ();
return;
}
if ((bombed == 2))
{
bprint (PRINT_MEDIUM, ">>> RANGERS WIN THE ROUND! <<<\n");
team1win = (team1win + WEAPON_SHOTGUN);
RoundReset ();
return;
}
};
void () GameControl =
{
local float r;
local float qq;
local float qqq;
local entity de;
local entity te;
local float team1;
local float team2;
local float team_won;
local float gcnt;
local float red;
local float blue;
local float botx, x, y;
local entity iinfo;
local entity z;
local entity boss2;
local entity ke;
local entity spot;
local float boss;
local string vv;
local string hos1;
local string hos2;
local string zz;
local string ghoulsleft;
local float randy;
local float end;
if (world.model == "maps/sv_town.bsp")
respawnvar = 1;
gtimer = (gtimer - WEAPON_SHOTGUN);
self.nextthink = (time + WEAPON_SHOTGUN);
self.think = GameControl;
red = MULTICAST_ALL;
blue = MULTICAST_ALL;
team1 = MULTICAST_ALL;
team2 = MULTICAST_ALL;
if (((random () * IDLE8A) < WEAPON_SHOTGUN))
{
randy = (random () * TE_WIZSPIKE);
if ((randy < WEAPON_SHOTGUN))
{
sound (self, CHAN_AUTO, "ambience/gunfire1.wav", 0.75, ATTN_NONE);
}
else
{
if ((randy < WEAPON_ROCKET))
{
sound (self, CHAN_AUTO, "ambience/gunfire2.wav", 0.75, ATTN_NONE);
}
else
{
if ((randy < AS_MELEE))
{
sound (self, CHAN_AUTO, "ambience/gunfire3.wav", 0.75, ATTN_NONE);
}
else
{
if ((randy < WEAPON_SPIKES))
{
sound (self, CHAN_AUTO, "ambience/gunfire4.wav", 0.75, ATTN_NONE);
}
else
{
if ((randy < MULTICAST_PVS_R))
{
sound (self, CHAN_AUTO, "ambience/gunfire5.wav", 0.75, ATTN_NONE);
}
else
{
if ((randy < TE_LIGHTNING2))
{
sound (self, CHAN_AUTO, "ambience/gunfire6.wav", 0.75, ATTN_NONE);
}
else
{
sound (self, CHAN_AUTO, "ambience/gunfire7.wav", 0.75, ATTN_NONE);
}
}
}
}
}
}
}
if (coop == 1)
{
x = 0;
y = 0;
te = find (world, classname, "player");
while (te)
{
if (te.health > 0 && te.ghost == 0)
x = x + 1;
if (te.health < 0)
y = y + 1;
te = find (te, classname, "player");
}
if (x == 0 && y > 0)
{
bprint (PRINT_MEDIUM, "*** PLAYERS SLAIN ***\n*** ROUND RESET ***");
localcmd("restart\n");
return;
}
return;
}
te = find (world, classname, "ighoul");
/*
while (te)
{
if (te.enemy)
te.enemy = world;
te = find (te, classname, "ighoul");
}*/
te = find (world, classname, "info");
if ((te.attack == 1))
{
CheckZombie1 ();
}
else
{
if ((te.attack == 2))
{
CheckZombie2 ();
}
else
{
if ((te.hostage == 1))
{
CheckHostage ();
}
else
{
if ((bombed >= 1))
{
CheckDefuse ();
}
}
}
}
if (round_end == 2)
{
ReplacePlayers (0);
round_end = 1.9;
teamthatwon = MULTICAST_ALL;
team_blue = MULTICAST_ALL;
team_red = MULTICAST_ALL;
return;
}
if (((round_end <= 1.9) && (round_end >= 1.1)))
{
round_end = (round_end - 0.15);
te = find (world, classname, "player");
while (te)
{
if ((te.currentmenu == "none"))
{
centerprint (te, "** press your b key to buy items **\n");
}
te = find (te, classname, "player");
}
if ((round_end < 1.1))
{
round_end = WEAPON_SHOTGUN;
}
return;
}
if ((round_end == 1))
{
te = find (world, classname, "player");
bprint (PRINT_MEDIUM, "** The next round has now started **\n");
sound (self, CHAN_BODY, "radio/3_letsgo.wav", 0.6, ATTN_NONE);
gtimer = 180;
round_end = MULTICAST_ALL;
teamthatwon = MULTICAST_ALL;
team_blue = MULTICAST_ALL;
team_red = MULTICAST_ALL;
return;
}
if ((respawnvar == WEAPON_SHOTGUN))
{
round_end = MULTICAST_ALL;
teamthatwon = MULTICAST_ALL;
team_blue = MULTICAST_ALL;
team_red = MULTICAST_ALL;
return;
}
team1 = 0;
te = find (world, classname, "player");
while (te)
{
if (te.classname == "player" && te.team == 1 && te.ghost == 0)
team1 = (team1 + 1);
if (te.classname == "player" && te.team == 2 && te.ghost == 0)
team2 = (team2 + 1);
te = find (te, classname, "player");
}
if (((((team1 == 0) && (team2 == 0)) && (team_red == 0)) && (team_blue == 0)))
{
gtimer = 180;
self.nextthink = (time + WEAPON_SPIKES);
self.think = GameControl;
round_end = 0;
teamthatwon = 0;
team_blue = 0;
team_red = 0;
return;
}
te = find (world, classname, "info");
if ((((team1 >= 1) && (team2 == 0)) && (team_red == 0)))//Only Rangers
{
gtimer = 180;
self.nextthink = (time + WEAPON_BIG);
self.think = GameControl;
round_end = MULTICAST_ALL;
teamthatwon = MULTICAST_ALL;
team_blue = MULTICAST_ALL;
team_red = MULTICAST_ALL;
return;
}
if ((((team1 == 0) && (team2 >= 1)) && (team_blue == 0)))//Only Raiders
{
gtimer = 180;
self.nextthink = (time + WEAPON_BIG);
self.think = GameControl;
round_end = MULTICAST_ALL;
teamthatwon = MULTICAST_ALL;
team_blue = MULTICAST_ALL;
team_red = MULTICAST_ALL;
return;
}
if (((team1 >= 1) && (team2 >= 1)))
{
return;
}
if (((((team2 == 0) && (team1 >= 1)) && (team_red > 0)) && (bombed != 3)))
{
bprint (PRINT_MEDIUM, ">>> RANGERS WIN THE ROUND! <<<\n");
team1win = (team1win + WEAPON_SHOTGUN);
RoundReset ();
return;
}
if (team1 == 0 && team2 >= 1)
{
bprint (PRINT_MEDIUM, ">>> RAIDERS WIN THE ROUND! <<<\n");
team2win = (team2win + 1);
RoundReset ();
return;
}
end = 0;
if (((team_red == 0) && (team1 != 0)))
{
te = find (world, classname, "bot");
while (te)
{
if (((te.team == WEAPON_ROCKET) && (te.health > 0)))
{
end = WEAPON_SHOTGUN;
}
te = find (te, classname, "bot");
}
if (((end == 0) && (world.model != "maps/ag_wastes.bsp")))
{
bprint (PRINT_MEDIUM, ">>> RANGERS WIN THE ROUND! <<<\n");
team2win = (team2win + WEAPON_SHOTGUN);
RoundReset ();
return;
}
round_end = 0;
teamthatwon = 0;
return;
}
if (((team_blue == 0) && (team2 != 0)))
{
te = find (world, classname, "bot");
while (te)
{
if (((te.team == WEAPON_SHOTGUN) && (te.health > 0)))
{
end = WEAPON_SHOTGUN;
}
te = find (te, classname, "bot");
}
if (((end == 0) && (world.model != "maps/ag_wastes.bsp")))
{
if (coop == 1)
{
bprint (PRINT_MEDIUM, ">>> RAIDERS WIN THE ROUND! <<<\n");
team2win = (team2win + 1);
RoundReset ();
return;
}
if (coop == 1)
{
bprint (PRINT_MEDIUM, "*** PLAYERS SLAIN ***\n*** ROUND RESET ***");
localcmd("restart\n");
return;
}
}
round_end = 0;
teamthatwon = 0;
return;
}
if (((team1 == 0) && (team2 == 0)))
{
bprint (PRINT_MEDIUM, ">>> TEAM DRAW <<<\n");
RoundReset ();
return;
}
};
void () VoteBoy =
{
local entity te;
local float q;
self.nextthink = (time + DRAW2);
self.think = VoteBoy;
if ((mode == 0))
{
mode = AS_MELEE;
}
if ((ff == 0))
{
ff = 0;
}
if ((self.vote_time > time))
{
return;
}
if ((self.vote_on == 0))
{
return;
}
if ((self.vote_on == WEAPON_ROCKET))
{
self.vote_on = 0;
return;
}
te = find (world, classname, "player");
self.vote_num = 0;
while (te)
{
if (((te.classname == "player") && (te.ghost == 0)))
{
self.vote_num = (self.vote_num + WEAPON_SHOTGUN);
}
te = find (te, classname, "player");
}
bprint (PRINT_MEDIUM, "** VOTE COMPLETED **\n");
if ((self.vote_type == WEAPON_ROCKET))
{
if ((self.vote1 >= (self.vote_num * 0.5)))
{
bprint (PRINT_MEDIUM, "** HEADSHOTS ARE IN! **\n");
headshot = 0;
}
else
{
if ((self.vote2 >= (self.vote_num * 0.5)))
{
bprint (PRINT_MEDIUM, "** HEADSHOTS ARE OUT! **\n");
headshot = WEAPON_SHOTGUN;
}
else
{
bprint (PRINT_MEDIUM, "** Not enough votes to switch **\n");
}
}
}
if ((self.vote_type == WEAPON_SPIKES))
{
if ((self.vote1 >= (self.vote_num * 0.5)))
{
bprint (PRINT_MEDIUM, "** QUAKE MODE **\n");
ReplacePlayers (0);
respawnvar = 1;
}
else
{
if ((self.vote2 >= (self.vote_num * 0.5)))
{
bprint (PRINT_MEDIUM, "** CS MODE **\n");
ReplacePlayers (0);
respawnvar = 0;
}
else
{
bprint (PRINT_MEDIUM, "** Not enough votes to switch **\n");
}
}
}
if ((self.vote_type == WEAPON_SHOTGUN))
{
if ((self.vote1 >= (self.vote_num * 0.5)))
{
bprint (PRINT_MEDIUM, "** FF IS NOW OFF **\n");
ff = 0;
}
else
{
if ((self.vote2 >= (self.vote_num * 0.5)))
{
bprint (PRINT_MEDIUM, "** FF IS NOW ON **\n");
ff = WEAPON_SHOTGUN;
}
else
{
bprint (PRINT_MEDIUM, "** Not enough votes to switch **\n");
}
}
}
if ((self.vote_type == AS_MELEE))
{
if ((self.vote6 >= (self.vote_num * 0.5)))
{
bprint (PRINT_MEDIUM, "** CURRENT MAP WILL STAY **\n");
}
else
{
if ((self.vote1 >= (self.vote_num * 0.5)))
{
bprint (PRINT_MEDIUM, "** MAP WILL NOW SWITCH **\n");
changelevel ("speedrun");
}
else
{
if ((self.vote2 >= (self.vote_num * 0.5)))
{
bprint (PRINT_MEDIUM, "** MAP WILL NOW SWITCH **\n");
changelevel ("ag_town");
}
else
{
if ((self.vote3 >= (self.vote_num * 0.5)))
{
bprint (PRINT_MEDIUM, "** MAP WILL NOW SWITCH **\n");
changelevel ("ag_kahn");
}
else
{
if ((self.vote4 >= (self.vote_num * 0.5)))
{
bprint (PRINT_MEDIUM, "** MAP WILL NOW SWITCH **\n");
changelevel ("tanker");
}
else
{
if ((self.vote5 >= (self.vote_num * 0.5)))
{
bprint (PRINT_MEDIUM, "** MAP WILL NOW SWITCH **\n");
changelevel ("ag_wastes");
}
else
{
if ((self.vote6 >= (self.vote_num * 0.5)))
{
bprint (PRINT_MEDIUM, "** MAP WILL NOW SWITCH **\n");
changelevel ("ag_vault");
}
else
{
if ((self.vote7 >= (self.vote_num * 0.5)))
{
bprint (PRINT_MEDIUM, "** MAP WILL NOW SWITCH **\n");
changelevel ("de_dust2");
}
else
{
bprint (PRINT_MEDIUM, "** Not enough votes to switch **\n");
}
}
}
}
}
}
}
}
}
if ((self.vote_type == MULTICAST_PVS_R))
{
if ((self.vote1 >= (self.vote_num * 0.5)))
{
bprint (PRINT_MEDIUM, "** WIMPY MODE **\n");
z_skill = 0;
}
else
{
if ((self.vote2 >= (self.vote_num * 0.5)))
{
bprint (PRINT_MEDIUM, "** AVERAGE MODE **\n");
z_skill = WEAPON_SHOTGUN;
}
else
{
if ((self.vote3 >= (self.vote_num * 0.5)))
{
bprint (PRINT_MEDIUM, "** SUPER ZOMBIE MODE **\n");
z_skill = WEAPON_ROCKET;
}
else
{
if ((self.vote4 >= (self.vote_num * 0.5)))
{
bprint (PRINT_MEDIUM, "** NIGHT OF TEH FRIGG'N LIVING DEAD, RUN FER UR LIVES U FOOLS **\n");
z_skill = AS_MELEE;
}
else
{
bprint (PRINT_MEDIUM, "** Not enough votes to switch **\n");
}
}
}
}
}
self.vote_on = WEAPON_ROCKET;
self.vote_num = 0;
self.vote1 = 0;
self.vote2 = 0;
self.vote3 = 0;
self.vote4 = 0;
self.vote5 = 0;
self.vote6 = 0;
self.vote7 = 0;
self.vote8 = 0;
};
void () GameTimer =
{
local entity te, ze;
local float switched;
local float c, z;
switched = 0;
te = findradius(self.origin, 25000);
while (c < 300 && switched == 0)
{
if (te.classname == "raider" && te.enemy != world && te.processed == 0 && te.active == 0 && switched == 0)
{
te.active = 1;
te.processed = 1;
bprint(2, "it is now ");
bprint(2, te.netname);
bprint(2, "'s turn.\n");
te.maxspeed = 300;
switched = 1;
ze = findradius(self.origin, 25000);
z = 0;
while (z < 300)
{
if ((ze.classname == "player" || ze.classname == "raider") && ze != te)
{
ze.active = 0;
ze.maxspeed = 0;
}
z = z + 1;
ze = ze.chain;
}
}
if (te.classname == "player" && te.processed == 0 && te.active == 0 && switched == 0)
{
te.active = 1;
te.processed = 1;
bprint(2, "it is now ");
bprint(2, te.netname);
bprint(2, "'s turn.\n");
te.maxspeed = 300;
switched = 1;
ze = findradius(self.origin, 25000);
z = 0;
while (z < 300)
{
if ((ze.classname == "player" || ze.classname == "raider") && ze != te)
{
ze.active = 0;
ze.maxspeed = 0;
}
z = z + 1;
ze = ze.chain;
}
}
c = c + 1;
te = te.chain;
}
c = 0;
if (switched == 0) // no entities left, turn is over
{
bprint(2, "round is now over.\n");
te = findradius(self.origin, 25000);
while (c < 300)
{
if (te.classname == "player" || te.classname == "raider")
{
te.active = 0;
te.processed = 0;
te.maxspeed = 0;
}
c = c + 1;
te = te.chain;
}
}
self.think = GameTimer;
self.nextthink = time + 1;
};
void () create_timer =
{
newmis = spawn ();
newmis.owner = self;
newmis.movetype = MOVETYPE_NONE;
setsize (newmis, VEC_ORIGIN, VEC_ORIGIN);
newmis.solid = SOLID_BBOX;
newmis.velocity = VEC_ORIGIN;
newmis.touch = SUB_Null;
setorigin (newmis, '0 0 -300');
newmis.nextthink = (time + 1);
newmis.think = GameTimer;
newmis.classname = "referee";
};
entity lastspawn;
//=======================
/*QUAKED worldspawn (0 0 0) ?
Only used for the world entity.
Set message to the level name.
Set sounds to the cd track to play.
World Types:
0: medieval
1: metal
2: base
*/
//=======================
void() worldspawn =
{
lastspawn = world;
InitBodyQue ();
coop = 1;
SetupStats();
// custom map attributes
if (self.model == "maps/e1m8.bsp")
cvar_set ("sv_gravity", "100");
else
cvar_set ("sv_gravity", "800");
// the area based ambient sounds MUST be the first precache_sounds
// player precaches
W_Precache (); // get weapon precaches
// sounds used from C physics code
precache_sound ("demon/dland2.wav"); // landing thud
precache_sound ("misc/h2ohit1.wav"); // landing splash
// setup precaches allways needed
precache_sound ("items/itembk2.wav"); // item respawn sound
precache_sound ("player/plyrjmp8.wav"); // player jump
precache_sound ("player/land.wav"); // player landing
precache_sound ("player/land2.wav"); // player hurt landing
precache_sound ("player/drown1.wav"); // drowning pain
precache_sound ("player/drown2.wav"); // drowning pain
precache_sound ("player/gasp1.wav"); // gasping for air
precache_sound ("player/gasp2.wav"); // taking breath
precache_sound ("player/h2odeath.wav"); // drowning death
precache_sound ("misc/talk.wav"); // talk
precache_sound ("player/teledth1.wav"); // telefrag
precache_sound ("misc/r_tele1.wav"); // teleport sounds
precache_sound ("misc/r_tele2.wav");
precache_sound ("misc/r_tele3.wav");
precache_sound ("misc/r_tele4.wav");
precache_sound ("misc/r_tele5.wav");
precache_sound ("weapons/lock4.wav"); // ammo pick up
precache_sound ("weapons/pkup.wav"); // weapon up
precache_sound ("items/armor1.wav"); // armor up
precache_sound ("weapons/lhit.wav"); //lightning
precache_sound ("weapons/lstart.wav"); //lightning start
precache_sound ("items/damage3.wav");
precache_sound ("misc/power.wav"); //lightning for boss
// player gib sounds
precache_sound ("player/gib.wav"); // player gib sound
precache_sound ("player/udeath.wav"); // player gib sound
precache_sound ("player/tornoff2.wav"); // gib sound
// player pain sounds
precache_sound ("player/pain1.wav");
precache_sound ("player/pain2.wav");
precache_sound ("player/pain3.wav");
precache_sound ("player/pain4.wav");
precache_sound ("player/pain5.wav");
precache_sound ("player/pain6.wav");
// player death sounds
precache_sound ("player/death1.wav");
precache_sound ("player/death2.wav");
precache_sound ("player/death3.wav");
precache_sound ("player/death4.wav");
precache_sound ("player/death5.wav");
precache_sound ("boss1/sight1.wav");
// ax sounds
precache_sound ("weapons/ax1.wav"); // ax swoosh
precache_sound ("player/axhit1.wav"); // ax hit meat
precache_sound ("player/axhit2.wav"); // ax hit world
precache_sound ("player/h2ojump.wav"); // player jumping into water
precache_sound ("player/slimbrn2.wav"); // player enter slime
precache_sound ("player/inh2o.wav"); // player enter water
precache_sound ("player/inlava.wav"); // player enter lava
precache_sound ("misc/outwater.wav"); // leaving water sound
precache_sound ("player/lburn1.wav"); // lava burn
precache_sound ("player/lburn2.wav"); // lava burn
precache_sound ("misc/water1.wav"); // swimming
precache_sound ("misc/water2.wav"); // swimming
// Invulnerability sounds
precache_sound ("items/protect.wav");
precache_sound ("items/protect2.wav");
precache_sound ("items/protect3.wav");
precache_model ("progs/player.mdl");
precache_model ("progs/guy.mdl");
precache_model ("progs/lay.mdl");
precache_model ("progs/eyes.mdl");
precache_model ("progs/h_player.mdl");
precache_model ("progs/gib1.mdl");
precache_model ("progs/gib2.mdl");
precache_model ("progs/gib3.mdl");
precache_model ("progs/s_bubble.spr"); // drowning bubbles
precache_model ("progs/s_explod.spr"); // sprite explosion
precache_model ("progs/v_axe.mdl");
precache_model ("progs/v_shot.mdl");
precache_model ("progs/v_span.mdl");
precache_model ("progs/v_nail.mdl");
precache_model ("progs/v_rock.mdl");
precache_model ("progs/v_shot2.mdl");
precache_model ("progs/v_nail2.mdl");
precache_model ("progs/v_rock2.mdl");
precache_model ("progs/v_fist.mdl");
precache_model ("progs/v_knife.mdl");
precache_model ("progs/v_1911.mdl");
precache_model ("progs/v_ak47.mdl");
precache_model ("progs/v_smg.mdl");
precache_model ("progs/v_rangem.mdl");
precache_model ("progs/v_pipe.mdl");
precache_model ("progs/v_shotgun.mdl");
precache_model ("progs/v_double.mdl");
precache_model ("progs/v_mp9.mdl");
precache_model ("progs/v_sa80.mdl");
precache_model ("progs/v_deagle.mdl");
precache_model ("progs/v_alien.mdl");
precache_model ("progs/v_srifle.mdl");
precache_model ("progs/v_night.mdl");
precache_model ("progs/v_nailer.mdl");
precache_model ("progs/v_piperifle.mdl");
precache_model ("progs/v_handgren.mdl");
precache_model ("progs/sneak.mdl");
precache_model ("progs/dead.mdl");
precache_model ("progs/hbar.spr");
precache_model ("progs/w_knife.mdl");
precache_model ("progs/w_pipe.mdl");
precache_model ("progs/w_shotgun.mdl");
precache_model ("progs/w_axe.mdl");
precache_model ("progs/w_1911.mdl");
precache_model ("progs/w_deagle.mdl");
precache_model ("progs/w_alien.mdl");
precache_model ("progs/w_mp7.mdl");
precache_model ("progs/w_mp9.mdl");
precache_model ("progs/w_jackhammer.mdl");
precache_model ("progs/w_rangem.mdl");
precache_model ("progs/w_sa80.mdl");
precache_model ("progs/w_ak47.mdl");
precache_model ("progs/w_night.mdl");
precache_model ("progs/w_srifle.mdl");
precache_model ("progs/w_gauss.mdl");
precache_model ("progs/w_carbine.mdl");
precache_model ("progs/w_laser.mdl");
precache_model ("progs/grenade2.mdl");
precache_model ("maps/b_bh10.bsp");
precache_model ("maps/b_bh25.bsp");
precache_model ("maps/b_bh100.bsp");
precache_model ("progs/s_light.spr");
precache_sound ("misc/thud.wav");
precache_sound ("player/step1.wav");
precache_sound ("player/step2.wav");
precache_sound ("player/step3.wav");
precache_sound ("player/step4.wav");
precache_sound ("player/step1a.wav");
precache_sound ("player/step2a.wav");
precache_sound ("player/step3a.wav");
precache_sound ("player/step4a.wav");
precache_sound ("dog/dattack1.wav");
precache_sound ("dog/ddeath.wav");
precache_sound ("dog/dpain1.wav");
precache_sound ("dog/dsight.wav");
precache_sound ("dog/idle.wav");
precache_sound ("weapons/1911.wav");
precache_sound ("weapons/auto.wav");
precache_sound ("weapons/auto2.wav");
precache_sound ("weapons/ak112.wav");
precache_sound ("weapons/ak47.wav");
precache_sound ("weapons/amr.wav");
precache_sound ("weapons/blaster.wav");
precache_sound ("weapons/blaster2.wav");
precache_sound ("weapons/blowoff.wav");
precache_sound ("weapons/bounce.wav");
precache_sound ("weapons/burst.wav");
precache_sound ("weapons/caws.wav");
precache_sound ("weapons/click.wav");
precache_sound ("weapons/deagle.wav");
precache_sound ("weapons/dks-1.wav");
precache_sound ("weapons/energy1.wav");
precache_sound ("weapons/energy2.wav");
precache_sound ("weapons/energy3.wav");
precache_sound ("weapons/energy4.wav");
precache_sound ("weapons/flamer.wav");
precache_sound ("weapons/fnfal.wav");
precache_sound ("weapons/g11.wav");
precache_sound ("weapons/gauss.wav");
precache_sound ("weapons/gl-1.wav");
precache_sound ("weapons/gpull.wav");
precache_sound ("weapons/helmet.wav");
precache_sound ("weapons/jackhammer.wav");
precache_sound ("weapons/laser.wav");
precache_sound ("weapons/m249.wav");
precache_sound ("weapons/m4-nw.wav");
precache_sound ("weapons/needler.wav");
precache_sound ("weapons/shotgun1.wav");
precache_sound ("weapons/shotgun2.wav");
precache_sound ("weapons/mp5.wav");
precache_sound ("weapons/mp7.wav");
precache_sound ("weapons/rangem.wav");
precache_sound ("weapons/ric1.wav");
precache_sound ("weapons/ric2.wav");
precache_sound ("weapons/ric3.wav");
precache_sound ("weapons/ric4.wav");
precache_sound ("weapons/ric5.wav");
precache_sound ("weapons/tink1.wav");
precache_sound ("weapons/sa80-1.wav");
precache_sound ("weapons/shell.wav");
precache_sound ("misc/build1.wav");
precache_sound ("misc/build2.wav");
precache_sound ("misc/build3.wav");
precache_sound ("player/agdie1.wav");
precache_sound ("player/agdie2.wav");
precache_sound ("player/agdie3.wav");
precache_sound ("player/agdie4.wav");
precache_sound ("player/agdie5.wav");
precache_sound ("player/berserk.wav");
precache_sound ("player/breathe.wav");
precache_sound ("player/headshot.wav");
precache_sound ("player/hit1.wav");
precache_sound ("player/paina.wav");
precache_sound ("player/painb.wav");
precache_model ("progs/bolt.mdl"); // for lightning gun
precache_model ("progs/bolt2.mdl"); // for lightning gun
precache_model ("progs/bolt3.mdl"); // for boss shock
precache_model ("progs/lavaball.mdl"); // for testing
precache_model ("progs/missile.mdl");
precache_model ("progs/grenade.mdl");
precache_model ("progs/spike.mdl");
precache_model ("progs/s_spike.mdl");
precache_model ("progs/backpack.mdl");
precache_model ("progs/zom_gib.mdl");
precache_model ("progs/v_light.mdl");
//
// Setup light animation tables. 'a' is total darkness, 'z' is maxbright.
//
// 0 normal
lightstyle(0, "m");
// 1 FLICKER (first variety)
lightstyle(1, "mmnmmommommnonmmonqnmmo");
// 2 SLOW STRONG PULSE
lightstyle(2, "abcdefghijklmnopqrstuvwxyzyxwvutsrqponmlkjihgfedcba");
// 3 CANDLE (first variety)
lightstyle(3, "mmmmmaaaaammmmmaaaaaabcdefgabcdefg");
// 4 FAST STROBE
lightstyle(4, "mamamamamama");
// 5 GENTLE PULSE 1
lightstyle(5,"jklmnopqrstuvwxyzyxwvutsrqponmlkj");
// 6 FLICKER (second variety)
lightstyle(6, "nmonqnmomnmomomno");
// 7 CANDLE (second variety)
lightstyle(7, "mmmaaaabcdefgmmmmaaaammmaamm");
// 8 CANDLE (third variety)
lightstyle(8, "mmmaaammmaaammmabcdefaaaammmmabcdefmmmaaaa");
// 9 SLOW STROBE (fourth variety)
lightstyle(9, "aaaaaaaazzzzzzzz");
// 10 FLUORESCENT FLICKER
lightstyle(10, "mmamammmmammamamaaamammma");
// 11 SLOW PULSE NOT FADE TO BLACK
lightstyle(11, "abcdefghijklmnopqrrqponmlkjihgfedcba");
// styles 32-62 are assigned by the light program for switchable lights
// 63 testing
lightstyle(63, "a");
};
void() StartFrame =
{
timelimit = cvar("timelimit") * 60;
fraglimit = cvar("fraglimit");
teamplay = cvar("teamplay");
deathmatch = cvar("deathmatch");
framecount = framecount + 1;
};
/*
==============================================================================
BODY QUE
==============================================================================
*/
entity bodyque_head;
void() bodyque =
{ // just here so spawn functions don't complain after the world
// creates bodyques
};
void() InitBodyQue =
{
bodyque_head = spawn();
bodyque_head.classname = "bodyque";
bodyque_head.owner = spawn();
bodyque_head.owner.classname = "bodyque";
bodyque_head.owner.owner = spawn();
bodyque_head.owner.owner.classname = "bodyque";
bodyque_head.owner.owner.owner = spawn();
bodyque_head.owner.owner.owner.classname = "bodyque";
bodyque_head.owner.owner.owner.owner = bodyque_head;
};
// make a body que entry for the given ent so the ent can be
// respawned elsewhere
void(entity ent) CopyToBodyQue =
{
bodyque_head.angles = ent.angles;
bodyque_head.model = ent.model;
bodyque_head.modelindex = ent.modelindex;
bodyque_head.frame = ent.frame;
bodyque_head.colormap = ent.colormap;
bodyque_head.movetype = ent.movetype;
bodyque_head.velocity = ent.velocity;
bodyque_head.flags = 0;
setorigin (bodyque_head, ent.origin);
setsize (bodyque_head, ent.mins, ent.maxs);
bodyque_head = bodyque_head.owner;
};