X-Git-Url: http://de.git.xonotic.org/?p=xonotic%2Fdarkplaces.git;a=blobdiff_plain;f=pr_cmds.c;h=19643ea05b93c44ebca965fea2722ca7c241df59;hp=b45bdccc6eee151600d6e9df49aee074efad941c;hb=902f14e9a4773dd27a338562511f418763b903f7;hpb=eebd18fb1a1b617f7d8f454e4efbb80838331101

diff --git a/pr_cmds.c b/pr_cmds.c
index b45bdccc..19643ea0 100644
--- a/pr_cmds.c
+++ b/pr_cmds.c
@@ -23,13 +23,23 @@ Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.
 cvar_t sv_aim = {CVAR_SAVE, "sv_aim", "2"}; //"0.93"}; // LordHavoc: disabled autoaim by default
 cvar_t pr_zone_min_strings = {0, "pr_zone_min_strings", "64"};
 
-mempool_t *pr_strings_mempool;
-
-#define MAX_VARSTRING 4096
+// LordHavoc: added this to semi-fix the problem of using many ftos calls in a print
+#define STRINGTEMP_BUFFERS 16
+#define STRINGTEMP_LENGTH 4096
+static char pr_string_temp[STRINGTEMP_BUFFERS][STRINGTEMP_LENGTH];
+static int pr_string_tempindex = 0;
 
-char pr_varstring_temp[MAX_VARSTRING];
+static char *PR_GetTempString(void)
+{
+	char *s;
+	s = pr_string_temp[pr_string_tempindex];
+	pr_string_tempindex = (pr_string_tempindex + 1) % STRINGTEMP_BUFFERS;
+	return s;
+}
 
-#define	RETURN_EDICT(e) (((int *)pr_globals)[OFS_RETURN] = EDICT_TO_PROG(e))
+#define	RETURN_EDICT(e) (G_INT(OFS_RETURN) = EDICT_TO_PROG(e))
+#define PF_WARNING(s) do{Con_Printf(s);PR_PrintState();return;}while(0)
+#define PF_ERROR(s) do{Host_Error(s);return;}while(0)
 
 
 /*
@@ -41,14 +51,13 @@ char pr_varstring_temp[MAX_VARSTRING];
 */
 
 
-char *PF_VarString (int first)
+void PF_VarString(int first, char *out, int outlength)
 {
 	int i;
 	const char *s;
-	char *out, *outend;
+	char *outend;
 
-	out = pr_varstring_temp;
-	outend = pr_varstring_temp + sizeof(pr_varstring_temp) - 1;
+	outend = out + outlength - 1;
 	for (i = first;i < pr_argc && out < outend;i++)
 	{
 		s = G_STRING((OFS_PARM0+i*3));
@@ -56,23 +65,29 @@ char *PF_VarString (int first)
 			*out++ = *s++;
 	}
 	*out++ = 0;
-	return pr_varstring_temp;
 }
 
 char *ENGINE_EXTENSIONS =
+"DP_BUTTONCHAT "
+"DP_BUTTONUSE "
 "DP_CL_LOADSKY "
-"DP_EF_NODRAW "
+"DP_CON_SET "
+"DP_CON_SETA "
+"DP_CON_STARTMAP "
 "DP_EF_ADDITIVE "
 "DP_EF_BLUE "
-"DP_EF_RED "
-"DP_EF_FULLBRIGHT "
 "DP_EF_FLAME "
+"DP_EF_FULLBRIGHT "
+"DP_EF_NODEPTHTEST "
+"DP_EF_NODRAW "
+"DP_EF_NOSHADOW "
+"DP_EF_RED "
 "DP_EF_STARDUST "
 "DP_ENT_ALPHA "
 "DP_ENT_CUSTOMCOLORMAP "
 "DP_ENT_EXTERIORMODELTOCLIENT "
-"DP_ENT_LOWPRECISION "
 "DP_ENT_GLOW "
+"DP_ENT_LOWPRECISION "
 "DP_ENT_SCALE "
 "DP_ENT_VIEWMODEL "
 "DP_GFX_EXTERNALTEXTURES "
@@ -82,34 +97,56 @@ char *ENGINE_EXTENSIONS =
 "DP_GFX_SKYBOX "
 "DP_HALFLIFE_MAP "
 "DP_HALFLIFE_MAP_CVAR "
+"DP_HALFLIFE_SPRITE "
 "DP_INPUTBUTTONS "
+"DP_LITSPRITES "
+"DP_LITSUPPORT "
 "DP_MONSTERWALK "
 "DP_MOVETYPEBOUNCEMISSILE "
 "DP_MOVETYPEFOLLOW "
 "DP_QC_CHANGEPITCH "
 "DP_QC_COPYENTITY "
+"DP_QC_CVAR_STRING "
 "DP_QC_ETOS "
 "DP_QC_FINDCHAIN "
+"DP_QC_FINDCHAINFLAGS "
 "DP_QC_FINDCHAINFLOAT "
+"DP_QC_FINDFLAGS "
 "DP_QC_FINDFLOAT "
+"DP_QC_FS_SEARCH " // Black: same as in the menu qc
 "DP_QC_GETLIGHT "
 "DP_QC_GETSURFACE "
+"DP_QC_GETTAGINFO "
 "DP_QC_MINMAXBOUND "
+"DP_QC_MULTIPLETEMPSTRINGS "
 "DP_QC_RANDOMVEC "
 "DP_QC_SINCOSSQRTPOW "
 "DP_QC_TRACEBOX "
 "DP_QC_TRACETOSS "
+"DP_QC_TRACE_MOVETYPE_HITMODEL "
+"DP_QC_TRACE_MOVETYPE_WORLDONLY "
 "DP_QC_VECTORVECTORS "
 "DP_QUAKE2_MODEL "
+"DP_QUAKE2_SPRITE "
 "DP_QUAKE3_MODEL "
 "DP_REGISTERCVAR "
+"DP_SND_DIRECTIONLESSATTNNONE "
+"DP_SND_FAKETRACKS "
+"DP_SND_OGGVORBIS "
+"DP_SND_STEREOWAV "
 "DP_SOLIDCORPSE "
 "DP_SPRITE32 "
+"DP_SV_BOTCLIENT "
+"DP_SV_CLIENTCOLORS "
+"DP_SV_CLIENTNAME "
 "DP_SV_DRAWONLYTOCLIENT "
+"DP_SV_DROPCLIENT "
 "DP_SV_EFFECT "
-"DP_SV_EXTERIORMODELTOCLIENT "
 "DP_SV_NODRAWTOCLIENT "
+"DP_SV_PING "
 "DP_SV_PLAYERPHYSICS "
+"DP_SV_PUNCHVECTOR "
+"DP_SV_ROTATINGBMODEL "
 "DP_SV_SETCOLOR "
 "DP_SV_SLOWMO "
 "DP_TE_BLOOD "
@@ -130,7 +167,12 @@ char *ENGINE_EXTENSIONS =
 "KRIMZON_SV_PARSECLIENTCOMMAND "
 "NEH_CMD_PLAY2 "
 "NEH_RESTOREGAME "
+"NXQ_GFX_LETTERBOX "
+"PRYDON_CLIENTCURSOR "
+"TENEBRAE_GFX_DLIGHTS "
 "TW_SV_STEPCONTROL "
+"NEXUIZ_PLAYERMODEL "
+"NEXUIZ_PLAYERSKIN "
 ;
 
 qboolean checkextension(char *name)
@@ -180,15 +222,15 @@ error(value)
 */
 void PF_error (void)
 {
-	char	*s;
 	edict_t	*ed;
+	char string[STRINGTEMP_LENGTH];
 
-	s = PF_VarString(0);
-	Con_Printf ("======SERVER ERROR in %s:\n%s\n", PR_GetString(pr_xfunction->s_name), s);
+	PF_VarString(0, string, sizeof(string));
+	Con_Printf("======SERVER ERROR in %s:\n%s\n", PR_GetString(pr_xfunction->s_name), string);
 	ed = PROG_TO_EDICT(pr_global_struct->self);
-	ED_Print (ed);
+	ED_Print(ed);
 
-	Host_Error ("Program error");
+	PF_ERROR("Program error");
 }
 
 /*
@@ -203,13 +245,13 @@ objerror(value)
 */
 void PF_objerror (void)
 {
-	char	*s;
 	edict_t	*ed;
+	char string[STRINGTEMP_LENGTH];
 
-	s = PF_VarString(0);
-	Con_Printf ("======OBJECT ERROR in %s:\n%s\n", PR_GetString(pr_xfunction->s_name), s);
+	PF_VarString(0, string, sizeof(string));
+	Con_Printf("======OBJECT ERROR in %s:\n%s\n", PR_GetString(pr_xfunction->s_name), string);
 	ed = PROG_TO_EDICT(pr_global_struct->self);
-	ED_Print (ed);
+	ED_Print(ed);
 	ED_Free (ed);
 }
 
@@ -256,6 +298,10 @@ void PF_setorigin (void)
 	float	*org;
 
 	e = G_EDICT(OFS_PARM0);
+	if (e == sv.edicts)
+		PF_WARNING("setorigin: can not modify world entity\n");
+	if (e->e->free)
+		PF_WARNING("setorigin: can not modify free entity\n");
 	org = G_VECTOR(OFS_PARM1);
 	VectorCopy (org, e->v->origin);
 	SV_LinkEdict (e, false);
@@ -268,7 +314,7 @@ void SetMinMaxSize (edict_t *e, float *min, float *max, qboolean rotate)
 
 	for (i=0 ; i<3 ; i++)
 		if (min[i] > max[i])
-			Host_Error ("backwards mins/maxs");
+			PF_ERROR("SetMinMaxSize: backwards mins/maxs\n");
 
 // set derived values
 	VectorCopy (min, e->v->mins);
@@ -294,6 +340,10 @@ void PF_setsize (void)
 	float	*min, *max;
 
 	e = G_EDICT(OFS_PARM0);
+	if (e == sv.edicts)
+		PF_WARNING("setsize: can not modify world entity\n");
+	if (e->e->free)
+		PF_WARNING("setsize: can not modify free entity\n");
 	min = G_VECTOR(OFS_PARM1);
 	max = G_VECTOR(OFS_PARM2);
 	SetMinMaxSize (e, min, max, false);
@@ -307,32 +357,31 @@ PF_setmodel
 setmodel(entity, model)
 =================
 */
+static vec3_t quakemins = {-16, -16, -16}, quakemaxs = {16, 16, 16};
 void PF_setmodel (void)
 {
 	edict_t	*e;
-	char	*m, **check;
 	model_t	*mod;
 	int		i;
 
 	e = G_EDICT(OFS_PARM0);
-	m = G_STRING(OFS_PARM1);
-
-// check to see if model was properly precached
-	for (i=0, check = sv.model_precache ; *check ; i++, check++)
-		if (!strcmp(*check, m))
-			break;
-
-	if (!*check)
-		Host_Error ("no precache: %s\n", m);
-
-
-	e->v->model = PR_SetString(*check);
+	if (e == sv.edicts)
+		PF_WARNING("setmodel: can not modify world entity\n");
+	if (e->e->free)
+		PF_WARNING("setmodel: can not modify free entity\n");
+	i = SV_ModelIndex(G_STRING(OFS_PARM1), 1);
+	e->v->model = PR_SetString(sv.model_precache[i]);
 	e->v->modelindex = i;
 
-	mod = sv.models[ (int)e->v->modelindex];
+	mod = sv.models[i];
 
 	if (mod)
-		SetMinMaxSize (e, mod->normalmins, mod->normalmaxs, true);
+	{
+		if (mod->type != mod_alias || sv_gameplayfix_setmodelrealbox.integer)
+			SetMinMaxSize (e, mod->normalmins, mod->normalmaxs, true);
+		else
+			SetMinMaxSize (e, quakemins, quakemaxs, true);
+	}
 	else
 		SetMinMaxSize (e, vec3_origin, vec3_origin, true);
 }
@@ -348,10 +397,9 @@ bprint(value)
 */
 void PF_bprint (void)
 {
-	char		*s;
-
-	s = PF_VarString(0);
-	SV_BroadcastPrintf ("%s", s);
+	char string[STRINGTEMP_LENGTH];
+	PF_VarString(0, string, sizeof(string));
+	SV_BroadcastPrint(string);
 }
 
 /*
@@ -365,22 +413,22 @@ sprint(clientent, value)
 */
 void PF_sprint (void)
 {
-	char		*s;
 	client_t	*client;
 	int			entnum;
+	char string[STRINGTEMP_LENGTH];
 
 	entnum = G_EDICTNUM(OFS_PARM0);
-	s = PF_VarString(1);
 
-	if (entnum < 1 || entnum > MAX_SCOREBOARD || !svs.connectedclients[entnum-1])
+	if (entnum < 1 || entnum > svs.maxclients || !svs.clients[entnum-1].active)
 	{
-		Con_Printf ("tried to sprint to a non-client\n");
+		Con_Print("tried to sprint to a non-client\n");
 		return;
 	}
 
-	client = svs.connectedclients[entnum-1];
+	client = svs.clients + entnum-1;
+	PF_VarString(1, string, sizeof(string));
 	MSG_WriteChar(&client->message,svc_print);
-	MSG_WriteString(&client->message, s );
+	MSG_WriteString(&client->message, string);
 }
 
 
@@ -395,22 +443,22 @@ centerprint(clientent, value)
 */
 void PF_centerprint (void)
 {
-	char		*s;
 	client_t	*client;
 	int			entnum;
+	char string[STRINGTEMP_LENGTH];
 
 	entnum = G_EDICTNUM(OFS_PARM0);
-	s = PF_VarString(1);
 
-	if (entnum < 1 || entnum > MAX_SCOREBOARD || !svs.connectedclients[entnum-1])
+	if (entnum < 1 || entnum > svs.maxclients || !svs.clients[entnum-1].active)
 	{
-		Con_Printf ("tried to sprint to a non-client\n");
+		Con_Print("tried to sprint to a non-client\n");
 		return;
 	}
 
-	client = svs.connectedclients[entnum-1];
+	client = svs.clients + entnum-1;
+	PF_VarString(1, string, sizeof(string));
 	MSG_WriteChar(&client->message,svc_centerprint);
-	MSG_WriteString(&client->message, s );
+	MSG_WriteString(&client->message, string);
 }
 
 
@@ -483,7 +531,7 @@ void PF_vectoyaw (void)
 		yaw = 0;
 	else
 	{
-		yaw = (int) (atan2(value1[1], value1[0]) * 180 / M_PI);
+		yaw = (atan2(value1[1], value1[0]) * 180 / M_PI);
 		if (yaw < 0)
 			yaw += 360;
 	}
