1 var void remove(entity e);
2 void objerror(string s);
4 .vector dropped_origin;
6 void traceline_antilag (entity source, vector v1, vector v2, float nomonst, entity forent, float lag);
7 void crosshair_trace(entity pl)
9 traceline_antilag(pl, pl.cursor_trace_start, pl.cursor_trace_start + normalize(pl.cursor_trace_endpos - pl.cursor_trace_start) * MAX_SHOT_DISTANCE, MOVE_NORMAL, pl, ANTILAG_LATENCY(pl));
11 void crosshair_trace_plusvisibletriggers(entity pl)
15 first = findchainfloat(solid, SOLID_TRIGGER);
17 for (e = first; e; e = e.chain)
23 for (e = first; e; e = e.chain)
24 e.solid = SOLID_TRIGGER;
26 void WarpZone_traceline_antilag (entity source, vector v1, vector v2, float nomonst, entity forent, float lag);
27 void WarpZone_crosshair_trace(entity pl)
29 WarpZone_traceline_antilag(pl, pl.cursor_trace_start, pl.cursor_trace_start + normalize(pl.cursor_trace_endpos - pl.cursor_trace_start) * MAX_SHOT_DISTANCE, MOVE_NORMAL, pl, ANTILAG_LATENCY(pl));
32 void() spawnfunc_info_player_deathmatch; // needed for the other spawnpoints
33 void() spawnpoint_use;
36 string admin_name(void)
38 if(autocvar_sv_adminnick != "")
39 return autocvar_sv_adminnick;
41 return "SERVER ADMIN";
44 float DistributeEvenly_amount;
45 float DistributeEvenly_totalweight;
46 void DistributeEvenly_Init(float amount, float totalweight)
48 if (DistributeEvenly_amount)
50 dprint("DistributeEvenly_Init: UNFINISHED DISTRIBUTION (", ftos(DistributeEvenly_amount), " for ");
51 dprint(ftos(DistributeEvenly_totalweight), " left!)\n");
54 DistributeEvenly_amount = 0;
56 DistributeEvenly_amount = amount;
57 DistributeEvenly_totalweight = totalweight;
59 float DistributeEvenly_Get(float weight)
64 f = floor(0.5 + DistributeEvenly_amount * weight / DistributeEvenly_totalweight);
65 DistributeEvenly_totalweight -= weight;
66 DistributeEvenly_amount -= f;
69 float DistributeEvenly_GetRandomized(float weight)
74 f = floor(random() + DistributeEvenly_amount * weight / DistributeEvenly_totalweight);
75 DistributeEvenly_totalweight -= weight;
76 DistributeEvenly_amount -= f;
80 #define move_out_of_solid(e) WarpZoneLib_MoveOutOfSolid(e)
82 const string STR_PLAYER = "player";
83 const string STR_SPECTATOR = "spectator";
84 const string STR_OBSERVER = "observer";
86 #define IS_PLAYER(v) (v.classname == STR_PLAYER)
87 #define IS_SPEC(v) (v.classname == STR_SPECTATOR)
88 #define IS_OBSERVER(v) (v.classname == STR_OBSERVER)
89 #define IS_CLIENT(v) (v.flags & FL_CLIENT)
90 #define IS_BOT_CLIENT(v) (clienttype(v) == CLIENTTYPE_BOT)
91 #define IS_REAL_CLIENT(v) (clienttype(v) == CLIENTTYPE_REAL)
92 #define IS_NOT_A_CLIENT(v) (clienttype(v) == CLIENTTYPE_NOTACLIENT)
94 #define FOR_EACH_CLIENTSLOT(v) for(v = world; (v = nextent(v)) && (num_for_edict(v) <= maxclients); )
95 #define FOR_EACH_CLIENT(v) FOR_EACH_CLIENTSLOT(v) if(IS_CLIENT(v))
96 #define FOR_EACH_REALCLIENT(v) FOR_EACH_CLIENT(v) if(IS_REAL_CLIENT(v))
98 #define FOR_EACH_PLAYER(v) FOR_EACH_CLIENT(v) if(IS_PLAYER(v))
99 #define FOR_EACH_SPEC(v) FOR_EACH_CLIENT(v) if (!IS_PLAYER(v)) // Samual: shouldn't this be IS_SPEC(v)? and rather create a separate macro to include observers too
100 #define FOR_EACH_REALPLAYER(v) FOR_EACH_REALCLIENT(v) if(IS_PLAYER(v))
102 #define FOR_EACH_MONSTER(v) for(v = world; (v = findflags(v, flags, FL_MONSTER)) != world; )
104 #define CENTER_OR_VIEWOFS(ent) (ent.origin + (IS_PLAYER(ent) ? ent.view_ofs : ((ent.mins + ent.maxs) * 0.5)))
106 // copies a string to a tempstring (so one can strunzone it)
107 string strcat1(string s) = #115; // FRIK_FILE
112 void GameLogEcho(string s)
117 if (autocvar_sv_eventlog_files)
122 matches = autocvar_sv_eventlog_files_counter + 1;
123 cvar_set("sv_eventlog_files_counter", ftos(matches));
126 fn = strcat(substring("00000000", 0, 8 - strlen(fn)), fn);
127 fn = strcat(autocvar_sv_eventlog_files_nameprefix, fn, autocvar_sv_eventlog_files_namesuffix);
128 logfile = fopen(fn, FILE_APPEND);
129 fputs(logfile, ":logversion:3\n");
133 if (autocvar_sv_eventlog_files_timestamps)
134 fputs(logfile, strcat(":time:", strftime(TRUE, "%Y-%m-%d %H:%M:%S", "\n", s, "\n")));
136 fputs(logfile, strcat(s, "\n"));
139 if (autocvar_sv_eventlog_console)
148 // will be opened later
153 if (logfile_open && logfile >= 0)
160 #define strstr strstrofs
162 // NOTE: DO NOT USE THIS FUNCTION TOO OFTEN.
163 // IT WILL MOST PROBABLY DESTROY _ALL_ OTHER TEMP
164 // STRINGS AND TAKE QUITE LONG. haystack and needle MUST
165 // BE CONSTANT OR strzoneD!
166 float strstr(string haystack, string needle, float offset)
170 len = strlen(needle);
171 endpos = strlen(haystack) - len;
172 while(offset <= endpos)
174 found = substring(haystack, offset, len);
183 const float NUM_NEAREST_ENTITIES = 4;
184 entity nearest_entity[NUM_NEAREST_ENTITIES];
185 float nearest_length[NUM_NEAREST_ENTITIES];
186 entity findnearest(vector point, .string field, string value, vector axismod)
197 localhead = find(world, field, value);
200 if ((localhead.items == IT_KEY1 || localhead.items == IT_KEY2) && localhead.target == "###item###")
201 dist = localhead.oldorigin;
203 dist = localhead.origin;
205 dist = dist_x * axismod_x * '1 0 0' + dist_y * axismod_y * '0 1 0' + dist_z * axismod_z * '0 0 1';
208 for (i = 0; i < num_nearest; ++i)
210 if (len < nearest_length[i])
214 // now i tells us where to insert at
215 // INSERTION SORT! YOU'VE SEEN IT! RUN!
216 if (i < NUM_NEAREST_ENTITIES)
218 for (j = NUM_NEAREST_ENTITIES - 1; j >= i; --j)
220 nearest_length[j + 1] = nearest_length[j];
221 nearest_entity[j + 1] = nearest_entity[j];
223 nearest_length[i] = len;
224 nearest_entity[i] = localhead;
225 if (num_nearest < NUM_NEAREST_ENTITIES)
226 num_nearest = num_nearest + 1;
229 localhead = find(localhead, field, value);
232 // now use the first one from our list that we can see
233 for (i = 0; i < num_nearest; ++i)
235 traceline(point, nearest_entity[i].origin, TRUE, world);
236 if (trace_fraction == 1)
240 dprint("Nearest point (");
241 dprint(nearest_entity[0].netname);
242 dprint(") is not visible, using a visible one.\n");
244 return nearest_entity[i];
248 if (num_nearest == 0)
251 dprint("Not seeing any location point, using nearest as fallback.\n");
253 dprint("Candidates were: ");
254 for(j = 0; j < num_nearest; ++j)
258 dprint(nearest_entity[j].netname);
263 return nearest_entity[0];
266 void spawnfunc_target_location()
268 self.classname = "target_location";
269 // location name in netname
270 // eventually support: count, teamgame selectors, line of sight?
273 void spawnfunc_info_location()
275 self.classname = "target_location";
276 self.message = self.netname;
279 string NearestLocation(vector p)
284 loc = findnearest(p, classname, "target_location", '1 1 1');
291 loc = findnearest(p, target, "###item###", '1 1 4');
298 string formatmessage(string msg)
309 WarpZone_crosshair_trace(self);
310 cursor = trace_endpos;
311 cursor_ent = trace_ent;
315 break; // too many replacements
318 p1 = strstr(msg, "%", p); // NOTE: this destroys msg as it's a tempstring!
319 p2 = strstr(msg, "\\", p); // NOTE: this destroys msg as it's a tempstring!
332 replacement = substring(msg, p, 2);
333 escape = substring(msg, p + 1, 1);
337 else if (escape == "\\")
339 else if (escape == "n")
341 else if (escape == "a")
342 replacement = ftos(floor(self.armorvalue));
343 else if (escape == "h")
344 replacement = ftos(floor(self.health));
345 else if (escape == "l")
346 replacement = NearestLocation(self.origin);
347 else if (escape == "y")
348 replacement = NearestLocation(cursor);
349 else if (escape == "d")
350 replacement = NearestLocation(self.death_origin);
351 else if (escape == "w") {
355 wep = self.switchweapon;
358 replacement = WEP_NAME(wep);
359 } else if (escape == "W") {
360 if (self.items & IT_SHELLS) replacement = "shells";
361 else if (self.items & IT_NAILS) replacement = "bullets";
362 else if (self.items & IT_ROCKETS) replacement = "rockets";
363 else if (self.items & IT_CELLS) replacement = "cells";
364 else if (self.items & IT_PLASMA) replacement = "plasma";
365 else replacement = "batteries"; // ;)
366 } else if (escape == "x") {
367 replacement = cursor_ent.netname;
368 if (replacement == "" || !cursor_ent)
369 replacement = "nothing";
370 } else if (escape == "s")
371 replacement = ftos(vlen(self.velocity - self.velocity_z * '0 0 1'));
372 else if (escape == "S")
373 replacement = ftos(vlen(self.velocity));
375 msg = strcat(substring(msg, 0, p), replacement, substring(msg, p+2, strlen(msg) - (p+2)));
376 p = p + strlen(replacement);
381 float boolean(float value) { // if value is 0 return FALSE (0), otherwise return TRUE (1)
382 return (value == 0) ? FALSE : TRUE;
391 >0: receives a cvar from name=argv(f) value=argv(f+1)
393 void GetCvars_handleString(string thisname, float f, .string field, string name)
398 strunzone(self.field);
399 self.field = string_null;
403 if (thisname == name)
406 strunzone(self.field);
407 self.field = strzone(argv(f + 1));
411 stuffcmd(self, strcat("cl_cmd sendcvar ", name, "\n"));
413 void GetCvars_handleString_Fixup(string thisname, float f, .string field, string name, string(string) func)
415 GetCvars_handleString(thisname, f, field, name);
416 if (f >= 0) // also initialize to the fitting value for "" when sending cvars out
417 if (thisname == name)
420 s = func(strcat1(self.field));
423 strunzone(self.field);
424 self.field = strzone(s);
428 void GetCvars_handleFloat(string thisname, float f, .float field, string name)
435 if (thisname == name)
436 self.field = stof(argv(f + 1));
439 stuffcmd(self, strcat("cl_cmd sendcvar ", name, "\n"));
441 void GetCvars_handleFloatOnce(string thisname, float f, .float field, string name)
448 if (thisname == name)
452 self.field = stof(argv(f + 1));
461 stuffcmd(self, strcat("cl_cmd sendcvar ", name, "\n"));
464 string W_FixWeaponOrder_ForceComplete_AndBuildImpulseList(string wo)
467 o = W_FixWeaponOrder_ForceComplete(wo);
468 if(self.weaponorder_byimpulse)
470 strunzone(self.weaponorder_byimpulse);
471 self.weaponorder_byimpulse = string_null;
473 self.weaponorder_byimpulse = strzone(W_FixWeaponOrder_BuildImpulseList(o));
476 void GetCvars(float f)
478 string s = string_null;
481 s = strcat1(argv(f));
486 MUTATOR_CALLHOOK(GetCvars);
488 Notification_GetCvars();
490 GetCvars_handleFloat(s, f, autoswitch, "cl_autoswitch");
491 GetCvars_handleFloat(s, f, cvar_cl_autoscreenshot, "cl_autoscreenshot");
492 GetCvars_handleFloat(s, f, cvar_cl_jetpack_jump, "cl_jetpack_jump");
493 GetCvars_handleString(s, f, cvar_g_xonoticversion, "g_xonoticversion");
494 GetCvars_handleString(s, f, cvar_cl_physics, "cl_physics");
495 GetCvars_handleFloat(s, f, cvar_cl_handicap, "cl_handicap");
496 GetCvars_handleFloat(s, f, cvar_cl_clippedspectating, "cl_clippedspectating");
497 GetCvars_handleString_Fixup(s, f, cvar_cl_weaponpriority, "cl_weaponpriority", W_FixWeaponOrder_ForceComplete_AndBuildImpulseList);
498 GetCvars_handleString_Fixup(s, f, cvar_cl_weaponpriorities[0], "cl_weaponpriority0", W_FixWeaponOrder_AllowIncomplete);
499 GetCvars_handleString_Fixup(s, f, cvar_cl_weaponpriorities[1], "cl_weaponpriority1", W_FixWeaponOrder_AllowIncomplete);
500 GetCvars_handleString_Fixup(s, f, cvar_cl_weaponpriorities[2], "cl_weaponpriority2", W_FixWeaponOrder_AllowIncomplete);
501 GetCvars_handleString_Fixup(s, f, cvar_cl_weaponpriorities[3], "cl_weaponpriority3", W_FixWeaponOrder_AllowIncomplete);
502 GetCvars_handleString_Fixup(s, f, cvar_cl_weaponpriorities[4], "cl_weaponpriority4", W_FixWeaponOrder_AllowIncomplete);
503 GetCvars_handleString_Fixup(s, f, cvar_cl_weaponpriorities[5], "cl_weaponpriority5", W_FixWeaponOrder_AllowIncomplete);
504 GetCvars_handleString_Fixup(s, f, cvar_cl_weaponpriorities[6], "cl_weaponpriority6", W_FixWeaponOrder_AllowIncomplete);
505 GetCvars_handleString_Fixup(s, f, cvar_cl_weaponpriorities[7], "cl_weaponpriority7", W_FixWeaponOrder_AllowIncomplete);
506 GetCvars_handleString_Fixup(s, f, cvar_cl_weaponpriorities[8], "cl_weaponpriority8", W_FixWeaponOrder_AllowIncomplete);
507 GetCvars_handleString_Fixup(s, f, cvar_cl_weaponpriorities[9], "cl_weaponpriority9", W_FixWeaponOrder_AllowIncomplete);
508 GetCvars_handleFloat(s, f, cvar_cl_weaponimpulsemode, "cl_weaponimpulsemode");
509 GetCvars_handleFloat(s, f, cvar_cl_autotaunt, "cl_autotaunt");
510 GetCvars_handleFloat(s, f, cvar_cl_noantilag, "cl_noantilag");
511 GetCvars_handleFloat(s, f, cvar_cl_voice_directional, "cl_voice_directional");
512 GetCvars_handleFloat(s, f, cvar_cl_voice_directional_taunt_attenuation, "cl_voice_directional_taunt_attenuation");
513 GetCvars_handleFloat(s, f, cvar_cl_accuracy_data_share, "cl_accuracy_data_share");
514 GetCvars_handleFloat(s, f, cvar_cl_accuracy_data_receive, "cl_accuracy_data_receive");
516 self.cvar_cl_accuracy_data_share = boolean(self.cvar_cl_accuracy_data_share);
517 self.cvar_cl_accuracy_data_receive = boolean(self.cvar_cl_accuracy_data_receive);
519 GetCvars_handleFloatOnce(s, f, cvar_cl_gunalign, "cl_gunalign");
520 GetCvars_handleFloat(s, f, cvar_cl_allow_uid2name, "cl_allow_uid2name");
521 GetCvars_handleFloat(s, f, cvar_cl_allow_uidtracking, "cl_allow_uidtracking");
522 GetCvars_handleFloat(s, f, cvar_cl_movement_track_canjump, "cl_movement_track_canjump");
523 GetCvars_handleFloat(s, f, cvar_cl_newusekeysupported, "cl_newusekeysupported");
525 // fixup of switchweapon (needed for LMS or when spectating is disabled, as PutClientInServer comes too early)
528 if (s == "cl_weaponpriority")
529 self.switchweapon = w_getbestweapon(self);
530 if (s == "cl_allow_uidtracking")
531 PlayerStats_GameReport_AddPlayer(self);
535 // decolorizes and team colors the player name when needed
536 string playername(entity p)
539 if (teamplay && !intermission_running && IS_PLAYER(p))
541 t = Team_ColorCode(p.team);
542 return strcat(t, strdecolorize(p.netname));
548 vector randompos(vector m1, vector m2)
552 v_x = m2_x * random() + m1_x;
553 v_y = m2_y * random() + m1_y;
554 v_z = m2_z * random() + m1_z;
558 //#NO AUTOCVARS START
560 float g_pickup_shells;
561 float g_pickup_shells_max;
562 float g_pickup_nails;
563 float g_pickup_nails_max;
564 float g_pickup_rockets;
565 float g_pickup_rockets_max;
566 float g_pickup_cells;
567 float g_pickup_cells_max;
568 float g_pickup_plasma;
569 float g_pickup_plasma_max;
571 float g_pickup_fuel_jetpack;
572 float g_pickup_fuel_max;
573 float g_pickup_armorsmall;
574 float g_pickup_armorsmall_max;
575 float g_pickup_armorsmall_anyway;
576 float g_pickup_armormedium;
577 float g_pickup_armormedium_max;
578 float g_pickup_armormedium_anyway;
579 float g_pickup_armorbig;
580 float g_pickup_armorbig_max;
581 float g_pickup_armorbig_anyway;
582 float g_pickup_armorlarge;
583 float g_pickup_armorlarge_max;
584 float g_pickup_armorlarge_anyway;
585 float g_pickup_healthsmall;
586 float g_pickup_healthsmall_max;
587 float g_pickup_healthsmall_anyway;
588 float g_pickup_healthmedium;
589 float g_pickup_healthmedium_max;
590 float g_pickup_healthmedium_anyway;
591 float g_pickup_healthlarge;
592 float g_pickup_healthlarge_max;
593 float g_pickup_healthlarge_anyway;
594 float g_pickup_healthmega;
595 float g_pickup_healthmega_max;
596 float g_pickup_healthmega_anyway;
597 float g_pickup_ammo_anyway;
598 float g_pickup_weapons_anyway;
600 WepSet g_weaponarena_weapons;
601 float g_weaponarena_random;
602 float g_weaponarena_random_with_blaster;
603 string g_weaponarena_list;
604 float g_weaponspeedfactor;
605 float g_weaponratefactor;
606 float g_weapondamagefactor;
607 float g_weaponforcefactor;
608 float g_weaponspreadfactor;
610 WepSet start_weapons;
611 WepSet start_weapons_default;
612 WepSet start_weapons_defaultmask;
614 float start_ammo_shells;
615 float start_ammo_nails;
616 float start_ammo_rockets;
617 float start_ammo_cells;
618 float start_ammo_plasma;
619 float start_ammo_fuel;
621 float start_armorvalue;
622 WepSet warmup_start_weapons;
623 WepSet warmup_start_weapons_default;
624 WepSet warmup_start_weapons_defaultmask;
625 #define WARMUP_START_WEAPONS ((g_warmup_allguns == 1) ? (warmup_start_weapons & (weaponsInMap | start_weapons)) : warmup_start_weapons)
626 float warmup_start_ammo_shells;
627 float warmup_start_ammo_nails;
628 float warmup_start_ammo_rockets;
629 float warmup_start_ammo_cells;
630 float warmup_start_ammo_plasma;
631 float warmup_start_ammo_fuel;
632 float warmup_start_health;
633 float warmup_start_armorvalue;
636 float want_weapon(entity weaponinfo, float allguns) // WEAPONTODO: what still needs done?
638 var float i = weaponinfo.weapon;
644 if (g_lms || g_ca || allguns)
646 if(weaponinfo.spawnflags & WEP_FLAG_NORMAL)
652 d = (i == WEP_SHOTGUN);
654 d = 0; // weapon is set a few lines later
656 d = !(!weaponinfo.weaponstart);
658 if(g_grappling_hook) // if possible, redirect off-hand hook to on-hand hook
659 d |= (i == WEP_HOOK);
660 if(!g_cts && (weaponinfo.spawnflags & WEP_FLAG_MUTATORBLOCKED)) // never default mutator blocked guns
663 var float t = weaponinfo.weaponstartoverride;
665 //print(strcat("want_weapon: ", weaponinfo.netname, " - d: ", ftos(d), ", t: ", ftos(t), ". \n"));
670 // 4: is set by default?
679 void readplayerstartcvars()
685 // initialize starting values for players
686 start_weapons = '0 0 0';
687 start_weapons_default = '0 0 0';
688 start_weapons_defaultmask = '0 0 0';
690 start_ammo_shells = 0;
691 start_ammo_nails = 0;
692 start_ammo_rockets = 0;
693 start_ammo_cells = 0;
694 start_ammo_plasma = 0;
695 start_health = cvar("g_balance_health_start");
696 start_armorvalue = cvar("g_balance_armor_start");
699 g_weaponarena_weapons = '0 0 0';
701 s = cvar_string("g_weaponarena");
702 if (s == "0" || s == "")
708 if (s == "0" || s == "")
714 // forcibly turn off weaponarena
716 else if (s == "all" || s == "1")
719 g_weaponarena_list = "All Weapons";
720 for (j = WEP_FIRST; j <= WEP_LAST; ++j)
722 e = get_weaponinfo(j);
723 if (!(e.spawnflags & WEP_FLAG_MUTATORBLOCKED))
724 g_weaponarena_weapons |= WepSet_FromWeapon(j);
727 else if (s == "most")
730 g_weaponarena_list = "Most Weapons";
731 for (j = WEP_FIRST; j <= WEP_LAST; ++j)
733 e = get_weaponinfo(j);
734 if (!(e.spawnflags & WEP_FLAG_MUTATORBLOCKED))
735 if (e.spawnflags & WEP_FLAG_NORMAL)
736 g_weaponarena_weapons |= WepSet_FromWeapon(j);
739 else if (s == "none")
742 g_weaponarena_list = "No Weapons";
747 t = tokenize_console(s);
748 g_weaponarena_list = "";
749 for (i = 0; i < t; ++i)
752 for (j = WEP_FIRST; j <= WEP_LAST; ++j)
754 e = get_weaponinfo(j);
757 g_weaponarena_weapons |= WepSet_FromWeapon(j);
758 g_weaponarena_list = strcat(g_weaponarena_list, e.message, " & ");
764 print("The weapon mutator list contains an unknown weapon ", s, ". Skipped.\n");
767 g_weaponarena_list = strzone(substring(g_weaponarena_list, 0, strlen(g_weaponarena_list) - 3));
771 g_weaponarena_random = cvar("g_weaponarena_random");
773 g_weaponarena_random = 0;
774 g_weaponarena_random_with_blaster = cvar("g_weaponarena_random_with_blaster");
778 g_weapon_stay = 0; // incompatible
779 start_weapons = g_weaponarena_weapons;
780 start_items |= IT_UNLIMITED_AMMO;
784 for (i = WEP_FIRST; i <= WEP_LAST; ++i)
786 e = get_weaponinfo(i);
787 float w = want_weapon(e, FALSE);
789 start_weapons |= WepSet_FromWeapon(i);
791 start_weapons_default |= WepSet_FromWeapon(i);
793 start_weapons_defaultmask |= WepSet_FromWeapon(i);
797 if(!cvar("g_use_ammunition"))
798 start_items |= IT_UNLIMITED_AMMO;
800 if(start_items & IT_UNLIMITED_WEAPON_AMMO)
802 start_ammo_shells = 999;
803 start_ammo_nails = 999;
804 start_ammo_rockets = 999;
805 start_ammo_cells = 999;
806 start_ammo_plasma = 999;
807 start_ammo_fuel = 999;
811 start_ammo_shells = cvar("g_start_ammo_shells");
812 start_ammo_nails = cvar("g_start_ammo_nails");
813 start_ammo_rockets = cvar("g_start_ammo_rockets");
814 start_ammo_cells = cvar("g_start_ammo_cells");
815 start_ammo_plasma = cvar("g_start_ammo_plasma");
816 start_ammo_fuel = cvar("g_start_ammo_fuel");
821 warmup_start_ammo_shells = start_ammo_shells;
822 warmup_start_ammo_nails = start_ammo_nails;
823 warmup_start_ammo_rockets = start_ammo_rockets;
824 warmup_start_ammo_cells = start_ammo_cells;
825 warmup_start_ammo_plasma = start_ammo_plasma;
826 warmup_start_ammo_fuel = start_ammo_fuel;
827 warmup_start_health = start_health;
828 warmup_start_armorvalue = start_armorvalue;
829 warmup_start_weapons = start_weapons;
830 warmup_start_weapons_default = start_weapons_default;
831 warmup_start_weapons_defaultmask = start_weapons_defaultmask;
833 if (!g_weaponarena && !g_ca)
835 warmup_start_ammo_shells = cvar("g_warmup_start_ammo_shells");
836 warmup_start_ammo_nails = cvar("g_warmup_start_ammo_nails");
837 warmup_start_ammo_rockets = cvar("g_warmup_start_ammo_rockets");
838 warmup_start_ammo_cells = cvar("g_warmup_start_ammo_cells");
839 warmup_start_ammo_plasma = cvar("g_warmup_start_ammo_plasma");
840 warmup_start_ammo_fuel = cvar("g_warmup_start_ammo_fuel");
841 warmup_start_health = cvar("g_warmup_start_health");
842 warmup_start_armorvalue = cvar("g_warmup_start_armor");
843 warmup_start_weapons = '0 0 0';
844 warmup_start_weapons_default = '0 0 0';
845 warmup_start_weapons_defaultmask = '0 0 0';
846 for (i = WEP_FIRST; i <= WEP_LAST; ++i)
848 e = get_weaponinfo(i);
849 float w = want_weapon(e, g_warmup_allguns);
851 warmup_start_weapons |= WepSet_FromWeapon(i);
853 warmup_start_weapons_default |= WepSet_FromWeapon(i);
855 warmup_start_weapons_defaultmask |= WepSet_FromWeapon(i);
861 start_items |= IT_JETPACK;
863 MUTATOR_CALLHOOK(SetStartItems);
865 if ((start_items & IT_JETPACK) || (g_grappling_hook && (start_weapons & WEPSET_HOOK)))
867 start_items |= IT_FUEL_REGEN;
868 start_ammo_fuel = max(start_ammo_fuel, cvar("g_balance_fuel_rotstable"));
869 warmup_start_ammo_fuel = max(warmup_start_ammo_fuel, cvar("g_balance_fuel_rotstable"));
872 WepSet precache_weapons = start_weapons;
873 if (g_warmup_allguns != 1)
874 precache_weapons |= warmup_start_weapons;
875 for (i = WEP_FIRST; i <= WEP_LAST; ++i)
877 e = get_weaponinfo(i);
878 if(precache_weapons & WepSet_FromWeapon(i))
879 WEP_ACTION(i, WR_INIT);
882 start_ammo_shells = max(0, start_ammo_shells);
883 start_ammo_nails = max(0, start_ammo_nails);
884 start_ammo_rockets = max(0, start_ammo_rockets);
885 start_ammo_cells = max(0, start_ammo_cells);
886 start_ammo_plasma = max(0, start_ammo_plasma);
887 start_ammo_fuel = max(0, start_ammo_fuel);
889 warmup_start_ammo_shells = max(0, warmup_start_ammo_shells);
890 warmup_start_ammo_nails = max(0, warmup_start_ammo_nails);
891 warmup_start_ammo_rockets = max(0, warmup_start_ammo_rockets);
892 warmup_start_ammo_cells = max(0, warmup_start_ammo_cells);
893 warmup_start_ammo_plasma = max(0, warmup_start_ammo_plasma);
894 warmup_start_ammo_fuel = max(0, warmup_start_ammo_fuel);
898 float g_bugrigs_planar_movement;
899 float g_bugrigs_planar_movement_car_jumping;
900 float g_bugrigs_reverse_spinning;
901 float g_bugrigs_reverse_speeding;
902 float g_bugrigs_reverse_stopping;
903 float g_bugrigs_air_steering;
904 float g_bugrigs_angle_smoothing;
905 float g_bugrigs_friction_floor;
906 float g_bugrigs_friction_brake;
907 float g_bugrigs_friction_air;
908 float g_bugrigs_accel;
909 float g_bugrigs_speed_ref;
910 float g_bugrigs_speed_pow;
911 float g_bugrigs_steer;
916 string GetGametype(); // g_world.qc
917 void mutators_add(); // mutators.qc
918 void readlevelcvars(void)
923 if(cvar("sv_allow_fullbright"))
924 serverflags |= SERVERFLAG_ALLOW_FULLBRIGHT;
926 g_bugrigs = cvar("g_bugrigs");
927 g_bugrigs_planar_movement = cvar("g_bugrigs_planar_movement");
928 g_bugrigs_planar_movement_car_jumping = cvar("g_bugrigs_planar_movement_car_jumping");
929 g_bugrigs_reverse_spinning = cvar("g_bugrigs_reverse_spinning");
930 g_bugrigs_reverse_speeding = cvar("g_bugrigs_reverse_speeding");
931 g_bugrigs_reverse_stopping = cvar("g_bugrigs_reverse_stopping");
932 g_bugrigs_air_steering = cvar("g_bugrigs_air_steering");
933 g_bugrigs_angle_smoothing = cvar("g_bugrigs_angle_smoothing");
934 g_bugrigs_friction_floor = cvar("g_bugrigs_friction_floor");
935 g_bugrigs_friction_brake = cvar("g_bugrigs_friction_brake");
936 g_bugrigs_friction_air = cvar("g_bugrigs_friction_air");
937 g_bugrigs_accel = cvar("g_bugrigs_accel");
938 g_bugrigs_speed_ref = cvar("g_bugrigs_speed_ref");
939 g_bugrigs_speed_pow = cvar("g_bugrigs_speed_pow");
940 g_bugrigs_steer = cvar("g_bugrigs_steer");
942 g_instagib = cvar("g_instagib");
944 sv_clones = cvar("sv_clones");
945 sv_foginterval = cvar("sv_foginterval");
946 g_cloaked = cvar("g_cloaked");
947 g_footsteps = cvar("g_footsteps");
948 g_grappling_hook = cvar("g_grappling_hook");
949 g_jetpack = cvar("g_jetpack");
950 sv_maxidle = cvar("sv_maxidle");
951 sv_maxidle_spectatorsareidle = cvar("sv_maxidle_spectatorsareidle");
952 sv_autotaunt = cvar("sv_autotaunt");
953 sv_taunt = cvar("sv_taunt");
955 warmup_stage = cvar("g_warmup");
956 g_warmup_limit = cvar("g_warmup_limit");
957 g_warmup_allguns = cvar("g_warmup_allguns");
958 g_warmup_allow_timeout = cvar("g_warmup_allow_timeout");
960 if ((g_race && g_race_qualifying == 2) || g_assault || cvar("g_campaign"))
961 warmup_stage = 0; // these modes cannot work together, sorry
963 g_pickup_respawntime_weapon = cvar("g_pickup_respawntime_weapon");
964 g_pickup_respawntime_superweapon = cvar("g_pickup_respawntime_superweapon");
965 g_pickup_respawntime_ammo = cvar("g_pickup_respawntime_ammo");
966 g_pickup_respawntime_short = cvar("g_pickup_respawntime_short");
967 g_pickup_respawntime_medium = cvar("g_pickup_respawntime_medium");
968 g_pickup_respawntime_long = cvar("g_pickup_respawntime_long");
969 g_pickup_respawntime_powerup = cvar("g_pickup_respawntime_powerup");
970 g_pickup_respawntimejitter_weapon = cvar("g_pickup_respawntimejitter_weapon");
971 g_pickup_respawntimejitter_superweapon = cvar("g_pickup_respawntimejitter_superweapon");
972 g_pickup_respawntimejitter_ammo = cvar("g_pickup_respawntimejitter_ammo");
973 g_pickup_respawntimejitter_short = cvar("g_pickup_respawntimejitter_short");
974 g_pickup_respawntimejitter_medium = cvar("g_pickup_respawntimejitter_medium");
975 g_pickup_respawntimejitter_long = cvar("g_pickup_respawntimejitter_long");
976 g_pickup_respawntimejitter_powerup = cvar("g_pickup_respawntimejitter_powerup");
978 g_weaponspeedfactor = cvar("g_weaponspeedfactor");
979 g_weaponratefactor = cvar("g_weaponratefactor");
980 g_weapondamagefactor = cvar("g_weapondamagefactor");
981 g_weaponforcefactor = cvar("g_weaponforcefactor");
982 g_weaponspreadfactor = cvar("g_weaponspreadfactor");
984 g_pickup_shells = cvar("g_pickup_shells");
985 g_pickup_shells_max = cvar("g_pickup_shells_max");
986 g_pickup_nails = cvar("g_pickup_nails");
987 g_pickup_nails_max = cvar("g_pickup_nails_max");
988 g_pickup_rockets = cvar("g_pickup_rockets");
989 g_pickup_rockets_max = cvar("g_pickup_rockets_max");
990 g_pickup_cells = cvar("g_pickup_cells");
991 g_pickup_cells_max = cvar("g_pickup_cells_max");
992 g_pickup_plasma = cvar("g_pickup_plasma");
993 g_pickup_plasma_max = cvar("g_pickup_plasma_max");
994 g_pickup_fuel = cvar("g_pickup_fuel");
995 g_pickup_fuel_jetpack = cvar("g_pickup_fuel_jetpack");
996 g_pickup_fuel_max = cvar("g_pickup_fuel_max");
997 g_pickup_armorsmall = cvar("g_pickup_armorsmall");
998 g_pickup_armorsmall_max = cvar("g_pickup_armorsmall_max");
999 g_pickup_armorsmall_anyway = cvar("g_pickup_armorsmall_anyway");
1000 g_pickup_armormedium = cvar("g_pickup_armormedium");
1001 g_pickup_armormedium_max = cvar("g_pickup_armormedium_max");
1002 g_pickup_armormedium_anyway = cvar("g_pickup_armormedium_anyway");
1003 g_pickup_armorbig = cvar("g_pickup_armorbig");
1004 g_pickup_armorbig_max = cvar("g_pickup_armorbig_max");
1005 g_pickup_armorbig_anyway = cvar("g_pickup_armorbig_anyway");
1006 g_pickup_armorlarge = cvar("g_pickup_armorlarge");
1007 g_pickup_armorlarge_max = cvar("g_pickup_armorlarge_max");
1008 g_pickup_armorlarge_anyway = cvar("g_pickup_armorlarge_anyway");
1009 g_pickup_healthsmall = cvar("g_pickup_healthsmall");
1010 g_pickup_healthsmall_max = cvar("g_pickup_healthsmall_max");
1011 g_pickup_healthsmall_anyway = cvar("g_pickup_healthsmall_anyway");
1012 g_pickup_healthmedium = cvar("g_pickup_healthmedium");
1013 g_pickup_healthmedium_max = cvar("g_pickup_healthmedium_max");
1014 g_pickup_healthmedium_anyway = cvar("g_pickup_healthmedium_anyway");
1015 g_pickup_healthlarge = cvar("g_pickup_healthlarge");
1016 g_pickup_healthlarge_max = cvar("g_pickup_healthlarge_max");
1017 g_pickup_healthlarge_anyway = cvar("g_pickup_healthlarge_anyway");
1018 g_pickup_healthmega = cvar("g_pickup_healthmega");
1019 g_pickup_healthmega_max = cvar("g_pickup_healthmega_max");
1020 g_pickup_healthmega_anyway = cvar("g_pickup_healthmega_anyway");
1022 g_pickup_ammo_anyway = cvar("g_pickup_ammo_anyway");
1023 g_pickup_weapons_anyway = cvar("g_pickup_weapons_anyway");
1025 g_weapon_stay = cvar(strcat("g_", GetGametype(), "_weapon_stay"));
1027 g_weapon_stay = cvar("g_weapon_stay");
1030 game_starttime = time + cvar("g_start_delay");
1032 readplayerstartcvars();
1038 string precache_sound (string s) = #19;
1039 float precache_sound_index (string s) = #19;
1041 #define SND_VOLUME 1
1042 #define SND_ATTENUATION 2
1043 #define SND_LARGEENTITY 8
1044 #define SND_LARGESOUND 16
1046 float sound_allowed(float dest, entity e)
1048 // sounds from world may always pass
1051 if (e.classname == "body")
1053 else if (e.realowner && e.realowner != e)
1055 else if (e.owner && e.owner != e)
1060 // sounds to self may always pass
1061 if (dest == MSG_ONE)
1062 if (e == msg_entity)
1064 // sounds by players can be removed
1065 if (autocvar_bot_sound_monopoly)
1066 if (IS_REAL_CLIENT(e))
1068 // anything else may pass
1073 void sound(entity e, float chan, string samp, float vol, float atten)
1075 if (!sound_allowed(MSG_BROADCAST, e))
1077 sound7(e, chan, samp, vol, atten, 0, 0);
1080 void soundtoat(float dest, entity e, vector o, float chan, string samp, float vol, float atten)
1084 if (!sound_allowed(dest, e))
1087 entno = num_for_edict(e);
1088 idx = precache_sound_index(samp);
1093 atten = floor(atten * 64);
1094 vol = floor(vol * 255);
1097 sflags |= SND_VOLUME;
1099 sflags |= SND_ATTENUATION;
1100 if (entno >= 8192 || chan < 0 || chan > 7)
1101 sflags |= SND_LARGEENTITY;
1103 sflags |= SND_LARGESOUND;
1105 WriteByte(dest, SVC_SOUND);
1106 WriteByte(dest, sflags);
1107 if (sflags & SND_VOLUME)
1108 WriteByte(dest, vol);
1109 if (sflags & SND_ATTENUATION)
1110 WriteByte(dest, atten);
1111 if (sflags & SND_LARGEENTITY)
1113 WriteShort(dest, entno);
1114 WriteByte(dest, chan);
1118 WriteShort(dest, entno * 8 + chan);
1120 if (sflags & SND_LARGESOUND)
1121 WriteShort(dest, idx);
1123 WriteByte(dest, idx);
1125 WriteCoord(dest, o_x);
1126 WriteCoord(dest, o_y);
1127 WriteCoord(dest, o_z);
1129 void soundto(float dest, entity e, float chan, string samp, float vol, float atten)
1133 if (!sound_allowed(dest, e))
1136 o = e.origin + 0.5 * (e.mins + e.maxs);
1137 soundtoat(dest, e, o, chan, samp, vol, atten);
1139 void soundat(entity e, vector o, float chan, string samp, float vol, float atten)
1141 soundtoat(((chan & 8) ? MSG_ALL : MSG_BROADCAST), e, o, chan, samp, vol, atten);
1143 void stopsoundto(float dest, entity e, float chan)
1147 if (!sound_allowed(dest, e))
1150 entno = num_for_edict(e);
1152 if (entno >= 8192 || chan < 0 || chan > 7)
1155 idx = precache_sound_index("misc/null.wav");
1156 sflags = SND_LARGEENTITY;
1158 sflags |= SND_LARGESOUND;
1159 WriteByte(dest, SVC_SOUND);
1160 WriteByte(dest, sflags);
1161 WriteShort(dest, entno);
1162 WriteByte(dest, chan);
1163 if (sflags & SND_LARGESOUND)
1164 WriteShort(dest, idx);
1166 WriteByte(dest, idx);
1167 WriteCoord(dest, e.origin_x);
1168 WriteCoord(dest, e.origin_y);
1169 WriteCoord(dest, e.origin_z);
1173 WriteByte(dest, SVC_STOPSOUND);
1174 WriteShort(dest, entno * 8 + chan);
1177 void stopsound(entity e, float chan)
1179 if (!sound_allowed(MSG_BROADCAST, e))
1182 stopsoundto(MSG_BROADCAST, e, chan); // unreliable, gets there fast
1183 stopsoundto(MSG_ALL, e, chan); // in case of packet loss
1186 void play2(entity e, string filename)
1188 //stuffcmd(e, strcat("play2 ", filename, "\n"));
1190 soundtoat(MSG_ONE, world, '0 0 0', CH_INFO, filename, VOL_BASE, ATTEN_NONE);
1193 // use this one if you might be causing spam (e.g. from touch functions that might get called more than once per frame)
1195 float spamsound(entity e, float chan, string samp, float vol, float atten)
1197 if (!sound_allowed(MSG_BROADCAST, e))
1200 if (time > e.spamtime)
1203 sound(e, chan, samp, vol, atten);
1209 void play2team(float t, string filename)
1213 if (autocvar_bot_sound_monopoly)
1216 FOR_EACH_REALPLAYER(head)
1219 play2(head, filename);
1223 void play2all(string samp)
1225 if (autocvar_bot_sound_monopoly)
1228 sound(world, CH_INFO, samp, VOL_BASE, ATTEN_NONE);
1231 void PrecachePlayerSounds(string f);
1232 void precache_playermodel(string m)
1234 float globhandle, i, n;
1237 if(substring(m, -9,5) == "_lod1")
1239 if(substring(m, -9,5) == "_lod2")
1242 f = strcat(substring(m, 0, -5), "_lod1", substring(m, -4, -1));
1245 f = strcat(substring(m, 0, -5), "_lod2", substring(m, -4, -1));
1249 globhandle = search_begin(strcat(m, "_*.sounds"), TRUE, FALSE);
1252 n = search_getsize(globhandle);
1253 for (i = 0; i < n; ++i)
1255 //print(search_getfilename(globhandle, i), "\n");
1256 f = search_getfilename(globhandle, i);
1257 PrecachePlayerSounds(f);
1259 search_end(globhandle);
1261 void precache_all_playermodels(string pattern)
1263 float globhandle, i, n;
1266 globhandle = search_begin(pattern, TRUE, FALSE);
1269 n = search_getsize(globhandle);
1270 for (i = 0; i < n; ++i)
1272 //print(search_getfilename(globhandle, i), "\n");
1273 f = search_getfilename(globhandle, i);
1274 precache_playermodel(f);
1276 search_end(globhandle);
1281 // gamemode related things
1282 precache_model ("models/misc/chatbubble.spr");
1283 precache_model("models/ice/ice.md3");
1285 #ifdef TTURRETS_ENABLED
1286 if (autocvar_g_turrets)
1290 // Precache all player models if desired
1291 if (autocvar_sv_precacheplayermodels)
1293 PrecachePlayerSounds("sound/player/default.sounds");
1294 precache_all_playermodels("models/player/*.zym");
1295 precache_all_playermodels("models/player/*.dpm");
1296 precache_all_playermodels("models/player/*.md3");
1297 precache_all_playermodels("models/player/*.psk");
1298 precache_all_playermodels("models/player/*.iqm");
1301 if (autocvar_sv_defaultcharacter)
1304 s = autocvar_sv_defaultplayermodel_red;
1306 precache_playermodel(s);
1307 s = autocvar_sv_defaultplayermodel_blue;
1309 precache_playermodel(s);
1310 s = autocvar_sv_defaultplayermodel_yellow;
1312 precache_playermodel(s);
1313 s = autocvar_sv_defaultplayermodel_pink;
1315 precache_playermodel(s);
1316 s = autocvar_sv_defaultplayermodel;
1318 precache_playermodel(s);
1323 PrecacheGlobalSound((globalsound_step = "misc/footstep0 6"));
1324 PrecacheGlobalSound((globalsound_metalstep = "misc/metalfootstep0 6"));
1327 // gore and miscellaneous sounds
1328 //precache_sound ("misc/h2ohit.wav");
1329 precache_model ("models/hook.md3");
1330 precache_sound ("misc/armorimpact.wav");
1331 precache_sound ("misc/bodyimpact1.wav");
1332 precache_sound ("misc/bodyimpact2.wav");
1333 precache_sound ("misc/gib.wav");
1334 precache_sound ("misc/gib_splat01.wav");
1335 precache_sound ("misc/gib_splat02.wav");
1336 precache_sound ("misc/gib_splat03.wav");
1337 precache_sound ("misc/gib_splat04.wav");
1338 PrecacheGlobalSound((globalsound_fall = "misc/hitground 4"));
1339 PrecacheGlobalSound((globalsound_metalfall = "misc/metalhitground 4"));
1340 precache_sound ("misc/null.wav");
1341 precache_sound ("misc/spawn.wav");
1342 precache_sound ("misc/talk.wav");
1343 precache_sound ("misc/teleport.wav");
1344 precache_sound ("misc/poweroff.wav");
1345 precache_sound ("player/lava.wav");
1346 precache_sound ("player/slime.wav");
1348 precache_model ("models/sprites/0.spr32");
1349 precache_model ("models/sprites/1.spr32");
1350 precache_model ("models/sprites/2.spr32");
1351 precache_model ("models/sprites/3.spr32");
1352 precache_model ("models/sprites/4.spr32");
1353 precache_model ("models/sprites/5.spr32");
1354 precache_model ("models/sprites/6.spr32");
1355 precache_model ("models/sprites/7.spr32");
1356 precache_model ("models/sprites/8.spr32");
1357 precache_model ("models/sprites/9.spr32");
1358 precache_model ("models/sprites/10.spr32");
1360 // common weapon precaches
1361 precache_sound ("weapons/reload.wav"); // until weapons have individual reload sounds, precache the reload sound here
1362 precache_sound ("weapons/weapon_switch.wav");
1363 precache_sound ("weapons/weaponpickup.wav");
1364 precache_sound ("weapons/unavailable.wav");
1365 precache_sound ("weapons/dryfire.wav");
1366 if (g_grappling_hook)
1368 precache_sound ("weapons/hook_fire.wav"); // hook
1369 precache_sound ("weapons/hook_impact.wav"); // hook
1372 precache_model("models/elaser.mdl");
1373 precache_model("models/laser.mdl");
1374 precache_model("models/ebomb.mdl");
1377 // Disabled this code because it simply does not work (e.g. ignores bgmvolume, overlaps with "cd loop" controlled tracks).
1379 if (!self.noise && self.music) // quake 3 uses the music field
1380 self.noise = self.music;
1382 // plays music for the level if there is any
1385 precache_sound (self.noise);
1386 ambientsound ('0 0 0', self.noise, VOL_BASE, ATTEN_NONE);
1390 #include "precache-for-csqc.inc"
1393 // WARNING: this kills the trace globals
1394 #define EXACTTRIGGER_TOUCH if(WarpZoneLib_ExactTrigger_Touch()) return
1395 #define EXACTTRIGGER_INIT WarpZoneLib_ExactTrigger_Init()
1397 #define INITPRIO_FIRST 0
1398 #define INITPRIO_GAMETYPE 0
1399 #define INITPRIO_GAMETYPE_FALLBACK 1
1400 #define INITPRIO_FINDTARGET 10
1401 #define INITPRIO_DROPTOFLOOR 20
1402 #define INITPRIO_SETLOCATION 90
1403 #define INITPRIO_LINKDOORS 91
1404 #define INITPRIO_LAST 99
1406 .void(void) initialize_entity;
1407 .float initialize_entity_order;
1408 .entity initialize_entity_next;
1409 entity initialize_entity_first;
1411 void make_safe_for_remove(entity e)
1413 if (e.initialize_entity)
1415 entity ent, prev = world;
1416 for (ent = initialize_entity_first; ent; )
1418 if ((ent == e) || ((ent.classname == "initialize_entity") && (ent.enemy == e)))
1420 //print("make_safe_for_remove: getting rid of initializer ", etos(ent), "\n");
1421 // skip it in linked list
1424 prev.initialize_entity_next = ent.initialize_entity_next;
1425 ent = prev.initialize_entity_next;
1429 initialize_entity_first = ent.initialize_entity_next;
1430 ent = initialize_entity_first;
1436 ent = ent.initialize_entity_next;
1442 void objerror(string s)
1444 make_safe_for_remove(self);
1445 builtin_objerror(s);
1448 .float remove_except_protected_forbidden;
1449 void remove_except_protected(entity e)
1451 if(e.remove_except_protected_forbidden)
1452 error("not allowed to remove this at this point");
1456 void remove_unsafely(entity e)
1458 if(e.classname == "spike")
1459 error("Removing spikes is forbidden (crylink bug), please report");
1463 void remove_safely(entity e)
1465 make_safe_for_remove(e);
1469 void InitializeEntity(entity e, void(void) func, float order)
1473 if (!e || e.initialize_entity)
1475 // make a proxy initializer entity
1479 e.classname = "initialize_entity";
1483 e.initialize_entity = func;
1484 e.initialize_entity_order = order;
1486 cur = initialize_entity_first;
1490 if (!cur || cur.initialize_entity_order > order)
1492 // insert between prev and cur
1494 prev.initialize_entity_next = e;
1496 initialize_entity_first = e;
1497 e.initialize_entity_next = cur;
1501 cur = cur.initialize_entity_next;
1504 void InitializeEntitiesRun()
1507 startoflist = initialize_entity_first;
1508 initialize_entity_first = world;
1509 remove = remove_except_protected;
1510 for (self = startoflist; self; self = self.initialize_entity_next)
1512 self.remove_except_protected_forbidden = 1;
1514 for (self = startoflist; self; )
1517 var void(void) func;
1518 e = self.initialize_entity_next;
1519 func = self.initialize_entity;
1520 self.initialize_entity_order = 0;
1521 self.initialize_entity = func_null;
1522 self.initialize_entity_next = world;
1523 self.remove_except_protected_forbidden = 0;
1524 if (self.classname == "initialize_entity")
1528 builtin_remove(self);
1531 //dprint("Delayed initialization: ", self.classname, "\n");
1537 backtrace(strcat("Null function in: ", self.classname, "\n"));
1541 remove = remove_unsafely;
1544 .float uncustomizeentityforclient_set;
1545 .void(void) uncustomizeentityforclient;
1546 void UncustomizeEntitiesRun()
1550 for (self = world; (self = findfloat(self, uncustomizeentityforclient_set, 1)); )
1551 self.uncustomizeentityforclient();
1554 void SetCustomizer(entity e, float(void) customizer, void(void) uncustomizer)
1556 e.customizeentityforclient = customizer;
1557 e.uncustomizeentityforclient = uncustomizer;
1558 e.uncustomizeentityforclient_set = !!uncustomizer;
1562 #define IFTARGETED if(!self.nottargeted && self.targetname != "")
1565 void Net_LinkEntity(entity e, float docull, float dt, float(entity, float) sendfunc)
1569 if (e.classname == "")
1570 e.classname = "net_linked";
1572 if (e.model == "" || self.modelindex == 0)
1576 setmodel(e, "null");
1580 e.SendEntity = sendfunc;
1581 e.SendFlags = 0xFFFFFF;
1584 e.effects |= EF_NODEPTHTEST;
1588 e.nextthink = time + dt;
1589 e.think = SUB_Remove;
1594 entity eliminatedPlayers;
1595 .float(entity) isEliminated;
1596 float EliminatedPlayers_SendEntity(entity to, float sendflags)
1600 WriteByte(MSG_ENTITY, ENT_CLIENT_ELIMINATEDPLAYERS);
1601 WriteByte(MSG_ENTITY, sendflags);
1605 for(i = 1; i <= maxclients; i += 8)
1607 for(f = 0, e = edict_num(i), b = 1; b < 256; b *= 2, e = nextent(e))
1609 if(eliminatedPlayers.isEliminated(e))
1612 WriteByte(MSG_ENTITY, f);
1619 void EliminatedPlayers_Init(float(entity) isEliminated_func)
1621 if(eliminatedPlayers)
1623 backtrace("Can't spawn eliminatedPlayers again!");
1626 Net_LinkEntity(eliminatedPlayers = spawn(), FALSE, 0, EliminatedPlayers_SendEntity);
1627 eliminatedPlayers.isEliminated = isEliminated_func;
1631 void adaptor_think2touch()
1640 void adaptor_think2use()
1652 void adaptor_think2use_hittype_splash() // for timed projectile detonation
1654 if(!(self.flags & FL_ONGROUND)) // if onground, we ARE touching something, but HITTYPE_SPLASH is to be networked if the damage causing projectile is not touching ANYTHING
1655 self.projectiledeathtype |= HITTYPE_SPLASH;
1656 adaptor_think2use();
1659 // deferred dropping
1660 void DropToFloor_Handler()
1662 builtin_droptofloor();
1663 self.dropped_origin = self.origin;
1668 InitializeEntity(self, DropToFloor_Handler, INITPRIO_DROPTOFLOOR);
1673 float trace_hits_box_a0, trace_hits_box_a1;
1675 float trace_hits_box_1d(float end, float thmi, float thma)
1679 // just check if x is in range
1687 // do the trace with respect to x
1688 // 0 -> end has to stay in thmi -> thma
1689 trace_hits_box_a0 = max(trace_hits_box_a0, min(thmi / end, thma / end));
1690 trace_hits_box_a1 = min(trace_hits_box_a1, max(thmi / end, thma / end));
1691 if (trace_hits_box_a0 > trace_hits_box_a1)
1697 float trace_hits_box(vector start, vector end, vector thmi, vector thma)
1702 // now it is a trace from 0 to end
1704 trace_hits_box_a0 = 0;
1705 trace_hits_box_a1 = 1;
1707 if (!trace_hits_box_1d(end_x, thmi_x, thma_x))
1709 if (!trace_hits_box_1d(end_y, thmi_y, thma_y))
1711 if (!trace_hits_box_1d(end_z, thmi_z, thma_z))
1717 float tracebox_hits_box(vector start, vector mi, vector ma, vector end, vector thmi, vector thma)
1719 return trace_hits_box(start, end, thmi - ma, thma - mi);
1722 float SUB_NoImpactCheck()
1724 // zero hitcontents = this is not the real impact, but either the
1725 // mirror-impact of something hitting the projectile instead of the
1726 // projectile hitting the something, or a touchareagrid one. Neither of
1727 // these stop the projectile from moving, so...
1728 if(trace_dphitcontents == 0)
1730 //dprint("A hit happened with zero hit contents... DEBUG THIS, this should never happen for projectiles! Projectile will self-destruct.\n");
1731 dprintf("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));
1734 if (trace_dphitq3surfaceflags & Q3SURFACEFLAG_NOIMPACT)
1736 if (other == world && self.size != '0 0 0')
1739 tic = self.velocity * sys_frametime;
1740 tic = tic + normalize(tic) * vlen(self.maxs - self.mins);
1741 traceline(self.origin - tic, self.origin + tic, MOVE_NORMAL, self);
1742 if (trace_fraction >= 1)
1744 dprint("Odd... did not hit...?\n");
1746 else if (trace_dphitq3surfaceflags & Q3SURFACEFLAG_NOIMPACT)
1748 dprint("Detected and prevented the sky-grapple bug.\n");
1756 #define SUB_OwnerCheck() (other && (other == self.owner))
1758 void RemoveGrapplingHook(entity pl);
1759 void W_Crylink_Dequeue(entity e);
1760 float WarpZone_Projectile_Touch_ImpactFilter_Callback()
1762 if(SUB_OwnerCheck())
1764 if(SUB_NoImpactCheck())
1766 if(self.classname == "nade")
1767 return FALSE; // no checks here
1768 else if(self.classname == "grapplinghook")
1769 RemoveGrapplingHook(self.realowner);
1770 else if(self.classname == "spike")
1772 W_Crylink_Dequeue(self);
1779 if(trace_ent && trace_ent.solid > SOLID_TRIGGER)
1780 UpdateCSQCProjectile(self);
1783 #define PROJECTILE_TOUCH if(WarpZone_Projectile_Touch()) return
1785 #define ITEM_TOUCH_NEEDKILL() (((trace_dpstartcontents | trace_dphitcontents) & DPCONTENTS_NODROP) || (trace_dphitq3surfaceflags & Q3SURFACEFLAG_SKY))
1786 #define ITEM_DAMAGE_NEEDKILL(dt) (((dt) == DEATH_HURTTRIGGER) || ((dt) == DEATH_SLIME) || ((dt) == DEATH_LAVA) || ((dt) == DEATH_SWAMP))
1788 void URI_Get_Callback(float id, float status, string data)
1790 if(url_URI_Get_Callback(id, status, data))
1794 else if (id == URI_GET_DISCARD)
1798 else if (id >= URI_GET_CURL && id <= URI_GET_CURL_END)
1801 Curl_URI_Get_Callback(id, status, data);
1803 else if (id >= URI_GET_IPBAN && id <= URI_GET_IPBAN_END)
1806 OnlineBanList_URI_Get_Callback(id, status, data);
1810 print("Received HTTP request data for an invalid id ", ftos(id), ".\n");
1814 string uid2name(string myuid) {
1816 s = db_get(ServerProgsDB, strcat("/uid2name/", myuid));
1818 // FIXME remove this later after 0.6 release
1819 // convert old style broken records to correct style
1822 s = db_get(ServerProgsDB, strcat("uid2name", myuid));
1825 db_put(ServerProgsDB, strcat("/uid2name/", myuid), s);
1826 db_put(ServerProgsDB, strcat("uid2name", myuid), "");
1831 s = "^1Unregistered Player";
1835 float MoveToRandomMapLocation(entity e, float goodcontents, float badcontents, float badsurfaceflags, float attempts, float maxaboveground, float minviewdistance)
1838 vector start, org, delta, end, enddown, mstart;
1841 m = e.dphitcontentsmask;
1842 e.dphitcontentsmask = goodcontents | badcontents;
1845 delta = world.maxs - world.mins;
1849 for (i = 0; i < attempts; ++i)
1851 start_x = org_x + random() * delta_x;
1852 start_y = org_y + random() * delta_y;
1853 start_z = org_z + random() * delta_z;
1855 // rule 1: start inside world bounds, and outside
1856 // solid, and don't start from somewhere where you can
1857 // fall down to evil
1858 tracebox(start, e.mins, e.maxs, start - '0 0 1' * delta_z, MOVE_NORMAL, e);
1859 if (trace_fraction >= 1)
1861 if (trace_startsolid)
1863 if (trace_dphitcontents & badcontents)
1865 if (trace_dphitq3surfaceflags & badsurfaceflags)
1868 // rule 2: if we are too high, lower the point
1869 if (trace_fraction * delta_z > maxaboveground)
1870 start = trace_endpos + '0 0 1' * maxaboveground;
1871 enddown = trace_endpos;
1873 // rule 3: make sure we aren't outside the map. This only works
1874 // for somewhat well formed maps. A good rule of thumb is that
1875 // the map should have a convex outside hull.
1876 // these can be traceLINES as we already verified the starting box
1877 mstart = start + 0.5 * (e.mins + e.maxs);
1878 traceline(mstart, mstart + '1 0 0' * delta_x, MOVE_NORMAL, e);
1879 if (trace_fraction >= 1 || trace_dphittexturename == "common/caulk")
1881 traceline(mstart, mstart - '1 0 0' * delta_x, MOVE_NORMAL, e);
1882 if (trace_fraction >= 1 || trace_dphittexturename == "common/caulk")
1884 traceline(mstart, mstart + '0 1 0' * delta_y, MOVE_NORMAL, e);
1885 if (trace_fraction >= 1 || trace_dphittexturename == "common/caulk")
1887 traceline(mstart, mstart - '0 1 0' * delta_y, MOVE_NORMAL, e);
1888 if (trace_fraction >= 1 || trace_dphittexturename == "common/caulk")
1890 traceline(mstart, mstart + '0 0 1' * delta_z, MOVE_NORMAL, e);
1891 if (trace_fraction >= 1 || trace_dphittexturename == "common/caulk")
1894 // rule 4: we must "see" some spawnpoint or item
1895 for(sp = world; (sp = find(sp, classname, "info_player_deathmatch")); )
1896 if(checkpvs(mstart, sp))
1897 if((traceline(mstart, sp.origin, MOVE_NORMAL, e), trace_fraction) >= 1)
1901 for(sp = world; (sp = findflags(sp, flags, FL_ITEM)); )
1902 if(checkpvs(mstart, sp))
1903 if((traceline(mstart, sp.origin + (sp.mins + sp.maxs) * 0.5, MOVE_NORMAL, e), trace_fraction) >= 1)
1909 // find a random vector to "look at"
1910 end_x = org_x + random() * delta_x;
1911 end_y = org_y + random() * delta_y;
1912 end_z = org_z + random() * delta_z;
1913 end = start + normalize(end - start) * vlen(delta);
1915 // rule 4: start TO end must not be too short
1916 tracebox(start, e.mins, e.maxs, end, MOVE_NORMAL, e);
1917 if (trace_startsolid)
1919 if (trace_fraction < minviewdistance / vlen(delta))
1922 // rule 5: don't want to look at sky
1923 if (trace_dphitq3surfaceflags & Q3SURFACEFLAG_SKY)
1926 // rule 6: we must not end up in trigger_hurt
1927 if (tracebox_hits_trigger_hurt(start, e.mins, e.maxs, enddown))
1933 e.dphitcontentsmask = m;
1937 setorigin(e, start);
1938 e.angles = vectoangles(end - start);
1939 dprint("Needed ", ftos(i + 1), " attempts\n");
1946 void write_recordmarker(entity pl, float tstart, float dt)
1948 GameLogEcho(strcat(":recordset:", ftos(pl.playerid), ":", ftos(dt)));
1950 // also write a marker into demo files for demotc-race-record-extractor to find
1953 strcat("//", strconv(2, 0, 0, GetGametype()), " RECORD SET ", TIME_ENCODED_TOSTRING(TIME_ENCODE(dt))),
1954 " ", ftos(tstart), " ", ftos(dt), "\n"));
1957 vector shotorg_adjustfromclient(vector vecs, float y_is_right, float allowcenter, float algn)
1970 if(allowcenter) // 2: allow center handedness
1983 if(allowcenter) // 2: allow center handedness
1999 vector shotorg_adjust_values(vector vecs, float y_is_right, float visual, float algn)
2004 if (autocvar_g_shootfromeye)
2008 if (autocvar_g_shootfromclient) { vecs = shotorg_adjustfromclient(vecs, y_is_right, (autocvar_g_shootfromclient >= 2), algn); }
2009 else { vecs_y = 0; vecs_z -= 2; }
2017 else if (autocvar_g_shootfromcenter)
2022 else if ((s = autocvar_g_shootfromfixedorigin) != "")
2032 else if (autocvar_g_shootfromclient)
2034 vecs = shotorg_adjustfromclient(vecs, y_is_right, (autocvar_g_shootfromclient >= 2), algn);
2039 vector shotorg_adjust(vector vecs, float y_is_right, float visual)
2041 return shotorg_adjust_values(vecs, y_is_right, visual, self.owner.cvar_cl_gunalign);
2045 void attach_sameorigin(entity e, entity to, string tag)
2047 vector org, t_forward, t_left, t_up, e_forward, e_up;
2050 org = e.origin - gettaginfo(to, gettagindex(to, tag));
2051 tagscale = pow(vlen(v_forward), -2); // undo a scale on the tag
2052 t_forward = v_forward * tagscale;
2053 t_left = v_right * -tagscale;
2054 t_up = v_up * tagscale;
2056 e.origin_x = org * t_forward;
2057 e.origin_y = org * t_left;
2058 e.origin_z = org * t_up;
2060 // current forward and up directions
2061 if (substring(e.model, 0, 1) == "*") // bmodels have their own rules
2062 e.angles = AnglesTransform_FromVAngles(e.angles);
2064 e.angles = AnglesTransform_FromAngles(e.angles);
2065 fixedmakevectors(e.angles);
2067 // untransform forward, up!
2068 e_forward_x = v_forward * t_forward;
2069 e_forward_y = v_forward * t_left;
2070 e_forward_z = v_forward * t_up;
2071 e_up_x = v_up * t_forward;
2072 e_up_y = v_up * t_left;
2073 e_up_z = v_up * t_up;
2075 e.angles = fixedvectoangles2(e_forward, e_up);
2076 if (substring(e.model, 0, 1) == "*") // bmodels have their own rules
2077 e.angles = AnglesTransform_ToVAngles(e.angles);
2079 e.angles = AnglesTransform_ToAngles(e.angles);
2081 setattachment(e, to, tag);
2082 setorigin(e, e.origin);
2085 void detach_sameorigin(entity e)
2088 org = gettaginfo(e, 0);
2089 e.angles = fixedvectoangles2(v_forward, v_up);
2090 if (substring(e.model, 0, 1) == "*") // bmodels have their own rules
2091 e.angles = AnglesTransform_ToVAngles(e.angles);
2093 e.angles = AnglesTransform_ToAngles(e.angles);
2095 setattachment(e, world, "");
2096 setorigin(e, e.origin);
2099 void follow_sameorigin(entity e, entity to)
2101 e.movetype = MOVETYPE_FOLLOW; // make the hole follow
2102 e.aiment = to; // make the hole follow bmodel
2103 e.punchangle = to.angles; // the original angles of bmodel
2104 e.view_ofs = e.origin - to.origin; // relative origin
2105 e.v_angle = e.angles - to.angles; // relative angles
2108 void unfollow_sameorigin(entity e)
2110 e.movetype = MOVETYPE_NONE;
2113 entity gettaginfo_relative_ent;
2114 vector gettaginfo_relative(entity e, float tag)
2116 if (!gettaginfo_relative_ent)
2118 gettaginfo_relative_ent = spawn();
2119 gettaginfo_relative_ent.effects = EF_NODRAW;
2121 gettaginfo_relative_ent.model = e.model;
2122 gettaginfo_relative_ent.modelindex = e.modelindex;
2123 gettaginfo_relative_ent.frame = e.frame;
2124 return gettaginfo(gettaginfo_relative_ent, tag);
2129 float modeleffect_SendEntity(entity to, float sf)
2132 WriteByte(MSG_ENTITY, ENT_CLIENT_MODELEFFECT);
2135 if(self.velocity != '0 0 0')
2137 if(self.angles != '0 0 0')
2139 if(self.avelocity != '0 0 0')
2142 WriteByte(MSG_ENTITY, f);
2143 WriteShort(MSG_ENTITY, self.modelindex);
2144 WriteByte(MSG_ENTITY, self.skin);
2145 WriteByte(MSG_ENTITY, self.frame);
2146 WriteCoord(MSG_ENTITY, self.origin_x);
2147 WriteCoord(MSG_ENTITY, self.origin_y);
2148 WriteCoord(MSG_ENTITY, self.origin_z);
2151 WriteCoord(MSG_ENTITY, self.velocity_x);
2152 WriteCoord(MSG_ENTITY, self.velocity_y);
2153 WriteCoord(MSG_ENTITY, self.velocity_z);
2157 WriteCoord(MSG_ENTITY, self.angles_x);
2158 WriteCoord(MSG_ENTITY, self.angles_y);
2159 WriteCoord(MSG_ENTITY, self.angles_z);
2163 WriteCoord(MSG_ENTITY, self.avelocity_x);
2164 WriteCoord(MSG_ENTITY, self.avelocity_y);
2165 WriteCoord(MSG_ENTITY, self.avelocity_z);
2167 WriteShort(MSG_ENTITY, self.scale * 256.0);
2168 WriteShort(MSG_ENTITY, self.scale2 * 256.0);
2169 WriteByte(MSG_ENTITY, self.teleport_time * 100.0);
2170 WriteByte(MSG_ENTITY, self.fade_time * 100.0);
2171 WriteByte(MSG_ENTITY, self.alpha * 255.0);
2176 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)
2181 e.classname = "modeleffect";
2189 e.teleport_time = t1;
2193 e.scale = s0 / max6(-e.mins_x, -e.mins_y, -e.mins_z, e.maxs_x, e.maxs_y, e.maxs_z);
2197 e.scale2 = s2 / max6(-e.mins_x, -e.mins_y, -e.mins_z, e.maxs_x, e.maxs_y, e.maxs_z);
2200 sz = max(e.scale, e.scale2);
2201 setsize(e, e.mins * sz, e.maxs * sz);
2202 Net_LinkEntity(e, FALSE, 0.1, modeleffect_SendEntity);
2205 void shockwave_spawn(string m, vector org, float sz, float t1, float t2)
2207 return modeleffect_spawn(m, 0, 0, org, '0 0 0', '0 0 0', '0 0 0', 0, sz, 1, t1, t2);
2210 float randombit(float bits)
2212 if(!(bits & (bits-1))) // this ONLY holds for powers of two!
2221 for(f = 1; f <= bits; f *= 2)
2230 r = (r - 1) / (n - 1);
2237 float randombits(float bits, float k, float error_return)
2241 while(k > 0 && bits != r)
2243 r += randombit(bits - r);
2252 void randombit_test(float bits, float iter)
2256 print(ftos(randombit(bits)), "\n");
2261 float ExponentialFalloff(float mindist, float maxdist, float halflifedist, float d)
2263 if(halflifedist > 0)
2264 return pow(0.5, (bound(mindist, d, maxdist) - mindist) / halflifedist);
2265 else if(halflifedist < 0)
2266 return pow(0.5, (bound(mindist, d, maxdist) - maxdist) / halflifedist);
2275 #define cvar_string_normal builtin_cvar_string
2276 #define cvar_normal builtin_cvar
2278 string cvar_string_normal(string n)
2280 if (!(cvar_type(n) & 1))
2281 backtrace(strcat("Attempt to access undefined cvar: ", n));
2282 return builtin_cvar_string(n);
2285 float cvar_normal(string n)
2287 return stof(cvar_string_normal(n));
2290 #define cvar_set_normal builtin_cvar_set
2298 oself.think = SUB_Remove;
2299 oself.nextthink = time;
2305 Execute func() after time + fdelay.
2306 self when func is executed = self when defer is called
2308 void defer(float fdelay, void() func)
2315 e.think = defer_think;
2316 e.nextthink = time + fdelay;
2319 .string aiment_classname;
2320 .float aiment_deadflag;
2321 void SetMovetypeFollow(entity ent, entity e)
2323 // FIXME this may not be warpzone aware
2324 ent.movetype = MOVETYPE_FOLLOW; // make the hole follow
2325 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.
2326 ent.aiment = e; // make the hole follow bmodel
2327 ent.punchangle = e.angles; // the original angles of bmodel
2328 ent.view_ofs = ent.origin - e.origin; // relative origin
2329 ent.v_angle = ent.angles - e.angles; // relative angles
2330 ent.aiment_classname = strzone(e.classname);
2331 ent.aiment_deadflag = e.deadflag;
2333 void UnsetMovetypeFollow(entity ent)
2335 ent.movetype = MOVETYPE_FLY;
2336 PROJECTILE_MAKETRIGGER(ent);
2339 float LostMovetypeFollow(entity ent)
2342 if(ent.movetype != MOVETYPE_FOLLOW)
2348 if(ent.aiment.classname != ent.aiment_classname)
2350 if(ent.aiment.deadflag != ent.aiment_deadflag)
2356 float isPushable(entity e)
2365 case "droppedweapon":
2366 case "keepawayball":
2367 case "nexball_basketball":
2368 case "nexball_football":
2370 case "bullet": // antilagged bullets can't hit this either
2373 if (e.projectiledeathtype)