1 string GotoMap(string m);
2 void race_deleteTime(string map, float pos);
4 float FullTraceFraction(vector a, vector mi, vector ma, vector b)
17 while(vlen(c - b) > 1)
21 tracebox(c, mi, ma, b, MOVE_WORLDONLY, world);
26 black += vlen(trace_endpos - c);
30 n += tracebox_inverted(c, mi, ma, b, MOVE_WORLDONLY, world);
32 white += vlen(trace_endpos - c);
37 dprint("HOLY SHIT! FullTraceFraction: ", ftos(n), " total traces, ", ftos(m), " iterations\n");
39 return white / (black + white);
42 float RadarMapAtPoint_Trace(float x, float y, float w, float h, float zmin, float zsize, float q)
47 ma = '1 0 0' * w + '0 1 0' * h;
48 a = '1 0 0' * x + '0 1 0' * y + '0 0 1' * zmin;
49 b = '1 0 0' * x + '0 1 0' * y + '0 0 1' * (zsize + zmin);
51 return FullTraceFraction(a, mi, ma, b);
53 float RadarMapAtPoint_LineBlock(float x, float y, float w, float h, float zmin, float zsize, float q)
60 // 256q-1 is the ideal sample count to map equal amount of sample values to one pixel value
63 dz = (zsize / q) * '0 0 1';
64 ma = '1 0 0' * w + '0 1 0' * h + dz;
65 o = '1 0 0' * x + '0 1 0' * y + '0 0 1' * zmin;
67 if(x < world.absmin_x - w)
69 if(y < world.absmin_y - h)
71 if(x > world.absmax_x)
73 if(y > world.absmax_y)
77 for(i = 0; i < q; ++i)
80 v1 = v2 = o + dz * i + mi;
81 v1_x += random() * (ma_x - mi_x);
82 v1_y += random() * (ma_y - mi_y);
83 v1_z += random() * (ma_z - mi_z);
84 v2_x += random() * (ma_x - mi_x);
85 v2_y += random() * (ma_y - mi_y);
86 v2_z += random() * (ma_z - mi_z);
87 traceline(v1, v2, MOVE_WORLDONLY, world);
88 if(trace_startsolid || trace_fraction < 1)
93 float RadarMapAtPoint_Block(float x, float y, float w, float h, float zmin, float zsize, float q)
100 // 256q-1 is the ideal sample count to map equal amount of sample values to one pixel value
103 dz = (zsize / q) * '0 0 1';
104 ma = '1 0 0' * w + '0 1 0' * h + dz;
105 o = '1 0 0' * x + '0 1 0' * y + '0 0 1' * zmin;
107 if(x < world.absmin_x - w)
109 if(y < world.absmin_y - h)
111 if(x > world.absmax_x)
113 if(y > world.absmax_y)
117 for(i = 0; i < q; ++i)
119 tracebox(o + dz * i, mi, ma, o + dz * i, MOVE_WORLDONLY, world);
125 float RadarMapAtPoint_Sample(float x, float y, float w, float h, float zmin, float zsize, float q)
129 q *= 4; // choose q so it matches the regular algorithm in speed
132 // 256q-1 is the ideal sample count to map equal amount of sample values to one pixel value
135 ma = '1 0 0' * w + '0 1 0' * h;
136 a = '1 0 0' * x + '0 1 0' * y + '0 0 1' * zmin;
137 b = '1 0 0' * w + '0 1 0' * h + '0 0 1' * zsize;
142 for(i = 0; i < q; ++i)
145 v_x = a_x + random() * b_x;
146 v_y = a_y + random() * b_y;
147 v_z = a_z + random() * b_z;
148 traceline(v, v, MOVE_WORLDONLY, world);
156 // FF is contained twice, to map 256 to FF too
157 // removes the need to bound()
158 string doublehex = "000102030405060708090A0B0C0D0E0F101112131415161718191A1B1C1D1E1F202122232425262728292A2B2C2D2E2F303132333435363738393A3B3C3D3E3F404142434445464748494A4B4C4D4E4F505152535455565758595A5B5C5D5E5F606162636465666768696A6B6C6D6E6F707172737475767778797A7B7C7D7E7F808182838485868788898A8B8C8D8E8F909192939495969798999A9B9C9D9E9FA0A1A2A3A4A5A6A7A8A9AAABACADAEAFB0B1B2B3B4B5B6B7B8B9BABBBCBDBEBFC0C1C2C3C4C5C6C7C8C9CACBCCCDCECFD0D1D2D3D4D5D6D7D8D9DADBDCDDDEDFE0E1E2E3E4E5E6E7E8E9EAEBECEDEEEFF0F1F2F3F4F5F6F7F8F9FAFBFCFDFEFFFF";
160 float RADAR_WIDTH_MAX = 512;
161 float RADAR_HEIGHT_MAX = 512;
162 float sharpen_buffer[RADAR_WIDTH_MAX * 3];
164 void sharpen_set(float x, float v)
166 sharpen_buffer[x + 2 * RADAR_WIDTH_MAX] = v;
169 float sharpen_getpixel(float x, float y)
173 if(x >= RADAR_WIDTH_MAX)
179 return sharpen_buffer[x + y * RADAR_WIDTH_MAX];
182 float sharpen_get(float x, float a)
185 sum = sharpen_getpixel(x, 1);
189 sum -= sharpen_getpixel(x - 1, 0);
190 sum -= sharpen_getpixel(x - 1, 1);
191 sum -= sharpen_getpixel(x - 1, 2);
192 sum -= sharpen_getpixel(x + 1, 0);
193 sum -= sharpen_getpixel(x + 1, 1);
194 sum -= sharpen_getpixel(x + 1, 2);
195 sum -= sharpen_getpixel(x, 0);
196 sum -= sharpen_getpixel(x, 2);
197 return bound(0, sum * a, 1);
200 void sharpen_shift(float w)
203 for(i = 0; i < w; ++i)
205 sharpen_buffer[i] = sharpen_buffer[i + RADAR_WIDTH_MAX];
206 sharpen_buffer[i + RADAR_WIDTH_MAX] = sharpen_buffer[i + 2 * RADAR_WIDTH_MAX];
207 sharpen_buffer[i + 2 * RADAR_WIDTH_MAX] = 0;
211 void sharpen_init(float w)
214 for(i = 0; i < w; ++i)
216 sharpen_buffer[i] = 0;
217 sharpen_buffer[i + RADAR_WIDTH_MAX] = 0;
218 sharpen_buffer[i + 2 * RADAR_WIDTH_MAX] = 0;
225 if(radarmapper.count & 4)
229 else if(radarmapper.count & 2)
231 localcmd(strcat("defer 1 \"sv_cmd radarmap --flags ", ftos(radarmapper.count), strcat(" --res ", ftos(radarmapper.size_x), " ", ftos(radarmapper.size_y), " --sharpen ", ftos(radarmapper.ltime), " --qual ", ftos(radarmapper.size_z)), "\"\n"));
240 // size: pixel width/height
241 // maxs: cell width/height
243 void RadarMap_Think()
251 get_mi_min_max_texcoords(1);
252 self.mins = mi_picmin;
253 self.maxs_x = (mi_picmax_x - mi_picmin_x) / self.size_x;
254 self.maxs_y = (mi_picmax_y - mi_picmin_y) / self.size_y;
255 self.maxs_z = mi_max_z - mi_min_z;
256 print("Picture mins/maxs: ", ftos(self.maxs_x), " and ", ftos(self.maxs_y), " should match\n");
257 self.netname = strzone(strcat("gfx/", mi_shortname, "_radar.xpm"));
258 if(!(self.count & 1))
260 self.cnt = fopen(self.netname, FILE_READ);
262 self.cnt = fopen(strcat("gfx/", mi_shortname, "_radar.tga"), FILE_READ);
264 self.cnt = fopen(strcat("gfx/", mi_shortname, "_radar.png"), FILE_READ);
266 self.cnt = fopen(strcat("gfx/", mi_shortname, "_radar.jpg"), FILE_READ);
268 self.cnt = fopen(strcat("gfx/", mi_shortname, "_mini.tga"), FILE_READ);
270 self.cnt = fopen(strcat("gfx/", mi_shortname, "_mini.png"), FILE_READ);
272 self.cnt = fopen(strcat("gfx/", mi_shortname, "_mini.jpg"), FILE_READ);
277 print(self.netname, " already exists, aborting (you may want to specify --force)\n");
282 self.cnt = fopen(self.netname, FILE_WRITE);
285 print("Error writing ", self.netname, "\n");
290 print("Writing to ", self.netname, "...\n");
291 fputs(self.cnt, "/* XPM */\n");
292 fputs(self.cnt, "static char *RadarMap[] = {\n");
293 fputs(self.cnt, "/* columns rows colors chars-per-pixel */\n");
294 fputs(self.cnt, strcat("\"", ftos(self.size_x), " ", ftos(self.size_y), " 256 2\",\n"));
295 for(i = 0; i < 256; ++i)
297 si = substring(doublehex, i*2, 2);
298 fputs(self.cnt, strcat("\"", si, " c #", si, si, si, "\",\n"));
301 self.nextthink = time;
302 sharpen_init(self.size_x);
304 else if(self.frame <= self.size_y)
306 // fill the sharpen buffer with this line
307 sharpen_shift(self.size_x);
314 for(x = 0; x < self.size_x; ++x)
316 l = RadarMapAtPoint_Block(self.mins_x + x * self.maxs_x, self.mins_y + (self.size_y - self.frame) * self.maxs_y, self.maxs_x, self.maxs_y, self.mins_z, self.maxs_z, self.size_z);
321 for(x = 0; x < self.size_x; ++x)
323 l = RadarMapAtPoint_Trace(self.mins_x + x * self.maxs_x, self.mins_y + (self.size_y - self.frame) * self.maxs_y, self.maxs_x, self.maxs_y, self.mins_z, self.maxs_z, self.size_z);
328 for(x = 0; x < self.size_x; ++x)
330 l = RadarMapAtPoint_Sample(self.mins_x + x * self.maxs_x, self.mins_y + (self.size_y - self.frame) * self.maxs_y, self.maxs_x, self.maxs_y, self.mins_z, self.maxs_z, self.size_z);
335 for(x = 0; x < self.size_x; ++x)
337 l = RadarMapAtPoint_LineBlock(self.mins_x + x * self.maxs_x, self.mins_y + (self.size_y - self.frame) * self.maxs_y, self.maxs_x, self.maxs_y, self.mins_z, self.maxs_z, self.size_z);
343 // do we have enough lines?
346 // write a pixel line
347 fputs(self.cnt, "\"");
348 for(x = 0; x < self.size_x; ++x)
350 l = sharpen_get(x, self.ltime);
351 fputs(self.cnt, substring(doublehex, 2 * floor(l * 256.0), 2));
353 if(self.frame == self.size_y)
354 fputs(self.cnt, "\"\n");
357 fputs(self.cnt, "\",\n");
358 print(ftos(self.size_y - self.frame), " lines left\n");
362 // is this the last line? then write back the missing line
363 if(self.frame == self.size_y)
365 sharpen_shift(self.size_x);
366 // write a pixel line
367 fputs(self.cnt, "\"");
368 for(x = 0; x < self.size_x; ++x)
370 l = sharpen_get(x, self.ltime);
371 fputs(self.cnt, substring(doublehex, 2 * floor(l * 256.0), 2));
373 if(self.frame == self.size_y)
374 fputs(self.cnt, "\"\n");
377 fputs(self.cnt, "\",\n");
378 print(ftos(self.size_y - self.frame), " lines left\n");
383 self.nextthink = time;
388 fputs(self.cnt, "};\n");
390 print("Finished. Please edit data/", self.netname, " with an image editing application and place it in the TGA format in the gfx folder.\n");
395 void RadarMap(float argc)
400 radarmapper = spawn();
401 radarmapper.classname = "radarmapper";
402 radarmapper.think = RadarMap_Think;
403 radarmapper.nextthink = time;
404 radarmapper.count = 8; // default to the --trace method, as it is faster now
405 radarmapper.ltime = 1;
406 radarmapper.size_x = 512;
407 radarmapper.size_y = 512;
408 radarmapper.size_z = 1;
410 for(i = 1; i < argc; ++i)
412 if(argv(i) == "--force")
413 radarmapper.count |= 1;
414 else if(argv(i) == "--loop")
415 radarmapper.count |= 2;
416 else if(argv(i) == "--quit")
417 radarmapper.count |= 4;
418 else if(argv(i) == "--block")
420 radarmapper.count &~= 24;
422 else if(argv(i) == "--trace")
424 radarmapper.count &~= 24;
425 radarmapper.count |= 8;
427 else if(argv(i) == "--sample")
429 radarmapper.count &~= 24;
430 radarmapper.count |= 16;
432 else if(argv(i) == "--lineblock")
434 radarmapper.count |= 24;
436 else if(argv(i) == "--flags") // for the recursive call
439 radarmapper.count = stof(argv(i));
441 else if(argv(i) == "--sharpen") // for the recursive call
444 radarmapper.ltime = stof(argv(i));
446 else if(argv(i) == "--res") // resolution
449 radarmapper.size_x = stof(argv(i));
451 radarmapper.size_y = stof(argv(i));
453 else if(argv(i) == "--qual") // quality multiplier
456 radarmapper.size_z = stof(argv(i));
462 print("Usage: sv_cmd radarmap [--force] [--loop] [--quit] [--block | --trace | --sample | --lineblock] [--sharpen N] [--res W H] [--qual Q]\n");
463 print("The quality factor Q is roughly proportional to the time taken.\n");
464 print("--trace supports no quality factor; its result should look like --block with infinite quality factor.\n");
470 print("Radarmap entity spawned.\n");
473 void make_mapinfo_Think()
475 if(MapInfo_FilterGametype(MAPINFO_TYPE_ALL, 0, 0, 0, 1))
477 print("Done rebuiling mapinfos.\n");
478 MapInfo_FilterGametype(MapInfo_CurrentGametype(), MapInfo_CurrentFeatures(), MapInfo_RequiredFlags(), MapInfo_ForbiddenFlags(), 0);
483 self.think = make_mapinfo_Think;
484 self.nextthink = time;
488 void changematchtime(float delta, float mi, float ma)
496 if(autocvar_timelimit < 0)
500 mi = 10; // at least ten sec in the future
501 cur = time - game_starttime;
503 mi += cur; // from current time!
505 lim = autocvar_timelimit * 60;
510 return; // cannot increase any further
512 new = min(ma, lim + delta);
513 else // already above maximum: FAIL
518 if(lim == 0) // infinite: try reducing to max, if we are allowed to
520 else if(lim > mi) // above minimum: decrease
521 new = max(mi, lim + delta);
522 else // already below minimum: FAIL
526 cvar_set("timelimit", ftos(new / 60));
529 float g_clientmodel_genericsendentity (entity to, float sf);
530 void modelbug_make_svqc();
531 void modelbug_make_csqc()
533 Net_LinkEntity(self, TRUE, 0, g_clientmodel_genericsendentity);
534 self.think = modelbug_make_svqc;
535 self.nextthink = time + 1;
536 setorigin(self, self.origin - '0 0 8');
538 void modelbug_make_svqc()
540 self.SendEntity = func_null;
541 self.think = modelbug_make_csqc;
542 self.nextthink = time + 1;
543 setorigin(self, self.origin + '0 0 8');
550 setorigin(e, nextent(world).origin);
551 precache_model("models_portal.md3");
552 setmodel(e, "models/portal.md3");
553 e.think = modelbug_make_svqc;
554 e.nextthink = time + 1;
557 // ===================
559 // ===================
560 #define GC_REQUEST_HELP 1
561 #define GC_REQUEST_COMMAND 2
562 #define GC_REQUEST_USAGE 3
564 void GameCommand_adminmsg(float request, string command)
567 float argc = tokenize_console(command);
568 float entno = stof(argv(1));
574 case GC_REQUEST_HELP:
575 print(" ^2adminmsg^7: Send an admin message to a client directly\n");
578 case GC_REQUEST_COMMAND:
579 if(argc >= 3 && argc <= 4) {
580 if((entno < 0) | (entno > maxclients)) {
581 print("Player ", argv(1), " doesn't exist\n");
585 for(i = (entno ? entno : 1); i <= (entno ? entno : maxclients); ++i)
587 client = edict_num(i);
588 if(client.flags & FL_CLIENT)
593 s = strreplace("\n", "", s);
594 s = strreplace("\\", "\\\\", s);
595 s = strreplace("$", "$$", s);
596 s = strreplace("\"", "\\\"", s);
597 stuffcmd(client, sprintf("\ninfobar %f \"%s\"\n", stof(argv(3)), s));
601 centerprint_atprio(client, CENTERPRIO_ADMIN, strcat("^3", admin_name(), ":\n\n^7", argv(2)));
602 sprint(client, strcat("\{1}\{13}^3", admin_name(), "^7: ", argv(2), "\n"));
604 dprint("Message sent to ", client.netname, "\n");
608 if(!n) { print("Client not found\n"); }
613 print("Incorrect parameters for \"adminmsg\"\n");
614 case GC_REQUEST_USAGE:
615 print("\nUsage:^3 sv_cmd adminmsg clientnumber \"message\" [infobartime]\n");
616 print(" If infobartime is provided, the message will be sent to infobar.\n");
617 print(" Otherwise, it will just be sent as a centerprint message.\n");
618 print("Examples: adminmsg 4 \"this message will last for ten seconds\" 10\n");
619 print(" adminmsg 2 \"this message will be a centerprint\"\n");
624 void GameCommand_allready(float request)
628 case GC_REQUEST_HELP:
629 print(" ^2allready^7: Restart the server and reset the players\n");
632 case GC_REQUEST_COMMAND:
637 case GC_REQUEST_USAGE:
638 print("\nUsage:^3 sv_cmd allready\n");
639 print(" No arguments required.\n");
644 void GameCommand_allspec(float request) // todo: Add ability to provide a reason string
650 case GC_REQUEST_HELP:
651 print(" ^2allspec^7: Force all players to spectate\n");
654 case GC_REQUEST_COMMAND:
655 FOR_EACH_PLAYER(client)
657 PutObserverInServer();
660 if(i) { bprint(strcat("Successfully forced all players to spectate (", ftos(i), ")\n")); } // should a message be added if no players were found?
664 case GC_REQUEST_USAGE:
665 print("\nUsage:^3 sv_cmd allspec\n");
666 print(" No arguments required.\n");
667 print(" See also: ^2^7\n"); // FIXME: movetoteam when done will go here
672 void GameCommand_anticheat(float request, string command) // FIXME: player entity is never found
675 float argc = tokenize_console(command);
676 float entno = stof(argv(1));
680 case GC_REQUEST_HELP:
681 print(" ^2anticheat^7: Create an anticheat report for a client\n");
684 case GC_REQUEST_COMMAND:
685 if((entno < 1) | (entno > maxclients)) {
686 print("Player ", argv(1), " doesn't exist\n");
689 client = edict_num(entno);
690 if(clienttype(client) != CLIENTTYPE_REAL && clienttype(client) != CLIENTTYPE_BOT) {
691 print("Player ", client.netname, " is not active\n");
699 print("Incorrect parameters for \"anticheat\"\n");
700 case GC_REQUEST_USAGE:
701 print("\nUsage:^3 sv_cmd anticheat clientnumber\n");
702 print(" where clientnumber is player entity number.\n");
707 void GameCommand_bbox(float request)
711 case GC_REQUEST_HELP:
712 print(" ^2bbox^7: Print detailed information about world size\n");
715 case GC_REQUEST_COMMAND:
716 print("Original size: ", ftos(world.absmin_x), " ", ftos(world.absmin_y), " ", ftos(world.absmin_z));
717 print(" ", ftos(world.absmax_x), " ", ftos(world.absmax_y), " ", ftos(world.absmax_z), "\n");
718 print("Currently set size: ", ftos(world.mins_x), " ", ftos(world.mins_y), " ", ftos(world.mins_z));
719 print(" ", ftos(world.maxs_x), " ", ftos(world.maxs_y), " ", ftos(world.maxs_z), "\n");
720 print("Solid bounding box size:");
722 tracebox('1 0 0' * world.absmin_x,
723 '0 1 0' * world.absmin_y + '0 0 1' * world.absmin_z,
724 '0 1 0' * world.absmax_y + '0 0 1' * world.absmax_z,
725 '1 0 0' * world.absmax_x,
729 print(" ", ftos(world.absmin_x));
731 print(" ", ftos(trace_endpos_x));
733 tracebox('0 1 0' * world.absmin_y,
734 '1 0 0' * world.absmin_x + '0 0 1' * world.absmin_z,
735 '1 0 0' * world.absmax_x + '0 0 1' * world.absmax_z,
736 '0 1 0' * world.absmax_y,
740 print(" ", ftos(world.absmin_y));
742 print(" ", ftos(trace_endpos_y));
744 tracebox('0 0 1' * world.absmin_z,
745 '1 0 0' * world.absmin_x + '0 1 0' * world.absmin_y,
746 '1 0 0' * world.absmax_x + '0 1 0' * world.absmax_y,
747 '0 0 1' * world.absmax_z,
751 print(" ", ftos(world.absmin_z));
753 print(" ", ftos(trace_endpos_z));
755 tracebox('1 0 0' * world.absmax_x,
756 '0 1 0' * world.absmin_y + '0 0 1' * world.absmin_z,
757 '0 1 0' * world.absmax_y + '0 0 1' * world.absmax_z,
758 '1 0 0' * world.absmin_x,
762 print(" ", ftos(world.absmax_x));
764 print(" ", ftos(trace_endpos_x));
766 tracebox('0 1 0' * world.absmax_y,
767 '1 0 0' * world.absmin_x + '0 0 1' * world.absmin_z,
768 '1 0 0' * world.absmax_x + '0 0 1' * world.absmax_z,
769 '0 1 0' * world.absmin_y,
773 print(" ", ftos(world.absmax_y));
775 print(" ", ftos(trace_endpos_y));
777 tracebox('0 0 1' * world.absmax_z,
778 '1 0 0' * world.absmin_x + '0 1 0' * world.absmin_y,
779 '1 0 0' * world.absmax_x + '0 1 0' * world.absmax_y,
780 '0 0 1' * world.absmin_z,
784 print(" ", ftos(world.absmax_z));
786 print(" ", ftos(trace_endpos_z));
792 case GC_REQUEST_USAGE:
793 print("\nUsage:^3 sv_cmd bbox\n");
794 print(" No arguments required.\n");
795 print(" See also: ^2gettaginfo^7\n");
800 void GameCommand_bot_cmd(float request, string command) // what a mess... old old code.
803 float argc = tokenize_console(command);
807 case GC_REQUEST_HELP:
808 print(" ^2bot_cmd^7: Control and send commands to bots\n");
811 case GC_REQUEST_COMMAND:
812 if(argv(1) == "reset")
817 else if(argv(1) == "load" && argc == 3)
821 fh = fopen(argv(2), FILE_READ);
824 print("cannot open the file\n");
829 while((s = fgets(fh)))
831 argc = tokenize_console(s);
833 if(argc >= 3 && argv(0) == "sv_cmd" && argv(1) == "bot_cmd")
835 // let's start at token 2 so we can skip sv_cmd bot_cmd
836 bot = find_bot_by_number(stof(argv(2)));
838 bot = find_bot_by_name(argv(2));
840 bot_queuecommand(bot, strcat(argv(3), " ", argv(4)));
843 localcmd(strcat(s, "\n"));
847 print(ftos(i), " commands read\n");
851 else if(argv(1) == "help")
854 bot_cmdhelp(argv(2));
859 else if(argc >= 3) // this comes last
861 bot = find_bot_by_number(stof(argv(1)));
863 bot = find_bot_by_name(argv(1));
866 print(strcat("Command '", (argv(2), " ", argv(3)), "' sent to bot ", bot.netname, "\n"));
867 bot_queuecommand(bot, strcat(argv(2), " ", argv(3)));
871 print(strcat("Error: Can't find bot with the name or id '", argv(1),"' - Did you mistype the command?\n")); // don't return so that usage is shown
875 print("Incorrect parameters for \"bot_cmd\"\n");
876 case GC_REQUEST_USAGE:
877 print("\nUsage:^3 sv_cmd bot_cmd client command [argument]\n");
878 print(" 'client' can be either the name or entity id of the bot\n");
879 print(" For full list of commands, see bot_cmd help [command].\n");
880 print("Examples: bot_cmd <id> cc \"say something\"\n");
881 print(" bot_cmd <id> presskey jump\n");
886 void GameCommand_cointoss(float request) // todo: Perhaps add the ability to give your own arguments to pick between? (Like player names)
889 float choice = (random() > 0.5);
893 case GC_REQUEST_HELP:
894 print(" ^2cointoss^7: Flip a virtual coin and give random result\n");
897 case GC_REQUEST_COMMAND:
898 FOR_EACH_CLIENT(client)
899 centerprint(client, strcat("^3Throwing coin... Result: ", (choice ? "^1HEADS^3!\n" : "^4TAILS^3!\n")));
900 bprint(strcat("^3Throwing coin... Result: ", (choice ? "^1HEADS^3!\n" : "^4TAILS^3!\n")));
904 case GC_REQUEST_USAGE:
905 print("\nUsage:^3 sv_cmd cointoss\n");
906 print(" No arguments required.\n");
911 void GameCommand_cvar_changes(float request)
915 case GC_REQUEST_HELP:
916 print(" ^2cvar_changes^7: Prints a list of all changed server cvars\n");
919 case GC_REQUEST_COMMAND:
924 case GC_REQUEST_USAGE:
925 print("\nUsage:^3 sv_cmd \n");
926 print(" No arguments required.\n");
927 print(" See also: ^2cvar_purechanges^7\n");
932 void GameCommand_cvar_purechanges(float request)
936 case GC_REQUEST_HELP:
937 print(" ^2cvar_purechanges^7: Prints a list of all changed gameplay cvars\n");
940 case GC_REQUEST_COMMAND:
941 print(cvar_purechanges);
945 case GC_REQUEST_USAGE:
946 print("\nUsage:^3 sv_cmd cvar_purechanges\n");
947 print(" No arguments required.\n");
948 print(" See also: ^2cvar_changes^7\n");
953 void GameCommand_database(float request, string command)
955 float argc = tokenize_console(command);
959 case GC_REQUEST_HELP:
960 print(" ^2database^7: Extra controls of the serverprogs database\n");
963 case GC_REQUEST_COMMAND:
966 if(argv(1) == "save")
968 db_save(ServerProgsDB, argv(2));
969 print(strcat("Copied serverprogs database to '", argv(2), "' in the data directory.\n"));
972 else if(argv(1) == "dump")
974 db_dump(ServerProgsDB, argv(2));
975 print("DB dumped.\n"); // wtf does this do?
978 else if(argv(1) == "load")
980 db_close(ServerProgsDB);
981 ServerProgsDB = db_load(argv(2));
982 print(strcat("Loaded '", argv(2), "' as new serverprogs database.\n"));
988 print("Incorrect parameters for \"database\"\n");
989 case GC_REQUEST_USAGE:
990 print("\nUsage:^3 sv_cmd database action filename\n");
991 print(" Where action is the command to complete,\n");
992 print(" and filename is what it acts upon.\n");
993 print(" Full list of commands here: \"save, dump, load.\"\n");
998 void GameCommand_defer_clear(float request, string command)
1001 float argc = tokenize_console(command);
1002 float entno = stof(argv(1));
1006 case GC_REQUEST_HELP:
1007 print(" ^2defer_clear^7: Clear all queued defer commands for client\n");
1010 case GC_REQUEST_COMMAND:
1013 // player_id is out of range
1014 if((entno < 1) | (entno > maxclients)) {
1015 print("Player ", argv(1), " doesn't exist\n");
1018 client = edict_num(entno);
1019 if not(client.flags & FL_CLIENT) {
1020 print("Player ", argv(1), " doesn't exist\n");
1023 if(clienttype(client) == CLIENTTYPE_BOT) {
1024 print("Player ", argv(1), " (", client.netname, ") is a bot\n");
1027 stuffcmd(client, "defer clear\n");
1028 print("defer clear stuffed to ", argv(1), " (", client.netname, ")\n");
1033 print("Incorrect parameters for \"defer_clear\"\n");
1034 case GC_REQUEST_USAGE:
1035 print("\nUsage:^3 sv_cmd defer_clear clientnumber\n");
1036 print(" where clientnumber is player entity number.\n");
1037 print(" See also: ^2defer_clear_all^7\n");
1042 void GameCommand_defer_clear_all(float request)
1049 case GC_REQUEST_HELP:
1050 print(" ^2defer_clear_all^7: Clear all queued defer commands for all clients\n");
1053 case GC_REQUEST_COMMAND:
1054 FOR_EACH_CLIENT(client)
1056 GameCommand_defer_clear(GC_REQUEST_COMMAND, strcat("defer_clear ", ftos(num_for_edict(client))));
1059 if(i) { bprint(strcat("Successfully stuffed defer clear to all clients (", ftos(i), ")\n")); } // should a message be added if no players were found?
1063 case GC_REQUEST_USAGE:
1064 print("\nUsage:^3 sv_cmd defer_clear_all\n");
1065 print(" No arguments required.\n");
1066 print(" See also: ^2defer_clear^7\n");
1071 void GameCommand_delrec(float request, string command) // UNTESTED
1073 float argc = tokenize_console(command);
1077 case GC_REQUEST_HELP:
1078 print(" ^2delrec^7: Delete race time record for a map\n");
1081 case GC_REQUEST_COMMAND:
1085 race_deleteTime(argv(2), stof(argv(1)));
1087 race_deleteTime(GetMapname(), stof(argv(1)));
1092 print("Incorrect parameters for \"delrec\"\n");
1093 case GC_REQUEST_USAGE:
1094 print("\nUsage:^3 sv_cmd delrec ranking [map]\n");
1095 print(" ranking is which ranking level to clear up to, \n");
1096 print(" it will clear all records up to nth place.\n");
1097 print(" if map is not provided it will use current map.\n");
1102 void GameCommand_effectindexdump(float request)
1109 case GC_REQUEST_HELP:
1110 print(" ^2effectindexdump^7: Dump list of effects from code and effectinfo.txt\n");
1113 case GC_REQUEST_COMMAND:
1115 print("begin of effects list\n");
1116 db_put(d, "TE_GUNSHOT", "1"); print("effect TE_GUNSHOT is ", ftos(particleeffectnum("TE_GUNSHOT")), "\n");
1117 db_put(d, "TE_GUNSHOTQUAD", "1"); print("effect TE_GUNSHOTQUAD is ", ftos(particleeffectnum("TE_GUNSHOTQUAD")), "\n");
1118 db_put(d, "TE_SPIKE", "1"); print("effect TE_SPIKE is ", ftos(particleeffectnum("TE_SPIKE")), "\n");
1119 db_put(d, "TE_SPIKEQUAD", "1"); print("effect TE_SPIKEQUAD is ", ftos(particleeffectnum("TE_SPIKEQUAD")), "\n");
1120 db_put(d, "TE_SUPERSPIKE", "1"); print("effect TE_SUPERSPIKE is ", ftos(particleeffectnum("TE_SUPERSPIKE")), "\n");
1121 db_put(d, "TE_SUPERSPIKEQUAD", "1"); print("effect TE_SUPERSPIKEQUAD is ", ftos(particleeffectnum("TE_SUPERSPIKEQUAD")), "\n");
1122 db_put(d, "TE_WIZSPIKE", "1"); print("effect TE_WIZSPIKE is ", ftos(particleeffectnum("TE_WIZSPIKE")), "\n");
1123 db_put(d, "TE_KNIGHTSPIKE", "1"); print("effect TE_KNIGHTSPIKE is ", ftos(particleeffectnum("TE_KNIGHTSPIKE")), "\n");
1124 db_put(d, "TE_EXPLOSION", "1"); print("effect TE_EXPLOSION is ", ftos(particleeffectnum("TE_EXPLOSION")), "\n");
1125 db_put(d, "TE_EXPLOSIONQUAD", "1"); print("effect TE_EXPLOSIONQUAD is ", ftos(particleeffectnum("TE_EXPLOSIONQUAD")), "\n");
1126 db_put(d, "TE_TAREXPLOSION", "1"); print("effect TE_TAREXPLOSION is ", ftos(particleeffectnum("TE_TAREXPLOSION")), "\n");
1127 db_put(d, "TE_TELEPORT", "1"); print("effect TE_TELEPORT is ", ftos(particleeffectnum("TE_TELEPORT")), "\n");
1128 db_put(d, "TE_LAVASPLASH", "1"); print("effect TE_LAVASPLASH is ", ftos(particleeffectnum("TE_LAVASPLASH")), "\n");
1129 db_put(d, "TE_SMALLFLASH", "1"); print("effect TE_SMALLFLASH is ", ftos(particleeffectnum("TE_SMALLFLASH")), "\n");
1130 db_put(d, "TE_FLAMEJET", "1"); print("effect TE_FLAMEJET is ", ftos(particleeffectnum("TE_FLAMEJET")), "\n");
1131 db_put(d, "EF_FLAME", "1"); print("effect EF_FLAME is ", ftos(particleeffectnum("EF_FLAME")), "\n");
1132 db_put(d, "TE_BLOOD", "1"); print("effect TE_BLOOD is ", ftos(particleeffectnum("TE_BLOOD")), "\n");
1133 db_put(d, "TE_SPARK", "1"); print("effect TE_SPARK is ", ftos(particleeffectnum("TE_SPARK")), "\n");
1134 db_put(d, "TE_PLASMABURN", "1"); print("effect TE_PLASMABURN is ", ftos(particleeffectnum("TE_PLASMABURN")), "\n");
1135 db_put(d, "TE_TEI_G3", "1"); print("effect TE_TEI_G3 is ", ftos(particleeffectnum("TE_TEI_G3")), "\n");
1136 db_put(d, "TE_TEI_SMOKE", "1"); print("effect TE_TEI_SMOKE is ", ftos(particleeffectnum("TE_TEI_SMOKE")), "\n");
1137 db_put(d, "TE_TEI_BIGEXPLOSION", "1"); print("effect TE_TEI_BIGEXPLOSION is ", ftos(particleeffectnum("TE_TEI_BIGEXPLOSION")), "\n");
1138 db_put(d, "TE_TEI_PLASMAHIT", "1"); print("effect TE_TEI_PLASMAHIT is ", ftos(particleeffectnum("TE_TEI_PLASMAHIT")), "\n");
1139 db_put(d, "EF_STARDUST", "1"); print("effect EF_STARDUST is ", ftos(particleeffectnum("EF_STARDUST")), "\n");
1140 db_put(d, "TR_ROCKET", "1"); print("effect TR_ROCKET is ", ftos(particleeffectnum("TR_ROCKET")), "\n");
1141 db_put(d, "TR_GRENADE", "1"); print("effect TR_GRENADE is ", ftos(particleeffectnum("TR_GRENADE")), "\n");
1142 db_put(d, "TR_BLOOD", "1"); print("effect TR_BLOOD is ", ftos(particleeffectnum("TR_BLOOD")), "\n");
1143 db_put(d, "TR_WIZSPIKE", "1"); print("effect TR_WIZSPIKE is ", ftos(particleeffectnum("TR_WIZSPIKE")), "\n");
1144 db_put(d, "TR_SLIGHTBLOOD", "1"); print("effect TR_SLIGHTBLOOD is ", ftos(particleeffectnum("TR_SLIGHTBLOOD")), "\n");
1145 db_put(d, "TR_KNIGHTSPIKE", "1"); print("effect TR_KNIGHTSPIKE is ", ftos(particleeffectnum("TR_KNIGHTSPIKE")), "\n");
1146 db_put(d, "TR_VORESPIKE", "1"); print("effect TR_VORESPIKE is ", ftos(particleeffectnum("TR_VORESPIKE")), "\n");
1147 db_put(d, "TR_NEHAHRASMOKE", "1"); print("effect TR_NEHAHRASMOKE is ", ftos(particleeffectnum("TR_NEHAHRASMOKE")), "\n");
1148 db_put(d, "TR_NEXUIZPLASMA", "1"); print("effect TR_NEXUIZPLASMA is ", ftos(particleeffectnum("TR_NEXUIZPLASMA")), "\n");
1149 db_put(d, "TR_GLOWTRAIL", "1"); print("effect TR_GLOWTRAIL is ", ftos(particleeffectnum("TR_GLOWTRAIL")), "\n");
1150 db_put(d, "TR_SEEKER", "1"); print("effect TR_SEEKER is ", ftos(particleeffectnum("TR_SEEKER")), "\n");
1151 db_put(d, "SVC_PARTICLE", "1"); print("effect SVC_PARTICLE is ", ftos(particleeffectnum("SVC_PARTICLE")), "\n");
1153 fh = fopen("effectinfo.txt", FILE_READ);
1154 while((s = fgets(fh)))
1156 tokenize(s); // tokenize_console would hit the loop counter :(
1157 if(argv(0) == "effect")
1159 if(db_get(d, argv(1)) != "1")
1161 if(particleeffectnum(argv(1)) >= 0)
1162 print("effect ", argv(1), " is ", ftos(particleeffectnum(argv(1))), "\n");
1163 db_put(d, argv(1), "1");
1167 print("end of effects list\n");
1173 case GC_REQUEST_USAGE:
1174 print("\nUsage:^3 sv_cmd effectindexdump\n");
1175 print(" No arguments required.\n");
1180 void GameCommand_extendmatchtime(float request) // todo: Perhaps allows the user to send a specific time to extend it.
1184 case GC_REQUEST_HELP:
1185 print(" ^2extendmatchtime^7: Increase the timelimit value incrementally\n");
1188 case GC_REQUEST_COMMAND:
1189 changematchtime(autocvar_timelimit_increment* 60, autocvar_timelimit_min*60, autocvar_timelimit_max*60);
1193 case GC_REQUEST_USAGE:
1194 print("\nUsage:^3 sv_cmd extendmatchtime\n");
1195 print(" No arguments required.\n");
1196 print(" See also: ^2reducematchtime^7\n");
1201 void GameCommand_find(float request, string command)
1204 float argc = tokenize_console(command);
1208 case GC_REQUEST_HELP:
1209 print(" ^2find^7: Search through entities for matching classname\n");
1212 case GC_REQUEST_COMMAND:
1213 for(client = world; (client = find(client, classname, argv(1))); )
1214 print(etos(client), "\n");
1218 print("Incorrect parameters for \"find\"\n");
1219 case GC_REQUEST_USAGE:
1220 print("\nUsage:^3 sv_cmd find classname\n");
1221 print(" Where classname is the classname to search for.\n");
1226 void GameCommand_gametype(float request, string command)
1228 float argc = tokenize_console(command);
1230 float t = MapInfo_Type_FromString(s), tsave = MapInfo_CurrentGametype();
1234 case GC_REQUEST_HELP:
1235 print(" ^2gametype^7: Simple command to change the active gametype\n");
1238 case GC_REQUEST_COMMAND:
1241 MapInfo_SwitchGameType(t);
1242 MapInfo_FilterGametype(MapInfo_CurrentGametype(), MapInfo_CurrentFeatures(), MapInfo_RequiredFlags(), MapInfo_ForbiddenFlags(), 0);
1243 if(MapInfo_count > 0)
1244 bprint("Game type successfully switched to ", s, "\n");
1247 bprint("Cannot use this game type: no map for it found\n");
1248 MapInfo_SwitchGameType(tsave);
1249 MapInfo_FilterGametype(MapInfo_CurrentGametype(), MapInfo_CurrentFeatures(), MapInfo_RequiredFlags(), MapInfo_ForbiddenFlags(), 0);
1253 bprint("Game type switch to ", s, " failed: this type does not exist!\n");
1257 print("Incorrect parameters for \"gametype\"\n");
1258 case GC_REQUEST_USAGE:
1259 print("\nUsage:^3 sv_cmd gametype mode\n");
1260 print(" Where mode is the gametype mode to switch to.\n");
1261 print(" See also: ^2gotomap^7\n");
1266 void GameCommand_gettaginfo(float request, string command) // UNTESTED // todo: finish usage description for it (but, must first learn this shit)
1269 float argc = tokenize_console(command), i;
1273 case GC_REQUEST_HELP:
1274 print(" ^2gettaginfo^7: Get specific information about a weapon model\n");
1277 case GC_REQUEST_COMMAND:
1280 tmp_entity = spawn();
1282 setmodel(tmp_entity, (nextent(world)).weaponentity.model);
1285 precache_model(argv(1));
1286 setmodel(tmp_entity, argv(1));
1288 tmp_entity.frame = stof(argv(2));
1289 if(substring(argv(3), 0, 1) == "#")
1290 i = stof(substring(argv(3), 1, -1));
1292 i = gettagindex(tmp_entity, argv(3));
1295 v = gettaginfo(tmp_entity, i);
1296 print("model ", tmp_entity.model, " frame ", ftos(tmp_entity.frame), " tag ", gettaginfo_name);
1297 print(" index ", ftos(i), " parent ", ftos(gettaginfo_parent), "\n");
1298 print(" vector = ", ftos(v_x), " ", ftos(v_y), " ", ftos(v_z), "\n");
1299 print(" offset = ", ftos(gettaginfo_offset_x), " ", ftos(gettaginfo_offset_y), " ", ftos(gettaginfo_offset_z), "\n");
1300 print(" forward = ", ftos(gettaginfo_forward_x), " ", ftos(gettaginfo_forward_y), " ", ftos(gettaginfo_forward_z), "\n");
1301 print(" right = ", ftos(gettaginfo_right_x), " ", ftos(gettaginfo_right_y), " ", ftos(gettaginfo_right_z), "\n");
1302 print(" up = ", ftos(gettaginfo_up_x), " ", ftos(gettaginfo_up_y), " ", ftos(gettaginfo_up_z), "\n");
1306 localcmd(strcat(argv(4), vtos(v), argv(5), "\n"));
1310 print("bone not found\n");
1317 print("Incorrect parameters for \"gettaginfo\"\n");
1318 case GC_REQUEST_USAGE:
1319 print("\nUsage:^3 sv_cmd gettaginfo\n");
1320 print(" FIXME: Arguments currently unknown\n");
1321 print(" See also: ^2bbox^7\n");
1326 void GameCommand_gotomap(float request, string command)
1328 float argc = tokenize_console(command);
1332 case GC_REQUEST_HELP:
1333 print(" ^2gotomap^7: Simple command to switch to another map\n");
1336 case GC_REQUEST_COMMAND:
1339 print(GotoMap(argv(1)), "\n");
1344 case GC_REQUEST_USAGE:
1345 print("\nUsage:^3 sv_cmd gotomap map\n");
1346 print(" Where map is the *.bsp file to change to.\n");
1347 print(" See also: ^2gametype^7\n");
1352 void GameCommand_ladder(float request)
1356 case GC_REQUEST_HELP:
1357 print(" ^2ladder^7: Get information about top players if supported\n");
1360 case GC_REQUEST_COMMAND:
1361 print(ladder_reply);
1365 case GC_REQUEST_USAGE:
1366 print("\nUsage:^3 sv_cmd ladder\n");
1367 print(" No arguments required.\n");
1372 void GameCommand_lockteams(float request)
1376 case GC_REQUEST_HELP:
1377 print(" ^2lockteams^7: Disable the ability for players to switch or enter teams\n");
1380 case GC_REQUEST_COMMAND:
1384 bprint("^1The teams are now locked.\n");
1387 bprint("That command can only be used in a team-based gamemode.\n");
1391 case GC_REQUEST_USAGE:
1392 print("\nUsage:^3 sv_cmd lockteams\n");
1393 print(" No arguments required.\n");
1398 void GameCommand(string command)
1400 // ===== TODO list =====
1402 // Finish adding the rest of the commands
1404 // Add ifdef to stuffto so that is can only be used when the game code is compiled for it
1405 //(this way it's more obscure and harder to abuse on normal servers)
1407 float search_request_type;
1408 float argc = tokenize_console(command);
1410 if(argv(0) == "help")
1414 print("\nUsage:^3 sv_cmd COMMAND...^7, where possible commands are:\n");
1415 GameCommand_adminmsg(GC_REQUEST_HELP, "");
1416 GameCommand_allready(GC_REQUEST_HELP);
1417 GameCommand_allspec(GC_REQUEST_HELP);
1418 GameCommand_anticheat(GC_REQUEST_HELP, "");
1419 GameCommand_bbox(GC_REQUEST_HELP);
1420 GameCommand_bot_cmd(GC_REQUEST_HELP, "");
1421 GameCommand_cointoss(GC_REQUEST_HELP);
1422 GameCommand_cvar_changes(GC_REQUEST_HELP);
1423 GameCommand_cvar_purechanges(GC_REQUEST_HELP);
1424 GameCommand_database(GC_REQUEST_HELP, "");
1425 GameCommand_defer_clear(GC_REQUEST_HELP, "");
1426 GameCommand_defer_clear_all(GC_REQUEST_HELP);
1427 GameCommand_delrec(GC_REQUEST_HELP, "");
1428 GameCommand_effectindexdump(GC_REQUEST_HELP);
1429 GameCommand_extendmatchtime(GC_REQUEST_HELP);
1430 GameCommand_find(GC_REQUEST_HELP, "");
1431 GameCommand_gametype(GC_REQUEST_HELP, "");
1432 GameCommand_gettaginfo(GC_REQUEST_HELP, "");
1433 GameCommand_gotomap(GC_REQUEST_HELP, "");
1434 GameCommand_ladder(GC_REQUEST_HELP);
1435 GameCommand_lockteams(GC_REQUEST_HELP);
1436 print(" teamstatus\n");
1437 print(" printstats\n");
1438 print(" make_mapinfo\n");
1439 print(" radarmap [--force] [--quit | --loop] [sharpness]\n");
1440 print(" reducematchtime\n");
1441 GameCommand_Vote("help", world);
1442 GameCommand_Ban("help");
1443 GameCommand_Generic("help");
1444 print("For help about specific commands, type sv_cmd help COMMAND\n");
1448 search_request_type = GC_REQUEST_USAGE; // Instead of trying to call a command, we're going to see detailed information about it
1450 else if(GameCommand_Vote(command, world))
1452 return; // handled by server/vote.qc
1454 else if(GameCommand_Ban(command))
1456 return; // handled by server/ipban.qc
1458 else if(GameCommand_Generic(command))
1460 return; // handled by common/gamecommand.qc
1463 search_request_type = GC_REQUEST_COMMAND; // continue as usual and scan for normal commands
1465 switch( ((argv(0) == "help") ? argv(1) : argv(0)) ) // if first argument is help, then search for the second argument. Else, search for first.
1467 case "adminmsg": GameCommand_adminmsg(search_request_type, command); break;
1468 case "allready": GameCommand_allready(search_request_type); break;
1469 case "allspec": GameCommand_allspec(search_request_type); break;
1470 case "anticheat": GameCommand_anticheat(search_request_type, command); break;
1471 case "bbox": GameCommand_bbox(search_request_type); break;
1472 case "bot_cmd": GameCommand_bot_cmd(search_request_type, command); break;
1473 case "cointoss": GameCommand_cointoss(search_request_type); break;
1474 case "cvar_changes": GameCommand_cvar_changes(search_request_type); break;
1475 case "cvar_purechanges": GameCommand_cvar_purechanges(search_request_type); break;
1476 case "database": GameCommand_database(search_request_type, command); break;
1477 case "defer_clear": GameCommand_defer_clear(search_request_type, command); break;
1478 case "defer_clear_all": GameCommand_defer_clear_all(search_request_type); break;
1479 case "delrec": GameCommand_delrec(search_request_type, command); break;
1480 case "effectindexdump": GameCommand_effectindexdump(search_request_type); break;
1481 case "extendmatchtime": GameCommand_extendmatchtime(search_request_type); break;
1482 case "find": GameCommand_find(search_request_type, command); break;
1483 case "gametype": GameCommand_gametype(search_request_type, command); break;
1484 case "gettaginfo": GameCommand_gettaginfo(search_request_type, command); break;
1485 case "gotomap": GameCommand_gotomap(search_request_type, command); break;
1486 case "ladder": GameCommand_ladder(search_request_type); break;
1487 case "lockteams": GameCommand_lockteams(search_request_type); break;
1490 print("Invalid command. For a list of supported commands, try sv_cmd help.\n");