@@ -501,11 +549,9 @@ vector vectoangles(vector)
 */
 void PF_vectoangles (void)
 {
-	float	*value1;
-	float	forward;
-	float	yaw, pitch;
+	double value1[3], forward, yaw, pitch;
 
-	value1 = G_VECTOR(OFS_PARM0);
+	VectorCopy(G_VECTOR(OFS_PARM0), value1);
 
 	if (value1[1] == 0 && value1[0] == 0)
 	{
@@ -530,14 +576,12 @@ void PF_vectoangles (void)
 			yaw = 270;
 
 		forward = sqrt(value1[0]*value1[0] + value1[1]*value1[1]);
-		pitch = (int) (atan2(value1[2], forward) * 180 / M_PI);
+		pitch = (atan2(value1[2], forward) * 180 / M_PI);
 		if (pitch < 0)
 			pitch += 360;
 	}
 
-	G_FLOAT(OFS_RETURN+0) = pitch;
-	G_FLOAT(OFS_RETURN+1) = yaw;
-	G_FLOAT(OFS_RETURN+2) = 0;
+	VectorSet(G_VECTOR(OFS_RETURN), pitch, yaw, 0);
 }
 
 /*
@@ -551,11 +595,7 @@ random()
 */
 void PF_random (void)
 {
-	float		num;
-
-	num = (rand ()&0x7fff) / ((float)0x7fff);
-
-	G_FLOAT(OFS_RETURN) = num;
+	G_FLOAT(OFS_RETURN) = lhrandom(0, 1);
 }
 
 /*
@@ -587,11 +627,10 @@ PF_ambientsound
 */
 void PF_ambientsound (void)
 {
-	char		**check;
 	char		*samp;
 	float		*pos;
 	float 		vol, attenuation;
-	int			i, soundnum, large;
+	int			soundnum, large;
 
 	pos = G_VECTOR (OFS_PARM0);
 	samp = G_STRING(OFS_PARM1);
@@ -599,15 +638,9 @@ void PF_ambientsound (void)
 	attenuation = G_FLOAT(OFS_PARM3);
 
 // check to see if samp was properly precached
-	for (soundnum=0, check = sv.sound_precache ; *check ; check++, soundnum++)
-		if (!strcmp(*check,samp))
-			break;
-
-	if (!*check)
-	{
-		Con_Printf ("no precache: %s\n", samp);
+	soundnum = SV_SoundIndex(samp, 1);
+	if (!soundnum)
 		return;
-	}
 
 	large = false;
 	if (soundnum >= 256)
@@ -620,8 +653,7 @@ void PF_ambientsound (void)
 	else
 		MSG_WriteByte (&sv.signon, svc_spawnstaticsound);
 
-	for (i=0 ; i<3 ; i++)
-		MSG_WriteDPCoord(&sv.signon, pos[i]);
+	MSG_WriteVector(&sv.signon, pos, sv.protocol);
 
 	if (large)
 		MSG_WriteShort (&sv.signon, soundnum);
@@ -663,13 +695,13 @@ void PF_sound (void)
 	attenuation = G_FLOAT(OFS_PARM4);
 
 	if (volume < 0 || volume > 255)
-		Host_Error ("SV_StartSound: volume = %i", volume);
+		PF_WARNING("SV_StartSound: volume must be in range 0-1\n");
 
 	if (attenuation < 0 || attenuation > 4)
-		Host_Error ("SV_StartSound: attenuation = %f", attenuation);
+		PF_WARNING("SV_StartSound: attenuation must be in range 0-4\n");
 
 	if (channel < 0 || channel > 7)
-		Host_Error ("SV_StartSound: channel = %i", channel);
+		PF_WARNING("SV_StartSound: channel must be in range 0-7\n");
 
 	SV_StartSound (entity, channel, sample, volume, attenuation);
 }
@@ -683,7 +715,7 @@ break()
 */
 void PF_break (void)
 {
-	Host_Error ("break statement");
+	PF_ERROR("break: break statement\n");
 }
 
 /*
@@ -701,17 +733,17 @@ void PF_traceline (void)
 {
 	float	*v1, *v2;
 	trace_t	trace;
-	int		nomonsters;
+	int		move;
 	edict_t	*ent;
 
 	pr_xfunction->builtinsprofile += 30;
 
 	v1 = G_VECTOR(OFS_PARM0);
 	v2 = G_VECTOR(OFS_PARM1);
-	nomonsters = G_FLOAT(OFS_PARM2);
+	move = G_FLOAT(OFS_PARM2);
 	ent = G_EDICT(OFS_PARM3);
 
-	trace = SV_Move (v1, vec3_origin, vec3_origin, v2, nomonsters, ent);
+	trace = SV_Move (v1, vec3_origin, vec3_origin, v2, move, ent);
 
 	pr_global_struct->trace_allsolid = trace.allsolid;
 	pr_global_struct->trace_startsolid = trace.startsolid;
@@ -745,7 +777,7 @@ void PF_tracebox (void)
 {
 	float	*v1, *v2, *m1, *m2;
 	trace_t	trace;
-	int		nomonsters;
+	int		move;
 	edict_t	*ent;
 
 	pr_xfunction->builtinsprofile += 30;
@@ -754,10 +786,10 @@ void PF_tracebox (void)
 	m1 = G_VECTOR(OFS_PARM1);
 	m2 = G_VECTOR(OFS_PARM2);
 	v2 = G_VECTOR(OFS_PARM3);
-	nomonsters = G_FLOAT(OFS_PARM4);
+	move = G_FLOAT(OFS_PARM4);
 	ent = G_EDICT(OFS_PARM5);
 
-	trace = SV_Move (v1, m1, m2, v2, nomonsters ? MOVE_NOMONSTERS : MOVE_NORMAL, ent);
+	trace = SV_Move (v1, m1, m2, v2, move, ent);
 
 	pr_global_struct->trace_allsolid = trace.allsolid;
 	pr_global_struct->trace_startsolid = trace.startsolid;
@@ -783,6 +815,8 @@ void PF_TraceToss (void)
 	pr_xfunction->builtinsprofile += 600;
 
 	ent = G_EDICT(OFS_PARM0);
+	if (ent == sv.edicts)
+		PF_WARNING("tracetoss: can not use world entity\n");
 	ignore = G_EDICT(OFS_PARM1);
 
 	trace = SV_Trace_Toss (ent, ignore);
@@ -829,8 +863,8 @@ int PF_newcheckclient (int check)
 
 // cycle to the next one
 
-	check = bound(1, check, MAX_SCOREBOARD);
-	if (check == MAX_SCOREBOARD)
+	check = bound(1, check, svs.maxclients);
+	if (check == svs.maxclients)
 		i = 1;
 	else
 		i = check + 1;
@@ -840,7 +874,7 @@ int PF_newcheckclient (int check)
 		// count the cost
 		pr_xfunction->builtinsprofile++;
 		// wrap around
-		if (i == MAX_SCOREBOARD+1)
+		if (i == svs.maxclients+1)
 			i = 1;
 		// look up the client's edict
 		ent = EDICT_NUM(i);
@@ -930,13 +964,16 @@ void PF_stuffcmd (void)
 	client_t	*old;
 
 	entnum = G_EDICTNUM(OFS_PARM0);
-	if (entnum < 1 || entnum > MAX_SCOREBOARD)
-		Host_Error ("Parm 0 not a client");
+	if (entnum < 1 || entnum > svs.maxclients || !svs.clients[entnum-1].active)
+	{
+		Con_Print("Can't stuffcmd to a non-client\n");
+		return;
+	}
 	str = G_STRING(OFS_PARM1);
 
 	old = host_client;
-	if ((host_client = svs.connectedclients[entnum-1]))
-		Host_ClientCommands ("%s", str);
+	host_client = svs.clients + entnum-1;
+	Host_ClientCommands ("%s", str);
 	host_client = old;
 }
 
@@ -944,17 +981,14 @@ void PF_stuffcmd (void)
 =================
 PF_localcmd
 
-Sends text over to the client's execution buffer
+Sends text to server console
 
 localcmd (string)
 =================
 */
 void PF_localcmd (void)
 {
-	char	*str;
-
-	str = G_STRING(OFS_PARM0);
-	Cbuf_AddText (str);
+	Cbuf_AddText(G_STRING(OFS_PARM0));
 }
 
 /*
@@ -966,11 +1000,7 @@ float cvar (string)
 */
 void PF_cvar (void)
 {
-	char	*str;
-
-	str = G_STRING(OFS_PARM0);
-
-	G_FLOAT(OFS_RETURN) = Cvar_VariableValue (str);
+	G_FLOAT(OFS_RETURN) = Cvar_VariableValue(G_STRING(OFS_PARM0));
 }
 
 /*
@@ -982,12 +1012,7 @@ float cvar (string)
 */
 void PF_cvar_set (void)
 {
-	char	*var, *val;
-
-	var = G_STRING(OFS_PARM0);
-	val = G_STRING(OFS_PARM1);
-
-	Cvar_Set (var, val);
+	Cvar_Set(G_STRING(OFS_PARM0), G_STRING(OFS_PARM1));
 }
 
 /*
@@ -1002,37 +1027,56 @@ findradius (origin, radius)
 void PF_findradius (void)
 {
 	edict_t *ent, *chain;
-	float radius;
-	float radius2;
-	float *org;
-	float eorg[3];
+	vec_t radius, radius2;
+	vec3_t org, eorg, mins, maxs;
 	int i;
+	int numtouchedicts;
+	edict_t *touchedicts[MAX_EDICTS];
 
 	chain = (edict_t *)sv.edicts;
 
-	org = G_VECTOR(OFS_PARM0);
+	VectorCopy(G_VECTOR(OFS_PARM0), org);
 	radius = G_FLOAT(OFS_PARM1);
 	radius2 = radius * radius;
 
-	ent = NEXT_EDICT(sv.edicts);
-	for (i=1 ; i<sv.num_edicts ; i++, ent = NEXT_EDICT(ent))
+	mins[0] = org[0] - (radius + 1);
+	mins[1] = org[1] - (radius + 1);
+	mins[2] = org[2] - (radius + 1);
+	maxs[0] = org[0] + (radius + 1);
+	maxs[1] = org[1] + (radius + 1);
+	maxs[2] = org[2] + (radius + 1);
+	numtouchedicts = SV_EntitiesInBox(mins, maxs, MAX_EDICTS, touchedicts);
+	if (numtouchedicts > MAX_EDICTS)
+	{
+		// this never happens
+		Con_Printf("SV_EntitiesInBox returned %i edicts, max was %i\n", numtouchedicts, MAX_EDICTS);
+		numtouchedicts = MAX_EDICTS;
+	}
+	for (i = 0;i < numtouchedicts;i++)
 	{
+		ent = touchedicts[i];
 		pr_xfunction->builtinsprofile++;
-		if (ent->e->free)
-			continue;
-		if (ent->v->solid == SOLID_NOT)
-			continue;
-
-		// LordHavoc: compare against bounding box rather than center,
-		// and use DotProduct instead of Length, major speedup
-		eorg[0] = (org[0] - ent->v->origin[0]) - bound(ent->v->mins[0], (org[0] - ent->v->origin[0]), ent->v->maxs[0]);
-		eorg[1] = (org[1] - ent->v->origin[1]) - bound(ent->v->mins[1], (org[1] - ent->v->origin[1]), ent->v->maxs[1]);
-		eorg[2] = (org[2] - ent->v->origin[2]) - bound(ent->v->mins[2], (org[2] - ent->v->origin[2]), ent->v->maxs[2]);
-		if (DotProduct(eorg, eorg) > radius2)
+		// Quake did not return non-solid entities but darkplaces does
+		// (note: this is the reason you can't blow up fallen zombies)
+		if (ent->v->solid == SOLID_NOT && !sv_gameplayfix_blowupfallenzombies.integer)
 			continue;
-
-		ent->v->chain = EDICT_TO_PROG(chain);
-		chain = ent;
+		// LordHavoc: compare against bounding box rather than center so it
+		// doesn't miss large objects, and use DotProduct instead of Length
+		// for a major speedup
+		VectorSubtract(org, ent->v->origin, eorg);
+		if (sv_gameplayfix_findradiusdistancetobox.integer)
+		{
+			eorg[0] -= bound(ent->v->mins[0], eorg[0], ent->v->maxs[0]);
+			eorg[1] -= bound(ent->v->mins[1], eorg[1], ent->v->maxs[1]);
+			eorg[2] -= bound(ent->v->mins[2], eorg[2], ent->v->maxs[2]);
+		}
+		else
+			VectorMAMAM(1, eorg, 0.5f, ent->v->mins, 0.5f, ent->v->maxs, eorg);
+		if (DotProduct(eorg, eorg) < radius2)
+		{
+			ent->v->chain = EDICT_TO_PROG(chain);
+			chain = ent;
+		}
 	}
 
 	RETURN_EDICT(chain);
@@ -1046,21 +1090,12 @@ PF_dprint
 */
 void PF_dprint (void)
 {
-	Con_DPrintf ("%s",PF_VarString(0));
-}
-
-// LordHavoc: added this to semi-fix the problem of using many ftos calls in a print
-#define STRINGTEMP_BUFFERS 16
-#define STRINGTEMP_LENGTH 128
-static char pr_string_temp[STRINGTEMP_BUFFERS][STRINGTEMP_LENGTH];
-static int pr_string_tempindex = 0;
-
-static char *PR_GetTempString(void)
-{
-	char *s;
-	s = pr_string_temp[pr_string_tempindex];
-	pr_string_tempindex = (pr_string_tempindex + 1) % STRINGTEMP_BUFFERS;
-	return s;
+	char string[STRINGTEMP_LENGTH];
+	if (developer.integer)
+	{
+		PF_VarString(0, string, sizeof(string));
+		Con_Print(string);
+	}
 }
 
 void PF_ftos (void)
@@ -1115,9 +1150,12 @@ void PF_Remove (void)
 
 	ed = G_EDICT(OFS_PARM0);
 	if (ed == sv.edicts)
-		Host_Error("remove: tried to remove world\n");
-	if (NUM_FOR_EDICT(ed) <= MAX_SCOREBOARD)
-		Host_Error("remove: tried to remove a client\n");
+		PF_WARNING("remove: tried to remove world\n");
+	if (NUM_FOR_EDICT(ed) <= svs.maxclients)
+		PF_WARNING("remove: tried to remove a client\n");
+	// LordHavoc: not an error because id1 progs did this in some cases (killtarget removes entities, even if they are already removed in some cases...)
+	if (ed->e->free && developer.integer)
+		PF_WARNING("remove: tried to remove an entity that was already removed\n");
 	ED_Free (ed);
 }
 
@@ -1254,68 +1292,85 @@ void PF_findchainfloat (void)
 	RETURN_EDICT(chain);
 }
 
-void PR_CheckEmptyString (char *s)
+// LordHavoc: search for flags in float fields
+void PF_findflags (void)
 {
-	if (s[0] <= ' ')
-		Host_Error ("Bad string");
-}
+	int		e;
+	int		f;
+	int		s;
+	edict_t	*ed;
 
-void PF_precache_file (void)
-{	// precache_file is only used to copy files with qcc, it does nothing
-	G_INT(OFS_RETURN) = G_INT(OFS_PARM0);
+	e = G_EDICTNUM(OFS_PARM0);
+	f = G_INT(OFS_PARM1);
+	s = (int)G_FLOAT(OFS_PARM2);
+
+	for (e++ ; e < sv.num_edicts ; e++)
+	{
+		pr_xfunction->builtinsprofile++;
+		ed = EDICT_NUM(e);
+		if (ed->e->free)
+			continue;
+		if ((int)E_FLOAT(ed,f) & s)
+		{
+			RETURN_EDICT(ed);
+			return;
+		}
+	}
+
+	RETURN_EDICT(sv.edicts);
 }
 
-void PF_precache_sound (void)
+// LordHavoc: chained search for flags in float fields
+void PF_findchainflags (void)
 {
-	char	*s;
 	int		i;
+	int		f;
+	int		s;
+	edict_t	*ent, *chain;
 
-	if (sv.state != ss_loading)
-		Host_Error ("PF_Precache_*: Precache can only be done in spawn functions");
+	chain = (edict_t *)sv.edicts;
 
-	s = G_STRING(OFS_PARM0);
-	G_INT(OFS_RETURN) = G_INT(OFS_PARM0);
-	PR_CheckEmptyString (s);
+	f = G_INT(OFS_PARM0);
+	s = (int)G_FLOAT(OFS_PARM1);
 
-	for (i=0 ; i<MAX_SOUNDS ; i++)
+	ent = NEXT_EDICT(sv.edicts);
+	for (i = 1;i < sv.num_edicts;i++, ent = NEXT_EDICT(ent))
 	{
-		if (!sv.sound_precache[i])
-		{
-			sv.sound_precache[i] = s;
-			return;
-		}
-		if (!strcmp(sv.sound_precache[i], s))
-			return;
+		pr_xfunction->builtinsprofile++;
+		if (ent->e->free)
+			continue;
+		if (!((int)E_FLOAT(ent,f) & s))
+			continue;
+
+		ent->v->chain = EDICT_TO_PROG(chain);
+		chain = ent;
 	}
-	Host_Error ("PF_precache_sound: overflow");
+
+	RETURN_EDICT(chain);
 }
 
-void PF_precache_model (void)
+void PR_CheckEmptyString (char *s)
 {
-	char	*s;
-	int		i;
+	if (s[0] <= ' ')
+		PF_ERROR("Bad string");
+}
 
-	if (sv.state != ss_loading)
-		Host_Error ("PF_Precache_*: Precache can only be done in spawn functions");
+void PF_precache_file (void)
+{	// precache_file is only used to copy files with qcc, it does nothing
+	G_INT(OFS_RETURN) = G_INT(OFS_PARM0);
+}
 
-	s = G_STRING(OFS_PARM0);
-	if (sv.worldmodel->brush.ishlbsp && ((!s) || (!s[0])))
-		return;
+
+void PF_precache_sound (void)
+{
+	SV_SoundIndex(G_STRING(OFS_PARM0), 2);
 	G_INT(OFS_RETURN) = G_INT(OFS_PARM0);
-	PR_CheckEmptyString (s);
+}
 
