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 not(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 CENTER_OR_VIEWOFS(ent) (ent.origin + (IS_PLAYER(ent) ? ent.view_ofs : ((ent.mins + ent.maxs) * 0.5)))
104 // copies a string to a tempstring (so one can strunzone it)
105 string strcat1(string s) = #115; // FRIK_FILE
110 void GameLogEcho(string s)
115 if (autocvar_sv_eventlog_files)
120 matches = autocvar_sv_eventlog_files_counter + 1;
121 cvar_set("sv_eventlog_files_counter", ftos(matches));
124 fn = strcat(substring("00000000", 0, 8 - strlen(fn)), fn);
125 fn = strcat(autocvar_sv_eventlog_files_nameprefix, fn, autocvar_sv_eventlog_files_namesuffix);
126 logfile = fopen(fn, FILE_APPEND);
127 fputs(logfile, ":logversion:3\n");
131 if (autocvar_sv_eventlog_files_timestamps)
132 fputs(logfile, strcat(":time:", strftime(TRUE, "%Y-%m-%d %H:%M:%S", "\n", s, "\n")));
134 fputs(logfile, strcat(s, "\n"));
137 if (autocvar_sv_eventlog_console)
146 // will be opened later
151 if (logfile_open && logfile >= 0)
158 #define strstr strstrofs
160 // NOTE: DO NOT USE THIS FUNCTION TOO OFTEN.
161 // IT WILL MOST PROBABLY DESTROY _ALL_ OTHER TEMP
162 // STRINGS AND TAKE QUITE LONG. haystack and needle MUST
163 // BE CONSTANT OR strzoneD!
164 float strstr(string haystack, string needle, float offset)
168 len = strlen(needle);
169 endpos = strlen(haystack) - len;
170 while(offset <= endpos)
172 found = substring(haystack, offset, len);
181 const float NUM_NEAREST_ENTITIES = 4;
182 entity nearest_entity[NUM_NEAREST_ENTITIES];
183 float nearest_length[NUM_NEAREST_ENTITIES];
184 entity findnearest(vector point, .string field, string value, vector axismod)
195 localhead = find(world, field, value);
198 if ((localhead.items == IT_KEY1 || localhead.items == IT_KEY2) && localhead.target == "###item###")
199 dist = localhead.oldorigin;
201 dist = localhead.origin;
203 dist = dist_x * axismod_x * '1 0 0' + dist_y * axismod_y * '0 1 0' + dist_z * axismod_z * '0 0 1';
206 for (i = 0; i < num_nearest; ++i)
208 if (len < nearest_length[i])
212 // now i tells us where to insert at
213 // INSERTION SORT! YOU'VE SEEN IT! RUN!
214 if (i < NUM_NEAREST_ENTITIES)
216 for (j = NUM_NEAREST_ENTITIES - 1; j >= i; --j)
218 nearest_length[j + 1] = nearest_length[j];
219 nearest_entity[j + 1] = nearest_entity[j];
221 nearest_length[i] = len;
222 nearest_entity[i] = localhead;
223 if (num_nearest < NUM_NEAREST_ENTITIES)
224 num_nearest = num_nearest + 1;
227 localhead = find(localhead, field, value);
230 // now use the first one from our list that we can see
231 for (i = 0; i < num_nearest; ++i)
233 traceline(point, nearest_entity[i].origin, TRUE, world);
234 if (trace_fraction == 1)
238 dprint("Nearest point (");
239 dprint(nearest_entity[0].netname);
240 dprint(") is not visible, using a visible one.\n");
242 return nearest_entity[i];
246 if (num_nearest == 0)
249 dprint("Not seeing any location point, using nearest as fallback.\n");
251 dprint("Candidates were: ");
252 for(j = 0; j < num_nearest; ++j)
256 dprint(nearest_entity[j].netname);
261 return nearest_entity[0];
264 void spawnfunc_target_location()
266 self.classname = "target_location";
267 // location name in netname
268 // eventually support: count, teamgame selectors, line of sight?
271 void spawnfunc_info_location()
273 self.classname = "target_location";
274 self.message = self.netname;
277 string NearestLocation(vector p)
282 loc = findnearest(p, classname, "target_location", '1 1 1');
289 loc = findnearest(p, target, "###item###", '1 1 4');
296 string formatmessage(string msg)
307 WarpZone_crosshair_trace(self);
308 cursor = trace_endpos;
309 cursor_ent = trace_ent;
313 break; // too many replacements
316 p1 = strstr(msg, "%", p); // NOTE: this destroys msg as it's a tempstring!
317 p2 = strstr(msg, "\\", p); // NOTE: this destroys msg as it's a tempstring!
330 replacement = substring(msg, p, 2);
331 escape = substring(msg, p + 1, 1);
335 else if (escape == "\\")
337 else if (escape == "n")
339 else if (escape == "a")
340 replacement = ftos(floor(self.armorvalue));
341 else if (escape == "h")
342 replacement = ftos(floor(self.health));
343 else if (escape == "l")
344 replacement = NearestLocation(self.origin);
345 else if (escape == "y")
346 replacement = NearestLocation(cursor);
347 else if (escape == "d")
348 replacement = NearestLocation(self.death_origin);
349 else if (escape == "w") {
353 wep = self.switchweapon;
356 replacement = W_Name(wep);
357 } else if (escape == "W") {
358 if (self.items & IT_SHELLS) replacement = "shells";
359 else if (self.items & IT_NAILS) replacement = "bullets";
360 else if (self.items & IT_ROCKETS) replacement = "rockets";
361 else if (self.items & IT_CELLS) replacement = "cells";
362 else replacement = "batteries"; // ;)
363 } else if (escape == "x") {
364 replacement = cursor_ent.netname;
365 if (replacement == "" || !cursor_ent)
366 replacement = "nothing";
367 } else if (escape == "s")
368 replacement = ftos(vlen(self.velocity - self.velocity_z * '0 0 1'));
369 else if (escape == "S")
370 replacement = ftos(vlen(self.velocity));
372 msg = strcat(substring(msg, 0, p), replacement, substring(msg, p+2, strlen(msg) - (p+2)));
373 p = p + strlen(replacement);
378 float boolean(float value) { // if value is 0 return FALSE (0), otherwise return TRUE (1)
379 return (value == 0) ? FALSE : TRUE;
388 >0: receives a cvar from name=argv(f) value=argv(f+1)
390 void GetCvars_handleString(string thisname, float f, .string field, string name)
395 strunzone(self.field);
396 self.field = string_null;
400 if (thisname == name)
403 strunzone(self.field);
404 self.field = strzone(argv(f + 1));
408 stuffcmd(self, strcat("cl_cmd sendcvar ", name, "\n"));
410 void GetCvars_handleString_Fixup(string thisname, float f, .string field, string name, string(string) func)
412 GetCvars_handleString(thisname, f, field, name);
413 if (f >= 0) // also initialize to the fitting value for "" when sending cvars out
414 if (thisname == name)
417 s = func(strcat1(self.field));
420 strunzone(self.field);
421 self.field = strzone(s);
425 void GetCvars_handleFloat(string thisname, float f, .float field, string name)
432 if (thisname == name)
433 self.field = stof(argv(f + 1));
436 stuffcmd(self, strcat("cl_cmd sendcvar ", name, "\n"));
438 void GetCvars_handleFloatOnce(string thisname, float f, .float field, string name)
445 if (thisname == name)
449 self.field = stof(argv(f + 1));
458 stuffcmd(self, strcat("cl_cmd sendcvar ", name, "\n"));
461 string W_FixWeaponOrder_ForceComplete_AndBuildImpulseList(string wo)
464 o = W_FixWeaponOrder_ForceComplete(wo);
465 if(self.weaponorder_byimpulse)
467 strunzone(self.weaponorder_byimpulse);
468 self.weaponorder_byimpulse = string_null;
470 self.weaponorder_byimpulse = strzone(W_FixWeaponOrder_BuildImpulseList(o));
473 void GetCvars(float f)
475 string s = string_null;
478 s = strcat1(argv(f));
483 MUTATOR_CALLHOOK(GetCvars);
485 Notification_GetCvars();
487 GetCvars_handleFloat(s, f, autoswitch, "cl_autoswitch");
488 GetCvars_handleFloat(s, f, cvar_cl_autoscreenshot, "cl_autoscreenshot");
489 GetCvars_handleString(s, f, cvar_g_xonoticversion, "g_xonoticversion");
490 GetCvars_handleFloat(s, f, cvar_cl_handicap, "cl_handicap");
491 GetCvars_handleFloat(s, f, cvar_cl_clippedspectating, "cl_clippedspectating");
492 GetCvars_handleString_Fixup(s, f, cvar_cl_weaponpriority, "cl_weaponpriority", W_FixWeaponOrder_ForceComplete_AndBuildImpulseList);
493 GetCvars_handleString_Fixup(s, f, cvar_cl_weaponpriorities[0], "cl_weaponpriority0", W_FixWeaponOrder_AllowIncomplete);
494 GetCvars_handleString_Fixup(s, f, cvar_cl_weaponpriorities[1], "cl_weaponpriority1", W_FixWeaponOrder_AllowIncomplete);
495 GetCvars_handleString_Fixup(s, f, cvar_cl_weaponpriorities[2], "cl_weaponpriority2", W_FixWeaponOrder_AllowIncomplete);
496 GetCvars_handleString_Fixup(s, f, cvar_cl_weaponpriorities[3], "cl_weaponpriority3", W_FixWeaponOrder_AllowIncomplete);
497 GetCvars_handleString_Fixup(s, f, cvar_cl_weaponpriorities[4], "cl_weaponpriority4", W_FixWeaponOrder_AllowIncomplete);
498 GetCvars_handleString_Fixup(s, f, cvar_cl_weaponpriorities[5], "cl_weaponpriority5", W_FixWeaponOrder_AllowIncomplete);
499 GetCvars_handleString_Fixup(s, f, cvar_cl_weaponpriorities[6], "cl_weaponpriority6", W_FixWeaponOrder_AllowIncomplete);
500 GetCvars_handleString_Fixup(s, f, cvar_cl_weaponpriorities[7], "cl_weaponpriority7", W_FixWeaponOrder_AllowIncomplete);
501 GetCvars_handleString_Fixup(s, f, cvar_cl_weaponpriorities[8], "cl_weaponpriority8", W_FixWeaponOrder_AllowIncomplete);
502 GetCvars_handleString_Fixup(s, f, cvar_cl_weaponpriorities[9], "cl_weaponpriority9", W_FixWeaponOrder_AllowIncomplete);
503 GetCvars_handleFloat(s, f, cvar_cl_weaponimpulsemode, "cl_weaponimpulsemode");
504 GetCvars_handleFloat(s, f, cvar_cl_autotaunt, "cl_autotaunt");
505 GetCvars_handleFloat(s, f, cvar_cl_noantilag, "cl_noantilag");
506 GetCvars_handleFloat(s, f, cvar_cl_voice_directional, "cl_voice_directional");
507 GetCvars_handleFloat(s, f, cvar_cl_voice_directional_taunt_attenuation, "cl_voice_directional_taunt_attenuation");
508 GetCvars_handleFloat(s, f, cvar_cl_accuracy_data_share, "cl_accuracy_data_share");
509 GetCvars_handleFloat(s, f, cvar_cl_accuracy_data_receive, "cl_accuracy_data_receive");
511 self.cvar_cl_accuracy_data_share = boolean(self.cvar_cl_accuracy_data_share);
512 self.cvar_cl_accuracy_data_receive = boolean(self.cvar_cl_accuracy_data_receive);
514 GetCvars_handleFloatOnce(s, f, cvar_cl_gunalign, "cl_gunalign");
515 GetCvars_handleFloat(s, f, cvar_cl_allow_uid2name, "cl_allow_uid2name");
516 GetCvars_handleFloat(s, f, cvar_cl_allow_uidtracking, "cl_allow_uidtracking");
517 GetCvars_handleFloat(s, f, cvar_cl_movement_track_canjump, "cl_movement_track_canjump");
518 GetCvars_handleFloat(s, f, cvar_cl_newusekeysupported, "cl_newusekeysupported");
520 // fixup of switchweapon (needed for LMS or when spectating is disabled, as PutClientInServer comes too early)
523 if (s == "cl_weaponpriority")
524 self.switchweapon = w_getbestweapon(self);
525 if (s == "cl_allow_uidtracking")
526 PlayerStats_AddPlayer(self);
530 // decolorizes and team colors the player name when needed
531 string playername(entity p)
534 if (teamplay && !intermission_running && IS_PLAYER(p))
536 t = Team_ColorCode(p.team);
537 return strcat(t, strdecolorize(p.netname));
543 vector randompos(vector m1, vector m2)
547 v_x = m2_x * random() + m1_x;
548 v_y = m2_y * random() + m1_y;
549 v_z = m2_z * random() + m1_z;
553 //#NO AUTOCVARS START
555 float g_pickup_shells;
556 float g_pickup_shells_max;
557 float g_pickup_nails;
558 float g_pickup_nails_max;
559 float g_pickup_rockets;
560 float g_pickup_rockets_max;
561 float g_pickup_cells;
562 float g_pickup_cells_max;
564 float g_pickup_fuel_jetpack;
565 float g_pickup_fuel_max;
566 float g_pickup_armorsmall;
567 float g_pickup_armorsmall_max;
568 float g_pickup_armorsmall_anyway;
569 float g_pickup_armormedium;
570 float g_pickup_armormedium_max;
571 float g_pickup_armormedium_anyway;
572 float g_pickup_armorbig;
573 float g_pickup_armorbig_max;
574 float g_pickup_armorbig_anyway;
575 float g_pickup_armorlarge;
576 float g_pickup_armorlarge_max;
577 float g_pickup_armorlarge_anyway;
578 float g_pickup_healthsmall;
579 float g_pickup_healthsmall_max;
580 float g_pickup_healthsmall_anyway;
581 float g_pickup_healthmedium;
582 float g_pickup_healthmedium_max;
583 float g_pickup_healthmedium_anyway;
584 float g_pickup_healthlarge;
585 float g_pickup_healthlarge_max;
586 float g_pickup_healthlarge_anyway;
587 float g_pickup_healthmega;
588 float g_pickup_healthmega_max;
589 float g_pickup_healthmega_anyway;
590 float g_pickup_ammo_anyway;
591 float g_pickup_weapons_anyway;
593 WepSet g_weaponarena_weapons;
594 float g_weaponarena_random;
595 float g_weaponarena_random_with_laser;
596 string g_weaponarena_list;
597 float g_weaponspeedfactor;
598 float g_weaponratefactor;
599 float g_weapondamagefactor;
600 float g_weaponforcefactor;
601 float g_weaponspreadfactor;
603 WepSet start_weapons;
604 WepSet start_weapons_default;
605 WepSet start_weapons_defaultmask;
607 float start_ammo_shells;
608 float start_ammo_nails;
609 float start_ammo_rockets;
610 float start_ammo_cells;
611 float start_ammo_fuel;
613 float start_armorvalue;
614 WepSet warmup_start_weapons;
615 WepSet warmup_start_weapons_default;
616 WepSet warmup_start_weapons_defaultmask;
617 float warmup_start_ammo_shells;
618 float warmup_start_ammo_nails;
619 float warmup_start_ammo_rockets;
620 float warmup_start_ammo_cells;
621 float warmup_start_ammo_fuel;
622 float warmup_start_health;
623 float warmup_start_armorvalue;
626 entity get_weaponinfo(float w);
628 float want_weapon(string cvarprefix, entity weaponinfo, float allguns)
630 var float i = weaponinfo.weapon;
636 if (g_lms || g_ca || allguns)
638 if(weaponinfo.spawnflags & WEP_FLAG_NORMAL)
644 d = (i == WEP_SHOTGUN); // todo: how to handle shotgun in CTS mode? we're removing it.. so....
646 d = 0; // weapon is set a few lines later
648 d = (i == WEP_LASER);
650 if(g_grappling_hook) // if possible, redirect off-hand hook to on-hand hook
651 d |= (i == WEP_HOOK);
652 if(weaponinfo.spawnflags & WEP_FLAG_MUTATORBLOCKED) // never default mutator blocked guns
655 var float t = cvar(strcat(cvarprefix, weaponinfo.netname));
657 //print(strcat("want_weapon: ", weaponinfo.netname, " - d: ", ftos(d), ", t: ", ftos(t), ". \n"));
662 // 4: is set by default?
671 void readplayerstartcvars()
677 // initialize starting values for players
678 start_weapons = '0 0 0';
679 start_weapons_default = '0 0 0';
680 start_weapons_defaultmask = '0 0 0';
682 start_ammo_shells = 0;
683 start_ammo_nails = 0;
684 start_ammo_rockets = 0;
685 start_ammo_cells = 0;
686 start_health = cvar("g_balance_health_start");
687 start_armorvalue = cvar("g_balance_armor_start");
690 g_weaponarena_weapons = '0 0 0';
692 s = cvar_string("g_weaponarena");
693 if (s == "0" || s == "")
699 if (s == "0" || s == "")
705 // forcibly turn off weaponarena
710 g_weaponarena_list = "All Weapons";
711 for (j = WEP_FIRST; j <= WEP_LAST; ++j)
713 e = get_weaponinfo(j);
714 if not(e.spawnflags & WEP_FLAG_MUTATORBLOCKED)
715 g_weaponarena_weapons |= WepSet_FromWeapon(j);
718 else if (s == "most")
721 g_weaponarena_list = "Most Weapons";
722 for (j = WEP_FIRST; j <= WEP_LAST; ++j)
724 e = get_weaponinfo(j);
725 if not(e.spawnflags & WEP_FLAG_MUTATORBLOCKED)
726 if (e.spawnflags & WEP_FLAG_NORMAL)
727 g_weaponarena_weapons |= WepSet_FromWeapon(j);
730 else if (s == "none")
733 g_weaponarena_list = "No Weapons";
738 t = tokenize_console(s);
739 g_weaponarena_list = "";
740 for (i = 0; i < t; ++i)
743 for (j = WEP_FIRST; j <= WEP_LAST; ++j)
745 e = get_weaponinfo(j);
748 g_weaponarena_weapons |= WepSet_FromWeapon(j);
749 g_weaponarena_list = strcat(g_weaponarena_list, e.message, " & ");
755 print("The weapon mutator list contains an unknown weapon ", s, ". Skipped.\n");
758 g_weaponarena_list = strzone(substring(g_weaponarena_list, 0, strlen(g_weaponarena_list) - 3));
762 g_weaponarena_random = cvar("g_weaponarena_random");
764 g_weaponarena_random = 0;
765 g_weaponarena_random_with_laser = cvar("g_weaponarena_random_with_laser");
769 g_weapon_stay = 0; // incompatible
770 start_weapons = g_weaponarena_weapons;
771 start_items |= IT_UNLIMITED_AMMO;
775 for (i = WEP_FIRST; i <= WEP_LAST; ++i)
777 e = get_weaponinfo(i);
778 float w = want_weapon("g_start_weapon_", e, FALSE);
780 start_weapons |= WepSet_FromWeapon(i);
782 start_weapons_default |= WepSet_FromWeapon(i);
784 start_weapons_defaultmask |= WepSet_FromWeapon(i);
788 if(!cvar("g_use_ammunition"))
789 start_items |= IT_UNLIMITED_AMMO;
791 if(start_items & IT_UNLIMITED_WEAPON_AMMO)
793 start_ammo_rockets = 999;
794 start_ammo_shells = 999;
795 start_ammo_cells = 999;
796 start_ammo_nails = 999;
797 start_ammo_fuel = 999;
801 start_ammo_shells = cvar("g_start_ammo_shells");
802 start_ammo_nails = cvar("g_start_ammo_nails");
803 start_ammo_rockets = cvar("g_start_ammo_rockets");
804 start_ammo_cells = cvar("g_start_ammo_cells");
805 start_ammo_fuel = cvar("g_start_ammo_fuel");
810 warmup_start_ammo_shells = start_ammo_shells;
811 warmup_start_ammo_nails = start_ammo_nails;
812 warmup_start_ammo_rockets = start_ammo_rockets;
813 warmup_start_ammo_cells = start_ammo_cells;
814 warmup_start_ammo_fuel = start_ammo_fuel;
815 warmup_start_health = start_health;
816 warmup_start_armorvalue = start_armorvalue;
817 warmup_start_weapons = start_weapons;
818 warmup_start_weapons_default = start_weapons_default;
819 warmup_start_weapons_defaultmask = start_weapons_defaultmask;
821 if (!g_weaponarena && !g_ca)
823 warmup_start_ammo_shells = cvar("g_warmup_start_ammo_shells");
824 warmup_start_ammo_cells = cvar("g_warmup_start_ammo_cells");
825 warmup_start_ammo_nails = cvar("g_warmup_start_ammo_nails");
826 warmup_start_ammo_rockets = cvar("g_warmup_start_ammo_rockets");
827 warmup_start_ammo_fuel = cvar("g_warmup_start_ammo_fuel");
828 warmup_start_health = cvar("g_warmup_start_health");
829 warmup_start_armorvalue = cvar("g_warmup_start_armor");
830 warmup_start_weapons = '0 0 0';
831 warmup_start_weapons_default = '0 0 0';
832 warmup_start_weapons_defaultmask = '0 0 0';
833 for (i = WEP_FIRST; i <= WEP_LAST; ++i)
835 e = get_weaponinfo(i);
836 float w = want_weapon("g_start_weapon_", e, cvar("g_warmup_allguns"));
838 warmup_start_weapons |= WepSet_FromWeapon(i);
840 warmup_start_weapons_default |= WepSet_FromWeapon(i);
842 warmup_start_weapons_defaultmask |= WepSet_FromWeapon(i);
848 start_items |= IT_JETPACK;
850 MUTATOR_CALLHOOK(SetStartItems);
852 if ((start_items & IT_JETPACK) || (g_grappling_hook && (start_weapons & WEPSET_HOOK)))
854 g_grappling_hook = 0; // these two can't coexist, as they use the same button
855 start_items |= IT_FUEL_REGEN;
856 start_ammo_fuel = max(start_ammo_fuel, cvar("g_balance_fuel_rotstable"));
857 warmup_start_ammo_fuel = max(warmup_start_ammo_fuel, cvar("g_balance_fuel_rotstable"));
860 for (i = WEP_FIRST; i <= WEP_LAST; ++i)
862 e = get_weaponinfo(i);
863 if((start_weapons | warmup_start_weapons) & WepSet_FromWeapon(i))
864 WEP_ACTION(i, WR_INIT);
867 start_ammo_shells = max(0, start_ammo_shells);
868 start_ammo_nails = max(0, start_ammo_nails);
869 start_ammo_cells = max(0, start_ammo_cells);
870 start_ammo_rockets = max(0, start_ammo_rockets);
871 start_ammo_fuel = max(0, start_ammo_fuel);
873 warmup_start_ammo_shells = max(0, warmup_start_ammo_shells);
874 warmup_start_ammo_nails = max(0, warmup_start_ammo_nails);
875 warmup_start_ammo_cells = max(0, warmup_start_ammo_cells);
876 warmup_start_ammo_rockets = max(0, warmup_start_ammo_rockets);
877 warmup_start_ammo_fuel = max(0, warmup_start_ammo_fuel);
881 float g_bugrigs_planar_movement;
882 float g_bugrigs_planar_movement_car_jumping;
883 float g_bugrigs_reverse_spinning;
884 float g_bugrigs_reverse_speeding;
885 float g_bugrigs_reverse_stopping;
886 float g_bugrigs_air_steering;
887 float g_bugrigs_angle_smoothing;
888 float g_bugrigs_friction_floor;
889 float g_bugrigs_friction_brake;
890 float g_bugrigs_friction_air;
891 float g_bugrigs_accel;
892 float g_bugrigs_speed_ref;
893 float g_bugrigs_speed_pow;
894 float g_bugrigs_steer;
899 string GetGametype(); // g_world.qc
900 void readlevelcvars(void)
903 #define CHECK_MUTATOR_ADD(mut_cvar,mut_name,dependence) \
904 { if(cvar(mut_cvar) && dependence) { MUTATOR_ADD(mut_name); } }
906 CHECK_MUTATOR_ADD("g_dodging", mutator_dodging, 1);
907 CHECK_MUTATOR_ADD("g_spawn_near_teammate", mutator_spawn_near_teammate, 1);
908 CHECK_MUTATOR_ADD("g_physical_items", mutator_physical_items, 1);
909 CHECK_MUTATOR_ADD("g_touchexplode", mutator_touchexplode, 1);
910 CHECK_MUTATOR_ADD("g_minstagib", mutator_minstagib, 1);
911 CHECK_MUTATOR_ADD("g_invincible_projectiles", mutator_invincibleprojectiles, !cvar("g_minstagib"));
912 CHECK_MUTATOR_ADD("g_new_toys", mutator_new_toys, !cvar("g_minstagib"));
913 CHECK_MUTATOR_ADD("g_nix", mutator_nix, !cvar("g_minstagib"));
914 CHECK_MUTATOR_ADD("g_rocket_flying", mutator_rocketflying, !cvar("g_minstagib"));
915 CHECK_MUTATOR_ADD("g_vampire", mutator_vampire, !cvar("g_minstagib"));
916 CHECK_MUTATOR_ADD("g_superspectate", mutator_superspec, 1);
917 CHECK_MUTATOR_ADD("g_pinata", mutator_pinata, !cvar("g_minstagib"));
918 CHECK_MUTATOR_ADD("g_midair", mutator_midair, 1);
919 CHECK_MUTATOR_ADD("g_bloodloss", mutator_bloodloss, !cvar("g_minstagib"));
920 CHECK_MUTATOR_ADD("g_random_gravity", mutator_random_gravity, 1);
921 CHECK_MUTATOR_ADD("g_multijump", mutator_multijump, 1);
922 CHECK_MUTATOR_ADD("g_melee_only", mutator_melee_only, !cvar("g_minstagib"));
923 CHECK_MUTATOR_ADD("g_nades", mutator_nades, 1);
924 CHECK_MUTATOR_ADD("g_sandbox", sandbox, 1);
925 CHECK_MUTATOR_ADD("g_campcheck", mutator_campcheck, 1);
927 #undef CHECK_MUTATOR_ADD
929 if(cvar("sv_allow_fullbright"))
930 serverflags |= SERVERFLAG_ALLOW_FULLBRIGHT;
932 g_bugrigs = cvar("g_bugrigs");
933 g_bugrigs_planar_movement = cvar("g_bugrigs_planar_movement");
934 g_bugrigs_planar_movement_car_jumping = cvar("g_bugrigs_planar_movement_car_jumping");
935 g_bugrigs_reverse_spinning = cvar("g_bugrigs_reverse_spinning");
936 g_bugrigs_reverse_speeding = cvar("g_bugrigs_reverse_speeding");
937 g_bugrigs_reverse_stopping = cvar("g_bugrigs_reverse_stopping");
938 g_bugrigs_air_steering = cvar("g_bugrigs_air_steering");
939 g_bugrigs_angle_smoothing = cvar("g_bugrigs_angle_smoothing");
940 g_bugrigs_friction_floor = cvar("g_bugrigs_friction_floor");
941 g_bugrigs_friction_brake = cvar("g_bugrigs_friction_brake");
942 g_bugrigs_friction_air = cvar("g_bugrigs_friction_air");
943 g_bugrigs_accel = cvar("g_bugrigs_accel");
944 g_bugrigs_speed_ref = cvar("g_bugrigs_speed_ref");
945 g_bugrigs_speed_pow = cvar("g_bugrigs_speed_pow");
946 g_bugrigs_steer = cvar("g_bugrigs_steer");
948 g_minstagib = cvar("g_minstagib");
950 sv_clones = cvar("sv_clones");
951 sv_foginterval = cvar("sv_foginterval");
952 g_cloaked = cvar("g_cloaked");
954 g_cloaked = 1; // always enable cloak in CTS
955 g_footsteps = cvar("g_footsteps");
956 g_grappling_hook = cvar("g_grappling_hook");
957 g_jetpack = cvar("g_jetpack");
958 sv_maxidle = cvar("sv_maxidle");
959 sv_maxidle_spectatorsareidle = cvar("sv_maxidle_spectatorsareidle");
960 sv_autotaunt = cvar("sv_autotaunt");
961 sv_taunt = cvar("sv_taunt");
963 warmup_stage = cvar("g_warmup");
964 g_warmup_limit = cvar("g_warmup_limit");
965 g_warmup_allguns = cvar("g_warmup_allguns");
966 g_warmup_allow_timeout = cvar("g_warmup_allow_timeout");
968 if ((g_race && g_race_qualifying == 2) || g_arena || g_assault || cvar("g_campaign"))
969 warmup_stage = 0; // these modes cannot work together, sorry
971 g_pickup_respawntime_weapon = cvar("g_pickup_respawntime_weapon");
972 g_pickup_respawntime_superweapon = cvar("g_pickup_respawntime_superweapon");
973 g_pickup_respawntime_ammo = cvar("g_pickup_respawntime_ammo");
974 g_pickup_respawntime_short = cvar("g_pickup_respawntime_short");
975 g_pickup_respawntime_medium = cvar("g_pickup_respawntime_medium");
976 g_pickup_respawntime_long = cvar("g_pickup_respawntime_long");
977 g_pickup_respawntime_powerup = cvar("g_pickup_respawntime_powerup");
978 g_pickup_respawntimejitter_weapon = cvar("g_pickup_respawntimejitter_weapon");
979 g_pickup_respawntimejitter_superweapon = cvar("g_pickup_respawntimejitter_superweapon");
980 g_pickup_respawntimejitter_ammo = cvar("g_pickup_respawntimejitter_ammo");
981 g_pickup_respawntimejitter_short = cvar("g_pickup_respawntimejitter_short");
982 g_pickup_respawntimejitter_medium = cvar("g_pickup_respawntimejitter_medium");
983 g_pickup_respawntimejitter_long = cvar("g_pickup_respawntimejitter_long");
984 g_pickup_respawntimejitter_powerup = cvar("g_pickup_respawntimejitter_powerup");
986 g_weaponspeedfactor = cvar("g_weaponspeedfactor");
987 g_weaponratefactor = cvar("g_weaponratefactor");
988 g_weapondamagefactor = cvar("g_weapondamagefactor");
989 g_weaponforcefactor = cvar("g_weaponforcefactor");
990 g_weaponspreadfactor = cvar("g_weaponspreadfactor");
992 g_pickup_shells = cvar("g_pickup_shells");
993 g_pickup_shells_max = cvar("g_pickup_shells_max");
994 g_pickup_nails = cvar("g_pickup_nails");
995 g_pickup_nails_max = cvar("g_pickup_nails_max");
996 g_pickup_rockets = cvar("g_pickup_rockets");
997 g_pickup_rockets_max = cvar("g_pickup_rockets_max");
998 g_pickup_cells = cvar("g_pickup_cells");
999 g_pickup_cells_max = cvar("g_pickup_cells_max");
1000 g_pickup_fuel = cvar("g_pickup_fuel");
1001 g_pickup_fuel_jetpack = cvar("g_pickup_fuel_jetpack");
1002 g_pickup_fuel_max = cvar("g_pickup_fuel_max");
1003 g_pickup_armorsmall = cvar("g_pickup_armorsmall");
1004 g_pickup_armorsmall_max = cvar("g_pickup_armorsmall_max");
1005 g_pickup_armorsmall_anyway = cvar("g_pickup_armorsmall_anyway");
1006 g_pickup_armormedium = cvar("g_pickup_armormedium");
1007 g_pickup_armormedium_max = cvar("g_pickup_armormedium_max");
1008 g_pickup_armormedium_anyway = cvar("g_pickup_armormedium_anyway");
1009 g_pickup_armorbig = cvar("g_pickup_armorbig");
1010 g_pickup_armorbig_max = cvar("g_pickup_armorbig_max");
1011 g_pickup_armorbig_anyway = cvar("g_pickup_armorbig_anyway");
1012 g_pickup_armorlarge = cvar("g_pickup_armorlarge");
1013 g_pickup_armorlarge_max = cvar("g_pickup_armorlarge_max");
1014 g_pickup_armorlarge_anyway = cvar("g_pickup_armorlarge_anyway");
1015 g_pickup_healthsmall = cvar("g_pickup_healthsmall");
1016 g_pickup_healthsmall_max = cvar("g_pickup_healthsmall_max");
1017 g_pickup_healthsmall_anyway = cvar("g_pickup_healthsmall_anyway");
1018 g_pickup_healthmedium = cvar("g_pickup_healthmedium");
1019 g_pickup_healthmedium_max = cvar("g_pickup_healthmedium_max");
1020 g_pickup_healthmedium_anyway = cvar("g_pickup_healthmedium_anyway");
1021 g_pickup_healthlarge = cvar("g_pickup_healthlarge");
1022 g_pickup_healthlarge_max = cvar("g_pickup_healthlarge_max");
1023 g_pickup_healthlarge_anyway = cvar("g_pickup_healthlarge_anyway");
1024 g_pickup_healthmega = cvar("g_pickup_healthmega");
1025 g_pickup_healthmega_max = cvar("g_pickup_healthmega_max");
1026 g_pickup_healthmega_anyway = cvar("g_pickup_healthmega_anyway");
1028 g_pickup_ammo_anyway = cvar("g_pickup_ammo_anyway");
1029 g_pickup_weapons_anyway = cvar("g_pickup_weapons_anyway");
1031 g_weapon_stay = cvar(strcat("g_", GetGametype(), "_weapon_stay"));
1033 g_weapon_stay = cvar("g_weapon_stay");
1035 if not(warmup_stage)
1036 game_starttime = time + cvar("g_start_delay");
1038 readplayerstartcvars();
1044 string precache_sound (string s) = #19;
1045 float precache_sound_index (string s) = #19;
1047 #define SND_VOLUME 1
1048 #define SND_ATTENUATION 2
1049 #define SND_LARGEENTITY 8
1050 #define SND_LARGESOUND 16
1052 float sound_allowed(float dest, entity e)
1054 // sounds from world may always pass
1057 if (e.classname == "body")
1059 else if (e.realowner && e.realowner != e)
1061 else if (e.owner && e.owner != e)
1066 // sounds to self may always pass
1067 if (dest == MSG_ONE)
1068 if (e == msg_entity)
1070 // sounds by players can be removed
1071 if (autocvar_bot_sound_monopoly)
1072 if (IS_REAL_CLIENT(e))
1074 // anything else may pass
1078 #ifdef COMPAT_XON010_CHANNELS
1079 void(entity e, float chan, string samp, float vol, float atten) builtin_sound = #8;
1080 void sound(entity e, float chan, string samp, float vol, float atten)
1082 if (!sound_allowed(MSG_BROADCAST, e))
1084 builtin_sound(e, chan, samp, vol, atten);
1088 void sound(entity e, float chan, string samp, float vol, float atten)
1090 if (!sound_allowed(MSG_BROADCAST, e))
1092 sound7(e, chan, samp, vol, atten, 0, 0);
1096 void soundtoat(float dest, entity e, vector o, float chan, string samp, float vol, float atten)
1100 if (!sound_allowed(dest, e))
1103 entno = num_for_edict(e);
1104 idx = precache_sound_index(samp);
1109 atten = floor(atten * 64);
1110 vol = floor(vol * 255);
1113 sflags |= SND_VOLUME;
1115 sflags |= SND_ATTENUATION;
1116 if (entno >= 8192 || chan < 0 || chan > 7)
1117 sflags |= SND_LARGEENTITY;
1119 sflags |= SND_LARGESOUND;
1121 WriteByte(dest, SVC_SOUND);
1122 WriteByte(dest, sflags);
1123 if (sflags & SND_VOLUME)
1124 WriteByte(dest, vol);
1125 if (sflags & SND_ATTENUATION)
1126 WriteByte(dest, atten);
1127 if (sflags & SND_LARGEENTITY)
1129 WriteShort(dest, entno);
1130 WriteByte(dest, chan);
1134 WriteShort(dest, entno * 8 + chan);
1136 if (sflags & SND_LARGESOUND)
1137 WriteShort(dest, idx);
1139 WriteByte(dest, idx);
1141 WriteCoord(dest, o_x);
1142 WriteCoord(dest, o_y);
1143 WriteCoord(dest, o_z);
1145 void soundto(float dest, entity e, float chan, string samp, float vol, float atten)
1149 if (!sound_allowed(dest, e))
1152 o = e.origin + 0.5 * (e.mins + e.maxs);
1153 soundtoat(dest, e, o, chan, samp, vol, atten);
1155 void soundat(entity e, vector o, float chan, string samp, float vol, float atten)
1157 soundtoat(((chan & 8) ? MSG_ALL : MSG_BROADCAST), e, o, chan, samp, vol, atten);
1159 void stopsoundto(float dest, entity e, float chan)
1163 if (!sound_allowed(dest, e))
1166 entno = num_for_edict(e);
1168 if (entno >= 8192 || chan < 0 || chan > 7)
1171 idx = precache_sound_index("misc/null.wav");
1172 sflags = SND_LARGEENTITY;
1174 sflags |= SND_LARGESOUND;
1175 WriteByte(dest, SVC_SOUND);
1176 WriteByte(dest, sflags);
1177 WriteShort(dest, entno);
1178 WriteByte(dest, chan);
1179 if (sflags & SND_LARGESOUND)
1180 WriteShort(dest, idx);
1182 WriteByte(dest, idx);
1183 WriteCoord(dest, e.origin_x);
1184 WriteCoord(dest, e.origin_y);
1185 WriteCoord(dest, e.origin_z);
1189 WriteByte(dest, SVC_STOPSOUND);
1190 WriteShort(dest, entno * 8 + chan);
1193 void stopsound(entity e, float chan)
1195 if (!sound_allowed(MSG_BROADCAST, e))
1198 stopsoundto(MSG_BROADCAST, e, chan); // unreliable, gets there fast
1199 stopsoundto(MSG_ALL, e, chan); // in case of packet loss
1202 void play2(entity e, string filename)
1204 //stuffcmd(e, strcat("play2 ", filename, "\n"));
1206 soundtoat(MSG_ONE, world, '0 0 0', CH_INFO, filename, VOL_BASE, ATTEN_NONE);
1209 // use this one if you might be causing spam (e.g. from touch functions that might get called more than once per frame)
1211 float spamsound(entity e, float chan, string samp, float vol, float atten)
1213 if (!sound_allowed(MSG_BROADCAST, e))
1216 if (time > e.spamtime)
1219 sound(e, chan, samp, vol, atten);
1225 void play2team(float t, string filename)
1229 if (autocvar_bot_sound_monopoly)
1232 FOR_EACH_REALPLAYER(head)
1235 play2(head, filename);
1239 void play2all(string samp)
1241 if (autocvar_bot_sound_monopoly)
1244 sound(world, CH_INFO, samp, VOL_BASE, ATTEN_NONE);
1247 void PrecachePlayerSounds(string f);
1248 void precache_playermodel(string m)
1250 float globhandle, i, n;
1253 if(substring(m, -9,5) == "_lod1")
1255 if(substring(m, -9,5) == "_lod2")
1258 f = strcat(substring(m, 0, -5), "_lod1", substring(m, -4, -1));
1261 f = strcat(substring(m, 0, -5), "_lod2", substring(m, -4, -1));
1265 globhandle = search_begin(strcat(m, "_*.sounds"), TRUE, FALSE);
1268 n = search_getsize(globhandle);
1269 for (i = 0; i < n; ++i)
1271 //print(search_getfilename(globhandle, i), "\n");
1272 f = search_getfilename(globhandle, i);
1273 PrecachePlayerSounds(f);
1275 search_end(globhandle);
1277 void precache_all_playermodels(string pattern)
1279 float globhandle, i, n;
1282 globhandle = search_begin(pattern, TRUE, FALSE);
1285 n = search_getsize(globhandle);
1286 for (i = 0; i < n; ++i)
1288 //print(search_getfilename(globhandle, i), "\n");
1289 f = search_getfilename(globhandle, i);
1290 precache_playermodel(f);
1292 search_end(globhandle);
1297 // gamemode related things
1298 precache_model ("models/misc/chatbubble.spr");
1300 #ifdef TTURRETS_ENABLED
1301 if (autocvar_g_turrets)
1305 // Precache all player models if desired
1306 if (autocvar_sv_precacheplayermodels)
1308 PrecachePlayerSounds("sound/player/default.sounds");
1309 precache_all_playermodels("models/player/*.zym");
1310 precache_all_playermodels("models/player/*.dpm");
1311 precache_all_playermodels("models/player/*.md3");
1312 precache_all_playermodels("models/player/*.psk");
1313 precache_all_playermodels("models/player/*.iqm");
1316 if (autocvar_sv_defaultcharacter)
1319 s = autocvar_sv_defaultplayermodel_red;
1321 precache_playermodel(s);
1322 s = autocvar_sv_defaultplayermodel_blue;
1324 precache_playermodel(s);
1325 s = autocvar_sv_defaultplayermodel_yellow;
1327 precache_playermodel(s);
1328 s = autocvar_sv_defaultplayermodel_pink;
1330 precache_playermodel(s);
1331 s = autocvar_sv_defaultplayermodel;
1333 precache_playermodel(s);
1338 PrecacheGlobalSound((globalsound_step = "misc/footstep0 6"));
1339 PrecacheGlobalSound((globalsound_metalstep = "misc/metalfootstep0 6"));
1342 // gore and miscellaneous sounds
1343 //precache_sound ("misc/h2ohit.wav");
1344 precache_model ("models/hook.md3");
1345 precache_sound ("misc/armorimpact.wav");
1346 precache_sound ("misc/bodyimpact1.wav");
1347 precache_sound ("misc/bodyimpact2.wav");
1348 precache_sound ("misc/gib.wav");
1349 precache_sound ("misc/gib_splat01.wav");
1350 precache_sound ("misc/gib_splat02.wav");
1351 precache_sound ("misc/gib_splat03.wav");
1352 precache_sound ("misc/gib_splat04.wav");
1353 PrecacheGlobalSound((globalsound_fall = "misc/hitground 4"));
1354 PrecacheGlobalSound((globalsound_metalfall = "misc/metalhitground 4"));
1355 precache_sound ("misc/null.wav");
1356 precache_sound ("misc/spawn.wav");
1357 precache_sound ("misc/talk.wav");
1358 precache_sound ("misc/teleport.wav");
1359 precache_sound ("misc/poweroff.wav");
1360 precache_sound ("player/lava.wav");
1361 precache_sound ("player/slime.wav");
1363 precache_model ("models/sprites/0.spr32");
1364 precache_model ("models/sprites/1.spr32");
1365 precache_model ("models/sprites/2.spr32");
1366 precache_model ("models/sprites/3.spr32");
1367 precache_model ("models/sprites/4.spr32");
1368 precache_model ("models/sprites/5.spr32");
1369 precache_model ("models/sprites/6.spr32");
1370 precache_model ("models/sprites/7.spr32");
1371 precache_model ("models/sprites/8.spr32");
1372 precache_model ("models/sprites/9.spr32");
1373 precache_model ("models/sprites/10.spr32");
1375 // common weapon precaches
1376 precache_sound ("weapons/reload.wav"); // until weapons have individual reload sounds, precache the reload sound here
1377 precache_sound ("weapons/weapon_switch.wav");
1378 precache_sound ("weapons/weaponpickup.wav");
1379 precache_sound ("weapons/unavailable.wav");
1380 precache_sound ("weapons/dryfire.wav");
1381 if (g_grappling_hook)
1383 precache_sound ("weapons/hook_fire.wav"); // hook
1384 precache_sound ("weapons/hook_impact.wav"); // hook
1387 precache_model("models/elaser.mdl");
1388 precache_model("models/laser.mdl");
1389 precache_model("models/ebomb.mdl");
1392 // Disabled this code because it simply does not work (e.g. ignores bgmvolume, overlaps with "cd loop" controlled tracks).
1394 if (!self.noise && self.music) // quake 3 uses the music field
1395 self.noise = self.music;
1397 // plays music for the level if there is any
1400 precache_sound (self.noise);
1401 ambientsound ('0 0 0', self.noise, VOL_BASE, ATTEN_NONE);
1405 #include "precache-for-csqc.inc"
1408 // WARNING: this kills the trace globals
1409 #define EXACTTRIGGER_TOUCH if(WarpZoneLib_ExactTrigger_Touch()) return
1410 #define EXACTTRIGGER_INIT WarpZoneLib_ExactTrigger_Init()
1412 #define INITPRIO_FIRST 0
1413 #define INITPRIO_GAMETYPE 0
1414 #define INITPRIO_GAMETYPE_FALLBACK 1
1415 #define INITPRIO_FINDTARGET 10
1416 #define INITPRIO_DROPTOFLOOR 20
1417 #define INITPRIO_SETLOCATION 90
1418 #define INITPRIO_LINKDOORS 91
1419 #define INITPRIO_LAST 99
1421 .void(void) initialize_entity;
1422 .float initialize_entity_order;
1423 .entity initialize_entity_next;
1424 entity initialize_entity_first;
1426 void make_safe_for_remove(entity e)
1428 if (e.initialize_entity)
1430 entity ent, prev = world;
1431 for (ent = initialize_entity_first; ent; )
1433 if ((ent == e) || ((ent.classname == "initialize_entity") && (ent.enemy == e)))
1435 //print("make_safe_for_remove: getting rid of initializer ", etos(ent), "\n");
1436 // skip it in linked list
1439 prev.initialize_entity_next = ent.initialize_entity_next;
1440 ent = prev.initialize_entity_next;
1444 initialize_entity_first = ent.initialize_entity_next;
1445 ent = initialize_entity_first;
1451 ent = ent.initialize_entity_next;
1457 void objerror(string s)
1459 make_safe_for_remove(self);
1460 builtin_objerror(s);
1463 .float remove_except_protected_forbidden;
1464 void remove_except_protected(entity e)
1466 if(e.remove_except_protected_forbidden)
1467 error("not allowed to remove this at this point");
1471 void remove_unsafely(entity e)
1473 if(e.classname == "spike")
1474 error("Removing spikes is forbidden (crylink bug), please report");
1478 void remove_safely(entity e)
1480 make_safe_for_remove(e);
1484 void InitializeEntity(entity e, void(void) func, float order)
1488 if (!e || e.initialize_entity)
1490 // make a proxy initializer entity
1494 e.classname = "initialize_entity";
1498 e.initialize_entity = func;
1499 e.initialize_entity_order = order;
1501 cur = initialize_entity_first;
1505 if (!cur || cur.initialize_entity_order > order)
1507 // insert between prev and cur
1509 prev.initialize_entity_next = e;
1511 initialize_entity_first = e;
1512 e.initialize_entity_next = cur;
1516 cur = cur.initialize_entity_next;
1519 void InitializeEntitiesRun()
1522 startoflist = initialize_entity_first;
1523 initialize_entity_first = world;
1524 remove = remove_except_protected;
1525 for (self = startoflist; self; self = self.initialize_entity_next)
1527 self.remove_except_protected_forbidden = 1;
1529 for (self = startoflist; self; )
1532 var void(void) func;
1533 e = self.initialize_entity_next;
1534 func = self.initialize_entity;
1535 self.initialize_entity_order = 0;
1536 self.initialize_entity = func_null;
1537 self.initialize_entity_next = world;
1538 self.remove_except_protected_forbidden = 0;
1539 if (self.classname == "initialize_entity")
1543 builtin_remove(self);
1546 //dprint("Delayed initialization: ", self.classname, "\n");
1552 backtrace(strcat("Null function in: ", self.classname, "\n"));
1556 remove = remove_unsafely;
1559 .float uncustomizeentityforclient_set;
1560 .void(void) uncustomizeentityforclient;
1561 void UncustomizeEntitiesRun()
1565 for (self = world; (self = findfloat(self, uncustomizeentityforclient_set, 1)); )
1566 self.uncustomizeentityforclient();
1569 void SetCustomizer(entity e, float(void) customizer, void(void) uncustomizer)
1571 e.customizeentityforclient = customizer;
1572 e.uncustomizeentityforclient = uncustomizer;
1573 e.uncustomizeentityforclient_set = !!uncustomizer;
1577 #define IFTARGETED if(!self.nottargeted && self.targetname != "")
1580 void Net_LinkEntity(entity e, float docull, float dt, float(entity, float) sendfunc)
1584 if (e.classname == "")
1585 e.classname = "net_linked";
1587 if (e.model == "" || self.modelindex == 0)
1591 setmodel(e, "null");
1595 e.SendEntity = sendfunc;
1596 e.SendFlags = 0xFFFFFF;
1599 e.effects |= EF_NODEPTHTEST;
1603 e.nextthink = time + dt;
1604 e.think = SUB_Remove;
1608 void adaptor_think2touch()
1617 void adaptor_think2use()
1629 void adaptor_think2use_hittype_splash() // for timed projectile detonation
1631 if not(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
1632 self.projectiledeathtype |= HITTYPE_SPLASH;
1633 adaptor_think2use();
1636 // deferred dropping
1637 void DropToFloor_Handler()
1639 builtin_droptofloor();
1640 self.dropped_origin = self.origin;
1645 InitializeEntity(self, DropToFloor_Handler, INITPRIO_DROPTOFLOOR);
1650 float trace_hits_box_a0, trace_hits_box_a1;
1652 float trace_hits_box_1d(float end, float thmi, float thma)
1656 // just check if x is in range
1664 // do the trace with respect to x
1665 // 0 -> end has to stay in thmi -> thma
1666 trace_hits_box_a0 = max(trace_hits_box_a0, min(thmi / end, thma / end));
1667 trace_hits_box_a1 = min(trace_hits_box_a1, max(thmi / end, thma / end));
1668 if (trace_hits_box_a0 > trace_hits_box_a1)
1674 float trace_hits_box(vector start, vector end, vector thmi, vector thma)
1679 // now it is a trace from 0 to end
1681 trace_hits_box_a0 = 0;
1682 trace_hits_box_a1 = 1;
1684 if (!trace_hits_box_1d(end_x, thmi_x, thma_x))
1686 if (!trace_hits_box_1d(end_y, thmi_y, thma_y))
1688 if (!trace_hits_box_1d(end_z, thmi_z, thma_z))
1694 float tracebox_hits_box(vector start, vector mi, vector ma, vector end, vector thmi, vector thma)
1696 return trace_hits_box(start, end, thmi - ma, thma - mi);
1699 float SUB_NoImpactCheck()
1701 // zero hitcontents = this is not the real impact, but either the
1702 // mirror-impact of something hitting the projectile instead of the
1703 // projectile hitting the something, or a touchareagrid one. Neither of
1704 // these stop the projectile from moving, so...
1705 if(trace_dphitcontents == 0)
1707 //dprint("A hit happened with zero hit contents... DEBUG THIS, this should never happen for projectiles! Projectile will self-destruct.\n");
1708 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)));
1711 if (trace_dphitq3surfaceflags & Q3SURFACEFLAG_NOIMPACT)
1713 if (other == world && self.size != '0 0 0')
1716 tic = self.velocity * sys_frametime;
1717 tic = tic + normalize(tic) * vlen(self.maxs - self.mins);
1718 traceline(self.origin - tic, self.origin + tic, MOVE_NORMAL, self);
1719 if (trace_fraction >= 1)
1721 dprint("Odd... did not hit...?\n");
1723 else if (trace_dphitq3surfaceflags & Q3SURFACEFLAG_NOIMPACT)
1725 dprint("Detected and prevented the sky-grapple bug.\n");
1733 #define SUB_OwnerCheck() (other && (other == self.owner))
1735 void RemoveGrapplingHook(entity pl);
1736 void W_Crylink_Dequeue(entity e);
1737 float WarpZone_Projectile_Touch_ImpactFilter_Callback()
1739 if(SUB_OwnerCheck())
1741 if(SUB_NoImpactCheck())
1743 if(self.classname == "grapplinghook")
1744 RemoveGrapplingHook(self.realowner);
1745 else if(self.classname == "spike")
1747 W_Crylink_Dequeue(self);
1754 if(trace_ent && trace_ent.solid > SOLID_TRIGGER)
1755 UpdateCSQCProjectile(self);
1758 #define PROJECTILE_TOUCH if(WarpZone_Projectile_Touch()) return
1760 #define ITEM_TOUCH_NEEDKILL() (((trace_dpstartcontents | trace_dphitcontents) & DPCONTENTS_NODROP) || (trace_dphitq3surfaceflags & Q3SURFACEFLAG_SKY))
1761 #define ITEM_DAMAGE_NEEDKILL(dt) (((dt) == DEATH_HURTTRIGGER) || ((dt) == DEATH_SLIME) || ((dt) == DEATH_LAVA) || ((dt) == DEATH_SWAMP))
1763 void URI_Get_Callback(float id, float status, string data)
1765 if(url_URI_Get_Callback(id, status, data))
1769 else if (id == URI_GET_DISCARD)
1773 else if (id >= URI_GET_CURL && id <= URI_GET_CURL_END)
1776 Curl_URI_Get_Callback(id, status, data);
1778 else if (id >= URI_GET_IPBAN && id <= URI_GET_IPBAN_END)
1781 OnlineBanList_URI_Get_Callback(id, status, data);
1785 print("Received HTTP request data for an invalid id ", ftos(id), ".\n");
1789 string uid2name(string myuid) {
1791 s = db_get(ServerProgsDB, strcat("/uid2name/", myuid));
1793 // FIXME remove this later after 0.6 release
1794 // convert old style broken records to correct style
1797 s = db_get(ServerProgsDB, strcat("uid2name", myuid));
1800 db_put(ServerProgsDB, strcat("/uid2name/", myuid), s);
1801 db_put(ServerProgsDB, strcat("uid2name", myuid), "");
1806 s = "^1Unregistered Player";
1810 float race_readTime(string map, float pos)
1818 return stof(db_get(ServerProgsDB, strcat(map, rr, "time", ftos(pos))));
1821 string race_readUID(string map, float pos)
1829 return db_get(ServerProgsDB, strcat(map, rr, "crypto_idfp", ftos(pos)));
1832 float race_readPos(string map, float t) {
1834 for (i = 1; i <= RANKINGS_CNT; ++i)
1835 if (race_readTime(map, i) == 0 || race_readTime(map, i) > t)
1838 return 0; // pos is zero if unranked
1841 void race_writeTime(string map, float t, string myuid)
1850 newpos = race_readPos(map, t);
1852 float i, prevpos = 0;
1853 for(i = 1; i <= RANKINGS_CNT; ++i)
1855 if(race_readUID(map, i) == myuid)
1858 if (prevpos) { // player improved his existing record, only have to iterate on ranks between new and old recs
1859 for (i = prevpos; i > newpos; --i) {
1860 db_put(ServerProgsDB, strcat(map, rr, "time", ftos(i)), ftos(race_readTime(map, i - 1)));
1861 db_put(ServerProgsDB, strcat(map, rr, "crypto_idfp", ftos(i)), race_readUID(map, i - 1));
1863 } else { // player has no ranked record yet
1864 for (i = RANKINGS_CNT; i > newpos; --i) {
1865 db_put(ServerProgsDB, strcat(map, rr, "time", ftos(i)), ftos(race_readTime(map, i - 1)));
1866 db_put(ServerProgsDB, strcat(map, rr, "crypto_idfp", ftos(i)), race_readUID(map, i - 1));
1870 // store new time itself
1871 db_put(ServerProgsDB, strcat(map, rr, "time", ftos(newpos)), ftos(t));
1872 db_put(ServerProgsDB, strcat(map, rr, "crypto_idfp", ftos(newpos)), myuid);
1875 string race_readName(string map, float pos)
1883 return uid2name(db_get(ServerProgsDB, strcat(map, rr, "crypto_idfp", ftos(pos))));
1886 float MoveToRandomMapLocation(entity e, float goodcontents, float badcontents, float badsurfaceflags, float attempts, float maxaboveground, float minviewdistance)
1889 vector start, org, delta, end, enddown, mstart;
1892 m = e.dphitcontentsmask;
1893 e.dphitcontentsmask = goodcontents | badcontents;
1896 delta = world.maxs - world.mins;
1900 for (i = 0; i < attempts; ++i)
1902 start_x = org_x + random() * delta_x;
1903 start_y = org_y + random() * delta_y;
1904 start_z = org_z + random() * delta_z;
1906 // rule 1: start inside world bounds, and outside
1907 // solid, and don't start from somewhere where you can
1908 // fall down to evil
1909 tracebox(start, e.mins, e.maxs, start - '0 0 1' * delta_z, MOVE_NORMAL, e);
1910 if (trace_fraction >= 1)
1912 if (trace_startsolid)
1914 if (trace_dphitcontents & badcontents)
1916 if (trace_dphitq3surfaceflags & badsurfaceflags)
1919 // rule 2: if we are too high, lower the point
1920 if (trace_fraction * delta_z > maxaboveground)
1921 start = trace_endpos + '0 0 1' * maxaboveground;
1922 enddown = trace_endpos;
1924 // rule 3: make sure we aren't outside the map. This only works
1925 // for somewhat well formed maps. A good rule of thumb is that
1926 // the map should have a convex outside hull.
1927 // these can be traceLINES as we already verified the starting box
1928 mstart = start + 0.5 * (e.mins + e.maxs);
1929 traceline(mstart, mstart + '1 0 0' * delta_x, MOVE_NORMAL, e);
1930 if (trace_fraction >= 1 || trace_dphittexturename == "common/caulk")
1932 traceline(mstart, mstart - '1 0 0' * delta_x, MOVE_NORMAL, e);
1933 if (trace_fraction >= 1 || trace_dphittexturename == "common/caulk")
1935 traceline(mstart, mstart + '0 1 0' * delta_y, MOVE_NORMAL, e);
1936 if (trace_fraction >= 1 || trace_dphittexturename == "common/caulk")
1938 traceline(mstart, mstart - '0 1 0' * delta_y, MOVE_NORMAL, e);
1939 if (trace_fraction >= 1 || trace_dphittexturename == "common/caulk")
1941 traceline(mstart, mstart + '0 0 1' * delta_z, MOVE_NORMAL, e);
1942 if (trace_fraction >= 1 || trace_dphittexturename == "common/caulk")
1945 // rule 4: we must "see" some spawnpoint or item
1946 for(sp = world; (sp = find(sp, classname, "info_player_deathmatch")); )
1947 if(checkpvs(mstart, sp))
1948 if((traceline(mstart, sp.origin, MOVE_NORMAL, e), trace_fraction) >= 1)
1952 for(sp = world; (sp = findflags(sp, flags, FL_ITEM)); )
1953 if(checkpvs(mstart, sp))
1954 if((traceline(mstart, sp.origin + (sp.mins + sp.maxs) * 0.5, MOVE_NORMAL, e), trace_fraction) >= 1)
1960 // find a random vector to "look at"
1961 end_x = org_x + random() * delta_x;
1962 end_y = org_y + random() * delta_y;
1963 end_z = org_z + random() * delta_z;
1964 end = start + normalize(end - start) * vlen(delta);
1966 // rule 4: start TO end must not be too short
1967 tracebox(start, e.mins, e.maxs, end, MOVE_NORMAL, e);
1968 if (trace_startsolid)
1970 if (trace_fraction < minviewdistance / vlen(delta))
1973 // rule 5: don't want to look at sky
1974 if (trace_dphitq3surfaceflags & Q3SURFACEFLAG_SKY)
1977 // rule 6: we must not end up in trigger_hurt
1978 if (tracebox_hits_trigger_hurt(start, e.mins, e.maxs, enddown))
1984 e.dphitcontentsmask = m;
1988 setorigin(e, start);
1989 e.angles = vectoangles(end - start);
1990 dprint("Needed ", ftos(i + 1), " attempts\n");
1997 float zcurveparticles_effectno;
1998 vector zcurveparticles_start;
1999 float zcurveparticles_spd;
2001 void endzcurveparticles()
2003 if(zcurveparticles_effectno)
2006 WriteShort(MSG_BROADCAST, zcurveparticles_spd | 0x8000);
2008 zcurveparticles_effectno = 0;
2011 void zcurveparticles(float effectno, vector start, vector end, float end_dz, float spd)
2013 spd = bound(0, floor(spd / 16), 32767);
2014 if(effectno != zcurveparticles_effectno || start != zcurveparticles_start)
2016 endzcurveparticles();
2017 WriteByte(MSG_BROADCAST, SVC_TEMPENTITY);
2018 WriteByte(MSG_BROADCAST, TE_CSQC_ZCURVEPARTICLES);
2019 WriteShort(MSG_BROADCAST, effectno);
2020 WriteCoord(MSG_BROADCAST, start_x);
2021 WriteCoord(MSG_BROADCAST, start_y);
2022 WriteCoord(MSG_BROADCAST, start_z);
2023 zcurveparticles_effectno = effectno;
2024 zcurveparticles_start = start;
2027 WriteShort(MSG_BROADCAST, zcurveparticles_spd);
2028 WriteCoord(MSG_BROADCAST, end_x);
2029 WriteCoord(MSG_BROADCAST, end_y);
2030 WriteCoord(MSG_BROADCAST, end_z);
2031 WriteCoord(MSG_BROADCAST, end_dz);
2032 zcurveparticles_spd = spd;
2035 void zcurveparticles_from_tracetoss(float effectno, vector start, vector end, vector vel)
2038 vector vecxy, velxy;
2040 vecxy = end - start;
2045 if (vlen(velxy) < 0.000001 * fabs(vel_z))
2047 endzcurveparticles();
2048 trailparticles(world, effectno, start, end);
2052 end_dz = vlen(vecxy) / vlen(velxy) * vel_z - (end_z - start_z);
2053 zcurveparticles(effectno, start, end, end_dz, vlen(vel));
2056 void write_recordmarker(entity pl, float tstart, float dt)
2058 GameLogEcho(strcat(":recordset:", ftos(pl.playerid), ":", ftos(dt)));
2060 // also write a marker into demo files for demotc-race-record-extractor to find
2063 strcat("//", strconv(2, 0, 0, GetGametype()), " RECORD SET ", TIME_ENCODED_TOSTRING(TIME_ENCODE(dt))),
2064 " ", ftos(tstart), " ", ftos(dt), "\n"));
2067 vector shotorg_adjustfromclient(vector vecs, float y_is_right, float allowcenter, float algn)
2080 if(allowcenter) // 2: allow center handedness
2093 if(allowcenter) // 2: allow center handedness
2109 vector shotorg_adjust_values(vector vecs, float y_is_right, float visual, float algn)
2114 if (autocvar_g_shootfromeye)
2118 if (autocvar_g_shootfromclient) { vecs = shotorg_adjustfromclient(vecs, y_is_right, (autocvar_g_shootfromclient >= 2), algn); }
2119 else { vecs_y = 0; vecs_z -= 2; }
2127 else if (autocvar_g_shootfromcenter)
2132 else if ((s = autocvar_g_shootfromfixedorigin) != "")
2142 else if (autocvar_g_shootfromclient)
2144 vecs = shotorg_adjustfromclient(vecs, y_is_right, (autocvar_g_shootfromclient >= 2), algn);
2149 vector shotorg_adjust(vector vecs, float y_is_right, float visual)
2151 return shotorg_adjust_values(vecs, y_is_right, visual, self.owner.cvar_cl_gunalign);
2155 void attach_sameorigin(entity e, entity to, string tag)
2157 vector org, t_forward, t_left, t_up, e_forward, e_up;
2160 org = e.origin - gettaginfo(to, gettagindex(to, tag));
2161 tagscale = pow(vlen(v_forward), -2); // undo a scale on the tag
2162 t_forward = v_forward * tagscale;
2163 t_left = v_right * -tagscale;
2164 t_up = v_up * tagscale;
2166 e.origin_x = org * t_forward;
2167 e.origin_y = org * t_left;
2168 e.origin_z = org * t_up;
2170 // current forward and up directions
2171 if (substring(e.model, 0, 1) == "*") // bmodels have their own rules
2172 e.angles = AnglesTransform_FromVAngles(e.angles);
2174 e.angles = AnglesTransform_FromAngles(e.angles);
2175 fixedmakevectors(e.angles);
2177 // untransform forward, up!
2178 e_forward_x = v_forward * t_forward;
2179 e_forward_y = v_forward * t_left;
2180 e_forward_z = v_forward * t_up;
2181 e_up_x = v_up * t_forward;
2182 e_up_y = v_up * t_left;
2183 e_up_z = v_up * t_up;
2185 e.angles = fixedvectoangles2(e_forward, e_up);
2186 if (substring(e.model, 0, 1) == "*") // bmodels have their own rules
2187 e.angles = AnglesTransform_ToVAngles(e.angles);
2189 e.angles = AnglesTransform_ToAngles(e.angles);
2191 setattachment(e, to, tag);
2192 setorigin(e, e.origin);
2195 void detach_sameorigin(entity e)
2198 org = gettaginfo(e, 0);
2199 e.angles = fixedvectoangles2(v_forward, v_up);
2200 if (substring(e.model, 0, 1) == "*") // bmodels have their own rules
2201 e.angles = AnglesTransform_ToVAngles(e.angles);
2203 e.angles = AnglesTransform_ToAngles(e.angles);
2205 setattachment(e, world, "");
2206 setorigin(e, e.origin);
2209 void follow_sameorigin(entity e, entity to)
2211 e.movetype = MOVETYPE_FOLLOW; // make the hole follow
2212 e.aiment = to; // make the hole follow bmodel
2213 e.punchangle = to.angles; // the original angles of bmodel
2214 e.view_ofs = e.origin - to.origin; // relative origin
2215 e.v_angle = e.angles - to.angles; // relative angles
2218 void unfollow_sameorigin(entity e)
2220 e.movetype = MOVETYPE_NONE;
2223 entity gettaginfo_relative_ent;
2224 vector gettaginfo_relative(entity e, float tag)
2226 if (!gettaginfo_relative_ent)
2228 gettaginfo_relative_ent = spawn();
2229 gettaginfo_relative_ent.effects = EF_NODRAW;
2231 gettaginfo_relative_ent.model = e.model;
2232 gettaginfo_relative_ent.modelindex = e.modelindex;
2233 gettaginfo_relative_ent.frame = e.frame;
2234 return gettaginfo(gettaginfo_relative_ent, tag);
2239 float modeleffect_SendEntity(entity to, float sf)
2242 WriteByte(MSG_ENTITY, ENT_CLIENT_MODELEFFECT);
2245 if(self.velocity != '0 0 0')
2247 if(self.angles != '0 0 0')
2249 if(self.avelocity != '0 0 0')
2252 WriteByte(MSG_ENTITY, f);
2253 WriteShort(MSG_ENTITY, self.modelindex);
2254 WriteByte(MSG_ENTITY, self.skin);
2255 WriteByte(MSG_ENTITY, self.frame);
2256 WriteCoord(MSG_ENTITY, self.origin_x);
2257 WriteCoord(MSG_ENTITY, self.origin_y);
2258 WriteCoord(MSG_ENTITY, self.origin_z);
2261 WriteCoord(MSG_ENTITY, self.velocity_x);
2262 WriteCoord(MSG_ENTITY, self.velocity_y);
2263 WriteCoord(MSG_ENTITY, self.velocity_z);
2267 WriteCoord(MSG_ENTITY, self.angles_x);
2268 WriteCoord(MSG_ENTITY, self.angles_y);
2269 WriteCoord(MSG_ENTITY, self.angles_z);
2273 WriteCoord(MSG_ENTITY, self.avelocity_x);
2274 WriteCoord(MSG_ENTITY, self.avelocity_y);
2275 WriteCoord(MSG_ENTITY, self.avelocity_z);
2277 WriteShort(MSG_ENTITY, self.scale * 256.0);
2278 WriteShort(MSG_ENTITY, self.scale2 * 256.0);
2279 WriteByte(MSG_ENTITY, self.teleport_time * 100.0);
2280 WriteByte(MSG_ENTITY, self.fade_time * 100.0);
2281 WriteByte(MSG_ENTITY, self.alpha * 255.0);
2286 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)
2291 e.classname = "modeleffect";
2299 e.teleport_time = t1;
2303 e.scale = s0 / max6(-e.mins_x, -e.mins_y, -e.mins_z, e.maxs_x, e.maxs_y, e.maxs_z);
2307 e.scale2 = s2 / max6(-e.mins_x, -e.mins_y, -e.mins_z, e.maxs_x, e.maxs_y, e.maxs_z);
2310 sz = max(e.scale, e.scale2);
2311 setsize(e, e.mins * sz, e.maxs * sz);
2312 Net_LinkEntity(e, FALSE, 0.1, modeleffect_SendEntity);
2315 void shockwave_spawn(string m, vector org, float sz, float t1, float t2)
2317 return modeleffect_spawn(m, 0, 0, org, '0 0 0', '0 0 0', '0 0 0', 0, sz, 1, t1, t2);
2320 float randombit(float bits)
2322 if not(bits & (bits-1)) // this ONLY holds for powers of two!
2331 for(f = 1; f <= bits; f *= 2)
2340 r = (r - 1) / (n - 1);
2347 float randombits(float bits, float k, float error_return)
2351 while(k > 0 && bits != r)
2353 r += randombit(bits - r);
2362 void randombit_test(float bits, float iter)
2366 print(ftos(randombit(bits)), "\n");
2371 float ExponentialFalloff(float mindist, float maxdist, float halflifedist, float d)
2373 if(halflifedist > 0)
2374 return pow(0.5, (bound(mindist, d, maxdist) - mindist) / halflifedist);
2375 else if(halflifedist < 0)
2376 return pow(0.5, (bound(mindist, d, maxdist) - maxdist) / halflifedist);
2385 #define cvar_string_normal builtin_cvar_string
2386 #define cvar_normal builtin_cvar
2388 string cvar_string_normal(string n)
2390 if not(cvar_type(n) & 1)
2391 backtrace(strcat("Attempt to access undefined cvar: ", n));
2392 return builtin_cvar_string(n);
2395 float cvar_normal(string n)
2397 return stof(cvar_string_normal(n));
2400 #define cvar_set_normal builtin_cvar_set
2408 oself.think = SUB_Remove;
2409 oself.nextthink = time;
2415 Execute func() after time + fdelay.
2416 self when func is executed = self when defer is called
2418 void defer(float fdelay, void() func)
2425 e.think = defer_think;
2426 e.nextthink = time + fdelay;
2429 .string aiment_classname;
2430 .float aiment_deadflag;
2431 void SetMovetypeFollow(entity ent, entity e)
2433 // FIXME this may not be warpzone aware
2434 ent.movetype = MOVETYPE_FOLLOW; // make the hole follow
2435 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.
2436 ent.aiment = e; // make the hole follow bmodel
2437 ent.punchangle = e.angles; // the original angles of bmodel
2438 ent.view_ofs = ent.origin - e.origin; // relative origin
2439 ent.v_angle = ent.angles - e.angles; // relative angles
2440 ent.aiment_classname = strzone(e.classname);
2441 ent.aiment_deadflag = e.deadflag;
2443 void UnsetMovetypeFollow(entity ent)
2445 ent.movetype = MOVETYPE_FLY;
2446 PROJECTILE_MAKETRIGGER(ent);
2449 float LostMovetypeFollow(entity ent)
2452 if(ent.movetype != MOVETYPE_FOLLOW)
2458 if(ent.aiment.classname != ent.aiment_classname)
2460 if(ent.aiment.deadflag != ent.aiment_deadflag)
2466 float isPushable(entity e)
2475 case "droppedweapon":
2476 case "keepawayball":
2477 case "nexball_basketball":
2478 case "nexball_football":
2480 case "bullet": // antilagged bullets can't hit this either
2483 if (e.projectiledeathtype)