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 string STR_PLAYER = "player";
83 string STR_SPECTATOR = "spectator";
84 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 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 float w_getbestweapon(entity e);
462 string W_FixWeaponOrder_ForceComplete_AndBuildImpulseList(string wo)
465 o = W_FixWeaponOrder_ForceComplete(wo);
466 if(self.weaponorder_byimpulse)
468 strunzone(self.weaponorder_byimpulse);
469 self.weaponorder_byimpulse = string_null;
471 self.weaponorder_byimpulse = strzone(W_FixWeaponOrder_BuildImpulseList(o));
474 void GetCvars(float f)
476 string s = string_null;
479 s = strcat1(argv(f));
484 MUTATOR_CALLHOOK(GetCvars);
486 Notification_GetCvars();
488 GetCvars_handleFloat(s, f, autoswitch, "cl_autoswitch");
489 GetCvars_handleFloat(s, f, cvar_cl_autoscreenshot, "cl_autoscreenshot");
490 GetCvars_handleString(s, f, cvar_g_xonoticversion, "g_xonoticversion");
491 GetCvars_handleFloat(s, f, cvar_cl_handicap, "cl_handicap");
492 GetCvars_handleFloat(s, f, cvar_cl_clippedspectating, "cl_clippedspectating");
493 GetCvars_handleString_Fixup(s, f, cvar_cl_weaponpriority, "cl_weaponpriority", W_FixWeaponOrder_ForceComplete_AndBuildImpulseList);
494 GetCvars_handleString_Fixup(s, f, cvar_cl_weaponpriorities[0], "cl_weaponpriority0", W_FixWeaponOrder_AllowIncomplete);
495 GetCvars_handleString_Fixup(s, f, cvar_cl_weaponpriorities[1], "cl_weaponpriority1", W_FixWeaponOrder_AllowIncomplete);
496 GetCvars_handleString_Fixup(s, f, cvar_cl_weaponpriorities[2], "cl_weaponpriority2", W_FixWeaponOrder_AllowIncomplete);
497 GetCvars_handleString_Fixup(s, f, cvar_cl_weaponpriorities[3], "cl_weaponpriority3", W_FixWeaponOrder_AllowIncomplete);
498 GetCvars_handleString_Fixup(s, f, cvar_cl_weaponpriorities[4], "cl_weaponpriority4", W_FixWeaponOrder_AllowIncomplete);
499 GetCvars_handleString_Fixup(s, f, cvar_cl_weaponpriorities[5], "cl_weaponpriority5", W_FixWeaponOrder_AllowIncomplete);
500 GetCvars_handleString_Fixup(s, f, cvar_cl_weaponpriorities[6], "cl_weaponpriority6", W_FixWeaponOrder_AllowIncomplete);
501 GetCvars_handleString_Fixup(s, f, cvar_cl_weaponpriorities[7], "cl_weaponpriority7", W_FixWeaponOrder_AllowIncomplete);
502 GetCvars_handleString_Fixup(s, f, cvar_cl_weaponpriorities[8], "cl_weaponpriority8", W_FixWeaponOrder_AllowIncomplete);
503 GetCvars_handleString_Fixup(s, f, cvar_cl_weaponpriorities[9], "cl_weaponpriority9", W_FixWeaponOrder_AllowIncomplete);
504 GetCvars_handleFloat(s, f, cvar_cl_weaponimpulsemode, "cl_weaponimpulsemode");
505 GetCvars_handleFloat(s, f, cvar_cl_autotaunt, "cl_autotaunt");
506 GetCvars_handleFloat(s, f, cvar_cl_noantilag, "cl_noantilag");
507 GetCvars_handleFloat(s, f, cvar_cl_voice_directional, "cl_voice_directional");
508 GetCvars_handleFloat(s, f, cvar_cl_voice_directional_taunt_attenuation, "cl_voice_directional_taunt_attenuation");
509 GetCvars_handleFloat(s, f, cvar_cl_accuracy_data_share, "cl_accuracy_data_share");
510 GetCvars_handleFloat(s, f, cvar_cl_accuracy_data_receive, "cl_accuracy_data_receive");
512 self.cvar_cl_accuracy_data_share = boolean(self.cvar_cl_accuracy_data_share);
513 self.cvar_cl_accuracy_data_receive = boolean(self.cvar_cl_accuracy_data_receive);
515 GetCvars_handleFloatOnce(s, f, cvar_cl_gunalign, "cl_gunalign");
516 GetCvars_handleFloat(s, f, cvar_cl_allow_uid2name, "cl_allow_uid2name");
517 GetCvars_handleFloat(s, f, cvar_cl_allow_uidtracking, "cl_allow_uidtracking");
518 GetCvars_handleFloat(s, f, cvar_cl_movement_track_canjump, "cl_movement_track_canjump");
519 GetCvars_handleFloat(s, f, cvar_cl_newusekeysupported, "cl_newusekeysupported");
521 // fixup of switchweapon (needed for LMS or when spectating is disabled, as PutClientInServer comes too early)
524 if (s == "cl_weaponpriority")
525 self.switchweapon = w_getbestweapon(self);
526 if (s == "cl_allow_uidtracking")
527 PlayerStats_AddPlayer(self);
531 // decolorizes and team colors the player name when needed
532 string playername(entity p)
535 if (teamplay && !intermission_running && IS_PLAYER(p))
537 t = Team_ColorCode(p.team);
538 return strcat(t, strdecolorize(p.netname));
544 vector randompos(vector m1, vector m2)
548 v_x = m2_x * random() + m1_x;
549 v_y = m2_y * random() + m1_y;
550 v_z = m2_z * random() + m1_z;
554 //#NO AUTOCVARS START
556 float g_pickup_shells;
557 float g_pickup_shells_max;
558 float g_pickup_nails;
559 float g_pickup_nails_max;
560 float g_pickup_rockets;
561 float g_pickup_rockets_max;
562 float g_pickup_cells;
563 float g_pickup_cells_max;
565 float g_pickup_fuel_jetpack;
566 float g_pickup_fuel_max;
567 float g_pickup_armorsmall;
568 float g_pickup_armorsmall_max;
569 float g_pickup_armorsmall_anyway;
570 float g_pickup_armormedium;
571 float g_pickup_armormedium_max;
572 float g_pickup_armormedium_anyway;
573 float g_pickup_armorbig;
574 float g_pickup_armorbig_max;
575 float g_pickup_armorbig_anyway;
576 float g_pickup_armorlarge;
577 float g_pickup_armorlarge_max;
578 float g_pickup_armorlarge_anyway;
579 float g_pickup_healthsmall;
580 float g_pickup_healthsmall_max;
581 float g_pickup_healthsmall_anyway;
582 float g_pickup_healthmedium;
583 float g_pickup_healthmedium_max;
584 float g_pickup_healthmedium_anyway;
585 float g_pickup_healthlarge;
586 float g_pickup_healthlarge_max;
587 float g_pickup_healthlarge_anyway;
588 float g_pickup_healthmega;
589 float g_pickup_healthmega_max;
590 float g_pickup_healthmega_anyway;
591 float g_pickup_ammo_anyway;
592 float g_pickup_weapons_anyway;
594 WEPSET_DECLARE_A(g_weaponarena_weapons);
595 float g_weaponarena_random;
596 float g_weaponarena_random_with_laser;
597 string g_weaponarena_list;
598 float g_weaponspeedfactor;
599 float g_weaponratefactor;
600 float g_weapondamagefactor;
601 float g_weaponforcefactor;
602 float g_weaponspreadfactor;
604 WEPSET_DECLARE_A(start_weapons);
605 WEPSET_DECLARE_A(start_weapons_default);
606 WEPSET_DECLARE_A(start_weapons_defaultmask);
608 float start_ammo_shells;
609 float start_ammo_nails;
610 float start_ammo_rockets;
611 float start_ammo_cells;
612 float start_ammo_fuel;
614 float start_armorvalue;
615 WEPSET_DECLARE_A(warmup_start_weapons);
616 WEPSET_DECLARE_A(warmup_start_weapons_default);
617 WEPSET_DECLARE_A(warmup_start_weapons_defaultmask);
618 float warmup_start_ammo_shells;
619 float warmup_start_ammo_nails;
620 float warmup_start_ammo_rockets;
621 float warmup_start_ammo_cells;
622 float warmup_start_ammo_fuel;
623 float warmup_start_health;
624 float warmup_start_armorvalue;
627 entity get_weaponinfo(float w);
629 float want_weapon(string cvarprefix, entity weaponinfo, float allguns)
631 var float i = weaponinfo.weapon;
637 if (g_lms || g_ca || allguns)
639 if(weaponinfo.spawnflags & WEP_FLAG_NORMAL)
645 d = (i == WEP_SHOTGUN);
647 d = 0; // weapon is set a few lines later
649 d = (i == WEP_LASER || i == WEP_SHOTGUN);
651 if(g_grappling_hook) // if possible, redirect off-hand hook to on-hand hook
652 d |= (i == WEP_HOOK);
653 if(weaponinfo.spawnflags & WEP_FLAG_MUTATORBLOCKED) // never default mutator blocked guns
656 var float t = cvar(strcat(cvarprefix, weaponinfo.netname));
658 //print(strcat("want_weapon: ", weaponinfo.netname, " - d: ", ftos(d), ", t: ", ftos(t), ". \n"));
663 // 4: is set by default?
672 void readplayerstartcvars()
678 // initialize starting values for players
679 WEPSET_CLEAR_A(start_weapons);
680 WEPSET_CLEAR_A(start_weapons_default);
681 WEPSET_CLEAR_A(start_weapons_defaultmask);
683 start_ammo_shells = 0;
684 start_ammo_nails = 0;
685 start_ammo_rockets = 0;
686 start_ammo_cells = 0;
687 start_health = cvar("g_balance_health_start");
688 start_armorvalue = cvar("g_balance_armor_start");
691 WEPSET_CLEAR_A(g_weaponarena_weapons);
693 s = cvar_string("g_weaponarena");
694 if (s == "0" || s == "")
700 if (s == "0" || s == "")
706 // forcibly turn off weaponarena
711 g_weaponarena_list = "All Weapons";
712 for (j = WEP_FIRST; j <= WEP_LAST; ++j)
714 e = get_weaponinfo(j);
715 if not(e.spawnflags & WEP_FLAG_MUTATORBLOCKED)
716 WEPSET_OR_AW(g_weaponarena_weapons, j);
719 else if (s == "most")
722 g_weaponarena_list = "Most Weapons";
723 for (j = WEP_FIRST; j <= WEP_LAST; ++j)
725 e = get_weaponinfo(j);
726 if not(e.spawnflags & WEP_FLAG_MUTATORBLOCKED)
727 if (e.spawnflags & WEP_FLAG_NORMAL)
728 WEPSET_OR_AW(g_weaponarena_weapons, j);
731 else if (s == "none")
734 g_weaponarena_list = "No Weapons";
739 t = tokenize_console(s);
740 g_weaponarena_list = "";
741 for (i = 0; i < t; ++i)
744 for (j = WEP_FIRST; j <= WEP_LAST; ++j)
746 e = get_weaponinfo(j);
749 WEPSET_OR_AW(g_weaponarena_weapons, j);
750 g_weaponarena_list = strcat(g_weaponarena_list, e.message, " & ");
756 print("The weapon mutator list contains an unknown weapon ", s, ". Skipped.\n");
759 g_weaponarena_list = strzone(substring(g_weaponarena_list, 0, strlen(g_weaponarena_list) - 3));
763 g_weaponarena_random = cvar("g_weaponarena_random");
765 g_weaponarena_random = 0;
766 g_weaponarena_random_with_laser = cvar("g_weaponarena_random_with_laser");
770 g_weapon_stay = 0; // incompatible
771 WEPSET_COPY_AA(start_weapons, g_weaponarena_weapons);
772 start_items |= IT_UNLIMITED_AMMO;
776 for (i = WEP_FIRST; i <= WEP_LAST; ++i)
778 e = get_weaponinfo(i);
779 float w = want_weapon("g_start_weapon_", e, FALSE);
781 WEPSET_OR_AW(start_weapons, i);
783 WEPSET_OR_AW(start_weapons_default, i);
785 WEPSET_OR_AW(start_weapons_defaultmask, i);
789 if(!cvar("g_use_ammunition"))
790 start_items |= IT_UNLIMITED_AMMO;
792 if(start_items & IT_UNLIMITED_WEAPON_AMMO)
794 start_ammo_rockets = 999;
795 start_ammo_shells = 999;
796 start_ammo_cells = 999;
797 start_ammo_nails = 999;
798 start_ammo_fuel = 999;
802 start_ammo_shells = cvar("g_start_ammo_shells");
803 start_ammo_nails = cvar("g_start_ammo_nails");
804 start_ammo_rockets = cvar("g_start_ammo_rockets");
805 start_ammo_cells = cvar("g_start_ammo_cells");
806 start_ammo_fuel = cvar("g_start_ammo_fuel");
811 warmup_start_ammo_shells = start_ammo_shells;
812 warmup_start_ammo_nails = start_ammo_nails;
813 warmup_start_ammo_rockets = start_ammo_rockets;
814 warmup_start_ammo_cells = start_ammo_cells;
815 warmup_start_ammo_fuel = start_ammo_fuel;
816 warmup_start_health = start_health;
817 warmup_start_armorvalue = start_armorvalue;
818 WEPSET_COPY_AA(warmup_start_weapons, start_weapons);
819 WEPSET_COPY_AA(warmup_start_weapons_default, start_weapons_default);
820 WEPSET_COPY_AA(warmup_start_weapons_defaultmask, start_weapons_defaultmask);
822 if (!g_weaponarena && !g_ca)
824 warmup_start_ammo_shells = cvar("g_warmup_start_ammo_shells");
825 warmup_start_ammo_cells = cvar("g_warmup_start_ammo_cells");
826 warmup_start_ammo_nails = cvar("g_warmup_start_ammo_nails");
827 warmup_start_ammo_rockets = cvar("g_warmup_start_ammo_rockets");
828 warmup_start_ammo_fuel = cvar("g_warmup_start_ammo_fuel");
829 warmup_start_health = cvar("g_warmup_start_health");
830 warmup_start_armorvalue = cvar("g_warmup_start_armor");
831 WEPSET_CLEAR_A(warmup_start_weapons);
832 WEPSET_CLEAR_A(warmup_start_weapons_default);
833 WEPSET_CLEAR_A(warmup_start_weapons_defaultmask);
834 for (i = WEP_FIRST; i <= WEP_LAST; ++i)
836 e = get_weaponinfo(i);
837 float w = want_weapon("g_start_weapon_", e, cvar("g_warmup_allguns"));
839 WEPSET_OR_AW(warmup_start_weapons, i);
841 WEPSET_OR_AW(warmup_start_weapons_default, i);
843 WEPSET_OR_AW(warmup_start_weapons_defaultmask, i);
849 start_items |= IT_JETPACK;
851 MUTATOR_CALLHOOK(SetStartItems);
853 if ((start_items & IT_JETPACK) || (g_grappling_hook && WEPSET_CONTAINS_AW(start_weapons, WEP_HOOK)))
855 g_grappling_hook = 0; // these two can't coexist, as they use the same button
856 start_items |= IT_FUEL_REGEN;
857 start_ammo_fuel = max(start_ammo_fuel, cvar("g_balance_fuel_rotstable"));
858 warmup_start_ammo_fuel = max(warmup_start_ammo_fuel, cvar("g_balance_fuel_rotstable"));
861 for (i = WEP_FIRST; i <= WEP_LAST; ++i)
863 e = get_weaponinfo(i);
864 if(WEPSET_CONTAINS_AW(start_weapons, i) || WEPSET_CONTAINS_AW(warmup_start_weapons, i))
865 weapon_action(i, WR_PRECACHE);
868 start_ammo_shells = max(0, start_ammo_shells);
869 start_ammo_nails = max(0, start_ammo_nails);
870 start_ammo_cells = max(0, start_ammo_cells);
871 start_ammo_rockets = max(0, start_ammo_rockets);
872 start_ammo_fuel = max(0, start_ammo_fuel);
874 warmup_start_ammo_shells = max(0, warmup_start_ammo_shells);
875 warmup_start_ammo_nails = max(0, warmup_start_ammo_nails);
876 warmup_start_ammo_cells = max(0, warmup_start_ammo_cells);
877 warmup_start_ammo_rockets = max(0, warmup_start_ammo_rockets);
878 warmup_start_ammo_fuel = max(0, warmup_start_ammo_fuel);
882 float g_bugrigs_planar_movement;
883 float g_bugrigs_planar_movement_car_jumping;
884 float g_bugrigs_reverse_spinning;
885 float g_bugrigs_reverse_speeding;
886 float g_bugrigs_reverse_stopping;
887 float g_bugrigs_air_steering;
888 float g_bugrigs_angle_smoothing;
889 float g_bugrigs_friction_floor;
890 float g_bugrigs_friction_brake;
891 float g_bugrigs_friction_air;
892 float g_bugrigs_accel;
893 float g_bugrigs_speed_ref;
894 float g_bugrigs_speed_pow;
895 float g_bugrigs_steer;
900 string GetGametype(); // g_world.qc
901 void readlevelcvars(void)
904 #define CHECK_MUTATOR_ADD(mut_cvar,mut_name,dependence) \
905 { if(cvar(mut_cvar) && dependence) { MUTATOR_ADD(mut_name); } }
907 CHECK_MUTATOR_ADD("g_dodging", mutator_dodging, 1);
908 CHECK_MUTATOR_ADD("g_spawn_near_teammate", mutator_spawn_near_teammate, 1);
909 CHECK_MUTATOR_ADD("g_physical_items", mutator_physical_items, 1);
910 CHECK_MUTATOR_ADD("g_touchexplode", mutator_touchexplode, 1);
911 CHECK_MUTATOR_ADD("g_minstagib", mutator_minstagib, 1);
912 CHECK_MUTATOR_ADD("g_invincible_projectiles", mutator_invincibleprojectiles, !cvar("g_minstagib"));
913 CHECK_MUTATOR_ADD("g_new_toys", mutator_new_toys, !cvar("g_minstagib"));
914 CHECK_MUTATOR_ADD("g_nix", mutator_nix, !cvar("g_minstagib"));
915 CHECK_MUTATOR_ADD("g_rocket_flying", mutator_rocketflying, !cvar("g_minstagib"));
916 CHECK_MUTATOR_ADD("g_vampire", mutator_vampire, !cvar("g_minstagib"));
917 CHECK_MUTATOR_ADD("g_superspectate", mutator_superspec, 1);
918 CHECK_MUTATOR_ADD("g_pinata", mutator_pinata, !cvar("g_minstagib"));
919 CHECK_MUTATOR_ADD("g_midair", mutator_midair, 1);
920 CHECK_MUTATOR_ADD("g_bloodloss", mutator_bloodloss, !cvar("g_minstagib"));
921 CHECK_MUTATOR_ADD("g_random_gravity", mutator_random_gravity, 1);
922 CHECK_MUTATOR_ADD("g_norecoil", mutator_norecoil, 1);
923 CHECK_MUTATOR_ADD("g_multijump", mutator_multijump, 1);
924 CHECK_MUTATOR_ADD("g_footsteps", mutator_footsteps, 1);
925 CHECK_MUTATOR_ADD("g_melee_only", mutator_melee_only, !cvar("g_minstagib"));
926 CHECK_MUTATOR_ADD("g_nades", mutator_nades, 1);
927 CHECK_MUTATOR_ADD("g_sandbox", sandbox, 1);
928 CHECK_MUTATOR_ADD("g_riflearena", mutator_riflearena, !cvar("g_minstagib"));
929 CHECK_MUTATOR_ADD("g_campcheck", mutator_campcheck, 1);
931 #undef CHECK_MUTATOR_ADD
933 if(cvar("sv_allow_fullbright"))
934 serverflags |= SERVERFLAG_ALLOW_FULLBRIGHT;
936 g_bugrigs = cvar("g_bugrigs");
937 g_bugrigs_planar_movement = cvar("g_bugrigs_planar_movement");
938 g_bugrigs_planar_movement_car_jumping = cvar("g_bugrigs_planar_movement_car_jumping");
939 g_bugrigs_reverse_spinning = cvar("g_bugrigs_reverse_spinning");
940 g_bugrigs_reverse_speeding = cvar("g_bugrigs_reverse_speeding");
941 g_bugrigs_reverse_stopping = cvar("g_bugrigs_reverse_stopping");
942 g_bugrigs_air_steering = cvar("g_bugrigs_air_steering");
943 g_bugrigs_angle_smoothing = cvar("g_bugrigs_angle_smoothing");
944 g_bugrigs_friction_floor = cvar("g_bugrigs_friction_floor");
945 g_bugrigs_friction_brake = cvar("g_bugrigs_friction_brake");
946 g_bugrigs_friction_air = cvar("g_bugrigs_friction_air");
947 g_bugrigs_accel = cvar("g_bugrigs_accel");
948 g_bugrigs_speed_ref = cvar("g_bugrigs_speed_ref");
949 g_bugrigs_speed_pow = cvar("g_bugrigs_speed_pow");
950 g_bugrigs_steer = cvar("g_bugrigs_steer");
952 g_minstagib = cvar("g_minstagib");
954 sv_clones = cvar("sv_clones");
955 sv_foginterval = cvar("sv_foginterval");
956 g_cloaked = cvar("g_cloaked");
958 g_cloaked = 1; // always enable cloak in CTS
959 g_grappling_hook = cvar("g_grappling_hook");
960 g_jetpack = cvar("g_jetpack");
961 sv_maxidle = cvar("sv_maxidle");
962 sv_maxidle_spectatorsareidle = cvar("sv_maxidle_spectatorsareidle");
963 sv_autotaunt = cvar("sv_autotaunt");
964 sv_taunt = cvar("sv_taunt");
966 inWarmupStage = cvar("g_warmup");
967 g_warmup_limit = cvar("g_warmup_limit");
968 g_warmup_allguns = cvar("g_warmup_allguns");
969 g_warmup_allow_timeout = cvar("g_warmup_allow_timeout");
971 if ((g_race && g_race_qualifying == 2) || g_arena || g_assault || cvar("g_campaign"))
972 inWarmupStage = 0; // these modes cannot work together, sorry
974 g_pickup_respawntime_weapon = cvar("g_pickup_respawntime_weapon");
975 g_pickup_respawntime_superweapon = cvar("g_pickup_respawntime_superweapon");
976 g_pickup_respawntime_ammo = cvar("g_pickup_respawntime_ammo");
977 g_pickup_respawntime_short = cvar("g_pickup_respawntime_short");
978 g_pickup_respawntime_medium = cvar("g_pickup_respawntime_medium");
979 g_pickup_respawntime_long = cvar("g_pickup_respawntime_long");
980 g_pickup_respawntime_powerup = cvar("g_pickup_respawntime_powerup");
981 g_pickup_respawntimejitter_weapon = cvar("g_pickup_respawntimejitter_weapon");
982 g_pickup_respawntimejitter_superweapon = cvar("g_pickup_respawntimejitter_superweapon");
983 g_pickup_respawntimejitter_ammo = cvar("g_pickup_respawntimejitter_ammo");
984 g_pickup_respawntimejitter_short = cvar("g_pickup_respawntimejitter_short");
985 g_pickup_respawntimejitter_medium = cvar("g_pickup_respawntimejitter_medium");
986 g_pickup_respawntimejitter_long = cvar("g_pickup_respawntimejitter_long");
987 g_pickup_respawntimejitter_powerup = cvar("g_pickup_respawntimejitter_powerup");
989 g_weaponspeedfactor = cvar("g_weaponspeedfactor");
990 g_weaponratefactor = cvar("g_weaponratefactor");
991 g_weapondamagefactor = cvar("g_weapondamagefactor");
992 g_weaponforcefactor = cvar("g_weaponforcefactor");
993 g_weaponspreadfactor = cvar("g_weaponspreadfactor");
995 g_pickup_shells = cvar("g_pickup_shells");
996 g_pickup_shells_max = cvar("g_pickup_shells_max");
997 g_pickup_nails = cvar("g_pickup_nails");
998 g_pickup_nails_max = cvar("g_pickup_nails_max");
999 g_pickup_rockets = cvar("g_pickup_rockets");
1000 g_pickup_rockets_max = cvar("g_pickup_rockets_max");
1001 g_pickup_cells = cvar("g_pickup_cells");
1002 g_pickup_cells_max = cvar("g_pickup_cells_max");
1003 g_pickup_fuel = cvar("g_pickup_fuel");
1004 g_pickup_fuel_jetpack = cvar("g_pickup_fuel_jetpack");
1005 g_pickup_fuel_max = cvar("g_pickup_fuel_max");
1006 g_pickup_armorsmall = cvar("g_pickup_armorsmall");
1007 g_pickup_armorsmall_max = cvar("g_pickup_armorsmall_max");
1008 g_pickup_armorsmall_anyway = cvar("g_pickup_armorsmall_anyway");
1009 g_pickup_armormedium = cvar("g_pickup_armormedium");
1010 g_pickup_armormedium_max = cvar("g_pickup_armormedium_max");
1011 g_pickup_armormedium_anyway = cvar("g_pickup_armormedium_anyway");
1012 g_pickup_armorbig = cvar("g_pickup_armorbig");
1013 g_pickup_armorbig_max = cvar("g_pickup_armorbig_max");
1014 g_pickup_armorbig_anyway = cvar("g_pickup_armorbig_anyway");
1015 g_pickup_armorlarge = cvar("g_pickup_armorlarge");
1016 g_pickup_armorlarge_max = cvar("g_pickup_armorlarge_max");
1017 g_pickup_armorlarge_anyway = cvar("g_pickup_armorlarge_anyway");
1018 g_pickup_healthsmall = cvar("g_pickup_healthsmall");
1019 g_pickup_healthsmall_max = cvar("g_pickup_healthsmall_max");
1020 g_pickup_healthsmall_anyway = cvar("g_pickup_healthsmall_anyway");
1021 g_pickup_healthmedium = cvar("g_pickup_healthmedium");
1022 g_pickup_healthmedium_max = cvar("g_pickup_healthmedium_max");
1023 g_pickup_healthmedium_anyway = cvar("g_pickup_healthmedium_anyway");
1024 g_pickup_healthlarge = cvar("g_pickup_healthlarge");
1025 g_pickup_healthlarge_max = cvar("g_pickup_healthlarge_max");
1026 g_pickup_healthlarge_anyway = cvar("g_pickup_healthlarge_anyway");
1027 g_pickup_healthmega = cvar("g_pickup_healthmega");
1028 g_pickup_healthmega_max = cvar("g_pickup_healthmega_max");
1029 g_pickup_healthmega_anyway = cvar("g_pickup_healthmega_anyway");
1031 g_pickup_ammo_anyway = cvar("g_pickup_ammo_anyway");
1032 g_pickup_weapons_anyway = cvar("g_pickup_weapons_anyway");
1034 g_weapon_stay = cvar(strcat("g_", GetGametype(), "_weapon_stay"));
1036 g_weapon_stay = cvar("g_weapon_stay");
1038 if not(inWarmupStage)
1039 game_starttime = time + cvar("g_start_delay");
1041 readplayerstartcvars();
1047 string precache_sound (string s) = #19;
1048 float precache_sound_index (string s) = #19;
1050 #define SND_VOLUME 1
1051 #define SND_ATTENUATION 2
1052 #define SND_LARGEENTITY 8
1053 #define SND_LARGESOUND 16
1055 float sound_allowed(float dest, entity e)
1057 // sounds from world may always pass
1060 if (e.classname == "body")
1062 else if (e.realowner && e.realowner != e)
1064 else if (e.owner && e.owner != e)
1069 // sounds to self may always pass
1070 if (dest == MSG_ONE)
1071 if (e == msg_entity)
1073 // sounds by players can be removed
1074 if (autocvar_bot_sound_monopoly)
1075 if (IS_REAL_CLIENT(e))
1077 // anything else may pass
1081 #ifdef COMPAT_XON010_CHANNELS
1082 void(entity e, float chan, string samp, float vol, float atten) builtin_sound = #8;
1083 void sound(entity e, float chan, string samp, float vol, float atten)
1085 if (!sound_allowed(MSG_BROADCAST, e))
1087 builtin_sound(e, chan, samp, vol, atten);
1091 void sound(entity e, float chan, string samp, float vol, float atten)
1093 if (!sound_allowed(MSG_BROADCAST, e))
1095 sound7(e, chan, samp, vol, atten, 0, 0);
1099 void soundtoat(float dest, entity e, vector o, float chan, string samp, float vol, float atten)
1103 if (!sound_allowed(dest, e))
1106 entno = num_for_edict(e);
1107 idx = precache_sound_index(samp);
1112 atten = floor(atten * 64);
1113 vol = floor(vol * 255);
1116 sflags |= SND_VOLUME;
1118 sflags |= SND_ATTENUATION;
1119 if (entno >= 8192 || chan < 0 || chan > 7)
1120 sflags |= SND_LARGEENTITY;
1122 sflags |= SND_LARGESOUND;
1124 WriteByte(dest, SVC_SOUND);
1125 WriteByte(dest, sflags);
1126 if (sflags & SND_VOLUME)
1127 WriteByte(dest, vol);
1128 if (sflags & SND_ATTENUATION)
1129 WriteByte(dest, atten);
1130 if (sflags & SND_LARGEENTITY)
1132 WriteShort(dest, entno);
1133 WriteByte(dest, chan);
1137 WriteShort(dest, entno * 8 + chan);
1139 if (sflags & SND_LARGESOUND)
1140 WriteShort(dest, idx);
1142 WriteByte(dest, idx);
1144 WriteCoord(dest, o_x);
1145 WriteCoord(dest, o_y);
1146 WriteCoord(dest, o_z);
1148 void soundto(float dest, entity e, float chan, string samp, float vol, float atten)
1152 if (!sound_allowed(dest, e))
1155 o = e.origin + 0.5 * (e.mins + e.maxs);
1156 soundtoat(dest, e, o, chan, samp, vol, atten);
1158 void soundat(entity e, vector o, float chan, string samp, float vol, float atten)
1160 soundtoat(((chan & 8) ? MSG_ALL : MSG_BROADCAST), e, o, chan, samp, vol, atten);
1162 void stopsoundto(float dest, entity e, float chan)
1166 if (!sound_allowed(dest, e))
1169 entno = num_for_edict(e);
1171 if (entno >= 8192 || chan < 0 || chan > 7)
1174 idx = precache_sound_index("misc/null.wav");
1175 sflags = SND_LARGEENTITY;
1177 sflags |= SND_LARGESOUND;
1178 WriteByte(dest, SVC_SOUND);
1179 WriteByte(dest, sflags);
1180 WriteShort(dest, entno);
1181 WriteByte(dest, chan);
1182 if (sflags & SND_LARGESOUND)
1183 WriteShort(dest, idx);
1185 WriteByte(dest, idx);
1186 WriteCoord(dest, e.origin_x);
1187 WriteCoord(dest, e.origin_y);
1188 WriteCoord(dest, e.origin_z);
1192 WriteByte(dest, SVC_STOPSOUND);
1193 WriteShort(dest, entno * 8 + chan);
1196 void stopsound(entity e, float chan)
1198 if (!sound_allowed(MSG_BROADCAST, e))
1201 stopsoundto(MSG_BROADCAST, e, chan); // unreliable, gets there fast
1202 stopsoundto(MSG_ALL, e, chan); // in case of packet loss
1205 void play2(entity e, string filename)
1207 //stuffcmd(e, strcat("play2 ", filename, "\n"));
1209 soundtoat(MSG_ONE, world, '0 0 0', CH_INFO, filename, VOL_BASE, ATTN_NONE);
1212 // use this one if you might be causing spam (e.g. from touch functions that might get called more than once per frame)
1214 float spamsound(entity e, float chan, string samp, float vol, float atten)
1216 if (!sound_allowed(MSG_BROADCAST, e))
1219 if (time > e.spamtime)
1222 sound(e, chan, samp, vol, atten);
1228 void play2team(float t, string filename)
1232 if (autocvar_bot_sound_monopoly)
1235 FOR_EACH_REALPLAYER(head)
1238 play2(head, filename);
1242 void play2all(string samp)
1244 if (autocvar_bot_sound_monopoly)
1247 sound(world, CH_INFO, samp, VOL_BASE, ATTN_NONE);
1250 void PrecachePlayerSounds(string f);
1251 void precache_playermodel(string m)
1253 float globhandle, i, n;
1256 if(substring(m, -9,5) == "_lod1")
1258 if(substring(m, -9,5) == "_lod2")
1261 f = strcat(substring(m, 0, -5), "_lod1", substring(m, -4, -1));
1264 f = strcat(substring(m, 0, -5), "_lod2", substring(m, -4, -1));
1268 globhandle = search_begin(strcat(m, "_*.sounds"), TRUE, FALSE);
1271 n = search_getsize(globhandle);
1272 for (i = 0; i < n; ++i)
1274 //print(search_getfilename(globhandle, i), "\n");
1275 f = search_getfilename(globhandle, i);
1276 PrecachePlayerSounds(f);
1278 search_end(globhandle);
1280 void precache_all_playermodels(string pattern)
1282 float globhandle, i, n;
1285 globhandle = search_begin(pattern, TRUE, FALSE);
1288 n = search_getsize(globhandle);
1289 for (i = 0; i < n; ++i)
1291 //print(search_getfilename(globhandle, i), "\n");
1292 f = search_getfilename(globhandle, i);
1293 precache_playermodel(f);
1295 search_end(globhandle);
1300 // gamemode related things
1301 precache_model ("models/misc/chatbubble.spr");
1303 #ifdef TTURRETS_ENABLED
1304 if (autocvar_g_turrets)
1308 // Precache all player models if desired
1309 if (autocvar_sv_precacheplayermodels)
1311 PrecachePlayerSounds("sound/player/default.sounds");
1312 precache_all_playermodels("models/player/*.zym");
1313 precache_all_playermodels("models/player/*.dpm");
1314 precache_all_playermodels("models/player/*.md3");
1315 precache_all_playermodels("models/player/*.psk");
1316 precache_all_playermodels("models/player/*.iqm");
1319 if (autocvar_sv_defaultcharacter)
1322 s = autocvar_sv_defaultplayermodel_red;
1324 precache_playermodel(s);
1325 s = autocvar_sv_defaultplayermodel_blue;
1327 precache_playermodel(s);
1328 s = autocvar_sv_defaultplayermodel_yellow;
1330 precache_playermodel(s);
1331 s = autocvar_sv_defaultplayermodel_pink;
1333 precache_playermodel(s);
1334 s = autocvar_sv_defaultplayermodel;
1336 precache_playermodel(s);
1339 // gore and miscellaneous sounds
1340 //precache_sound ("misc/h2ohit.wav");
1341 precache_model ("models/hook.md3");
1342 precache_sound ("misc/armorimpact.wav");
1343 precache_sound ("misc/bodyimpact1.wav");
1344 precache_sound ("misc/bodyimpact2.wav");
1345 precache_sound ("misc/gib.wav");
1346 precache_sound ("misc/gib_splat01.wav");
1347 precache_sound ("misc/gib_splat02.wav");
1348 precache_sound ("misc/gib_splat03.wav");
1349 precache_sound ("misc/gib_splat04.wav");
1350 PrecacheGlobalSound((globalsound_fall = "misc/hitground 4"));
1351 PrecacheGlobalSound((globalsound_metalfall = "misc/metalhitground 4"));
1352 precache_sound ("misc/null.wav");
1353 precache_sound ("misc/spawn.wav");
1354 precache_sound ("misc/talk.wav");
1355 precache_sound ("misc/teleport.wav");
1356 precache_sound ("misc/poweroff.wav");
1357 precache_sound ("player/lava.wav");
1358 precache_sound ("player/slime.wav");
1360 precache_model ("models/sprites/0.spr32");
1361 precache_model ("models/sprites/1.spr32");
1362 precache_model ("models/sprites/2.spr32");
1363 precache_model ("models/sprites/3.spr32");
1364 precache_model ("models/sprites/4.spr32");
1365 precache_model ("models/sprites/5.spr32");
1366 precache_model ("models/sprites/6.spr32");
1367 precache_model ("models/sprites/7.spr32");
1368 precache_model ("models/sprites/8.spr32");
1369 precache_model ("models/sprites/9.spr32");
1370 precache_model ("models/sprites/10.spr32");
1372 // common weapon precaches
1373 precache_sound ("weapons/reload.wav"); // until weapons have individual reload sounds, precache the reload sound here
1374 precache_sound ("weapons/weapon_switch.wav");
1375 precache_sound ("weapons/weaponpickup.wav");
1376 precache_sound ("weapons/unavailable.wav");
1377 precache_sound ("weapons/dryfire.wav");
1378 if (g_grappling_hook)
1380 precache_sound ("weapons/hook_fire.wav"); // hook
1381 precache_sound ("weapons/hook_impact.wav"); // hook
1384 if(autocvar_sv_precacheweapons)
1386 //precache weapon models/sounds
1389 while (wep <= WEP_LAST)
1391 weapon_action(wep, WR_PRECACHE);
1396 precache_model("models/elaser.mdl");
1397 precache_model("models/laser.mdl");
1398 precache_model("models/ebomb.mdl");
1401 // Disabled this code because it simply does not work (e.g. ignores bgmvolume, overlaps with "cd loop" controlled tracks).
1403 if (!self.noise && self.music) // quake 3 uses the music field
1404 self.noise = self.music;
1406 // plays music for the level if there is any
1409 precache_sound (self.noise);
1410 ambientsound ('0 0 0', self.noise, VOL_BASE, ATTN_NONE);
1414 #include "precache-for-csqc.inc"
1417 // WARNING: this kills the trace globals
1418 #define EXACTTRIGGER_TOUCH if(WarpZoneLib_ExactTrigger_Touch()) return
1419 #define EXACTTRIGGER_INIT WarpZoneLib_ExactTrigger_Init()
1421 #define INITPRIO_FIRST 0
1422 #define INITPRIO_GAMETYPE 0
1423 #define INITPRIO_GAMETYPE_FALLBACK 1
1424 #define INITPRIO_FINDTARGET 10
1425 #define INITPRIO_DROPTOFLOOR 20
1426 #define INITPRIO_SETLOCATION 90
1427 #define INITPRIO_LINKDOORS 91
1428 #define INITPRIO_LAST 99
1430 .void(void) initialize_entity;
1431 .float initialize_entity_order;
1432 .entity initialize_entity_next;
1433 entity initialize_entity_first;
1435 void make_safe_for_remove(entity e)
1437 if (e.initialize_entity)
1439 entity ent, prev = world;
1440 for (ent = initialize_entity_first; ent; )
1442 if ((ent == e) || ((ent.classname == "initialize_entity") && (ent.enemy == e)))
1444 //print("make_safe_for_remove: getting rid of initializer ", etos(ent), "\n");
1445 // skip it in linked list
1448 prev.initialize_entity_next = ent.initialize_entity_next;
1449 ent = prev.initialize_entity_next;
1453 initialize_entity_first = ent.initialize_entity_next;
1454 ent = initialize_entity_first;
1460 ent = ent.initialize_entity_next;
1466 void objerror(string s)
1468 make_safe_for_remove(self);
1469 builtin_objerror(s);
1472 .float remove_except_protected_forbidden;
1473 void remove_except_protected(entity e)
1475 if(e.remove_except_protected_forbidden)
1476 error("not allowed to remove this at this point");
1480 void remove_unsafely(entity e)
1482 if(e.classname == "spike")
1483 error("Removing spikes is forbidden (crylink bug), please report");
1487 void remove_safely(entity e)
1489 make_safe_for_remove(e);
1493 void InitializeEntity(entity e, void(void) func, float order)
1497 if (!e || e.initialize_entity)
1499 // make a proxy initializer entity
1503 e.classname = "initialize_entity";
1507 e.initialize_entity = func;
1508 e.initialize_entity_order = order;
1510 cur = initialize_entity_first;
1514 if (!cur || cur.initialize_entity_order > order)
1516 // insert between prev and cur
1518 prev.initialize_entity_next = e;
1520 initialize_entity_first = e;
1521 e.initialize_entity_next = cur;
1525 cur = cur.initialize_entity_next;
1528 void InitializeEntitiesRun()
1531 startoflist = initialize_entity_first;
1532 initialize_entity_first = world;
1533 remove = remove_except_protected;
1534 for (self = startoflist; self; self = self.initialize_entity_next)
1536 self.remove_except_protected_forbidden = 1;
1538 for (self = startoflist; self; )
1541 var void(void) func;
1542 e = self.initialize_entity_next;
1543 func = self.initialize_entity;
1544 self.initialize_entity_order = 0;
1545 self.initialize_entity = func_null;
1546 self.initialize_entity_next = world;
1547 self.remove_except_protected_forbidden = 0;
1548 if (self.classname == "initialize_entity")
1552 builtin_remove(self);
1555 //dprint("Delayed initialization: ", self.classname, "\n");
1561 backtrace(strcat("Null function in: ", self.classname, "\n"));
1565 remove = remove_unsafely;
1568 .float uncustomizeentityforclient_set;
1569 .void(void) uncustomizeentityforclient;
1570 void UncustomizeEntitiesRun()
1574 for (self = world; (self = findfloat(self, uncustomizeentityforclient_set, 1)); )
1575 self.uncustomizeentityforclient();
1578 void SetCustomizer(entity e, float(void) customizer, void(void) uncustomizer)
1580 e.customizeentityforclient = customizer;
1581 e.uncustomizeentityforclient = uncustomizer;
1582 e.uncustomizeentityforclient_set = !!uncustomizer;
1586 #define IFTARGETED if(!self.nottargeted && self.targetname != "")
1589 void Net_LinkEntity(entity e, float docull, float dt, float(entity, float) sendfunc)
1593 if (e.classname == "")
1594 e.classname = "net_linked";
1596 if (e.model == "" || self.modelindex == 0)
1600 setmodel(e, "null");
1604 e.SendEntity = sendfunc;
1605 e.SendFlags = 0xFFFFFF;
1608 e.effects |= EF_NODEPTHTEST;
1612 e.nextthink = time + dt;
1613 e.think = SUB_Remove;
1617 void adaptor_think2touch()
1626 void adaptor_think2use()
1638 void adaptor_think2use_hittype_splash() // for timed projectile detonation
1640 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
1641 self.projectiledeathtype |= HITTYPE_SPLASH;
1642 adaptor_think2use();
1645 // deferred dropping
1646 void DropToFloor_Handler()
1648 builtin_droptofloor();
1649 self.dropped_origin = self.origin;
1654 InitializeEntity(self, DropToFloor_Handler, INITPRIO_DROPTOFLOOR);
1659 float trace_hits_box_a0, trace_hits_box_a1;
1661 float trace_hits_box_1d(float end, float thmi, float thma)
1665 // just check if x is in range
1673 // do the trace with respect to x
1674 // 0 -> end has to stay in thmi -> thma
1675 trace_hits_box_a0 = max(trace_hits_box_a0, min(thmi / end, thma / end));
1676 trace_hits_box_a1 = min(trace_hits_box_a1, max(thmi / end, thma / end));
1677 if (trace_hits_box_a0 > trace_hits_box_a1)
1683 float trace_hits_box(vector start, vector end, vector thmi, vector thma)
1688 // now it is a trace from 0 to end
1690 trace_hits_box_a0 = 0;
1691 trace_hits_box_a1 = 1;
1693 if (!trace_hits_box_1d(end_x, thmi_x, thma_x))
1695 if (!trace_hits_box_1d(end_y, thmi_y, thma_y))
1697 if (!trace_hits_box_1d(end_z, thmi_z, thma_z))
1703 float tracebox_hits_box(vector start, vector mi, vector ma, vector end, vector thmi, vector thma)
1705 return trace_hits_box(start, end, thmi - ma, thma - mi);
1708 float SUB_NoImpactCheck()
1710 // zero hitcontents = this is not the real impact, but either the
1711 // mirror-impact of something hitting the projectile instead of the
1712 // projectile hitting the something, or a touchareagrid one. Neither of
1713 // these stop the projectile from moving, so...
1714 if(trace_dphitcontents == 0)
1716 //dprint("A hit happened with zero hit contents... DEBUG THIS, this should never happen for projectiles! Projectile will self-destruct.\n");
1717 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)));
1720 if (trace_dphitq3surfaceflags & Q3SURFACEFLAG_NOIMPACT)
1722 if (other == world && self.size != '0 0 0')
1725 tic = self.velocity * sys_frametime;
1726 tic = tic + normalize(tic) * vlen(self.maxs - self.mins);
1727 traceline(self.origin - tic, self.origin + tic, MOVE_NORMAL, self);
1728 if (trace_fraction >= 1)
1730 dprint("Odd... did not hit...?\n");
1732 else if (trace_dphitq3surfaceflags & Q3SURFACEFLAG_NOIMPACT)
1734 dprint("Detected and prevented the sky-grapple bug.\n");
1742 #define SUB_OwnerCheck() (other && (other == self.owner))
1744 void RemoveGrapplingHook(entity pl);
1745 void W_Crylink_Dequeue(entity e);
1746 float WarpZone_Projectile_Touch_ImpactFilter_Callback()
1748 if(SUB_OwnerCheck())
1750 if(SUB_NoImpactCheck())
1752 if(self.classname == "grapplinghook")
1753 RemoveGrapplingHook(self.realowner);
1754 else if(self.classname == "spike")
1756 W_Crylink_Dequeue(self);
1763 if(trace_ent && trace_ent.solid > SOLID_TRIGGER)
1764 UpdateCSQCProjectile(self);
1767 #define PROJECTILE_TOUCH if(WarpZone_Projectile_Touch()) return
1769 #define ITEM_TOUCH_NEEDKILL() (((trace_dpstartcontents | trace_dphitcontents) & DPCONTENTS_NODROP) || (trace_dphitq3surfaceflags & Q3SURFACEFLAG_SKY))
1770 #define ITEM_DAMAGE_NEEDKILL(dt) (((dt) == DEATH_HURTTRIGGER) || ((dt) == DEATH_SLIME) || ((dt) == DEATH_LAVA) || ((dt) == DEATH_SWAMP))
1772 void URI_Get_Callback(float id, float status, string data)
1774 if(url_URI_Get_Callback(id, status, data))
1778 else if (id == URI_GET_DISCARD)
1782 else if (id >= URI_GET_CURL && id <= URI_GET_CURL_END)
1785 Curl_URI_Get_Callback(id, status, data);
1787 else if (id >= URI_GET_IPBAN && id <= URI_GET_IPBAN_END)
1790 OnlineBanList_URI_Get_Callback(id, status, data);
1794 print("Received HTTP request data for an invalid id ", ftos(id), ".\n");
1798 string uid2name(string myuid) {
1800 s = db_get(ServerProgsDB, strcat("/uid2name/", myuid));
1802 // FIXME remove this later after 0.6 release
1803 // convert old style broken records to correct style
1806 s = db_get(ServerProgsDB, strcat("uid2name", myuid));
1809 db_put(ServerProgsDB, strcat("/uid2name/", myuid), s);
1810 db_put(ServerProgsDB, strcat("uid2name", myuid), "");
1815 s = "^1Unregistered Player";
1819 float race_readTime(string map, float pos)
1827 return stof(db_get(ServerProgsDB, strcat(map, rr, "time", ftos(pos))));
1830 string race_readUID(string map, float pos)
1838 return db_get(ServerProgsDB, strcat(map, rr, "crypto_idfp", ftos(pos)));
1841 float race_readPos(string map, float t) {
1843 for (i = 1; i <= RANKINGS_CNT; ++i)
1844 if (race_readTime(map, i) == 0 || race_readTime(map, i) > t)
1847 return 0; // pos is zero if unranked
1850 void race_writeTime(string map, float t, string myuid)
1859 newpos = race_readPos(map, t);
1861 float i, prevpos = 0;
1862 for(i = 1; i <= RANKINGS_CNT; ++i)
1864 if(race_readUID(map, i) == myuid)
1867 if (prevpos) { // player improved his existing record, only have to iterate on ranks between new and old recs
1868 for (i = prevpos; i > newpos; --i) {
1869 db_put(ServerProgsDB, strcat(map, rr, "time", ftos(i)), ftos(race_readTime(map, i - 1)));
1870 db_put(ServerProgsDB, strcat(map, rr, "crypto_idfp", ftos(i)), race_readUID(map, i - 1));
1872 } else { // player has no ranked record yet
1873 for (i = RANKINGS_CNT; i > newpos; --i) {
1874 db_put(ServerProgsDB, strcat(map, rr, "time", ftos(i)), ftos(race_readTime(map, i - 1)));
1875 db_put(ServerProgsDB, strcat(map, rr, "crypto_idfp", ftos(i)), race_readUID(map, i - 1));
1879 // store new time itself
1880 db_put(ServerProgsDB, strcat(map, rr, "time", ftos(newpos)), ftos(t));
1881 db_put(ServerProgsDB, strcat(map, rr, "crypto_idfp", ftos(newpos)), myuid);
1884 string race_readName(string map, float pos)
1892 return uid2name(db_get(ServerProgsDB, strcat(map, rr, "crypto_idfp", ftos(pos))));
1895 float MoveToRandomMapLocation(entity e, float goodcontents, float badcontents, float badsurfaceflags, float attempts, float maxaboveground, float minviewdistance)
1898 vector start, org, delta, end, enddown, mstart;
1901 m = e.dphitcontentsmask;
1902 e.dphitcontentsmask = goodcontents | badcontents;
1905 delta = world.maxs - world.mins;
1909 for (i = 0; i < attempts; ++i)
1911 start_x = org_x + random() * delta_x;
1912 start_y = org_y + random() * delta_y;
1913 start_z = org_z + random() * delta_z;
1915 // rule 1: start inside world bounds, and outside
1916 // solid, and don't start from somewhere where you can
1917 // fall down to evil
1918 tracebox(start, e.mins, e.maxs, start - '0 0 1' * delta_z, MOVE_NORMAL, e);
1919 if (trace_fraction >= 1)
1921 if (trace_startsolid)
1923 if (trace_dphitcontents & badcontents)
1925 if (trace_dphitq3surfaceflags & badsurfaceflags)
1928 // rule 2: if we are too high, lower the point
1929 if (trace_fraction * delta_z > maxaboveground)
1930 start = trace_endpos + '0 0 1' * maxaboveground;
1931 enddown = trace_endpos;
1933 // rule 3: make sure we aren't outside the map. This only works
1934 // for somewhat well formed maps. A good rule of thumb is that
1935 // the map should have a convex outside hull.
1936 // these can be traceLINES as we already verified the starting box
1937 mstart = start + 0.5 * (e.mins + e.maxs);
1938 traceline(mstart, mstart + '1 0 0' * delta_x, MOVE_NORMAL, e);
1939 if (trace_fraction >= 1)
1941 traceline(mstart, mstart - '1 0 0' * delta_x, MOVE_NORMAL, e);
1942 if (trace_fraction >= 1)
1944 traceline(mstart, mstart + '0 1 0' * delta_y, MOVE_NORMAL, e);
1945 if (trace_fraction >= 1)
1947 traceline(mstart, mstart - '0 1 0' * delta_y, MOVE_NORMAL, e);
1948 if (trace_fraction >= 1)
1950 traceline(mstart, mstart + '0 0 1' * delta_z, MOVE_NORMAL, e);
1951 if (trace_fraction >= 1)
1954 // rule 4: we must "see" some spawnpoint
1955 for(sp = world; (sp = find(sp, classname, "info_player_deathmatch")); )
1956 if(checkpvs(mstart, sp))
1960 for(sp = world; (sp = findflags(sp, flags, FL_ITEM)); )
1961 if(checkpvs(mstart, sp))
1967 // find a random vector to "look at"
1968 end_x = org_x + random() * delta_x;
1969 end_y = org_y + random() * delta_y;
1970 end_z = org_z + random() * delta_z;
1971 end = start + normalize(end - start) * vlen(delta);
1973 // rule 4: start TO end must not be too short
1974 tracebox(start, e.mins, e.maxs, end, MOVE_NORMAL, e);
1975 if (trace_startsolid)
1977 if (trace_fraction < minviewdistance / vlen(delta))
1980 // rule 5: don't want to look at sky
1981 if (trace_dphitq3surfaceflags & Q3SURFACEFLAG_SKY)
1984 // rule 6: we must not end up in trigger_hurt
1985 if (tracebox_hits_trigger_hurt(start, e.mins, e.maxs, enddown))
1991 e.dphitcontentsmask = m;
1995 setorigin(e, start);
1996 e.angles = vectoangles(end - start);
1997 dprint("Needed ", ftos(i + 1), " attempts\n");
2004 float zcurveparticles_effectno;
2005 vector zcurveparticles_start;
2006 float zcurveparticles_spd;
2008 void endzcurveparticles()
2010 if(zcurveparticles_effectno)
2013 WriteShort(MSG_BROADCAST, zcurveparticles_spd | 0x8000);
2015 zcurveparticles_effectno = 0;
2018 void zcurveparticles(float effectno, vector start, vector end, float end_dz, float spd)
2020 spd = bound(0, floor(spd / 16), 32767);
2021 if(effectno != zcurveparticles_effectno || start != zcurveparticles_start)
2023 endzcurveparticles();
2024 WriteByte(MSG_BROADCAST, SVC_TEMPENTITY);
2025 WriteByte(MSG_BROADCAST, TE_CSQC_ZCURVEPARTICLES);
2026 WriteShort(MSG_BROADCAST, effectno);
2027 WriteCoord(MSG_BROADCAST, start_x);
2028 WriteCoord(MSG_BROADCAST, start_y);
2029 WriteCoord(MSG_BROADCAST, start_z);
2030 zcurveparticles_effectno = effectno;
2031 zcurveparticles_start = start;
2034 WriteShort(MSG_BROADCAST, zcurveparticles_spd);
2035 WriteCoord(MSG_BROADCAST, end_x);
2036 WriteCoord(MSG_BROADCAST, end_y);
2037 WriteCoord(MSG_BROADCAST, end_z);
2038 WriteCoord(MSG_BROADCAST, end_dz);
2039 zcurveparticles_spd = spd;
2042 void zcurveparticles_from_tracetoss(float effectno, vector start, vector end, vector vel)
2045 vector vecxy, velxy;
2047 vecxy = end - start;
2052 if (vlen(velxy) < 0.000001 * fabs(vel_z))
2054 endzcurveparticles();
2055 trailparticles(world, effectno, start, end);
2059 end_dz = vlen(vecxy) / vlen(velxy) * vel_z - (end_z - start_z);
2060 zcurveparticles(effectno, start, end, end_dz, vlen(vel));
2063 void write_recordmarker(entity pl, float tstart, float dt)
2065 GameLogEcho(strcat(":recordset:", ftos(pl.playerid), ":", ftos(dt)));
2067 // also write a marker into demo files for demotc-race-record-extractor to find
2070 strcat("//", strconv(2, 0, 0, GetGametype()), " RECORD SET ", TIME_ENCODED_TOSTRING(TIME_ENCODE(dt))),
2071 " ", ftos(tstart), " ", ftos(dt), "\n"));
2074 vector shotorg_adjustfromclient(vector vecs, float y_is_right, float allowcenter, float algn)
2087 if(allowcenter) // 2: allow center handedness
2100 if(allowcenter) // 2: allow center handedness
2116 vector shotorg_adjust_values(vector vecs, float y_is_right, float visual, float algn)
2121 if (autocvar_g_shootfromeye)
2125 if (autocvar_g_shootfromclient) { vecs = shotorg_adjustfromclient(vecs, y_is_right, (autocvar_g_shootfromclient >= 2), algn); }
2126 else { vecs_y = 0; vecs_z -= 2; }
2134 else if (autocvar_g_shootfromcenter)
2139 else if ((s = autocvar_g_shootfromfixedorigin) != "")
2149 else if (autocvar_g_shootfromclient)
2151 vecs = shotorg_adjustfromclient(vecs, y_is_right, (autocvar_g_shootfromclient >= 2), algn);
2156 vector shotorg_adjust(vector vecs, float y_is_right, float visual)
2158 return shotorg_adjust_values(vecs, y_is_right, visual, self.owner.cvar_cl_gunalign);
2162 void attach_sameorigin(entity e, entity to, string tag)
2164 vector org, t_forward, t_left, t_up, e_forward, e_up;
2167 org = e.origin - gettaginfo(to, gettagindex(to, tag));
2168 tagscale = pow(vlen(v_forward), -2); // undo a scale on the tag
2169 t_forward = v_forward * tagscale;
2170 t_left = v_right * -tagscale;
2171 t_up = v_up * tagscale;
2173 e.origin_x = org * t_forward;
2174 e.origin_y = org * t_left;
2175 e.origin_z = org * t_up;
2177 // current forward and up directions
2178 if (substring(e.model, 0, 1) == "*") // bmodels have their own rules
2179 e.angles = AnglesTransform_FromVAngles(e.angles);
2181 e.angles = AnglesTransform_FromAngles(e.angles);
2182 fixedmakevectors(e.angles);
2184 // untransform forward, up!
2185 e_forward_x = v_forward * t_forward;
2186 e_forward_y = v_forward * t_left;
2187 e_forward_z = v_forward * t_up;
2188 e_up_x = v_up * t_forward;
2189 e_up_y = v_up * t_left;
2190 e_up_z = v_up * t_up;
2192 e.angles = fixedvectoangles2(e_forward, e_up);
2193 if (substring(e.model, 0, 1) == "*") // bmodels have their own rules
2194 e.angles = AnglesTransform_ToVAngles(e.angles);
2196 e.angles = AnglesTransform_ToAngles(e.angles);
2198 setattachment(e, to, tag);
2199 setorigin(e, e.origin);
2202 void detach_sameorigin(entity e)
2205 org = gettaginfo(e, 0);
2206 e.angles = fixedvectoangles2(v_forward, v_up);
2207 if (substring(e.model, 0, 1) == "*") // bmodels have their own rules
2208 e.angles = AnglesTransform_ToVAngles(e.angles);
2210 e.angles = AnglesTransform_ToAngles(e.angles);
2212 setattachment(e, world, "");
2213 setorigin(e, e.origin);
2216 void follow_sameorigin(entity e, entity to)
2218 e.movetype = MOVETYPE_FOLLOW; // make the hole follow
2219 e.aiment = to; // make the hole follow bmodel
2220 e.punchangle = to.angles; // the original angles of bmodel
2221 e.view_ofs = e.origin - to.origin; // relative origin
2222 e.v_angle = e.angles - to.angles; // relative angles
2225 void unfollow_sameorigin(entity e)
2227 e.movetype = MOVETYPE_NONE;
2230 entity gettaginfo_relative_ent;
2231 vector gettaginfo_relative(entity e, float tag)
2233 if (!gettaginfo_relative_ent)
2235 gettaginfo_relative_ent = spawn();
2236 gettaginfo_relative_ent.effects = EF_NODRAW;
2238 gettaginfo_relative_ent.model = e.model;
2239 gettaginfo_relative_ent.modelindex = e.modelindex;
2240 gettaginfo_relative_ent.frame = e.frame;
2241 return gettaginfo(gettaginfo_relative_ent, tag);
2246 float modeleffect_SendEntity(entity to, float sf)
2249 WriteByte(MSG_ENTITY, ENT_CLIENT_MODELEFFECT);
2252 if(self.velocity != '0 0 0')
2254 if(self.angles != '0 0 0')
2256 if(self.avelocity != '0 0 0')
2259 WriteByte(MSG_ENTITY, f);
2260 WriteShort(MSG_ENTITY, self.modelindex);
2261 WriteByte(MSG_ENTITY, self.skin);
2262 WriteByte(MSG_ENTITY, self.frame);
2263 WriteCoord(MSG_ENTITY, self.origin_x);
2264 WriteCoord(MSG_ENTITY, self.origin_y);
2265 WriteCoord(MSG_ENTITY, self.origin_z);
2268 WriteCoord(MSG_ENTITY, self.velocity_x);
2269 WriteCoord(MSG_ENTITY, self.velocity_y);
2270 WriteCoord(MSG_ENTITY, self.velocity_z);
2274 WriteCoord(MSG_ENTITY, self.angles_x);
2275 WriteCoord(MSG_ENTITY, self.angles_y);
2276 WriteCoord(MSG_ENTITY, self.angles_z);
2280 WriteCoord(MSG_ENTITY, self.avelocity_x);
2281 WriteCoord(MSG_ENTITY, self.avelocity_y);
2282 WriteCoord(MSG_ENTITY, self.avelocity_z);
2284 WriteShort(MSG_ENTITY, self.scale * 256.0);
2285 WriteShort(MSG_ENTITY, self.scale2 * 256.0);
2286 WriteByte(MSG_ENTITY, self.teleport_time * 100.0);
2287 WriteByte(MSG_ENTITY, self.fade_time * 100.0);
2288 WriteByte(MSG_ENTITY, self.alpha * 255.0);
2293 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)
2298 e.classname = "modeleffect";
2306 e.teleport_time = t1;
2310 e.scale = s0 / max6(-e.mins_x, -e.mins_y, -e.mins_z, e.maxs_x, e.maxs_y, e.maxs_z);
2314 e.scale2 = s2 / max6(-e.mins_x, -e.mins_y, -e.mins_z, e.maxs_x, e.maxs_y, e.maxs_z);
2317 sz = max(e.scale, e.scale2);
2318 setsize(e, e.mins * sz, e.maxs * sz);
2319 Net_LinkEntity(e, FALSE, 0.1, modeleffect_SendEntity);
2322 void shockwave_spawn(string m, vector org, float sz, float t1, float t2)
2324 return modeleffect_spawn(m, 0, 0, org, '0 0 0', '0 0 0', '0 0 0', 0, sz, 1, t1, t2);
2327 float randombit(float bits)
2329 if not(bits & (bits-1)) // this ONLY holds for powers of two!
2338 for(f = 1; f <= bits; f *= 2)
2347 r = (r - 1) / (n - 1);
2354 float randombits(float bits, float k, float error_return)
2358 while(k > 0 && bits != r)
2360 r += randombit(bits - r);
2369 void randombit_test(float bits, float iter)
2373 print(ftos(randombit(bits)), "\n");
2378 float ExponentialFalloff(float mindist, float maxdist, float halflifedist, float d)
2380 if(halflifedist > 0)
2381 return pow(0.5, (bound(mindist, d, maxdist) - mindist) / halflifedist);
2382 else if(halflifedist < 0)
2383 return pow(0.5, (bound(mindist, d, maxdist) - maxdist) / halflifedist);
2392 #define cvar_string_normal builtin_cvar_string
2393 #define cvar_normal builtin_cvar
2395 string cvar_string_normal(string n)
2397 if not(cvar_type(n) & 1)
2398 backtrace(strcat("Attempt to access undefined cvar: ", n));
2399 return builtin_cvar_string(n);
2402 float cvar_normal(string n)
2404 return stof(cvar_string_normal(n));
2407 #define cvar_set_normal builtin_cvar_set
2415 oself.think = SUB_Remove;
2416 oself.nextthink = time;
2422 Execute func() after time + fdelay.
2423 self when func is executed = self when defer is called
2425 void defer(float fdelay, void() func)
2432 e.think = defer_think;
2433 e.nextthink = time + fdelay;
2436 .string aiment_classname;
2437 .float aiment_deadflag;
2438 void SetMovetypeFollow(entity ent, entity e)
2440 // FIXME this may not be warpzone aware
2441 ent.movetype = MOVETYPE_FOLLOW; // make the hole follow
2442 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.
2443 ent.aiment = e; // make the hole follow bmodel
2444 ent.punchangle = e.angles; // the original angles of bmodel
2445 ent.view_ofs = ent.origin - e.origin; // relative origin
2446 ent.v_angle = ent.angles - e.angles; // relative angles
2447 ent.aiment_classname = strzone(e.classname);
2448 ent.aiment_deadflag = e.deadflag;
2450 void UnsetMovetypeFollow(entity ent)
2452 ent.movetype = MOVETYPE_FLY;
2453 PROJECTILE_MAKETRIGGER(ent);
2456 float LostMovetypeFollow(entity ent)
2459 if(ent.movetype != MOVETYPE_FOLLOW)
2465 if(ent.aiment.classname != ent.aiment_classname)
2467 if(ent.aiment.deadflag != ent.aiment_deadflag)
2473 float isPushable(entity e)
2482 case "droppedweapon":
2483 case "keepawayball":
2484 case "nexball_basketball":
2485 case "nexball_football":
2487 case "bullet": // antilagged bullets can't hit this either
2490 if (e.projectiledeathtype)