-	for (i=0 ; i<MAX_MODELS ; i++)
-	{
-		if (!sv.model_precache[i])
-		{
-			sv.model_precache[i] = s;
-			sv.models[i] = Mod_ForName (s, true, false, false);
-			return;
-		}
-		if (!strcmp(sv.model_precache[i], s))
-			return;
-	}
-	Host_Error ("PF_precache_model: overflow");
+void PF_precache_model (void)
+{
+	SV_ModelIndex(G_STRING(OFS_PARM0), 2);
+	G_INT(OFS_RETURN) = G_INT(OFS_PARM0);
 }
 
 
@@ -1354,15 +1409,19 @@ void PF_walkmove (void)
 	mfunction_t	*oldf;
 	int 	oldself;
 
+	// assume failure if it returns early
+	G_FLOAT(OFS_RETURN) = 0;
+
 	ent = PROG_TO_EDICT(pr_global_struct->self);
+	if (ent == sv.edicts)
+		PF_WARNING("walkmove: can not modify world entity\n");
+	if (ent->e->free)
+		PF_WARNING("walkmove: can not modify free entity\n");
 	yaw = G_FLOAT(OFS_PARM0);
 	dist = G_FLOAT(OFS_PARM1);
 
 	if ( !( (int)ent->v->flags & (FL_ONGROUND|FL_FLY|FL_SWIM) ) )
-	{
-		G_FLOAT(OFS_RETURN) = 0;
 		return;
-	}
 
 	yaw = yaw*M_PI*2 / 360;
 
@@ -1395,16 +1454,21 @@ void PF_droptofloor (void)
 	vec3_t		end;
 	trace_t		trace;
 
+	// assume failure if it returns early
+	G_FLOAT(OFS_RETURN) = 0;
+
 	ent = PROG_TO_EDICT(pr_global_struct->self);
+	if (ent == sv.edicts)
+		PF_WARNING("droptofloor: can not modify world entity\n");
+	if (ent->e->free)
+		PF_WARNING("droptofloor: can not modify free entity\n");
 
 	VectorCopy (ent->v->origin, end);
 	end[2] -= 256;
 
 	trace = SV_Move (ent->v->origin, ent->v->mins, ent->v->maxs, end, MOVE_NORMAL, ent);
 
-	if (trace.fraction == 1)
-		G_FLOAT(OFS_RETURN) = 0;
-	else
+	if (trace.fraction != 1)
 	{
 		VectorCopy (trace.endpos, ent->v->origin);
 		SV_LinkEdict (ent, false);
@@ -1440,9 +1504,9 @@ void PF_lightstyle (void)
 	if (sv.state != ss_active)
 		return;
 
-	for (j = 0;j < MAX_SCOREBOARD;j++)
+	for (j = 0, client = svs.clients;j < svs.maxclients;j++, client++)
 	{
-		if ((client = svs.connectedclients[j]))
+		if (client->active)
 		{
 			MSG_WriteChar (&client->message, svc_lightstyle);
 			MSG_WriteChar (&client->message,style);
@@ -1538,7 +1602,17 @@ void PF_aim (void)
 	float	dist, bestdist;
 	float	speed;
 
+	// assume failure if it returns early
+	VectorCopy(pr_global_struct->v_forward, G_VECTOR(OFS_RETURN));
+	// if sv_aim is so high it can't possibly accept anything, skip out early
+	if (sv_aim.value >= 1)
+		return;
+
 	ent = G_EDICT(OFS_PARM0);
+	if (ent == sv.edicts)
+		PF_WARNING("aim: can not use world entity\n");
+	if (ent->e->free)
+		PF_WARNING("aim: can not use free entity\n");
 	speed = G_FLOAT(OFS_PARM1);
 
 	VectorCopy (ent->v->origin, start);
@@ -1615,6 +1689,10 @@ void PF_changeyaw (void)
 	float		ideal, current, move, speed;
 
 	ent = PROG_TO_EDICT(pr_global_struct->self);
+	if (ent == sv.edicts)
+		PF_WARNING("changeyaw: can not modify world entity\n");
+	if (ent->e->free)
+		PF_WARNING("changeyaw: can not modify free entity\n");
 	current = ANGLEMOD(ent->v->angles[1]);
 	ideal = ent->v->ideal_yaw;
 	speed = ent->v->yaw_speed;
@@ -1658,19 +1736,23 @@ void PF_changepitch (void)
 	eval_t		*val;
 
 	ent = G_EDICT(OFS_PARM0);
+	if (ent == sv.edicts)
+		PF_WARNING("changepitch: can not modify world entity\n");
+	if (ent->e->free)
+		PF_WARNING("changepitch: can not modify free entity\n");
 	current = ANGLEMOD( ent->v->angles[0] );
 	if ((val = GETEDICTFIELDVALUE(ent, eval_idealpitch)))
 		ideal = val->_float;
 	else
 	{
-		Host_Error ("PF_changepitch: .float idealpitch and .float pitch_speed must be defined to use changepitch");
+		PF_WARNING("PF_changepitch: .float idealpitch and .float pitch_speed must be defined to use changepitch\n");
 		return;
 	}
 	if ((val = GETEDICTFIELDVALUE(ent, eval_pitch_speed)))
 		speed = val->_float;
 	else
 	{
-		Host_Error ("PF_changepitch: .float idealpitch and .float pitch_speed must be defined to use changepitch");
+		PF_WARNING("PF_changepitch: .float idealpitch and .float pitch_speed must be defined to use changepitch\n");
 		return;
 	}
 
@@ -1729,9 +1811,9 @@ sizebuf_t *WriteDest (void)
 	case MSG_ONE:
 		ent = PROG_TO_EDICT(pr_global_struct->msg_entity);
 		entnum = NUM_FOR_EDICT(ent);
-		if (entnum < 1 || entnum > MAX_SCOREBOARD || svs.connectedclients[entnum-1] == NULL)
-			Host_Error("WriteDest: not a client");
-		return &svs.connectedclients[entnum-1]->message;
+		if (entnum < 1 || entnum > svs.maxclients || !svs.clients[entnum-1].active)
+			Host_Error("WriteDest: tried to write to non-client\n");
+		return &svs.clients[entnum-1].message;
 
 	case MSG_ALL:
 		return &sv.reliable_datagram;
@@ -1740,7 +1822,7 @@ sizebuf_t *WriteDest (void)
 		return &sv.signon;
 
 	default:
-		Host_Error ("WriteDest: bad destination");
+		Host_Error("WriteDest: bad destination");
 		break;
 	}
 
@@ -1769,12 +1851,12 @@ void PF_WriteLong (void)
 
 void PF_WriteAngle (void)
 {
-	MSG_WriteAngle (WriteDest(), G_FLOAT(OFS_PARM1));
+	MSG_WriteAngle (WriteDest(), G_FLOAT(OFS_PARM1), sv.protocol);
 }
 
 void PF_WriteCoord (void)
 {
-	MSG_WriteDPCoord (WriteDest(), G_FLOAT(OFS_PARM1));
+	MSG_WriteCoord (WriteDest(), G_FLOAT(OFS_PARM1), sv.protocol);
 }
 
 void PF_WriteString (void)
@@ -1796,6 +1878,10 @@ void PF_makestatic (void)
 	int i, large;
 
 	ent = G_EDICT(OFS_PARM0);
+	if (ent == sv.edicts)
+		PF_WARNING("makestatic: can not modify world entity\n");
+	if (ent->e->free)
+		PF_WARNING("makestatic: can not modify free entity\n");
 
 	large = false;
 	if (ent->v->modelindex >= 256 || ent->v->frame >= 256)
@@ -1818,8 +1904,8 @@ void PF_makestatic (void)
 	MSG_WriteByte (&sv.signon, ent->v->skin);
 	for (i=0 ; i<3 ; i++)
 	{
-		MSG_WriteDPCoord(&sv.signon, ent->v->origin[i]);
-		MSG_WriteAngle(&sv.signon, ent->v->angles[i]);
+		MSG_WriteCoord(&sv.signon, ent->v->origin[i], sv.protocol);
+		MSG_WriteAngle(&sv.signon, ent->v->angles[i], sv.protocol);
 	}
 
 // throw the entity away now
@@ -1841,11 +1927,14 @@ void PF_setspawnparms (void)
 
 	ent = G_EDICT(OFS_PARM0);
 	i = NUM_FOR_EDICT(ent);
-	if (i < 1 || i > MAX_SCOREBOARD || !svs.connectedclients[i-1])
-		Host_Error ("Entity is not a client");
+	if (i < 1 || i > svs.maxclients || !svs.clients[i-1].active)
+	{
+		Con_Print("tried to setspawnparms on a non-client\n");
+		return;
+	}
 
 	// copy spawn parms out of the client_t
-	client = svs.connectedclients[i-1];
+	client = svs.clients + i-1;
 	for (i=0 ; i< NUM_SPAWN_PARMS ; i++)
 		(&pr_global_struct->parm1)[i] = client->spawn_parms[i];
 }
@@ -1930,17 +2019,13 @@ void PF_GetLight (void)
 	VectorMA(ambientcolor, 0.5, diffusecolor, G_VECTOR(OFS_RETURN));
 }
 
-#define MAX_QC_CVARS 128
-cvar_t qc_cvar[MAX_QC_CVARS];
-int currentqc_cvar;
-
 void PF_registercvar (void)
 {
 	char *name, *value;
-	cvar_t *variable;
 	name = G_STRING(OFS_PARM0);
 	value = G_STRING(OFS_PARM1);
 	G_FLOAT(OFS_RETURN) = 0;
+
 // first check to see if it has already been defined
 	if (Cvar_FindVar (name))
 		return;
@@ -1948,22 +2033,12 @@ void PF_registercvar (void)
 // check for overlap with a command
 	if (Cmd_Exists (name))
 	{
-		Con_Printf ("PF_registercvar: %s is a command\n", name);
+		Con_Printf("PF_registercvar: %s is a command\n", name);
 		return;
 	}
 
-	if (currentqc_cvar >= MAX_QC_CVARS)
-		Host_Error ("PF_registercvar: ran out of cvar slots (%i)\n", MAX_QC_CVARS);
+	Cvar_Get(name, value, 0);
 
-// copy the name and value
-	variable = &qc_cvar[currentqc_cvar++];
-	variable->name = Z_Malloc (strlen(name)+1);
-	strcpy (variable->name, name);
-	variable->string = Z_Malloc (strlen(value)+1);
-	strcpy (variable->string, value);
-	variable->value = atof (value);
-
-	Cvar_RegisterVariable(variable);
 	G_FLOAT(OFS_RETURN) = 1; // success
 }
 
@@ -1991,7 +2066,10 @@ void PF_min (void)
 		G_FLOAT(OFS_RETURN) = f;
 	}
 	else
-		Host_Error("min: must supply at least 2 floats\n");
+	{
+		G_FLOAT(OFS_RETURN) = 0;
+		PF_WARNING("min: must supply at least 2 floats\n");
+	}
 }
 
 /*
@@ -2018,7 +2096,10 @@ void PF_max (void)
 		G_FLOAT(OFS_RETURN) = f;
 	}
 	else
-		Host_Error("max: must supply at least 2 floats\n");
+	{
+		G_FLOAT(OFS_RETURN) = 0;
+		PF_WARNING("max: must supply at least 2 floats\n");
+	}
 }
 
 /*
@@ -2062,7 +2143,15 @@ void PF_copyentity (void)
 {
 	edict_t *in, *out;
 	in = G_EDICT(OFS_PARM0);
+	if (in == sv.edicts)
+		PF_WARNING("copyentity: can not read world entity\n");
+	if (in->e->free)
+		PF_WARNING("copyentity: can not read free entity\n");
 	out = G_EDICT(OFS_PARM1);
+	if (out == sv.edicts)
+		PF_WARNING("copyentity: can not modify world entity\n");
+	if (out->e->free)
+		PF_WARNING("copyentity: can not modify free entity\n");
 	memcpy(out->v, in->v, progs->entityfields * 4);
 }
 
@@ -2084,21 +2173,28 @@ void PF_setcolor (void)
 	entnum = G_EDICTNUM(OFS_PARM0);
 	i = G_FLOAT(OFS_PARM1);
 
-	if (entnum < 1 || entnum > MAX_SCOREBOARD || !(client = svs.connectedclients[entnum-1]))
+	if (entnum < 1 || entnum > svs.maxclients || !svs.clients[entnum-1].active)
 	{
-		Con_Printf ("tried to setcolor a non-client\n");
+		Con_Print("tried to setcolor a non-client\n");
 		return;
 	}
 
-	if ((val = GETEDICTFIELDVALUE(client->edict, eval_clientcolors)))
-		val->_float = i;
+	client = svs.clients + entnum-1;
+	if (client->edict)
+	{
+		if ((val = GETEDICTFIELDVALUE(client->edict, eval_clientcolors)))
+			val->_float = i;
+		client->edict->v->team = (i & 15) + 1;
+	}
 	client->colors = i;
-	client->old_colors = i;
-	client->edict->v->team = (i & 15) + 1;
-
-	MSG_WriteByte (&sv.reliable_datagram, svc_updatecolors);
-	MSG_WriteByte (&sv.reliable_datagram, entnum - 1);
-	MSG_WriteByte (&sv.reliable_datagram, i);
+	if (client->old_colors != client->colors)
+	{
+		client->old_colors = client->colors;
+		// send notification to all clients
+		MSG_WriteByte (&sv.reliable_datagram, svc_updatecolors);
+		MSG_WriteByte (&sv.reliable_datagram, client - svs.clients);
+		MSG_WriteByte (&sv.reliable_datagram, client->colors);
+	}
 }
 
 /*
@@ -2110,12 +2206,16 @@ effect(origin, modelname, startframe, framecount, framerate)
 */
 void PF_effect (void)
 {
+	int i;
 	char *s;
 	s = G_STRING(OFS_PARM1);
 	if (!s || !s[0])
-		Host_Error("effect: no model specified\n");
+		PF_WARNING("effect: no model specified\n");
 
-	SV_StartEffect(G_VECTOR(OFS_PARM0), SV_ModelIndex(s), G_FLOAT(OFS_PARM2), G_FLOAT(OFS_PARM3), G_FLOAT(OFS_PARM4));
+	i = SV_ModelIndex(s, 1);
+	if (!i)
+		PF_WARNING("effect: model not precached\n");
+	SV_StartEffect(G_VECTOR(OFS_PARM0), i, G_FLOAT(OFS_PARM2), G_FLOAT(OFS_PARM3), G_FLOAT(OFS_PARM4));
 }
 
 void PF_te_blood (void)
@@ -2125,9 +2225,9 @@ void PF_te_blood (void)
 	MSG_WriteByte(&sv.datagram, svc_temp_entity);
 	MSG_WriteByte(&sv.datagram, TE_BLOOD);
 	// origin
-	MSG_WriteDPCoord(&sv.datagram, G_VECTOR(OFS_PARM0)[0]);
-	MSG_WriteDPCoord(&sv.datagram, G_VECTOR(OFS_PARM0)[1]);
-	MSG_WriteDPCoord(&sv.datagram, G_VECTOR(OFS_PARM0)[2]);
+	MSG_WriteCoord(&sv.datagram, G_VECTOR(OFS_PARM0)[0], sv.protocol);
+	MSG_WriteCoord(&sv.datagram, G_VECTOR(OFS_PARM0)[1], sv.protocol);
+	MSG_WriteCoord(&sv.datagram, G_VECTOR(OFS_PARM0)[2], sv.protocol);
 	// velocity
 	MSG_WriteByte(&sv.datagram, bound(-128, (int) G_VECTOR(OFS_PARM1)[0], 127));
 	MSG_WriteByte(&sv.datagram, bound(-128, (int) G_VECTOR(OFS_PARM1)[1], 127));
@@ -2143,15 +2243,15 @@ void PF_te_bloodshower (void)
 	MSG_WriteByte(&sv.datagram, svc_temp_entity);
 	MSG_WriteByte(&sv.datagram, TE_BLOODSHOWER);
 	// min
