qf/prozac-qfcc
0
0
Fork 0
mirror of https://git.code.sf.net/p/quake/prozac-qfcc synced 2024-11-10 15:21:51 +00:00
Code Issues Projects Releases Packages Wiki Activity
prozac-qfcc/client.qc

3331 lines
77 KiB
C++
Raw Normal View History

Initial revision
2001-07-17 05:58:10 +00:00
/*======================================================
CLIENT.QC Custom TeamFortress v3.2
(c) TeamFortress Software Pty Ltd 29/2/97
(c) William Kerney 16/9/00
(c) Craig Hauser 19/3/00
========================================================
Handles obituaries, what happens when a client dies, respawns,
connects & disconnects, and when a map changes levels
======================================================*/
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
#include "defs.qh"
Initial revision
2001-07-17 05:58:10 +00:00
// prototypes
void () W_WeaponFrame;
void() W_SetCurrentAmmo;
Cleanup after qfcc's typechecking changes. This includes the elimination of SUB_Null.
2001-10-17 07:48:11 +00:00
void(entity attacker, float damage) player_pain;
Initial revision
2001-07-17 05:58:10 +00:00
void() player_stand1;
void (vector org) spawn_tfog;
void (vector org, entity death_owner) spawn_tdeath;
float modelindex_eyes, modelindex_player, modelindex_null;
float(float v) anglemod;
//void () SetUpChrisRound;//-
void () PrematchBegin;
void () TeamAllPlayers;
//void (float winner) RoundStop;//-
//void () UpdateScores;
//void () roundtimer_think;//-
//void () EndRound;//-
// TeamFortress prototypes
void() TeamFortress_MOTD;
void() TeamFortress_CheckTeamCheats;
%s/TeamFortress_TeamGetColor/TeamGetColor/g
2001-07-24 16:03:08 +00:00
//float(float tno) TeamGetColor; //- OfN - not used here
Initial revision
2001-07-17 05:58:10 +00:00
void(entity Viewer, float pc, float rpc) TeamFortress_PrintClassName;
void(entity Viewer, float pc) TeamFortress_PrintJobName;
void() TeamFortress_RemoveTimers;
void(float Suicided) TeamFortress_SetupRespawn;
void() TeamFortress_ShowTF;
float(float pc) IsLegalClass;
void() SetupTeamEqualiser;
void(entity p) SetTeamName;
void (float number) decrement_team_ammoboxes;
void() TeamFortress_DetonatePipebombs;
void(float f) decrement_team_pipebombs;
void () PlayerObserverMode;
// Hook prototypes
void () Service_Grapple;
// TeamFortressMap prototypes
void(entity AD) ParseTFDetect;
entity(float ino) Finditem;
void(entity Item, entity AP, entity Goal) tfgoalitem_GiveToPlayer;
void(entity Goal, entity AP, entity ActivatingGoal) AttemptToActivate;
void() CTF_FlagCheck;
//WK
void() DropToCustomClassGen;
void(entity p) TeamFortress_SetSpeed;
void () kill_my_demon;
void () DetonateAllGuns; // SB
void () Boot_Flamer_stream_touch;
void (entity foo,float bar) makeImmune;
// SB Extern
void (entity targ) GetRank;
//void() SwitchFromCamera;
//==============// ofn
void(entity mine_owner) DetonateMines;
void(entity player) RemoveHolo;
string(entity thebuilding) GetBuildingName;
string(entity themonster) GetMonsterName;
void(entity attacker) MonsterKill;
void() DetonateAllGunsForced;
- totally disable TeamFortress_ChecKTeamCheats - fix GetNoPlayers (didn't init num_players) - overhaul the map cycler - automatically restart if a cyclenumber doesn't work - fix minp/maxp - exec mapcfg.cfg each map change (affects minp/maxp) - exec mapcfg/MAP.cfg each map change. (affects minp/maxp) - fix a "rockets explode on observers" bug - make it so colors aren't reset every time you respawn
2001-10-07 22:15:22 +00:00
void(float mapnum) SetNextMapNum;
Initial revision
2001-07-17 05:58:10 +00:00
/*
=============================================================================
LEVEL CHANGING / INTERMISSION
=============================================================================
*/
- totally disable TeamFortress_ChecKTeamCheats - fix GetNoPlayers (didn't init num_players) - overhaul the map cycler - automatically restart if a cyclenumber doesn't work - fix minp/maxp - exec mapcfg.cfg each map change (affects minp/maxp) - exec mapcfg/MAP.cfg each map change. (affects minp/maxp) - fix a "rockets explode on observers" bug - make it so colors aren't reset every time you respawn
2001-10-07 22:15:22 +00:00
#define MAP_NO 0
#define MAP_YES 1
#define MAP_LOADCYCLE 2
#define MAP_LOADCONFIG 3
Initial revision
2001-07-17 05:58:10 +00:00
string nextmap;
float intermission_running;
float intermission_exittime;
/*QUAKED info_intermission (1 0.5 0.5) (-16 -16 -16) (16 16 16)
This is the camera point for the intermission.
Use mangle instead of angle, so you can set pitch or roll as well as yaw. 'pitch roll yaw'
*/
void() info_intermission =
{
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
if (CheckExistence() == FALSE)
Initial revision
2001-07-17 05:58:10 +00:00
{
dremove(self);
return;
}
};
void() SetChangeParms =
{
if (self.health <= 0)
{
SetNewParms ();
return;
}
// remove items
Change a bunch of self.items = self.items - (self.items & IT_FOO) lines to self.items = self.items & ~IT_FOO. also changed some self.items = self.items - IT_FOO lines, which were just Really Evil (tm)
2001-08-10 10:03:36 +00:00
self.items = self.items & ~(IT_KEY1 | IT_KEY2 | IT_INVISIBILITY | IT_INVULNERABILITY | IT_SUIT | IT_QUAD);
Initial revision
2001-07-17 05:58:10 +00:00
// cap super health
if (self.health > 100)
self.health = 100;
if (self.health < 50)
self.health = 50;
parm1 = self.items;
parm2 = self.health;
parm3 = self.armorvalue;
if (self.ammo_shells < 25)
parm4 = 25;
else
parm4 = self.ammo_shells;
parm5 = self.ammo_nails;
parm6 = self.ammo_rockets;
parm7 = self.ammo_cells;
parm8 = self.current_weapon;
parm9 = self.armortype * 100;
// TeamFortress Parameters
parm10 = toggleflags; // Store the global ToggleFlag settings
parm11 = 0; // Random Playerclass
parm12 = 0;
#ifdef COOP_MODE
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
if (toggleflags & TFLAG_CLASS_PERSIST)
Initial revision
2001-07-17 05:58:10 +00:00
{
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
if (self.tfstate & TFSTATE_RANDOMPC)
Initial revision
2001-07-17 05:58:10 +00:00
{
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
parm11 = (parm11 | TFSTATE_RANDOMPC);
self.playerclass = 1 + floor(random() * (PC_RANDOM - 1));
Initial revision
2001-07-17 05:58:10 +00:00
while(!IsLegalClass(self.playerclass))
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
self.playerclass = 1 + floor(random() * (PC_RANDOM - 1));
Initial revision
2001-07-17 05:58:10 +00:00
}
parm12 = self.playerclass; // save the playerclass between levels in parm12
} // if the toggleflag CLASS_PERSIST is set
#endif
#ifdef STATUSBAR
parm13 = self.StatusBarRes;
parm14 = self.StatusBarSize;
#endif
parm15 = self.admin_flag; //CH Pass along admin status :)
};
void() SetNewParms =
{
parm1 = 0;
parm2 = 100;
parm3 = 0;
parm4 = 25;
parm5 = 0;
parm6 = 0;
parm6 = 0;
parm8 = 1;
parm9 = 0;
// TeamFortress Parameters
parm10 = 0;
parm11 = 0;
parm12 = 0;
parm13 = 0;
parm14 = 0;
parm15 = 0;
};
// This think kicks in 30 seconds into the map to
// turn autoteam on.
void() autoteam_think =
{
// if (chris)
// SetUpChrisRound();
// if (!chris)
PrematchBegin();
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
toggleflags = toggleflags | TFLAG_AUTOTEAM;
Initial revision
2001-07-17 05:58:10 +00:00
dremove(self);
};
void () PrematchBegin =
{
if (prematch)
{
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
bprint(PRINT_HIGH,"<EFBFBD> The game has now started! <10>\n");
world -> NIL for null entities. Seems to work (only issue would be borked tests for foo == world -> !foo and for != world -> foo).
2001-11-02 17:00:52 +00:00
other = find(NIL, classname, "player");
while (other)
Initial revision
2001-07-17 05:58:10 +00:00
{
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
other.is_abouttodie = TRUE;
Change a bunch of self.items = self.items - (self.items & IT_FOO) lines to self.items = self.items & ~IT_FOO. also changed some self.items = self.items - IT_FOO lines, which were just Really Evil (tm)
2001-08-10 10:03:36 +00:00
other.items = other.items & ~IT_INVULNERABILITY;
Initial revision
2001-07-17 05:58:10 +00:00
other.invincible_time = 0;
other.invincible_finished = 0;
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
other.effects = other.effects - (other.effects & EF_DIMLIGHT);
world -> NIL for null entities. Seems to work (only issue would be borked tests for foo == world -> !foo and for != world -> foo).
2001-11-02 17:00:52 +00:00
TF_T_Damage(other, NIL, NIL, other.health + 20, TF_TD_IGNOREARMOUR, TF_TD_OTHER);
Initial revision
2001-07-17 05:58:10 +00:00
other = find(other, classname, "player");
}
// - OfN - wtf
world -> NIL for null entities. Seems to work (only issue would be borked tests for foo == world -> !foo and for != world -> foo).
2001-11-02 17:00:52 +00:00
/*other = find(NIL, classname, "grunty");
while (other)
Initial revision
2001-07-17 05:58:10 +00:00
{
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
other.is_abouttodie = TRUE;
Change a bunch of self.items = self.items - (self.items & IT_FOO) lines to self.items = self.items & ~IT_FOO. also changed some self.items = self.items - IT_FOO lines, which were just Really Evil (tm)
2001-08-10 10:03:36 +00:00
other.items = other.items & ~IT_INVULNERABILITY;
Initial revision
2001-07-17 05:58:10 +00:00
other.invincible_time = 0;
other.invincible_finished = 0;
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
other.effects = other.effects - (other.effects & EF_DIMLIGHT);
world -> NIL for null entities. Seems to work (only issue would be borked tests for foo == world -> !foo and for != world -> foo).
2001-11-02 17:00:52 +00:00
TF_T_Damage(other, NIL, NIL, other.health + 20, TF_TD_IGNOREARMOUR, TF_TD_OTHER);
Initial revision
2001-07-17 05:58:10 +00:00
other = find(other, classname, "grunty");
}*/
}
/* if (chris)
{
if (self.classname == "prematch_timer")
dremove(self);
else
SetUpChrisRound();
}*/
};
/*void () SetUpChrisRound =
{
local entity other, oself;
// Make sure everyone is on a team
TeamAllPlayers();
// Clean up team player counts
team1total = 0;
team2total = 0;
team3total = 0;
team4total = 0;
oself = self;
world -> NIL for null entities. Seems to work (only issue would be borked tests for foo == world -> !foo and for != world -> foo).
2001-11-02 17:00:52 +00:00
other = find(NIL, classname, "player");
while (other)
Initial revision
2001-07-17 05:58:10 +00:00
{
if (livesperguy > 0)
{
if (other.team_no == 1) team1total = team1total + livesperguy;
if (other.team_no == 2) team2total = team2total + livesperguy;
if (other.team_no == 3) team3total = team3total + livesperguy;
if (other.team_no == 4) team4total = team4total + livesperguy;
other.lives = livesperguy;
}
self = other;
kill_my_demon();
DetonateAllGuns();
world -> NIL for null entities. Seems to work (only issue would be borked tests for foo == world -> !foo and for != world -> foo).
2001-11-02 17:00:52 +00:00
TF_T_Damage(other, NIL, NIL, other.health + 20, TF_TD_IGNOREARMOUR, TF_TD_OTHER);
Initial revision
2001-07-17 05:58:10 +00:00
other = find(other, classname, "player");
}
newmis = spawn();
newmis.classname = "chris_round_timer";
newmis.nextthink = time + roundtime;
newmis.think = roundtimer_think;
};*/
/*void() roundtimer_think =
{
RoundStop(0);
dremove(self);
};*/
void () TeamAllPlayers =
{
local entity other, oself;
world -> NIL for null entities. Seems to work (only issue would be borked tests for foo == world -> !foo and for != world -> foo).
2001-11-02 17:00:52 +00:00
other = find(NIL, classname, "player");
while (other)
Initial revision
2001-07-17 05:58:10 +00:00
{
if (other.team_no <= 0 && !other.has_disconnected)
{
oself = self;
self = other;
Menu_Team_Input(5);
self = oself;
}
other = find(other, classname, "player");
}
};
/*void (float winner) RoundStop =
{
if (winner == 0)
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
bprint(PRINT_MEDIUM, "The round has ended due to time.\n");
Initial revision
2001-07-17 05:58:10 +00:00
else
{
if (winner == 1)
{
team1rounds = team1rounds + 1;
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
bprint(PRINT_MEDIUM, "The blue team wins the round.\n");
Initial revision
2001-07-17 05:58:10 +00:00
}
if (winner == 2)
{
team2rounds = team2rounds + 1;
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
bprint(PRINT_MEDIUM, "This round goes to the red team.\n");
Initial revision
2001-07-17 05:58:10 +00:00
}
if (winner == 3)
{
team3rounds = team3rounds + 1;
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
bprint(PRINT_MEDIUM, "The yellow team are sponsored by SB-1 Tech and have won this round.\n");
Initial revision
2001-07-17 05:58:10 +00:00
}
if (winner == 4)
{
team4rounds = team4rounds + 1;
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
bprint(PRINT_MEDIUM, "The green team are the winners of this round.\n");
Initial revision
2001-07-17 05:58:10 +00:00
}
}
UpdateScores();
newmis = spawn();
newmis.nextthink = time + 1;
newmis.think = EndRound;
};*/
/*void() UpdateScores =
{
local entity guy;
guy = find(other, classname, "player");
world -> NIL for null entities. Seems to work (only issue would be borked tests for foo == world -> !foo and for != world -> foo).
2001-11-02 17:00:52 +00:00
while (guy)
Initial revision
2001-07-17 05:58:10 +00:00
{
if (guy.team_no == 1)
{
guy.frags = team1rounds * 10;
guy.real_frags = team1rounds * 10;
}
else if (guy.team_no == 2)
{
guy.frags = team2rounds * 10;
guy.real_frags = team2rounds * 10;
}
else if (guy.team_no == 3)
{
guy.frags = team3rounds * 10;
guy.real_frags = team3rounds * 10;
}
else if (guy.team_no == 4)
{
guy.frags = team4rounds * 10;
guy.real_frags = team4rounds * 10;
}
guy = find(guy, classname, "other");
}
};*/ /////////////??/////////////7
/*void() EndRound =
{
local entity roundtimer, prematchtimer;
local float winner, prematchtime;
local string st;
// Kill the round timer
world -> NIL for null entities. Seems to work (only issue would be borked tests for foo == world -> !foo and for != world -> foo).
2001-11-02 17:00:52 +00:00
other = find(NIL, classname, "chris_round_timer");
Initial revision
2001-07-17 05:58:10 +00:00
// I deliberately don't do a contingency check here - if it screws up I wanna know about it
dremove(other);
world -> NIL for null entities. Seems to work (only issue would be borked tests for foo == world -> !foo and for != world -> foo).
2001-11-02 17:00:52 +00:00
st = infokey(NIL, "pm");
- some BUGS items - annihilate string_null (and empty_float and vector_null) - remove self.netname = infokey(self, "name");, since the server should do that for us - add a quotename function, to stick \xFF around a name - add a few death messages - set a "timeleft" serverinfo to be the number of minutes left in the game
2001-09-30 22:38:44 +00:00
if (!st) // if 'pm' isn't set, try 'prematch'
world -> NIL for null entities. Seems to work (only issue would be borked tests for foo == world -> !foo and for != world -> foo).
2001-11-02 17:00:52 +00:00
st = infokey(NIL, "prematch");
Initial revision
2001-07-17 05:58:10 +00:00
if (st == "on") // if it reads 'on', do a 30 second prematch
prematchtime = time + 30;
else // if it doesn't read 'on'...
prematchtime = stof(st); // turn the string into a float
if (prematchtime) // if we have prematch
{
prematch = time + prematchtime; // set it
}
else
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
prematch = FALSE; // otherwise, no prematch
Initial revision
2001-07-17 05:58:10 +00:00
// Kill everyone
world -> NIL for null entities. Seems to work (only issue would be borked tests for foo == world -> !foo and for != world -> foo).
2001-11-02 17:00:52 +00:00
/* other = find(NIL, classname, "player");
while (other)
Initial revision
2001-07-17 05:58:10 +00:00
{
world -> NIL for null entities. Seems to work (only issue would be borked tests for foo == world -> !foo and for != world -> foo).
2001-11-02 17:00:52 +00:00
TF_T_Damage(other, NIL, NIL, other.health + 20, TF_TD_IGNOREARMOUR, TF_TD_OTHER);
Initial revision
2001-07-17 05:58:10 +00:00
other = find(other, classname, "player");
} Don't kill everyone here or it drops the flag
*/
// Set up the timer
/*- if (team1rounds < roundstowin && team2rounds < roundstowin && team3rounds < roundstowin && team4rounds < roundstowin)
{
roundtimer = spawn();
roundtimer.think = SetUpChrisRound;
roundtimer.nextthink = time + 5;
prematchtimer = spawn();
prematchtimer.classname == "prematch_timer";
prematchtimer.nextthink = time + prematch;
prematchtimer.think = PrematchBegin;
}
else
{
newmis = spawn();
newmis.nextthink = time + 5;
newmis.think = execute_changelevel;
}
};*/
void() DecodeLevelParms =
{
local string st;
local entity ent;
local float prematchtime;
if (serverflags)
{
if (world.model == "maps/start.bsp")
SetNewParms (); // take away all stuff on starting new episode
}
self.items = parm1;
self.health = parm2;
self.armorvalue = parm3;
self.ammo_shells = parm4;
self.ammo_nails = parm5;
self.ammo_rockets = parm6;
self.ammo_cells = parm7;
self.current_weapon = parm8;
self.armortype = parm9 * 0.01;
- fix uninitialized variable (tesla.qc) - set color and skin when player first connects (client.qc)
2001-08-01 06:08:35 +00:00
SetTeamName (self);
- totally disable TeamFortress_ChecKTeamCheats - fix GetNoPlayers (didn't init num_players) - overhaul the map cycler - automatically restart if a cyclenumber doesn't work - fix minp/maxp - exec mapcfg.cfg each map change (affects minp/maxp) - exec mapcfg/MAP.cfg each map change. (affects minp/maxp) - fix a "rockets explode on observers" bug - make it so colors aren't reset every time you respawn
2001-10-07 22:15:22 +00:00
// SetPlayerColor (self, TeamGetNiceColor (self.team_no), TeamGetColor (self.team_no) - 1);
- fix uninitialized variable (tesla.qc) - set color and skin when player first connects (client.qc)
2001-08-01 06:08:35 +00:00
Initial revision
2001-07-17 05:58:10 +00:00
// TeamFortress Parameters
// Detect whether this is the first entrance into a map
if (toggleflags == 0)
{
toggleflags = parm10;
allow_hook = 0;
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
invis_only = SPY_INVIS_ONLY;
Initial revision
2001-07-17 05:58:10 +00:00
if (coop || !deathmatch)
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
toggleflags = toggleflags | TFLAG_CLASS_PERSIST;
Initial revision
2001-07-17 05:58:10 +00:00
nextmap = mapname;
#ifdef GRAPPLING_HOOK
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
allow_hook = TRUE;
Initial revision
2001-07-17 05:58:10 +00:00
#endif
// Is this a FortressMap?
world -> NIL for null entities. Seems to work (only issue would be borked tests for foo == world -> !foo and for != world -> foo).
2001-11-02 17:00:52 +00:00
ent = find(NIL, classname, "info_tfdetect");
if (ent)
Initial revision
2001-07-17 05:58:10 +00:00
{
// Turn on Teamplay
if (teamplay == 0)
cvar_set("teamplay","21?TeamFortress");
// Parse the rest of the Detection details
ParseTFDetect(ent);
// If the number_of_teams wasn't set, then there's not TF
// spawnpoints on this lvl... so guess at 4 teams.
if (number_of_teams <= 0 || number_of_teams >= 5)
number_of_teams = 4;
}
else
{
// Is this a CTF map?
world -> NIL for null entities. Seems to work (only issue would be borked tests for foo == world -> !foo and for != world -> foo).
2001-11-02 17:00:52 +00:00
ent = find(NIL, classname, "info_player_team1");
if ((ent) || (CTF_Map == TRUE))
Initial revision
2001-07-17 05:58:10 +00:00
{
// Turn on CTF MAP
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
CTF_Map = TRUE;
Initial revision
2001-07-17 05:58:10 +00:00
// Turn on Teamplay
if (teamplay == 0)
cvar_set("teamplay","21?TeamFortress");
// Setup the CTF FlagCheck Timer
ent = spawn();
ent.nextthink = time + 30;
ent.think = CTF_FlagCheck;
number_of_teams = 2;
}
else // Normal map
{
number_of_teams = 4;
}
// set aiming level
#ifndef NET_SERVER
cvar_set("sv_aim", "1");
#endif
// Set life limits
team1lives = -1;
team2lives = -1;
team3lives = -1;
team4lives = -1;
// WK Clear our nextspam counters
team1nextspam = -1;
team2nextspam = -1;
team3nextspam = -1;
team4nextspam = -1;
// Set illegal playerclasses
illegalclasses1 = 0;
illegalclasses2 = 0;
illegalclasses3 = 0;
illegalclasses4 = 0;
// Set Team Limits
team1maxplayers = 100;
team2maxplayers = 100;
team3maxplayers = 100;
team4maxplayers = 100;
civilianteams = 0;
}
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
bprint (PRINT_HIGH, "<EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD>: ");
bprint (PRINT_HIGH, mapname);
bprint (PRINT_HIGH, "\n");
Initial revision
2001-07-17 05:58:10 +00:00
SetupTeamEqualiser();
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
if (NEVER_TEAMFRAGS)
Initial revision
2001-07-17 05:58:10 +00:00
{
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
toggleflags = toggleflags - (toggleflags & TFLAG_TEAMFRAGS);
Initial revision
2001-07-17 05:58:10 +00:00
}
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
if (ALWAYS_TEAMFRAGS)
Initial revision
2001-07-17 05:58:10 +00:00
{
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
toggleflags = toggleflags | TFLAG_TEAMFRAGS;
Initial revision
2001-07-17 05:58:10 +00:00
}
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
if (CHECK_SPEEDS)
Initial revision
2001-07-17 05:58:10 +00:00
{
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
toggleflags = toggleflags | TFLAG_CHEATCHECK;
Initial revision
2001-07-17 05:58:10 +00:00
}
world -> NIL for null entities. Seems to work (only issue would be borked tests for foo == world -> !foo and for != world -> foo).
2001-11-02 17:00:52 +00:00
st = infokey(NIL, "temp1");
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
toggleflags = (toggleflags | TFLAG_FIRSTENTRY | stof(st));
Initial revision
2001-07-17 05:58:10 +00:00
local float autoteam_time;
autoteam_time = 30;
// check all serverinfo settings, to set the appropriate toggleflags
// AUTOTEAM
world -> NIL for null entities. Seems to work (only issue would be borked tests for foo == world -> !foo and for != world -> foo).
2001-11-02 17:00:52 +00:00
st = infokey(NIL, "a");
- some BUGS items - annihilate string_null (and empty_float and vector_null) - remove self.netname = infokey(self, "name");, since the server should do that for us - add a quotename function, to stick \xFF around a name - add a few death messages - set a "timeleft" serverinfo to be the number of minutes left in the game
2001-09-30 22:38:44 +00:00
if (!st)
world -> NIL for null entities. Seems to work (only issue would be borked tests for foo == world -> !foo and for != world -> foo).
2001-11-02 17:00:52 +00:00
st = infokey(NIL, "autoteam");
Initial revision
2001-07-17 05:58:10 +00:00
if (st == "on")
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
toggleflags = toggleflags | TFLAG_AUTOTEAM;
Initial revision
2001-07-17 05:58:10 +00:00
else if (st == "off")
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
toggleflags = toggleflags - (toggleflags & TFLAG_AUTOTEAM);
Initial revision
2001-07-17 05:58:10 +00:00
else if (stof(st) != 0)
{
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
toggleflags = toggleflags | TFLAG_AUTOTEAM;
Initial revision
2001-07-17 05:58:10 +00:00
autoteam_time = stof(st);
}
// TEAMFRAGS
world -> NIL for null entities. Seems to work (only issue would be borked tests for foo == world -> !foo and for != world -> foo).
2001-11-02 17:00:52 +00:00
st = infokey(NIL, "t");
- some BUGS items - annihilate string_null (and empty_float and vector_null) - remove self.netname = infokey(self, "name");, since the server should do that for us - add a quotename function, to stick \xFF around a name - add a few death messages - set a "timeleft" serverinfo to be the number of minutes left in the game
2001-09-30 22:38:44 +00:00
if (!st)
world -> NIL for null entities. Seems to work (only issue would be borked tests for foo == world -> !foo and for != world -> foo).
2001-11-02 17:00:52 +00:00
st = infokey(NIL, "teamfrags");
Initial revision
2001-07-17 05:58:10 +00:00
if (st == "on")
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
toggleflags = toggleflags | TFLAG_TEAMFRAGS;
Initial revision
2001-07-17 05:58:10 +00:00
else if (st == "off")
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
toggleflags = toggleflags - (toggleflags & TFLAG_TEAMFRAGS);
Initial revision
2001-07-17 05:58:10 +00:00
//WK JELLO WATER
world -> NIL for null entities. Seems to work (only issue would be borked tests for foo == world -> !foo and for != world -> foo).
2001-11-02 17:00:52 +00:00
st = infokey(NIL, "j");
- some BUGS items - annihilate string_null (and empty_float and vector_null) - remove self.netname = infokey(self, "name");, since the server should do that for us - add a quotename function, to stick \xFF around a name - add a few death messages - set a "timeleft" serverinfo to be the number of minutes left in the game
2001-09-30 22:38:44 +00:00
if (!st)
world -> NIL for null entities. Seems to work (only issue would be borked tests for foo == world -> !foo and for != world -> foo).
2001-11-02 17:00:52 +00:00
st = infokey(NIL, "jello");
Initial revision
2001-07-17 05:58:10 +00:00
if (st == "on")
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
jello = TRUE;
Initial revision
2001-07-17 05:58:10 +00:00
else {
local float numba;
numba = stof(st);
if (numba)
jello = numba;
else
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
jello = FALSE;
Initial revision
2001-07-17 05:58:10 +00:00
}
//WK JELLO WATER
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
light_damage = FALSE;
world -> NIL for null entities. Seems to work (only issue would be borked tests for foo == world -> !foo and for != world -> foo).
2001-11-02 17:00:52 +00:00
st = infokey(NIL, "ld");
- some BUGS items - annihilate string_null (and empty_float and vector_null) - remove self.netname = infokey(self, "name");, since the server should do that for us - add a quotename function, to stick \xFF around a name - add a few death messages - set a "timeleft" serverinfo to be the number of minutes left in the game
2001-09-30 22:38:44 +00:00
if (!st)
world -> NIL for null entities. Seems to work (only issue would be borked tests for foo == world -> !foo and for != world -> foo).
2001-11-02 17:00:52 +00:00
st = infokey(NIL, "lightdamage");
Initial revision
2001-07-17 05:58:10 +00:00
if (st == "on")
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
light_damage = TRUE;
Initial revision
2001-07-17 05:58:10 +00:00
// SB New, improved TF 2.9 fake prematch mode!
// We can make a class, come in, run around, play tag the flag, but can't do anything
// useful until the prematch is over!
world -> NIL for null entities. Seems to work (only issue would be borked tests for foo == world -> !foo and for != world -> foo).
2001-11-02 17:00:52 +00:00
st = infokey(NIL, "pm");
- some BUGS items - annihilate string_null (and empty_float and vector_null) - remove self.netname = infokey(self, "name");, since the server should do that for us - add a quotename function, to stick \xFF around a name - add a few death messages - set a "timeleft" serverinfo to be the number of minutes left in the game
2001-09-30 22:38:44 +00:00
if (!st) // if 'pm' isn't set, try 'prematch'
world -> NIL for null entities. Seems to work (only issue would be borked tests for foo == world -> !foo and for != world -> foo).
2001-11-02 17:00:52 +00:00
st = infokey(NIL, "prematch");
Initial revision
2001-07-17 05:58:10 +00:00
if (st == "on") // if it reads 'on', do a 30 second prematch
prematchtime = time + 30;
else // if it doesn't read 'on'...
prematchtime = stof(st); // turn the string into a float
if (prematchtime) // if we have prematch
{
prematch = time + prematchtime; // set it
autoteam_time = prematchtime;
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
toggleflags = toggleflags | TFLAG_AUTOTEAM;
Initial revision
2001-07-17 05:58:10 +00:00
}
else
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
prematch = FALSE; // otherwise, no prematch
Initial revision
2001-07-17 05:58:10 +00:00
//WK Bounty System
world -> NIL for null entities. Seems to work (only issue would be borked tests for foo == world -> !foo and for != world -> foo).
2001-11-02 17:00:52 +00:00
st = infokey(NIL, "bounty");
- some BUGS items - annihilate string_null (and empty_float and vector_null) - remove self.netname = infokey(self, "name");, since the server should do that for us - add a quotename function, to stick \xFF around a name - add a few death messages - set a "timeleft" serverinfo to be the number of minutes left in the game
2001-09-30 22:38:44 +00:00
if (!st)
world -> NIL for null entities. Seems to work (only issue would be borked tests for foo == world -> !foo and for != world -> foo).
2001-11-02 17:00:52 +00:00
st = infokey(NIL, "moola");
Initial revision
2001-07-17 05:58:10 +00:00
if (st == "on")
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
bounty = TRUE;
Initial revision
2001-07-17 05:58:10 +00:00
else
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
bounty = FALSE;
Initial revision
2001-07-17 05:58:10 +00:00
//CH Sets the starting amount of money :)
world -> NIL for null entities. Seems to work (only issue would be borked tests for foo == world -> !foo and for != world -> foo).
2001-11-02 17:00:52 +00:00
st = infokey(NIL, "m");
- some BUGS items - annihilate string_null (and empty_float and vector_null) - remove self.netname = infokey(self, "name");, since the server should do that for us - add a quotename function, to stick \xFF around a name - add a few death messages - set a "timeleft" serverinfo to be the number of minutes left in the game
2001-09-30 22:38:44 +00:00
if (!st)
world -> NIL for null entities. Seems to work (only issue would be borked tests for foo == world -> !foo and for != world -> foo).
2001-11-02 17:00:52 +00:00
st = infokey(NIL, "money");
Initial revision
2001-07-17 05:58:10 +00:00
local float numba;
numba = stof(st);
if (numba)
custom_money = numba;
else
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
custom_money = SPENDING_LIMIT;
Initial revision
2001-07-17 05:58:10 +00:00
// GRAPPLING HOOK
world -> NIL for null entities. Seems to work (only issue would be borked tests for foo == world -> !foo and for != world -> foo).
2001-11-02 17:00:52 +00:00
st = infokey(NIL, "g");
- some BUGS items - annihilate string_null (and empty_float and vector_null) - remove self.netname = infokey(self, "name");, since the server should do that for us - add a quotename function, to stick \xFF around a name - add a few death messages - set a "timeleft" serverinfo to be the number of minutes left in the game
2001-09-30 22:38:44 +00:00
if (!st)
world -> NIL for null entities. Seems to work (only issue would be borked tests for foo == world -> !foo and for != world -> foo).
2001-11-02 17:00:52 +00:00
st = infokey(NIL, "grapple");
Initial revision
2001-07-17 05:58:10 +00:00
if (st == "off")
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
allow_hook = FALSE;
if (!(toggleflags & TFLAG_GRAPPLE) && st != "on")
allow_hook = FALSE;
Initial revision
2001-07-17 05:58:10 +00:00
// SPY OFF
world -> NIL for null entities. Seems to work (only issue would be borked tests for foo == world -> !foo and for != world -> foo).
2001-11-02 17:00:52 +00:00
st = infokey(NIL, "spy");
Initial revision
2001-07-17 05:58:10 +00:00
if (st == "off")
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
spy_off = TRUE;
Initial revision
2001-07-17 05:58:10 +00:00
// SPY INVIS ONLY
world -> NIL for null entities. Seems to work (only issue would be borked tests for foo == world -> !foo and for != world -> foo).
2001-11-02 17:00:52 +00:00
st = infokey(NIL, "s");
- some BUGS items - annihilate string_null (and empty_float and vector_null) - remove self.netname = infokey(self, "name");, since the server should do that for us - add a quotename function, to stick \xFF around a name - add a few death messages - set a "timeleft" serverinfo to be the number of minutes left in the game
2001-09-30 22:38:44 +00:00
if (!st)
world -> NIL for null entities. Seems to work (only issue would be borked tests for foo == world -> !foo and for != world -> foo).
2001-11-02 17:00:52 +00:00
st = infokey(NIL, "spyinvis");
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
if (st == "on" || toggleflags & TFLAG_SPYINVIS)
invis_only = TRUE;
Initial revision
2001-07-17 05:58:10 +00:00
else if (st == "off")
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
invis_only = FALSE;
Initial revision
2001-07-17 05:58:10 +00:00
// RespawnDelay
world -> NIL for null entities. Seems to work (only issue would be borked tests for foo == world -> !foo and for != world -> foo).
2001-11-02 17:00:52 +00:00
st = infokey(NIL, "rd");
- some BUGS items - annihilate string_null (and empty_float and vector_null) - remove self.netname = infokey(self, "name");, since the server should do that for us - add a quotename function, to stick \xFF around a name - add a few death messages - set a "timeleft" serverinfo to be the number of minutes left in the game
2001-09-30 22:38:44 +00:00
if (!st)
world -> NIL for null entities. Seems to work (only issue would be borked tests for foo == world -> !foo and for != world -> foo).
2001-11-02 17:00:52 +00:00
st = infokey(NIL, "respawn_delay");
Initial revision
2001-07-17 05:58:10 +00:00
respawn_delay_time = stof(st);
if (respawn_delay_time)
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
toggleflags = toggleflags | TFLAG_RESPAWNDELAY;
Initial revision
2001-07-17 05:58:10 +00:00
// If no Respawndelay has been specified, set the default
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
if (toggleflags & TFLAG_RESPAWNDELAY && respawn_delay_time == 0)
respawn_delay_time = RESPAWN_DELAY_TIME;
Initial revision
2001-07-17 05:58:10 +00:00
// Prevent autoteam from kicking in for 30 seconds.
// Allows restructuring of the teams from the last map nicely.
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
if (toggleflags & TFLAG_AUTOTEAM)
Initial revision
2001-07-17 05:58:10 +00:00
{
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
toggleflags = toggleflags - (toggleflags & TFLAG_AUTOTEAM);
Initial revision
2001-07-17 05:58:10 +00:00
ent = spawn();
ent.nextthink = time + autoteam_time;
ent.think = autoteam_think;
}
- add a "improve_respawns" infokey, which improves the small or slow respawns on mapload. Doesn't work for maps which have several small items though.
2001-09-22 18:38:45 +00:00
world -> NIL for null entities. Seems to work (only issue would be borked tests for foo == world -> !foo and for != world -> foo).
2001-11-02 17:00:52 +00:00
st = infokey (NIL, "improve_respawns");
- add a "improve_respawns" infokey, which improves the small or slow respawns on mapload. Doesn't work for maps which have several small items though.
2001-09-22 18:38:45 +00:00
if (st == "1" || st == "on") {
world -> NIL for null entities. Seems to work (only issue would be borked tests for foo == world -> !foo and for != world -> foo).
2001-11-02 17:00:52 +00:00
local entity ent = NIL;
- add a "improve_respawns" infokey, which improves the small or slow respawns on mapload. Doesn't work for maps which have several small items though.
2001-09-22 18:38:45 +00:00
while (ent = find (ent, classname, "info_tfgoal")) {
if (ent.ammo_shells && ent.ammo_nails
&& ent.ammo_rockets && ent.ammo_cells
&& ent.armorvalue && ent.health) {
if (ent.ammo_shells < 200)
ent.ammo_shells = 200;
if (ent.ammo_nails < 200)
ent.ammo_nails = 200;
if (ent.ammo_rockets < 200)
ent.ammo_rockets = 200;
if (ent.ammo_cells < 200)
ent.ammo_cells = 200;
if (ent.ammo_medikit < 100)
ent.ammo_medikit = 100;
if (ent.ammo_detpack < 2)
ent.ammo_detpack = 2;
if (ent.armortype < 0.8)
ent.armortype = 0.8;
if (ent.armorvalue < 300)
ent.armorvalue = 300;
if (ent.health < 200)
ent.health = 200;
if (ent.wait > 0)
ent.wait = 0.5;
if (ent.no_grenades_1 < 2)
ent.no_grenades_1 = 2;
if (ent.no_grenades_2 < 2)
ent.no_grenades_2 = 2;
}
}
}
Initial revision
2001-07-17 05:58:10 +00:00
}
if (parm11)
self.tfstate = parm11;
if (self.playerclass == 0)
self.playerclass = parm12;
#ifdef STATUSBAR
if (parm13)
self.StatusBarRes = parm13;
if (parm14)
self.StatusBarSize = parm14;
#endif
if (parm15)
self.admin_flag = parm15; //CH Admin status :)
};
/*
============
FindIntermission
Returns the entity to view from
============
*/
entity() FindIntermission =
{
local entity spot;
local float cyc;
// look for info_intermission first
world -> NIL for null entities. Seems to work (only issue would be borked tests for foo == world -> !foo and for != world -> foo).
2001-11-02 17:00:52 +00:00
spot = find (NIL, classname, "info_intermission");
Initial revision
2001-07-17 05:58:10 +00:00
if (spot)
{ // pick a random one
cyc = random() * 1;
// Following removed for the observer code
/*while (cyc > 1)
{
spot = find (spot, classname, "info_intermission");
if (!spot)
spot = find (spot, classname, "info_intermission");
cyc = cyc - 1;
}*/
return spot;
}
// then look for the start position
world -> NIL for null entities. Seems to work (only issue would be borked tests for foo == world -> !foo and for != world -> foo).
2001-11-02 17:00:52 +00:00
spot = find (NIL, classname, "info_player_start");
Initial revision
2001-07-17 05:58:10 +00:00
if (spot)
return spot;
// then look through the deathmatch starts
world -> NIL for null entities. Seems to work (only issue would be borked tests for foo == world -> !foo and for != world -> foo).
2001-11-02 17:00:52 +00:00
spot = find (NIL, classname, "info_player_deathmatch");
Initial revision
2001-07-17 05:58:10 +00:00
if (spot)
{
// pick a random one
cyc = random() * 6;
while (cyc > 1)
{
spot = find (spot, classname, "info_player_deathmatch");
if (!spot)
spot = find (spot, classname, "info_player_deathmatch");
cyc = cyc - 1;
}
return spot;
}
objerror ("FindIntermission: no spot");
};
/*===========================
FindNextIntermission
returns the next intermission point
===========================*/
entity (entity start_point) FindNextIntermission =
{
local entity spot;
if (deathmatch)
{
// look through info_intermission first
world -> NIL for null entities. Seems to work (only issue would be borked tests for foo == world -> !foo and for != world -> foo).
2001-11-02 17:00:52 +00:00
if (start_point.classname == "info_intermission" || !start_point)
Initial revision
2001-07-17 05:58:10 +00:00
{
spot = find (start_point, classname, "info_intermission");
if (spot)
return spot;
else
world -> NIL for null entities. Seems to work (only issue would be borked tests for foo == world -> !foo and for != world -> foo).
2001-11-02 17:00:52 +00:00
start_point = NIL;
Initial revision
2001-07-17 05:58:10 +00:00
}
// then look through the deathmatch starts
world -> NIL for null entities. Seems to work (only issue would be borked tests for foo == world -> !foo and for != world -> foo).
2001-11-02 17:00:52 +00:00
if (start_point.classname == "info_player_deathmatch" || !start_point)
Initial revision
2001-07-17 05:58:10 +00:00
{
spot = find (start_point, classname, "info_player_deathmatch");
if (spot)
return spot;
}
// at the end of the list
world -> NIL for null entities. Seems to work (only issue would be borked tests for foo == world -> !foo and for != world -> foo).
2001-11-02 17:00:52 +00:00
spot = find (NIL, classname, "info_intermission");
Initial revision
2001-07-17 05:58:10 +00:00
if (spot)
return spot;
world -> NIL for null entities. Seems to work (only issue would be borked tests for foo == world -> !foo and for != world -> foo).
2001-11-02 17:00:52 +00:00
spot = find (NIL, classname, "info_player_deathmatch");
Initial revision
2001-07-17 05:58:10 +00:00
if (spot)
return spot;
}
else // do not cycle though in co-op or single
{
world -> NIL for null entities. Seems to work (only issue would be borked tests for foo == world -> !foo and for != world -> foo).
2001-11-02 17:00:52 +00:00
spot = find (NIL, classname, "info_player_start");
Initial revision
2001-07-17 05:58:10 +00:00
if (spot)
return spot;
}
// it should never reach this point
return FindIntermission();
};
/*==================================================
TF_MovePlayer
Moves the player to another intermission viewpoint
====================================================*/
void() TF_MovePlayer =
{
local entity place;
place = FindNextIntermission(self.observer_list);
self.observer_list = place;
setorigin(self, place.origin + '0 0 1');
self.angles = place.angles;
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
self.fixangle = TRUE; // turn this way immediately
Initial revision
2001-07-17 05:58:10 +00:00
};
float() GetNoPlayers;
#define CYCLED 2
float() DoExtraCycle =
{
//-------------------------------------------------//
//- OfN - I tried to make this work like in tf2.8 -//
- totally disable TeamFortress_ChecKTeamCheats - fix GetNoPlayers (didn't init num_players) - overhaul the map cycler - automatically restart if a cyclenumber doesn't work - fix minp/maxp - exec mapcfg.cfg each map change (affects minp/maxp) - exec mapcfg/MAP.cfg each map change. (affects minp/maxp) - fix a "rockets explode on observers" bug - make it so colors aren't reset every time you respawn
2001-10-07 22:15:22 +00:00
local string nmap, temp;
world -> NIL for null entities. Seems to work (only issue would be borked tests for foo == world -> !foo and for != world -> foo).
2001-11-02 17:00:52 +00:00
nmap = infokey(NIL, "nmap");
- totally disable TeamFortress_ChecKTeamCheats - fix GetNoPlayers (didn't init num_players) - overhaul the map cycler - automatically restart if a cyclenumber doesn't work - fix minp/maxp - exec mapcfg.cfg each map change (affects minp/maxp) - exec mapcfg/MAP.cfg each map change. (affects minp/maxp) - fix a "rockets explode on observers" bug - make it so colors aren't reset every time you respawn
2001-10-07 22:15:22 +00:00
if (nmap) {
Initial revision
2001-07-17 05:58:10 +00:00
local float minplayers, maxplayers, itsok, currentpl;
world -> NIL for null entities. Seems to work (only issue would be borked tests for foo == world -> !foo and for != world -> foo).
2001-11-02 17:00:52 +00:00
if (infokey(NIL,"minp")!="")
minplayers = stof(infokey(NIL,"minp"));
Initial revision
2001-07-17 05:58:10 +00:00
else
minplayers = 0;
world -> NIL for null entities. Seems to work (only issue would be borked tests for foo == world -> !foo and for != world -> foo).
2001-11-02 17:00:52 +00:00
if (infokey(NIL,"maxp")!="")
maxplayers = stof(infokey(NIL,"maxp"));
Initial revision
2001-07-17 05:58:10 +00:00
else
maxplayers = 32;
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
itsok = TRUE;
Initial revision
2001-07-17 05:58:10 +00:00
currentpl = GetNoPlayers();
//check conditions
- totally disable TeamFortress_ChecKTeamCheats - fix GetNoPlayers (didn't init num_players) - overhaul the map cycler - automatically restart if a cyclenumber doesn't work - fix minp/maxp - exec mapcfg.cfg each map change (affects minp/maxp) - exec mapcfg/MAP.cfg each map change. (affects minp/maxp) - fix a "rockets explode on observers" bug - make it so colors aren't reset every time you respawn
2001-10-07 22:15:22 +00:00
if (minplayers > currentpl) {
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
bprint(PRINT_HIGH,"Map ");
world -> NIL for null entities. Seems to work (only issue would be borked tests for foo == world -> !foo and for != world -> foo).
2001-11-02 17:00:52 +00:00
nmap = infokey(NIL, "nmap");
- totally disable TeamFortress_ChecKTeamCheats - fix GetNoPlayers (didn't init num_players) - overhaul the map cycler - automatically restart if a cyclenumber doesn't work - fix minp/maxp - exec mapcfg.cfg each map change (affects minp/maxp) - exec mapcfg/MAP.cfg each map change. (affects minp/maxp) - fix a "rockets explode on observers" bug - make it so colors aren't reset every time you respawn
2001-10-07 22:15:22 +00:00
bprint(PRINT_HIGH, nmap);
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
bprint(PRINT_HIGH," skipped - minimum players ");
Initial revision
2001-07-17 05:58:10 +00:00
temp = ftos(minplayers);
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
bprint(PRINT_HIGH, temp);
bprint(PRINT_HIGH," (currently ");
Initial revision
2001-07-17 05:58:10 +00:00
temp = ftos(currentpl);
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
bprint(PRINT_HIGH, temp);
bprint(PRINT_HIGH,")\n");
itsok = FALSE;
- totally disable TeamFortress_ChecKTeamCheats - fix GetNoPlayers (didn't init num_players) - overhaul the map cycler - automatically restart if a cyclenumber doesn't work - fix minp/maxp - exec mapcfg.cfg each map change (affects minp/maxp) - exec mapcfg/MAP.cfg each map change. (affects minp/maxp) - fix a "rockets explode on observers" bug - make it so colors aren't reset every time you respawn
2001-10-07 22:15:22 +00:00
} else {
if (maxplayers < currentpl) {
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
bprint(PRINT_HIGH,"Map ");
world -> NIL for null entities. Seems to work (only issue would be borked tests for foo == world -> !foo and for != world -> foo).
2001-11-02 17:00:52 +00:00
nmap = infokey(NIL, "nmap");
- totally disable TeamFortress_ChecKTeamCheats - fix GetNoPlayers (didn't init num_players) - overhaul the map cycler - automatically restart if a cyclenumber doesn't work - fix minp/maxp - exec mapcfg.cfg each map change (affects minp/maxp) - exec mapcfg/MAP.cfg each map change. (affects minp/maxp) - fix a "rockets explode on observers" bug - make it so colors aren't reset every time you respawn
2001-10-07 22:15:22 +00:00
bprint(PRINT_HIGH, nmap);
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
bprint(PRINT_HIGH," skipped - maximum players ");
Initial revision
2001-07-17 05:58:10 +00:00
temp = ftos(maxplayers);
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
bprint(PRINT_HIGH,temp);
bprint(PRINT_HIGH," (currently ");
Initial revision
2001-07-17 05:58:10 +00:00
temp = ftos(currentpl);
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
bprint(PRINT_HIGH,temp);
bprint(PRINT_HIGH,")\n");
itsok = FALSE;
Initial revision
2001-07-17 05:58:10 +00:00
}
}
//cleanup..
localcmd("localinfo minp \"\"\n");
localcmd("localinfo maxp \"\"\n");
//locals clean
//execute map conditions ok
- totally disable TeamFortress_ChecKTeamCheats - fix GetNoPlayers (didn't init num_players) - overhaul the map cycler - automatically restart if a cyclenumber doesn't work - fix minp/maxp - exec mapcfg.cfg each map change (affects minp/maxp) - exec mapcfg/MAP.cfg each map change. (affects minp/maxp) - fix a "rockets explode on observers" bug - make it so colors aren't reset every time you respawn
2001-10-07 22:15:22 +00:00
if (itsok) {
world -> NIL for null entities. Seems to work (only issue would be borked tests for foo == world -> !foo and for != world -> foo).
2001-11-02 17:00:52 +00:00
nmap = infokey(NIL, "nmap");
Initial revision
2001-07-17 05:58:10 +00:00
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
bprint(PRINT_HIGH,"\nLoading ");
- totally disable TeamFortress_ChecKTeamCheats - fix GetNoPlayers (didn't init num_players) - overhaul the map cycler - automatically restart if a cyclenumber doesn't work - fix minp/maxp - exec mapcfg.cfg each map change (affects minp/maxp) - exec mapcfg/MAP.cfg each map change. (affects minp/maxp) - fix a "rockets explode on observers" bug - make it so colors aren't reset every time you respawn
2001-10-07 22:15:22 +00:00
bprint(PRINT_HIGH,nmap);
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
bprint(PRINT_HIGH," map file...\n");
Initial revision
2001-07-17 05:58:10 +00:00
localcmd("localinfo nmap \"\"\n");
localcmd("map ");
- totally disable TeamFortress_ChecKTeamCheats - fix GetNoPlayers (didn't init num_players) - overhaul the map cycler - automatically restart if a cyclenumber doesn't work - fix minp/maxp - exec mapcfg.cfg each map change (affects minp/maxp) - exec mapcfg/MAP.cfg each map change. (affects minp/maxp) - fix a "rockets explode on observers" bug - make it so colors aren't reset every time you respawn
2001-10-07 22:15:22 +00:00
localcmd(nmap);
Initial revision
2001-07-17 05:58:10 +00:00
localcmd("\n");
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
return TRUE;
- totally disable TeamFortress_ChecKTeamCheats - fix GetNoPlayers (didn't init num_players) - overhaul the map cycler - automatically restart if a cyclenumber doesn't work - fix minp/maxp - exec mapcfg.cfg each map change (affects minp/maxp) - exec mapcfg/MAP.cfg each map change. (affects minp/maxp) - fix a "rockets explode on observers" bug - make it so colors aren't reset every time you respawn
2001-10-07 22:15:22 +00:00
} else { //conditions not passed...
localcmd("localinfo nmap \"\"\n");
return FALSE;
}
} else if (already_chosen_map == MAP_LOADCYCLE) {
world -> NIL for null entities. Seems to work (only issue would be borked tests for foo == world -> !foo and for != world -> foo).
2001-11-02 17:00:52 +00:00
local string st = infokey (NIL, "loopcycle");
- totally disable TeamFortress_ChecKTeamCheats - fix GetNoPlayers (didn't init num_players) - overhaul the map cycler - automatically restart if a cyclenumber doesn't work - fix minp/maxp - exec mapcfg.cfg each map change (affects minp/maxp) - exec mapcfg/MAP.cfg each map change. (affects minp/maxp) - fix a "rockets explode on observers" bug - make it so colors aren't reset every time you respawn
2001-10-07 22:15:22 +00:00
if (st != "0" && st != "off") {
dprint ("No map loaded, restarting map cycle\n");
SetNextMapNum (0);
}
}
Initial revision
2001-07-17 05:58:10 +00:00
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
return FALSE;
Initial revision
2001-07-17 05:58:10 +00:00
};
void() GotoNextMap;
void() cycle_timer_think =
{
GotoNextMap();
dremove(self);
};
void() SetCycleTimer =
{
newmis = spawn();
newmis.classname = "cyclemap_timer";
newmis.nextthink = time + 0.1;
newmis.think = cycle_timer_think;
};
- added some items to BUGS and TODO - reworked map cycler so that it saves the map number to cf/nextmapnum, and restores it in case of a crash - add a cyclenow infokey, which causes the timelimit to be hit instantly. needed because the map cycling doesn't kick in until the timelimit is reached - add cf/mapcycle which contains the names of maps to be cycled (seperated by nuls). it overwrites the normal "exec qwmcycle/map1.cfg" behavior. - change the MOTD time to 15 seconds (from 24.2) - make mapcfg.cfg exec'd if mapcfg is enabled (so you can reset the config vars - add a thing to enable sv_gc if it's disabled. (I'm using string appending now)
2001-07-23 15:08:39 +00:00
float() GetNextMapNum =
{
local float desc;
local string st;
local string infostring;
- BUGS/TODO - clean up GetNextMapNum, as well as handling an unset maxmapnum - remove an extra obituary print (leftover from my cleanups) - cleanup UserInfoCallback a bit - little tweak to Multi_Finish - make it so friends{1,2,3,4}_mask infokeys override the map values if set, so you can force friendly teams on broken maps
2001-10-05 23:05:28 +00:00
local float num;
local string maxmapnum;
- added some items to BUGS and TODO - reworked map cycler so that it saves the map number to cf/nextmapnum, and restores it in case of a crash - add a cyclenow infokey, which causes the timelimit to be hit instantly. needed because the map cycling doesn't kick in until the timelimit is reached - add cf/mapcycle which contains the names of maps to be cycled (seperated by nuls). it overwrites the normal "exec qwmcycle/map1.cfg" behavior. - change the MOTD time to 15 seconds (from 24.2) - make mapcfg.cfg exec'd if mapcfg is enabled (so you can reset the config vars - add a thing to enable sv_gc if it's disabled. (I'm using string appending now)
2001-07-23 15:08:39 +00:00
world -> NIL for null entities. Seems to work (only issue would be borked tests for foo == world -> !foo and for != world -> foo).
2001-11-02 17:00:52 +00:00
infostring = infokey (NIL, "n");
- BUGS/TODO - clean up GetNextMapNum, as well as handling an unset maxmapnum - remove an extra obituary print (leftover from my cleanups) - cleanup UserInfoCallback a bit - little tweak to Multi_Finish - make it so friends{1,2,3,4}_mask infokeys override the map values if set, so you can force friendly teams on broken maps
2001-10-05 23:05:28 +00:00
num = stof (infostring);
world -> NIL for null entities. Seems to work (only issue would be borked tests for foo == world -> !foo and for != world -> foo).
2001-11-02 17:00:52 +00:00
maxmapnum = infokey (NIL, "maxmapnum");
- BUGS/TODO - clean up GetNextMapNum, as well as handling an unset maxmapnum - remove an extra obituary print (leftover from my cleanups) - cleanup UserInfoCallback a bit - little tweak to Multi_Finish - make it so friends{1,2,3,4}_mask infokeys override the map values if set, so you can force friendly teams on broken maps
2001-10-05 23:05:28 +00:00
if (!infostring) { // always use info when available
if (cvar ("crudefile_quota") >= 0) {
desc = cfopen ("nextmapnum", "r");
if (desc >= 0) {
st = cfread (desc);
if (st)
num = stof (st);
cfclose (desc);
}
}
- added some items to BUGS and TODO - reworked map cycler so that it saves the map number to cf/nextmapnum, and restores it in case of a crash - add a cyclenow infokey, which causes the timelimit to be hit instantly. needed because the map cycling doesn't kick in until the timelimit is reached - add cf/mapcycle which contains the names of maps to be cycled (seperated by nuls). it overwrites the normal "exec qwmcycle/map1.cfg" behavior. - change the MOTD time to 15 seconds (from 24.2) - make mapcfg.cfg exec'd if mapcfg is enabled (so you can reset the config vars - add a thing to enable sv_gc if it's disabled. (I'm using string appending now)
2001-07-23 15:08:39 +00:00
}
- BUGS/TODO - clean up GetNextMapNum, as well as handling an unset maxmapnum - remove an extra obituary print (leftover from my cleanups) - cleanup UserInfoCallback a bit - little tweak to Multi_Finish - make it so friends{1,2,3,4}_mask infokeys override the map values if set, so you can force friendly teams on broken maps
2001-10-05 23:05:28 +00:00
if (!maxmapnum)
return num;
- totally disable TeamFortress_ChecKTeamCheats - fix GetNoPlayers (didn't init num_players) - overhaul the map cycler - automatically restart if a cyclenumber doesn't work - fix minp/maxp - exec mapcfg.cfg each map change (affects minp/maxp) - exec mapcfg/MAP.cfg each map change. (affects minp/maxp) - fix a "rockets explode on observers" bug - make it so colors aren't reset every time you respawn
2001-10-07 22:15:22 +00:00
if (num > stof (maxmapnum))
- BUGS/TODO - clean up GetNextMapNum, as well as handling an unset maxmapnum - remove an extra obituary print (leftover from my cleanups) - cleanup UserInfoCallback a bit - little tweak to Multi_Finish - make it so friends{1,2,3,4}_mask infokeys override the map values if set, so you can force friendly teams on broken maps
2001-10-05 23:05:28 +00:00
return 0;
else
return num;
- added some items to BUGS and TODO - reworked map cycler so that it saves the map number to cf/nextmapnum, and restores it in case of a crash - add a cyclenow infokey, which causes the timelimit to be hit instantly. needed because the map cycling doesn't kick in until the timelimit is reached - add cf/mapcycle which contains the names of maps to be cycled (seperated by nuls). it overwrites the normal "exec qwmcycle/map1.cfg" behavior. - change the MOTD time to 15 seconds (from 24.2) - make mapcfg.cfg exec'd if mapcfg is enabled (so you can reset the config vars - add a thing to enable sv_gc if it's disabled. (I'm using string appending now)
2001-07-23 15:08:39 +00:00
};
void(float mapnum) SetNextMapNum =
{
local float desc;
local string mapstring;
mapstring = ftos (mapnum);
if (cvar("crudefile_quota") >= 0)
{
desc = cfopen ("nextmapnum", "w");
// if nextmapnum has a num in it, but we can't modify it.. stuck in a loop
if (desc >= 0)
{
cfwrite (desc, mapstring);
cfclose (desc);
}
}
localcmd("serverinfo n \"\"\n"); // use localinfo instead
localcmd("localinfo n ");
localcmd(mapstring);
localcmd("\n");
world -> NIL for null entities. Seems to work (only issue would be borked tests for foo == world -> !foo and for != world -> foo).
2001-11-02 17:00:52 +00:00
setinfokey (NIL, "n", mapstring);
- added some items to BUGS and TODO - reworked map cycler so that it saves the map number to cf/nextmapnum, and restores it in case of a crash - add a cyclenow infokey, which causes the timelimit to be hit instantly. needed because the map cycling doesn't kick in until the timelimit is reached - add cf/mapcycle which contains the names of maps to be cycled (seperated by nuls). it overwrites the normal "exec qwmcycle/map1.cfg" behavior. - change the MOTD time to 15 seconds (from 24.2) - make mapcfg.cfg exec'd if mapcfg is enabled (so you can reset the config vars - add a thing to enable sv_gc if it's disabled. (I'm using string appending now)
2001-07-23 15:08:39 +00:00
};
void() LoadNextMap =
Initial revision
2001-07-17 05:58:10 +00:00
{
local float nextlevel;
local string cyc;
- added some items to BUGS and TODO - reworked map cycler so that it saves the map number to cf/nextmapnum, and restores it in case of a crash - add a cyclenow infokey, which causes the timelimit to be hit instantly. needed because the map cycling doesn't kick in until the timelimit is reached - add cf/mapcycle which contains the names of maps to be cycled (seperated by nuls). it overwrites the normal "exec qwmcycle/map1.cfg" behavior. - change the MOTD time to 15 seconds (from 24.2) - make mapcfg.cfg exec'd if mapcfg is enabled (so you can reset the config vars - add a thing to enable sv_gc if it's disabled. (I'm using string appending now)
2001-07-23 15:08:39 +00:00
local float desc;
local float mapcount;
more uninit var cleanup
2001-10-19 07:34:22 +00:00
local string map = "";
- added some items to BUGS and TODO - reworked map cycler so that it saves the map number to cf/nextmapnum, and restores it in case of a crash - add a cyclenow infokey, which causes the timelimit to be hit instantly. needed because the map cycling doesn't kick in until the timelimit is reached - add cf/mapcycle which contains the names of maps to be cycled (seperated by nuls). it overwrites the normal "exec qwmcycle/map1.cfg" behavior. - change the MOTD time to 15 seconds (from 24.2) - make mapcfg.cfg exec'd if mapcfg is enabled (so you can reset the config vars - add a thing to enable sv_gc if it's disabled. (I'm using string appending now)
2001-07-23 15:08:39 +00:00
nextlevel = GetNextMapNum();
nextlevel = nextlevel + 1; // next level
SetNextMapNum(nextlevel);
// get count of maps
mapcount = 0;
desc = cfopen ("mapcycle", "r");
while (cfread(desc) != "")
mapcount = mapcount + 1;
call cfclose with desc rather than the file name
2001-07-23 18:54:41 +00:00
cfclose (desc);
- added some items to BUGS and TODO - reworked map cycler so that it saves the map number to cf/nextmapnum, and restores it in case of a crash - add a cyclenow infokey, which causes the timelimit to be hit instantly. needed because the map cycling doesn't kick in until the timelimit is reached - add cf/mapcycle which contains the names of maps to be cycled (seperated by nuls). it overwrites the normal "exec qwmcycle/map1.cfg" behavior. - change the MOTD time to 15 seconds (from 24.2) - make mapcfg.cfg exec'd if mapcfg is enabled (so you can reset the config vars - add a thing to enable sv_gc if it's disabled. (I'm using string appending now)
2001-07-23 15:08:39 +00:00
if (mapcount > 0)
{
if (nextlevel > mapcount)
{
while (nextlevel > mapcount)
nextlevel = nextlevel - mapcount;
SetNextMapNum (nextlevel);
}
desc = cfopen ("mapcycle", "r");
local float i;
i = 0;
while (i < nextlevel)
{
i = i + 1;
map = cfread(desc);
}
if (map == "")
mapcount = 0; // fall back to old mapcycle method
else
localcmd ("map " + map + "\n");
}
if (mapcount == 0)
{
world -> NIL for null entities. Seems to work (only issue would be borked tests for foo == world -> !foo and for != world -> foo).
2001-11-02 17:00:52 +00:00
cyc = infokey(NIL, "cycledir");
- some BUGS items - annihilate string_null (and empty_float and vector_null) - remove self.netname = infokey(self, "name");, since the server should do that for us - add a quotename function, to stick \xFF around a name - add a few death messages - set a "timeleft" serverinfo to be the number of minutes left in the game
2001-09-30 22:38:44 +00:00
if (!cyc)
- added some items to BUGS and TODO - reworked map cycler so that it saves the map number to cf/nextmapnum, and restores it in case of a crash - add a cyclenow infokey, which causes the timelimit to be hit instantly. needed because the map cycling doesn't kick in until the timelimit is reached - add cf/mapcycle which contains the names of maps to be cycled (seperated by nuls). it overwrites the normal "exec qwmcycle/map1.cfg" behavior. - change the MOTD time to 15 seconds (from 24.2) - make mapcfg.cfg exec'd if mapcfg is enabled (so you can reset the config vars - add a thing to enable sv_gc if it's disabled. (I'm using string appending now)
2001-07-23 15:08:39 +00:00
cyc = "qwmcycle";
localcmd("exec ");
localcmd(cyc);
localcmd("/map");
localcmd(ftos(nextlevel));
localcmd(".cfg\n");
- totally disable TeamFortress_ChecKTeamCheats - fix GetNoPlayers (didn't init num_players) - overhaul the map cycler - automatically restart if a cyclenumber doesn't work - fix minp/maxp - exec mapcfg.cfg each map change (affects minp/maxp) - exec mapcfg/MAP.cfg each map change. (affects minp/maxp) - fix a "rockets explode on observers" bug - make it so colors aren't reset every time you respawn
2001-10-07 22:15:22 +00:00
already_chosen_map = MAP_LOADCYCLE;
- added some items to BUGS and TODO - reworked map cycler so that it saves the map number to cf/nextmapnum, and restores it in case of a crash - add a cyclenow infokey, which causes the timelimit to be hit instantly. needed because the map cycling doesn't kick in until the timelimit is reached - add cf/mapcycle which contains the names of maps to be cycled (seperated by nuls). it overwrites the normal "exec qwmcycle/map1.cfg" behavior. - change the MOTD time to 15 seconds (from 24.2) - make mapcfg.cfg exec'd if mapcfg is enabled (so you can reset the config vars - add a thing to enable sv_gc if it's disabled. (I'm using string appending now)
2001-07-23 15:08:39 +00:00
}
};
void() GotoNextMap =
{
Initial revision
2001-07-17 05:58:10 +00:00
if (nextmap != mapname)
{
changelevel(nextmap);
- totally disable TeamFortress_ChecKTeamCheats - fix GetNoPlayers (didn't init num_players) - overhaul the map cycler - automatically restart if a cyclenumber doesn't work - fix minp/maxp - exec mapcfg.cfg each map change (affects minp/maxp) - exec mapcfg/MAP.cfg each map change. (affects minp/maxp) - fix a "rockets explode on observers" bug - make it so colors aren't reset every time you respawn
2001-10-07 22:15:22 +00:00
already_chosen_map = MAP_YES;
Initial revision
2001-07-17 05:58:10 +00:00
}
- totally disable TeamFortress_ChecKTeamCheats - fix GetNoPlayers (didn't init num_players) - overhaul the map cycler - automatically restart if a cyclenumber doesn't work - fix minp/maxp - exec mapcfg.cfg each map change (affects minp/maxp) - exec mapcfg/MAP.cfg each map change. (affects minp/maxp) - fix a "rockets explode on observers" bug - make it so colors aren't reset every time you respawn
2001-10-07 22:15:22 +00:00
if (already_chosen_map != MAP_YES)
Initial revision
2001-07-17 05:58:10 +00:00
{
world -> NIL for null entities. Seems to work (only issue would be borked tests for foo == world -> !foo and for != world -> foo).
2001-11-02 17:00:52 +00:00
local string nmap = infokey (NIL, "nmap");
- totally disable TeamFortress_ChecKTeamCheats - fix GetNoPlayers (didn't init num_players) - overhaul the map cycler - automatically restart if a cyclenumber doesn't work - fix minp/maxp - exec mapcfg.cfg each map change (affects minp/maxp) - exec mapcfg/MAP.cfg each map change. (affects minp/maxp) - fix a "rockets explode on observers" bug - make it so colors aren't reset every time you respawn
2001-10-07 22:15:22 +00:00
if (already_chosen_map == MAP_LOADCYCLE && nmap) {
// load up the map config
localcmd ("exec \"mapcfg.cfg\"\n");
localcmd ("exec \"mapcfg/" + nmap + ".cfg\"\n");
already_chosen_map = MAP_LOADCONFIG;
} else if (DoExtraCycle())
already_chosen_map = MAP_LOADCYCLE;
Initial revision
2001-07-17 05:58:10 +00:00
else
- totally disable TeamFortress_ChecKTeamCheats - fix GetNoPlayers (didn't init num_players) - overhaul the map cycler - automatically restart if a cyclenumber doesn't work - fix minp/maxp - exec mapcfg.cfg each map change (affects minp/maxp) - exec mapcfg/MAP.cfg each map change. (affects minp/maxp) - fix a "rockets explode on observers" bug - make it so colors aren't reset every time you respawn
2001-10-07 22:15:22 +00:00
already_chosen_map = MAP_NO;
Initial revision
2001-07-17 05:58:10 +00:00
}
//- OfN - super new map cycling code :)
- totally disable TeamFortress_ChecKTeamCheats - fix GetNoPlayers (didn't init num_players) - overhaul the map cycler - automatically restart if a cyclenumber doesn't work - fix minp/maxp - exec mapcfg.cfg each map change (affects minp/maxp) - exec mapcfg/MAP.cfg each map change. (affects minp/maxp) - fix a "rockets explode on observers" bug - make it so colors aren't reset every time you respawn
2001-10-07 22:15:22 +00:00
if (already_chosen_map == MAP_NO)
- added some items to BUGS and TODO - reworked map cycler so that it saves the map number to cf/nextmapnum, and restores it in case of a crash - add a cyclenow infokey, which causes the timelimit to be hit instantly. needed because the map cycling doesn't kick in until the timelimit is reached - add cf/mapcycle which contains the names of maps to be cycled (seperated by nuls). it overwrites the normal "exec qwmcycle/map1.cfg" behavior. - change the MOTD time to 15 seconds (from 24.2) - make mapcfg.cfg exec'd if mapcfg is enabled (so you can reset the config vars - add a thing to enable sv_gc if it's disabled. (I'm using string appending now)
2001-07-23 15:08:39 +00:00
LoadNextMap();
Initial revision
2001-07-17 05:58:10 +00:00
- added some items to BUGS and TODO - reworked map cycler so that it saves the map number to cf/nextmapnum, and restores it in case of a crash - add a cyclenow infokey, which causes the timelimit to be hit instantly. needed because the map cycling doesn't kick in until the timelimit is reached - add cf/mapcycle which contains the names of maps to be cycled (seperated by nuls). it overwrites the normal "exec qwmcycle/map1.cfg" behavior. - change the MOTD time to 15 seconds (from 24.2) - make mapcfg.cfg exec'd if mapcfg is enabled (so you can reset the config vars - add a thing to enable sv_gc if it's disabled. (I'm using string appending now)
2001-07-23 15:08:39 +00:00
if (GetNextMapNum() == 0)
- totally disable TeamFortress_ChecKTeamCheats - fix GetNoPlayers (didn't init num_players) - overhaul the map cycler - automatically restart if a cyclenumber doesn't work - fix minp/maxp - exec mapcfg.cfg each map change (affects minp/maxp) - exec mapcfg/MAP.cfg each map change. (affects minp/maxp) - fix a "rockets explode on observers" bug - make it so colors aren't reset every time you respawn
2001-10-07 22:15:22 +00:00
already_chosen_map = MAP_NO;
Initial revision
2001-07-17 05:58:10 +00:00
- totally disable TeamFortress_ChecKTeamCheats - fix GetNoPlayers (didn't init num_players) - overhaul the map cycler - automatically restart if a cyclenumber doesn't work - fix minp/maxp - exec mapcfg.cfg each map change (affects minp/maxp) - exec mapcfg/MAP.cfg each map change. (affects minp/maxp) - fix a "rockets explode on observers" bug - make it so colors aren't reset every time you respawn
2001-10-07 22:15:22 +00:00
if (already_chosen_map == MAP_NO) // nothing was done yet, so set the damn timer..
Initial revision
2001-07-17 05:58:10 +00:00
{
SetCycleTimer();
return;
}
- totally disable TeamFortress_ChecKTeamCheats - fix GetNoPlayers (didn't init num_players) - overhaul the map cycler - automatically restart if a cyclenumber doesn't work - fix minp/maxp - exec mapcfg.cfg each map change (affects minp/maxp) - exec mapcfg/MAP.cfg each map change. (affects minp/maxp) - fix a "rockets explode on observers" bug - make it so colors aren't reset every time you respawn
2001-10-07 22:15:22 +00:00
// if we executed a mapx.cfg
if (already_chosen_map == MAP_LOADCYCLE ||
already_chosen_map == MAP_LOADCONFIG)
Initial revision
2001-07-17 05:58:10 +00:00
SetCycleTimer(); // set the timer to check the real map afte 0.1 seconds
};
void() ExitIntermission =
{
RPrint("Exiting intermission...\n");
// skip any text in deathmatch
if (deathmatch)
{
RPrint("Exit Intermission in Deathmatch.\n");
GotoNextMap ();
return;
}
intermission_exittime = time + 1;
intermission_running = intermission_running + 1;
//
// run some text if at the end of an episode
//
if (intermission_running == 2)
{
if (world.model == "maps/e1m7.bsp")
{
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
WriteByte (MSG_ALL, SVC_CDTRACK);
WriteByte (MSG_ALL, 2);
WriteByte (MSG_ALL, 3);
Initial revision
2001-07-17 05:58:10 +00:00
if (!cvar("registered"))
{
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
WriteByte (MSG_ALL, SVC_FINALE);
WriteString (MSG_ALL, "As the corpse of the monstrous entity\nChthon sinks back into the lava whence\nit rose, you grip the Rune of Earth\nMagic tightly. Now that you have\nconquered the Dimension of the Doomed,\nrealm of Earth Magic, you are ready to\ncomplete your task in the other three\nhaunted lands of Quake. Or are you? If\nyou don't register Quake, you'll never\nknow what awaits you in the Realm of\nBlack Magic, the Netherworld, and the\nElder World!");
Initial revision
2001-07-17 05:58:10 +00:00
}
else
{
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
WriteByte (MSG_ALL, SVC_FINALE);
WriteString (MSG_ALL, "As the corpse of the monstrous entity\nChthon sinks back into the lava whence\nit rose, you grip the Rune of Earth\nMagic tightly. Now that you have\nconquered the Dimension of the Doomed,\nrealm of Earth Magic, you are ready to\ncomplete your task. A Rune of magic\npower lies at the end of each haunted\nland of Quake. Go forth, seek the\ntotality of the four Runes!");
Initial revision
2001-07-17 05:58:10 +00:00
}
return;
}
else if (world.model == "maps/e2m6.bsp")
{
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
WriteByte (MSG_ALL, SVC_CDTRACK);
WriteByte (MSG_ALL, 2);
WriteByte (MSG_ALL, 3);
Initial revision
2001-07-17 05:58:10 +00:00
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
WriteByte (MSG_ALL, SVC_FINALE);
WriteString (MSG_ALL, "The Rune of Black Magic throbs evilly in\nyour hand and whispers dark thoughts\ninto your brain. You learn the inmost\nlore of the Hell-Mother; Shub-Niggurath!\nYou now know that she is behind all the\nterrible plotting which has led to so\nmuch death and horror. But she is not\ninviolate! Armed with this Rune, you\nrealize that once all four Runes are\ncombined, the gate to Shub-Niggurath's\nPit will open, and you can face the\nWitch-Goddess herself in her frightful\notherworld cathedral.");
Initial revision
2001-07-17 05:58:10 +00:00
return;
}
else if (world.model == "maps/e3m6.bsp")
{
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
WriteByte (MSG_ALL, SVC_CDTRACK);
WriteByte (MSG_ALL, 2);
WriteByte (MSG_ALL, 3);
Initial revision
2001-07-17 05:58:10 +00:00
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
WriteByte (MSG_ALL, SVC_FINALE);
WriteString (MSG_ALL, "The charred viscera of diabolic horrors\nbubble viscously as you seize the Rune\nof Hell Magic. Its heat scorches your\nhand, and its terrible secrets blight\nyour mind. Gathering the shreds of your\ncourage, you shake the devil's shackles\nfrom your soul, and become ever more\nhard and determined to destroy the\nhideous creatures whose mere existence\nthreatens the souls and psyches of all\nthe population of Earth.");
Initial revision
2001-07-17 05:58:10 +00:00
return;
}
else if (world.model == "maps/e4m7.bsp")
{
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
WriteByte (MSG_ALL, SVC_CDTRACK);
WriteByte (MSG_ALL, 2);
WriteByte (MSG_ALL, 3);
Initial revision
2001-07-17 05:58:10 +00:00
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
WriteByte (MSG_ALL, SVC_FINALE);
world -> NIL for null entities. Seems to work (only issue would be borked tests for foo == world -> !foo and for != world -> foo).
2001-11-02 17:00:52 +00:00
WriteString (MSG_ALL, "Despite the awful might of the Elder\nWorld, you have achieved the Rune of\nElder Magic, capstone of all types of\narcane wisdom. Beyond good and evil,\nbeyond life and death, the Rune\npulsates, heavy with import. Patient and\npotent, the Elder Being Shub-Niggurath\nweaves her dire plans to clear off all\nlife from the Earth, and bring her own\nfoul offspring to our NIL! For all the\ndwellers in these nightmare dimensions\nare her descendants! Once all Runes of\nmagic power are united, the energy\nbehind them will blast open the Gateway\nto Shub-Niggurath, and you can travel\nthere to foil the Hell-Mother's plots\nin person.");
Initial revision
2001-07-17 05:58:10 +00:00
return;
}
GotoNextMap();
}
if (intermission_running == 3)
{
if (!cvar("registered"))
{ // shareware episode has been completed, go to sell screen
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
WriteByte (MSG_ALL, SVC_SELLSCREEN);
Initial revision
2001-07-17 05:58:10 +00:00
return;
}
if ( (serverflags&15) == 15)
{
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
WriteByte (MSG_ALL, SVC_FINALE);
WriteString (MSG_ALL, "Now, you have all four Runes. You sense\ntremendous invisible forces moving to\nunseal ancient barriers. Shub-Niggurath\nhad hoped to use the Runes Herself to\nclear off the Earth, but now instead,\nyou will use them to enter her home and\nconfront her as an avatar of avenging\nEarth-life. If you defeat her, you will\nbe remembered forever as the savior of\nthe planet. If she conquers, it will be\nas if you had never been born.");
Initial revision
2001-07-17 05:58:10 +00:00
return;
}
}
RPrint("Exit Intermission.\n");
GotoNextMap();
};
/*
============
IntermissionThink
When the player presses attack or jump, change to the next level
============
*/
void() IntermissionThink =
{
if (time < intermission_exittime)
return;
if (!self.button0 && !self.button1 && !self.button2)
return;
if (!triggered_cycle)
{
RPrint("Intermission think.\n");
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
triggered_cycle = TRUE;
Initial revision
2001-07-17 05:58:10 +00:00
GotoNextMap();
}
};
void() PrintResults;
void() execute_changelevel =
{
local entity pos;
RPrint("execute_changelevel()\n");
PrintResults();
intermission_running = 1;
// enforce a wait time before allowing changelevel
intermission_exittime = time + 5;
pos = FindIntermission ();
// play intermission music
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
WriteByte (MSG_ALL, SVC_CDTRACK);
WriteByte (MSG_ALL, 3);
WriteByte (MSG_ALL, SVC_INTERMISSION);
WriteCoord (MSG_ALL, pos.origin_x);
WriteCoord (MSG_ALL, pos.origin_y);
WriteCoord (MSG_ALL, pos.origin_z);
WriteAngle (MSG_ALL, pos.mangle_x);
WriteAngle (MSG_ALL, pos.mangle_y);
WriteAngle (MSG_ALL, pos.mangle_z);
Initial revision
2001-07-17 05:58:10 +00:00
world -> NIL for null entities. Seems to work (only issue would be borked tests for foo == world -> !foo and for != world -> foo).
2001-11-02 17:00:52 +00:00
other = find (NIL, classname, "player");
while (other)
Initial revision
2001-07-17 05:58:10 +00:00
{
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
other.takedamage = DAMAGE_NO;
other.solid = SOLID_NOT;
other.movetype = MOVETYPE_NONE;
Initial revision
2001-07-17 05:58:10 +00:00
other.modelindex = 0;
other = find (other, classname, "player");
}
};
void() changelevel_touch =
{
if (other.classname != "player")
return;
if (cvar("samelevel") == 2 || (cvar("samelevel") == 3 && mapname != "start"))
return;
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
bprint (PRINT_HIGH, other.netname);
bprint (PRINT_HIGH, " exited the level\n");
Initial revision
2001-07-17 05:58:10 +00:00
nextmap = self.map;
SUB_UseTargets ();
if ( (self.spawnflags & 1) && (deathmatch == 0) )
{ // NO_INTERMISSION
GotoNextMap();
return;
}
Cleanup after qfcc's typechecking changes. This includes the elimination of SUB_Null.
2001-10-17 07:48:11 +00:00
self.touch = NIL;
Initial revision
2001-07-17 05:58:10 +00:00
// we can't move people right now, because touch functions are called
// in the middle of C movement code, so set a think time to do it
self.think = execute_changelevel;
self.nextthink = time + 0.1;
};
/*QUAKED trigger_changelevel (0.5 0.5 0.5) ? NO_INTERMISSION
When the player touches this, he gets sent to the map listed in the "map" variable. Unless the NO_INTERMISSION flag is set, the view will go to the info_intermission spot and display stats.
*/
void() trigger_changelevel =
{
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
if (CheckExistence() == FALSE)
Initial revision
2001-07-17 05:58:10 +00:00
{
dremove(self);
return;
}
if (!self.map)
objerror ("changelevel trigger doesn't have map");
InitTrigger ();
self.touch = changelevel_touch;
};
/*
=============================================================================
PLAYER GAME EDGE FUNCTIONS
=============================================================================
*/
void() set_suicide_frame;
// called by ClientKill and DeadThink
void() respawn =
{
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
/* if (!(self.done_custom == 0 || (self.done_custom & CUSTOM_ON_SPAWN))) // do not spawn in prematch
Initial revision
2001-07-17 05:58:10 +00:00
if (prematch < time)
{
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
sprint(self, PRINT_HIGH, "Sorry, there are still ");
sprint(self, PRINT_HIGH, prematch - time);
sprint(self, PRINT_HIGH, " seconds of prematch remaining. Type custom to recreate your class.\n");
Initial revision
2001-07-17 05:58:10 +00:00
return;
}
*/
if (coop)
{
// make a copy of the dead body for appearances sake
CopyToBodyQue (self);
// get the spawn parms as they were at level start
setspawnparms (self);
// respawn
PutClientInServer ();
}
else if (deathmatch)
{
// make a copy of the dead body for appearances sake
CopyToBodyQue (self);
// set default spawn parms
SetNewParms ();
// respawn
PutClientInServer ();
}
else
{ // restart the entire server
localcmd ("restart\n");
}
};
/*
============
ClientKill
Player entered the suicide command
============
*/
void() ClientKill =
{
local float finished;
local entity te;
//WK Stop music
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
sound (self, CHAN_MUSIC, "items/r_item1.wav", 0.1, ATTN_NORM);
Initial revision
2001-07-17 05:58:10 +00:00
if (self.suicide_time > time)
return;
if (self.deadflag)
return;
// players can't suicide again for 10 seconds
self.suicide_time = time + 5 + (random() * 5);
//WK If building class, remove flag and start over
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
if (self.playerclass == PC_CUSTOM && (self.done_custom & CUSTOM_BUILDING))
Initial revision
2001-07-17 05:58:10 +00:00
{
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
sprint(self, PRINT_HIGH,"You can type 'custom' again to start over!\n");
Initial revision
2001-07-17 05:58:10 +00:00
return;
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
//WK self.done_custom = CUSTOM_ON_SPAWN | CUSTOM_FINISHED;
Initial revision
2001-07-17 05:58:10 +00:00
}
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
if (self.playerclass == PC_UNDEFINED)
Initial revision
2001-07-17 05:58:10 +00:00
{
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
sprint(self, PRINT_HIGH,"You aren't alive!\n");
Initial revision
2001-07-17 05:58:10 +00:00
return;
}
if (prematch < time)
{
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
bprint (PRINT_MEDIUM, self.netname);
bprint (PRINT_MEDIUM, " suicides\n");
Initial revision
2001-07-17 05:58:10 +00:00
}
set_suicide_frame();
self.modelindex = modelindex_player;
// If infected, give the medic a frag
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
if (self.tfstate & TFSTATE_INFECTED)
Initial revision
2001-07-17 05:58:10 +00:00
{
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
finished = FALSE;
world -> NIL for null entities. Seems to work (only issue would be borked tests for foo == world -> !foo and for != world -> foo).
2001-11-02 17:00:52 +00:00
te = find(NIL, classname, "timer");
Initial revision
2001-07-17 05:58:10 +00:00
while (te)
{
if (te.owner == self && te.think == BioInfection_Decay)
{
logfrag(te, self);
te.enemy.real_frags = te.enemy.real_frags + 1;
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
if (!(toggleflags & TFLAG_TEAMFRAGS))
Initial revision
2001-07-17 05:58:10 +00:00
te.enemy.frags = te.enemy.real_frags;
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
finished = TRUE; //Thanks lostman
Initial revision
2001-07-17 05:58:10 +00:00
}
te = find(te, classname, "timer");
world -> NIL for null entities. Seems to work (only issue would be borked tests for foo == world -> !foo and for != world -> foo).
2001-11-02 17:00:52 +00:00
if (finished) te = NIL;
Initial revision
2001-07-17 05:58:10 +00:00
}
The death of #ifdef QUAKE_WORLD!!
2001-07-25 21:10:26 +00:00
} else
Initial revision
2001-07-17 05:58:10 +00:00
logfrag (self, self);
self.real_frags = self.real_frags - 1;
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
if (teamplay & TEAMPLAY_VAMPIRE) //WK
Initial revision
2001-07-17 05:58:10 +00:00
self.real_frags = self.real_frags - 1;
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
if (!(toggleflags & TFLAG_TEAMFRAGS))
Initial revision
2001-07-17 05:58:10 +00:00
self.frags = self.real_frags;
self.weaponmodel= "";
self.view_ofs = '0 0 -8';
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
self.movetype = MOVETYPE_NONE;
Initial revision
2001-07-17 05:58:10 +00:00
//WK If building class, remove flag and start over
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
if (self.playerclass == PC_CUSTOM && (self.done_custom & CUSTOM_BUILDING))
Initial revision
2001-07-17 05:58:10 +00:00
{
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
sprint(self, PRINT_HIGH,"You can type 'custom' again to start over!\n");
self.done_custom = CUSTOM_ON_SPAWN | CUSTOM_FINISHED;
Initial revision
2001-07-17 05:58:10 +00:00
return; //ch
}
// Remove all timers for this player
TeamFortress_RemoveTimers();
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
TeamFortress_SetupRespawn(TRUE);
Initial revision
2001-07-17 05:58:10 +00:00
self.health = -1;
self.th_die();
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
self.deadflag = DEAD_RESPAWNABLE;
self.tfstate = self.tfstate | TFSTATE_RESPAWN_READY;
Initial revision
2001-07-17 05:58:10 +00:00
// self.respawn_time = time;
};
////////////////////////////////////
// FindTeamSpawnPoint
//////////
entity lastspawn_team1;
entity lastspawn_team2;
entity lastspawn_team3;
entity lastspawn_team4;
entity(float team_num) FindTeamSpawnPoint =
{
local entity spot;
local entity at_spot;
local float spot_found;
local float attempts;
if (team_num == 1)
{
spot = lastspawn_team1;
attempts = 0;
// search through until found or end-of-list
while (1)
{
attempts = attempts + 1;
spot = find(spot, team_str_home, "ts1");
world -> NIL for null entities. Seems to work (only issue would be borked tests for foo == world -> !foo and for != world -> foo).
2001-11-02 17:00:52 +00:00
if (!spot)
spot = find(NIL, team_str_home, "ts1");
Initial revision
2001-07-17 05:58:10 +00:00
world -> NIL for null entities. Seems to work (only issue would be borked tests for foo == world -> !foo and for != world -> foo).
2001-11-02 17:00:52 +00:00
if (!spot)
return NIL;
Initial revision
2001-07-17 05:58:10 +00:00
at_spot = findradius(spot.origin, 40);
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
spot_found = TRUE;
Initial revision
2001-07-17 05:58:10 +00:00
world -> NIL for null entities. Seems to work (only issue would be borked tests for foo == world -> !foo and for != world -> foo).
2001-11-02 17:00:52 +00:00
while (at_spot)
Initial revision
2001-07-17 05:58:10 +00:00
{
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
if (at_spot.classname == "player" && at_spot.deadflag == DEAD_NO)
Initial revision
2001-07-17 05:58:10 +00:00
{
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
spot_found = FALSE;
Initial revision
2001-07-17 05:58:10 +00:00
}
at_spot = at_spot.chain;
}
// Check the Criteria of the spawnpoint
if (!Activated(spot, self))
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
spot_found = FALSE;
Initial revision
2001-07-17 05:58:10 +00:00
if ((spot_found) || (attempts >= 30))
{
lastspawn_team1 = spot;
return spot;
}
}
}
else if (team_num == 2)
{
spot = lastspawn_team2;
attempts = 0;
// search through until found or end-of-list
while (1)
{
attempts = attempts + 1;
spot = find(spot, team_str_home, "ts2");
world -> NIL for null entities. Seems to work (only issue would be borked tests for foo == world -> !foo and for != world -> foo).
2001-11-02 17:00:52 +00:00
if (!spot)
spot = find(NIL, team_str_home, "ts2");
Initial revision
2001-07-17 05:58:10 +00:00
world -> NIL for null entities. Seems to work (only issue would be borked tests for foo == world -> !foo and for != world -> foo).
2001-11-02 17:00:52 +00:00
if (!spot)
return NIL;
Initial revision
2001-07-17 05:58:10 +00:00
at_spot = findradius(spot.origin, 40);
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
spot_found = TRUE;
Initial revision
2001-07-17 05:58:10 +00:00
world -> NIL for null entities. Seems to work (only issue would be borked tests for foo == world -> !foo and for != world -> foo).
2001-11-02 17:00:52 +00:00
while (at_spot)
Initial revision
2001-07-17 05:58:10 +00:00
{
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
if (at_spot.classname == "player" && at_spot.deadflag == DEAD_NO)
Initial revision
2001-07-17 05:58:10 +00:00
{
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
spot_found = FALSE;
Initial revision
2001-07-17 05:58:10 +00:00
}
at_spot = at_spot.chain;
}
// Check the Criteria of the spawnpoint
if (!Activated(spot, self))
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
spot_found = FALSE;
Initial revision
2001-07-17 05:58:10 +00:00
if ((spot_found) || (attempts >= 30))
{
lastspawn_team2 = spot;
return spot;
}
}
}
else if (team_num == 3)
{
spot = lastspawn_team3;
attempts = 0;
// search through until found or end-of-list
while (1)
{
attempts = attempts + 1;
spot = find(spot, team_str_home, "ts3");
world -> NIL for null entities. Seems to work (only issue would be borked tests for foo == world -> !foo and for != world -> foo).
2001-11-02 17:00:52 +00:00
if (!spot)
spot = find(NIL, team_str_home, "ts3");
Initial revision
2001-07-17 05:58:10 +00:00
world -> NIL for null entities. Seems to work (only issue would be borked tests for foo == world -> !foo and for != world -> foo).
2001-11-02 17:00:52 +00:00
if (!spot)
return NIL;
Initial revision
2001-07-17 05:58:10 +00:00
at_spot = findradius(spot.origin, 40);
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
spot_found = TRUE;
Initial revision
2001-07-17 05:58:10 +00:00
world -> NIL for null entities. Seems to work (only issue would be borked tests for foo == world -> !foo and for != world -> foo).
2001-11-02 17:00:52 +00:00
while (at_spot)
Initial revision
2001-07-17 05:58:10 +00:00
{
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
if (at_spot.classname == "player" && at_spot.deadflag == DEAD_NO)
Initial revision
2001-07-17 05:58:10 +00:00
{
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
spot_found = FALSE;
Initial revision
2001-07-17 05:58:10 +00:00
}
at_spot = at_spot.chain;
}
// Check the Criteria of the spawnpoint
if (!Activated(spot, self))
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
spot_found = FALSE;
Initial revision
2001-07-17 05:58:10 +00:00
if ((spot_found) || (attempts >= 30))
{
lastspawn_team3 = spot;
return spot;
}
}
}
else if (team_num == 4)
{
spot = lastspawn_team4;
attempts = 0;
// search through until found or end-of-list
while (1)
{
attempts = attempts + 1;
spot = find(spot, team_str_home, "ts4");
world -> NIL for null entities. Seems to work (only issue would be borked tests for foo == world -> !foo and for != world -> foo).
2001-11-02 17:00:52 +00:00
if (!spot)
spot = find(NIL, team_str_home, "ts4");
Initial revision
2001-07-17 05:58:10 +00:00
world -> NIL for null entities. Seems to work (only issue would be borked tests for foo == world -> !foo and for != world -> foo).
2001-11-02 17:00:52 +00:00
if (!spot)
return NIL;
Initial revision
2001-07-17 05:58:10 +00:00
at_spot = findradius(spot.origin, 40);
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
spot_found = TRUE;
Initial revision
2001-07-17 05:58:10 +00:00
world -> NIL for null entities. Seems to work (only issue would be borked tests for foo == world -> !foo and for != world -> foo).
2001-11-02 17:00:52 +00:00
while (at_spot)
Initial revision
2001-07-17 05:58:10 +00:00
{
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
if (at_spot.classname == "player" && at_spot.deadflag == DEAD_NO)
Initial revision
2001-07-17 05:58:10 +00:00
{
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
spot_found = FALSE;
Initial revision
2001-07-17 05:58:10 +00:00
}
at_spot = at_spot.chain;
}
// Check the Criteria of the spawnpoint
if (!Activated(spot, self))
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
spot_found = FALSE;
Initial revision
2001-07-17 05:58:10 +00:00
if ((spot_found) || (attempts >= 30))
{
lastspawn_team4 = spot;
return spot;
}
}
}
// failure
world -> NIL for null entities. Seems to work (only issue would be borked tests for foo == world -> !foo and for != world -> foo).
2001-11-02 17:00:52 +00:00
return NIL;
Initial revision
2001-07-17 05:58:10 +00:00
};
/*
============
SelectSpawnPoint
Returns the entity to spawn at
============
*/
entity() SelectSpawnPoint =
{
local entity spot;
local entity at_spot;
local float spot_found;
local float attempts;
// testinfo_player_start is only found in regioned levels
/*
world -> NIL for null entities. Seems to work (only issue would be borked tests for foo == world -> !foo and for != world -> foo).
2001-11-02 17:00:52 +00:00
spot = find (NIL, classname, "testplayerstart");
Initial revision
2001-07-17 05:58:10 +00:00
if (spot)
return spot;
*/
// If FortressMap option is on, we want to make the player spawn on a
// spawnpoint marked as being one for his/her team.
// The team that owns a spawnpoint is kept in the spawnpoints's teamno
if (self.team_no != 0)
{
spot = FindTeamSpawnPoint(self.team_no);
world -> NIL for null entities. Seems to work (only issue would be borked tests for foo == world -> !foo and for != world -> foo).
2001-11-02 17:00:52 +00:00
if (spot)
Initial revision
2001-07-17 05:58:10 +00:00
return spot;
// failure to find a team spawn point for that player
// just move on
}
// choose a info_player_deathmatch point
if (coop)
{
lastspawn = find(lastspawn, classname, "info_player_coop");
world -> NIL for null entities. Seems to work (only issue would be borked tests for foo == world -> !foo and for != world -> foo).
2001-11-02 17:00:52 +00:00
if (!lastspawn)
lastspawn = find (NIL, classname, "info_player_coop");
Initial revision
2001-07-17 05:58:10 +00:00
world -> NIL for null entities. Seems to work (only issue would be borked tests for foo == world -> !foo and for != world -> foo).
2001-11-02 17:00:52 +00:00
if (lastspawn)
Initial revision
2001-07-17 05:58:10 +00:00
return lastspawn;
}
else if (deathmatch)
{
// search through
spot = find(lastspawn, classname, "info_player_deathmatch");
world -> NIL for null entities. Seems to work (only issue would be borked tests for foo == world -> !foo and for != world -> foo).
2001-11-02 17:00:52 +00:00
if (!spot)
spot = find(NIL, classname, "info_player_deathmatch");
Initial revision
2001-07-17 05:58:10 +00:00
attempts = 0;
world -> NIL for null entities. Seems to work (only issue would be borked tests for foo == world -> !foo and for != world -> foo).
2001-11-02 17:00:52 +00:00
while (spot && attempts < 100)
Initial revision
2001-07-17 05:58:10 +00:00
{
attempts = attempts + 1;
// reject spot if other players are found at point
at_spot = findradius(spot.origin, 40);
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
spot_found = TRUE;
Initial revision
2001-07-17 05:58:10 +00:00
while (at_spot)
{
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
if (at_spot.classname == "player" && at_spot.deadflag == DEAD_NO)
Initial revision
2001-07-17 05:58:10 +00:00
{
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
spot_found = FALSE;
Initial revision
2001-07-17 05:58:10 +00:00
}
at_spot = at_spot.chain;
}
// Make sure we don't get locked by people standing on all
// the spawnpoints.
if ((spot_found) || (attempts >= 10))
{
lastspawn = spot;
return spot;
}
spot = find(spot, classname, "info_player_deathmatch");
world -> NIL for null entities. Seems to work (only issue would be borked tests for foo == world -> !foo and for != world -> foo).
2001-11-02 17:00:52 +00:00
if (!spot)
spot = find(NIL, classname, "info_player_deathmatch");
Initial revision
2001-07-17 05:58:10 +00:00
}
}
if (serverflags)
{ // return with a rune to start
world -> NIL for null entities. Seems to work (only issue would be borked tests for foo == world -> !foo and for != world -> foo).
2001-11-02 17:00:52 +00:00
spot = find (NIL, classname, "info_player_start2");
Initial revision
2001-07-17 05:58:10 +00:00
if (spot)
return spot;
}
world -> NIL for null entities. Seems to work (only issue would be borked tests for foo == world -> !foo and for != world -> foo).
2001-11-02 17:00:52 +00:00
spot = find (NIL, classname, "info_player_start");
Initial revision
2001-07-17 05:58:10 +00:00
if (!spot)
error ("PutClientInServer: no info_player_start on level\n");
return spot;
};
/*
===========
PutClientInServer
called each time a player is spawned
============
*/
void() DecodeLevelParms;
void() PlayerDie;
void() TeamFortress_SetHealth;
void() TeamFortress_SetEquipment;
void() player_touch;
void(entity p) TeamFortress_SetSpeed;
void(entity p) TeamFortress_SetSkin;
void() PutClientInServer =
{
local float iszoom, oldclass;
local entity spot, te;
self.touch = player_touch;
self.classname = "player";
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
if (self.playerclass != PC_CUSTOM)
Initial revision
2001-07-17 05:58:10 +00:00
{
self.max_health = 100;
self.health = 100;
}
//Check_Admin_Password(self); //CH check pass and sets flags
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
self.takedamage = DAMAGE_AIM;
self.solid = SOLID_SLIDEBOX;
self.movetype = MOVETYPE_WALK;
Initial revision
2001-07-17 05:58:10 +00:00
self.show_hostile = 0;
self.is_malfunctioning = 0;
self.is_abouttodie = 0;
// OfN
self.has_holo = 0;
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
self.is_killed = FALSE;
Initial revision
2001-07-17 05:58:10 +00:00
//////////////////
/* if (self.is_cameraviewing)
SwitchFromCamera();*/
self.FlashTime = 0;
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
self.flags = FL_CLIENT;
Initial revision
2001-07-17 05:58:10 +00:00
self.aura = 0; //- OfN
world -> NIL for null entities. Seems to work (only issue would be borked tests for foo == world -> !foo and for != world -> foo).
2001-11-02 17:00:52 +00:00
self.crusader_inspirator=NIL; // OfN - needed?
Initial revision
2001-07-17 05:58:10 +00:00
self.gravity = 1; //WK
self.air_finished = time + 12;
self.dmg = 2; // initial water damage
self.super_damage_finished = 0;
self.radsuit_finished = 0;
self.invisible_finished = 0;
self.invincible_finished = 0;
self.effects = 0;
self.invincible_time = 0;
self.reload_shotgun = 0;
self.reload_super_shotgun = 0;
self.reload_grenade_launcher = 0;
self.reload_rocket_launcher = 0;
self.reload_light_assault = 0;
self.reload_laser_cannon = 0;
//self.is_undercover = 0;
//self.undercover_team = 0;
self.last_attacked_time = 0; //WK For chaplan healing purposes
makeImmune(self,time+5);
// grapple stuff
- add some BUGS - fix some rogue on_hook resetters (should be using Reset_Grapple)
2001-12-21 15:04:59 +00:00
if (self.hook_out)
Reset_Grapple (self.hook);
Initial revision
2001-07-17 05:58:10 +00:00
DecodeLevelParms ();
#ifdef COOP_MODE
// Force all players to be on the same team in Coop mode
if (coop)
{
teamplay = 21;
cvar_set("teamplay", "21?TeamFortress");
TeamFortress_TeamSet(1);
}
#endif
// Set the Civilian Class of anyone in a Civilian Team
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
if (self.playerclass == PC_UNDEFINED)
Initial revision
2001-07-17 05:58:10 +00:00
{
if (TeamFortress_TeamIsCivilian(self.team_no))
{
self.impulse = 1;
TeamFortress_ChangeClass();
}
}
// For players who've changed their classes in deathmatch 3,
// their class may be PC_RANDOM, in which case we set the toggleflag
if ((deathmatch == 3) && (self.nextpc != 0))
{
self.playerclass = self.nextpc;
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
if (self.nextpc == PC_RANDOM)
self.tfstate = self.tfstate | TFSTATE_RANDOMPC;
Initial revision
2001-07-17 05:58:10 +00:00
else
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
self.tfstate = self.tfstate - (self.tfstate & TFSTATE_RANDOMPC);
Initial revision
2001-07-17 05:58:10 +00:00
}
// some states are kept
iszoom = 0;
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
if (self.tfstate & TFSTATE_ZOOMOFF)
Initial revision
2001-07-17 05:58:10 +00:00
iszoom = 1;
// Reset all tfstate flags, except for RANDOMPC
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
if (self.tfstate & TFSTATE_RANDOMPC)
Initial revision
2001-07-17 05:58:10 +00:00
{
oldclass = self.playerclass;
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
self.playerclass = 1 + floor(random() * (PC_RANDOM - 1));
Initial revision
2001-07-17 05:58:10 +00:00
while(!IsLegalClass(self.playerclass) || (self.playerclass == oldclass))
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
self.playerclass = 1 + floor(random() * (PC_RANDOM - 1));
self.tfstate = TFSTATE_RANDOMPC;
Initial revision
2001-07-17 05:58:10 +00:00
}
else
self.tfstate = 0;
if (iszoom == 1)
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
self.tfstate = self.tfstate | TFSTATE_ZOOMOFF;
Initial revision
2001-07-17 05:58:10 +00:00
// Display the Player's Class
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
if (!(self.done_custom == 0 || (self.done_custom & CUSTOM_ON_SPAWN)))
Initial revision
2001-07-17 05:58:10 +00:00
{
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
if (self.playerclass != PC_CUSTOM)
TeamFortress_PrintClassName(self,self.playerclass, (self.tfstate & TFSTATE_RANDOMPC));
Initial revision
2001-07-17 05:58:10 +00:00
else
TeamFortress_PrintJobName(self,self.job);
}
// Set the weapons and ammo for the player based on class
TeamFortress_SetEquipment();
// Set the health for the player based on class
TeamFortress_SetHealth();
// Set the speed for the player based on class
don't let clients scout around while customizing
2002-08-29 18:41:22 +00:00
self.tfstate |= TFSTATE_CANT_MOVE;
Initial revision
2001-07-17 05:58:10 +00:00
TeamFortress_SetSpeed(self);
don't let clients scout around while customizing
2002-08-29 18:41:22 +00:00
self.tfstate &= ~TFSTATE_CANT_MOVE;
Initial revision
2001-07-17 05:58:10 +00:00
// Set the skin for the player based on class
TeamFortress_SetSkin(self);
stuffcmd(self, "v_idlescale 0\n");
stuffcmd(self, "v_cshift 0 0 0 0\n");
//WK Clear Bastard Rotation
stuffcmd(self, "-left;-right;cl_yawspeed 140\n");
//WK Again, since they could lose their sentrygun in SetEquip...
DetonateAllGuns();
SetTeamName(self);
W_SetCurrentAmmo ();
self.attack_finished = time + 0.3;
self.th_pain = player_pain;
self.th_die = PlayerDie;
// make sure that autozoom is reset
if (self.height != 0)
{
self.height = 0;
TF_zoom(90);
}
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
self.deadflag = DEAD_NO;
Initial revision
2001-07-17 05:58:10 +00:00
// pausetime is set by teleporters to keep the player from moving a while
self.pausetime = 0;
spot = SelectSpawnPoint ();
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
if (self.playerclass != PC_UNDEFINED)
Initial revision
2001-07-17 05:58:10 +00:00
spawn_tdeath (spot.origin, self);
self.observer_list = spot;
self.origin = spot.origin + '0 0 1';
self.angles = spot.angles;
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
self.fixangle = TRUE; // turn this way immediately
Initial revision
2001-07-17 05:58:10 +00:00
#ifdef MAP_DEBUG
RPrint(self.netname);
RPrint(" spawned at a ");
RPrint(spot.classname);
if (spot.team_no != 0)
{
RPrint(", team_no of ");
st = ftos(spot.team_no);
RPrint(st);
}
RPrint("\n");
#endif
// If this is a TeamSpawnpoint, check to see if it
// gives out a GoalItem, or displays a message
if (spot.classname == "info_player_teamspawn")
{
if (spot.items != 0)
{
te = Finditem(spot.items);
if (te)
tfgoalitem_GiveToPlayer(te, self, self);
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
if (!(spot.goal_activation & TFSP_MULTIPLEITEMS))
Initial revision
2001-07-17 05:58:10 +00:00
spot.items = 0;
}
// Display teamspawn message
if (spot.message)
{
CenterPrint(self, spot.message);
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
if (!(spot.goal_activation & TFSP_MULTIPLEMSGS))
- some BUGS items - annihilate string_null (and empty_float and vector_null) - remove self.netname = infokey(self, "name");, since the server should do that for us - add a quotename function, to stick \xFF around a name - add a few death messages - set a "timeleft" serverinfo to be the number of minutes left in the game
2001-09-30 22:38:44 +00:00
spot.message = "";
Initial revision
2001-07-17 05:58:10 +00:00
}
// Activate a Goal if needed
if (spot.activate_goal_no != 0)
{
te = Findgoal(spot.activate_goal_no);
if (te)
AttemptToActivate(te, self, spot);
}
// TeamSpawn points can remove themselves after being spawned on
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
if (spot.goal_effects == TFSP_REMOVESELF)
Initial revision
2001-07-17 05:58:10 +00:00
{
spot.classname = "deadpoint";
- some BUGS items - annihilate string_null (and empty_float and vector_null) - remove self.netname = infokey(self, "name");, since the server should do that for us - add a quotename function, to stick \xFF around a name - add a few death messages - set a "timeleft" serverinfo to be the number of minutes left in the game
2001-09-30 22:38:44 +00:00
spot.team_str_home = "";
Initial revision
2001-07-17 05:58:10 +00:00
spot.nextthink = time + 1;
spot.think = SUB_Remove;
}
}
- some BUGS items - annihilate string_null (and empty_float and vector_null) - remove self.netname = infokey(self, "name");, since the server should do that for us - add a quotename function, to stick \xFF around a name - add a few death messages - set a "timeleft" serverinfo to be the number of minutes left in the game
2001-09-30 22:38:44 +00:00
setmodel (self, "");
Initial revision
2001-07-17 05:58:10 +00:00
modelindex_null = self.modelindex;
setmodel (self, "progs/eyes.mdl");
modelindex_eyes = self.modelindex;
setmodel (self, "progs/player.mdl");
modelindex_player = self.modelindex;
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
if (self.playerclass == PC_UNDEFINED)
Initial revision
2001-07-17 05:58:10 +00:00
{
self.modelindex = modelindex_null;
self.current_menu = 1;
self.gravity = 0;
}
//WK DropIntoCustomClassGeneration
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
if (self.playerclass == PC_CUSTOM)
Initial revision
2001-07-17 05:58:10 +00:00
{
//WK Done_custom is initialized to 0, hackish yes.
//There are two entries, unintialized 0, or a person having issued a 'custom' command
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
//which sets the CUSTOM_ON_SPAWN flag
if (self.done_custom == 0 || (self.done_custom & CUSTOM_ON_SPAWN))
Initial revision
2001-07-17 05:58:10 +00:00
{
DropToCustomClassGen();
}
else
{
self.maxspeed = self.custom_speed; //Reset our speed
}
}
else {
self.done_custom = 0; //Unitialize this. Maybe set to ON_SPAWN...
}
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
setsize (self, VEC_HULL_MIN, VEC_HULL_MAX);
Initial revision
2001-07-17 05:58:10 +00:00
self.view_ofs = '0 0 22';
player_stand1 ();
if (deathmatch || coop)
{
makevectors(self.angles);
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
if (self.playerclass != PC_UNDEFINED)
Initial revision
2001-07-17 05:58:10 +00:00
spawn_tfog (self.origin + v_forward*10);
}
// Set Rocket Jump Modifiers
world -> NIL for null entities. Seems to work (only issue would be borked tests for foo == world -> !foo and for != world -> foo).
2001-11-02 17:00:52 +00:00
if (stof(infokey(NIL, "rj")) != 0)
rj = stof(infokey(NIL, "rj"));
Initial revision
2001-07-17 05:58:10 +00:00
else
rj = 1;
//This code is in three places. client,custom & tfort.qc
//WK Give them invincibility if they are a normal class or bought it
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
if ((self.playerclass >= PC_SCOUT && self.playerclass <= PC_RANDOM) ||
self.tf_items & NIT_RESPAWN_GUARD) {
Change a bunch of self.items = self.items - (self.items & IT_FOO) lines to self.items = self.items & ~IT_FOO. also changed some self.items = self.items - IT_FOO lines, which were just Really Evil (tm)
2001-08-10 10:03:36 +00:00
self.items = self.items & IT_INVULNERABILITY;
Initial revision
2001-07-17 05:58:10 +00:00
self.invincible_time = 1;
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
self.invincible_finished = time + RESPAWN_GUARD_TIME;
Initial revision
2001-07-17 05:58:10 +00:00
if (self.custom_speed > 300)
self.invincible_finished = self.invincible_finished - 1;
if (self.custom_speed > 400)
self.invincible_finished = self.invincible_finished - 1;
}
};
/*
=============================================================================
QUAKED FUNCTIONS
=============================================================================
*/
/*QUAKED info_player_start (1 0 0) (-16 -16 -24) (16 16 24)
The normal starting point for a level.
*/
void() info_player_start =
{
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
if (CheckExistence() == FALSE)
Initial revision
2001-07-17 05:58:10 +00:00
{
dremove(self);
return;
}
};
/*QUAKED info_player_start2 (1 0 0) (-16 -16 -24) (16 16 24)
Only used on start map for the return point from an episode.
*/
void() info_player_start2 =
{
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
if (CheckExistence() == FALSE)
Initial revision
2001-07-17 05:58:10 +00:00
{
dremove(self);
return;
}
};
/*
saved out by quaked in region mode
*/
void() testplayerstart =
{
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
if (CheckExistence() == FALSE)
Initial revision
2001-07-17 05:58:10 +00:00
{
dremove(self);
return;
}
};
/*QUAKED info_player_deathmatch (1 0 1) (-16 -16 -24) (16 16 24)
potential spawning position for deathmatch games
*/
void() info_player_deathmatch =
{
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
if (CheckExistence() == FALSE)
Initial revision
2001-07-17 05:58:10 +00:00
{
dremove(self);
return;
}
};
/*QUAKED info_player_coop (1 0 1) (-16 -16 -24) (16 16 24)
potential spawning position for coop games
*/
void() info_player_coop =
{
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
if (CheckExistence() == FALSE)
Initial revision
2001-07-17 05:58:10 +00:00
{
dremove(self);
return;
}
};
/*
===============================================================================
RULES
===============================================================================
*/
void(entity c) PrintClientScore =
{
if (c.frags > -10 && c.frags < 0)
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
bprint (PRINT_MEDIUM, " ");
Initial revision
2001-07-17 05:58:10 +00:00
else if (c.frags >= 0)
{
if (c.frags < 100)
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
bprint (PRINT_MEDIUM, " ");
Initial revision
2001-07-17 05:58:10 +00:00
if (c.frags < 10)
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
bprint (PRINT_MEDIUM, " ");
Initial revision
2001-07-17 05:58:10 +00:00
}
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
bprint (PRINT_MEDIUM, ftos(c.frags));
bprint (PRINT_MEDIUM, " ");
bprint (PRINT_MEDIUM, c.netname);
bprint (PRINT_MEDIUM, "\n");
Initial revision
2001-07-17 05:58:10 +00:00
};
void() DumpScore =
{
local entity e, sort, walk;
if (world.chain)
error ("DumpScore: world.chain is set");
// build a sorted lis
world -> NIL for null entities. Seems to work (only issue would be borked tests for foo == world -> !foo and for != world -> foo).
2001-11-02 17:00:52 +00:00
e = find(NIL, classname, "player");
sort = NIL;
Initial revision
2001-07-17 05:58:10 +00:00
while (e)
{
if (!sort)
{
sort = e;
world -> NIL for null entities. Seems to work (only issue would be borked tests for foo == world -> !foo and for != world -> foo).
2001-11-02 17:00:52 +00:00
e.chain = NIL;
Initial revision
2001-07-17 05:58:10 +00:00
}
else
{
if (e.frags > sort.frags)
{
e.chain = sort;
sort = e;
}
else
{
walk = sort;
do
{
if (!walk.chain)
{
world -> NIL for null entities. Seems to work (only issue would be borked tests for foo == world -> !foo and for != world -> foo).
2001-11-02 17:00:52 +00:00
e.chain = NIL;
Initial revision
2001-07-17 05:58:10 +00:00
walk.chain = e;
}
else if (walk.chain.frags < e.frags)
{
e.chain = walk.chain;
walk.chain = e;
}
else
walk = walk.chain;
} while (walk.chain != e);
}
}
e = find(e, classname, "player");
}
// print the list
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
bprint (PRINT_MEDIUM, "\n");
Initial revision
2001-07-17 05:58:10 +00:00
while (sort)
{
PrintClientScore (sort);
sort = sort.chain;
}
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
bprint (PRINT_MEDIUM, "\n");
Initial revision
2001-07-17 05:58:10 +00:00
};
/*
go to the next level for deathmatch
*/
float already_cycled;
void() NextLevel =
{
local entity o;
if (already_cycled)
return;
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
already_cycled = TRUE;
Initial revision
2001-07-17 05:58:10 +00:00
o = spawn();
o.map = nextmap;
o.think = execute_changelevel;
o.nextthink = time + 0.1;
};
- added some items to BUGS and TODO - reworked map cycler so that it saves the map number to cf/nextmapnum, and restores it in case of a crash - add a cyclenow infokey, which causes the timelimit to be hit instantly. needed because the map cycling doesn't kick in until the timelimit is reached - add cf/mapcycle which contains the names of maps to be cycled (seperated by nuls). it overwrites the normal "exec qwmcycle/map1.cfg" behavior. - change the MOTD time to 15 seconds (from 24.2) - make mapcfg.cfg exec'd if mapcfg is enabled (so you can reset the config vars - add a thing to enable sv_gc if it's disabled. (I'm using string appending now)
2001-07-23 15:08:39 +00:00
float cyclenow;
Initial revision
2001-07-17 05:58:10 +00:00
/*
============
CheckRules
Exit deathmatch games upon conditions
============
*/
void() CheckRules =
{
- added some items to BUGS and TODO - reworked map cycler so that it saves the map number to cf/nextmapnum, and restores it in case of a crash - add a cyclenow infokey, which causes the timelimit to be hit instantly. needed because the map cycling doesn't kick in until the timelimit is reached - add cf/mapcycle which contains the names of maps to be cycled (seperated by nuls). it overwrites the normal "exec qwmcycle/map1.cfg" behavior. - change the MOTD time to 15 seconds (from 24.2) - make mapcfg.cfg exec'd if mapcfg is enabled (so you can reset the config vars - add a thing to enable sv_gc if it's disabled. (I'm using string appending now)
2001-07-23 15:08:39 +00:00
local string st;
world -> NIL for null entities. Seems to work (only issue would be borked tests for foo == world -> !foo and for != world -> foo).
2001-11-02 17:00:52 +00:00
st = infokey (NIL, "cyclenow");
- added some items to BUGS and TODO - reworked map cycler so that it saves the map number to cf/nextmapnum, and restores it in case of a crash - add a cyclenow infokey, which causes the timelimit to be hit instantly. needed because the map cycling doesn't kick in until the timelimit is reached - add cf/mapcycle which contains the names of maps to be cycled (seperated by nuls). it overwrites the normal "exec qwmcycle/map1.cfg" behavior. - change the MOTD time to 15 seconds (from 24.2) - make mapcfg.cfg exec'd if mapcfg is enabled (so you can reset the config vars - add a thing to enable sv_gc if it's disabled. (I'm using string appending now)
2001-07-23 15:08:39 +00:00
if (!cyclenow && (st == "1" || st == "on"))
{
cyclenow = 1;
localcmd ("serverinfo cyclenow \"\"\n");
localcmd ("localinfo cyclenow \"\"\n");
dprint ("Cycling Map.\n");
Initial revision
2001-07-17 05:58:10 +00:00
NextLevel ();
- added some items to BUGS and TODO - reworked map cycler so that it saves the map number to cf/nextmapnum, and restores it in case of a crash - add a cyclenow infokey, which causes the timelimit to be hit instantly. needed because the map cycling doesn't kick in until the timelimit is reached - add cf/mapcycle which contains the names of maps to be cycled (seperated by nuls). it overwrites the normal "exec qwmcycle/map1.cfg" behavior. - change the MOTD time to 15 seconds (from 24.2) - make mapcfg.cfg exec'd if mapcfg is enabled (so you can reset the config vars - add a thing to enable sv_gc if it's disabled. (I'm using string appending now)
2001-07-23 15:08:39 +00:00
}
else if (cyclenow
|| (timelimit && time >= timelimit)
|| (fraglimit && self.frags >= fraglimit))
Initial revision
2001-07-17 05:58:10 +00:00
NextLevel ();
};
//============================================================================
void() PlayerDeathThink =
{
local float forward;
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
if ((self.flags & FL_ONGROUND))
Initial revision
2001-07-17 05:58:10 +00:00
{
forward = vlen (self.velocity);
forward = forward - 20;
if (forward <= 0)
self.velocity = '0 0 0';
else
self.velocity = forward * normalize(self.velocity);
}
// wait for all buttons released
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
if (self.deadflag == DEAD_DEAD)
Initial revision
2001-07-17 05:58:10 +00:00
{
if (self.button2 || self.button1 || self.button0)
return;
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
self.deadflag = DEAD_RESPAWNABLE;
Initial revision
2001-07-17 05:58:10 +00:00
// make sure that respawn flag has not been set
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
self.tfstate = self.tfstate - (self.tfstate & TFSTATE_RESPAWN_READY);
Initial revision
2001-07-17 05:58:10 +00:00
return;
}
// wait for any button down
if (!self.button2 && !self.button1 && !self.button0)
{
// if no buttons, but respawn_ready flag is set, respawn
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
if (self.tfstate & TFSTATE_RESPAWN_READY)
Initial revision
2001-07-17 05:58:10 +00:00
{
if (self.respawn_time <= time)
{
self.button0 = 0;
self.button1 = 0;
self.button2 = 0;
respawn();
}
}
return;
}
else
{
// button has been pressed, player is ready to respawn
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
self.tfstate = self.tfstate | TFSTATE_RESPAWN_READY;
Initial revision
2001-07-17 05:58:10 +00:00
if (self.respawn_time <= time)
{
self.button0 = 0;
self.button1 = 0;
self.button2 = 0;
respawn();
}
return;
}
};
void() PlayerJump =
{
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
if (self.flags & FL_WATERJUMP)
Initial revision
2001-07-17 05:58:10 +00:00
return;
if (self.waterlevel >= 2)
{
fix the field stuck test and rename CONTENT_* to CONTENTS_* to match the server source.
2001-07-31 17:08:59 +00:00
if (self.watertype == CONTENTS_WATER)
Initial revision
2001-07-17 05:58:10 +00:00
self.velocity_z = 100;
fix the field stuck test and rename CONTENT_* to CONTENTS_* to match the server source.
2001-07-31 17:08:59 +00:00
else if (self.watertype == CONTENTS_SLIME)
Initial revision
2001-07-17 05:58:10 +00:00
self.velocity_z = 80;
else
self.velocity_z = 50;
//WK
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
if (self.tf_items & NIT_SCUBA)
Initial revision
2001-07-17 05:58:10 +00:00
self.velocity_z = 250;
// play swiming sound
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
if (self.cutf_items & CUTF_STEALTH) // SB no noise if we have stealth
Initial revision
2001-07-17 05:58:10 +00:00
return;
if (self.swim_flag < time)
{
self.swim_flag = time + 1;
if (random() < 0.5)
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
sound (self, CHAN_BODY, "misc/water1.wav", 1, ATTN_NORM);
Initial revision
2001-07-17 05:58:10 +00:00
else
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
sound (self, CHAN_BODY, "misc/water2.wav", 1, ATTN_NORM);
Initial revision
2001-07-17 05:58:10 +00:00
}
return;
}
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
if (!(self.flags & FL_ONGROUND))
Initial revision
2001-07-17 05:58:10 +00:00
return;
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
if (!(self.flags & FL_JUMPRELEASED) )
Initial revision
2001-07-17 05:58:10 +00:00
return; // don't pogo stick
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
self.flags = self.flags - (self.flags & FL_JUMPRELEASED);
Initial revision
2001-07-17 05:58:10 +00:00
self.button2 = 0;
// player jumping sound
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
if (!(self.cutf_items & CUTF_STEALTH)) // Only play it if we don't have stealth
sound (self, CHAN_BODY, "player/plyrjmp8.wav", 1, ATTN_NORM);
Initial revision
2001-07-17 05:58:10 +00:00
//WK Sprinters jump higher
//SB No, people with high jump do
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
if (self.cutf_items & CUTF_HIGHJUMP)
Initial revision
2001-07-17 05:58:10 +00:00
self.velocity_z = self.velocity_z + 400;
};
/*
===========
WaterMove
============
*/
.float dmgtime;
void() WaterMove =
{
// RPrint (ftos(self.waterlevel));
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
if (self.movetype == MOVETYPE_NOCLIP)
Initial revision
2001-07-17 05:58:10 +00:00
return;
if (self.health < 0)
return;
//WK Poison attacks
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
if (self.tfstate & (TFSTATE_HALLUCINATING | TFSTATE_TRANQUILISED))
Initial revision
2001-07-17 05:58:10 +00:00
{
if (self.air_finished < time)
{ // drown!
if (self.pain_finished < time)
{
self.dmg = self.dmg + 0.5;
if (self.dmg == 2.5) //Initial damage is 2
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
sprint(self,PRINT_HIGH,"Your lungs are still paralyzed. Try to minimize your exposure to poison\n");
Initial revision
2001-07-17 05:58:10 +00:00
if (self.dmg > 6)
self.dmg = 2.2;
if (self.dmg < self.health - 1)
world -> NIL for null entities. Seems to work (only issue would be borked tests for foo == world -> !foo and for != world -> foo).
2001-11-02 17:00:52 +00:00
TF_T_Damage (self, NIL, NIL, self.dmg, TF_TD_IGNOREARMOUR, TF_TD_OTHER);
Initial revision
2001-07-17 05:58:10 +00:00
self.pain_finished = time + 1;
}
}
}
else if (self.waterlevel != 3)
{
if (self.air_finished < time)
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
sound (self, CHAN_VOICE, "player/gasp2.wav", 1, ATTN_NORM);
Initial revision
2001-07-17 05:58:10 +00:00
else if (self.air_finished < time + 9)
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
sound (self, CHAN_VOICE, "player/gasp1.wav", 1, ATTN_NORM);
Initial revision
2001-07-17 05:58:10 +00:00
self.air_finished = time + 12;
self.dmg = 2;
}
else if (self.air_finished < time)
{ // drown!
if (self.pain_finished < time)
{
self.dmg = self.dmg + 2;
if (self.dmg > 15)
self.dmg = 10;
world -> NIL for null entities. Seems to work (only issue would be borked tests for foo == world -> !foo and for != world -> foo).
2001-11-02 17:00:52 +00:00
TF_T_Damage (self, NIL, NIL, self.dmg, TF_TD_IGNOREARMOUR, TF_TD_OTHER);
Initial revision
2001-07-17 05:58:10 +00:00
self.pain_finished = time + 1;
}
}
if (!self.waterlevel)
{
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
if (self.flags & FL_INWATER)
Initial revision
2001-07-17 05:58:10 +00:00
{
// play leave water sound
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
if (!(self.cutf_items & CUTF_STEALTH)) // SB only if no stealth
sound (self, CHAN_BODY, "misc/outwater.wav", 1, ATTN_NORM);
self.flags = self.flags - FL_INWATER;
Initial revision
2001-07-17 05:58:10 +00:00
//WK Setspeed for Scuba commando
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
if (self.tf_items & NIT_SCUBA)
Initial revision
2001-07-17 05:58:10 +00:00
TeamFortress_SetSpeed(self);
}
return;
}
fix the field stuck test and rename CONTENT_* to CONTENTS_* to match the server source.
2001-07-31 17:08:59 +00:00
if (self.watertype == CONTENTS_LAVA)
Initial revision
2001-07-17 05:58:10 +00:00
{ // do damage
if (self.dmgtime < time)
{
if (self.radsuit_finished > time)
self.dmgtime = time + 1;
else
self.dmgtime = time + 0.2;
// Asbestos armor helps against lava, but I doubt it'll save you :)
world -> NIL for null entities. Seems to work (only issue would be borked tests for foo == world -> !foo and for != world -> foo).
2001-11-02 17:00:52 +00:00
TF_T_Damage (self, NIL, NIL, 10*self.waterlevel, 0, TF_TD_FIRE);
Initial revision
2001-07-17 05:58:10 +00:00
}
}
fix the field stuck test and rename CONTENT_* to CONTENTS_* to match the server source.
2001-07-31 17:08:59 +00:00
else if (self.watertype == CONTENTS_SLIME)
Initial revision
2001-07-17 05:58:10 +00:00
{ // do damage
if (self.dmgtime < time && self.radsuit_finished < time)
{
self.dmgtime = time + 1;
world -> NIL for null entities. Seems to work (only issue would be borked tests for foo == world -> !foo and for != world -> foo).
2001-11-02 17:00:52 +00:00
//T_Damage (self, NIL, NIL, 4*self.waterlevel);
TF_T_Damage (self, NIL, NIL, 4*self.waterlevel, 0, TF_TD_ELECTRICITY);
Initial revision
2001-07-17 05:58:10 +00:00
}
}
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
if ( !(self.flags & FL_INWATER) )
Initial revision
2001-07-17 05:58:10 +00:00
{
// player enter water sound
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
if (!(self.cutf_items & CUTF_STEALTH))
fix the field stuck test and rename CONTENT_* to CONTENTS_* to match the server source.
2001-07-31 17:08:59 +00:00
if (self.watertype == CONTENTS_LAVA)
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
sound (self, CHAN_BODY, "player/inlava.wav", 1, ATTN_NORM);
fix the field stuck test and rename CONTENT_* to CONTENTS_* to match the server source.
2001-07-31 17:08:59 +00:00
else if (self.watertype == CONTENTS_WATER)
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
sound (self, CHAN_BODY, "player/inh2o.wav", 1, ATTN_NORM);
fix the field stuck test and rename CONTENT_* to CONTENTS_* to match the server source.
2001-07-31 17:08:59 +00:00
else if (self.watertype == CONTENTS_SLIME)
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
sound (self, CHAN_BODY, "player/slimbrn2.wav", 1, ATTN_NORM);
self.flags = self.flags + FL_INWATER;
Initial revision
2001-07-17 05:58:10 +00:00
self.dmgtime = 0;
//WK Setspeed for scuba commando
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
if (self.tf_items & NIT_SCUBA)
Initial revision
2001-07-17 05:58:10 +00:00
TeamFortress_SetSpeed(self);
}
};
void() CheckWaterJump =
{
local vector start, end;
// check for a jump-out-of-water
makevectors (self.angles);
start = self.origin;
start_z = start_z + 8;
v_forward_z = 0;
normalize(v_forward);
end = start + v_forward*24;
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
traceline (start, end, TRUE, self);
Initial revision
2001-07-17 05:58:10 +00:00
if (trace_fraction < 1)
{ // solid at waist
start_z = start_z + self.maxs_z - 8;
end = start + v_forward*24;
self.movedir = trace_plane_normal * -50;
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
traceline (start, end, TRUE, self);
Initial revision
2001-07-17 05:58:10 +00:00
if (trace_fraction == 1)
{ // open at eye level
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
self.flags = self.flags | FL_WATERJUMP;
Initial revision
2001-07-17 05:58:10 +00:00
self.velocity_z = 225;
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
self.flags = self.flags - (self.flags & FL_JUMPRELEASED);
Initial revision
2001-07-17 05:58:10 +00:00
self.teleport_time = time + 2; // safety net
return;
}
}
};
/*
================
PlayerPreThink
Called every frame before physics are run
================
*/
void() PlayerPreThink =
{
local vector src;
//WK -- For LPB calculation
local string foo;
local float ping;
if (self.is_feigning && self.waterlevel == 1)
{
fix the field stuck test and rename CONTENT_* to CONTENTS_* to match the server source.
2001-07-31 17:08:59 +00:00
self.watertype = CONTENTS_WATER;
Initial revision
2001-07-17 05:58:10 +00:00
self.waterlevel = 3;
}
if (self.cheat_level > 0)
self.cheat_level = self.cheat_level - 1;
if (self.speed_level > 0) //Cyto
self.speed_level = self.speed_level - 1;
if (intermission_running)
{
IntermissionThink (); // otherwise a button could be missed between
return; // the think tics
}
makevectors (self.v_angle); // is this still used?
world -> NIL for null entities. Seems to work (only issue would be borked tests for foo == world -> !foo and for != world -> foo).
2001-11-02 17:00:52 +00:00
if (infokey(NIL,"ceasefire")=="on") //Cyto
Initial revision
2001-07-17 05:58:10 +00:00
{
#ifndef ceasefire_allows_to_move
if (self.lip)
self.origin = self.oldorigin;
else
{
self.velocity_z = -5000;
self.velocity_x = 0;
self.velocity_y = 0;
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
if (self.flags & FL_ONGROUND)
Initial revision
2001-07-17 05:58:10 +00:00
{
self.oldorigin = self.origin;
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
self.lip = TRUE;
Initial revision
2001-07-17 05:58:10 +00:00
}
}
#endif
CenterPrint(self,"Ceasefire Applies");
if (!Good_Impulse(self.impulse)) //See admin.qc
self.impulse = 0;
self.button0 = 0;
self.button1 = 0;
self.button2 = 0;
}
else if (self.lip)
{
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
self.lip = FALSE;
Initial revision
2001-07-17 05:58:10 +00:00
centerprint(self,"");
}
// End Cyt0
CheckRules ();
//xxxx
//WK Supercharged observer mode!
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
if (self.playerclass == PC_UNDEFINED)
Initial revision
2001-07-17 05:58:10 +00:00
{
if (self.button0)
{
//WK Nifty code to push through walls only if we really want to
if (vlen(self.velocity) < 200)
{
src = self.origin + normalize(v_forward) * 5;
setorigin(self,src);
}
self.velocity = normalize(v_forward) * 400;
}
else
{
foo = infokey(self,"ping");
ping = 200;
- some BUGS items - annihilate string_null (and empty_float and vector_null) - remove self.netname = infokey(self, "name");, since the server should do that for us - add a quotename function, to stick \xFF around a name - add a few death messages - set a "timeleft" serverinfo to be the number of minutes left in the game
2001-09-30 22:38:44 +00:00
if (foo)
Initial revision
2001-07-17 05:58:10 +00:00
ping = stof(foo);
if (ping < 300) {
self.velocity_x = floor((3 * self.velocity_x) / 4);
self.velocity_y = floor((3 * self.velocity_y) / 4);
self.velocity_z = floor((3 * self.velocity_z) / 4);
}
}
if (self.button2)
self.velocity = '0 0 0';
return;
//WK Removed jump == autoteam
//WK Removed all the demo stuff stuff.
}
if (self.view_ofs == '0 0 0')
return; // intermission or finale
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
if (self.playerclass != PC_UNDEFINED)
Initial revision
2001-07-17 05:58:10 +00:00
WaterMove();
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
if (self.deadflag >= DEAD_DEAD)
Initial revision
2001-07-17 05:58:10 +00:00
{
PlayerDeathThink ();
return;
}
if (self.undercover_team || self.undercover_skin || self.is_undercover)
{
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
if (self.effects & (EF_DIMLIGHT | EF_BRIGHTLIGHT))
Initial revision
2001-07-17 05:58:10 +00:00
{
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
sprint(self, PRINT_MEDIUM, "The glowing removes your disguise.\n");
Initial revision
2001-07-17 05:58:10 +00:00
Spy_RemoveDisguise(self);
}
}
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
/*if (self.job & JOB_THIEF && self.job & JOB_FULL_HIDE)
Initial revision
2001-07-17 05:58:10 +00:00
{
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
if (self.effects & (EF_DIMLIGHT | EF_BRIGHTLIGHT))
Initial revision
2001-07-17 05:58:10 +00:00
{
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
sprint(self, PRINT_MEDIUM, "The glowing removes your full invisibility.\n");
self.job = self.job - (self.job & JOB_FULL_HIDE);
self.job = self.job | JOB_ACTIVE;
Initial revision
2001-07-17 05:58:10 +00:00
}
} */
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
if (self.deadflag == DEAD_DYING)
Initial revision
2001-07-17 05:58:10 +00:00
return; // dying, so do nothing
if (!self.is_feigning)
{
if (self.button2)
{
PlayerJump (); //WK This just does noises for jumps
}
else
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
self.flags = self.flags | FL_JUMPRELEASED;
Initial revision
2001-07-17 05:58:10 +00:00
}
//WK Scuba commando treads water :)
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
if ((self.tf_items & NIT_SCUBA) && self.waterlevel > 1) {
Initial revision
2001-07-17 05:58:10 +00:00
if (self.velocity_z >= -25 && self.velocity_z < 0)
self.velocity_z = 10; //Tread water if near a stop
}
//Jello Water :)
else if (jello && self.waterlevel > 1) {
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
if (jello == TRUE) //Binary on/off
Initial revision
2001-07-17 05:58:10 +00:00
self.velocity_z = 1000; //900 is a better number for 2forts
else
self.velocity_z = jello;
}
// teleporters can force a non-moving pause time
if (time < self.pausetime)
self.velocity = '0 0 0';
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
if (time > self.attack_finished && self.currentammo == 0 && self.weapon > WEAP_AXE)
Initial revision
2001-07-17 05:58:10 +00:00
{
self.weapon = W_BestWeapon ();
W_SetCurrentAmmo ();
}
// Do grapple stuff if I'm on a hook
if (self.on_hook)
{
Service_Grapple ();
if (self.button2 && self.velocity_z > 10)
self.velocity_z = 10; //WK Allow more creative physics with hook
}
//WK Add Hover Boot Support
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
if (self.tf_items & NIT_HOVER_BOOTS) {
Initial revision
2001-07-17 05:58:10 +00:00
if (self.button2 && self.velocity_z < 0 && self.hover_time > 0 && self.waterlevel == 0)
{ //Try to hover
self.velocity_z = 100; //+10 == hover
self.hover_time = self.hover_time - 0.25; //0.1 == tick time
if (self.hover_time <= 0) {
self.hover_time = -5; //3 second penalty for draining it
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
sprint(self,PRINT_HIGH,"Your boots are out of fuel, let them recharge\n");
Initial revision
2001-07-17 05:58:10 +00:00
}
//Spit out fire from them!
if (self.search_time < time) {
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
sound (self, CHAN_AUTO, "weapons/flmfire2.wav", 1, ATTN_NORM);
Initial revision
2001-07-17 05:58:10 +00:00
local entity flame;
flame = spawn();
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
flame.owner = self;flame.movetype = MOVETYPE_FLYMISSILE;
flame.solid = SOLID_BBOX;flame.classname = "flamerflame";
Initial revision
2001-07-17 05:58:10 +00:00
makevectors (self.v_angle);
flame.velocity = -1 * v_up; flame.velocity = flame.velocity * 600;
flame.touch = Boot_Flamer_stream_touch;flame.think = s_explode1;
flame.nextthink = time + 0.1;setmodel (flame, "progs/s_explod.spr");
setsize (flame, '0 0 0', '0 0 0');
setorigin (flame, self.origin + v_up * -16);
self.search_time = time + 0.15;
}
}
else { //Recharger <- That's French for "recharge"
self.hover_time = self.hover_time + 0.01; //0.05 is a half-tick
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
if (self.hover_time > MAX_HOVER_FUEL && (!(self.tf_items & NIT_HOVER_BOOTS_UPGRADE)))
self.hover_time = MAX_HOVER_FUEL;
if (self.hover_time > (MAX_HOVER_FUEL * 2) && self.tf_items & NIT_HOVER_BOOTS_UPGRADE)
self.hover_time = (MAX_HOVER_FUEL * 2);
Initial revision
2001-07-17 05:58:10 +00:00
}
}
- gib people who leave the map :)
2001-10-07 22:47:59 +00:00
if (self.health > 0 && pointcontents (self.origin) == CONTENTS_SOLID)
world -> NIL for null entities. Seems to work (only issue would be borked tests for foo == world -> !foo and for != world -> foo).
2001-11-02 17:00:52 +00:00
TF_T_Damage (self, NIL, NIL, self.health + 100,
- gib people who leave the map :)
2001-10-07 22:47:59 +00:00
TF_TD_IGNOREARMOUR, TF_TD_OTHER);
Initial revision
2001-07-17 05:58:10 +00:00
};
/*
================
CheckPowerups
Check for turning off powerups
================
*/
void() CheckPowerups =
{
local float lighton;
local entity te;
if (self.health <= 0)
return;
// Invisibility
//WK Made people invis during building, and during thief's full hide
//WK And while being inspired by chaplan
- fixed thief so you don't go fully hidden when glowing - overhauled the alias setting stuff. It now includes a version number to detect when aliases have changed, and self-regulates the speed at which it sends them.
2001-08-11 10:02:18 +00:00
if (self.done_custom & CUSTOM_BUILDING //We are building a custom class
|| self.playerclass == PC_UNDEFINED //Or we're in observer mode
|| (self.job & JOB_THIEF && self.job & JOB_FULL_HIDE) //Or we are fully hiding thieves
// || (self.tfstate & TFSTATE_INSPIRED && !(self.job & JOB_CHAPLAN)) //ofN comented by
|| self.aura == AURA_INVIS) //- OfN
Initial revision
2001-07-17 05:58:10 +00:00
{
self.modelindex = modelindex_null; // don't use eyes
}
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
else if ((self.is_undercover == 1 && invis_only == TRUE) || (self.job & JOB_THIEF && self.job & JOB_ACTIVE))
Initial revision
2001-07-17 05:58:10 +00:00
{
self.frame = 0;
self.modelindex = modelindex_eyes;
}
else if (self.invisible_finished)
{
// If this is being given by a goalitem, extend the time
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
if (self.tfstate & TFSTATE_INVISIBLE)
Initial revision
2001-07-17 05:58:10 +00:00
{
if (self.invisible_finished < time + 10)
self.invisible_finished = time + 666;
}
// sound and screen flash when items starts to run out
if (self.invisible_sound < time)
{
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
sound (self, CHAN_AUTO, "items/inv3.wav", 0.5, ATTN_IDLE);
Initial revision
2001-07-17 05:58:10 +00:00
self.invisible_sound = time + ((random() * 3) + 1);
}
if (self.invisible_finished < time + 3)
{
if (self.invisible_time == 1)
{
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
sprint(self, PRINT_HIGH, "Ring of Shadows magic is fading\n");
Initial revision
2001-07-17 05:58:10 +00:00
stuffcmd (self, "bf\n");
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
sound (self, CHAN_AUTO, "items/inv2.wav", 1, ATTN_NORM);
Initial revision
2001-07-17 05:58:10 +00:00
self.invisible_time = time + 1;
}
if (self.invisible_time < time)
{
self.invisible_time = time + 1;
stuffcmd (self, "bf\n");
}
}
if (self.invisible_finished < time)
{ // just stopped
Change a bunch of self.items = self.items - (self.items & IT_FOO) lines to self.items = self.items & ~IT_FOO. also changed some self.items = self.items - IT_FOO lines, which were just Really Evil (tm)
2001-08-10 10:03:36 +00:00
self.items = self.items & ~IT_INVISIBILITY;
Initial revision
2001-07-17 05:58:10 +00:00
self.invisible_finished = 0;
self.invisible_time = 0;
}
// use the eyes
self.frame = 0;
self.modelindex = modelindex_eyes;
}
else
self.modelindex = modelindex_player; // don't use eyes
// invincibility
if (self.invincible_finished)
{
// If this is being given by a goalitem, extend the time
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
if (self.tfstate & TFSTATE_INVINCIBLE)
Initial revision
2001-07-17 05:58:10 +00:00
{
if (self.invincible_finished < time + 10)
self.invincible_finished = time + 666;
}
// sound and screen flash when items starts to run out
if (self.invincible_finished < time + 3)
{
if (self.invincible_time == 1)
{
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
sprint (self, PRINT_HIGH, "Protection is almost burned out\n");
Initial revision
2001-07-17 05:58:10 +00:00
stuffcmd (self, "bf\n");
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
sound (self, CHAN_AUTO, "items/protect2.wav", 1, ATTN_NORM);
Initial revision
2001-07-17 05:58:10 +00:00
self.invincible_time = time + 1;
}
if (self.invincible_time < time)
{
self.invincible_time = time + 1;
stuffcmd (self, "bf\n");
}
}
if (self.invincible_finished < time)
{ // just stopped
Change a bunch of self.items = self.items - (self.items & IT_FOO) lines to self.items = self.items & ~IT_FOO. also changed some self.items = self.items - IT_FOO lines, which were just Really Evil (tm)
2001-08-10 10:03:36 +00:00
self.items = self.items & ~IT_INVULNERABILITY;
Initial revision
2001-07-17 05:58:10 +00:00
self.invincible_time = 0;
self.invincible_finished = 0;
}
if (self.invincible_finished > time)
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
self.effects = self.effects | EF_DIMLIGHT;
Initial revision
2001-07-17 05:58:10 +00:00
else
{
// Only remove dimlight if it's not being supplied by a GoalItem
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
lighton = FALSE;
world -> NIL for null entities. Seems to work (only issue would be borked tests for foo == world -> !foo and for != world -> foo).
2001-11-02 17:00:52 +00:00
te = find (NIL, classname, "item_tfgoal");
Initial revision
2001-07-17 05:58:10 +00:00
while (te)
{
if (te.owner == self)
{
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
if (te.goal_activation & TFGI_GLOW)
lighton = TRUE;
Initial revision
2001-07-17 05:58:10 +00:00
}
te = find(te, classname, "item_tfgoal");
}
if (!lighton)
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
self.effects = self.effects - (self.effects & EF_DIMLIGHT);
Initial revision
2001-07-17 05:58:10 +00:00
}
}
// super damage
if (self.super_damage_finished)
{
// If this is being given by a goalitem, extend the time
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
if (self.tfstate & TFSTATE_QUAD)
Initial revision
2001-07-17 05:58:10 +00:00
{
if (self.super_damage_finished == time + 10)
self.super_damage_finished = time + 666;
}
// sound and screen flash when items starts to run out
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
if (self.super_damage_finished < time + 3 && !(self.tfstate & TFSTATE_INSPIRED))
Initial revision
2001-07-17 05:58:10 +00:00
{
if (self.super_time == 1)
{
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
sprint (self, PRINT_HIGH, "Quad Damage is wearing off\n");
Initial revision
2001-07-17 05:58:10 +00:00
stuffcmd (self, "bf\n");
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
sound (self, CHAN_AUTO, "items/damage2.wav", 1, ATTN_NORM);
Initial revision
2001-07-17 05:58:10 +00:00
self.super_time = time + 1;
}
if (self.super_time < time)
{
self.super_time = time + 1;
stuffcmd (self, "bf\n");
}
}
if (self.super_damage_finished < time)
{ // just stopped
Change a bunch of self.items = self.items - (self.items & IT_FOO) lines to self.items = self.items & ~IT_FOO. also changed some self.items = self.items - IT_FOO lines, which were just Really Evil (tm)
2001-08-10 10:03:36 +00:00
self.items = self.items & ~IT_QUAD;
Initial revision
2001-07-17 05:58:10 +00:00
self.super_damage_finished = 0;
self.super_time = 0;
//WK If inspired, remove inspiration
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
self.tfstate = self.tfstate - (self.tfstate & TFSTATE_INSPIRED);
Initial revision
2001-07-17 05:58:10 +00:00
}
if (self.super_damage_finished > time)
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
self.effects = self.effects | EF_DIMLIGHT;
Initial revision
2001-07-17 05:58:10 +00:00
else
{
// Only remove dimlight if it's not being supplied by a GoalItem
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
lighton = FALSE;
world -> NIL for null entities. Seems to work (only issue would be borked tests for foo == world -> !foo and for != world -> foo).
2001-11-02 17:00:52 +00:00
te = find (NIL, classname, "item_tfgoal");
Initial revision
2001-07-17 05:58:10 +00:00
while (te)
{
if (te.owner == self)
{
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
if (te.goal_activation & TFGI_GLOW)
lighton = TRUE;
Initial revision
2001-07-17 05:58:10 +00:00
}
te = find(te, classname, "item_tfgoal");
}
if (!lighton)
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
self.effects = self.effects - (self.effects & EF_DIMLIGHT);
Initial revision
2001-07-17 05:58:10 +00:00
}
}
// suit
if (self.radsuit_finished)
{
self.air_finished = time + 12; // don't drown
// If this is being given by a goalitem, extend the time
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
if (self.tfstate & TFSTATE_RADSUIT || self.tf_items & NIT_SCUBA)
Initial revision
2001-07-17 05:58:10 +00:00
{
//WK Do we need this? if (self.radsuit_finished == time + 10)
self.radsuit_finished = time + 666;
}
// sound and screen flash when items starts to run out
if (self.radsuit_finished < time + 3)
{
if (self.rad_time == 1)
{
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
sprint (self, PRINT_HIGH, "Air supply in Biosuit expiring\n");
Initial revision
2001-07-17 05:58:10 +00:00
stuffcmd (self, "bf\n");
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
sound (self, CHAN_AUTO, "items/suit2.wav", 1, ATTN_NORM);
Initial revision
2001-07-17 05:58:10 +00:00
self.rad_time = time + 1;
}
if (self.rad_time < time)
{
self.rad_time = time + 1;
stuffcmd (self, "bf\n");
}
}
if (self.radsuit_finished < time)
{ // just stopped
Change a bunch of self.items = self.items - (self.items & IT_FOO) lines to self.items = self.items & ~IT_FOO. also changed some self.items = self.items - IT_FOO lines, which were just Really Evil (tm)
2001-08-10 10:03:36 +00:00
self.items = self.items & ~IT_SUIT;
Initial revision
2001-07-17 05:58:10 +00:00
self.rad_time = 0;
self.radsuit_finished = 0;
}
}
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
if (self.aura == AURA_INVIS)
Initial revision
2001-07-17 05:58:10 +00:00
if (self.aura_time < time)
{
if (self.invisible_finished < time)
Change a bunch of self.items = self.items - (self.items & IT_FOO) lines to self.items = self.items & ~IT_FOO. also changed some self.items = self.items - IT_FOO lines, which were just Really Evil (tm)
2001-08-10 10:03:36 +00:00
self.items = self.items & ~IT_INVISIBILITY;
Initial revision
2001-07-17 05:58:10 +00:00
self.aura = 0;
}
};
void() DeadImpulses;
/*
================
Called every frame after physics are run
================
*/
void() PlayerPostThink =
{
if (self.view_ofs == '0 0 0')
return; // intermission or finale
world -> NIL for null entities. Seems to work (only issue would be borked tests for foo == world -> !foo and for != world -> foo).
2001-11-02 17:00:52 +00:00
if (infokey(NIL,"ceasefire")=="on") //Cyto
Initial revision
2001-07-17 05:58:10 +00:00
if (!Good_Impulse(self.impulse)) //See admin.qc
self.impulse = 0;
if (self.deadflag)
{
DeadImpulses(); // check for dead-only commands
self.impulse = 0;
return;
}
// check to see if player landed and play landing sound
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
if (self.takedamage && (self.jump_flag < -300) && (self.flags & FL_ONGROUND) && (self.health > 0))
Initial revision
2001-07-17 05:58:10 +00:00
{
fix the field stuck test and rename CONTENT_* to CONTENTS_* to match the server source.
2001-07-31 17:08:59 +00:00
if (self.watertype == CONTENTS_WATER)
Initial revision
2001-07-17 05:58:10 +00:00
{
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
if (!(self.cutf_items & CUTF_STEALTH))
sound (self, CHAN_BODY, "player/h2ojump.wav", 1, ATTN_NORM);
Initial revision
2001-07-17 05:58:10 +00:00
}
else if (self.jump_flag < -650)
{
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
if (!(self.cutf_items & CUTF_STEALTH)) { //WK Judo teaches falling... SB ceaf judo
Initial revision
2001-07-17 05:58:10 +00:00
self.deathtype = "falling";
world -> NIL for null entities. Seems to work (only issue would be borked tests for foo == world -> !foo and for != world -> foo).
2001-11-02 17:00:52 +00:00
T_Damage (self, NIL, NIL, 5);
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
sound (self, CHAN_VOICE, "player/land2.wav", 1, ATTN_NORM);
Initial revision
2001-07-17 05:58:10 +00:00
}
}
else
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
if (!(self.cutf_items & CUTF_STEALTH)) //WK Judo teaches falling... SB ceaf judo
sound (self, CHAN_VOICE, "player/land.wav", 1, ATTN_NORM);
Initial revision
2001-07-17 05:58:10 +00:00
}
self.jump_flag = self.velocity_z;
CheckPowerups ();
W_WeaponFrame ();
// Display MOTD
// Sync this with tforthlp.qc and menu.qc
- fixed thief so you don't go fully hidden when glowing - overhauled the alias setting stuff. It now includes a version number to detect when aliases have changed, and self-regulates the speed at which it sends them.
2001-08-11 10:02:18 +00:00
TeamFortress_MOTD();
if (self.cheat_check == 0)
Initial revision
2001-07-17 05:58:10 +00:00
self.cheat_check = time + 10;
#ifdef STATUSBAR
else if (time > self.StatusRefreshTime && self.StatusBarSize != 0)
{
if (self.StatusBarScreen == 1)
RefreshStatusBar1(self); //Sentry screen
else if (self.StatusBarScreen == 2)
RefreshStatusBar2(self); //Spy screen
else if (self.StatusBarScreen == 3)
RefreshStatusBar3(self); //Misc screen
else if (self.StatusBarScreen == 4)
RefreshStatusBar4(self); //Tesla screen
else if (self.StatusBarScreen == 5)
RefreshStatusBar5(self); //Scanner screen
else
RefreshStatusBar(self); //Normal scores and clip
}
#endif
// Check for Team Cheats
if (self.cheat_check <= time)
{
TeamFortress_CheckTeamCheats();
self.cheat_check = time + 5;
}
};
/*
===========
ClientConnect
called when a player connects to a server
============
*/
void() ClientConnect =
{
local string st;
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
bprint (PRINT_HIGH, self.netname);
bprint (PRINT_HIGH, " has joined the server\n");
Initial revision
2001-07-17 05:58:10 +00:00
//- OfN - shouldnt be needed anyway...
world -> NIL for null entities. Seems to work (only issue would be borked tests for foo == world -> !foo and for != world -> foo).
2001-11-02 17:00:52 +00:00
self.admin_kick = NIL;
Initial revision
2001-07-17 05:58:10 +00:00
// Set Default autozoom
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
if (DEFAULT_AUTOZOOM == OFF)
self.tfstate = self.tfstate | TFSTATE_ZOOMOFF;
Initial revision
2001-07-17 05:58:10 +00:00
// Set the MOTD on
self.motd = 0;
// Clear the Alias Flag
self.got_aliases = 0;
self.ff_count = 0; //WK Clear the friendly-fire counter
//RJM
st = infokey(self, "sbr");
- some BUGS items - annihilate string_null (and empty_float and vector_null) - remove self.netname = infokey(self, "name");, since the server should do that for us - add a quotename function, to stick \xFF around a name - add a few death messages - set a "timeleft" serverinfo to be the number of minutes left in the game
2001-09-30 22:38:44 +00:00
if (!st)
Initial revision
2001-07-17 05:58:10 +00:00
//RJM
st = infokey(self, "sbar_res");
if (st == "768")
self.StatusBarRes = 8;
else if (st == "600")
self.StatusBarRes = 7;
else if (st == "480")
self.StatusBarRes = 6;
else if (st == "400")
self.StatusBarRes = 5;
else if (st == "384")
self.StatusBarRes = 4;
else if (st == "350")
self.StatusBarRes = 3;
else if (st == "300")
self.StatusBarRes = 2;
else if (st == "240")
self.StatusBarRes = 1;
else
self.StatusBarRes = 0;
//RJM
st = infokey(self, "sbs");
- some BUGS items - annihilate string_null (and empty_float and vector_null) - remove self.netname = infokey(self, "name");, since the server should do that for us - add a quotename function, to stick \xFF around a name - add a few death messages - set a "timeleft" serverinfo to be the number of minutes left in the game
2001-09-30 22:38:44 +00:00
if (!st)
Initial revision
2001-07-17 05:58:10 +00:00
//RJM
st = infokey(self, "sbar_size");
self.StatusBarSize = stof(st);
if (self.StatusBarSize > 2 || self.StatusBarSize < 0)
self.StatusBarSize = 0;
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
self.has_disconnected = FALSE;
Initial revision
2001-07-17 05:58:10 +00:00
//PlayerObserverMode(); //ofn already commented out
self.gravity = 0;
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
self.movetype = MOVETYPE_FLY;
Initial revision
2001-07-17 05:58:10 +00:00
// a client connecting during an intermission can cause problems
if (intermission_running)
GotoNextMap();
//- OfN
if (mapname == "huntedr")
{
local float result;
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
result = floor(TeamFortress_TeamGetNoPlayers(2) * HUNTED_YELLOWTEAM_FACTOR);
Initial revision
2001-07-17 05:58:10 +00:00
team3maxplayers = result;
if (team3maxplayers < 1) team3maxplayers = 1;
}
};
/*
===========
ClientDisconnect
called when a player disconnects from a server
============
*/
void() ClientDisconnect =
{
local entity te;
local string st;
st = ftos (floor(self.real_frags));
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
bprint (PRINT_HIGH, self.netname);
bprint (PRINT_HIGH, " has left the game with ");
bprint (PRINT_HIGH, st);
bprint (PRINT_HIGH, " frags and ");
Initial revision
2001-07-17 05:58:10 +00:00
st = ftos (floor(self.ff_count));
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
bprint (PRINT_HIGH, st);
bprint (PRINT_HIGH, " teamkills\n");
Initial revision
2001-07-17 05:58:10 +00:00
//- he got significant score?
/*local float temp_scr;
local float avr_team_scr;
avr_team_scr = (team1score + team2score + team3score + team4score) / number_of_teams;
temp_scr = fabs (self.real_frags) + self.ff_count;
if ( (temp_scr > time || time > 20) && time < 60*60 && deathmatch == 3)
{
local float final_score;
final_score = self.real_frags - self.ff_count*3 - avr_team_scr/2 ;
if ( final_score < -50 )
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
bprint (PRINT_HIGH, "bad enough to ban him! hehe\n");
Initial revision
2001-07-17 05:58:10 +00:00
else if (final_score < 0)
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
bprint (PRINT_HIGH, "damn newbie!\n");
Initial revision
2001-07-17 05:58:10 +00:00
else if (final_score < 10)
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
bprint (PRINT_HIGH, "he was not doing much\n");
Initial revision
2001-07-17 05:58:10 +00:00
else if (final_score < 30)
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
bprint (PRINT_HIGH, "a regular player\n");
Initial revision
2001-07-17 05:58:10 +00:00
else if (final_score < 50)
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
bprint (PRINT_HIGH, "not bad!\n");
Initial revision
2001-07-17 05:58:10 +00:00
else if (final_score < 75)
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
bprint (PRINT_HIGH, "good score\n");
Initial revision
2001-07-17 05:58:10 +00:00
else if (final_score < 100)
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
bprint (PRINT_HIGH, "cool score!\n");
Initial revision
2001-07-17 05:58:10 +00:00
else if (final_score < 125)
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
bprint (PRINT_HIGH, "he is a real master of customTF!\n");
else bprint (PRINT_HIGH, "omg! did he cheat? awesome score!\n");
Initial revision
2001-07-17 05:58:10 +00:00
}*/
//- OfN
if (mapname == "huntedr")
{
local float result;
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
result = floor(TeamFortress_TeamGetNoPlayers(2) * HUNTED_YELLOWTEAM_FACTOR);
Initial revision
2001-07-17 05:58:10 +00:00
team3maxplayers = result;
if (team3maxplayers < 1) team3maxplayers = 1;
}
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
sound (self, CHAN_BODY, "player/tornoff2.wav", 1, ATTN_NONE);
self.has_disconnected = TRUE;
Initial revision
2001-07-17 05:58:10 +00:00
if (debug_target == self)
world -> NIL for null entities. Seems to work (only issue would be borked tests for foo == world -> !foo and for != world -> foo).
2001-11-02 17:00:52 +00:00
debug_target = NIL;
Initial revision
2001-07-17 05:58:10 +00:00
// Remove Timers
TeamFortress_RemoveTimers();
// Remove Buildings
DetonateAllGunsForced();
/*Find_And_Dmg("building_dispenser", self, 1);
Find_And_Dmg("building_sentrygun", self, 1);
Find_And_Dmg("building_tesla", self, 1);
Find_And_Dmg("building_camera", self, 1);
Find_And_Dmg("building_teleporter", self, 1);
Find_And_Dmg("building_sensor", self, 1); //sb*/
//WK Added demon cleanup
kill_my_demon();
//WK Added ammobox/pipebomb fix
world -> NIL for null entities. Seems to work (only issue would be borked tests for foo == world -> !foo and for != world -> foo).
2001-11-02 17:00:52 +00:00
te = find(NIL, classname, "ammobox");
Initial revision
2001-07-17 05:58:10 +00:00
while (te)
{
if (te.enemy == self) {
num_world_ammoboxes = num_world_ammoboxes - 1;
if (te.enemy.team_no != 0)
decrement_team_ammoboxes(self.team_no);
}
te.think = SUB_Remove;
te.nextthink = time + 0.1;
te = find(te, classname, "ammobox");
}
world -> NIL for null entities. Seems to work (only issue would be borked tests for foo == world -> !foo and for != world -> foo).
2001-11-02 17:00:52 +00:00
te = find(NIL, classname, "pipebomb");
Initial revision
2001-07-17 05:58:10 +00:00
while (te)
{
if (te.owner == self) {
num_world_pipebombs = num_world_pipebombs - 1;
decrement_team_pipebombs(self.team_no);
te.think = SUB_Remove;
te.nextthink = time + 0.1;
}
te = find(te, classname, "pipebomb");
}
// OfN - Remove holograph if player disconnects!
if (self.has_holo > 0 ) RemoveHolo(self);
DetonateMines(self);
RemoveArmyTimer();
// Remove Detpacks
world -> NIL for null entities. Seems to work (only issue would be borked tests for foo == world -> !foo and for != world -> foo).
2001-11-02 17:00:52 +00:00
te = find(NIL, classname, "detpack");
Initial revision
2001-07-17 05:58:10 +00:00
while (te)
{
if (te.owner == self)
{
if (te.weaponmode == 1) // Detpack was being disarmed
{
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
te.enemy.tfstate = te.enemy.tfstate - (te.enemy.tfstate & TFSTATE_CANT_MOVE);
Initial revision
2001-07-17 05:58:10 +00:00
TeamFortress_SetSpeed(te.enemy);
dremove(te.oldenemy); // CountDown
dremove(te.observer_list); // Disarm timer
}
dremove(te);
world -> NIL for null entities. Seems to work (only issue would be borked tests for foo == world -> !foo and for != world -> foo).
2001-11-02 17:00:52 +00:00
te = NIL;
Initial revision
2001-07-17 05:58:10 +00:00
}
te = find(te, classname, "detpack");
}
- set martyr_enemy to the hacker when he does bad hacks to a field gen - use martyr_enemy as the badguy when a fieldgen frys teammates - make sure martyr_enemy is set to world when the guy disconnects - move ClientObituary into it's own obituary.qc file - tweak field lighting times and stuff - add code to turn off a field the instant it's turned on, instead of later when it thinks, but that's disabled for now - probably other stuff I've forgotten I havn't actually set the deathmsg for friendly forcefield kills yet. I'm commiting now to reduce conflicting changes.
2001-07-27 20:48:54 +00:00
// Clear anything that thinks he attacked/hacked it
local entity mrmartyr;
world -> NIL for null entities. Seems to work (only issue would be borked tests for foo == world -> !foo and for != world -> foo).
2001-11-02 17:00:52 +00:00
mrmartyr = NIL;
- set martyr_enemy to the hacker when he does bad hacks to a field gen - use martyr_enemy as the badguy when a fieldgen frys teammates - make sure martyr_enemy is set to world when the guy disconnects - move ClientObituary into it's own obituary.qc file - tweak field lighting times and stuff - add code to turn off a field the instant it's turned on, instead of later when it thinks, but that's disabled for now - probably other stuff I've forgotten I havn't actually set the deathmsg for friendly forcefield kills yet. I'm commiting now to reduce conflicting changes.
2001-07-27 20:48:54 +00:00
do {
mrmartyr = nextent (mrmartyr);
fix and assign to world on client exit
2001-07-28 02:47:17 +00:00
if (mrmartyr && mrmartyr.martyr_enemy == te)
world -> NIL for null entities. Seems to work (only issue would be borked tests for foo == world -> !foo and for != world -> foo).
2001-11-02 17:00:52 +00:00
mrmartyr.martyr_enemy = NIL;
} while (mrmartyr);
- set martyr_enemy to the hacker when he does bad hacks to a field gen - use martyr_enemy as the badguy when a fieldgen frys teammates - make sure martyr_enemy is set to world when the guy disconnects - move ClientObituary into it's own obituary.qc file - tweak field lighting times and stuff - add code to turn off a field the instant it's turned on, instead of later when it thinks, but that's disabled for now - probably other stuff I've forgotten I havn't actually set the deathmsg for friendly forcefield kills yet. I'm commiting now to reduce conflicting changes.
2001-07-27 20:48:54 +00:00
Initial revision
2001-07-17 05:58:10 +00:00
set_suicide_frame ();
- some BUGS items - annihilate string_null (and empty_float and vector_null) - remove self.netname = infokey(self, "name");, since the server should do that for us - add a quotename function, to stick \xFF around a name - add a few death messages - set a "timeleft" serverinfo to be the number of minutes left in the game
2001-09-30 22:38:44 +00:00
self.netname = "";
Initial revision
2001-07-17 05:58:10 +00:00
self.team_no = 0;
dist qfpreqcc for cpp. much faster compilation. seems to work, too.
2001-07-23 20:52:47 +00:00
self.solid = SOLID_NOT;
self.movetype = MOVETYPE_NONE; //WK Stop crashing MOVETYPE_WALK bug?
Initial revision
2001-07-17 05:58:10 +00:00
setsize(self, '0 0 0', '0 0 0');
};
- some BUGS items - annihilate string_null (and empty_float and vector_null) - remove self.netname = infokey(self, "name");, since the server should do that for us - add a quotename function, to stick \xFF around a name - add a few death messages - set a "timeleft" serverinfo to be the number of minutes left in the game
2001-09-30 22:38:44 +00:00
string (string s) quotename =
{
return "\xFF" + s + "\xFF";
};
Reference in a new issue Copy permalink