]> icculus.org git repositories - divverent/darkplaces.git/blob - host_cmd.c
possible improvement to keep camera out of walls (still ends up in a wall occasionall...
[divverent/darkplaces.git] / host_cmd.c
1 /*
2 Copyright (C) 1996-1997 Id Software, Inc.
3
4 This program is free software; you can redistribute it and/or
5 modify it under the terms of the GNU General Public License
6 as published by the Free Software Foundation; either version 2
7 of the License, or (at your option) any later version.
8
9 This program is distributed in the hope that it will be useful,
10 but WITHOUT ANY WARRANTY; without even the implied warranty of
11 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  
12
13 See the GNU General Public License for more details.
14
15 You should have received a copy of the GNU General Public License
16 along with this program; if not, write to the Free Software
17 Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.
18
19 */
20
21 #include "quakedef.h"
22
23 int     current_skill;
24
25 void Mod_Print (void);
26
27 dfunction_t *ED_FindFunction (char *name);
28
29 /*
30 ==================
31 Host_Quit_f
32 ==================
33 */
34
35 // LordHavoc: didn't like it asking me if I wanted to quit
36 //extern void M_Menu_Quit_f (void);
37
38 void Host_Quit_f (void)
39 {
40         /*
41         if (key_dest != key_console && cls.state != ca_dedicated)
42         {
43                 M_Menu_Quit_f ();
44                 return;
45         }
46         */
47         CL_Disconnect ();
48         Host_ShutdownServer(false);             
49
50         Sys_Quit ();
51 }
52
53
54 /*
55 ==================
56 Host_Status_f
57 ==================
58 */
59 void Host_Status_f (void)
60 {
61         client_t        *client;
62         int                     seconds;
63         int                     minutes;
64         int                     hours = 0;
65         int                     j;
66         void            (*print) (char *fmt, ...);
67         
68         if (cmd_source == src_command)
69         {
70                 if (!sv.active)
71                 {
72                         Cmd_ForwardToServer ();
73                         return;
74                 }
75                 print = Con_Printf;
76         }
77         else
78                 print = SV_ClientPrintf;
79
80         print ("host:    %s\n", Cvar_VariableString ("hostname"));
81         print ("version: %4.2f (build %i)\n", VERSION, buildnumber);
82         if (tcpipAvailable)
83                 print ("tcp/ip:  %s\n", my_tcpip_address);
84         if (ipxAvailable)
85                 print ("ipx:     %s\n", my_ipx_address);
86         print ("map:     %s\n", sv.name);
87         print ("players: %i active (%i max)\n\n", net_activeconnections, svs.maxclients);
88         for (j=0, client = svs.clients ; j<svs.maxclients ; j++, client++)
89         {
90                 if (!client->active)
91                         continue;
92                 seconds = (int)(net_time - client->netconnection->connecttime);
93                 minutes = seconds / 60;
94                 if (minutes)
95                 {
96                         seconds -= (minutes * 60);
97                         hours = minutes / 60;
98                         if (hours)
99                                 minutes -= (hours * 60);
100                 }
101                 else
102                         hours = 0;
103                 print ("#%-2u %-16.16s  %3i  %2i:%02i:%02i\n", j+1, client->name, (int)client->edict->v.frags, hours, minutes, seconds);
104                 print ("   %s\n", client->netconnection->address);
105         }
106 }
107
108
109 /*
110 ==================
111 Host_God_f
112
113 Sets client to godmode
114 ==================
115 */
116 void Host_God_f (void)
117 {
118         if (cmd_source == src_command)
119         {
120                 Cmd_ForwardToServer ();
121                 return;
122         }
123
124         if (pr_global_struct->deathmatch)
125                 return;
126
127         sv_player->v.flags = (int)sv_player->v.flags ^ FL_GODMODE;
128         if (!((int)sv_player->v.flags & FL_GODMODE) )
129                 SV_ClientPrintf ("godmode OFF\n");
130         else
131                 SV_ClientPrintf ("godmode ON\n");
132 }
133
134 void Host_Notarget_f (void)
135 {
136         if (cmd_source == src_command)
137         {
138                 Cmd_ForwardToServer ();
139                 return;
140         }
141
142         if (pr_global_struct->deathmatch)
143                 return;
144
145         sv_player->v.flags = (int)sv_player->v.flags ^ FL_NOTARGET;
146         if (!((int)sv_player->v.flags & FL_NOTARGET) )
147                 SV_ClientPrintf ("notarget OFF\n");
148         else
149                 SV_ClientPrintf ("notarget ON\n");
150 }
151
152 qboolean noclip_anglehack;
153
154 void Host_Noclip_f (void)
155 {
156         if (cmd_source == src_command)
157         {
158                 Cmd_ForwardToServer ();
159                 return;
160         }
161
162         if (pr_global_struct->deathmatch)
163                 return;
164
165         if (sv_player->v.movetype != MOVETYPE_NOCLIP)
166         {
167                 noclip_anglehack = true;
168                 sv_player->v.movetype = MOVETYPE_NOCLIP;
169                 SV_ClientPrintf ("noclip ON\n");
170         }
171         else
172         {
173                 noclip_anglehack = false;
174                 sv_player->v.movetype = MOVETYPE_WALK;
175                 SV_ClientPrintf ("noclip OFF\n");
176         }
177 }
178
179 /*
180 ==================
181 Host_Fly_f
182
183 Sets client to flymode
184 ==================
185 */
186 void Host_Fly_f (void)
187 {
188         if (cmd_source == src_command)
189         {
190                 Cmd_ForwardToServer ();
191                 return;
192         }
193
194         if (pr_global_struct->deathmatch)
195                 return;
196
197         if (sv_player->v.movetype != MOVETYPE_FLY)
198         {
199                 sv_player->v.movetype = MOVETYPE_FLY;
200                 SV_ClientPrintf ("flymode ON\n");
201         }
202         else
203         {
204                 sv_player->v.movetype = MOVETYPE_WALK;
205                 SV_ClientPrintf ("flymode OFF\n");
206         }
207 }
208
209
210 /*
211 ==================
212 Host_Ping_f
213
214 ==================
215 */
216 void Host_Ping_f (void)
217 {
218         int             i, j;
219         float   total;
220         client_t        *client;
221         
222         if (cmd_source == src_command)
223         {
224                 Cmd_ForwardToServer ();
225                 return;
226         }
227
228         SV_ClientPrintf ("Client ping times:\n");
229         for (i=0, client = svs.clients ; i<svs.maxclients ; i++, client++)
230         {
231                 if (!client->active)
232                         continue;
233                 total = 0;
234                 for (j=0 ; j<NUM_PING_TIMES ; j++)
235                         total+=client->ping_times[j];
236                 total /= NUM_PING_TIMES;
237                 SV_ClientPrintf ("%4i %s\n", (int)(total*1000), client->name);
238         }
239 }
240
241 /*
242 ===============================================================================
243
244 SERVER TRANSITIONS
245
246 ===============================================================================
247 */
248
249
250 /*
251 ======================
252 Host_Map_f
253
254 handle a 
255 map <servername>
256 command from the console.  Active clients are kicked off.
257 ======================
258 */
259 void Host_Map_f (void)
260 {
261         int             i;
262         char    name[MAX_QPATH];
263
264         if (cmd_source != src_command)
265                 return;
266
267         cls.demonum = -1;               // stop demo loop in case this fails
268
269 //      SCR_BeginLoadingPlaque ();
270
271         CL_Disconnect ();
272         Host_ShutdownServer(false);             
273
274         key_dest = key_game;                    // remove console or menu
275
276         cls.mapstring[0] = 0;
277         for (i=0 ; i<Cmd_Argc() ; i++)
278         {
279                 strcat (cls.mapstring, Cmd_Argv(i));
280                 strcat (cls.mapstring, " ");
281         }
282         strcat (cls.mapstring, "\n");
283
284         svs.serverflags = 0;                    // haven't completed an episode yet
285         strcpy (name, Cmd_Argv(1));
286         SV_SpawnServer (name);
287         if (!sv.active)
288                 return;
289         
290         if (cls.state != ca_dedicated)
291         {
292                 strcpy (cls.spawnparms, "");
293
294                 for (i=2 ; i<Cmd_Argc() ; i++)
295                 {
296                         strcat (cls.spawnparms, Cmd_Argv(i));
297                         strcat (cls.spawnparms, " ");
298                 }
299                 
300                 Cmd_ExecuteString ("connect local", src_command);
301         }       
302 }
303
304 /*
305 ==================
306 Host_Changelevel_f
307
308 Goes to a new map, taking all clients along
309 ==================
310 */
311 void Host_Changelevel_f (void)
312 {
313         char    level[MAX_QPATH];
314
315         if (Cmd_Argc() != 2)
316         {
317                 Con_Printf ("changelevel <levelname> : continue game on a new level\n");
318                 return;
319         }
320         if (!sv.active || cls.demoplayback)
321         {
322                 Con_Printf ("Only the server may changelevel\n");
323                 return;
324         }
325         SV_SaveSpawnparms ();
326         strcpy (level, Cmd_Argv(1));
327         SV_SpawnServer (level);
328 }
329
330 /*
331 ==================
332 Host_Restart_f
333
334 Restarts the current server for a dead player
335 ==================
336 */
337 void Host_Restart_f (void)
338 {
339         char    mapname[MAX_QPATH];
340
341         if (cls.demoplayback || !sv.active)
342                 return;
343
344         if (cmd_source != src_command)
345                 return;
346         strcpy (mapname, sv.name);      // must copy out, because it gets cleared
347                                                                 // in sv_spawnserver
348         SV_SpawnServer (mapname);
349 }
350
351 /*
352 ==================
353 Host_Reconnect_f
354
355 This command causes the client to wait for the signon messages again.
356 This is sent just before a server changes levels
357 ==================
358 */
359 void Host_Reconnect_f (void)
360 {
361 //      SCR_BeginLoadingPlaque ();
362         cls.signon = 0;         // need new connection messages
363 }
364
365 /*
366 =====================
367 Host_Connect_f
368
369 User command to connect to server
370 =====================
371 */
372 void Host_Connect_f (void)
373 {
374         char    name[MAX_QPATH];
375         
376         cls.demonum = -1;               // stop demo loop in case this fails
377         if (cls.demoplayback)
378         {
379                 CL_StopPlayback ();
380                 CL_Disconnect ();
381         }
382         strcpy (name, Cmd_Argv(1));
383         CL_EstablishConnection (name);
384         Host_Reconnect_f ();
385 }
386
387
388 /*
389 ===============================================================================
390
391 LOAD / SAVE GAME
392
393 ===============================================================================
394 */
395
396 #define SAVEGAME_VERSION        5
397
398 /*
399 ===============
400 Host_SavegameComment
401
402 Writes a SAVEGAME_COMMENT_LENGTH character comment describing the current 
403 ===============
404 */
405 void Host_SavegameComment (char *text)
406 {
407         int             i;
408         char    kills[20];
409
410         for (i=0 ; i<SAVEGAME_COMMENT_LENGTH ; i++)
411                 text[i] = ' ';
412         memcpy (text, cl.levelname, strlen(cl.levelname));
413         sprintf (kills,"kills:%3i/%3i", cl.stats[STAT_MONSTERS], cl.stats[STAT_TOTALMONSTERS]);
414         memcpy (text+22, kills, strlen(kills));
415 // convert space to _ to make stdio happy
416         for (i=0 ; i<SAVEGAME_COMMENT_LENGTH ; i++)
417                 if (text[i] == ' ')
418                         text[i] = '_';
419         text[SAVEGAME_COMMENT_LENGTH] = '\0';
420 }
421
422
423 /*
424 ===============
425 Host_Savegame_f
426 ===============
427 */
428 void Host_Savegame_f (void)
429 {
430         char    name[256];
431         QFile   *f;
432         int             i;
433         char    comment[SAVEGAME_COMMENT_LENGTH+1];
434
435         if (cmd_source != src_command)
436                 return;
437
438         if (!sv.active)
439         {
440                 Con_Printf ("Not playing a local game.\n");
441                 return;
442         }
443
444         if (cl.intermission)
445         {
446                 Con_Printf ("Can't save in intermission.\n");
447                 return;
448         }
449
450         if (svs.maxclients != 1)
451         {
452                 Con_Printf ("Can't save multiplayer games.\n");
453                 return;
454         }
455
456         if (Cmd_Argc() != 2)
457         {
458                 Con_Printf ("save <savename> : save a game\n");
459                 return;
460         }
461
462         if (strstr(Cmd_Argv(1), ".."))
463         {
464                 Con_Printf ("Relative pathnames are not allowed.\n");
465                 return;
466         }
467                 
468         for (i=0 ; i<svs.maxclients ; i++)
469         {
470                 if (svs.clients[i].active && (svs.clients[i].edict->v.health <= 0) )
471                 {
472                         Con_Printf ("Can't savegame with a dead player\n");
473                         return;
474                 }
475         }
476
477         sprintf (name, "%s/%s", com_gamedir, Cmd_Argv(1));
478         COM_DefaultExtension (name, ".sav");
479         
480         Con_Printf ("Saving game to %s...\n", name);
481         f = Qopen (name, "w");
482         if (!f)
483         {
484                 Con_Printf ("ERROR: couldn't open.\n");
485                 return;
486         }
487         
488         Qprintf (f, "%i\n", SAVEGAME_VERSION);
489         Host_SavegameComment (comment);
490         Qprintf (f, "%s\n", comment);
491         for (i=0 ; i<NUM_SPAWN_PARMS ; i++)
492                 Qprintf (f, "%f\n", svs.clients->spawn_parms[i]);
493         Qprintf (f, "%d\n", current_skill);
494         Qprintf (f, "%s\n", sv.name);
495         Qprintf (f, "%f\n",sv.time);
496
497 // write the light styles
498
499         for (i=0 ; i<MAX_LIGHTSTYLES ; i++)
500         {
501                 if (sv.lightstyles[i])
502                         Qprintf (f, "%s\n", sv.lightstyles[i]);
503                 else
504                         Qprintf (f,"m\n");
505         }
506
507
508         ED_WriteGlobals (f);
509         for (i=0 ; i<sv.num_edicts ; i++)
510         {
511                 ED_Write (f, EDICT_NUM(i));
512                 Qflush (f);
513         }
514         Qclose (f);
515         Con_Printf ("done.\n");
516 }
517
518
519 /*
520 ===============
521 Host_Loadgame_f
522 ===============
523 */
524 void Host_Loadgame_f (void)
525 {
526         char    name[MAX_OSPATH];
527         QFile   *f;
528         char    mapname[MAX_QPATH];
529         float   time, tfloat;
530         char    buf[32768], *start;
531         char    *str;
532         int             i, r;
533         edict_t *ent;
534         int             entnum;
535         int             version;
536         float                   spawn_parms[NUM_SPAWN_PARMS];
537
538         if (cmd_source != src_command)
539                 return;
540
541         if (Cmd_Argc() != 2)
542         {
543                 Con_Printf ("load <savename> : load a game\n");
544                 return;
545         }
546
547         cls.demonum = -1;               // stop demo loop in case this fails
548
549         sprintf (name, "%s/%s", com_gamedir, Cmd_Argv(1));
550         COM_DefaultExtension (name, ".sav");
551
552         // LordHavoc: made SCR_UpdateScreen use a great deal less stack space, no longer an issue
553         //// we can't call SCR_BeginLoadingPlaque, because too much stack space has
554         //// been used.  The menu calls it before stuffing loadgame command
555 //      SCR_BeginLoadingPlaque ();
556
557         Con_Printf ("Loading game from %s...\n", name);
558         f = Qopen (name, "rz");
559         if (!f)
560         {
561                 Con_Printf ("ERROR: couldn't open.\n");
562                 return;
563         }
564
565         str = Qgetline (f);
566         sscanf (str, "%i\n", &version);
567         if (version != SAVEGAME_VERSION)
568         {
569                 Qclose (f);
570                 Con_Printf ("Savegame is version %i, not %i\n", version, SAVEGAME_VERSION);
571                 return;
572         }
573         str = Qgetline (f);
574         for (i=0 ; i<NUM_SPAWN_PARMS ; i++) {
575                 str = Qgetline (f);
576                 sscanf (str, "%f\n", &spawn_parms[i]);
577         }
578 // this silliness is so we can load 1.06 save files, which have float skill values
579         str = Qgetline (f);
580         sscanf (str, "%f\n", &tfloat);
581         current_skill = (int)(tfloat + 0.1);
582         Cvar_SetValue ("skill", (float)current_skill);
583
584         strcpy (mapname, Qgetline (f));
585
586         str = Qgetline (f);
587         sscanf (str, "%f\n",&time);
588
589         CL_Disconnect_f ();
590         
591         SV_SpawnServer (mapname);
592         if (!sv.active)
593         {
594                 Con_Printf ("Couldn't load map\n");
595                 return;
596         }
597         sv.paused = true;               // pause until all clients connect
598         sv.loadgame = true;
599
600 // load the light styles
601
602         for (i=0 ; i<MAX_LIGHTSTYLES ; i++)
603         {
604                 str = Qgetline (f);
605                 sv.lightstyles[i] = Hunk_AllocName (strlen(str)+1, "lightstyles");
606                 strcpy (sv.lightstyles[i], str);
607         }
608
609 // load the edicts out of the savegame file
610         entnum = -1;            // -1 is the globals
611         while (!Qeof(f))
612         {
613                 for (i=0 ; i<sizeof(buf)-1 ; i++)
614                 {
615                         r = Qgetc (f);
616                         if (r == EOF || !r)
617                                 break;
618                         buf[i] = r;
619                         if (r == '}')
620                         {
621                                 i++;
622                                 break;
623                         }
624                 }
625                 if (i == sizeof(buf)-1)
626                         Sys_Error ("Loadgame buffer overflow");
627                 buf[i] = 0;
628                 start = buf;
629                 start = COM_Parse(buf);
630                 if (!com_token[0])
631                         break;          // end of file
632                 if (strcmp(com_token,"{"))
633                         Sys_Error ("First token isn't a brace");
634                         
635                 if (entnum == -1)
636                 {       // parse the global vars
637                         ED_ParseGlobals (start);
638                 }
639                 else
640                 {       // parse an edict
641
642                         ent = EDICT_NUM(entnum);
643                         memset (&ent->v, 0, progs->entityfields * 4);
644                         ent->free = false;
645                         ED_ParseEdict (start, ent);
646         
647                 // link it into the bsp tree
648                         if (!ent->free)
649                                 SV_LinkEdict (ent, false);
650                 }
651
652                 entnum++;
653         }
654         
655         sv.num_edicts = entnum;
656         sv.time = time;
657
658         Qclose (f);
659
660         for (i=0 ; i<NUM_SPAWN_PARMS ; i++)
661                 svs.clients->spawn_parms[i] = spawn_parms[i];
662
663         if (cls.state != ca_dedicated)
664         {
665                 CL_EstablishConnection ("local");
666                 Host_Reconnect_f ();
667         }
668 }
669
670 //============================================================================
671
672 /*
673 ======================
674 Host_Name_f
675 ======================
676 */
677 void Host_Name_f (void)
678 {
679         char    *newName;
680
681         if (Cmd_Argc () == 1)
682         {
683                 Con_Printf ("\"name\" is \"%s\"\n", cl_name.string);
684                 return;
685         }
686         if (Cmd_Argc () == 2)
687                 newName = Cmd_Argv(1);  
688         else
689                 newName = Cmd_Args();
690         newName[15] = 0;
691
692         if (cmd_source == src_command)
693         {
694                 if (strcmp(cl_name.string, newName) == 0)
695                         return;
696                 Cvar_Set ("_cl_name", newName);
697                 if (cls.state == ca_connected)
698                         Cmd_ForwardToServer ();
699                 return;
700         }
701
702         if (host_client->name[0] && strcmp(host_client->name, "unconnected") )
703                 if (strcmp(host_client->name, newName) != 0)
704                         Con_Printf ("%s renamed to %s\n", host_client->name, newName);
705         strcpy (host_client->name, newName);
706         host_client->edict->v.netname = host_client->name - pr_strings;
707         
708 // send notification to all clients
709         
710         MSG_WriteByte (&sv.reliable_datagram, svc_updatename);
711         MSG_WriteByte (&sv.reliable_datagram, host_client - svs.clients);
712         MSG_WriteString (&sv.reliable_datagram, host_client->name);
713 }
714
715         
716 void Host_Version_f (void)
717 {
718         Con_Printf ("Version %4.2f (build %i)\n", VERSION, buildnumber);
719         Con_Printf ("Exe: "__TIME__" "__DATE__"\n");
720 }
721
722 void Host_Say(qboolean teamonly)
723 {
724         client_t *client;
725         client_t *save;
726         int             j;
727         char    *p;
728         // LordHavoc: 256 char say messages
729         unsigned char   text[256];
730         qboolean        fromServer = false;
731
732         if (cmd_source == src_command)
733         {
734                 if (cls.state == ca_dedicated)
735                 {
736                         fromServer = true;
737                         teamonly = false;
738                 }
739                 else
740                 {
741                         Cmd_ForwardToServer ();
742                         return;
743                 }
744         }
745
746         if (Cmd_Argc () < 2)
747                 return;
748
749         save = host_client;
750
751         p = Cmd_Args();
752 // remove quotes if present
753         if (*p == '"')
754         {
755                 p++;
756                 p[strlen(p)-1] = 0;
757         }
758
759 // turn on color set 1
760         if (!fromServer)
761                 sprintf (text, "%c%s: ", 1, save->name);
762         else
763                 sprintf (text, "%c<%s> ", 1, hostname.string);
764
765         j = sizeof(text) - 2 - strlen(text);  // -2 for /n and null terminator
766         if (strlen(p) > j)
767                 p[j] = 0;
768
769         strcat (text, p);
770         strcat (text, "\n");
771
772         for (j = 0, client = svs.clients; j < svs.maxclients; j++, client++)
773         {
774                 if (!client || !client->active || !client->spawned)
775                         continue;
776                 if (teamplay.value && teamonly && client->edict->v.team != save->edict->v.team)
777                         continue;
778                 host_client = client;
779                 SV_ClientPrintf("%s", text);
780         }
781         host_client = save;
782
783         Sys_Printf("%s", &text[1]);
784 }
785
786
787 void Host_Say_f(void)
788 {
789         Host_Say(false);
790 }
791
792
793 void Host_Say_Team_f(void)
794 {
795         Host_Say(true);
796 }
797
798
799 void Host_Tell_f(void)
800 {
801         client_t *client;
802         client_t *save;
803         int             j;
804         char    *p;
805         char    text[1024]; // LordHavoc: FIXME: temporary buffer overflow fix (was 64)
806
807         if (cmd_source == src_command)
808         {
809                 Cmd_ForwardToServer ();
810                 return;
811         }
812
813         if (Cmd_Argc () < 3)
814                 return;
815
816         strcpy(text, host_client->name);
817         strcat(text, ": ");
818
819         p = Cmd_Args();
820
821 // remove quotes if present
822         if (*p == '"')
823         {
824                 p++;
825                 p[strlen(p)-1] = 0;
826         }
827
828 // check length & truncate if necessary
829         j = sizeof(text) - 2 - strlen(text);  // -2 for /n and null terminator
830         if (strlen(p) > j)
831                 p[j] = 0;
832
833         strcat (text, p);
834         strcat (text, "\n");
835
836         save = host_client;
837         for (j = 0, client = svs.clients; j < svs.maxclients; j++, client++)
838         {
839                 if (!client->active || !client->spawned)
840                         continue;
841                 if (Q_strcasecmp(client->name, Cmd_Argv(1)))
842                         continue;
843                 host_client = client;
844                 SV_ClientPrintf("%s", text);
845                 break;
846         }
847         host_client = save;
848 }
849
850
851 /*
852 ==================
853 Host_Color_f
854 ==================
855 */
856 void Host_Color_f(void)
857 {
858         int             top, bottom;
859         int             playercolor;
860         dfunction_t *f;
861         func_t  SV_ChangeTeam;
862         
863         if (Cmd_Argc() == 1)
864         {
865                 Con_Printf ("\"color\" is \"%i %i\"\n", ((int)cl_color.value) >> 4, ((int)cl_color.value) & 0x0f);
866                 Con_Printf ("color <0-13> [0-13]\n");
867                 return;
868         }
869
870         if (Cmd_Argc() == 2)
871                 top = bottom = atoi(Cmd_Argv(1));
872         else
873         {
874                 top = atoi(Cmd_Argv(1));
875                 bottom = atoi(Cmd_Argv(2));
876         }
877         
878         top &= 15;
879         // LordHavoc: allow skin colormaps 14 and 15 (was 13)
880         if (top > 15)
881                 top = 15;
882         bottom &= 15;
883         // LordHavoc: allow skin colormaps 14 and 15 (was 13)
884         if (bottom > 15)
885                 bottom = 15;
886         
887         playercolor = top*16 + bottom;
888
889         if (cmd_source == src_command)
890         {
891                 Cvar_SetValue ("_cl_color", playercolor);
892                 if (cls.state == ca_connected)
893                         Cmd_ForwardToServer ();
894                 return;
895         }
896
897         // void(float color) SV_ChangeTeam;
898         if ((f = ED_FindFunction ("SV_ChangeTeam")) && (SV_ChangeTeam = (func_t)(f - pr_functions)))
899         {
900                 Con_DPrintf("Calling SV_ChangeTeam\n");
901                 pr_global_struct->time = sv.time;
902                 pr_globals[0] = playercolor;
903                 pr_global_struct->self = EDICT_TO_PROG(host_client->edict);
904                 PR_ExecuteProgram (SV_ChangeTeam, "");
905         }
906         else
907         {
908                 host_client->colors = playercolor;
909                 host_client->edict->v.team = bottom + 1;
910
911                 // send notification to all clients
912                 MSG_WriteByte (&sv.reliable_datagram, svc_updatecolors);
913                 MSG_WriteByte (&sv.reliable_datagram, host_client - svs.clients);
914                 MSG_WriteByte (&sv.reliable_datagram, host_client->colors);
915         }
916 }
917
918 /*
919 ==================
920 Host_Kill_f
921 ==================
922 */
923 void Host_Kill_f (void)
924 {
925         if (cmd_source == src_command)
926         {
927                 Cmd_ForwardToServer ();
928                 return;
929         }
930
931         if (sv_player->v.health <= 0)
932         {
933                 SV_ClientPrintf ("Can't suicide -- already dead!\n");
934                 return;
935         }
936         
937         pr_global_struct->time = sv.time;
938         pr_global_struct->self = EDICT_TO_PROG(sv_player);
939         PR_ExecuteProgram (pr_global_struct->ClientKill, "QC function ClientKill is missing");
940 }
941
942
943 /*
944 ==================
945 Host_Pause_f
946 ==================
947 */
948 void Host_Pause_f (void)
949 {
950         
951         if (cmd_source == src_command)
952         {
953                 Cmd_ForwardToServer ();
954                 return;
955         }
956         if (!pausable.value)
957                 SV_ClientPrintf ("Pause not allowed.\n");
958         else
959         {
960                 sv.paused ^= 1;
961
962                 if (sv.paused)
963                 {
964                         SV_BroadcastPrintf ("%s paused the game\n", pr_strings + sv_player->v.netname);
965                 }
966                 else
967                 {
968                         SV_BroadcastPrintf ("%s unpaused the game\n",pr_strings + sv_player->v.netname);
969                 }
970
971         // send notification to all clients
972                 MSG_WriteByte (&sv.reliable_datagram, svc_setpause);
973                 MSG_WriteByte (&sv.reliable_datagram, sv.paused);
974         }
975 }
976
977 //===========================================================================
978
979
980 /*
981 ==================
982 Host_PreSpawn_f
983 ==================
984 */
985 void Host_PreSpawn_f (void)
986 {
987         if (cmd_source == src_command)
988         {
989                 Con_Printf ("prespawn is not valid from the console\n");
990                 return;
991         }
992
993         if (host_client->spawned)
994         {
995                 Con_Printf ("prespawn not valid -- already spawned\n");
996                 return;
997         }
998         
999         SZ_Write (&host_client->message, sv.signon.data, sv.signon.cursize);
1000         MSG_WriteByte (&host_client->message, svc_signonnum);
1001         MSG_WriteByte (&host_client->message, 2);
1002         host_client->sendsignon = true;
1003 }
1004
1005 /*
1006 ==================
1007 Host_Spawn_f
1008 ==================
1009 */
1010 void Host_Spawn_f (void)
1011 {
1012         int             i;
1013         client_t        *client;
1014         edict_t *ent;
1015         func_t RestoreGame;
1016         dfunction_t *f;
1017
1018         if (cmd_source == src_command)
1019         {
1020                 Con_Printf ("spawn is not valid from the console\n");
1021                 return;
1022         }
1023
1024         if (host_client->spawned)
1025         {
1026                 Con_Printf ("Spawn not valid -- already spawned\n");
1027                 return;
1028         }
1029
1030         // LordHavoc: moved this above the QC calls at FrikaC's request
1031 // send all current names, colors, and frag counts
1032         SZ_Clear (&host_client->message);
1033
1034 // run the entrance script
1035         if (sv.loadgame)
1036         {       // loaded games are fully inited already
1037                 // if this is the last client to be connected, unpause
1038                 sv.paused = false;
1039
1040                 if ((f = ED_FindFunction ("RestoreGame")))
1041                 if ((RestoreGame = (func_t)(f - pr_functions)))
1042                 {
1043                         Con_DPrintf("Calling RestoreGame\n");
1044                         pr_global_struct->time = sv.time;
1045                         pr_global_struct->self = EDICT_TO_PROG(sv_player);
1046                         PR_ExecuteProgram (RestoreGame, "");
1047                 }
1048         }
1049         else
1050         {
1051                 eval_t *val;
1052                 // set up the edict
1053                 ent = host_client->edict;
1054
1055                 memset (&ent->v, 0, progs->entityfields * 4);
1056                 ent->v.colormap = NUM_FOR_EDICT(ent);
1057                 ent->v.team = (host_client->colors & 15) + 1;
1058                 ent->v.netname = host_client->name - pr_strings;
1059                 if ((val = GETEDICTFIELDVALUE(host_client->edict, eval_pmodel)))
1060                         val->_float = host_client->pmodel;
1061
1062                 // copy spawn parms out of the client_t
1063
1064                 for (i=0 ; i< NUM_SPAWN_PARMS ; i++)
1065                         (&pr_global_struct->parm1)[i] = host_client->spawn_parms[i];
1066
1067                 // call the spawn function
1068
1069                 pr_global_struct->time = sv.time;
1070                 pr_global_struct->self = EDICT_TO_PROG(sv_player);
1071                 PR_ExecuteProgram (pr_global_struct->ClientConnect, "QC function ClientConnect is missing");
1072
1073                 if ((Sys_DoubleTime() - host_client->netconnection->connecttime) <= sv.time)
1074                         Sys_Printf ("%s entered the game\n", host_client->name);
1075
1076                 PR_ExecuteProgram (pr_global_struct->PutClientInServer, "QC function PutClientInServer is missing");
1077         }
1078
1079
1080 // send time of update
1081         MSG_WriteByte (&host_client->message, svc_time);
1082         MSG_WriteFloat (&host_client->message, sv.time);
1083
1084         for (i=0, client = svs.clients ; i<svs.maxclients ; i++, client++)
1085         {
1086                 MSG_WriteByte (&host_client->message, svc_updatename);
1087                 MSG_WriteByte (&host_client->message, i);
1088                 MSG_WriteString (&host_client->message, client->name);
1089                 MSG_WriteByte (&host_client->message, svc_updatefrags);
1090                 MSG_WriteByte (&host_client->message, i);
1091                 MSG_WriteShort (&host_client->message, client->old_frags);
1092                 MSG_WriteByte (&host_client->message, svc_updatecolors);
1093                 MSG_WriteByte (&host_client->message, i);
1094                 MSG_WriteByte (&host_client->message, client->colors);
1095         }
1096         
1097 // send all current light styles
1098         for (i=0 ; i<MAX_LIGHTSTYLES ; i++)
1099         {
1100                 MSG_WriteByte (&host_client->message, svc_lightstyle);
1101                 MSG_WriteByte (&host_client->message, (char)i);
1102                 MSG_WriteString (&host_client->message, sv.lightstyles[i]);
1103         }
1104
1105 //
1106 // send some stats
1107 //
1108         MSG_WriteByte (&host_client->message, svc_updatestat);
1109         MSG_WriteByte (&host_client->message, STAT_TOTALSECRETS);
1110         MSG_WriteLong (&host_client->message, pr_global_struct->total_secrets);
1111
1112         MSG_WriteByte (&host_client->message, svc_updatestat);
1113         MSG_WriteByte (&host_client->message, STAT_TOTALMONSTERS);
1114         MSG_WriteLong (&host_client->message, pr_global_struct->total_monsters);
1115
1116         MSG_WriteByte (&host_client->message, svc_updatestat);
1117         MSG_WriteByte (&host_client->message, STAT_SECRETS);
1118         MSG_WriteLong (&host_client->message, pr_global_struct->found_secrets);
1119
1120         MSG_WriteByte (&host_client->message, svc_updatestat);
1121         MSG_WriteByte (&host_client->message, STAT_MONSTERS);
1122         MSG_WriteLong (&host_client->message, pr_global_struct->killed_monsters);
1123
1124 //
1125 // send a fixangle
1126 // Never send a roll angle, because savegames can catch the server
1127 // in a state where it is expecting the client to correct the angle
1128 // and it won't happen if the game was just loaded, so you wind up
1129 // with a permanent head tilt
1130         ent = EDICT_NUM( 1 + (host_client - svs.clients) );
1131         MSG_WriteByte (&host_client->message, svc_setangle);
1132         for (i=0 ; i < 2 ; i++)
1133                 MSG_WriteAngle (&host_client->message, ent->v.angles[i] );
1134         MSG_WriteAngle (&host_client->message, 0 );
1135
1136         SV_WriteClientdataToMessage (sv_player, &host_client->message);
1137
1138         MSG_WriteByte (&host_client->message, svc_signonnum);
1139         MSG_WriteByte (&host_client->message, 3);
1140         host_client->sendsignon = true;
1141 }
1142
1143 /*
1144 ==================
1145 Host_Begin_f
1146 ==================
1147 */
1148 void Host_Begin_f (void)
1149 {
1150         if (cmd_source == src_command)
1151         {
1152                 Con_Printf ("begin is not valid from the console\n");
1153                 return;
1154         }
1155
1156         host_client->spawned = true;
1157 }
1158
1159 //===========================================================================
1160
1161
1162 /*
1163 ==================
1164 Host_Kick_f
1165
1166 Kicks a user off of the server
1167 ==================
1168 */
1169 void Host_Kick_f (void)
1170 {
1171         char            *who;
1172         char            *message = NULL;
1173         client_t        *save;
1174         int                     i;
1175         qboolean        byNumber = false;
1176
1177         if (cmd_source == src_command)
1178         {
1179                 if (!sv.active)
1180                 {
1181                         Cmd_ForwardToServer ();
1182                         return;
1183                 }
1184         }
1185         else if (pr_global_struct->deathmatch)
1186                 return;
1187
1188         save = host_client;
1189
1190         if (Cmd_Argc() > 2 && strcmp(Cmd_Argv(1), "#") == 0)
1191         {
1192                 i = atof(Cmd_Argv(2)) - 1;
1193                 if (i < 0 || i >= svs.maxclients)
1194                         return;
1195                 if (!svs.clients[i].active)
1196                         return;
1197                 host_client = &svs.clients[i];
1198                 byNumber = true;
1199         }
1200         else
1201         {
1202                 for (i = 0, host_client = svs.clients; i < svs.maxclients; i++, host_client++)
1203                 {
1204                         if (!host_client->active)
1205                                 continue;
1206                         if (Q_strcasecmp(host_client->name, Cmd_Argv(1)) == 0)
1207                                 break;
1208                 }
1209         }
1210
1211         if (i < svs.maxclients)
1212         {
1213                 if (cmd_source == src_command)
1214                         if (cls.state == ca_dedicated)
1215                                 who = "Console";
1216                         else
1217                                 who = cl_name.string;
1218                 else
1219                         who = save->name;
1220
1221                 // can't kick yourself!
1222                 if (host_client == save)
1223                         return;
1224
1225                 if (Cmd_Argc() > 2)
1226                 {
1227                         message = COM_Parse(Cmd_Args());
1228                         if (byNumber)
1229                         {
1230                                 message++;                                                      // skip the #
1231                                 while (*message == ' ')                         // skip white space
1232                                         message++;
1233                                 message += strlen(Cmd_Argv(2)); // skip the number
1234                         }
1235                         while (*message && *message == ' ')
1236                                 message++;
1237                 }
1238                 if (message)
1239                         SV_ClientPrintf ("Kicked by %s: %s\n", who, message);
1240                 else
1241                         SV_ClientPrintf ("Kicked by %s\n", who);
1242                 SV_DropClient (false);
1243         }
1244
1245         host_client = save;
1246 }
1247
1248 /*
1249 ===============================================================================
1250
1251 DEBUGGING TOOLS
1252
1253 ===============================================================================
1254 */
1255
1256 /*
1257 ==================
1258 Host_Give_f
1259 ==================
1260 */
1261 void Host_Give_f (void)
1262 {
1263         char    *t;
1264         int             v;
1265         eval_t  *val;
1266
1267         if (cmd_source == src_command)
1268         {
1269                 Cmd_ForwardToServer ();
1270                 return;
1271         }
1272
1273         if (pr_global_struct->deathmatch)
1274                 return;
1275
1276         t = Cmd_Argv(1);
1277         v = atoi (Cmd_Argv(2));
1278         
1279         switch (t[0])
1280         {
1281    case '0':
1282    case '1':
1283    case '2':
1284    case '3':
1285    case '4':
1286    case '5':
1287    case '6':
1288    case '7':
1289    case '8':
1290    case '9':
1291       // MED 01/04/97 added hipnotic give stuff
1292       if (hipnotic)
1293       {
1294          if (t[0] == '6')
1295          {
1296             if (t[1] == 'a')
1297                sv_player->v.items = (int)sv_player->v.items | HIT_PROXIMITY_GUN;
1298             else
1299                sv_player->v.items = (int)sv_player->v.items | IT_GRENADE_LAUNCHER;
1300          }
1301          else if (t[0] == '9')
1302             sv_player->v.items = (int)sv_player->v.items | HIT_LASER_CANNON;
1303          else if (t[0] == '0')
1304             sv_player->v.items = (int)sv_player->v.items | HIT_MJOLNIR;
1305          else if (t[0] >= '2')
1306             sv_player->v.items = (int)sv_player->v.items | (IT_SHOTGUN << (t[0] - '2'));
1307       }
1308       else
1309       {
1310          if (t[0] >= '2')
1311             sv_player->v.items = (int)sv_player->v.items | (IT_SHOTGUN << (t[0] - '2'));
1312       }
1313                 break;
1314         
1315     case 's':
1316                 if (rogue)
1317                 {
1318                     if ((val = GETEDICTFIELDVALUE(sv_player, eval_ammo_shells1)))
1319                             val->_float = v;
1320                 }
1321
1322         sv_player->v.ammo_shells = v;
1323         break;          
1324     case 'n':
1325                 if (rogue)
1326                 {
1327                     if ((val = GETEDICTFIELDVALUE(sv_player, eval_ammo_nails1)))
1328                         {
1329                             val->_float = v;
1330                                 if (sv_player->v.weapon <= IT_LIGHTNING)
1331                                         sv_player->v.ammo_nails = v;
1332                         }
1333                 }
1334                 else
1335                 {
1336                         sv_player->v.ammo_nails = v;
1337                 }
1338         break;          
1339     case 'l':
1340                 if (rogue)
1341                 {
1342                         val = GETEDICTFIELDVALUE(sv_player, eval_ammo_lava_nails);
1343                         if (val)
1344                         {
1345                                 val->_float = v;
1346                                 if (sv_player->v.weapon > IT_LIGHTNING)
1347                                         sv_player->v.ammo_nails = v;
1348                         }
1349                 }
1350         break;
1351     case 'r':
1352                 if (rogue)
1353                 {
1354                         val = GETEDICTFIELDVALUE(sv_player, eval_ammo_rockets1);
1355                         if (val)
1356                         {
1357                                 val->_float = v;
1358                                 if (sv_player->v.weapon <= IT_LIGHTNING)
1359                                         sv_player->v.ammo_rockets = v;
1360                         }
1361                 }
1362                 else
1363                 {
1364                         sv_player->v.ammo_rockets = v;
1365                 }
1366         break;          
1367     case 'm':
1368                 if (rogue)
1369                 {
1370                         val = GETEDICTFIELDVALUE(sv_player, eval_ammo_multi_rockets);
1371                         if (val)
1372                         {
1373                                 val->_float = v;
1374                                 if (sv_player->v.weapon > IT_LIGHTNING)
1375                                         sv_player->v.ammo_rockets = v;
1376                         }
1377                 }
1378         break;          
1379     case 'h':
1380         sv_player->v.health = v;
1381         break;          
1382     case 'c':
1383                 if (rogue)
1384                 {
1385                         val = GETEDICTFIELDVALUE(sv_player, eval_ammo_cells1);
1386                         if (val)
1387                         {
1388                                 val->_float = v;
1389                                 if (sv_player->v.weapon <= IT_LIGHTNING)
1390                                         sv_player->v.ammo_cells = v;
1391                         }
1392                 }
1393                 else
1394                 {
1395                         sv_player->v.ammo_cells = v;
1396                 }
1397         break;          
1398     case 'p':
1399                 if (rogue)
1400                 {
1401                         val = GETEDICTFIELDVALUE(sv_player, eval_ammo_plasma);
1402                         if (val)
1403                         {
1404                                 val->_float = v;
1405                                 if (sv_player->v.weapon > IT_LIGHTNING)
1406                                         sv_player->v.ammo_cells = v;
1407                         }
1408                 }
1409         break;          
1410     }
1411 }
1412
1413 edict_t *FindViewthing (void)
1414 {
1415         int             i;
1416         edict_t *e;
1417         
1418         for (i=0 ; i<sv.num_edicts ; i++)
1419         {
1420                 e = EDICT_NUM(i);
1421                 if ( !strcmp (pr_strings + e->v.classname, "viewthing") )
1422                         return e;
1423         }
1424         Con_Printf ("No viewthing on map\n");
1425         return NULL;
1426 }
1427
1428 /*
1429 ==================
1430 Host_Viewmodel_f
1431 ==================
1432 */
1433 void Host_Viewmodel_f (void)
1434 {
1435         edict_t *e;
1436         model_t *m;
1437
1438         e = FindViewthing ();
1439         if (!e)
1440                 return;
1441
1442         m = Mod_ForName (Cmd_Argv(1), false);
1443         if (!m)
1444         {
1445                 Con_Printf ("Can't load %s\n", Cmd_Argv(1));
1446                 return;
1447         }
1448         
1449         e->v.frame = 0;
1450         cl.model_precache[(int)e->v.modelindex] = m;
1451 }
1452
1453 /*
1454 ==================
1455 Host_Viewframe_f
1456 ==================
1457 */
1458 void Host_Viewframe_f (void)
1459 {
1460         edict_t *e;
1461         int             f;
1462         model_t *m;
1463
1464         e = FindViewthing ();
1465         if (!e)
1466                 return;
1467         m = cl.model_precache[(int)e->v.modelindex];
1468
1469         f = atoi(Cmd_Argv(1));
1470         if (f >= m->numframes)
1471                 f = m->numframes-1;
1472
1473         e->v.frame = f;         
1474 }
1475
1476
1477 void PrintFrameName (model_t *m, int frame)
1478 {
1479         int data;
1480         data = (int) Mod_Extradata(m);
1481         if (m->ofs_scenes && data)
1482                 Con_Printf("frame %i: %s\n", frame, ((animscene_t *) (m->ofs_scenes + data))[frame].name);
1483         else
1484                 Con_Printf("frame %i\n", frame);
1485 }
1486
1487 /*
1488 ==================
1489 Host_Viewnext_f
1490 ==================
1491 */
1492 void Host_Viewnext_f (void)
1493 {
1494         edict_t *e;
1495         model_t *m;
1496         
1497         e = FindViewthing ();
1498         if (!e)
1499                 return;
1500         m = cl.model_precache[(int)e->v.modelindex];
1501
1502         e->v.frame = e->v.frame + 1;
1503         if (e->v.frame >= m->numframes)
1504                 e->v.frame = m->numframes - 1;
1505
1506         PrintFrameName (m, e->v.frame);         
1507 }
1508
1509 /*
1510 ==================
1511 Host_Viewprev_f
1512 ==================
1513 */
1514 void Host_Viewprev_f (void)
1515 {
1516         edict_t *e;
1517         model_t *m;
1518
1519         e = FindViewthing ();
1520         if (!e)
1521                 return;
1522
1523         m = cl.model_precache[(int)e->v.modelindex];
1524
1525         e->v.frame = e->v.frame - 1;
1526         if (e->v.frame < 0)
1527                 e->v.frame = 0;
1528
1529         PrintFrameName (m, e->v.frame);         
1530 }
1531
1532 /*
1533 ===============================================================================
1534
1535 DEMO LOOP CONTROL
1536
1537 ===============================================================================
1538 */
1539
1540
1541 /*
1542 ==================
1543 Host_Startdemos_f
1544 ==================
1545 */
1546 void Host_Startdemos_f (void)
1547 {
1548         int             i, c;
1549
1550         if (cls.state == ca_dedicated)
1551         {
1552                 if (!sv.active)
1553                         Cbuf_AddText ("map start\n");
1554                 return;
1555         }
1556
1557         c = Cmd_Argc() - 1;
1558         if (c > MAX_DEMOS)
1559         {
1560                 Con_Printf ("Max %i demos in demoloop\n", MAX_DEMOS);
1561                 c = MAX_DEMOS;
1562         }
1563         Con_Printf ("%i demo(s) in loop\n", c);
1564
1565         for (i=1 ; i<c+1 ; i++)
1566                 strncpy (cls.demos[i-1], Cmd_Argv(i), sizeof(cls.demos[0])-1);
1567
1568         if (!sv.active && cls.demonum != -1 && !cls.demoplayback)
1569         {
1570                 cls.demonum = 0;
1571                 CL_NextDemo ();
1572         }
1573         else
1574                 cls.demonum = -1;
1575 }
1576
1577
1578 /*
1579 ==================
1580 Host_Demos_f
1581
1582 Return to looping demos
1583 ==================
1584 */
1585 void Host_Demos_f (void)
1586 {
1587         if (cls.state == ca_dedicated)
1588                 return;
1589         if (cls.demonum == -1)
1590                 cls.demonum = 1;
1591         CL_Disconnect_f ();
1592         CL_NextDemo ();
1593 }
1594
1595 /*
1596 ==================
1597 Host_Stopdemo_f
1598
1599 Return to looping demos
1600 ==================
1601 */
1602 void Host_Stopdemo_f (void)
1603 {
1604         if (cls.state == ca_dedicated)
1605                 return;
1606         if (!cls.demoplayback)
1607                 return;
1608         CL_StopPlayback ();
1609         CL_Disconnect ();
1610 }
1611
1612 //=============================================================================
1613
1614 /*
1615 ==================
1616 Host_InitCommands
1617 ==================
1618 */
1619 void Host_InitCommands (void)
1620 {
1621         Cmd_AddCommand ("status", Host_Status_f);
1622         Cmd_AddCommand ("quit", Host_Quit_f);
1623         if (nehahra)
1624         {
1625                 Cmd_AddCommand ("max", Host_God_f);
1626                 Cmd_AddCommand ("monster", Host_Notarget_f);
1627                 Cmd_AddCommand ("scrag", Host_Fly_f);
1628                 Cmd_AddCommand ("wraith", Host_Noclip_f);
1629                 Cmd_AddCommand ("gimme", Host_Give_f);
1630         }
1631         else
1632         {
1633                 Cmd_AddCommand ("god", Host_God_f);
1634                 Cmd_AddCommand ("notarget", Host_Notarget_f);
1635                 Cmd_AddCommand ("fly", Host_Fly_f);
1636                 Cmd_AddCommand ("noclip", Host_Noclip_f);
1637                 Cmd_AddCommand ("give", Host_Give_f);
1638         }
1639         Cmd_AddCommand ("map", Host_Map_f);
1640         Cmd_AddCommand ("restart", Host_Restart_f);
1641         Cmd_AddCommand ("changelevel", Host_Changelevel_f);
1642         Cmd_AddCommand ("connect", Host_Connect_f);
1643         Cmd_AddCommand ("reconnect", Host_Reconnect_f);
1644         Cmd_AddCommand ("name", Host_Name_f);
1645         Cmd_AddCommand ("version", Host_Version_f);
1646         Cmd_AddCommand ("say", Host_Say_f);
1647         Cmd_AddCommand ("say_team", Host_Say_Team_f);
1648         Cmd_AddCommand ("tell", Host_Tell_f);
1649         Cmd_AddCommand ("color", Host_Color_f);
1650         Cmd_AddCommand ("kill", Host_Kill_f);
1651         Cmd_AddCommand ("pause", Host_Pause_f);
1652         Cmd_AddCommand ("spawn", Host_Spawn_f);
1653         Cmd_AddCommand ("begin", Host_Begin_f);
1654         Cmd_AddCommand ("prespawn", Host_PreSpawn_f);
1655         Cmd_AddCommand ("kick", Host_Kick_f);
1656         Cmd_AddCommand ("ping", Host_Ping_f);
1657         Cmd_AddCommand ("load", Host_Loadgame_f);
1658         Cmd_AddCommand ("save", Host_Savegame_f);
1659
1660         Cmd_AddCommand ("startdemos", Host_Startdemos_f);
1661         Cmd_AddCommand ("demos", Host_Demos_f);
1662         Cmd_AddCommand ("stopdemo", Host_Stopdemo_f);
1663
1664         Cmd_AddCommand ("viewmodel", Host_Viewmodel_f);
1665         Cmd_AddCommand ("viewframe", Host_Viewframe_f);
1666         Cmd_AddCommand ("viewnext", Host_Viewnext_f);
1667         Cmd_AddCommand ("viewprev", Host_Viewprev_f);
1668
1669         Cmd_AddCommand ("mcache", Mod_Print);
1670 }