-	MSG_WriteDPCoord(&sv.datagram, G_VECTOR(OFS_PARM0)[0]);
-	MSG_WriteDPCoord(&sv.datagram, G_VECTOR(OFS_PARM0)[1]);
-	MSG_WriteDPCoord(&sv.datagram, G_VECTOR(OFS_PARM0)[2]);
+	MSG_WriteCoord(&sv.datagram, G_VECTOR(OFS_PARM0)[0], sv.protocol);
+	MSG_WriteCoord(&sv.datagram, G_VECTOR(OFS_PARM0)[1], sv.protocol);
+	MSG_WriteCoord(&sv.datagram, G_VECTOR(OFS_PARM0)[2], sv.protocol);
 	// max
-	MSG_WriteDPCoord(&sv.datagram, G_VECTOR(OFS_PARM1)[0]);
-	MSG_WriteDPCoord(&sv.datagram, G_VECTOR(OFS_PARM1)[1]);
-	MSG_WriteDPCoord(&sv.datagram, G_VECTOR(OFS_PARM1)[2]);
+	MSG_WriteCoord(&sv.datagram, G_VECTOR(OFS_PARM1)[0], sv.protocol);
+	MSG_WriteCoord(&sv.datagram, G_VECTOR(OFS_PARM1)[1], sv.protocol);
+	MSG_WriteCoord(&sv.datagram, G_VECTOR(OFS_PARM1)[2], sv.protocol);
 	// speed
-	MSG_WriteDPCoord(&sv.datagram, G_FLOAT(OFS_PARM2));
+	MSG_WriteCoord(&sv.datagram, G_FLOAT(OFS_PARM2), sv.protocol);
 	// count
 	MSG_WriteShort(&sv.datagram, bound(0, G_FLOAT(OFS_PARM3), 65535));
 }
@@ -2161,9 +2261,9 @@ void PF_te_explosionrgb (void)
 	MSG_WriteByte(&sv.datagram, svc_temp_entity);
 	MSG_WriteByte(&sv.datagram, TE_EXPLOSIONRGB);
 	// origin
-	MSG_WriteDPCoord(&sv.datagram, G_VECTOR(OFS_PARM0)[0]);
-	MSG_WriteDPCoord(&sv.datagram, G_VECTOR(OFS_PARM0)[1]);
-	MSG_WriteDPCoord(&sv.datagram, G_VECTOR(OFS_PARM0)[2]);
+	MSG_WriteCoord(&sv.datagram, G_VECTOR(OFS_PARM0)[0], sv.protocol);
+	MSG_WriteCoord(&sv.datagram, G_VECTOR(OFS_PARM0)[1], sv.protocol);
+	MSG_WriteCoord(&sv.datagram, G_VECTOR(OFS_PARM0)[2], sv.protocol);
 	// color
 	MSG_WriteByte(&sv.datagram, bound(0, (int) (G_VECTOR(OFS_PARM1)[0] * 255), 255));
 	MSG_WriteByte(&sv.datagram, bound(0, (int) (G_VECTOR(OFS_PARM1)[1] * 255), 255));
@@ -2177,17 +2277,17 @@ void PF_te_particlecube (void)
 	MSG_WriteByte(&sv.datagram, svc_temp_entity);
 	MSG_WriteByte(&sv.datagram, TE_PARTICLECUBE);
 	// min
-	MSG_WriteDPCoord(&sv.datagram, G_VECTOR(OFS_PARM0)[0]);
-	MSG_WriteDPCoord(&sv.datagram, G_VECTOR(OFS_PARM0)[1]);
-	MSG_WriteDPCoord(&sv.datagram, G_VECTOR(OFS_PARM0)[2]);
+	MSG_WriteCoord(&sv.datagram, G_VECTOR(OFS_PARM0)[0], sv.protocol);
+	MSG_WriteCoord(&sv.datagram, G_VECTOR(OFS_PARM0)[1], sv.protocol);
+	MSG_WriteCoord(&sv.datagram, G_VECTOR(OFS_PARM0)[2], sv.protocol);
 	// max
-	MSG_WriteDPCoord(&sv.datagram, G_VECTOR(OFS_PARM1)[0]);
-	MSG_WriteDPCoord(&sv.datagram, G_VECTOR(OFS_PARM1)[1]);
-	MSG_WriteDPCoord(&sv.datagram, G_VECTOR(OFS_PARM1)[2]);
+	MSG_WriteCoord(&sv.datagram, G_VECTOR(OFS_PARM1)[0], sv.protocol);
+	MSG_WriteCoord(&sv.datagram, G_VECTOR(OFS_PARM1)[1], sv.protocol);
+	MSG_WriteCoord(&sv.datagram, G_VECTOR(OFS_PARM1)[2], sv.protocol);
 	// velocity
-	MSG_WriteDPCoord(&sv.datagram, G_VECTOR(OFS_PARM2)[0]);
-	MSG_WriteDPCoord(&sv.datagram, G_VECTOR(OFS_PARM2)[1]);
-	MSG_WriteDPCoord(&sv.datagram, G_VECTOR(OFS_PARM2)[2]);
+	MSG_WriteCoord(&sv.datagram, G_VECTOR(OFS_PARM2)[0], sv.protocol);
+	MSG_WriteCoord(&sv.datagram, G_VECTOR(OFS_PARM2)[1], sv.protocol);
+	MSG_WriteCoord(&sv.datagram, G_VECTOR(OFS_PARM2)[2], sv.protocol);
 	// count
 	MSG_WriteShort(&sv.datagram, bound(0, G_FLOAT(OFS_PARM3), 65535));
 	// color
@@ -2195,7 +2295,7 @@ void PF_te_particlecube (void)
 	// gravity true/false
 	MSG_WriteByte(&sv.datagram, ((int) G_FLOAT(OFS_PARM5)) != 0);
 	// randomvel
-	MSG_WriteDPCoord(&sv.datagram, G_FLOAT(OFS_PARM6));
+	MSG_WriteCoord(&sv.datagram, G_FLOAT(OFS_PARM6), sv.protocol);
 }
 
 void PF_te_particlerain (void)
@@ -2205,17 +2305,17 @@ void PF_te_particlerain (void)
 	MSG_WriteByte(&sv.datagram, svc_temp_entity);
 	MSG_WriteByte(&sv.datagram, TE_PARTICLERAIN);
 	// min
-	MSG_WriteDPCoord(&sv.datagram, G_VECTOR(OFS_PARM0)[0]);
-	MSG_WriteDPCoord(&sv.datagram, G_VECTOR(OFS_PARM0)[1]);
-	MSG_WriteDPCoord(&sv.datagram, G_VECTOR(OFS_PARM0)[2]);
+	MSG_WriteCoord(&sv.datagram, G_VECTOR(OFS_PARM0)[0], sv.protocol);
+	MSG_WriteCoord(&sv.datagram, G_VECTOR(OFS_PARM0)[1], sv.protocol);
+	MSG_WriteCoord(&sv.datagram, G_VECTOR(OFS_PARM0)[2], sv.protocol);
 	// max
-	MSG_WriteDPCoord(&sv.datagram, G_VECTOR(OFS_PARM1)[0]);
-	MSG_WriteDPCoord(&sv.datagram, G_VECTOR(OFS_PARM1)[1]);
-	MSG_WriteDPCoord(&sv.datagram, G_VECTOR(OFS_PARM1)[2]);
+	MSG_WriteCoord(&sv.datagram, G_VECTOR(OFS_PARM1)[0], sv.protocol);
+	MSG_WriteCoord(&sv.datagram, G_VECTOR(OFS_PARM1)[1], sv.protocol);
+	MSG_WriteCoord(&sv.datagram, G_VECTOR(OFS_PARM1)[2], sv.protocol);
 	// velocity
-	MSG_WriteDPCoord(&sv.datagram, G_VECTOR(OFS_PARM2)[0]);
-	MSG_WriteDPCoord(&sv.datagram, G_VECTOR(OFS_PARM2)[1]);
-	MSG_WriteDPCoord(&sv.datagram, G_VECTOR(OFS_PARM2)[2]);
+	MSG_WriteCoord(&sv.datagram, G_VECTOR(OFS_PARM2)[0], sv.protocol);
+	MSG_WriteCoord(&sv.datagram, G_VECTOR(OFS_PARM2)[1], sv.protocol);
+	MSG_WriteCoord(&sv.datagram, G_VECTOR(OFS_PARM2)[2], sv.protocol);
 	// count
 	MSG_WriteShort(&sv.datagram, bound(0, G_FLOAT(OFS_PARM3), 65535));
 	// color
@@ -2229,17 +2329,17 @@ void PF_te_particlesnow (void)
 	MSG_WriteByte(&sv.datagram, svc_temp_entity);
 	MSG_WriteByte(&sv.datagram, TE_PARTICLESNOW);
 	// min
-	MSG_WriteDPCoord(&sv.datagram, G_VECTOR(OFS_PARM0)[0]);
-	MSG_WriteDPCoord(&sv.datagram, G_VECTOR(OFS_PARM0)[1]);
-	MSG_WriteDPCoord(&sv.datagram, G_VECTOR(OFS_PARM0)[2]);
+	MSG_WriteCoord(&sv.datagram, G_VECTOR(OFS_PARM0)[0], sv.protocol);
+	MSG_WriteCoord(&sv.datagram, G_VECTOR(OFS_PARM0)[1], sv.protocol);
+	MSG_WriteCoord(&sv.datagram, G_VECTOR(OFS_PARM0)[2], sv.protocol);
 	// max
-	MSG_WriteDPCoord(&sv.datagram, G_VECTOR(OFS_PARM1)[0]);
-	MSG_WriteDPCoord(&sv.datagram, G_VECTOR(OFS_PARM1)[1]);
-	MSG_WriteDPCoord(&sv.datagram, G_VECTOR(OFS_PARM1)[2]);
+	MSG_WriteCoord(&sv.datagram, G_VECTOR(OFS_PARM1)[0], sv.protocol);
+	MSG_WriteCoord(&sv.datagram, G_VECTOR(OFS_PARM1)[1], sv.protocol);
+	MSG_WriteCoord(&sv.datagram, G_VECTOR(OFS_PARM1)[2], sv.protocol);
 	// velocity
-	MSG_WriteDPCoord(&sv.datagram, G_VECTOR(OFS_PARM2)[0]);
-	MSG_WriteDPCoord(&sv.datagram, G_VECTOR(OFS_PARM2)[1]);
-	MSG_WriteDPCoord(&sv.datagram, G_VECTOR(OFS_PARM2)[2]);
+	MSG_WriteCoord(&sv.datagram, G_VECTOR(OFS_PARM2)[0], sv.protocol);
+	MSG_WriteCoord(&sv.datagram, G_VECTOR(OFS_PARM2)[1], sv.protocol);
+	MSG_WriteCoord(&sv.datagram, G_VECTOR(OFS_PARM2)[2], sv.protocol);
 	// count
 	MSG_WriteShort(&sv.datagram, bound(0, G_FLOAT(OFS_PARM3), 65535));
 	// color
@@ -2253,9 +2353,9 @@ void PF_te_spark (void)
 	MSG_WriteByte(&sv.datagram, svc_temp_entity);
 	MSG_WriteByte(&sv.datagram, TE_SPARK);
 	// origin
-	MSG_WriteDPCoord(&sv.datagram, G_VECTOR(OFS_PARM0)[0]);
-	MSG_WriteDPCoord(&sv.datagram, G_VECTOR(OFS_PARM0)[1]);
-	MSG_WriteDPCoord(&sv.datagram, G_VECTOR(OFS_PARM0)[2]);
+	MSG_WriteCoord(&sv.datagram, G_VECTOR(OFS_PARM0)[0], sv.protocol);
+	MSG_WriteCoord(&sv.datagram, G_VECTOR(OFS_PARM0)[1], sv.protocol);
+	MSG_WriteCoord(&sv.datagram, G_VECTOR(OFS_PARM0)[2], sv.protocol);
 	// velocity
 	MSG_WriteByte(&sv.datagram, bound(-128, (int) G_VECTOR(OFS_PARM1)[0], 127));
 	MSG_WriteByte(&sv.datagram, bound(-128, (int) G_VECTOR(OFS_PARM1)[1], 127));
@@ -2269,9 +2369,9 @@ void PF_te_gunshotquad (void)
 	MSG_WriteByte(&sv.datagram, svc_temp_entity);
 	MSG_WriteByte(&sv.datagram, TE_GUNSHOTQUAD);
 	// origin
-	MSG_WriteDPCoord(&sv.datagram, G_VECTOR(OFS_PARM0)[0]);
-	MSG_WriteDPCoord(&sv.datagram, G_VECTOR(OFS_PARM0)[1]);
-	MSG_WriteDPCoord(&sv.datagram, G_VECTOR(OFS_PARM0)[2]);
+	MSG_WriteCoord(&sv.datagram, G_VECTOR(OFS_PARM0)[0], sv.protocol);
+	MSG_WriteCoord(&sv.datagram, G_VECTOR(OFS_PARM0)[1], sv.protocol);
+	MSG_WriteCoord(&sv.datagram, G_VECTOR(OFS_PARM0)[2], sv.protocol);
 }
 
 void PF_te_spikequad (void)
@@ -2279,9 +2379,9 @@ void PF_te_spikequad (void)
 	MSG_WriteByte(&sv.datagram, svc_temp_entity);
 	MSG_WriteByte(&sv.datagram, TE_SPIKEQUAD);
 	// origin
-	MSG_WriteDPCoord(&sv.datagram, G_VECTOR(OFS_PARM0)[0]);
-	MSG_WriteDPCoord(&sv.datagram, G_VECTOR(OFS_PARM0)[1]);
-	MSG_WriteDPCoord(&sv.datagram, G_VECTOR(OFS_PARM0)[2]);
+	MSG_WriteCoord(&sv.datagram, G_VECTOR(OFS_PARM0)[0], sv.protocol);
+	MSG_WriteCoord(&sv.datagram, G_VECTOR(OFS_PARM0)[1], sv.protocol);
+	MSG_WriteCoord(&sv.datagram, G_VECTOR(OFS_PARM0)[2], sv.protocol);
 }
 
 void PF_te_superspikequad (void)
@@ -2289,9 +2389,9 @@ void PF_te_superspikequad (void)
 	MSG_WriteByte(&sv.datagram, svc_temp_entity);
 	MSG_WriteByte(&sv.datagram, TE_SUPERSPIKEQUAD);
 	// origin
-	MSG_WriteDPCoord(&sv.datagram, G_VECTOR(OFS_PARM0)[0]);
-	MSG_WriteDPCoord(&sv.datagram, G_VECTOR(OFS_PARM0)[1]);
-	MSG_WriteDPCoord(&sv.datagram, G_VECTOR(OFS_PARM0)[2]);
+	MSG_WriteCoord(&sv.datagram, G_VECTOR(OFS_PARM0)[0], sv.protocol);
+	MSG_WriteCoord(&sv.datagram, G_VECTOR(OFS_PARM0)[1], sv.protocol);
+	MSG_WriteCoord(&sv.datagram, G_VECTOR(OFS_PARM0)[2], sv.protocol);
 }
 
 void PF_te_explosionquad (void)
@@ -2299,9 +2399,9 @@ void PF_te_explosionquad (void)
 	MSG_WriteByte(&sv.datagram, svc_temp_entity);
 	MSG_WriteByte(&sv.datagram, TE_EXPLOSIONQUAD);
 	// origin
-	MSG_WriteDPCoord(&sv.datagram, G_VECTOR(OFS_PARM0)[0]);
-	MSG_WriteDPCoord(&sv.datagram, G_VECTOR(OFS_PARM0)[1]);
-	MSG_WriteDPCoord(&sv.datagram, G_VECTOR(OFS_PARM0)[2]);
+	MSG_WriteCoord(&sv.datagram, G_VECTOR(OFS_PARM0)[0], sv.protocol);
+	MSG_WriteCoord(&sv.datagram, G_VECTOR(OFS_PARM0)[1], sv.protocol);
+	MSG_WriteCoord(&sv.datagram, G_VECTOR(OFS_PARM0)[2], sv.protocol);
 }
 
 void PF_te_smallflash (void)
@@ -2309,9 +2409,9 @@ void PF_te_smallflash (void)
 	MSG_WriteByte(&sv.datagram, svc_temp_entity);
 	MSG_WriteByte(&sv.datagram, TE_SMALLFLASH);
 	// origin
