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 && p.classname == "player")
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_minstagib = 0; // incompatible
771 g_pinata = 0; // incompatible
772 g_weapon_stay = 0; // incompatible
773 WEPSET_COPY_AA(start_weapons, g_weaponarena_weapons);
774 start_items |= IT_UNLIMITED_AMMO;
776 else if (g_minstagib)
778 g_pinata = 0; // incompatible
779 g_weapon_stay = 0; // incompatible
780 g_bloodloss = 0; // incompatible
782 start_armorvalue = 0;
783 WEPSET_COPY_AW(start_weapons, WEP_MINSTANEX);
784 g_minstagib_invis_alpha = cvar("g_minstagib_invis_alpha");
785 start_items |= IT_UNLIMITED_SUPERWEAPONS;
787 if (g_minstagib_invis_alpha <= 0)
788 g_minstagib_invis_alpha = -1;
792 for (i = WEP_FIRST; i <= WEP_LAST; ++i)
794 e = get_weaponinfo(i);
795 float w = want_weapon("g_start_weapon_", e, FALSE);
797 WEPSET_OR_AW(start_weapons, i);
799 WEPSET_OR_AW(start_weapons_default, i);
801 WEPSET_OR_AW(start_weapons_defaultmask, i);
805 if(!cvar("g_use_ammunition"))
806 start_items |= IT_UNLIMITED_AMMO;
808 if(cvar("g_nexball"))
809 start_items |= IT_UNLIMITED_SUPERWEAPONS; // FIXME BAD BAD BAD BAD HACK, NEXBALL SHOULDN'T ABUSE PORTO'S WEAPON SLOT
813 start_ammo_cells = cvar("g_minstagib_ammo_start");
814 start_ammo_fuel = cvar("g_start_ammo_fuel");
816 else if(start_items & IT_UNLIMITED_WEAPON_AMMO)
818 start_ammo_rockets = 999;
819 start_ammo_shells = 999;
820 start_ammo_cells = 999;
821 start_ammo_nails = 999;
822 start_ammo_fuel = 999;
826 start_ammo_shells = cvar("g_start_ammo_shells");
827 start_ammo_nails = cvar("g_start_ammo_nails");
828 start_ammo_rockets = cvar("g_start_ammo_rockets");
829 start_ammo_cells = cvar("g_start_ammo_cells");
830 start_ammo_fuel = cvar("g_start_ammo_fuel");
835 warmup_start_ammo_shells = start_ammo_shells;
836 warmup_start_ammo_nails = start_ammo_nails;
837 warmup_start_ammo_rockets = start_ammo_rockets;
838 warmup_start_ammo_cells = start_ammo_cells;
839 warmup_start_ammo_fuel = start_ammo_fuel;
840 warmup_start_health = start_health;
841 warmup_start_armorvalue = start_armorvalue;
842 WEPSET_COPY_AA(warmup_start_weapons, start_weapons);
843 WEPSET_COPY_AA(warmup_start_weapons_default, start_weapons_default);
844 WEPSET_COPY_AA(warmup_start_weapons_defaultmask, start_weapons_defaultmask);
846 if (!g_weaponarena && !g_minstagib && !g_ca)
848 warmup_start_ammo_shells = cvar("g_warmup_start_ammo_shells");
849 warmup_start_ammo_cells = cvar("g_warmup_start_ammo_cells");
850 warmup_start_ammo_nails = cvar("g_warmup_start_ammo_nails");
851 warmup_start_ammo_rockets = cvar("g_warmup_start_ammo_rockets");
852 warmup_start_ammo_fuel = cvar("g_warmup_start_ammo_fuel");
853 warmup_start_health = cvar("g_warmup_start_health");
854 warmup_start_armorvalue = cvar("g_warmup_start_armor");
855 WEPSET_CLEAR_A(warmup_start_weapons);
856 WEPSET_CLEAR_A(warmup_start_weapons_default);
857 WEPSET_CLEAR_A(warmup_start_weapons_defaultmask);
858 for (i = WEP_FIRST; i <= WEP_LAST; ++i)
860 e = get_weaponinfo(i);
861 float w = want_weapon("g_start_weapon_", e, cvar("g_warmup_allguns"));
863 WEPSET_OR_AW(warmup_start_weapons, i);
865 WEPSET_OR_AW(warmup_start_weapons_default, i);
867 WEPSET_OR_AW(warmup_start_weapons_defaultmask, i);
873 start_items |= IT_JETPACK;
875 MUTATOR_CALLHOOK(SetStartItems);
877 if ((start_items & IT_JETPACK) || (g_grappling_hook && WEPSET_CONTAINS_AW(start_weapons, WEP_HOOK)))
879 g_grappling_hook = 0; // these two can't coexist, as they use the same button
880 start_items |= IT_FUEL_REGEN;
881 start_ammo_fuel = max(start_ammo_fuel, cvar("g_balance_fuel_rotstable"));
882 warmup_start_ammo_fuel = max(warmup_start_ammo_fuel, cvar("g_balance_fuel_rotstable"));
885 for (i = WEP_FIRST; i <= WEP_LAST; ++i)
887 e = get_weaponinfo(i);
888 if(WEPSET_CONTAINS_AW(start_weapons, i) || WEPSET_CONTAINS_AW(warmup_start_weapons, i))
889 weapon_action(i, WR_PRECACHE);
892 start_ammo_shells = max(0, start_ammo_shells);
893 start_ammo_nails = max(0, start_ammo_nails);
894 start_ammo_cells = max(0, start_ammo_cells);
895 start_ammo_rockets = max(0, start_ammo_rockets);
896 start_ammo_fuel = max(0, start_ammo_fuel);
898 warmup_start_ammo_shells = max(0, warmup_start_ammo_shells);
899 warmup_start_ammo_nails = max(0, warmup_start_ammo_nails);
900 warmup_start_ammo_cells = max(0, warmup_start_ammo_cells);
901 warmup_start_ammo_rockets = max(0, warmup_start_ammo_rockets);
902 warmup_start_ammo_fuel = max(0, warmup_start_ammo_fuel);
906 float g_bugrigs_planar_movement;
907 float g_bugrigs_planar_movement_car_jumping;
908 float g_bugrigs_reverse_spinning;
909 float g_bugrigs_reverse_speeding;
910 float g_bugrigs_reverse_stopping;
911 float g_bugrigs_air_steering;
912 float g_bugrigs_angle_smoothing;
913 float g_bugrigs_friction_floor;
914 float g_bugrigs_friction_brake;
915 float g_bugrigs_friction_air;
916 float g_bugrigs_accel;
917 float g_bugrigs_speed_ref;
918 float g_bugrigs_speed_pow;
919 float g_bugrigs_steer;
924 string GetGametype(); // g_world.qc
925 void readlevelcvars(void)
927 g_minstagib = cvar("g_minstagib");
929 // load ALL the mutators
930 if(cvar("g_dodging"))
931 MUTATOR_ADD(mutator_dodging);
932 if(cvar("g_spawn_near_teammate"))
933 MUTATOR_ADD(mutator_spawn_near_teammate);
934 if(cvar("g_physical_items"))
935 MUTATOR_ADD(mutator_physical_items);
936 if(cvar("g_touchexplode"))
937 MUTATOR_ADD(mutator_touchexplode);
940 if(cvar("g_invincible_projectiles"))
941 MUTATOR_ADD(mutator_invincibleprojectiles);
942 if(cvar("g_new_toys"))
943 MUTATOR_ADD(mutator_new_toys);
945 MUTATOR_ADD(mutator_nix);
946 if(cvar("g_rocket_flying"))
947 MUTATOR_ADD(mutator_rocketflying);
948 if(cvar("g_vampire"))
949 MUTATOR_ADD(mutator_vampire);
950 if(cvar("g_superspectate"))
951 MUTATOR_ADD(mutator_superspec);
954 // is this a mutator? is this a mode?
955 if(cvar("g_sandbox"))
956 MUTATOR_ADD(sandbox);
958 if(cvar("sv_allow_fullbright"))
959 serverflags |= SERVERFLAG_ALLOW_FULLBRIGHT;
961 g_bugrigs = cvar("g_bugrigs");
962 g_bugrigs_planar_movement = cvar("g_bugrigs_planar_movement");
963 g_bugrigs_planar_movement_car_jumping = cvar("g_bugrigs_planar_movement_car_jumping");
964 g_bugrigs_reverse_spinning = cvar("g_bugrigs_reverse_spinning");
965 g_bugrigs_reverse_speeding = cvar("g_bugrigs_reverse_speeding");
966 g_bugrigs_reverse_stopping = cvar("g_bugrigs_reverse_stopping");
967 g_bugrigs_air_steering = cvar("g_bugrigs_air_steering");
968 g_bugrigs_angle_smoothing = cvar("g_bugrigs_angle_smoothing");
969 g_bugrigs_friction_floor = cvar("g_bugrigs_friction_floor");
970 g_bugrigs_friction_brake = cvar("g_bugrigs_friction_brake");
971 g_bugrigs_friction_air = cvar("g_bugrigs_friction_air");
972 g_bugrigs_accel = cvar("g_bugrigs_accel");
973 g_bugrigs_speed_ref = cvar("g_bugrigs_speed_ref");
974 g_bugrigs_speed_pow = cvar("g_bugrigs_speed_pow");
975 g_bugrigs_steer = cvar("g_bugrigs_steer");
977 sv_clones = cvar("sv_clones");
978 sv_foginterval = cvar("sv_foginterval");
979 g_cloaked = cvar("g_cloaked");
981 g_cloaked = 1; // always enable cloak in CTS
982 g_jump_grunt = cvar("g_jump_grunt");
983 g_footsteps = cvar("g_footsteps");
984 g_grappling_hook = cvar("g_grappling_hook");
985 g_jetpack = cvar("g_jetpack");
986 g_midair = cvar("g_midair");
987 g_norecoil = cvar("g_norecoil");
988 g_bloodloss = cvar("g_bloodloss");
989 sv_maxidle = cvar("sv_maxidle");
990 sv_maxidle_spectatorsareidle = cvar("sv_maxidle_spectatorsareidle");
991 sv_autotaunt = cvar("sv_autotaunt");
992 sv_taunt = cvar("sv_taunt");
994 inWarmupStage = cvar("g_warmup");
995 g_warmup_limit = cvar("g_warmup_limit");
996 g_warmup_allguns = cvar("g_warmup_allguns");
997 g_warmup_allow_timeout = cvar("g_warmup_allow_timeout");
999 if ((g_race && g_race_qualifying == 2) || g_arena || g_assault || cvar("g_campaign"))
1000 inWarmupStage = 0; // these modes cannot work together, sorry
1002 g_pickup_respawntime_weapon = cvar("g_pickup_respawntime_weapon");
1003 g_pickup_respawntime_superweapon = cvar("g_pickup_respawntime_superweapon");
1004 g_pickup_respawntime_ammo = cvar("g_pickup_respawntime_ammo");
1005 g_pickup_respawntime_short = cvar("g_pickup_respawntime_short");
1006 g_pickup_respawntime_medium = cvar("g_pickup_respawntime_medium");
1007 g_pickup_respawntime_long = cvar("g_pickup_respawntime_long");
1008 g_pickup_respawntime_powerup = cvar("g_pickup_respawntime_powerup");
1009 g_pickup_respawntimejitter_weapon = cvar("g_pickup_respawntimejitter_weapon");
1010 g_pickup_respawntimejitter_superweapon = cvar("g_pickup_respawntimejitter_superweapon");
1011 g_pickup_respawntimejitter_ammo = cvar("g_pickup_respawntimejitter_ammo");
1012 g_pickup_respawntimejitter_short = cvar("g_pickup_respawntimejitter_short");
1013 g_pickup_respawntimejitter_medium = cvar("g_pickup_respawntimejitter_medium");
1014 g_pickup_respawntimejitter_long = cvar("g_pickup_respawntimejitter_long");
1015 g_pickup_respawntimejitter_powerup = cvar("g_pickup_respawntimejitter_powerup");
1017 g_weaponspeedfactor = cvar("g_weaponspeedfactor");
1018 g_weaponratefactor = cvar("g_weaponratefactor");
1019 g_weapondamagefactor = cvar("g_weapondamagefactor");
1020 g_weaponforcefactor = cvar("g_weaponforcefactor");
1021 g_weaponspreadfactor = cvar("g_weaponspreadfactor");
1023 g_pickup_shells = cvar("g_pickup_shells");
1024 g_pickup_shells_max = cvar("g_pickup_shells_max");
1025 g_pickup_nails = cvar("g_pickup_nails");
1026 g_pickup_nails_max = cvar("g_pickup_nails_max");
1027 g_pickup_rockets = cvar("g_pickup_rockets");
1028 g_pickup_rockets_max = cvar("g_pickup_rockets_max");
1029 g_pickup_cells = cvar("g_pickup_cells");
1030 g_pickup_cells_max = cvar("g_pickup_cells_max");
1031 g_pickup_fuel = cvar("g_pickup_fuel");
1032 g_pickup_fuel_jetpack = cvar("g_pickup_fuel_jetpack");
1033 g_pickup_fuel_max = cvar("g_pickup_fuel_max");
1034 g_pickup_armorsmall = cvar("g_pickup_armorsmall");
1035 g_pickup_armorsmall_max = cvar("g_pickup_armorsmall_max");
1036 g_pickup_armorsmall_anyway = cvar("g_pickup_armorsmall_anyway");
1037 g_pickup_armormedium = cvar("g_pickup_armormedium");
1038 g_pickup_armormedium_max = cvar("g_pickup_armormedium_max");
1039 g_pickup_armormedium_anyway = cvar("g_pickup_armormedium_anyway");
1040 g_pickup_armorbig = cvar("g_pickup_armorbig");
1041 g_pickup_armorbig_max = cvar("g_pickup_armorbig_max");
1042 g_pickup_armorbig_anyway = cvar("g_pickup_armorbig_anyway");
1043 g_pickup_armorlarge = cvar("g_pickup_armorlarge");
1044 g_pickup_armorlarge_max = cvar("g_pickup_armorlarge_max");
1045 g_pickup_armorlarge_anyway = cvar("g_pickup_armorlarge_anyway");
1046 g_pickup_healthsmall = cvar("g_pickup_healthsmall");
1047 g_pickup_healthsmall_max = cvar("g_pickup_healthsmall_max");
1048 g_pickup_healthsmall_anyway = cvar("g_pickup_healthsmall_anyway");
1049 g_pickup_healthmedium = cvar("g_pickup_healthmedium");
1050 g_pickup_healthmedium_max = cvar("g_pickup_healthmedium_max");
1051 g_pickup_healthmedium_anyway = cvar("g_pickup_healthmedium_anyway");
1052 g_pickup_healthlarge = cvar("g_pickup_healthlarge");
1053 g_pickup_healthlarge_max = cvar("g_pickup_healthlarge_max");
1054 g_pickup_healthlarge_anyway = cvar("g_pickup_healthlarge_anyway");
1055 g_pickup_healthmega = cvar("g_pickup_healthmega");
1056 g_pickup_healthmega_max = cvar("g_pickup_healthmega_max");
1057 g_pickup_healthmega_anyway = cvar("g_pickup_healthmega_anyway");
1059 g_pickup_ammo_anyway = cvar("g_pickup_ammo_anyway");
1060 g_pickup_weapons_anyway = cvar("g_pickup_weapons_anyway");
1062 g_pinata = cvar("g_pinata");
1064 g_weapon_stay = cvar(strcat("g_", GetGametype(), "_weapon_stay"));
1066 g_weapon_stay = cvar("g_weapon_stay");
1068 if not(inWarmupStage)
1069 game_starttime = time + cvar("g_start_delay");
1071 readplayerstartcvars();
1077 string precache_sound (string s) = #19;
1078 float precache_sound_index (string s) = #19;
1080 #define SND_VOLUME 1
1081 #define SND_ATTENUATION 2
1082 #define SND_LARGEENTITY 8
1083 #define SND_LARGESOUND 16
1085 float sound_allowed(float dest, entity e)
1087 // sounds from world may always pass
1090 if (e.classname == "body")
1092 else if (e.realowner && e.realowner != e)
1094 else if (e.owner && e.owner != e)
1099 // sounds to self may always pass
1100 if (dest == MSG_ONE)
1101 if (e == msg_entity)
1103 // sounds by players can be removed
1104 if (autocvar_bot_sound_monopoly)
1105 if (clienttype(e) == CLIENTTYPE_REAL)
1107 // anything else may pass
1111 #ifdef COMPAT_XON010_CHANNELS
1112 void(entity e, float chan, string samp, float vol, float atten) builtin_sound = #8;
1113 void sound(entity e, float chan, string samp, float vol, float atten)
1115 if (!sound_allowed(MSG_BROADCAST, e))
1117 builtin_sound(e, chan, samp, vol, atten);
1121 void sound(entity e, float chan, string samp, float vol, float atten)
1123 if (!sound_allowed(MSG_BROADCAST, e))
1125 sound7(e, chan, samp, vol, atten, 0, 0);
1129 void soundtoat(float dest, entity e, vector o, float chan, string samp, float vol, float atten)
1133 if (!sound_allowed(dest, e))
1136 entno = num_for_edict(e);
1137 idx = precache_sound_index(samp);
1142 atten = floor(atten * 64);
1143 vol = floor(vol * 255);
1146 sflags |= SND_VOLUME;
1148 sflags |= SND_ATTENUATION;
1149 if (entno >= 8192 || chan < 0 || chan > 7)
1150 sflags |= SND_LARGEENTITY;
1152 sflags |= SND_LARGESOUND;
1154 WriteByte(dest, SVC_SOUND);
1155 WriteByte(dest, sflags);
1156 if (sflags & SND_VOLUME)
1157 WriteByte(dest, vol);
1158 if (sflags & SND_ATTENUATION)
1159 WriteByte(dest, atten);
1160 if (sflags & SND_LARGEENTITY)
1162 WriteShort(dest, entno);
1163 WriteByte(dest, chan);
1167 WriteShort(dest, entno * 8 + chan);
1169 if (sflags & SND_LARGESOUND)
1170 WriteShort(dest, idx);
1172 WriteByte(dest, idx);
1174 WriteCoord(dest, o_x);
1175 WriteCoord(dest, o_y);
1176 WriteCoord(dest, o_z);
1178 void soundto(float dest, entity e, float chan, string samp, float vol, float atten)
1182 if (!sound_allowed(dest, e))
1185 o = e.origin + 0.5 * (e.mins + e.maxs);
1186 soundtoat(dest, e, o, chan, samp, vol, atten);
1188 void soundat(entity e, vector o, float chan, string samp, float vol, float atten)
1190 soundtoat(((chan & 8) ? MSG_ALL : MSG_BROADCAST), e, o, chan, samp, vol, atten);
1192 void stopsoundto(float dest, entity e, float chan)
1196 if (!sound_allowed(dest, e))
1199 entno = num_for_edict(e);
1201 if (entno >= 8192 || chan < 0 || chan > 7)
1204 idx = precache_sound_index("misc/null.wav");
1205 sflags = SND_LARGEENTITY;
1207 sflags |= SND_LARGESOUND;
1208 WriteByte(dest, SVC_SOUND);
1209 WriteByte(dest, sflags);
1210 WriteShort(dest, entno);
1211 WriteByte(dest, chan);
1212 if (sflags & SND_LARGESOUND)
1213 WriteShort(dest, idx);
1215 WriteByte(dest, idx);
1216 WriteCoord(dest, e.origin_x);
1217 WriteCoord(dest, e.origin_y);
1218 WriteCoord(dest, e.origin_z);
1222 WriteByte(dest, SVC_STOPSOUND);
1223 WriteShort(dest, entno * 8 + chan);
1226 void stopsound(entity e, float chan)
1228 if (!sound_allowed(MSG_BROADCAST, e))
1231 stopsoundto(MSG_BROADCAST, e, chan); // unreliable, gets there fast
1232 stopsoundto(MSG_ALL, e, chan); // in case of packet loss
1235 void play2(entity e, string filename)
1237 //stuffcmd(e, strcat("play2 ", filename, "\n"));
1239 soundtoat(MSG_ONE, world, '0 0 0', CH_INFO, filename, VOL_BASE, ATTN_NONE);
1242 // use this one if you might be causing spam (e.g. from touch functions that might get called more than once per frame)
1244 float spamsound(entity e, float chan, string samp, float vol, float atten)
1246 if (!sound_allowed(MSG_BROADCAST, e))
1249 if (time > e.spamtime)
1252 sound(e, chan, samp, vol, atten);
1258 void play2team(float t, string filename)
1262 if (autocvar_bot_sound_monopoly)
1265 FOR_EACH_REALPLAYER(head)
1268 play2(head, filename);
1272 void play2all(string samp)
1274 if (autocvar_bot_sound_monopoly)
1277 sound(world, CH_INFO, samp, VOL_BASE, ATTN_NONE);
1280 void PrecachePlayerSounds(string f);
1281 void precache_playermodel(string m)
1283 float globhandle, i, n;
1286 if(substring(m, -9,5) == "_lod1")
1288 if(substring(m, -9,5) == "_lod2")
1291 f = strcat(substring(m, 0, -5), "_lod1", substring(m, -4, -1));
1294 f = strcat(substring(m, 0, -5), "_lod2", substring(m, -4, -1));
1298 globhandle = search_begin(strcat(m, "_*.sounds"), TRUE, FALSE);
1301 n = search_getsize(globhandle);
1302 for (i = 0; i < n; ++i)
1304 //print(search_getfilename(globhandle, i), "\n");
1305 f = search_getfilename(globhandle, i);
1306 PrecachePlayerSounds(f);
1308 search_end(globhandle);
1310 void precache_all_playermodels(string pattern)
1312 float globhandle, i, n;
1315 globhandle = search_begin(pattern, TRUE, FALSE);
1318 n = search_getsize(globhandle);
1319 for (i = 0; i < n; ++i)
1321 //print(search_getfilename(globhandle, i), "\n");
1322 f = search_getfilename(globhandle, i);
1323 precache_playermodel(f);
1325 search_end(globhandle);
1330 // gamemode related things
1331 precache_model ("models/misc/chatbubble.spr");
1333 #ifdef TTURRETS_ENABLED
1334 if (autocvar_g_turrets)
1338 // Precache all player models if desired
1339 if (autocvar_sv_precacheplayermodels)
1341 PrecachePlayerSounds("sound/player/default.sounds");
1342 precache_all_playermodels("models/player/*.zym");
1343 precache_all_playermodels("models/player/*.dpm");
1344 precache_all_playermodels("models/player/*.md3");
1345 precache_all_playermodels("models/player/*.psk");
1346 precache_all_playermodels("models/player/*.iqm");
1349 if (autocvar_sv_defaultcharacter)
1352 s = autocvar_sv_defaultplayermodel_red;
1354 precache_playermodel(s);
1355 s = autocvar_sv_defaultplayermodel_blue;
1357 precache_playermodel(s);
1358 s = autocvar_sv_defaultplayermodel_yellow;
1360 precache_playermodel(s);
1361 s = autocvar_sv_defaultplayermodel_pink;
1363 precache_playermodel(s);
1364 s = autocvar_sv_defaultplayermodel;
1366 precache_playermodel(s);
1371 PrecacheGlobalSound((globalsound_step = "misc/footstep0 6"));
1372 PrecacheGlobalSound((globalsound_metalstep = "misc/metalfootstep0 6"));
1375 // gore and miscellaneous sounds
1376 //precache_sound ("misc/h2ohit.wav");
1377 precache_model ("models/hook.md3");
1378 precache_sound ("misc/armorimpact.wav");
1379 precache_sound ("misc/bodyimpact1.wav");
1380 precache_sound ("misc/bodyimpact2.wav");
1381 precache_sound ("misc/gib.wav");
1382 precache_sound ("misc/gib_splat01.wav");
1383 precache_sound ("misc/gib_splat02.wav");
1384 precache_sound ("misc/gib_splat03.wav");
1385 precache_sound ("misc/gib_splat04.wav");
1386 PrecacheGlobalSound((globalsound_fall = "misc/hitground 4"));
1387 PrecacheGlobalSound((globalsound_metalfall = "misc/metalhitground 4"));
1388 precache_sound ("misc/null.wav");
1389 precache_sound ("misc/spawn.wav");
1390 precache_sound ("misc/talk.wav");
1391 precache_sound ("misc/teleport.wav");
1392 precache_sound ("misc/poweroff.wav");
1393 precache_sound ("player/lava.wav");
1394 precache_sound ("player/slime.wav");
1396 precache_model ("models/sprites/0.spr32");
1397 precache_model ("models/sprites/1.spr32");
1398 precache_model ("models/sprites/2.spr32");
1399 precache_model ("models/sprites/3.spr32");
1400 precache_model ("models/sprites/4.spr32");
1401 precache_model ("models/sprites/5.spr32");
1402 precache_model ("models/sprites/6.spr32");
1403 precache_model ("models/sprites/7.spr32");
1404 precache_model ("models/sprites/8.spr32");
1405 precache_model ("models/sprites/9.spr32");
1406 precache_model ("models/sprites/10.spr32");
1408 // common weapon precaches
1409 precache_sound ("weapons/reload.wav"); // until weapons have individual reload sounds, precache the reload sound here
1410 precache_sound ("weapons/weapon_switch.wav");
1411 precache_sound ("weapons/weaponpickup.wav");
1412 precache_sound ("weapons/unavailable.wav");
1413 precache_sound ("weapons/dryfire.wav");
1414 if (g_grappling_hook)
1416 precache_sound ("weapons/hook_fire.wav"); // hook
1417 precache_sound ("weapons/hook_impact.wav"); // hook
1420 if(autocvar_sv_precacheweapons)
1422 //precache weapon models/sounds
1425 while (wep <= WEP_LAST)
1427 weapon_action(wep, WR_PRECACHE);
1432 precache_model("models/elaser.mdl");
1433 precache_model("models/laser.mdl");
1434 precache_model("models/ebomb.mdl");
1437 // Disabled this code because it simply does not work (e.g. ignores bgmvolume, overlaps with "cd loop" controlled tracks).
1439 if (!self.noise && self.music) // quake 3 uses the music field
1440 self.noise = self.music;
1442 // plays music for the level if there is any
1445 precache_sound (self.noise);
1446 ambientsound ('0 0 0', self.noise, VOL_BASE, ATTN_NONE);
1451 // WARNING: this kills the trace globals
1452 #define EXACTTRIGGER_TOUCH if(WarpZoneLib_ExactTrigger_Touch()) return
1453 #define EXACTTRIGGER_INIT WarpZoneLib_ExactTrigger_Init()
1455 #define INITPRIO_FIRST 0
1456 #define INITPRIO_GAMETYPE 0
1457 #define INITPRIO_GAMETYPE_FALLBACK 1
1458 #define INITPRIO_FINDTARGET 10
1459 #define INITPRIO_DROPTOFLOOR 20
1460 #define INITPRIO_SETLOCATION 90
1461 #define INITPRIO_LINKDOORS 91
1462 #define INITPRIO_LAST 99
1464 .void(void) initialize_entity;
1465 .float initialize_entity_order;
1466 .entity initialize_entity_next;
1467 entity initialize_entity_first;
1469 void make_safe_for_remove(entity e)
1471 if (e.initialize_entity)
1473 entity ent, prev = world;
1474 for (ent = initialize_entity_first; ent; )
1476 if ((ent == e) || ((ent.classname == "initialize_entity") && (ent.enemy == e)))
1478 //print("make_safe_for_remove: getting rid of initializer ", etos(ent), "\n");
1479 // skip it in linked list
1482 prev.initialize_entity_next = ent.initialize_entity_next;
1483 ent = prev.initialize_entity_next;
1487 initialize_entity_first = ent.initialize_entity_next;
1488 ent = initialize_entity_first;
1494 ent = ent.initialize_entity_next;
1500 void objerror(string s)
1502 make_safe_for_remove(self);
1503 builtin_objerror(s);
1506 .float remove_except_protected_forbidden;
1507 void remove_except_protected(entity e)
1509 if(e.remove_except_protected_forbidden)
1510 error("not allowed to remove this at this point");
1514 void remove_unsafely(entity e)
1516 if(e.classname == "spike")
1517 error("Removing spikes is forbidden (crylink bug), please report");
1521 void remove_safely(entity e)
1523 make_safe_for_remove(e);
1527 void InitializeEntity(entity e, void(void) func, float order)
1531 if (!e || e.initialize_entity)
1533 // make a proxy initializer entity
1537 e.classname = "initialize_entity";
1541 e.initialize_entity = func;
1542 e.initialize_entity_order = order;
1544 cur = initialize_entity_first;
1548 if (!cur || cur.initialize_entity_order > order)
1550 // insert between prev and cur
1552 prev.initialize_entity_next = e;
1554 initialize_entity_first = e;
1555 e.initialize_entity_next = cur;
1559 cur = cur.initialize_entity_next;
1562 void InitializeEntitiesRun()
1565 startoflist = initialize_entity_first;
1566 initialize_entity_first = world;
1567 remove = remove_except_protected;
1568 for (self = startoflist; self; self = self.initialize_entity_next)
1570 self.remove_except_protected_forbidden = 1;
1572 for (self = startoflist; self; )
1575 var void(void) func;
1576 e = self.initialize_entity_next;
1577 func = self.initialize_entity;
1578 self.initialize_entity_order = 0;
1579 self.initialize_entity = func_null;
1580 self.initialize_entity_next = world;
1581 self.remove_except_protected_forbidden = 0;
1582 if (self.classname == "initialize_entity")
1586 builtin_remove(self);
1589 //dprint("Delayed initialization: ", self.classname, "\n");
1595 backtrace(strcat("Null function in: ", self.classname, "\n"));
1599 remove = remove_unsafely;
1602 .float uncustomizeentityforclient_set;
1603 .void(void) uncustomizeentityforclient;
1604 void UncustomizeEntitiesRun()
1608 for (self = world; (self = findfloat(self, uncustomizeentityforclient_set, 1)); )
1609 self.uncustomizeentityforclient();
1612 void SetCustomizer(entity e, float(void) customizer, void(void) uncustomizer)
1614 e.customizeentityforclient = customizer;
1615 e.uncustomizeentityforclient = uncustomizer;
1616 e.uncustomizeentityforclient_set = !!uncustomizer;
1620 #define IFTARGETED if(!self.nottargeted && self.targetname != "")
1623 void Net_LinkEntity(entity e, float docull, float dt, float(entity, float) sendfunc)
1627 if (e.classname == "")
1628 e.classname = "net_linked";
1630 if (e.model == "" || self.modelindex == 0)
1634 setmodel(e, "null");
1638 e.SendEntity = sendfunc;
1639 e.SendFlags = 0xFFFFFF;
1642 e.effects |= EF_NODEPTHTEST;
1646 e.nextthink = time + dt;
1647 e.think = SUB_Remove;
1651 void adaptor_think2touch()
1660 void adaptor_think2use()
1672 void adaptor_think2use_hittype_splash() // for timed projectile detonation
1674 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
1675 self.projectiledeathtype |= HITTYPE_SPLASH;
1676 adaptor_think2use();
1679 // deferred dropping
1680 void DropToFloor_Handler()
1682 builtin_droptofloor();
1683 self.dropped_origin = self.origin;
1688 InitializeEntity(self, DropToFloor_Handler, INITPRIO_DROPTOFLOOR);
1693 float trace_hits_box_a0, trace_hits_box_a1;
1695 float trace_hits_box_1d(float end, float thmi, float thma)
1699 // just check if x is in range
1707 // do the trace with respect to x
1708 // 0 -> end has to stay in thmi -> thma
1709 trace_hits_box_a0 = max(trace_hits_box_a0, min(thmi / end, thma / end));
1710 trace_hits_box_a1 = min(trace_hits_box_a1, max(thmi / end, thma / end));
1711 if (trace_hits_box_a0 > trace_hits_box_a1)
1717 float trace_hits_box(vector start, vector end, vector thmi, vector thma)
1722 // now it is a trace from 0 to end
1724 trace_hits_box_a0 = 0;
1725 trace_hits_box_a1 = 1;
1727 if (!trace_hits_box_1d(end_x, thmi_x, thma_x))
1729 if (!trace_hits_box_1d(end_y, thmi_y, thma_y))
1731 if (!trace_hits_box_1d(end_z, thmi_z, thma_z))
1737 float tracebox_hits_box(vector start, vector mi, vector ma, vector end, vector thmi, vector thma)
1739 return trace_hits_box(start, end, thmi - ma, thma - mi);
1742 float SUB_NoImpactCheck()
1744 // zero hitcontents = this is not the real impact, but either the
1745 // mirror-impact of something hitting the projectile instead of the
1746 // projectile hitting the something, or a touchareagrid one. Neither of
1747 // these stop the projectile from moving, so...
1748 if(trace_dphitcontents == 0)
1750 //dprint("A hit happened with zero hit contents... DEBUG THIS, this should never happen for projectiles! Projectile will self-destruct.\n");
1751 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)));
1754 if (trace_dphitq3surfaceflags & Q3SURFACEFLAG_NOIMPACT)
1756 if (other == world && self.size != '0 0 0')
1759 tic = self.velocity * sys_frametime;
1760 tic = tic + normalize(tic) * vlen(self.maxs - self.mins);
1761 traceline(self.origin - tic, self.origin + tic, MOVE_NORMAL, self);
1762 if (trace_fraction >= 1)
1764 dprint("Odd... did not hit...?\n");
1766 else if (trace_dphitq3surfaceflags & Q3SURFACEFLAG_NOIMPACT)
1768 dprint("Detected and prevented the sky-grapple bug.\n");
1776 #define SUB_OwnerCheck() (other && (other == self.owner))
1778 void RemoveGrapplingHook(entity pl);
1779 void W_Crylink_Dequeue(entity e);
1780 float WarpZone_Projectile_Touch_ImpactFilter_Callback()
1782 if(SUB_OwnerCheck())
1784 if(SUB_NoImpactCheck())
1786 if(self.classname == "grapplinghook")
1787 RemoveGrapplingHook(self.realowner);
1788 else if(self.classname == "spike")
1790 W_Crylink_Dequeue(self);
1797 if(trace_ent && trace_ent.solid > SOLID_TRIGGER)
1798 UpdateCSQCProjectile(self);
1801 #define PROJECTILE_TOUCH if(WarpZone_Projectile_Touch()) return
1803 #define ITEM_TOUCH_NEEDKILL() (((trace_dpstartcontents | trace_dphitcontents) & DPCONTENTS_NODROP) || (trace_dphitq3surfaceflags & Q3SURFACEFLAG_SKY))
1804 #define ITEM_DAMAGE_NEEDKILL(dt) (((dt) == DEATH_HURTTRIGGER) || ((dt) == DEATH_SLIME) || ((dt) == DEATH_LAVA) || ((dt) == DEATH_SWAMP))
1806 void URI_Get_Callback(float id, float status, string data)
1808 if(url_URI_Get_Callback(id, status, data))
1812 else if (id == URI_GET_DISCARD)
1816 else if (id >= URI_GET_CURL && id <= URI_GET_CURL_END)
1819 Curl_URI_Get_Callback(id, status, data);
1821 else if (id >= URI_GET_IPBAN && id <= URI_GET_IPBAN_END)
1824 OnlineBanList_URI_Get_Callback(id, status, data);
1828 print("Received HTTP request data for an invalid id ", ftos(id), ".\n");
1832 string uid2name(string myuid) {
1834 s = db_get(ServerProgsDB, strcat("/uid2name/", myuid));
1836 // FIXME remove this later after 0.6 release
1837 // convert old style broken records to correct style
1840 s = db_get(ServerProgsDB, strcat("uid2name", myuid));
1843 db_put(ServerProgsDB, strcat("/uid2name/", myuid), s);
1844 db_put(ServerProgsDB, strcat("uid2name", myuid), "");
1849 s = "^1Unregistered Player";
1853 float race_readTime(string map, float pos)
1861 return stof(db_get(ServerProgsDB, strcat(map, rr, "time", ftos(pos))));
1864 string race_readUID(string map, float pos)
1872 return db_get(ServerProgsDB, strcat(map, rr, "crypto_idfp", ftos(pos)));
1875 float race_readPos(string map, float t) {
1877 for (i = 1; i <= RANKINGS_CNT; ++i)
1878 if (race_readTime(map, i) == 0 || race_readTime(map, i) > t)
1881 return 0; // pos is zero if unranked
1884 void race_writeTime(string map, float t, string myuid)
1893 newpos = race_readPos(map, t);
1895 float i, prevpos = 0;
1896 for(i = 1; i <= RANKINGS_CNT; ++i)
1898 if(race_readUID(map, i) == myuid)
1901 if (prevpos) { // player improved his existing record, only have to iterate on ranks between new and old recs
1902 for (i = prevpos; i > newpos; --i) {
1903 db_put(ServerProgsDB, strcat(map, rr, "time", ftos(i)), ftos(race_readTime(map, i - 1)));
1904 db_put(ServerProgsDB, strcat(map, rr, "crypto_idfp", ftos(i)), race_readUID(map, i - 1));
1906 } else { // player has no ranked record yet
1907 for (i = RANKINGS_CNT; i > newpos; --i) {
1908 db_put(ServerProgsDB, strcat(map, rr, "time", ftos(i)), ftos(race_readTime(map, i - 1)));
1909 db_put(ServerProgsDB, strcat(map, rr, "crypto_idfp", ftos(i)), race_readUID(map, i - 1));
1913 // store new time itself
1914 db_put(ServerProgsDB, strcat(map, rr, "time", ftos(newpos)), ftos(t));
1915 db_put(ServerProgsDB, strcat(map, rr, "crypto_idfp", ftos(newpos)), myuid);
1918 string race_readName(string map, float pos)
1926 return uid2name(db_get(ServerProgsDB, strcat(map, rr, "crypto_idfp", ftos(pos))));
1929 float MoveToRandomMapLocation(entity e, float goodcontents, float badcontents, float badsurfaceflags, float attempts, float maxaboveground, float minviewdistance)
1932 vector start, org, delta, end, enddown, mstart;
1935 m = e.dphitcontentsmask;
1936 e.dphitcontentsmask = goodcontents | badcontents;
1939 delta = world.maxs - world.mins;
1943 for (i = 0; i < attempts; ++i)
1945 start_x = org_x + random() * delta_x;
1946 start_y = org_y + random() * delta_y;
1947 start_z = org_z + random() * delta_z;
1949 // rule 1: start inside world bounds, and outside
1950 // solid, and don't start from somewhere where you can
1951 // fall down to evil
1952 tracebox(start, e.mins, e.maxs, start - '0 0 1' * delta_z, MOVE_NORMAL, e);
1953 if (trace_fraction >= 1)
1955 if (trace_startsolid)
1957 if (trace_dphitcontents & badcontents)
1959 if (trace_dphitq3surfaceflags & badsurfaceflags)
1962 // rule 2: if we are too high, lower the point
1963 if (trace_fraction * delta_z > maxaboveground)
1964 start = trace_endpos + '0 0 1' * maxaboveground;
1965 enddown = trace_endpos;
1967 // rule 3: make sure we aren't outside the map. This only works
1968 // for somewhat well formed maps. A good rule of thumb is that
1969 // the map should have a convex outside hull.
1970 // these can be traceLINES as we already verified the starting box
1971 mstart = start + 0.5 * (e.mins + e.maxs);
1972 traceline(mstart, mstart + '1 0 0' * delta_x, MOVE_NORMAL, e);
1973 if (trace_fraction >= 1)
1975 traceline(mstart, mstart - '1 0 0' * delta_x, MOVE_NORMAL, e);
1976 if (trace_fraction >= 1)
1978 traceline(mstart, mstart + '0 1 0' * delta_y, MOVE_NORMAL, e);
1979 if (trace_fraction >= 1)
1981 traceline(mstart, mstart - '0 1 0' * delta_y, MOVE_NORMAL, e);
1982 if (trace_fraction >= 1)
1984 traceline(mstart, mstart + '0 0 1' * delta_z, MOVE_NORMAL, e);
1985 if (trace_fraction >= 1)
1988 // rule 4: we must "see" some spawnpoint
1989 for(sp = world; (sp = find(sp, classname, "info_player_deathmatch")); )
1990 if(checkpvs(mstart, sp))
1994 for(sp = world; (sp = findflags(sp, flags, FL_ITEM)); )
1995 if(checkpvs(mstart, sp))
2001 // find a random vector to "look at"
2002 end_x = org_x + random() * delta_x;
2003 end_y = org_y + random() * delta_y;
2004 end_z = org_z + random() * delta_z;
2005 end = start + normalize(end - start) * vlen(delta);
2007 // rule 4: start TO end must not be too short
2008 tracebox(start, e.mins, e.maxs, end, MOVE_NORMAL, e);
2009 if (trace_startsolid)
2011 if (trace_fraction < minviewdistance / vlen(delta))
2014 // rule 5: don't want to look at sky
2015 if (trace_dphitq3surfaceflags & Q3SURFACEFLAG_SKY)
2018 // rule 6: we must not end up in trigger_hurt
2019 if (tracebox_hits_trigger_hurt(start, e.mins, e.maxs, enddown))
2025 e.dphitcontentsmask = m;
2029 setorigin(e, start);
2030 e.angles = vectoangles(end - start);
2031 dprint("Needed ", ftos(i + 1), " attempts\n");
2038 float zcurveparticles_effectno;
2039 vector zcurveparticles_start;
2040 float zcurveparticles_spd;
2042 void endzcurveparticles()
2044 if(zcurveparticles_effectno)
2047 WriteShort(MSG_BROADCAST, zcurveparticles_spd | 0x8000);
2049 zcurveparticles_effectno = 0;
2052 void zcurveparticles(float effectno, vector start, vector end, float end_dz, float spd)
2054 spd = bound(0, floor(spd / 16), 32767);
2055 if(effectno != zcurveparticles_effectno || start != zcurveparticles_start)
2057 endzcurveparticles();
2058 WriteByte(MSG_BROADCAST, SVC_TEMPENTITY);
2059 WriteByte(MSG_BROADCAST, TE_CSQC_ZCURVEPARTICLES);
2060 WriteShort(MSG_BROADCAST, effectno);
2061 WriteCoord(MSG_BROADCAST, start_x);
2062 WriteCoord(MSG_BROADCAST, start_y);
2063 WriteCoord(MSG_BROADCAST, start_z);
2064 zcurveparticles_effectno = effectno;
2065 zcurveparticles_start = start;
2068 WriteShort(MSG_BROADCAST, zcurveparticles_spd);
2069 WriteCoord(MSG_BROADCAST, end_x);
2070 WriteCoord(MSG_BROADCAST, end_y);
2071 WriteCoord(MSG_BROADCAST, end_z);
2072 WriteCoord(MSG_BROADCAST, end_dz);
2073 zcurveparticles_spd = spd;
2076 void zcurveparticles_from_tracetoss(float effectno, vector start, vector end, vector vel)
2079 vector vecxy, velxy;
2081 vecxy = end - start;
2086 if (vlen(velxy) < 0.000001 * fabs(vel_z))
2088 endzcurveparticles();
2089 trailparticles(world, effectno, start, end);
2093 end_dz = vlen(vecxy) / vlen(velxy) * vel_z - (end_z - start_z);
2094 zcurveparticles(effectno, start, end, end_dz, vlen(vel));
2097 void write_recordmarker(entity pl, float tstart, float dt)
2099 GameLogEcho(strcat(":recordset:", ftos(pl.playerid), ":", ftos(dt)));
2101 // also write a marker into demo files for demotc-race-record-extractor to find
2104 strcat("//", strconv(2, 0, 0, GetGametype()), " RECORD SET ", TIME_ENCODED_TOSTRING(TIME_ENCODE(dt))),
2105 " ", ftos(tstart), " ", ftos(dt), "\n"));
2108 vector shotorg_adjustfromclient(vector vecs, float y_is_right, float allowcenter, float algn)
2121 if(allowcenter) // 2: allow center handedness
2134 if(allowcenter) // 2: allow center handedness
2150 vector shotorg_adjust_values(vector vecs, float y_is_right, float visual, float algn)
2155 if (autocvar_g_shootfromeye)
2159 if (autocvar_g_shootfromclient) { vecs = shotorg_adjustfromclient(vecs, y_is_right, (autocvar_g_shootfromclient >= 2), algn); }
2160 else { vecs_y = 0; vecs_z -= 2; }
2168 else if (autocvar_g_shootfromcenter)
2173 else if ((s = autocvar_g_shootfromfixedorigin) != "")
2183 else if (autocvar_g_shootfromclient)
2185 vecs = shotorg_adjustfromclient(vecs, y_is_right, (autocvar_g_shootfromclient >= 2), algn);
2190 vector shotorg_adjust(vector vecs, float y_is_right, float visual)
2192 return shotorg_adjust_values(vecs, y_is_right, visual, self.owner.cvar_cl_gunalign);
2196 void attach_sameorigin(entity e, entity to, string tag)
2198 vector org, t_forward, t_left, t_up, e_forward, e_up;
2201 org = e.origin - gettaginfo(to, gettagindex(to, tag));
2202 tagscale = pow(vlen(v_forward), -2); // undo a scale on the tag
2203 t_forward = v_forward * tagscale;
2204 t_left = v_right * -tagscale;
2205 t_up = v_up * tagscale;
2207 e.origin_x = org * t_forward;
2208 e.origin_y = org * t_left;
2209 e.origin_z = org * t_up;
2211 // current forward and up directions
2212 if (substring(e.model, 0, 1) == "*") // bmodels have their own rules
2213 e.angles = AnglesTransform_FromVAngles(e.angles);
2215 e.angles = AnglesTransform_FromAngles(e.angles);
2216 fixedmakevectors(e.angles);
2218 // untransform forward, up!
2219 e_forward_x = v_forward * t_forward;
2220 e_forward_y = v_forward * t_left;
2221 e_forward_z = v_forward * t_up;
2222 e_up_x = v_up * t_forward;
2223 e_up_y = v_up * t_left;
2224 e_up_z = v_up * t_up;
2226 e.angles = fixedvectoangles2(e_forward, e_up);
2227 if (substring(e.model, 0, 1) == "*") // bmodels have their own rules
2228 e.angles = AnglesTransform_ToVAngles(e.angles);
2230 e.angles = AnglesTransform_ToAngles(e.angles);
2232 setattachment(e, to, tag);
2233 setorigin(e, e.origin);
2236 void detach_sameorigin(entity e)
2239 org = gettaginfo(e, 0);
2240 e.angles = fixedvectoangles2(v_forward, v_up);
2241 if (substring(e.model, 0, 1) == "*") // bmodels have their own rules
2242 e.angles = AnglesTransform_ToVAngles(e.angles);
2244 e.angles = AnglesTransform_ToAngles(e.angles);
2246 setattachment(e, world, "");
2247 setorigin(e, e.origin);
2250 void follow_sameorigin(entity e, entity to)
2252 e.movetype = MOVETYPE_FOLLOW; // make the hole follow
2253 e.aiment = to; // make the hole follow bmodel
2254 e.punchangle = to.angles; // the original angles of bmodel
2255 e.view_ofs = e.origin - to.origin; // relative origin
2256 e.v_angle = e.angles - to.angles; // relative angles
2259 void unfollow_sameorigin(entity e)
2261 e.movetype = MOVETYPE_NONE;
2264 entity gettaginfo_relative_ent;
2265 vector gettaginfo_relative(entity e, float tag)
2267 if (!gettaginfo_relative_ent)
2269 gettaginfo_relative_ent = spawn();
2270 gettaginfo_relative_ent.effects = EF_NODRAW;
2272 gettaginfo_relative_ent.model = e.model;
2273 gettaginfo_relative_ent.modelindex = e.modelindex;
2274 gettaginfo_relative_ent.frame = e.frame;
2275 return gettaginfo(gettaginfo_relative_ent, tag);
2280 float modeleffect_SendEntity(entity to, float sf)
2283 WriteByte(MSG_ENTITY, ENT_CLIENT_MODELEFFECT);
2286 if(self.velocity != '0 0 0')
2288 if(self.angles != '0 0 0')
2290 if(self.avelocity != '0 0 0')
2293 WriteByte(MSG_ENTITY, f);
2294 WriteShort(MSG_ENTITY, self.modelindex);
2295 WriteByte(MSG_ENTITY, self.skin);
2296 WriteByte(MSG_ENTITY, self.frame);
2297 WriteCoord(MSG_ENTITY, self.origin_x);
2298 WriteCoord(MSG_ENTITY, self.origin_y);
2299 WriteCoord(MSG_ENTITY, self.origin_z);
2302 WriteCoord(MSG_ENTITY, self.velocity_x);
2303 WriteCoord(MSG_ENTITY, self.velocity_y);
2304 WriteCoord(MSG_ENTITY, self.velocity_z);
2308 WriteCoord(MSG_ENTITY, self.angles_x);
2309 WriteCoord(MSG_ENTITY, self.angles_y);
2310 WriteCoord(MSG_ENTITY, self.angles_z);
2314 WriteCoord(MSG_ENTITY, self.avelocity_x);
2315 WriteCoord(MSG_ENTITY, self.avelocity_y);
2316 WriteCoord(MSG_ENTITY, self.avelocity_z);
2318 WriteShort(MSG_ENTITY, self.scale * 256.0);
2319 WriteShort(MSG_ENTITY, self.scale2 * 256.0);
2320 WriteByte(MSG_ENTITY, self.teleport_time * 100.0);
2321 WriteByte(MSG_ENTITY, self.fade_time * 100.0);
2322 WriteByte(MSG_ENTITY, self.alpha * 255.0);
2327 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)
2332 e.classname = "modeleffect";
2340 e.teleport_time = t1;
2344 e.scale = s0 / max6(-e.mins_x, -e.mins_y, -e.mins_z, e.maxs_x, e.maxs_y, e.maxs_z);
2348 e.scale2 = s2 / max6(-e.mins_x, -e.mins_y, -e.mins_z, e.maxs_x, e.maxs_y, e.maxs_z);
2351 sz = max(e.scale, e.scale2);
2352 setsize(e, e.mins * sz, e.maxs * sz);
2353 Net_LinkEntity(e, FALSE, 0.1, modeleffect_SendEntity);
2356 void shockwave_spawn(string m, vector org, float sz, float t1, float t2)
2358 return modeleffect_spawn(m, 0, 0, org, '0 0 0', '0 0 0', '0 0 0', 0, sz, 1, t1, t2);
2361 float randombit(float bits)
2363 if not(bits & (bits-1)) // this ONLY holds for powers of two!
2372 for(f = 1; f <= bits; f *= 2)
2381 r = (r - 1) / (n - 1);
2388 float randombits(float bits, float k, float error_return)
2392 while(k > 0 && bits != r)
2394 r += randombit(bits - r);
2403 void randombit_test(float bits, float iter)
2407 print(ftos(randombit(bits)), "\n");
2412 float ExponentialFalloff(float mindist, float maxdist, float halflifedist, float d)
2414 if(halflifedist > 0)
2415 return pow(0.5, (bound(mindist, d, maxdist) - mindist) / halflifedist);
2416 else if(halflifedist < 0)
2417 return pow(0.5, (bound(mindist, d, maxdist) - maxdist) / halflifedist);
2426 #define cvar_string_normal builtin_cvar_string
2427 #define cvar_normal builtin_cvar
2429 string cvar_string_normal(string n)
2431 if not(cvar_type(n) & 1)
2432 backtrace(strcat("Attempt to access undefined cvar: ", n));
2433 return builtin_cvar_string(n);
2436 float cvar_normal(string n)
2438 return stof(cvar_string_normal(n));
2441 #define cvar_set_normal builtin_cvar_set
2449 oself.think = SUB_Remove;
2450 oself.nextthink = time;
2456 Execute func() after time + fdelay.
2457 self when func is executed = self when defer is called
2459 void defer(float fdelay, void() func)
2466 e.think = defer_think;
2467 e.nextthink = time + fdelay;
2470 .string aiment_classname;
2471 .float aiment_deadflag;
2472 void SetMovetypeFollow(entity ent, entity e)
2474 // FIXME this may not be warpzone aware
2475 ent.movetype = MOVETYPE_FOLLOW; // make the hole follow
2476 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.
2477 ent.aiment = e; // make the hole follow bmodel
2478 ent.punchangle = e.angles; // the original angles of bmodel
2479 ent.view_ofs = ent.origin - e.origin; // relative origin
2480 ent.v_angle = ent.angles - e.angles; // relative angles
2481 ent.aiment_classname = strzone(e.classname);
2482 ent.aiment_deadflag = e.deadflag;
2484 void UnsetMovetypeFollow(entity ent)
2486 ent.movetype = MOVETYPE_FLY;
2487 PROJECTILE_MAKETRIGGER(ent);
2490 float LostMovetypeFollow(entity ent)
2493 if(ent.movetype != MOVETYPE_FOLLOW)
2499 if(ent.aiment.classname != ent.aiment_classname)
2501 if(ent.aiment.deadflag != ent.aiment_deadflag)
2507 float isPushable(entity e)
2516 case "droppedweapon":
2517 case "keepawayball":
2518 case "nexball_basketball":
2519 case "nexball_football":
2521 case "bullet": // antilagged bullets can't hit this either
2524 if (e.projectiledeathtype)