/* teamplay.c Teamplay enhancements ("proxy features") Copyright (C) 2000 Anton Gavrilov (tonik@quake.ru) This program is free software; you can redistribute it and/or modify it under the terms of the GNU General Public License as published by the Free Software Foundation; either version 2 of the License, or (at your option) any later version. This program is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for more details. You should have received a copy of the GNU General Public License along with this program; if not, write to: Free Software Foundation, Inc. 59 Temple Place - Suite 330 Boston, MA 02111-1307, USA $Id$ */ #ifdef HAVE_CONFIG_H # include "config.h" #endif #ifdef HAVE_STRING_H # include #endif #ifdef HAVE_STRINGS_H # include #endif #include #include "bothdefs.h" #include "console.h" #include "cmd.h" #include "client.h" #include "locs.h" #include "model.h" #include "sys.h" #include "teamplay.h" extern cvar_t *skin; cvar_t *cl_deadbodyfilter; cvar_t *cl_gibfilter; cvar_t *cl_parsesay; cvar_t *cl_nofake; static qboolean died = false, recorded_location = false; static vec3_t death_location, last_recorded_location; void Team_BestWeaponImpulse (void) { int best, i, imp, items; extern int in_impulse; items = cl.stats[STAT_ITEMS]; best = 0; for (i = Cmd_Argc () - 1; i > 0; i--) { imp = atoi (Cmd_Argv (i)); if (imp < 1 || imp > 8) continue; switch (imp) { case 1: if (items & IT_AXE) best = 1; break; case 2: if (items & IT_SHOTGUN && cl.stats[STAT_SHELLS] >= 1) best = 2; break; case 3: if (items & IT_SUPER_SHOTGUN && cl.stats[STAT_SHELLS] >= 2) best = 3; break; case 4: if (items & IT_NAILGUN && cl.stats[STAT_NAILS] >= 1) best = 4; break; case 5: if (items & IT_SUPER_NAILGUN && cl.stats[STAT_NAILS] >= 2) best = 5; break; case 6: if (items & IT_GRENADE_LAUNCHER && cl.stats[STAT_ROCKETS] >= 1) best = 6; break; case 7: if (items & IT_ROCKET_LAUNCHER && cl.stats[STAT_ROCKETS] >= 1) best = 7; break; case 8: if (items & IT_LIGHTNING && cl.stats[STAT_CELLS] >= 1) best = 8; } } if (best) in_impulse = best; } char * Team_ParseSay (char *s) { static char buf[1024]; int i, bracket; char c, chr, *t1, t2[128], t3[128]; static location_t *location = NULL; if (!cl_parsesay->int_val) return s; i = 0; while (*s && (i <= sizeof (buf))) { if ((*s == '$') && (s[1] != '\0')) { c = 0; switch (s[1]) { case '\\': c = 13; break; // fake message case '[': c = 0x90; break; // colored brackets case ']': c = 0x91; break; case 'G': c = 0x86; break; // ocrana leds case 'R': c = 0x87; break; case 'Y': c = 0x88; break; case 'B': c = 0x89; break; } if (c) { buf[i++] = c; s += 2; continue; } } else if ((*s == '%') && (s[1] != '\0')) { t1 = NULL; memset (t2, '\0', sizeof (t2)); memset (t3, '\0', sizeof (t3)); if ((s[1] == '[') && (s[3] == ']')) { bracket = 1; chr = s[2]; s += 4; } else { bracket = 0; chr = s[1]; s += 2; } switch (chr) { case '%': t2[0] = '%'; t2[1] = 0; t1 = t2; break; case 's': bracket = 0; t1 = skin->string; break; case 'd': bracket = 0; if (died) { location = locs_find (death_location); if (location) { recorded_location = true; VectorCopy (death_location, last_recorded_location); t1 = location->name; break; } } goto location; case 'r': bracket = 0; if (recorded_location) { location = locs_find (last_recorded_location); if (location) { t1 = location->name; break; } } goto location; case 'l': location: bracket = 0; location = locs_find (cl.simorg); if (location) { recorded_location = true; VectorCopy (cl.simorg, last_recorded_location); t1 = location->name; } else snprintf (t2, sizeof (t2), "Unknown!\n"); break; case 'a': if (bracket) { if (cl.stats[STAT_ARMOR] > 50) bracket = 0; if (cl.stats[STAT_ITEMS] & IT_ARMOR3) t3[0] = 'R' | 0x80; else if (cl.stats[STAT_ITEMS] & IT_ARMOR2) t3[0] = 'Y' | 0x80; else if (cl.stats[STAT_ITEMS] & IT_ARMOR1) t3[0] = 'G' | 0x80; else { t2[0] = 'N' | 0x80; t2[1] = 'O' | 0x80; t2[2] = 'N' | 0x80; t2[3] = 'E' | 0x80; t2[4] = '!' | 0x80; } snprintf (t2, sizeof (t2), "%sa:%i", t3, cl.stats[STAT_ARMOR]); } else snprintf (t2, sizeof (t2), "%i", cl.stats[STAT_ARMOR]); break; case 'A': bracket = 0; if (cl.stats[STAT_ITEMS] & IT_ARMOR3) t2[0] = 'R' | 0x80; else if (cl.stats[STAT_ITEMS] & IT_ARMOR2) t2[0] = 'Y' | 0x80; else if (cl.stats[STAT_ITEMS] & IT_ARMOR1) t2[0] = 'G' | 0x80; else { t2[0] = 'N' | 0x80; t2[1] = 'O' | 0x80; t2[2] = 'N' | 0x80; t2[3] = 'E' | 0x80; t2[4] = '!' | 0x80; } break; case 'h': if (bracket) { if (cl.stats[STAT_HEALTH] > 50) bracket = 0; snprintf (t2, sizeof (t2), "h:%i", cl.stats[STAT_HEALTH]); } else snprintf (t2, sizeof (t2), "%i", cl.stats[STAT_HEALTH]); break; default: bracket = 0; } if (!t1) { if (!t2[0]) { t2[0] = '%'; t2[1] = chr; } t1 = t2; } if (bracket) buf[i++] = 0x90; // '[' if (t1) { int len; len = strlen (t1); if (i + len >= sizeof (buf)) continue; // No more space in buffer, icky. strncpy (buf + i, t1, len); i += len; } if (bracket) buf[i++] = 0x91; // ']' continue; } buf[i++] = *s++; } buf[i] = 0; return buf; } void Team_Dead (void) { died = true; VectorCopy (cl.simorg, death_location); } void Team_NewMap (void) { char *mapname, *t1, *t2; died = false; recorded_location = false; mapname = strdup(cl.worldmodel->name); t2 = malloc(sizeof(cl.worldmodel->name)); if (!mapname || !t2) Sys_Error ("Can't duplicate mapname!"); map_to_loc(mapname,t2); t1 = strrchr (t2, '/'); if (!t1) Sys_Error ("Can't find /!"); t1++; // skip over / locs_reset (); locs_load (t1); free (mapname); free (t2); } void Team_Init_Cvars (void) { cl_deadbodyfilter = Cvar_Get ("cl_deadbodyfilter", "0", CVAR_NONE, "Hide dead player models"); cl_gibfilter = Cvar_Get ("cl_gibfilter", "0", CVAR_NONE, "Hide gibs"); cl_parsesay = Cvar_Get ("cl_parsesay", "0", CVAR_NONE, "Use .loc files to find your present location when you put %l in messages"); cl_nofake = Cvar_Get ("cl_nofake", "0", CVAR_NONE, "Unhide fake messages"); } /* locs_loc Location marker manipulation */ void locs_loc (void) { char *mapname; char *desc = NULL; char locfile[MAX_OSPATH]; //FIXME checking needed to make sure you are actually in the game and a live. if (Cmd_Argc () == 1) { Con_Printf ("loc [] :Modifies location data, add|rename take parameter\n"); return; } if (Cmd_Argc () >= 3) desc = Cmd_Args () + strlen(Cmd_Argv(1)) + 1; mapname = malloc(sizeof(cl.worldmodel->name)); if (!mapname) Sys_Error ("Can't duplicate mapname!"); map_to_loc(cl.worldmodel->name,mapname); snprintf (locfile, sizeof (locfile), "%s/%s", com_gamedir, mapname); free(mapname); if (strcasecmp(Cmd_Argv(1),"save") == 0) { if (Cmd_Argc () == 2) { locs_save(locfile, false); } else Con_Printf("loc save :saves locs from memory into a .loc file\n"); } if (strcasecmp(Cmd_Argv(1),"zsave") == 0) { if (Cmd_Argc () == 2) { locs_save(locfile, true); } else Con_Printf("loc save :saves locs from memory into a .loc file\n"); } if (strcasecmp(Cmd_Argv(1),"add") == 0) { if (Cmd_Argc () >= 3) locs_mark(cl.simorg,desc); else Con_Printf("loc add :marks the current location with the description and records the information into a loc file.\n"); } if (strcasecmp(Cmd_Argv(1),"rename") == 0) { if (Cmd_Argc () >= 3) locs_edit(cl.simorg,desc); else Con_Printf("loc rename :changes the description of the nearest location marker\n"); } if (strcasecmp(Cmd_Argv(1),"delete") == 0) { if (Cmd_Argc () == 2) locs_del(cl.simorg); else Con_Printf("loc delete :removes nearest location marker\n"); } if (strcasecmp(Cmd_Argv(1),"move") == 0) { if (Cmd_Argc () == 2) locs_edit(cl.simorg,NULL); else Con_Printf("loc move :moves the nearest location marker to your current location\n"); } } void Locs_Init (void) { Cmd_AddCommand ("loc", locs_loc, "Location marker editing commands: 'loc help' for more"); }