-	MSG_WriteDPCoord(&sv.datagram, G_VECTOR(OFS_PARM0)[0]);
-	MSG_WriteDPCoord(&sv.datagram, G_VECTOR(OFS_PARM0)[1]);
-	MSG_WriteDPCoord(&sv.datagram, G_VECTOR(OFS_PARM0)[2]);
+	MSG_WriteCoord(&sv.datagram, G_VECTOR(OFS_PARM0)[0], sv.protocol);
+	MSG_WriteCoord(&sv.datagram, G_VECTOR(OFS_PARM0)[1], sv.protocol);
+	MSG_WriteCoord(&sv.datagram, G_VECTOR(OFS_PARM0)[2], sv.protocol);
 }
 
 void PF_te_customflash (void)
@@ -2321,13 +2421,13 @@ void PF_te_customflash (void)
 	MSG_WriteByte(&sv.datagram, svc_temp_entity);
 	MSG_WriteByte(&sv.datagram, TE_CUSTOMFLASH);
 	// origin
-	MSG_WriteDPCoord(&sv.datagram, G_VECTOR(OFS_PARM0)[0]);
-	MSG_WriteDPCoord(&sv.datagram, G_VECTOR(OFS_PARM0)[1]);
-	MSG_WriteDPCoord(&sv.datagram, G_VECTOR(OFS_PARM0)[2]);
+	MSG_WriteCoord(&sv.datagram, G_VECTOR(OFS_PARM0)[0], sv.protocol);
+	MSG_WriteCoord(&sv.datagram, G_VECTOR(OFS_PARM0)[1], sv.protocol);
+	MSG_WriteCoord(&sv.datagram, G_VECTOR(OFS_PARM0)[2], sv.protocol);
 	// radius
 	MSG_WriteByte(&sv.datagram, bound(0, G_FLOAT(OFS_PARM1) / 8 - 1, 255));
 	// lifetime
-	MSG_WriteByte(&sv.datagram, bound(0, G_FLOAT(OFS_PARM2) / 256 - 1, 255));
+	MSG_WriteByte(&sv.datagram, bound(0, G_FLOAT(OFS_PARM2) * 256 - 1, 255));
 	// color
 	MSG_WriteByte(&sv.datagram, bound(0, G_VECTOR(OFS_PARM3)[0] * 255, 255));
 	MSG_WriteByte(&sv.datagram, bound(0, G_VECTOR(OFS_PARM3)[1] * 255, 255));
@@ -2339,9 +2439,9 @@ void PF_te_gunshot (void)
 	MSG_WriteByte(&sv.datagram, svc_temp_entity);
 	MSG_WriteByte(&sv.datagram, TE_GUNSHOT);
 	// origin
-	MSG_WriteDPCoord(&sv.datagram, G_VECTOR(OFS_PARM0)[0]);
-	MSG_WriteDPCoord(&sv.datagram, G_VECTOR(OFS_PARM0)[1]);
-	MSG_WriteDPCoord(&sv.datagram, G_VECTOR(OFS_PARM0)[2]);
+	MSG_WriteCoord(&sv.datagram, G_VECTOR(OFS_PARM0)[0], sv.protocol);
+	MSG_WriteCoord(&sv.datagram, G_VECTOR(OFS_PARM0)[1], sv.protocol);
+	MSG_WriteCoord(&sv.datagram, G_VECTOR(OFS_PARM0)[2], sv.protocol);
 }
 
 void PF_te_spike (void)
@@ -2349,9 +2449,9 @@ void PF_te_spike (void)
 	MSG_WriteByte(&sv.datagram, svc_temp_entity);
 	MSG_WriteByte(&sv.datagram, TE_SPIKE);
 	// origin
-	MSG_WriteDPCoord(&sv.datagram, G_VECTOR(OFS_PARM0)[0]);
-	MSG_WriteDPCoord(&sv.datagram, G_VECTOR(OFS_PARM0)[1]);
-	MSG_WriteDPCoord(&sv.datagram, G_VECTOR(OFS_PARM0)[2]);
+	MSG_WriteCoord(&sv.datagram, G_VECTOR(OFS_PARM0)[0], sv.protocol);
+	MSG_WriteCoord(&sv.datagram, G_VECTOR(OFS_PARM0)[1], sv.protocol);
+	MSG_WriteCoord(&sv.datagram, G_VECTOR(OFS_PARM0)[2], sv.protocol);
 }
 
 void PF_te_superspike (void)
@@ -2359,9 +2459,9 @@ void PF_te_superspike (void)
 	MSG_WriteByte(&sv.datagram, svc_temp_entity);
 	MSG_WriteByte(&sv.datagram, TE_SUPERSPIKE);
 	// origin
-	MSG_WriteDPCoord(&sv.datagram, G_VECTOR(OFS_PARM0)[0]);
-	MSG_WriteDPCoord(&sv.datagram, G_VECTOR(OFS_PARM0)[1]);
-	MSG_WriteDPCoord(&sv.datagram, G_VECTOR(OFS_PARM0)[2]);
+	MSG_WriteCoord(&sv.datagram, G_VECTOR(OFS_PARM0)[0], sv.protocol);
+	MSG_WriteCoord(&sv.datagram, G_VECTOR(OFS_PARM0)[1], sv.protocol);
+	MSG_WriteCoord(&sv.datagram, G_VECTOR(OFS_PARM0)[2], sv.protocol);
 }
 
 void PF_te_explosion (void)
@@ -2369,9 +2469,9 @@ void PF_te_explosion (void)
 	MSG_WriteByte(&sv.datagram, svc_temp_entity);
 	MSG_WriteByte(&sv.datagram, TE_EXPLOSION);
 	// origin
-	MSG_WriteDPCoord(&sv.datagram, G_VECTOR(OFS_PARM0)[0]);
-	MSG_WriteDPCoord(&sv.datagram, G_VECTOR(OFS_PARM0)[1]);
-	MSG_WriteDPCoord(&sv.datagram, G_VECTOR(OFS_PARM0)[2]);
+	MSG_WriteCoord(&sv.datagram, G_VECTOR(OFS_PARM0)[0], sv.protocol);
+	MSG_WriteCoord(&sv.datagram, G_VECTOR(OFS_PARM0)[1], sv.protocol);
+	MSG_WriteCoord(&sv.datagram, G_VECTOR(OFS_PARM0)[2], sv.protocol);
 }
 
 void PF_te_tarexplosion (void)
@@ -2379,9 +2479,9 @@ void PF_te_tarexplosion (void)
 	MSG_WriteByte(&sv.datagram, svc_temp_entity);
 	MSG_WriteByte(&sv.datagram, TE_TAREXPLOSION);
 	// origin
-	MSG_WriteDPCoord(&sv.datagram, G_VECTOR(OFS_PARM0)[0]);
-	MSG_WriteDPCoord(&sv.datagram, G_VECTOR(OFS_PARM0)[1]);
-	MSG_WriteDPCoord(&sv.datagram, G_VECTOR(OFS_PARM0)[2]);
+	MSG_WriteCoord(&sv.datagram, G_VECTOR(OFS_PARM0)[0], sv.protocol);
+	MSG_WriteCoord(&sv.datagram, G_VECTOR(OFS_PARM0)[1], sv.protocol);
+	MSG_WriteCoord(&sv.datagram, G_VECTOR(OFS_PARM0)[2], sv.protocol);
 }
 
 void PF_te_wizspike (void)
@@ -2389,9 +2489,9 @@ void PF_te_wizspike (void)
 	MSG_WriteByte(&sv.datagram, svc_temp_entity);
 	MSG_WriteByte(&sv.datagram, TE_WIZSPIKE);
 	// origin
-	MSG_WriteDPCoord(&sv.datagram, G_VECTOR(OFS_PARM0)[0]);
-	MSG_WriteDPCoord(&sv.datagram, G_VECTOR(OFS_PARM0)[1]);
-	MSG_WriteDPCoord(&sv.datagram, G_VECTOR(OFS_PARM0)[2]);
+	MSG_WriteCoord(&sv.datagram, G_VECTOR(OFS_PARM0)[0], sv.protocol);
+	MSG_WriteCoord(&sv.datagram, G_VECTOR(OFS_PARM0)[1], sv.protocol);
+	MSG_WriteCoord(&sv.datagram, G_VECTOR(OFS_PARM0)[2], sv.protocol);
 }
 
 void PF_te_knightspike (void)
@@ -2399,9 +2499,9 @@ void PF_te_knightspike (void)
 	MSG_WriteByte(&sv.datagram, svc_temp_entity);
 	MSG_WriteByte(&sv.datagram, TE_KNIGHTSPIKE);
 	// origin
-	MSG_WriteDPCoord(&sv.datagram, G_VECTOR(OFS_PARM0)[0]);
-	MSG_WriteDPCoord(&sv.datagram, G_VECTOR(OFS_PARM0)[1]);
-	MSG_WriteDPCoord(&sv.datagram, G_VECTOR(OFS_PARM0)[2]);
+	MSG_WriteCoord(&sv.datagram, G_VECTOR(OFS_PARM0)[0], sv.protocol);
+	MSG_WriteCoord(&sv.datagram, G_VECTOR(OFS_PARM0)[1], sv.protocol);
+	MSG_WriteCoord(&sv.datagram, G_VECTOR(OFS_PARM0)[2], sv.protocol);
 }
 
 void PF_te_lavasplash (void)
@@ -2409,9 +2509,9 @@ void PF_te_lavasplash (void)
 	MSG_WriteByte(&sv.datagram, svc_temp_entity);
 	MSG_WriteByte(&sv.datagram, TE_LAVASPLASH);
 	// origin
-	MSG_WriteDPCoord(&sv.datagram, G_VECTOR(OFS_PARM0)[0]);
-	MSG_WriteDPCoord(&sv.datagram, G_VECTOR(OFS_PARM0)[1]);
-	MSG_WriteDPCoord(&sv.datagram, G_VECTOR(OFS_PARM0)[2]);
+	MSG_WriteCoord(&sv.datagram, G_VECTOR(OFS_PARM0)[0], sv.protocol);
+	MSG_WriteCoord(&sv.datagram, G_VECTOR(OFS_PARM0)[1], sv.protocol);
+	MSG_WriteCoord(&sv.datagram, G_VECTOR(OFS_PARM0)[2], sv.protocol);
 }
 
 void PF_te_teleport (void)
@@ -2419,9 +2519,9 @@ void PF_te_teleport (void)
 	MSG_WriteByte(&sv.datagram, svc_temp_entity);
 	MSG_WriteByte(&sv.datagram, TE_TELEPORT);
 	// origin
-	MSG_WriteDPCoord(&sv.datagram, G_VECTOR(OFS_PARM0)[0]);
-	MSG_WriteDPCoord(&sv.datagram, G_VECTOR(OFS_PARM0)[1]);
-	MSG_WriteDPCoord(&sv.datagram, G_VECTOR(OFS_PARM0)[2]);
+	MSG_WriteCoord(&sv.datagram, G_VECTOR(OFS_PARM0)[0], sv.protocol);
+	MSG_WriteCoord(&sv.datagram, G_VECTOR(OFS_PARM0)[1], sv.protocol);
+	MSG_WriteCoord(&sv.datagram, G_VECTOR(OFS_PARM0)[2], sv.protocol);
 }
 
 void PF_te_explosion2 (void)
@@ -2429,11 +2529,12 @@ void PF_te_explosion2 (void)
 	MSG_WriteByte(&sv.datagram, svc_temp_entity);
 	MSG_WriteByte(&sv.datagram, TE_EXPLOSION2);
 	// origin
-	MSG_WriteDPCoord(&sv.datagram, G_VECTOR(OFS_PARM0)[0]);
-	MSG_WriteDPCoord(&sv.datagram, G_VECTOR(OFS_PARM0)[1]);
-	MSG_WriteDPCoord(&sv.datagram, G_VECTOR(OFS_PARM0)[2]);
+	MSG_WriteCoord(&sv.datagram, G_VECTOR(OFS_PARM0)[0], sv.protocol);
+	MSG_WriteCoord(&sv.datagram, G_VECTOR(OFS_PARM0)[1], sv.protocol);
+	MSG_WriteCoord(&sv.datagram, G_VECTOR(OFS_PARM0)[2], sv.protocol);
 	// color
 	MSG_WriteByte(&sv.datagram, G_FLOAT(OFS_PARM1));
+	MSG_WriteByte(&sv.datagram, G_FLOAT(OFS_PARM2));
 }
 
 void PF_te_lightning1 (void)
@@ -2443,13 +2544,13 @@ void PF_te_lightning1 (void)
 	// owner entity
 	MSG_WriteShort(&sv.datagram, G_EDICTNUM(OFS_PARM0));
 	// start
-	MSG_WriteDPCoord(&sv.datagram, G_VECTOR(OFS_PARM1)[0]);
-	MSG_WriteDPCoord(&sv.datagram, G_VECTOR(OFS_PARM1)[1]);
-	MSG_WriteDPCoord(&sv.datagram, G_VECTOR(OFS_PARM1)[2]);
+	MSG_WriteCoord(&sv.datagram, G_VECTOR(OFS_PARM1)[0], sv.protocol);
+	MSG_WriteCoord(&sv.datagram, G_VECTOR(OFS_PARM1)[1], sv.protocol);
+	MSG_WriteCoord(&sv.datagram, G_VECTOR(OFS_PARM1)[2], sv.protocol);
 	// end
-	MSG_WriteDPCoord(&sv.datagram, G_VECTOR(OFS_PARM2)[0]);
-	MSG_WriteDPCoord(&sv.datagram, G_VECTOR(OFS_PARM2)[1]);
-	MSG_WriteDPCoord(&sv.datagram, G_VECTOR(OFS_PARM2)[2]);
+	MSG_WriteCoord(&sv.datagram, G_VECTOR(OFS_PARM2)[0], sv.protocol);
+	MSG_WriteCoord(&sv.datagram, G_VECTOR(OFS_PARM2)[1], sv.protocol);
+	MSG_WriteCoord(&sv.datagram, G_VECTOR(OFS_PARM2)[2], sv.protocol);
 }
 
 void PF_te_lightning2 (void)
@@ -2459,13 +2560,13 @@ void PF_te_lightning2 (void)
 	// owner entity
 	MSG_WriteShort(&sv.datagram, G_EDICTNUM(OFS_PARM0));
 	// start
-	MSG_WriteDPCoord(&sv.datagram, G_VECTOR(OFS_PARM1)[0]);
-	MSG_WriteDPCoord(&sv.datagram, G_VECTOR(OFS_PARM1)[1]);
-	MSG_WriteDPCoord(&sv.datagram, G_VECTOR(OFS_PARM1)[2]);
+	MSG_WriteCoord(&sv.datagram, G_VECTOR(OFS_PARM1)[0], sv.protocol);
+	MSG_WriteCoord(&sv.datagram, G_VECTOR(OFS_PARM1)[1], sv.protocol);
+	MSG_WriteCoord(&sv.datagram, G_VECTOR(OFS_PARM1)[2], sv.protocol);
 	// end
-	MSG_WriteDPCoord(&sv.datagram, G_VECTOR(OFS_PARM2)[0]);
-	MSG_WriteDPCoord(&sv.datagram, G_VECTOR(OFS_PARM2)[1]);
-	MSG_WriteDPCoord(&sv.datagram, G_VECTOR(OFS_PARM2)[2]);
+	MSG_WriteCoord(&sv.datagram, G_VECTOR(OFS_PARM2)[0], sv.protocol);
+	MSG_WriteCoord(&sv.datagram, G_VECTOR(OFS_PARM2)[1], sv.protocol);
+	MSG_WriteCoord(&sv.datagram, G_VECTOR(OFS_PARM2)[2], sv.protocol);
 }
 
 void PF_te_lightning3 (void)
@@ -2475,13 +2576,13 @@ void PF_te_lightning3 (void)
 	// owner entity
 	MSG_WriteShort(&sv.datagram, G_EDICTNUM(OFS_PARM0));
 	// start
-	MSG_WriteDPCoord(&sv.datagram, G_VECTOR(OFS_PARM1)[0]);
-	MSG_WriteDPCoord(&sv.datagram, G_VECTOR(OFS_PARM1)[1]);
-	MSG_WriteDPCoord(&sv.datagram, G_VECTOR(OFS_PARM1)[2]);
+	MSG_WriteCoord(&sv.datagram, G_VECTOR(OFS_PARM1)[0], sv.protocol);
+	MSG_WriteCoord(&sv.datagram, G_VECTOR(OFS_PARM1)[1], sv.protocol);
+	MSG_WriteCoord(&sv.datagram, G_VECTOR(OFS_PARM1)[2], sv.protocol);
 	// end
