1 var void remove(entity e);
2 void objerror(string s);
4 .vector dropped_origin;
6 void traceline_antilag (entity source, vector v1, vector v2, float nomonst, entity forent, float lag);
7 void crosshair_trace(entity pl)
9 traceline_antilag(pl, pl.cursor_trace_start, pl.cursor_trace_start + normalize(pl.cursor_trace_endpos - pl.cursor_trace_start) * MAX_SHOT_DISTANCE, MOVE_NORMAL, pl, ANTILAG_LATENCY(pl));
11 void crosshair_trace_plusvisibletriggers(entity pl)
15 first = findchainfloat(solid, SOLID_TRIGGER);
17 for (e = first; e; e = e.chain)
23 for (e = first; e; e = e.chain)
24 e.solid = SOLID_TRIGGER;
26 void WarpZone_traceline_antilag (entity source, vector v1, vector v2, float nomonst, entity forent, float lag);
27 void WarpZone_crosshair_trace(entity pl)
29 WarpZone_traceline_antilag(pl, pl.cursor_trace_start, pl.cursor_trace_start + normalize(pl.cursor_trace_endpos - pl.cursor_trace_start) * MAX_SHOT_DISTANCE, MOVE_NORMAL, pl, ANTILAG_LATENCY(pl));
32 void() spawnfunc_info_player_deathmatch; // needed for the other spawnpoints
33 void() spawnpoint_use;
36 string admin_name(void)
38 if(autocvar_sv_adminnick != "")
39 return autocvar_sv_adminnick;
41 return "SERVER ADMIN";
44 float DistributeEvenly_amount;
45 float DistributeEvenly_totalweight;
46 void DistributeEvenly_Init(float amount, float totalweight)
48 if (DistributeEvenly_amount)
50 dprint("DistributeEvenly_Init: UNFINISHED DISTRIBUTION (", ftos(DistributeEvenly_amount), " for ");
51 dprint(ftos(DistributeEvenly_totalweight), " left!)\n");
54 DistributeEvenly_amount = 0;
56 DistributeEvenly_amount = amount;
57 DistributeEvenly_totalweight = totalweight;
59 float DistributeEvenly_Get(float weight)
64 f = floor(0.5 + DistributeEvenly_amount * weight / DistributeEvenly_totalweight);
65 DistributeEvenly_totalweight -= weight;
66 DistributeEvenly_amount -= f;
69 float DistributeEvenly_GetRandomized(float weight)
74 f = floor(random() + DistributeEvenly_amount * weight / DistributeEvenly_totalweight);
75 DistributeEvenly_totalweight -= weight;
76 DistributeEvenly_amount -= f;
80 #define move_out_of_solid(e) WarpZoneLib_MoveOutOfSolid(e)
82 const string STR_PLAYER = "player";
83 const string STR_SPECTATOR = "spectator";
84 const string STR_OBSERVER = "observer";
86 #define IS_PLAYER(v) (v.classname == STR_PLAYER)
87 #define IS_SPEC(v) (v.classname == STR_SPECTATOR)
88 #define IS_OBSERVER(v) (v.classname == STR_OBSERVER)
89 #define IS_CLIENT(v) (v.flags & FL_CLIENT)
90 #define IS_BOT_CLIENT(v) (clienttype(v) == CLIENTTYPE_BOT)
91 #define IS_REAL_CLIENT(v) (clienttype(v) == CLIENTTYPE_REAL)
92 #define IS_NOT_A_CLIENT(v) (clienttype(v) == CLIENTTYPE_NOTACLIENT)
94 #define FOR_EACH_CLIENTSLOT(v) for(v = world; (v = nextent(v)) && (num_for_edict(v) <= maxclients); )
95 #define FOR_EACH_CLIENT(v) FOR_EACH_CLIENTSLOT(v) if(IS_CLIENT(v))
96 #define FOR_EACH_REALCLIENT(v) FOR_EACH_CLIENT(v) if(IS_REAL_CLIENT(v))
98 #define FOR_EACH_PLAYER(v) FOR_EACH_CLIENT(v) if(IS_PLAYER(v))
99 #define FOR_EACH_SPEC(v) FOR_EACH_CLIENT(v) if (!IS_PLAYER(v)) // Samual: shouldn't this be IS_SPEC(v)? and rather create a separate macro to include observers too
100 #define FOR_EACH_REALPLAYER(v) FOR_EACH_REALCLIENT(v) if(IS_PLAYER(v))
102 #define FOR_EACH_MONSTER(v) for(v = world; (v = findflags(v, flags, FL_MONSTER)) != world; )
104 #define CENTER_OR_VIEWOFS(ent) (ent.origin + (IS_PLAYER(ent) ? ent.view_ofs : ((ent.mins + ent.maxs) * 0.5)))
106 // copies a string to a tempstring (so one can strunzone it)
107 string strcat1(string s) = #115; // FRIK_FILE
112 void GameLogEcho(string s)
117 if (autocvar_sv_eventlog_files)
122 matches = autocvar_sv_eventlog_files_counter + 1;
123 cvar_set("sv_eventlog_files_counter", ftos(matches));
126 fn = strcat(substring("00000000", 0, 8 - strlen(fn)), fn);
127 fn = strcat(autocvar_sv_eventlog_files_nameprefix, fn, autocvar_sv_eventlog_files_namesuffix);
128 logfile = fopen(fn, FILE_APPEND);
129 fputs(logfile, ":logversion:3\n");
133 if (autocvar_sv_eventlog_files_timestamps)
134 fputs(logfile, strcat(":time:", strftime(TRUE, "%Y-%m-%d %H:%M:%S", "\n", s, "\n")));
136 fputs(logfile, strcat(s, "\n"));
139 if (autocvar_sv_eventlog_console)
148 // will be opened later
153 if (logfile_open && logfile >= 0)
160 #define strstr strstrofs
162 // NOTE: DO NOT USE THIS FUNCTION TOO OFTEN.
163 // IT WILL MOST PROBABLY DESTROY _ALL_ OTHER TEMP
164 // STRINGS AND TAKE QUITE LONG. haystack and needle MUST
165 // BE CONSTANT OR strzoneD!
166 float strstr(string haystack, string needle, float offset)
170 len = strlen(needle);
171 endpos = strlen(haystack) - len;
172 while(offset <= endpos)
174 found = substring(haystack, offset, len);
183 const float NUM_NEAREST_ENTITIES = 4;
184 entity nearest_entity[NUM_NEAREST_ENTITIES];
185 float nearest_length[NUM_NEAREST_ENTITIES];
186 entity findnearest(vector point, .string field, string value, vector axismod)
197 localhead = find(world, field, value);
200 if ((localhead.items == IT_KEY1 || localhead.items == IT_KEY2) && localhead.target == "###item###")
201 dist = localhead.oldorigin;
203 dist = localhead.origin;
205 dist = dist_x * axismod_x * '1 0 0' + dist_y * axismod_y * '0 1 0' + dist_z * axismod_z * '0 0 1';
208 for (i = 0; i < num_nearest; ++i)
210 if (len < nearest_length[i])
214 // now i tells us where to insert at
215 // INSERTION SORT! YOU'VE SEEN IT! RUN!
216 if (i < NUM_NEAREST_ENTITIES)
218 for (j = NUM_NEAREST_ENTITIES - 1; j >= i; --j)
220 nearest_length[j + 1] = nearest_length[j];
221 nearest_entity[j + 1] = nearest_entity[j];
223 nearest_length[i] = len;
224 nearest_entity[i] = localhead;
225 if (num_nearest < NUM_NEAREST_ENTITIES)
226 num_nearest = num_nearest + 1;
229 localhead = find(localhead, field, value);
232 // now use the first one from our list that we can see
233 for (i = 0; i < num_nearest; ++i)
235 traceline(point, nearest_entity[i].origin, TRUE, world);
236 if (trace_fraction == 1)
240 dprint("Nearest point (");
241 dprint(nearest_entity[0].netname);
242 dprint(") is not visible, using a visible one.\n");
244 return nearest_entity[i];
248 if (num_nearest == 0)
251 dprint("Not seeing any location point, using nearest as fallback.\n");
253 dprint("Candidates were: ");
254 for(j = 0; j < num_nearest; ++j)
258 dprint(nearest_entity[j].netname);
263 return nearest_entity[0];
266 void spawnfunc_target_location()
268 self.classname = "target_location";
269 // location name in netname
270 // eventually support: count, teamgame selectors, line of sight?
273 void spawnfunc_info_location()
275 self.classname = "target_location";
276 self.message = self.netname;
279 string NearestLocation(vector p)
284 loc = findnearest(p, classname, "target_location", '1 1 1');
291 loc = findnearest(p, target, "###item###", '1 1 4');
298 string formatmessage(string msg)
309 WarpZone_crosshair_trace(self);
310 cursor = trace_endpos;
311 cursor_ent = trace_ent;
315 break; // too many replacements
318 p1 = strstr(msg, "%", p); // NOTE: this destroys msg as it's a tempstring!
319 p2 = strstr(msg, "\\", p); // NOTE: this destroys msg as it's a tempstring!
332 replacement = substring(msg, p, 2);
333 escape = substring(msg, p + 1, 1);
337 else if (escape == "\\")
339 else if (escape == "n")
341 else if (escape == "a")
342 replacement = ftos(floor(self.armorvalue));
343 else if (escape == "h")
344 replacement = ftos(floor(self.health));
345 else if (escape == "l")
346 replacement = NearestLocation(self.origin);
347 else if (escape == "y")
348 replacement = NearestLocation(cursor);
349 else if (escape == "d")
350 replacement = NearestLocation(self.death_origin);
351 else if (escape == "w") {
355 wep = self.switchweapon;
358 replacement = W_Name(wep);
359 } else if (escape == "W") {
360 if (self.items & IT_SHELLS) replacement = "shells";
361 else if (self.items & IT_NAILS) replacement = "bullets";
362 else if (self.items & IT_ROCKETS) replacement = "rockets";
363 else if (self.items & IT_CELLS) replacement = "cells";
364 else replacement = "batteries"; // ;)
365 } else if (escape == "x") {
366 replacement = cursor_ent.netname;
367 if (replacement == "" || !cursor_ent)
368 replacement = "nothing";
369 } else if (escape == "s")
370 replacement = ftos(vlen(self.velocity - self.velocity_z * '0 0 1'));
371 else if (escape == "S")
372 replacement = ftos(vlen(self.velocity));
374 msg = strcat(substring(msg, 0, p), replacement, substring(msg, p+2, strlen(msg) - (p+2)));
375 p = p + strlen(replacement);
380 float boolean(float value) { // if value is 0 return FALSE (0), otherwise return TRUE (1)
381 return (value == 0) ? FALSE : TRUE;
390 >0: receives a cvar from name=argv(f) value=argv(f+1)
392 void GetCvars_handleString(string thisname, float f, .string field, string name)
397 strunzone(self.field);
398 self.field = string_null;
402 if (thisname == name)
405 strunzone(self.field);
406 self.field = strzone(argv(f + 1));
410 stuffcmd(self, strcat("cl_cmd sendcvar ", name, "\n"));
412 void GetCvars_handleString_Fixup(string thisname, float f, .string field, string name, string(string) func)
414 GetCvars_handleString(thisname, f, field, name);
415 if (f >= 0) // also initialize to the fitting value for "" when sending cvars out
416 if (thisname == name)
419 s = func(strcat1(self.field));
422 strunzone(self.field);
423 self.field = strzone(s);
427 void GetCvars_handleFloat(string thisname, float f, .float field, string name)
434 if (thisname == name)
435 self.field = stof(argv(f + 1));
438 stuffcmd(self, strcat("cl_cmd sendcvar ", name, "\n"));
440 void GetCvars_handleFloatOnce(string thisname, float f, .float field, string name)
447 if (thisname == name)
451 self.field = stof(argv(f + 1));
460 stuffcmd(self, strcat("cl_cmd sendcvar ", name, "\n"));
463 float w_getbestweapon(entity e);
464 string W_FixWeaponOrder_ForceComplete_AndBuildImpulseList(string wo)
467 o = W_FixWeaponOrder_ForceComplete(wo);
468 if(self.weaponorder_byimpulse)
470 strunzone(self.weaponorder_byimpulse);
471 self.weaponorder_byimpulse = string_null;
473 self.weaponorder_byimpulse = strzone(W_FixWeaponOrder_BuildImpulseList(o));
476 void GetCvars(float f)
478 string s = string_null;
481 s = strcat1(argv(f));
486 MUTATOR_CALLHOOK(GetCvars);
488 Notification_GetCvars();
490 GetCvars_handleFloat(s, f, autoswitch, "cl_autoswitch");
491 GetCvars_handleFloat(s, f, cvar_cl_autoscreenshot, "cl_autoscreenshot");
492 GetCvars_handleString(s, f, cvar_g_xonoticversion, "g_xonoticversion");
493 GetCvars_handleFloat(s, f, cvar_cl_handicap, "cl_handicap");
494 GetCvars_handleFloat(s, f, cvar_cl_clippedspectating, "cl_clippedspectating");
495 GetCvars_handleString_Fixup(s, f, cvar_cl_weaponpriority, "cl_weaponpriority", W_FixWeaponOrder_ForceComplete_AndBuildImpulseList);
496 GetCvars_handleString_Fixup(s, f, cvar_cl_weaponpriorities[0], "cl_weaponpriority0", W_FixWeaponOrder_AllowIncomplete);
497 GetCvars_handleString_Fixup(s, f, cvar_cl_weaponpriorities[1], "cl_weaponpriority1", W_FixWeaponOrder_AllowIncomplete);
498 GetCvars_handleString_Fixup(s, f, cvar_cl_weaponpriorities[2], "cl_weaponpriority2", W_FixWeaponOrder_AllowIncomplete);
499 GetCvars_handleString_Fixup(s, f, cvar_cl_weaponpriorities[3], "cl_weaponpriority3", W_FixWeaponOrder_AllowIncomplete);
500 GetCvars_handleString_Fixup(s, f, cvar_cl_weaponpriorities[4], "cl_weaponpriority4", W_FixWeaponOrder_AllowIncomplete);
501 GetCvars_handleString_Fixup(s, f, cvar_cl_weaponpriorities[5], "cl_weaponpriority5", W_FixWeaponOrder_AllowIncomplete);
502 GetCvars_handleString_Fixup(s, f, cvar_cl_weaponpriorities[6], "cl_weaponpriority6", W_FixWeaponOrder_AllowIncomplete);
503 GetCvars_handleString_Fixup(s, f, cvar_cl_weaponpriorities[7], "cl_weaponpriority7", W_FixWeaponOrder_AllowIncomplete);
504 GetCvars_handleString_Fixup(s, f, cvar_cl_weaponpriorities[8], "cl_weaponpriority8", W_FixWeaponOrder_AllowIncomplete);
505 GetCvars_handleString_Fixup(s, f, cvar_cl_weaponpriorities[9], "cl_weaponpriority9", W_FixWeaponOrder_AllowIncomplete);
506 GetCvars_handleFloat(s, f, cvar_cl_weaponimpulsemode, "cl_weaponimpulsemode");
507 GetCvars_handleFloat(s, f, cvar_cl_autotaunt, "cl_autotaunt");
508 GetCvars_handleFloat(s, f, cvar_cl_noantilag, "cl_noantilag");
509 GetCvars_handleFloat(s, f, cvar_cl_voice_directional, "cl_voice_directional");
510 GetCvars_handleFloat(s, f, cvar_cl_voice_directional_taunt_attenuation, "cl_voice_directional_taunt_attenuation");
511 GetCvars_handleFloat(s, f, cvar_cl_accuracy_data_share, "cl_accuracy_data_share");
512 GetCvars_handleFloat(s, f, cvar_cl_accuracy_data_receive, "cl_accuracy_data_receive");
514 self.cvar_cl_accuracy_data_share = boolean(self.cvar_cl_accuracy_data_share);
515 self.cvar_cl_accuracy_data_receive = boolean(self.cvar_cl_accuracy_data_receive);
517 GetCvars_handleFloatOnce(s, f, cvar_cl_gunalign, "cl_gunalign");
518 GetCvars_handleFloat(s, f, cvar_cl_allow_uid2name, "cl_allow_uid2name");
519 GetCvars_handleFloat(s, f, cvar_cl_allow_uidtracking, "cl_allow_uidtracking");
520 GetCvars_handleFloat(s, f, cvar_cl_movement_track_canjump, "cl_movement_track_canjump");
521 GetCvars_handleFloat(s, f, cvar_cl_newusekeysupported, "cl_newusekeysupported");
523 // fixup of switchweapon (needed for LMS or when spectating is disabled, as PutClientInServer comes too early)
526 if (s == "cl_weaponpriority")
527 self.switchweapon = w_getbestweapon(self);
528 if (s == "cl_allow_uidtracking")
529 PlayerStats_AddPlayer(self);
533 // decolorizes and team colors the player name when needed
534 string playername(entity p)
537 if (teamplay && !intermission_running && IS_PLAYER(p))
539 t = Team_ColorCode(p.team);
540 return strcat(t, strdecolorize(p.netname));
546 vector randompos(vector m1, vector m2)
550 v_x = m2_x * random() + m1_x;
551 v_y = m2_y * random() + m1_y;
552 v_z = m2_z * random() + m1_z;
556 //#NO AUTOCVARS START
558 float g_pickup_shells;
559 float g_pickup_shells_max;
560 float g_pickup_nails;
561 float g_pickup_nails_max;
562 float g_pickup_rockets;
563 float g_pickup_rockets_max;
564 float g_pickup_cells;
565 float g_pickup_cells_max;
567 float g_pickup_fuel_jetpack;
568 float g_pickup_fuel_max;
569 float g_pickup_armorsmall;
570 float g_pickup_armorsmall_max;
571 float g_pickup_armorsmall_anyway;
572 float g_pickup_armormedium;
573 float g_pickup_armormedium_max;
574 float g_pickup_armormedium_anyway;
575 float g_pickup_armorbig;
576 float g_pickup_armorbig_max;
577 float g_pickup_armorbig_anyway;
578 float g_pickup_armorlarge;
579 float g_pickup_armorlarge_max;
580 float g_pickup_armorlarge_anyway;
581 float g_pickup_healthsmall;
582 float g_pickup_healthsmall_max;
583 float g_pickup_healthsmall_anyway;
584 float g_pickup_healthmedium;
585 float g_pickup_healthmedium_max;
586 float g_pickup_healthmedium_anyway;
587 float g_pickup_healthlarge;
588 float g_pickup_healthlarge_max;
589 float g_pickup_healthlarge_anyway;
590 float g_pickup_healthmega;
591 float g_pickup_healthmega_max;
592 float g_pickup_healthmega_anyway;
593 float g_pickup_ammo_anyway;
594 float g_pickup_weapons_anyway;
596 WepSet g_weaponarena_weapons;
597 float g_weaponarena_random;
598 float g_weaponarena_random_with_laser;
599 string g_weaponarena_list;
600 float g_weaponspeedfactor;
601 float g_weaponratefactor;
602 float g_weapondamagefactor;
603 float g_weaponforcefactor;
604 float g_weaponspreadfactor;
606 WepSet start_weapons;
607 WepSet start_weapons_default;
608 WepSet start_weapons_defaultmask;
610 float start_ammo_shells;
611 float start_ammo_nails;
612 float start_ammo_rockets;
613 float start_ammo_cells;
614 float start_ammo_fuel;
616 float start_armorvalue;
617 WepSet warmup_start_weapons;
618 WepSet warmup_start_weapons_default;
619 WepSet warmup_start_weapons_defaultmask;
620 #define WARMUP_START_WEAPONS ((g_warmup_allguns == 1) ? (warmup_start_weapons & (weaponsInMap | start_weapons)) : warmup_start_weapons)
621 float warmup_start_ammo_shells;
622 float warmup_start_ammo_nails;
623 float warmup_start_ammo_rockets;
624 float warmup_start_ammo_cells;
625 float warmup_start_ammo_fuel;
626 float warmup_start_health;
627 float warmup_start_armorvalue;
630 entity get_weaponinfo(float w);
632 float want_weapon(string cvarprefix, entity weaponinfo, float allguns)
634 var float i = weaponinfo.weapon;
640 if (g_lms || g_ca || allguns)
642 if(weaponinfo.spawnflags & WEP_FLAG_NORMAL)
648 d = (i == WEP_SHOTGUN);
650 d = 0; // weapon is set a few lines later
652 d = (i == WEP_LASER || i == WEP_SHOTGUN);
654 if(g_grappling_hook) // if possible, redirect off-hand hook to on-hand hook
655 d |= (i == WEP_HOOK);
656 if(weaponinfo.spawnflags & WEP_FLAG_MUTATORBLOCKED) // never default mutator blocked guns
659 var float t = cvar(strcat(cvarprefix, weaponinfo.netname));
661 //print(strcat("want_weapon: ", weaponinfo.netname, " - d: ", ftos(d), ", t: ", ftos(t), ". \n"));
666 // 4: is set by default?
675 void readplayerstartcvars()
681 // initialize starting values for players
682 start_weapons = '0 0 0';
683 start_weapons_default = '0 0 0';
684 start_weapons_defaultmask = '0 0 0';
686 start_ammo_shells = 0;
687 start_ammo_nails = 0;
688 start_ammo_rockets = 0;
689 start_ammo_cells = 0;
690 start_health = cvar("g_balance_health_start");
691 start_armorvalue = cvar("g_balance_armor_start");
694 g_weaponarena_weapons = '0 0 0';
696 s = cvar_string("g_weaponarena");
697 if (s == "0" || s == "")
703 if (s == "0" || s == "")
709 // forcibly turn off weaponarena
714 g_weaponarena_list = "All Weapons";
715 for (j = WEP_FIRST; j <= WEP_LAST; ++j)
717 e = get_weaponinfo(j);
718 if (!(e.spawnflags & WEP_FLAG_MUTATORBLOCKED))
719 g_weaponarena_weapons |= WepSet_FromWeapon(j);
722 else if (s == "most")
725 g_weaponarena_list = "Most Weapons";
726 for (j = WEP_FIRST; j <= WEP_LAST; ++j)
728 e = get_weaponinfo(j);
729 if (!(e.spawnflags & WEP_FLAG_MUTATORBLOCKED))
730 if (e.spawnflags & WEP_FLAG_NORMAL)
731 g_weaponarena_weapons |= WepSet_FromWeapon(j);
734 else if (s == "none")
737 g_weaponarena_list = "No Weapons";
742 t = tokenize_console(s);
743 g_weaponarena_list = "";
744 for (i = 0; i < t; ++i)
747 for (j = WEP_FIRST; j <= WEP_LAST; ++j)
749 e = get_weaponinfo(j);
752 g_weaponarena_weapons |= WepSet_FromWeapon(j);
753 g_weaponarena_list = strcat(g_weaponarena_list, e.message, " & ");
759 print("The weapon mutator list contains an unknown weapon ", s, ". Skipped.\n");
762 g_weaponarena_list = strzone(substring(g_weaponarena_list, 0, strlen(g_weaponarena_list) - 3));
766 g_weaponarena_random = cvar("g_weaponarena_random");
768 g_weaponarena_random = 0;
769 g_weaponarena_random_with_laser = cvar("g_weaponarena_random_with_laser");
773 g_weapon_stay = 0; // incompatible
774 start_weapons = g_weaponarena_weapons;
775 start_items |= IT_UNLIMITED_AMMO;
779 for (i = WEP_FIRST; i <= WEP_LAST; ++i)
781 e = get_weaponinfo(i);
782 float w = want_weapon("g_start_weapon_", e, FALSE);
784 start_weapons |= WepSet_FromWeapon(i);
786 start_weapons_default |= WepSet_FromWeapon(i);
788 start_weapons_defaultmask |= WepSet_FromWeapon(i);
792 if(!cvar("g_use_ammunition"))
793 start_items |= IT_UNLIMITED_AMMO;
795 if(start_items & IT_UNLIMITED_WEAPON_AMMO)
797 start_ammo_rockets = 999;
798 start_ammo_shells = 999;
799 start_ammo_cells = 999;
800 start_ammo_nails = 999;
801 start_ammo_fuel = 999;
805 start_ammo_shells = cvar("g_start_ammo_shells");
806 start_ammo_nails = cvar("g_start_ammo_nails");
807 start_ammo_rockets = cvar("g_start_ammo_rockets");
808 start_ammo_cells = cvar("g_start_ammo_cells");
809 start_ammo_fuel = cvar("g_start_ammo_fuel");
814 warmup_start_ammo_shells = start_ammo_shells;
815 warmup_start_ammo_nails = start_ammo_nails;
816 warmup_start_ammo_rockets = start_ammo_rockets;
817 warmup_start_ammo_cells = start_ammo_cells;
818 warmup_start_ammo_fuel = start_ammo_fuel;
819 warmup_start_health = start_health;
820 warmup_start_armorvalue = start_armorvalue;
821 warmup_start_weapons = start_weapons;
822 warmup_start_weapons_default = start_weapons_default;
823 warmup_start_weapons_defaultmask = start_weapons_defaultmask;
825 if (!g_weaponarena && !g_ca)
827 warmup_start_ammo_shells = cvar("g_warmup_start_ammo_shells");
828 warmup_start_ammo_cells = cvar("g_warmup_start_ammo_cells");
829 warmup_start_ammo_nails = cvar("g_warmup_start_ammo_nails");
830 warmup_start_ammo_rockets = cvar("g_warmup_start_ammo_rockets");
831 warmup_start_ammo_fuel = cvar("g_warmup_start_ammo_fuel");
832 warmup_start_health = cvar("g_warmup_start_health");
833 warmup_start_armorvalue = cvar("g_warmup_start_armor");
834 warmup_start_weapons = '0 0 0';
835 warmup_start_weapons_default = '0 0 0';
836 warmup_start_weapons_defaultmask = '0 0 0';
837 for (i = WEP_FIRST; i <= WEP_LAST; ++i)
839 e = get_weaponinfo(i);
840 float w = want_weapon("g_start_weapon_", e, g_warmup_allguns);
842 warmup_start_weapons |= WepSet_FromWeapon(i);
844 warmup_start_weapons_default |= WepSet_FromWeapon(i);
846 warmup_start_weapons_defaultmask |= WepSet_FromWeapon(i);
852 start_items |= IT_JETPACK;
854 MUTATOR_CALLHOOK(SetStartItems);
856 if ((start_items & IT_JETPACK) || (g_grappling_hook && (start_weapons & WEPSET_HOOK)))
858 g_grappling_hook = 0; // these two can't coexist, as they use the same button
859 start_items |= IT_FUEL_REGEN;
860 start_ammo_fuel = max(start_ammo_fuel, cvar("g_balance_fuel_rotstable"));
861 warmup_start_ammo_fuel = max(warmup_start_ammo_fuel, cvar("g_balance_fuel_rotstable"));
864 WepSet precache_weapons = start_weapons;
865 if (g_warmup_allguns != 1)
866 precache_weapons |= warmup_start_weapons;
867 for (i = WEP_FIRST; i <= WEP_LAST; ++i)
869 e = get_weaponinfo(i);
870 if(precache_weapons & WepSet_FromWeapon(i))
871 weapon_action(i, WR_PRECACHE);
874 start_ammo_shells = max(0, start_ammo_shells);
875 start_ammo_nails = max(0, start_ammo_nails);
876 start_ammo_cells = max(0, start_ammo_cells);
877 start_ammo_rockets = max(0, start_ammo_rockets);
878 start_ammo_fuel = max(0, start_ammo_fuel);
880 warmup_start_ammo_shells = max(0, warmup_start_ammo_shells);
881 warmup_start_ammo_nails = max(0, warmup_start_ammo_nails);
882 warmup_start_ammo_cells = max(0, warmup_start_ammo_cells);
883 warmup_start_ammo_rockets = max(0, warmup_start_ammo_rockets);
884 warmup_start_ammo_fuel = max(0, warmup_start_ammo_fuel);
888 float g_bugrigs_planar_movement;
889 float g_bugrigs_planar_movement_car_jumping;
890 float g_bugrigs_reverse_spinning;
891 float g_bugrigs_reverse_speeding;
892 float g_bugrigs_reverse_stopping;
893 float g_bugrigs_air_steering;
894 float g_bugrigs_angle_smoothing;
895 float g_bugrigs_friction_floor;
896 float g_bugrigs_friction_brake;
897 float g_bugrigs_friction_air;
898 float g_bugrigs_accel;
899 float g_bugrigs_speed_ref;
900 float g_bugrigs_speed_pow;
901 float g_bugrigs_steer;
906 string GetGametype(); // g_world.qc
907 void readlevelcvars(void)
910 #define CHECK_MUTATOR_ADD(mut_cvar,mut_name,dependence) \
911 { if(cvar(mut_cvar) && dependence) { MUTATOR_ADD(mut_name); } }
913 CHECK_MUTATOR_ADD("g_dodging", mutator_dodging, 1);
914 CHECK_MUTATOR_ADD("g_spawn_near_teammate", mutator_spawn_near_teammate, 1);
915 CHECK_MUTATOR_ADD("g_physical_items", mutator_physical_items, 1);
916 CHECK_MUTATOR_ADD("g_touchexplode", mutator_touchexplode, 1);
917 CHECK_MUTATOR_ADD("g_minstagib", mutator_minstagib, 1);
918 CHECK_MUTATOR_ADD("g_invincible_projectiles", mutator_invincibleprojectiles, !cvar("g_minstagib"));
919 CHECK_MUTATOR_ADD("g_new_toys", mutator_new_toys, !cvar("g_minstagib"));
920 CHECK_MUTATOR_ADD("g_nix", mutator_nix, !cvar("g_minstagib"));
921 CHECK_MUTATOR_ADD("g_rocket_flying", mutator_rocketflying, !cvar("g_minstagib"));
922 CHECK_MUTATOR_ADD("g_vampire", mutator_vampire, !cvar("g_minstagib"));
923 CHECK_MUTATOR_ADD("g_superspectate", mutator_superspec, 1);
924 CHECK_MUTATOR_ADD("g_pinata", mutator_pinata, !cvar("g_minstagib"));
925 CHECK_MUTATOR_ADD("g_midair", mutator_midair, 1);
926 CHECK_MUTATOR_ADD("g_bloodloss", mutator_bloodloss, !cvar("g_minstagib"));
927 CHECK_MUTATOR_ADD("g_random_gravity", mutator_random_gravity, 1);
928 CHECK_MUTATOR_ADD("g_multijump", mutator_multijump, 1);
929 CHECK_MUTATOR_ADD("g_melee_only", mutator_melee_only, !cvar("g_minstagib"));
930 CHECK_MUTATOR_ADD("g_nades", mutator_nades, 1);
931 CHECK_MUTATOR_ADD("g_sandbox", sandbox, 1);
932 CHECK_MUTATOR_ADD("g_campcheck", mutator_campcheck, 1);
934 #undef CHECK_MUTATOR_ADD
936 if(cvar("sv_allow_fullbright"))
937 serverflags |= SERVERFLAG_ALLOW_FULLBRIGHT;
939 g_bugrigs = cvar("g_bugrigs");
940 g_bugrigs_planar_movement = cvar("g_bugrigs_planar_movement");
941 g_bugrigs_planar_movement_car_jumping = cvar("g_bugrigs_planar_movement_car_jumping");
942 g_bugrigs_reverse_spinning = cvar("g_bugrigs_reverse_spinning");
943 g_bugrigs_reverse_speeding = cvar("g_bugrigs_reverse_speeding");
944 g_bugrigs_reverse_stopping = cvar("g_bugrigs_reverse_stopping");
945 g_bugrigs_air_steering = cvar("g_bugrigs_air_steering");
946 g_bugrigs_angle_smoothing = cvar("g_bugrigs_angle_smoothing");
947 g_bugrigs_friction_floor = cvar("g_bugrigs_friction_floor");
948 g_bugrigs_friction_brake = cvar("g_bugrigs_friction_brake");
949 g_bugrigs_friction_air = cvar("g_bugrigs_friction_air");
950 g_bugrigs_accel = cvar("g_bugrigs_accel");
951 g_bugrigs_speed_ref = cvar("g_bugrigs_speed_ref");
952 g_bugrigs_speed_pow = cvar("g_bugrigs_speed_pow");
953 g_bugrigs_steer = cvar("g_bugrigs_steer");
955 g_minstagib = cvar("g_minstagib");
957 sv_clones = cvar("sv_clones");
958 sv_foginterval = cvar("sv_foginterval");
959 g_cloaked = cvar("g_cloaked");
961 g_cloaked = 1; // always enable cloak in CTS
962 g_footsteps = cvar("g_footsteps");
963 g_grappling_hook = cvar("g_grappling_hook");
964 g_jetpack = cvar("g_jetpack");
965 sv_maxidle = cvar("sv_maxidle");
966 sv_maxidle_spectatorsareidle = cvar("sv_maxidle_spectatorsareidle");
967 sv_autotaunt = cvar("sv_autotaunt");
968 sv_taunt = cvar("sv_taunt");
970 warmup_stage = cvar("g_warmup");
971 g_warmup_limit = cvar("g_warmup_limit");
972 g_warmup_allguns = cvar("g_warmup_allguns");
973 g_warmup_allow_timeout = cvar("g_warmup_allow_timeout");
975 if ((g_race && g_race_qualifying == 2) || g_assault || cvar("g_campaign"))
976 warmup_stage = 0; // these modes cannot work together, sorry
978 g_pickup_respawntime_weapon = cvar("g_pickup_respawntime_weapon");
979 g_pickup_respawntime_superweapon = cvar("g_pickup_respawntime_superweapon");
980 g_pickup_respawntime_ammo = cvar("g_pickup_respawntime_ammo");
981 g_pickup_respawntime_short = cvar("g_pickup_respawntime_short");
982 g_pickup_respawntime_medium = cvar("g_pickup_respawntime_medium");
983 g_pickup_respawntime_long = cvar("g_pickup_respawntime_long");
984 g_pickup_respawntime_powerup = cvar("g_pickup_respawntime_powerup");
985 g_pickup_respawntimejitter_weapon = cvar("g_pickup_respawntimejitter_weapon");
986 g_pickup_respawntimejitter_superweapon = cvar("g_pickup_respawntimejitter_superweapon");
987 g_pickup_respawntimejitter_ammo = cvar("g_pickup_respawntimejitter_ammo");
988 g_pickup_respawntimejitter_short = cvar("g_pickup_respawntimejitter_short");
989 g_pickup_respawntimejitter_medium = cvar("g_pickup_respawntimejitter_medium");
990 g_pickup_respawntimejitter_long = cvar("g_pickup_respawntimejitter_long");
991 g_pickup_respawntimejitter_powerup = cvar("g_pickup_respawntimejitter_powerup");
993 g_weaponspeedfactor = cvar("g_weaponspeedfactor");
994 g_weaponratefactor = cvar("g_weaponratefactor");
995 g_weapondamagefactor = cvar("g_weapondamagefactor");
996 g_weaponforcefactor = cvar("g_weaponforcefactor");
997 g_weaponspreadfactor = cvar("g_weaponspreadfactor");
999 g_pickup_shells = cvar("g_pickup_shells");
1000 g_pickup_shells_max = cvar("g_pickup_shells_max");
1001 g_pickup_nails = cvar("g_pickup_nails");
1002 g_pickup_nails_max = cvar("g_pickup_nails_max");
1003 g_pickup_rockets = cvar("g_pickup_rockets");
1004 g_pickup_rockets_max = cvar("g_pickup_rockets_max");
1005 g_pickup_cells = cvar("g_pickup_cells");
1006 g_pickup_cells_max = cvar("g_pickup_cells_max");
1007 g_pickup_fuel = cvar("g_pickup_fuel");
1008 g_pickup_fuel_jetpack = cvar("g_pickup_fuel_jetpack");
1009 g_pickup_fuel_max = cvar("g_pickup_fuel_max");
1010 g_pickup_armorsmall = cvar("g_pickup_armorsmall");
1011 g_pickup_armorsmall_max = cvar("g_pickup_armorsmall_max");
1012 g_pickup_armorsmall_anyway = cvar("g_pickup_armorsmall_anyway");
1013 g_pickup_armormedium = cvar("g_pickup_armormedium");
1014 g_pickup_armormedium_max = cvar("g_pickup_armormedium_max");
1015 g_pickup_armormedium_anyway = cvar("g_pickup_armormedium_anyway");
1016 g_pickup_armorbig = cvar("g_pickup_armorbig");
1017 g_pickup_armorbig_max = cvar("g_pickup_armorbig_max");
1018 g_pickup_armorbig_anyway = cvar("g_pickup_armorbig_anyway");
1019 g_pickup_armorlarge = cvar("g_pickup_armorlarge");
1020 g_pickup_armorlarge_max = cvar("g_pickup_armorlarge_max");
1021 g_pickup_armorlarge_anyway = cvar("g_pickup_armorlarge_anyway");
1022 g_pickup_healthsmall = cvar("g_pickup_healthsmall");
1023 g_pickup_healthsmall_max = cvar("g_pickup_healthsmall_max");
1024 g_pickup_healthsmall_anyway = cvar("g_pickup_healthsmall_anyway");
1025 g_pickup_healthmedium = cvar("g_pickup_healthmedium");
1026 g_pickup_healthmedium_max = cvar("g_pickup_healthmedium_max");
1027 g_pickup_healthmedium_anyway = cvar("g_pickup_healthmedium_anyway");
1028 g_pickup_healthlarge = cvar("g_pickup_healthlarge");
1029 g_pickup_healthlarge_max = cvar("g_pickup_healthlarge_max");
1030 g_pickup_healthlarge_anyway = cvar("g_pickup_healthlarge_anyway");
1031 g_pickup_healthmega = cvar("g_pickup_healthmega");
1032 g_pickup_healthmega_max = cvar("g_pickup_healthmega_max");
1033 g_pickup_healthmega_anyway = cvar("g_pickup_healthmega_anyway");
1035 g_pickup_ammo_anyway = cvar("g_pickup_ammo_anyway");
1036 g_pickup_weapons_anyway = cvar("g_pickup_weapons_anyway");
1038 g_weapon_stay = cvar(strcat("g_", GetGametype(), "_weapon_stay"));
1040 g_weapon_stay = cvar("g_weapon_stay");
1043 game_starttime = time + cvar("g_start_delay");
1045 readplayerstartcvars();
1051 string precache_sound (string s) = #19;
1052 float precache_sound_index (string s) = #19;
1054 #define SND_VOLUME 1
1055 #define SND_ATTENUATION 2
1056 #define SND_LARGEENTITY 8
1057 #define SND_LARGESOUND 16
1059 float sound_allowed(float dest, entity e)
1061 // sounds from world may always pass
1064 if (e.classname == "body")
1066 else if (e.realowner && e.realowner != e)
1068 else if (e.owner && e.owner != e)
1073 // sounds to self may always pass
1074 if (dest == MSG_ONE)
1075 if (e == msg_entity)
1077 // sounds by players can be removed
1078 if (autocvar_bot_sound_monopoly)
1079 if (IS_REAL_CLIENT(e))
1081 // anything else may pass
1085 #ifdef COMPAT_XON010_CHANNELS
1086 void(entity e, float chan, string samp, float vol, float atten) builtin_sound = #8;
1087 void sound(entity e, float chan, string samp, float vol, float atten)
1089 if (!sound_allowed(MSG_BROADCAST, e))
1091 builtin_sound(e, chan, samp, vol, atten);
1095 void sound(entity e, float chan, string samp, float vol, float atten)
1097 if (!sound_allowed(MSG_BROADCAST, e))
1099 sound7(e, chan, samp, vol, atten, 0, 0);
1103 void soundtoat(float dest, entity e, vector o, float chan, string samp, float vol, float atten)
1107 if (!sound_allowed(dest, e))
1110 entno = num_for_edict(e);
1111 idx = precache_sound_index(samp);
1116 atten = floor(atten * 64);
1117 vol = floor(vol * 255);
1120 sflags |= SND_VOLUME;
1122 sflags |= SND_ATTENUATION;
1123 if (entno >= 8192 || chan < 0 || chan > 7)
1124 sflags |= SND_LARGEENTITY;
1126 sflags |= SND_LARGESOUND;
1128 WriteByte(dest, SVC_SOUND);
1129 WriteByte(dest, sflags);
1130 if (sflags & SND_VOLUME)
1131 WriteByte(dest, vol);
1132 if (sflags & SND_ATTENUATION)
1133 WriteByte(dest, atten);
1134 if (sflags & SND_LARGEENTITY)
1136 WriteShort(dest, entno);
1137 WriteByte(dest, chan);
1141 WriteShort(dest, entno * 8 + chan);
1143 if (sflags & SND_LARGESOUND)
1144 WriteShort(dest, idx);
1146 WriteByte(dest, idx);
1148 WriteCoord(dest, o_x);
1149 WriteCoord(dest, o_y);
1150 WriteCoord(dest, o_z);
1152 void soundto(float dest, entity e, float chan, string samp, float vol, float atten)
1156 if (!sound_allowed(dest, e))
1159 o = e.origin + 0.5 * (e.mins + e.maxs);
1160 soundtoat(dest, e, o, chan, samp, vol, atten);
1162 void soundat(entity e, vector o, float chan, string samp, float vol, float atten)
1164 soundtoat(((chan & 8) ? MSG_ALL : MSG_BROADCAST), e, o, chan, samp, vol, atten);
1166 void stopsoundto(float dest, entity e, float chan)
1170 if (!sound_allowed(dest, e))
1173 entno = num_for_edict(e);
1175 if (entno >= 8192 || chan < 0 || chan > 7)
1178 idx = precache_sound_index("misc/null.wav");
1179 sflags = SND_LARGEENTITY;
1181 sflags |= SND_LARGESOUND;
1182 WriteByte(dest, SVC_SOUND);
1183 WriteByte(dest, sflags);
1184 WriteShort(dest, entno);
1185 WriteByte(dest, chan);
1186 if (sflags & SND_LARGESOUND)
1187 WriteShort(dest, idx);
1189 WriteByte(dest, idx);
1190 WriteCoord(dest, e.origin_x);
1191 WriteCoord(dest, e.origin_y);
1192 WriteCoord(dest, e.origin_z);
1196 WriteByte(dest, SVC_STOPSOUND);
1197 WriteShort(dest, entno * 8 + chan);
1200 void stopsound(entity e, float chan)
1202 if (!sound_allowed(MSG_BROADCAST, e))
1205 stopsoundto(MSG_BROADCAST, e, chan); // unreliable, gets there fast
1206 stopsoundto(MSG_ALL, e, chan); // in case of packet loss
1209 void play2(entity e, string filename)
1211 //stuffcmd(e, strcat("play2 ", filename, "\n"));
1213 soundtoat(MSG_ONE, world, '0 0 0', CH_INFO, filename, VOL_BASE, ATTEN_NONE);
1216 // use this one if you might be causing spam (e.g. from touch functions that might get called more than once per frame)
1218 float spamsound(entity e, float chan, string samp, float vol, float atten)
1220 if (!sound_allowed(MSG_BROADCAST, e))
1223 if (time > e.spamtime)
1226 sound(e, chan, samp, vol, atten);
1232 void play2team(float t, string filename)
1236 if (autocvar_bot_sound_monopoly)
1239 FOR_EACH_REALPLAYER(head)
1242 play2(head, filename);
1246 void play2all(string samp)
1248 if (autocvar_bot_sound_monopoly)
1251 sound(world, CH_INFO, samp, VOL_BASE, ATTEN_NONE);
1254 void PrecachePlayerSounds(string f);
1255 void precache_playermodel(string m)
1257 float globhandle, i, n;
1260 if(substring(m, -9,5) == "_lod1")
1262 if(substring(m, -9,5) == "_lod2")
1265 f = strcat(substring(m, 0, -5), "_lod1", substring(m, -4, -1));
1268 f = strcat(substring(m, 0, -5), "_lod2", substring(m, -4, -1));
1272 globhandle = search_begin(strcat(m, "_*.sounds"), TRUE, FALSE);
1275 n = search_getsize(globhandle);
1276 for (i = 0; i < n; ++i)
1278 //print(search_getfilename(globhandle, i), "\n");
1279 f = search_getfilename(globhandle, i);
1280 PrecachePlayerSounds(f);
1282 search_end(globhandle);
1284 void precache_all_playermodels(string pattern)
1286 float globhandle, i, n;
1289 globhandle = search_begin(pattern, TRUE, FALSE);
1292 n = search_getsize(globhandle);
1293 for (i = 0; i < n; ++i)
1295 //print(search_getfilename(globhandle, i), "\n");
1296 f = search_getfilename(globhandle, i);
1297 precache_playermodel(f);
1299 search_end(globhandle);
1304 // gamemode related things
1305 precache_model ("models/misc/chatbubble.spr");
1307 #ifdef TTURRETS_ENABLED
1308 if (autocvar_g_turrets)
1312 // Precache all player models if desired
1313 if (autocvar_sv_precacheplayermodels)
1315 PrecachePlayerSounds("sound/player/default.sounds");
1316 precache_all_playermodels("models/player/*.zym");
1317 precache_all_playermodels("models/player/*.dpm");
1318 precache_all_playermodels("models/player/*.md3");
1319 precache_all_playermodels("models/player/*.psk");
1320 precache_all_playermodels("models/player/*.iqm");
1323 if (autocvar_sv_defaultcharacter)
1326 s = autocvar_sv_defaultplayermodel_red;
1328 precache_playermodel(s);
1329 s = autocvar_sv_defaultplayermodel_blue;
1331 precache_playermodel(s);
1332 s = autocvar_sv_defaultplayermodel_yellow;
1334 precache_playermodel(s);
1335 s = autocvar_sv_defaultplayermodel_pink;
1337 precache_playermodel(s);
1338 s = autocvar_sv_defaultplayermodel;
1340 precache_playermodel(s);
1345 PrecacheGlobalSound((globalsound_step = "misc/footstep0 6"));
1346 PrecacheGlobalSound((globalsound_metalstep = "misc/metalfootstep0 6"));
1349 // gore and miscellaneous sounds
1350 //precache_sound ("misc/h2ohit.wav");
1351 precache_model ("models/hook.md3");
1352 precache_sound ("misc/armorimpact.wav");
1353 precache_sound ("misc/bodyimpact1.wav");
1354 precache_sound ("misc/bodyimpact2.wav");
1355 precache_sound ("misc/gib.wav");
1356 precache_sound ("misc/gib_splat01.wav");
1357 precache_sound ("misc/gib_splat02.wav");
1358 precache_sound ("misc/gib_splat03.wav");
1359 precache_sound ("misc/gib_splat04.wav");
1360 PrecacheGlobalSound((globalsound_fall = "misc/hitground 4"));
1361 PrecacheGlobalSound((globalsound_metalfall = "misc/metalhitground 4"));
1362 precache_sound ("misc/null.wav");
1363 precache_sound ("misc/spawn.wav");
1364 precache_sound ("misc/talk.wav");
1365 precache_sound ("misc/teleport.wav");
1366 precache_sound ("misc/poweroff.wav");
1367 precache_sound ("player/lava.wav");
1368 precache_sound ("player/slime.wav");
1370 precache_model ("models/sprites/0.spr32");
1371 precache_model ("models/sprites/1.spr32");
1372 precache_model ("models/sprites/2.spr32");
1373 precache_model ("models/sprites/3.spr32");
1374 precache_model ("models/sprites/4.spr32");
1375 precache_model ("models/sprites/5.spr32");
1376 precache_model ("models/sprites/6.spr32");
1377 precache_model ("models/sprites/7.spr32");
1378 precache_model ("models/sprites/8.spr32");
1379 precache_model ("models/sprites/9.spr32");
1380 precache_model ("models/sprites/10.spr32");
1382 // common weapon precaches
1383 precache_sound ("weapons/reload.wav"); // until weapons have individual reload sounds, precache the reload sound here
1384 precache_sound ("weapons/weapon_switch.wav");
1385 precache_sound ("weapons/weaponpickup.wav");
1386 precache_sound ("weapons/unavailable.wav");
1387 precache_sound ("weapons/dryfire.wav");
1388 if (g_grappling_hook)
1390 precache_sound ("weapons/hook_fire.wav"); // hook
1391 precache_sound ("weapons/hook_impact.wav"); // hook
1394 if(autocvar_sv_precacheweapons)
1396 //precache weapon models/sounds
1399 while (wep <= WEP_LAST)
1401 weapon_action(wep, WR_PRECACHE);
1406 precache_model("models/elaser.mdl");
1407 precache_model("models/laser.mdl");
1408 precache_model("models/ebomb.mdl");
1411 // Disabled this code because it simply does not work (e.g. ignores bgmvolume, overlaps with "cd loop" controlled tracks).
1413 if (!self.noise && self.music) // quake 3 uses the music field
1414 self.noise = self.music;
1416 // plays music for the level if there is any
1419 precache_sound (self.noise);
1420 ambientsound ('0 0 0', self.noise, VOL_BASE, ATTEN_NONE);
1424 #include "precache-for-csqc.inc"
1427 // WARNING: this kills the trace globals
1428 #define EXACTTRIGGER_TOUCH if(WarpZoneLib_ExactTrigger_Touch()) return
1429 #define EXACTTRIGGER_INIT WarpZoneLib_ExactTrigger_Init()
1431 #define INITPRIO_FIRST 0
1432 #define INITPRIO_GAMETYPE 0
1433 #define INITPRIO_GAMETYPE_FALLBACK 1
1434 #define INITPRIO_FINDTARGET 10
1435 #define INITPRIO_DROPTOFLOOR 20
1436 #define INITPRIO_SETLOCATION 90
1437 #define INITPRIO_LINKDOORS 91
1438 #define INITPRIO_LAST 99
1440 .void(void) initialize_entity;
1441 .float initialize_entity_order;
1442 .entity initialize_entity_next;
1443 entity initialize_entity_first;
1445 void make_safe_for_remove(entity e)
1447 if (e.initialize_entity)
1449 entity ent, prev = world;
1450 for (ent = initialize_entity_first; ent; )
1452 if ((ent == e) || ((ent.classname == "initialize_entity") && (ent.enemy == e)))
1454 //print("make_safe_for_remove: getting rid of initializer ", etos(ent), "\n");
1455 // skip it in linked list
1458 prev.initialize_entity_next = ent.initialize_entity_next;
1459 ent = prev.initialize_entity_next;
1463 initialize_entity_first = ent.initialize_entity_next;
1464 ent = initialize_entity_first;
1470 ent = ent.initialize_entity_next;
1476 void objerror(string s)
1478 make_safe_for_remove(self);
1479 builtin_objerror(s);
1482 .float remove_except_protected_forbidden;
1483 void remove_except_protected(entity e)
1485 if(e.remove_except_protected_forbidden)
1486 error("not allowed to remove this at this point");
1490 void remove_unsafely(entity e)
1492 if(e.classname == "spike")
1493 error("Removing spikes is forbidden (crylink bug), please report");
1497 void remove_safely(entity e)
1499 make_safe_for_remove(e);
1503 void InitializeEntity(entity e, void(void) func, float order)
1507 if (!e || e.initialize_entity)
1509 // make a proxy initializer entity
1513 e.classname = "initialize_entity";
1517 e.initialize_entity = func;
1518 e.initialize_entity_order = order;
1520 cur = initialize_entity_first;
1524 if (!cur || cur.initialize_entity_order > order)
1526 // insert between prev and cur
1528 prev.initialize_entity_next = e;
1530 initialize_entity_first = e;
1531 e.initialize_entity_next = cur;
1535 cur = cur.initialize_entity_next;
1538 void InitializeEntitiesRun()
1541 startoflist = initialize_entity_first;
1542 initialize_entity_first = world;
1543 remove = remove_except_protected;
1544 for (self = startoflist; self; self = self.initialize_entity_next)
1546 self.remove_except_protected_forbidden = 1;
1548 for (self = startoflist; self; )
1551 var void(void) func;
1552 e = self.initialize_entity_next;
1553 func = self.initialize_entity;
1554 self.initialize_entity_order = 0;
1555 self.initialize_entity = func_null;
1556 self.initialize_entity_next = world;
1557 self.remove_except_protected_forbidden = 0;
1558 if (self.classname == "initialize_entity")
1562 builtin_remove(self);
1565 //dprint("Delayed initialization: ", self.classname, "\n");
1571 backtrace(strcat("Null function in: ", self.classname, "\n"));
1575 remove = remove_unsafely;
1578 .float uncustomizeentityforclient_set;
1579 .void(void) uncustomizeentityforclient;
1580 void UncustomizeEntitiesRun()
1584 for (self = world; (self = findfloat(self, uncustomizeentityforclient_set, 1)); )
1585 self.uncustomizeentityforclient();
1588 void SetCustomizer(entity e, float(void) customizer, void(void) uncustomizer)
1590 e.customizeentityforclient = customizer;
1591 e.uncustomizeentityforclient = uncustomizer;
1592 e.uncustomizeentityforclient_set = !!uncustomizer;
1596 #define IFTARGETED if(!self.nottargeted && self.targetname != "")
1599 void Net_LinkEntity(entity e, float docull, float dt, float(entity, float) sendfunc)
1603 if (e.classname == "")
1604 e.classname = "net_linked";
1606 if (e.model == "" || self.modelindex == 0)
1610 setmodel(e, "null");
1614 e.SendEntity = sendfunc;
1615 e.SendFlags = 0xFFFFFF;
1618 e.effects |= EF_NODEPTHTEST;
1622 e.nextthink = time + dt;
1623 e.think = SUB_Remove;
1627 void adaptor_think2touch()
1636 void adaptor_think2use()
1648 void adaptor_think2use_hittype_splash() // for timed projectile detonation
1650 if(!(self.flags & FL_ONGROUND)) // if onground, we ARE touching something, but HITTYPE_SPLASH is to be networked if the damage causing projectile is not touching ANYTHING
1651 self.projectiledeathtype |= HITTYPE_SPLASH;
1652 adaptor_think2use();
1655 // deferred dropping
1656 void DropToFloor_Handler()
1658 builtin_droptofloor();
1659 self.dropped_origin = self.origin;
1664 InitializeEntity(self, DropToFloor_Handler, INITPRIO_DROPTOFLOOR);
1669 float trace_hits_box_a0, trace_hits_box_a1;
1671 float trace_hits_box_1d(float end, float thmi, float thma)
1675 // just check if x is in range
1683 // do the trace with respect to x
1684 // 0 -> end has to stay in thmi -> thma
1685 trace_hits_box_a0 = max(trace_hits_box_a0, min(thmi / end, thma / end));
1686 trace_hits_box_a1 = min(trace_hits_box_a1, max(thmi / end, thma / end));
1687 if (trace_hits_box_a0 > trace_hits_box_a1)
1693 float trace_hits_box(vector start, vector end, vector thmi, vector thma)
1698 // now it is a trace from 0 to end
1700 trace_hits_box_a0 = 0;
1701 trace_hits_box_a1 = 1;
1703 if (!trace_hits_box_1d(end_x, thmi_x, thma_x))
1705 if (!trace_hits_box_1d(end_y, thmi_y, thma_y))
1707 if (!trace_hits_box_1d(end_z, thmi_z, thma_z))
1713 float tracebox_hits_box(vector start, vector mi, vector ma, vector end, vector thmi, vector thma)
1715 return trace_hits_box(start, end, thmi - ma, thma - mi);
1718 float SUB_NoImpactCheck()
1720 // zero hitcontents = this is not the real impact, but either the
1721 // mirror-impact of something hitting the projectile instead of the
1722 // projectile hitting the something, or a touchareagrid one. Neither of
1723 // these stop the projectile from moving, so...
1724 if(trace_dphitcontents == 0)
1726 //dprint("A hit happened with zero hit contents... DEBUG THIS, this should never happen for projectiles! Projectile will self-destruct.\n");
1727 dprint(sprintf("A hit from a projectile happened with no hit contents! DEBUG THIS, this should never happen for projectiles! Profectile will self-destruct. (edict: %d, classname: %s, origin: %s)\n", num_for_edict(self), self.classname, vtos(self.origin)));
1730 if (trace_dphitq3surfaceflags & Q3SURFACEFLAG_NOIMPACT)
1732 if (other == world && self.size != '0 0 0')
1735 tic = self.velocity * sys_frametime;
1736 tic = tic + normalize(tic) * vlen(self.maxs - self.mins);
1737 traceline(self.origin - tic, self.origin + tic, MOVE_NORMAL, self);
1738 if (trace_fraction >= 1)
1740 dprint("Odd... did not hit...?\n");
1742 else if (trace_dphitq3surfaceflags & Q3SURFACEFLAG_NOIMPACT)
1744 dprint("Detected and prevented the sky-grapple bug.\n");
1752 #define SUB_OwnerCheck() (other && (other == self.owner))
1754 void RemoveGrapplingHook(entity pl);
1755 void W_Crylink_Dequeue(entity e);
1756 float WarpZone_Projectile_Touch_ImpactFilter_Callback()
1758 if(SUB_OwnerCheck())
1760 if(SUB_NoImpactCheck())
1762 if(self.classname == "grapplinghook")
1763 RemoveGrapplingHook(self.realowner);
1764 else if(self.classname == "spike")
1766 W_Crylink_Dequeue(self);
1773 if(trace_ent && trace_ent.solid > SOLID_TRIGGER)
1774 UpdateCSQCProjectile(self);
1777 #define PROJECTILE_TOUCH if(WarpZone_Projectile_Touch()) return
1779 #define ITEM_TOUCH_NEEDKILL() (((trace_dpstartcontents | trace_dphitcontents) & DPCONTENTS_NODROP) || (trace_dphitq3surfaceflags & Q3SURFACEFLAG_SKY))
1780 #define ITEM_DAMAGE_NEEDKILL(dt) (((dt) == DEATH_HURTTRIGGER) || ((dt) == DEATH_SLIME) || ((dt) == DEATH_LAVA) || ((dt) == DEATH_SWAMP))
1782 void URI_Get_Callback(float id, float status, string data)
1784 if(url_URI_Get_Callback(id, status, data))
1788 else if (id == URI_GET_DISCARD)
1792 else if (id >= URI_GET_CURL && id <= URI_GET_CURL_END)
1795 Curl_URI_Get_Callback(id, status, data);
1797 else if (id >= URI_GET_IPBAN && id <= URI_GET_IPBAN_END)
1800 OnlineBanList_URI_Get_Callback(id, status, data);
1804 print("Received HTTP request data for an invalid id ", ftos(id), ".\n");
1808 string uid2name(string myuid) {
1810 s = db_get(ServerProgsDB, strcat("/uid2name/", myuid));
1812 // FIXME remove this later after 0.6 release
1813 // convert old style broken records to correct style
1816 s = db_get(ServerProgsDB, strcat("uid2name", myuid));
1819 db_put(ServerProgsDB, strcat("/uid2name/", myuid), s);
1820 db_put(ServerProgsDB, strcat("uid2name", myuid), "");
1825 s = "^1Unregistered Player";
1829 float race_readTime(string map, float pos)
1837 return stof(db_get(ServerProgsDB, strcat(map, rr, "time", ftos(pos))));
1840 string race_readUID(string map, float pos)
1848 return db_get(ServerProgsDB, strcat(map, rr, "crypto_idfp", ftos(pos)));
1851 float race_readPos(string map, float t) {
1853 for (i = 1; i <= RANKINGS_CNT; ++i)
1854 if (race_readTime(map, i) == 0 || race_readTime(map, i) > t)
1857 return 0; // pos is zero if unranked
1860 void race_writeTime(string map, float t, string myuid)
1869 newpos = race_readPos(map, t);
1871 float i, prevpos = 0;
1872 for(i = 1; i <= RANKINGS_CNT; ++i)
1874 if(race_readUID(map, i) == myuid)
1877 if (prevpos) { // player improved his existing record, only have to iterate on ranks between new and old recs
1878 for (i = prevpos; i > newpos; --i) {
1879 db_put(ServerProgsDB, strcat(map, rr, "time", ftos(i)), ftos(race_readTime(map, i - 1)));
1880 db_put(ServerProgsDB, strcat(map, rr, "crypto_idfp", ftos(i)), race_readUID(map, i - 1));
1882 } else { // player has no ranked record yet
1883 for (i = RANKINGS_CNT; i > newpos; --i) {
1884 db_put(ServerProgsDB, strcat(map, rr, "time", ftos(i)), ftos(race_readTime(map, i - 1)));
1885 db_put(ServerProgsDB, strcat(map, rr, "crypto_idfp", ftos(i)), race_readUID(map, i - 1));
1889 // store new time itself
1890 db_put(ServerProgsDB, strcat(map, rr, "time", ftos(newpos)), ftos(t));
1891 db_put(ServerProgsDB, strcat(map, rr, "crypto_idfp", ftos(newpos)), myuid);
1894 string race_readName(string map, float pos)
1902 return uid2name(db_get(ServerProgsDB, strcat(map, rr, "crypto_idfp", ftos(pos))));
1905 float MoveToRandomMapLocation(entity e, float goodcontents, float badcontents, float badsurfaceflags, float attempts, float maxaboveground, float minviewdistance)
1908 vector start, org, delta, end, enddown, mstart;
1911 m = e.dphitcontentsmask;
1912 e.dphitcontentsmask = goodcontents | badcontents;
1915 delta = world.maxs - world.mins;
1919 for (i = 0; i < attempts; ++i)
1921 start_x = org_x + random() * delta_x;
1922 start_y = org_y + random() * delta_y;
1923 start_z = org_z + random() * delta_z;
1925 // rule 1: start inside world bounds, and outside
1926 // solid, and don't start from somewhere where you can
1927 // fall down to evil
1928 tracebox(start, e.mins, e.maxs, start - '0 0 1' * delta_z, MOVE_NORMAL, e);
1929 if (trace_fraction >= 1)
1931 if (trace_startsolid)
1933 if (trace_dphitcontents & badcontents)
1935 if (trace_dphitq3surfaceflags & badsurfaceflags)
1938 // rule 2: if we are too high, lower the point
1939 if (trace_fraction * delta_z > maxaboveground)
1940 start = trace_endpos + '0 0 1' * maxaboveground;
1941 enddown = trace_endpos;
1943 // rule 3: make sure we aren't outside the map. This only works
1944 // for somewhat well formed maps. A good rule of thumb is that
1945 // the map should have a convex outside hull.
1946 // these can be traceLINES as we already verified the starting box
1947 mstart = start + 0.5 * (e.mins + e.maxs);
1948 traceline(mstart, mstart + '1 0 0' * delta_x, MOVE_NORMAL, e);
1949 if (trace_fraction >= 1 || trace_dphittexturename == "common/caulk")
1951 traceline(mstart, mstart - '1 0 0' * delta_x, MOVE_NORMAL, e);
1952 if (trace_fraction >= 1 || trace_dphittexturename == "common/caulk")
1954 traceline(mstart, mstart + '0 1 0' * delta_y, MOVE_NORMAL, e);
1955 if (trace_fraction >= 1 || trace_dphittexturename == "common/caulk")
1957 traceline(mstart, mstart - '0 1 0' * delta_y, MOVE_NORMAL, e);
1958 if (trace_fraction >= 1 || trace_dphittexturename == "common/caulk")
1960 traceline(mstart, mstart + '0 0 1' * delta_z, MOVE_NORMAL, e);
1961 if (trace_fraction >= 1 || trace_dphittexturename == "common/caulk")
1964 // rule 4: we must "see" some spawnpoint or item
1965 for(sp = world; (sp = find(sp, classname, "info_player_deathmatch")); )
1966 if(checkpvs(mstart, sp))
1967 if((traceline(mstart, sp.origin, MOVE_NORMAL, e), trace_fraction) >= 1)
1971 for(sp = world; (sp = findflags(sp, flags, FL_ITEM)); )
1972 if(checkpvs(mstart, sp))
1973 if((traceline(mstart, sp.origin + (sp.mins + sp.maxs) * 0.5, MOVE_NORMAL, e), trace_fraction) >= 1)
1979 // find a random vector to "look at"
1980 end_x = org_x + random() * delta_x;
1981 end_y = org_y + random() * delta_y;
1982 end_z = org_z + random() * delta_z;
1983 end = start + normalize(end - start) * vlen(delta);
1985 // rule 4: start TO end must not be too short
1986 tracebox(start, e.mins, e.maxs, end, MOVE_NORMAL, e);
1987 if (trace_startsolid)
1989 if (trace_fraction < minviewdistance / vlen(delta))
1992 // rule 5: don't want to look at sky
1993 if (trace_dphitq3surfaceflags & Q3SURFACEFLAG_SKY)
1996 // rule 6: we must not end up in trigger_hurt
1997 if (tracebox_hits_trigger_hurt(start, e.mins, e.maxs, enddown))
2003 e.dphitcontentsmask = m;
2007 setorigin(e, start);
2008 e.angles = vectoangles(end - start);
2009 dprint("Needed ", ftos(i + 1), " attempts\n");
2016 float zcurveparticles_effectno;
2017 vector zcurveparticles_start;
2018 float zcurveparticles_spd;
2020 void endzcurveparticles()
2022 if(zcurveparticles_effectno)
2025 WriteShort(MSG_BROADCAST, zcurveparticles_spd | 0x8000);
2027 zcurveparticles_effectno = 0;
2030 void zcurveparticles(float effectno, vector start, vector end, float end_dz, float spd)
2032 spd = bound(0, floor(spd / 16), 32767);
2033 if(effectno != zcurveparticles_effectno || start != zcurveparticles_start)
2035 endzcurveparticles();
2036 WriteByte(MSG_BROADCAST, SVC_TEMPENTITY);
2037 WriteByte(MSG_BROADCAST, TE_CSQC_ZCURVEPARTICLES);
2038 WriteShort(MSG_BROADCAST, effectno);
2039 WriteCoord(MSG_BROADCAST, start_x);
2040 WriteCoord(MSG_BROADCAST, start_y);
2041 WriteCoord(MSG_BROADCAST, start_z);
2042 zcurveparticles_effectno = effectno;
2043 zcurveparticles_start = start;
2046 WriteShort(MSG_BROADCAST, zcurveparticles_spd);
2047 WriteCoord(MSG_BROADCAST, end_x);
2048 WriteCoord(MSG_BROADCAST, end_y);
2049 WriteCoord(MSG_BROADCAST, end_z);
2050 WriteCoord(MSG_BROADCAST, end_dz);
2051 zcurveparticles_spd = spd;
2054 void zcurveparticles_from_tracetoss(float effectno, vector start, vector end, vector vel)
2057 vector vecxy, velxy;
2059 vecxy = end - start;
2064 if (vlen(velxy) < 0.000001 * fabs(vel_z))
2066 endzcurveparticles();
2067 trailparticles(world, effectno, start, end);
2071 end_dz = vlen(vecxy) / vlen(velxy) * vel_z - (end_z - start_z);
2072 zcurveparticles(effectno, start, end, end_dz, vlen(vel));
2075 void write_recordmarker(entity pl, float tstart, float dt)
2077 GameLogEcho(strcat(":recordset:", ftos(pl.playerid), ":", ftos(dt)));
2079 // also write a marker into demo files for demotc-race-record-extractor to find
2082 strcat("//", strconv(2, 0, 0, GetGametype()), " RECORD SET ", TIME_ENCODED_TOSTRING(TIME_ENCODE(dt))),
2083 " ", ftos(tstart), " ", ftos(dt), "\n"));
2086 vector shotorg_adjustfromclient(vector vecs, float y_is_right, float allowcenter, float algn)
2099 if(allowcenter) // 2: allow center handedness
2112 if(allowcenter) // 2: allow center handedness
2128 vector shotorg_adjust_values(vector vecs, float y_is_right, float visual, float algn)
2133 if (autocvar_g_shootfromeye)
2137 if (autocvar_g_shootfromclient) { vecs = shotorg_adjustfromclient(vecs, y_is_right, (autocvar_g_shootfromclient >= 2), algn); }
2138 else { vecs_y = 0; vecs_z -= 2; }
2146 else if (autocvar_g_shootfromcenter)
2151 else if ((s = autocvar_g_shootfromfixedorigin) != "")
2161 else if (autocvar_g_shootfromclient)
2163 vecs = shotorg_adjustfromclient(vecs, y_is_right, (autocvar_g_shootfromclient >= 2), algn);
2168 vector shotorg_adjust(vector vecs, float y_is_right, float visual)
2170 return shotorg_adjust_values(vecs, y_is_right, visual, self.owner.cvar_cl_gunalign);
2174 void attach_sameorigin(entity e, entity to, string tag)
2176 vector org, t_forward, t_left, t_up, e_forward, e_up;
2179 org = e.origin - gettaginfo(to, gettagindex(to, tag));
2180 tagscale = pow(vlen(v_forward), -2); // undo a scale on the tag
2181 t_forward = v_forward * tagscale;
2182 t_left = v_right * -tagscale;
2183 t_up = v_up * tagscale;
2185 e.origin_x = org * t_forward;
2186 e.origin_y = org * t_left;
2187 e.origin_z = org * t_up;
2189 // current forward and up directions
2190 if (substring(e.model, 0, 1) == "*") // bmodels have their own rules
2191 e.angles = AnglesTransform_FromVAngles(e.angles);
2193 e.angles = AnglesTransform_FromAngles(e.angles);
2194 fixedmakevectors(e.angles);
2196 // untransform forward, up!
2197 e_forward_x = v_forward * t_forward;
2198 e_forward_y = v_forward * t_left;
2199 e_forward_z = v_forward * t_up;
2200 e_up_x = v_up * t_forward;
2201 e_up_y = v_up * t_left;
2202 e_up_z = v_up * t_up;
2204 e.angles = fixedvectoangles2(e_forward, e_up);
2205 if (substring(e.model, 0, 1) == "*") // bmodels have their own rules
2206 e.angles = AnglesTransform_ToVAngles(e.angles);
2208 e.angles = AnglesTransform_ToAngles(e.angles);
2210 setattachment(e, to, tag);
2211 setorigin(e, e.origin);
2214 void detach_sameorigin(entity e)
2217 org = gettaginfo(e, 0);
2218 e.angles = fixedvectoangles2(v_forward, v_up);
2219 if (substring(e.model, 0, 1) == "*") // bmodels have their own rules
2220 e.angles = AnglesTransform_ToVAngles(e.angles);
2222 e.angles = AnglesTransform_ToAngles(e.angles);
2224 setattachment(e, world, "");
2225 setorigin(e, e.origin);
2228 void follow_sameorigin(entity e, entity to)
2230 e.movetype = MOVETYPE_FOLLOW; // make the hole follow
2231 e.aiment = to; // make the hole follow bmodel
2232 e.punchangle = to.angles; // the original angles of bmodel
2233 e.view_ofs = e.origin - to.origin; // relative origin
2234 e.v_angle = e.angles - to.angles; // relative angles
2237 void unfollow_sameorigin(entity e)
2239 e.movetype = MOVETYPE_NONE;
2242 entity gettaginfo_relative_ent;
2243 vector gettaginfo_relative(entity e, float tag)
2245 if (!gettaginfo_relative_ent)
2247 gettaginfo_relative_ent = spawn();
2248 gettaginfo_relative_ent.effects = EF_NODRAW;
2250 gettaginfo_relative_ent.model = e.model;
2251 gettaginfo_relative_ent.modelindex = e.modelindex;
2252 gettaginfo_relative_ent.frame = e.frame;
2253 return gettaginfo(gettaginfo_relative_ent, tag);
2258 float modeleffect_SendEntity(entity to, float sf)
2261 WriteByte(MSG_ENTITY, ENT_CLIENT_MODELEFFECT);
2264 if(self.velocity != '0 0 0')
2266 if(self.angles != '0 0 0')
2268 if(self.avelocity != '0 0 0')
2271 WriteByte(MSG_ENTITY, f);
2272 WriteShort(MSG_ENTITY, self.modelindex);
2273 WriteByte(MSG_ENTITY, self.skin);
2274 WriteByte(MSG_ENTITY, self.frame);
2275 WriteCoord(MSG_ENTITY, self.origin_x);
2276 WriteCoord(MSG_ENTITY, self.origin_y);
2277 WriteCoord(MSG_ENTITY, self.origin_z);
2280 WriteCoord(MSG_ENTITY, self.velocity_x);
2281 WriteCoord(MSG_ENTITY, self.velocity_y);
2282 WriteCoord(MSG_ENTITY, self.velocity_z);
2286 WriteCoord(MSG_ENTITY, self.angles_x);
2287 WriteCoord(MSG_ENTITY, self.angles_y);
2288 WriteCoord(MSG_ENTITY, self.angles_z);
2292 WriteCoord(MSG_ENTITY, self.avelocity_x);
2293 WriteCoord(MSG_ENTITY, self.avelocity_y);
2294 WriteCoord(MSG_ENTITY, self.avelocity_z);
2296 WriteShort(MSG_ENTITY, self.scale * 256.0);
2297 WriteShort(MSG_ENTITY, self.scale2 * 256.0);
2298 WriteByte(MSG_ENTITY, self.teleport_time * 100.0);
2299 WriteByte(MSG_ENTITY, self.fade_time * 100.0);
2300 WriteByte(MSG_ENTITY, self.alpha * 255.0);
2305 void modeleffect_spawn(string m, float s, float f, vector o, vector v, vector ang, vector angv, float s0, float s2, float a, float t1, float t2)
2310 e.classname = "modeleffect";
2318 e.teleport_time = t1;
2322 e.scale = s0 / max6(-e.mins_x, -e.mins_y, -e.mins_z, e.maxs_x, e.maxs_y, e.maxs_z);
2326 e.scale2 = s2 / max6(-e.mins_x, -e.mins_y, -e.mins_z, e.maxs_x, e.maxs_y, e.maxs_z);
2329 sz = max(e.scale, e.scale2);
2330 setsize(e, e.mins * sz, e.maxs * sz);
2331 Net_LinkEntity(e, FALSE, 0.1, modeleffect_SendEntity);
2334 void shockwave_spawn(string m, vector org, float sz, float t1, float t2)
2336 return modeleffect_spawn(m, 0, 0, org, '0 0 0', '0 0 0', '0 0 0', 0, sz, 1, t1, t2);
2339 float randombit(float bits)
2341 if(!(bits & (bits-1))) // this ONLY holds for powers of two!
2350 for(f = 1; f <= bits; f *= 2)
2359 r = (r - 1) / (n - 1);
2366 float randombits(float bits, float k, float error_return)
2370 while(k > 0 && bits != r)
2372 r += randombit(bits - r);
2381 void randombit_test(float bits, float iter)
2385 print(ftos(randombit(bits)), "\n");
2390 float ExponentialFalloff(float mindist, float maxdist, float halflifedist, float d)
2392 if(halflifedist > 0)
2393 return pow(0.5, (bound(mindist, d, maxdist) - mindist) / halflifedist);
2394 else if(halflifedist < 0)
2395 return pow(0.5, (bound(mindist, d, maxdist) - maxdist) / halflifedist);
2404 #define cvar_string_normal builtin_cvar_string
2405 #define cvar_normal builtin_cvar
2407 string cvar_string_normal(string n)
2409 if (!(cvar_type(n) & 1))
2410 backtrace(strcat("Attempt to access undefined cvar: ", n));
2411 return builtin_cvar_string(n);
2414 float cvar_normal(string n)
2416 return stof(cvar_string_normal(n));
2419 #define cvar_set_normal builtin_cvar_set
2427 oself.think = SUB_Remove;
2428 oself.nextthink = time;
2434 Execute func() after time + fdelay.
2435 self when func is executed = self when defer is called
2437 void defer(float fdelay, void() func)
2444 e.think = defer_think;
2445 e.nextthink = time + fdelay;
2448 .string aiment_classname;
2449 .float aiment_deadflag;
2450 void SetMovetypeFollow(entity ent, entity e)
2452 // FIXME this may not be warpzone aware
2453 ent.movetype = MOVETYPE_FOLLOW; // make the hole follow
2454 ent.solid = SOLID_NOT; // MOVETYPE_FOLLOW is always non-solid - this means this cannot be teleported by warpzones any more! Instead, we must notice when our owner gets teleported.
2455 ent.aiment = e; // make the hole follow bmodel
2456 ent.punchangle = e.angles; // the original angles of bmodel
2457 ent.view_ofs = ent.origin - e.origin; // relative origin
2458 ent.v_angle = ent.angles - e.angles; // relative angles
2459 ent.aiment_classname = strzone(e.classname);
2460 ent.aiment_deadflag = e.deadflag;
2462 void UnsetMovetypeFollow(entity ent)
2464 ent.movetype = MOVETYPE_FLY;
2465 PROJECTILE_MAKETRIGGER(ent);
2468 float LostMovetypeFollow(entity ent)
2471 if(ent.movetype != MOVETYPE_FOLLOW)
2477 if(ent.aiment.classname != ent.aiment_classname)
2479 if(ent.aiment.deadflag != ent.aiment_deadflag)
2485 float isPushable(entity e)
2494 case "droppedweapon":
2495 case "keepawayball":
2496 case "nexball_basketball":
2497 case "nexball_football":
2499 case "bullet": // antilagged bullets can't hit this either
2502 if (e.projectiledeathtype)