char *ENGINE_EXTENSIONS =
"DP_CL_LOADSKY "
+"DP_CON_SET "
+"DP_CON_SETA "
"DP_EF_ADDITIVE "
"DP_EF_BLUE "
"DP_EF_FLAME "
"DP_EF_FULLBRIGHT "
+"DP_EF_NODEPTHTEST "
"DP_EF_NODRAW "
"DP_EF_NOSHADOW "
"DP_EF_RED "
"DP_HALFLIFE_MAP "
"DP_HALFLIFE_MAP_CVAR "
"DP_INPUTBUTTONS "
+"DP_LITSPRITES "
"DP_LITSUPPORT "
"DP_MONSTERWALK "
"DP_MOVETYPEBOUNCEMISSILE "
"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_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 "
"KRIMZON_SV_PARSECLIENTCOMMAND "
"NEH_CMD_PLAY2 "
"NEH_RESTOREGAME "
+"NXQ_GFX_LETTERBOX "
"TENEBRAE_GFX_DLIGHTS "
"TW_SV_STEPCONTROL "
;
break;
if (!*check)
- PF_WARNING("setmodel: no precache\n");
+ PF_WARNING(va("setmodel: no precache for model \"%s\"\n", m));
e->v->model = PR_SetString(*check);
}
client = svs.clients + entnum-1;
- if (!client->netconnection)
- return;
PF_VarString(1, string, sizeof(string));
MSG_WriteChar(&client->message,svc_print);
MSG_WriteString(&client->message, string);
}
client = svs.clients + entnum-1;
- if (!client->netconnection)
- return;
PF_VarString(1, string, sizeof(string));
MSG_WriteChar(&client->message,svc_centerprint);
MSG_WriteString(&client->message, string);
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;
}
*/
void PF_random (void)
{
- float num;
-
- num = (rand ()&0x7fff) / ((float)0x7fff);
-
- G_FLOAT(OFS_RETURN) = num;
+ G_FLOAT(OFS_RETURN) = lhrandom(0, 1);
}
/*
str = G_STRING(OFS_PARM1);
old = host_client;
- if ((host_client = svs.clients + entnum-1) && host_client->netconnection)
- Host_ClientCommands ("%s", str);
+ host_client = svs.clients + entnum-1;
+ Host_ClientCommands ("%s", str);
host_client = old;
}
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;
+ mins[1] = org[1] - radius;
+ mins[2] = org[2] - radius;
+ maxs[0] = org[0] + radius;
+ maxs[1] = org[1] + radius;
+ maxs[2] = org[2] + radius;
+ 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
+ // 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
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)
- continue;
-
- ent->v->chain = EDICT_TO_PROG(chain);
- chain = ent;
+ if (DotProduct(eorg, eorg) < radius2)
+ {
+ ent->v->chain = EDICT_TO_PROG(chain);
+ chain = ent;
+ }
}
RETURN_EDICT(chain);
for (j = 0, client = svs.clients;j < svs.maxclients;j++, client++)
{
- if (client->netconnection)
+ if (client->active)
{
MSG_WriteChar (&client->message, svc_lightstyle);
MSG_WriteChar (&client->message,style);
float speed;
// assume failure if it returns early
- VectorClear(G_VECTOR(OFS_RETURN));
+ 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)
void PF_WriteAngle (void)
{
- if (sv.protocol == PROTOCOL_DARKPLACES5)
- MSG_WriteAngle16i (WriteDest(), G_FLOAT(OFS_PARM1));
- else
- MSG_WriteAngle8i (WriteDest(), G_FLOAT(OFS_PARM1));
+ MSG_WriteAngle (WriteDest(), G_FLOAT(OFS_PARM1), sv.protocol);
}
void PF_WriteCoord (void)
for (i=0 ; i<3 ; i++)
{
MSG_WriteCoord(&sv.signon, ent->v->origin[i], sv.protocol);
- MSG_WriteAngle8i(&sv.signon, ent->v->angles[i]);
+ MSG_WriteAngle(&sv.signon, ent->v->angles[i], sv.protocol);
}
// throw the entity away now
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;
return;
}
- if (currentqc_cvar >= MAX_QC_CVARS)
- PF_ERROR("PF_registercvar: ran out of cvar slots\n");
-
-// 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_Get(name, value, 0);
- Cvar_RegisterVariable(variable);
G_FLOAT(OFS_RETURN) = 1; // success
}
}
client = svs.clients + entnum-1;
- if ((val = GETEDICTFIELDVALUE(client->edict, eval_clientcolors)))
- val->_float = i;
+ 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);
+ }
}
/*
}
}
+/////////////////////////////////////////
+// DP_MD3_TAGINFO extension coded by VorteX
+
+int SV_GetTagIndex (edict_t *e, char *tagname)
+{
+ int tagindex, i;
+ model_t *model;
+
+ model = sv.models[(int)e->v->modelindex];
+
+ tagindex = -1;
+ if (model->data_overridetagnamesforskin && (unsigned int)e->v->skin < (unsigned int)model->numskins && model->data_overridetagnamesforskin[(unsigned int)e->v->skin].num_overridetagnames)
+ {
+ for (i = 0; i < model->data_overridetagnamesforskin[(unsigned int)e->v->skin].num_overridetagnames; i++)
+ {
+ if (!strcmp(tagname, model->data_overridetagnamesforskin[(unsigned int)e->v->skin].data_overridetagnames[i].name))
+ {
+ tagindex = i;
+ break;
+ }
+ }
+ }
+ if (tagindex == -1)
+ {
+ for (i = 0;i < model->alias.aliasnum_tags; i++)
+ {
+ if (!(strcmp(tagname, model->alias.aliasdata_tags[i].name)))
+ {
+ tagindex = i;
+ break;
+ }
+ }
+ }
+ return tagindex + 1;
+};
+
+// 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, reqtag, 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];
+ reqtag = model->alias.aliasnum_tags;
+
+ if (tagindex <= 0 || tagindex > reqtag)
+ {
+ if (reqtag && tagindex) // Only appear if model has no tags or not-null tag requested
+ return 4;
+ return 0;
+ }
+
+ if (ent->v->frame < 0 || ent->v->frame > model->alias.aliasnum_tagframes)
+ reqframe = model->numframes - 1; // if model has wrong frame, engine automatically switches to model last frame
+ else
+ reqframe = ent->v->frame;
+
+ // get initial tag matrix
+ if (tagindex)
+ {
+ reqtag = (tagindex - 1) + ent->v->frame*model->alias.aliasnum_tags;
+ Matrix4x4_Copy(&tagmatrix, &model->alias.aliasdata_tags[reqtag].matrix);
+ }
+ 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)
+ {// got tagname on parent entity attachment tag via tag_index (and got it's matrix)
+ model = sv.models[(int)attachent->v->modelindex];
+ reqtag = (val->_float - 1) + attachent->v->frame*model->alias.aliasnum_tags;
+ Matrix4x4_Copy(&attachmatrix, &model->alias.aliasdata_tags[reqtag].matrix);
+ }
+ 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
str = G_STRING(OFS_PARM0);
var = Cvar_FindVar (str);
-
- tmp = PR_GetTempString();
- strcpy(tmp, var->string);
-
+ 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[] =
{
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
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)
-PF_search_begin, // #444
-PF_search_end, // #445
-PF_search_getsize, // #446
-PF_search_getfilename, // #447
+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)
-NULL, // #451
-NULL, // #452
-NULL, // #453
-NULL, // #454
-NULL, // #455
+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
projects / xonotic / darkplaces.git / blobdiff