-	MSG_WriteDPCoord(&sv.datagram, G_VECTOR(OFS_PARM2)[0]);
-	MSG_WriteDPCoord(&sv.datagram, G_VECTOR(OFS_PARM2)[1]);
-	MSG_WriteDPCoord(&sv.datagram, G_VECTOR(OFS_PARM2)[2]);
+	MSG_WriteCoord(&sv.datagram, G_VECTOR(OFS_PARM2)[0], sv.protocol);
+	MSG_WriteCoord(&sv.datagram, G_VECTOR(OFS_PARM2)[1], sv.protocol);
+	MSG_WriteCoord(&sv.datagram, G_VECTOR(OFS_PARM2)[2], sv.protocol);
 }
 
 void PF_te_beam (void)
@@ -2491,50 +2592,61 @@ void PF_te_beam (void)
 	// owner entity
 	MSG_WriteShort(&sv.datagram, G_EDICTNUM(OFS_PARM0));
 	// start
-	MSG_WriteDPCoord(&sv.datagram, G_VECTOR(OFS_PARM1)[0]);
-	MSG_WriteDPCoord(&sv.datagram, G_VECTOR(OFS_PARM1)[1]);
-	MSG_WriteDPCoord(&sv.datagram, G_VECTOR(OFS_PARM1)[2]);
+	MSG_WriteCoord(&sv.datagram, G_VECTOR(OFS_PARM1)[0], sv.protocol);
+	MSG_WriteCoord(&sv.datagram, G_VECTOR(OFS_PARM1)[1], sv.protocol);
+	MSG_WriteCoord(&sv.datagram, G_VECTOR(OFS_PARM1)[2], sv.protocol);
 	// end
-	MSG_WriteDPCoord(&sv.datagram, G_VECTOR(OFS_PARM2)[0]);
-	MSG_WriteDPCoord(&sv.datagram, G_VECTOR(OFS_PARM2)[1]);
-	MSG_WriteDPCoord(&sv.datagram, G_VECTOR(OFS_PARM2)[2]);
+	MSG_WriteCoord(&sv.datagram, G_VECTOR(OFS_PARM2)[0], sv.protocol);
+	MSG_WriteCoord(&sv.datagram, G_VECTOR(OFS_PARM2)[1], sv.protocol);
+	MSG_WriteCoord(&sv.datagram, G_VECTOR(OFS_PARM2)[2], sv.protocol);
 }
 
 void PF_te_plasmaburn (void)
 {
 	MSG_WriteByte(&sv.datagram, svc_temp_entity);
 	MSG_WriteByte(&sv.datagram, TE_PLASMABURN);
-	MSG_WriteDPCoord(&sv.datagram, G_VECTOR(OFS_PARM0)[0]);
-	MSG_WriteDPCoord(&sv.datagram, G_VECTOR(OFS_PARM0)[1]);
-	MSG_WriteDPCoord(&sv.datagram, G_VECTOR(OFS_PARM0)[2]);
+	MSG_WriteCoord(&sv.datagram, G_VECTOR(OFS_PARM0)[0], sv.protocol);
+	MSG_WriteCoord(&sv.datagram, G_VECTOR(OFS_PARM0)[1], sv.protocol);
+	MSG_WriteCoord(&sv.datagram, G_VECTOR(OFS_PARM0)[2], sv.protocol);
 }
 
-static void clippointtosurface(msurface_t *surf, vec3_t p, vec3_t out)
+static void clippointtosurface(msurface_t *surface, vec3_t p, vec3_t out)
 {
-	int i, j;
-	vec3_t v1, clipplanenormal, normal;
-	vec_t clipplanedist, clipdist;
+	int i, j, k;
+	float *v[3], facenormal[3], edgenormal[3], sidenormal[3], temp[3], offsetdist, dist, bestdist;
+	const int *e;
+	bestdist = 1000000000;
 	VectorCopy(p, out);
-	if (surf->flags & SURF_PLANEBACK)
-		VectorNegate(surf->plane->normal, normal);
-	else
-		VectorCopy(surf->plane->normal, normal);
-	for (i = 0, j = surf->poly_numverts - 1;i < surf->poly_numverts;j = i, i++)
-	{
-		VectorSubtract(&surf->poly_verts[j * 3], &surf->poly_verts[i * 3], v1);
-		VectorNormalizeFast(v1);
-		CrossProduct(v1, normal, clipplanenormal);
-		clipplanedist = DotProduct(&surf->poly_verts[i * 3], clipplanenormal);
-		clipdist = DotProduct(out, clipplanenormal) - clipplanedist;
-		if (clipdist > 0)
+	for (i = 0, e = (surface->groupmesh->data_element3i + 3 * surface->num_firsttriangle);i < surface->num_triangles;i++, e += 3)
+	{
+		// clip original point to each triangle of the surface and find the
+		// triangle that is closest
+		v[0] = surface->groupmesh->data_vertex3f + e[0] * 3;
+		v[1] = surface->groupmesh->data_vertex3f + e[1] * 3;
+		v[2] = surface->groupmesh->data_vertex3f + e[2] * 3;
+		TriangleNormal(v[0], v[1], v[2], facenormal);
+		VectorNormalize(facenormal);
+		offsetdist = DotProduct(v[0], facenormal) - DotProduct(p, facenormal);
+		VectorMA(p, offsetdist, facenormal, temp);
+		for (j = 0, k = 2;j < 3;k = j, j++)
 		{
-			clipdist = -clipdist;
-			VectorMA(out, clipdist, clipplanenormal, out);
+			VectorSubtract(v[k], v[j], edgenormal);
+			CrossProduct(edgenormal, facenormal, sidenormal);
+			VectorNormalize(sidenormal);
+			offsetdist = DotProduct(v[k], sidenormal) - DotProduct(temp, sidenormal);
+			if (offsetdist < 0)
+				VectorMA(temp, offsetdist, sidenormal, temp);
+		}
+		dist = VectorDistance2(temp, p);
+		if (bestdist > dist)
+		{
+			bestdist = dist;
+			VectorCopy(temp, out);
 		}
 	}
 }
 
-static msurface_t *getsurface(edict_t *ed, int surfnum)
+static msurface_t *getsurface(edict_t *ed, int surfacenum)
 {
 	int modelindex;
 	model_t *model;
@@ -2544,74 +2656,79 @@ static msurface_t *getsurface(edict_t *ed, int surfnum)
 	if (modelindex < 1 || modelindex >= MAX_MODELS)
 		return NULL;
 	model = sv.models[modelindex];
-	if (surfnum < 0 || surfnum >= model->brushq1.nummodelsurfaces)
+	if (surfacenum < 0 || surfacenum >= model->nummodelsurfaces)
 		return NULL;
-	return model->brushq1.surfaces + surfnum + model->brushq1.firstmodelsurface;
+	return model->data_surfaces + surfacenum + model->firstmodelsurface;
 }
 
 
 //PF_getsurfacenumpoints, // #434 float(entity e, float s) getsurfacenumpoints = #434;
 void PF_getsurfacenumpoints(void)
 {
-	msurface_t *surf;
+	msurface_t *surface;
 	// return 0 if no such surface
-	if (!(surf = getsurface(G_EDICT(OFS_PARM0), G_FLOAT(OFS_PARM1))))
+	if (!(surface = getsurface(G_EDICT(OFS_PARM0), G_FLOAT(OFS_PARM1))))
 	{
 		G_FLOAT(OFS_RETURN) = 0;
 		return;
 	}
 
-	G_FLOAT(OFS_RETURN) = surf->poly_numverts;
+	// note: this (incorrectly) assumes it is a simple polygon
+	G_FLOAT(OFS_RETURN) = surface->num_vertices;
 }
 //PF_getsurfacepoint,     // #435 vector(entity e, float s, float n) getsurfacepoint = #435;
 void PF_getsurfacepoint(void)
 {
 	edict_t *ed;
-	msurface_t *surf;
+	msurface_t *surface;
 	int pointnum;
 	VectorClear(G_VECTOR(OFS_RETURN));
 	ed = G_EDICT(OFS_PARM0);
 	if (!ed || ed->e->free)
 		return;
-	if (!(surf = getsurface(ed, G_FLOAT(OFS_PARM1))))
+	if (!(surface = getsurface(ed, G_FLOAT(OFS_PARM1))))
 		return;
+	// note: this (incorrectly) assumes it is a simple polygon
 	pointnum = G_FLOAT(OFS_PARM2);
-	if (pointnum < 0 || pointnum >= surf->poly_numverts)
+	if (pointnum < 0 || pointnum >= surface->num_vertices)
 		return;
 	// FIXME: implement rotation/scaling
-	VectorAdd(&surf->poly_verts[pointnum * 3], ed->v->origin, G_VECTOR(OFS_RETURN));
+	VectorAdd(&(surface->groupmesh->data_vertex3f + 3 * surface->num_firstvertex)[pointnum * 3], ed->v->origin, G_VECTOR(OFS_RETURN));
 }
 //PF_getsurfacenormal,    // #436 vector(entity e, float s) getsurfacenormal = #436;
 void PF_getsurfacenormal(void)
 {
-	msurface_t *surf;
+	msurface_t *surface;
+	vec3_t normal;
 	VectorClear(G_VECTOR(OFS_RETURN));
-	if (!(surf = getsurface(G_EDICT(OFS_PARM0), G_FLOAT(OFS_PARM1))))
+	if (!(surface = getsurface(G_EDICT(OFS_PARM0), G_FLOAT(OFS_PARM1))))
 		return;
 	// FIXME: implement rotation/scaling
-	if (surf->flags & SURF_PLANEBACK)
-		VectorNegate(surf->plane->normal, G_VECTOR(OFS_RETURN));
-	else
-		VectorCopy(surf->plane->normal, G_VECTOR(OFS_RETURN));
+	// note: this (incorrectly) assumes it is a simple polygon
+	// note: this only returns the first triangle, so it doesn't work very
+	// well for curved surfaces or arbitrary meshes
+	TriangleNormal((surface->groupmesh->data_vertex3f + 3 * surface->num_firstvertex), (surface->groupmesh->data_vertex3f + 3 * surface->num_firstvertex) + 3, (surface->groupmesh->data_vertex3f + 3 * surface->num_firstvertex) + 6, normal);
+	VectorNormalize(normal);
+	VectorCopy(normal, G_VECTOR(OFS_RETURN));
 }
 //PF_getsurfacetexture,   // #437 string(entity e, float s) getsurfacetexture = #437;
 void PF_getsurfacetexture(void)
 {
-	msurface_t *surf;
+	msurface_t *surface;
 	G_INT(OFS_RETURN) = 0;
-	if (!(surf = getsurface(G_EDICT(OFS_PARM0), G_FLOAT(OFS_PARM1))))
+	if (!(surface = getsurface(G_EDICT(OFS_PARM0), G_FLOAT(OFS_PARM1))))
 		return;
-	G_INT(OFS_RETURN) = PR_SetString(surf->texinfo->texture->name);
+	G_INT(OFS_RETURN) = PR_SetString(surface->texture->name);
 }
 //PF_getsurfacenearpoint, // #438 float(entity e, vector p) getsurfacenearpoint = #438;
 void PF_getsurfacenearpoint(void)
 {
-	int surfnum, best, modelindex;
+	int surfacenum, best, modelindex;
 	vec3_t clipped, p;
 	vec_t dist, bestdist;
 	edict_t *ed;
 	model_t *model;
-	msurface_t *surf;
+	msurface_t *surface;
 	vec_t *point;
 	G_FLOAT(OFS_RETURN) = -1;
 	ed = G_EDICT(OFS_PARM0);
@@ -2623,26 +2740,31 @@ void PF_getsurfacenearpoint(void)
 	if (modelindex < 1 || modelindex >= MAX_MODELS)
 		return;
 	model = sv.models[modelindex];
-	if (!model->brushq1.numsurfaces)
+	if (!model->num_surfaces)
 		return;
 
 	// FIXME: implement rotation/scaling
 	VectorSubtract(point, ed->v->origin, p);
 	best = -1;
 	bestdist = 1000000000;
-	for (surfnum = 0;surfnum < model->brushq1.nummodelsurfaces;surfnum++)
-	{
-		surf = model->brushq1.surfaces + surfnum + model->brushq1.firstmodelsurface;
-		dist = PlaneDiff(p, surf->plane);
-		dist = dist * dist;
+	for (surfacenum = 0;surfacenum < model->nummodelsurfaces;surfacenum++)
+	{
+		surface = model->data_surfaces + surfacenum + model->firstmodelsurface;
+		// first see if the nearest point on the surface's box is closer than the previous match
+		clipped[0] = bound(surface->mins[0], p[0], surface->maxs[0]) - p[0];
+		clipped[1] = bound(surface->mins[1], p[1], surface->maxs[1]) - p[1];
+		clipped[2] = bound(surface->mins[2], p[2], surface->maxs[2]) - p[2];
+		dist = VectorLength2(clipped);
 		if (dist < bestdist)
 		{
-			clippointtosurface(surf, p, clipped);
+			// it is, check the nearest point on the actual geometry
+			clippointtosurface(surface, p, clipped);
 			VectorSubtract(clipped, p, clipped);
-			dist += DotProduct(clipped, clipped);
+			dist += VectorLength2(clipped);
 			if (dist < bestdist)
 			{
-				best = surfnum;
+				// that's closer too, store it as the best match
+				best = surfacenum;
 				bestdist = dist;
 			}
 		}
@@ -2653,17 +2775,17 @@ void PF_getsurfacenearpoint(void)
 void PF_getsurfaceclippedpoint(void)
 {
 	edict_t *ed;
-	msurface_t *surf;
+	msurface_t *surface;
 	vec3_t p, out;
 	VectorClear(G_VECTOR(OFS_RETURN));
 	ed = G_EDICT(OFS_PARM0);
 	if (!ed || ed->e->free)
 		return;
-	if (!(surf = getsurface(ed, G_FLOAT(OFS_PARM1))))
+	if (!(surface = getsurface(ed, G_FLOAT(OFS_PARM1))))
 		return;
 	// FIXME: implement rotation/scaling
 	VectorSubtract(G_VECTOR(OFS_PARM2), ed->v->origin, p);
-	clippointtosurface(surf, p, out);
+	clippointtosurface(surface, p, out);
 	// FIXME: implement rotation/scaling
 	VectorAdd(out, ed->v->origin, G_VECTOR(OFS_RETURN));
 }
@@ -2691,8 +2813,9 @@ void PR_Files_CloseAll(void)
 //float(string s) stof = #81; // get numerical value from a string
 void PF_stof(void)
 {
-	char *s = PF_VarString(0);
-	G_FLOAT(OFS_RETURN) = atof(s);
+	char string[STRINGTEMP_LENGTH];
+	PF_VarString(0, string, sizeof(string));
+	G_FLOAT(OFS_RETURN) = atof(string);
 }
 
 //float(string filename, float mode) fopen = #110; // opens a file inside quake/gamedir/data/ (mode is FILE_READ, FILE_APPEND, or FILE_WRITE), returns fhandle >= 0 if successful, or fhandle < 0 if unable to open file for any reason
@@ -2727,17 +2850,12 @@ void PF_fopen(void)
 		return;
 	}
 	filename = G_STRING(OFS_PARM0);
-	// .. is parent directory on many platforms
-	// / is parent directory on Amiga
-	// : is root of drive on Amiga (also used as a directory separator on Mac, but / works there too, so that's a bad idea)
-	// \ is a windows-ism (so it's naughty to use it, / works on all platforms)
-	if ((filename[0] == '.' && filename[1] == '.') || filename[0] == '/' || strrchr(filename, ':') || strrchr(filename, '\\'))
-	{
-		Con_Printf("PF_fopen: dangerous or non-portable filename \"%s\" not allowed. (contains : or \\ or begins with .. or /)\n", filename);
-		G_FLOAT(OFS_RETURN) = -4;
-		return;
-	}
-	pr_files[filenum] = FS_Open(va("data/%s", filename), modestring, false);
+	// -4 failure (dangerous/non-portable filename) removed, FS_Open checks
+	pr_files[filenum] = FS_Open(va("data/%s", filename), modestring, false, false);
+
+	if (pr_files[filenum] == NULL && modestring == "rb")
+		pr_files[filenum] = FS_Open(filename, modestring, false, false);
+
 	if (pr_files[filenum] == NULL)
 		G_FLOAT(OFS_RETURN) = -1;
 	else
@@ -2766,7 +2884,7 @@ void PF_fclose(void)
 void PF_fgets(void)
 {
 	int c, end;
-	static char string[MAX_VARSTRING];
+	static char string[STRINGTEMP_LENGTH];
 	int filenum = G_FLOAT(OFS_PARM0);
 	if (filenum < 0 || filenum >= MAX_PRFILES)
 	{
@@ -2784,16 +2902,20 @@ void PF_fgets(void)
 		c = FS_Getc(pr_files[filenum]);
 		if (c == '\r' || c == '\n' || c < 0)
 			break;
-		if (end < MAX_VARSTRING - 1)
+		if (end < STRINGTEMP_LENGTH - 1)
 			string[end++] = c;
 	}
 	string[end] = 0;
 	// remove \n following \r
 	if (c == '\r')
+	{
 		c = FS_Getc(pr_files[filenum]);
+		if (c != '\n')
+			FS_UnGetc(pr_files[filenum], (unsigned char)c);
+	}
 	if (developer.integer)
 		Con_Printf("fgets: %s\n", string);
-	if (c >= 0)
+	if (c >= 0 || end)
 		G_INT(OFS_RETURN) = PR_SetString(string);
 	else
 		G_INT(OFS_RETURN) = 0;
@@ -2803,7 +2925,7 @@ void PF_fgets(void)
 void PF_fputs(void)
 {
 	int stringlength;
-	char *s = PF_VarString(1);
+	char string[STRINGTEMP_LENGTH];
 	int filenum = G_FLOAT(OFS_PARM0);
 	if (filenum < 0 || filenum >= MAX_PRFILES)
 	{
@@ -2815,10 +2937,11 @@ void PF_fputs(void)
 		Con_Printf("PF_fputs: no such file handle %i (or file has been closed)\n", filenum);
 		return;
 	}
-	if ((stringlength = strlen(s)))
-		FS_Write(pr_files[filenum], s, stringlength);
+	PF_VarString(1, string, sizeof(string));
+	if ((stringlength = strlen(string)))
+		FS_Write(pr_files[filenum], string, stringlength);
 	if (developer.integer)
-		Con_Printf("fputs: %s\n", s);
+		Con_Printf("fputs: %s\n", string);
 }
 
 //float(string s) strlen = #114; // returns how many characters are in a string
@@ -2835,7 +2958,8 @@ void PF_strlen(void)
 //string(string s1, string s2) strcat = #115; // concatenates two strings (for example "abc", "def" would return "abcdef") and returns as a tempstring
 void PF_strcat(void)
 {
-	char *s = PF_VarString(0);
+	char *s = PR_GetTempString();
+	PF_VarString(0, s, STRINGTEMP_LENGTH);
 	G_INT(OFS_RETURN) = PR_SetString(s);
 }
 
@@ -2859,7 +2983,9 @@ void PF_substring(void)
 //vector(string s) stov = #117; // returns vector value from a string
 void PF_stov(void)
 {
-	Math_atov(PF_VarString(0), G_VECTOR(OFS_RETURN));
+	char string[STRINGTEMP_LENGTH];
+	PF_VarString(0, string, sizeof(string));
+	Math_atov(string, G_VECTOR(OFS_RETURN));
 }
 
 //string(string s) strzone = #118; // makes a copy of a string into the string zone and returns it, this is often used to keep around a tempstring for longer periods of time (tempstrings are replaced often)
@@ -2867,7 +2993,7 @@ void PF_strzone(void)
 {
 	char *in, *out;
 	in = G_STRING(OFS_PARM0);
-	out = Mem_Alloc(pr_strings_mempool, strlen(in) + 1);
+	out = PR_Alloc(strlen(in) + 1);
 	strcpy(out, in);
 	G_INT(OFS_RETURN) = PR_SetString(out);
 }
@@ -2875,7 +3001,7 @@ void PF_strzone(void)
 //void(string s) strunzone = #119; // removes a copy of a string from the string zone (you can not use that string again or it may crash!!!)
 void PF_strunzone(void)
 {
-	Mem_Free(G_STRING(OFS_PARM0));
+	PR_Free(G_STRING(OFS_PARM0));
 }
 
 //void(entity e, string s) clientcommand = #440; // executes a command string as if it came from the specified client
@@ -2887,41 +3013,40 @@ void PF_clientcommand (void)
 
 	//find client for this entity
 	i = (NUM_FOR_EDICT(G_EDICT(OFS_PARM0)) - 1);
-	if (i < 0 || i >= MAX_SCOREBOARD || !svs.connectedclients[i])
-		Host_Error("PF_clientcommand: entity is not a client");
+	if (i < 0 || i >= svs.maxclients || !svs.clients[i].active)
+	{
+		Con_Print("PF_clientcommand: entity is not a client\n");
+		return;
+	}
 
 	temp_client = host_client;
-	host_client = svs.connectedclients[i];
+	host_client = svs.clients + i;
 	Cmd_ExecuteString (G_STRING(OFS_PARM1), src_client);
 	host_client = temp_client;
 }
 
 //float(string s) tokenize = #441; // takes apart a string into individal words (access them with argv), returns how many
 //this function originally written by KrimZon, made shorter by LordHavoc
-char **tokens = NULL;
-int    max_tokens, num_tokens = 0;
+//20040203: rewritten by LordHavoc (no longer uses allocations)
+int num_tokens = 0;
+char *tokens[256], tokenbuf[4096];
 void PF_tokenize (void)
 {
+	int pos;
 	const char *p;
-	char *str;
-	str = G_STRING(OFS_PARM0);
-
-	if (tokens != NULL)
-	{
-		int i;
-		for (i=0;i<num_tokens;i++)
-			Z_Free(tokens[i]);
-		Z_Free(tokens);
-		num_tokens = 0;
-	}
-
-	tokens = Z_Malloc(strlen(str) * sizeof(char *));
-	max_tokens = strlen(str);
+	p = G_STRING(OFS_PARM0);
 
-	for (p = str;COM_ParseToken(&p, false) && num_tokens < max_tokens;num_tokens++)
+	num_tokens = 0;
+	pos = 0;
+	while(COM_ParseToken(&p, false))
 	{
-		tokens[num_tokens] = Z_Malloc(strlen(com_token) + 1);
-		strcpy(tokens[num_tokens], com_token);
+		if (num_tokens >= (int)(sizeof(tokens)/sizeof(tokens[0])))
+			break;
+		if (pos + strlen(com_token) + 1 > sizeof(tokenbuf))
+			break;
+		tokens[num_tokens++] = tokenbuf + pos;
+		strcpy(tokenbuf + pos, com_token);
+		pos += strlen(com_token) + 1;
 	}
 
 	G_FLOAT(OFS_RETURN) = num_tokens;
@@ -2945,9 +3070,14 @@ void PF_setattachment (void)
 	edict_t *tagentity = G_EDICT(OFS_PARM1);
 	char *tagname = G_STRING(OFS_PARM2);
 	eval_t *v;
-	int i, modelindex;
+	int modelindex;
 	model_t *model;
 
+	if (e == sv.edicts)
+		PF_WARNING("setattachment: can not modify world entity\n");
+	if (e->e->free)
+		PF_WARNING("setattachment: can not modify free entity\n");
+
 	if (tagentity == NULL)
 		tagentity = sv.edicts;
 
@@ -2961,17 +3091,9 @@ void PF_setattachment (void)
 	if (tagentity != NULL && tagentity != sv.edicts && tagname && tagname[0])
 	{
 		modelindex = (int)tagentity->v->modelindex;
-		if (modelindex >= 0 && modelindex < MAX_MODELS)
+		if (modelindex >= 0 && modelindex < MAX_MODELS && (model = sv.models[modelindex]))
 		{
-			model = sv.models[modelindex];
-			if (model->data_overridetagnamesforskin && (unsigned int)tagentity->v->skin < (unsigned int)model->numskins && model->data_overridetagnamesforskin[(unsigned int)tagentity->v->skin].num_overridetagnames)
-				for (i = 0;i < model->data_overridetagnamesforskin[(unsigned int)tagentity->v->skin].num_overridetagnames;i++)
-					if (!strcmp(tagname, model->data_overridetagnamesforskin[(unsigned int)tagentity->v->skin].data_overridetagnames[i].name))
-						v->_float = i + 1;
-			if (v->_float == 0 && model->alias.aliasnum_tags)
-				for (i = 0;i < model->alias.aliasnum_tags;i++)
-					if (!strcmp(tagname, model->alias.aliasdata_tags[i].name))
-						v->_float = i + 1;
+			v->_float = Mod_Alias_GetTagIndexForName(model, tagentity->v->skin, tagname);
 			if (v->_float == 0)
 				Con_DPrintf("setattachment(edict %i, edict %i, string \"%s\"): tried to find tag named \"%s\" on entity %i (model \"%s\") but could not find it\n", NUM_FOR_EDICT(e), NUM_FOR_EDICT(tagentity), tagname, tagname, NUM_FOR_EDICT(tagentity), model->name);
 		}
@@ -2980,6 +3102,436 @@ void PF_setattachment (void)
 	}
 }
 
+/////////////////////////////////////////
+// DP_MD3_TAGINFO extension coded by VorteX
+
+int SV_GetTagIndex (edict_t *e, char *tagname)
+{
+	int i;
+	model_t *model;
+
+	i = e->v->modelindex;
+	if (i < 1 || i >= MAX_MODELS)
+		return -1;
+	model = sv.models[i];
+
+	return Mod_Alias_GetTagIndexForName(model, e->v->skin, tagname);
+};
+
+// Warnings/errors code:
+// 0 - normal (everything all-right)
+// 1 - world entity
+// 2 - free entity
+// 3 - null or non-precached model
+// 4 - no tags with requested index
+// 5 - runaway loop at attachment chain
+extern cvar_t cl_bob;
+extern cvar_t cl_bobcycle;
+extern cvar_t cl_bobup;
+int SV_GetTagMatrix (matrix4x4_t *out, edict_t *ent, int tagindex)
+{
+	eval_t *val;
+	int modelindex, reqframe, attachloop;
+	matrix4x4_t entitymatrix, tagmatrix, attachmatrix;
+	edict_t *attachent;
+	model_t *model;
+
+	Matrix4x4_CreateIdentity(out); // warnings and errors return identical matrix
+
+	if (ent == sv.edicts)
+		return 1;
+	if (ent->e->free)
+		return 2;
+
+	modelindex = (int)ent->v->modelindex;
+	if (modelindex <= 0 || modelindex > MAX_MODELS)
+		return 3;
+
+	model = sv.models[modelindex];
+
+	if (ent->v->frame >= 0 && ent->v->frame < model->numframes && model->animscenes)
+		reqframe = model->animscenes[(int)ent->v->frame].firstframe;
+	else
+		reqframe = 0; // if model has wrong frame, engine automatically switches to model first frame
+
+	// get initial tag matrix
+	if (tagindex)
+	{
+		int ret = Mod_Alias_GetTagMatrix(model, reqframe, tagindex - 1, &tagmatrix);
+		if (ret)
+			return ret;
+	}
+	else
+		Matrix4x4_CreateIdentity(&tagmatrix);
+
+	if ((val = GETEDICTFIELDVALUE(ent, eval_tag_entity)) && val->edict)
+	{ // DP_GFX_QUAKE3MODELTAGS, scan all chain and stop on unattached entity
+		attachloop = 0;
+		do
+		{
+			attachent = EDICT_NUM(val->edict); // to this it entity our entity is attached
+			val = GETEDICTFIELDVALUE(ent, eval_tag_index);
+			if (val->_float >= 1 && attachent->v->modelindex >= 1 && attachent->v->modelindex < MAX_MODELS && (model = sv.models[(int)attachent->v->modelindex]) && model->animscenes && attachent->v->frame >= 0 && attachent->v->frame < model->numframes)
+				Mod_Alias_GetTagMatrix(model, model->animscenes[(int)attachent->v->frame].firstframe, val->_float - 1, &attachmatrix);
+			else
+				Matrix4x4_CreateIdentity(&attachmatrix);
+
+			// apply transformation by child entity matrix
+			val = GETEDICTFIELDVALUE(ent, eval_scale);
+			if (val->_float == 0)
+				val->_float = 1;
+			Matrix4x4_CreateFromQuakeEntity(&entitymatrix, ent->v->origin[0], ent->v->origin[1], ent->v->origin[2], -ent->v->angles[0], ent->v->angles[1], ent->v->angles[2], val->_float);
+			Matrix4x4_Concat(out, &entitymatrix, &tagmatrix);
+			out->m[0][3] = entitymatrix.m[0][3] + val->_float*(entitymatrix.m[0][0]*tagmatrix.m[0][3] + entitymatrix.m[0][1]*tagmatrix.m[1][3] + entitymatrix.m[0][2]*tagmatrix.m[2][3]);
+			out->m[1][3] = entitymatrix.m[1][3] + val->_float*(entitymatrix.m[1][0]*tagmatrix.m[0][3] + entitymatrix.m[1][1]*tagmatrix.m[1][3] + entitymatrix.m[1][2]*tagmatrix.m[2][3]);
+			out->m[2][3] = entitymatrix.m[2][3] + val->_float*(entitymatrix.m[2][0]*tagmatrix.m[0][3] + entitymatrix.m[2][1]*tagmatrix.m[1][3] + entitymatrix.m[2][2]*tagmatrix.m[2][3]);
+			Matrix4x4_Copy(&tagmatrix, out);
+
+			// finally transformate by matrix of tag on parent entity
+			Matrix4x4_Concat(out, &attachmatrix, &tagmatrix);
+			out->m[0][3] = attachmatrix.m[0][3] + attachmatrix.m[0][0]*tagmatrix.m[0][3] + attachmatrix.m[0][1]*tagmatrix.m[1][3] + attachmatrix.m[0][2]*tagmatrix.m[2][3];
+			out->m[1][3] = attachmatrix.m[1][3] + attachmatrix.m[1][0]*tagmatrix.m[0][3] + attachmatrix.m[1][1]*tagmatrix.m[1][3] + attachmatrix.m[1][2]*tagmatrix.m[2][3];
+			out->m[2][3] = attachmatrix.m[2][3] + attachmatrix.m[2][0]*tagmatrix.m[0][3] + attachmatrix.m[2][1]*tagmatrix.m[1][3] + attachmatrix.m[2][2]*tagmatrix.m[2][3];
+			Matrix4x4_Copy(&tagmatrix, out);
+
+			ent = attachent;
+			attachloop += 1;
+			if (attachloop > 255) // prevent runaway looping
+				return 5;
+		}
+		while ((val = GETEDICTFIELDVALUE(ent, eval_tag_entity)) && val->edict);
+	}
+
+	// normal or RENDER_VIEWMODEL entity (or main parent entity on attach chain)
+	val = GETEDICTFIELDVALUE(ent, eval_scale);
+	if (val->_float == 0)
+		val->_float = 1;
+	// Alias models have inverse pitch, bmodels can't have tags, so don't check for modeltype...
+	Matrix4x4_CreateFromQuakeEntity(&entitymatrix, ent->v->origin[0], ent->v->origin[1], ent->v->origin[2], -ent->v->angles[0], ent->v->angles[1], ent->v->angles[2], val->_float);
+	Matrix4x4_Concat(out, &entitymatrix, &tagmatrix);
+	out->m[0][3] = entitymatrix.m[0][3] + val->_float*(entitymatrix.m[0][0]*tagmatrix.m[0][3] + entitymatrix.m[0][1]*tagmatrix.m[1][3] + entitymatrix.m[0][2]*tagmatrix.m[2][3]);
+	out->m[1][3] = entitymatrix.m[1][3] + val->_float*(entitymatrix.m[1][0]*tagmatrix.m[0][3] + entitymatrix.m[1][1]*tagmatrix.m[1][3] + entitymatrix.m[1][2]*tagmatrix.m[2][3]);
+	out->m[2][3] = entitymatrix.m[2][3] + val->_float*(entitymatrix.m[2][0]*tagmatrix.m[0][3] + entitymatrix.m[2][1]*tagmatrix.m[1][3] + entitymatrix.m[2][2]*tagmatrix.m[2][3]);
+
+	if ((val = GETEDICTFIELDVALUE(ent, eval_viewmodelforclient)) && val->edict)
+	{// RENDER_VIEWMODEL magic
+		Matrix4x4_Copy(&tagmatrix, out);
+		ent = EDICT_NUM(val->edict);
+
+		val = GETEDICTFIELDVALUE(ent, eval_scale);
+		if (val->_float == 0)
+			val->_float = 1;
+
+		Matrix4x4_CreateFromQuakeEntity(&entitymatrix, ent->v->origin[0], ent->v->origin[1], ent->v->origin[2] + ent->v->view_ofs[2], ent->v->v_angle[0], ent->v->v_angle[1], ent->v->v_angle[2], val->_float);
+		Matrix4x4_Concat(out, &entitymatrix, &tagmatrix);
+		out->m[0][3] = entitymatrix.m[0][3] + val->_float*(entitymatrix.m[0][0]*tagmatrix.m[0][3] + entitymatrix.m[0][1]*tagmatrix.m[1][3] + entitymatrix.m[0][2]*tagmatrix.m[2][3]);
+		out->m[1][3] = entitymatrix.m[1][3] + val->_float*(entitymatrix.m[1][0]*tagmatrix.m[0][3] + entitymatrix.m[1][1]*tagmatrix.m[1][3] + entitymatrix.m[1][2]*tagmatrix.m[2][3]);
+		out->m[2][3] = entitymatrix.m[2][3] + val->_float*(entitymatrix.m[2][0]*tagmatrix.m[0][3] + entitymatrix.m[2][1]*tagmatrix.m[1][3] + entitymatrix.m[2][2]*tagmatrix.m[2][3]);
+
+		/*
+		// Cl_bob, ported from rendering code
+		if (ent->v->health > 0 && cl_bob.value && cl_bobcycle.value)
+		{
+			double bob, cycle;
+			// LordHavoc: this code is *weird*, but not replacable (I think it
+			// should be done in QC on the server, but oh well, quake is quake)
+			// LordHavoc: figured out bobup: the time at which the sin is at 180
+			// degrees (which allows lengthening or squishing the peak or valley)
+			cycle = sv.time/cl_bobcycle.value;
+			cycle -= (int)cycle;
+			if (cycle < cl_bobup.value)
+				cycle = sin(M_PI * cycle / cl_bobup.value);
+			else
+				cycle = sin(M_PI + M_PI * (cycle-cl_bobup.value)/(1.0 - cl_bobup.value));
+			// bob is proportional to velocity in the xy plane
+			// (don't count Z, or jumping messes it up)
+			bob = sqrt(ent->v->velocity[0]*ent->v->velocity[0] + ent->v->velocity[1]*ent->v->velocity[1])*cl_bob.value;
+			bob = bob*0.3 + bob*0.7*cycle;
+			out->m[2][3] += bound(-7, bob, 4);
+		}
+		*/
+	}
+	return 0;
+}
+
+//float(entity ent, string tagname) gettagindex;
+
+void PF_gettagindex (void)
+{
+	edict_t *ent = G_EDICT(OFS_PARM0);
+	char *tag_name = G_STRING(OFS_PARM1);
+	int modelindex, tag_index;
+
+	if (ent == sv.edicts)
+		PF_WARNING("gettagindex: can't affect world entity\n");
+	if (ent->e->free)
+		PF_WARNING("gettagindex: can't affect free entity\n");
+
+	modelindex = (int)ent->v->modelindex;
+	tag_index = 0;
+	if (modelindex <= 0 || modelindex > MAX_MODELS)
+		Con_DPrintf("gettagindex(entity #%i): null or non-precached model\n", NUM_FOR_EDICT(ent));
+	else
+	{
+		tag_index = SV_GetTagIndex(ent, tag_name);
+		if (tag_index == 0)
+			Con_DPrintf("gettagindex(entity #%i): tag \"%s\" not found\n", NUM_FOR_EDICT(ent), tag_name);
+	}
+	G_FLOAT(OFS_RETURN) = tag_index;
+};
+
+//vector(entity ent, float tagindex) gettaginfo;
+void PF_gettaginfo (void)
+{
+	edict_t *e = G_EDICT(OFS_PARM0);
+	int tagindex = (int)G_FLOAT(OFS_PARM1);
+	matrix4x4_t tag_matrix;
+	int returncode;
+
+	returncode = SV_GetTagMatrix(&tag_matrix, e, tagindex);
+	Matrix4x4_ToVectors(&tag_matrix, pr_global_struct->v_forward, pr_global_struct->v_right, pr_global_struct->v_up, G_VECTOR(OFS_RETURN));
+
+	switch(returncode)
+	{
+		case 1:
+			PF_WARNING("gettagindex: can't affect world entity\n");
+			break;
+		case 2:
+			PF_WARNING("gettagindex: can't affect free entity\n");
+			break;
+		case 3:
+			Con_DPrintf("SV_GetTagMatrix(entity #%i): null or non-precached model\n", NUM_FOR_EDICT(e));
+			break;
+		case 4:
+			Con_DPrintf("SV_GetTagMatrix(entity #%i): model has no tag with requested index %i\n", NUM_FOR_EDICT(e), tagindex);
+			break;
+		case 5:
+			Con_DPrintf("SV_GetTagMatrix(entity #%i): runaway loop at attachment chain\n", NUM_FOR_EDICT(e));
+			break;
+	}
+}
+
+
+/////////////////////////////////////////
+// DP_QC_FS_SEARCH extension
+
+// qc fs search handling
+#define MAX_SEARCHES 128
+
+fssearch_t *pr_fssearchlist[MAX_SEARCHES];
+
+void PR_Search_Init(void)
+{
+	memset(pr_fssearchlist,0,sizeof(pr_fssearchlist));
+}
+
+void PR_Search_Reset(void)
+{
+	int i;
+	// reset the fssearch list
+	for(i = 0; i < MAX_SEARCHES; i++)
+		if(pr_fssearchlist[i])
+			FS_FreeSearch(pr_fssearchlist[i]);
+	memset(pr_fssearchlist,0,sizeof(pr_fssearchlist));
+}
+
+/*
+=========
+PF_search_begin
+
+float search_begin(string pattern, float caseinsensitive, float quiet)
+=========
+*/
+void PF_search_begin(void)
+{
+	int handle;
+	char *pattern;
+	int caseinsens, quiet;
+
+	pattern = G_STRING(OFS_PARM0);
+
+	PR_CheckEmptyString(pattern);
+
+	caseinsens = G_FLOAT(OFS_PARM1);
+	quiet = G_FLOAT(OFS_PARM2);
+
+	for(handle = 0; handle < MAX_SEARCHES; handle++)
+		if(!pr_fssearchlist[handle])
+			break;
+
+	if(handle >= MAX_SEARCHES)
+	{
+		Con_Printf("PR_search_begin: ran out of search handles (%i)\n", MAX_SEARCHES);
+		G_FLOAT(OFS_RETURN) = -2;
+		return;
+	}
+
+	if(!(pr_fssearchlist[handle] = FS_Search(pattern,caseinsens, quiet)))
+		G_FLOAT(OFS_RETURN) = -1;
+	else
+		G_FLOAT(OFS_RETURN) = handle;
+}
+
+/*
+=========
+VM_search_end
+
+void	search_end(float handle)
+=========
+*/
+void PF_search_end(void)
+{
+	int handle;
+
+	handle = G_FLOAT(OFS_PARM0);
+
+	if(handle < 0 || handle >= MAX_SEARCHES)
+	{
+		Con_Printf("PF_search_end: invalid handle %i\n", handle);
+		return;
+	}
+	if(pr_fssearchlist[handle] == NULL)
+	{
+		Con_Printf("PF_search_end: no such handle %i\n", handle);
+		return;
+	}
+
+	FS_FreeSearch(pr_fssearchlist[handle]);
+	pr_fssearchlist[handle] = NULL;
+}
+
+/*
+=========
+VM_search_getsize
+
+float	search_getsize(float handle)
+=========
+*/
+void PF_search_getsize(void)
+{
+	int handle;
+
+	handle = G_FLOAT(OFS_PARM0);
+
+	if(handle < 0 || handle >= MAX_SEARCHES)
+	{
+		Con_Printf("PF_search_getsize: invalid handle %i\n", handle);
+		return;
+	}
+	if(pr_fssearchlist[handle] == NULL)
+	{
+		Con_Printf("PF_search_getsize: no such handle %i\n", handle);
+		return;
+	}
+
+	G_FLOAT(OFS_RETURN) = pr_fssearchlist[handle]->numfilenames;
+}
+
+/*
+=========
+VM_search_getfilename
+
+string	search_getfilename(float handle, float num)
+=========
+*/
+void PF_search_getfilename(void)
+{
+	int handle, filenum;
+	char *tmp;
+
+	handle = G_FLOAT(OFS_PARM0);
+	filenum = G_FLOAT(OFS_PARM1);
+
+	if(handle < 0 || handle >= MAX_SEARCHES)
+	{
+		Con_Printf("PF_search_getfilename: invalid handle %i\n", handle);
+		return;
+	}
+	if(pr_fssearchlist[handle] == NULL)
+	{
+		Con_Printf("PF_search_getfilename: no such handle %i\n", handle);
+		return;
+	}
+	if(filenum < 0 || filenum >= pr_fssearchlist[handle]->numfilenames)
+	{
+		Con_Printf("PF_search_getfilename: invalid filenum %i\n", filenum);
+		return;
+	}
+
+	tmp = PR_GetTempString();
+	strcpy(tmp, pr_fssearchlist[handle]->filenames[filenum]);
+
+	G_INT(OFS_RETURN) = PR_SetString(tmp);
+}
+
+void PF_cvar_string (void)
+{
+	char *str;
+	cvar_t *var;
+	char *tmp;
+
+	str = G_STRING(OFS_PARM0);
+	var = Cvar_FindVar (str);
+	if (var)
+	{
+		tmp = PR_GetTempString();
+		strcpy(tmp, var->string);
+	}
+	else
+		tmp = "";
+	G_INT(OFS_RETURN) = PR_SetString(tmp);
+}
+
+//void(entity clent) dropclient (DP_SV_DROPCLIENT)
+void PF_dropclient (void)
+{
+	int clientnum;
+	client_t *oldhostclient;
+	clientnum = G_EDICTNUM(OFS_PARM0) - 1;
+	if (clientnum < 0 || clientnum >= svs.maxclients)
+		PF_WARNING("dropclient: not a client\n");
+	if (!svs.clients[clientnum].active)
+		PF_WARNING("dropclient: that client slot is not connected\n");
+	oldhostclient = host_client;
+	host_client = svs.clients + clientnum;
+	SV_DropClient(false);
+	host_client = oldhostclient;
+}
+
+//entity() spawnclient (DP_SV_BOTCLIENT)
+void PF_spawnclient (void)
+{
+	int i;
+	edict_t	*ed;
+	pr_xfunction->builtinsprofile += 2;
+	ed = sv.edicts;
+	for (i = 0;i < svs.maxclients;i++)
+	{
+		if (!svs.clients[i].active)
+		{
+			pr_xfunction->builtinsprofile += 100;
+			SV_ConnectClient (i, NULL);
+			ed = EDICT_NUM(i + 1);
+			break;
+		}
+	}
+	RETURN_EDICT(ed);
+}
+
+//float(entity clent) clienttype (DP_SV_BOTCLIENT)
+void PF_clienttype (void)
+{
+	int clientnum;
+	clientnum = G_EDICTNUM(OFS_PARM0) - 1;
+	if (clientnum < 0 || clientnum >= svs.maxclients)
+		G_FLOAT(OFS_RETURN) = 3;
+	else if (!svs.clients[clientnum].active)
+		G_FLOAT(OFS_RETURN) = 0;
+	else if (svs.clients[clientnum].netconnection)
+		G_FLOAT(OFS_RETURN) = 1;
+	else
+		G_FLOAT(OFS_RETURN) = 2;
+}
 
 builtin_t pr_builtin[] =
 {
@@ -3024,7 +3576,7 @@ PF_floor,					// #37 float(float v) floor
 PF_ceil,					// #38 float(float v) ceil
 NULL,						// #39
 PF_checkbottom,				// #40 float(entity e) checkbottom
-PF_pointcontents		,	// #41 float(vector v) pointcontents
+PF_pointcontents,			// #41 float(vector v) pointcontents
 NULL,						// #42
 PF_fabs,					// #43 float(float f) fabs
 PF_aim,						// #44 vector(entity e, float speed) aim
@@ -3134,7 +3686,7 @@ PF_te_wizspike,				// #423 void(vector org) te_wizspike (DP_TE_STANDARDEFFECTBUI
 PF_te_knightspike,			// #424 void(vector org) te_knightspike (DP_TE_STANDARDEFFECTBUILTINS)
 PF_te_lavasplash,			// #425 void(vector org) te_lavasplash (DP_TE_STANDARDEFFECTBUILTINS)
 PF_te_teleport,				// #426 void(vector org) te_teleport (DP_TE_STANDARDEFFECTBUILTINS)
-PF_te_explosion2,			// #427 void(vector org, float color) te_explosion2 (DP_TE_STANDARDEFFECTBUILTINS)
+PF_te_explosion2,			// #427 void(vector org, float colorstart, float colorlength) te_explosion2 (DP_TE_STANDARDEFFECTBUILTINS)
 PF_te_lightning1,			// #428 void(entity own, vector start, vector end) te_lightning1 (DP_TE_STANDARDEFFECTBUILTINS)
 PF_te_lightning2,			// #429 void(entity own, vector start, vector end) te_lightning2 (DP_TE_STANDARDEFFECTBUILTINS)
 PF_te_lightning3,			// #430 void(entity own, vector start, vector end) te_lightning3 (DP_TE_STANDARDEFFECTBUILTINS)
@@ -3151,13 +3703,23 @@ PF_clientcommand,			// #440 void(entity e, string s) clientcommand (KRIMZON_SV_P
 PF_tokenize,				// #441 float(string s) tokenize (KRIMZON_SV_PARSECLIENTCOMMAND)
 PF_argv,					// #442 string(float n) argv (KRIMZON_SV_PARSECLIENTCOMMAND)
 PF_setattachment,			// #443 void(entity e, entity tagentity, string tagname) setattachment (DP_GFX_QUAKE3MODELTAGS)
-NULL,						// #444
-NULL,						// #445
-NULL,						// #446
-NULL,						// #447
-NULL,						// #448
-NULL,						// #449
-a a a a a					// #450-499 (LordHavoc)
+PF_search_begin,			// #444 float(string pattern, float caseinsensitive, float quiet) search_begin (DP_FS_SEARCH)
+PF_search_end,				// #445 void(float handle) search_end (DP_FS_SEARCH)
+PF_search_getsize,			// #446 float(float handle) search_getsize (DP_FS_SEARCH)
+PF_search_getfilename,		// #447 string(float handle, float num) search_getfilename (DP_FS_SEARCH)
+PF_cvar_string,				// #448 string(string s) cvar_string (DP_QC_CVAR_STRING)
+PF_findflags,				// #449 entity(entity start, .float fld, float match) findflags (DP_QC_FINDFLAGS)
+PF_findchainflags,			// #450 entity(.float fld, float match) findchainflags (DP_QC_FINDCHAINFLAGS)
+PF_gettagindex,				// #451 float(entity ent, string tagname) gettagindex (DP_QC_GETTAGINFO)
+PF_gettaginfo,				// #452 vector(entity ent, float tagindex) gettaginfo (DP_QC_GETTAGINFO)
+PF_dropclient,				// #453 void(entity clent) dropclient (DP_SV_DROPCLIENT)
+PF_spawnclient,				// #454 entity() spawnclient (DP_SV_BOTCLIENT)
+PF_clienttype,				// #455 float(entity clent) clienttype (DP_SV_BOTCLIENT)
+NULL,						// #456
+NULL,						// #457
+NULL,						// #458
+NULL,						// #459
+a a a a						// #460-499 (LordHavoc)
 };
 
 builtin_t *pr_builtins = pr_builtin;
@@ -3165,13 +3727,17 @@ int pr_numbuiltins = sizeof(pr_builtin)/sizeof(pr_builtin[0]);
 
 void PR_Cmd_Init(void)
 {
-	pr_strings_mempool = Mem_AllocPool("pr_stringszone");
 	PR_Files_Init();
+	PR_Search_Init();
+}
+
+void PR_Cmd_Shutdown(void)
+{
 }
 
 void PR_Cmd_Reset(void)
 {
-	Mem_EmptyPool(pr_strings_mempool);
+	PR_Search_Reset();
 	PR_Files_CloseAll();
 }