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_handleString(s, f, cvar_g_xonoticversion, "g_xonoticversion");
493 GetCvars_handleFloat(s, f, cvar_cl_handicap, "cl_handicap");
494 GetCvars_handleFloat(s, f, cvar_cl_clippedspectating, "cl_clippedspectating");
495 GetCvars_handleString_Fixup(s, f, cvar_cl_weaponpriority, "cl_weaponpriority", W_FixWeaponOrder_ForceComplete_AndBuildImpulseList);
496 GetCvars_handleString_Fixup(s, f, cvar_cl_weaponpriorities[0], "cl_weaponpriority0", W_FixWeaponOrder_AllowIncomplete);
497 GetCvars_handleString_Fixup(s, f, cvar_cl_weaponpriorities[1], "cl_weaponpriority1", W_FixWeaponOrder_AllowIncomplete);
498 GetCvars_handleString_Fixup(s, f, cvar_cl_weaponpriorities[2], "cl_weaponpriority2", W_FixWeaponOrder_AllowIncomplete);
499 GetCvars_handleString_Fixup(s, f, cvar_cl_weaponpriorities[3], "cl_weaponpriority3", W_FixWeaponOrder_AllowIncomplete);
500 GetCvars_handleString_Fixup(s, f, cvar_cl_weaponpriorities[4], "cl_weaponpriority4", W_FixWeaponOrder_AllowIncomplete);
501 GetCvars_handleString_Fixup(s, f, cvar_cl_weaponpriorities[5], "cl_weaponpriority5", W_FixWeaponOrder_AllowIncomplete);
502 GetCvars_handleString_Fixup(s, f, cvar_cl_weaponpriorities[6], "cl_weaponpriority6", W_FixWeaponOrder_AllowIncomplete);
503 GetCvars_handleString_Fixup(s, f, cvar_cl_weaponpriorities[7], "cl_weaponpriority7", W_FixWeaponOrder_AllowIncomplete);
504 GetCvars_handleString_Fixup(s, f, cvar_cl_weaponpriorities[8], "cl_weaponpriority8", W_FixWeaponOrder_AllowIncomplete);
505 GetCvars_handleString_Fixup(s, f, cvar_cl_weaponpriorities[9], "cl_weaponpriority9", W_FixWeaponOrder_AllowIncomplete);
506 GetCvars_handleFloat(s, f, cvar_cl_weaponimpulsemode, "cl_weaponimpulsemode");
507 GetCvars_handleFloat(s, f, cvar_cl_autotaunt, "cl_autotaunt");
508 GetCvars_handleFloat(s, f, cvar_cl_noantilag, "cl_noantilag");
509 GetCvars_handleFloat(s, f, cvar_cl_voice_directional, "cl_voice_directional");
510 GetCvars_handleFloat(s, f, cvar_cl_voice_directional_taunt_attenuation, "cl_voice_directional_taunt_attenuation");
511 GetCvars_handleFloat(s, f, cvar_cl_accuracy_data_share, "cl_accuracy_data_share");
512 GetCvars_handleFloat(s, f, cvar_cl_accuracy_data_receive, "cl_accuracy_data_receive");
514 self.cvar_cl_accuracy_data_share = boolean(self.cvar_cl_accuracy_data_share);
515 self.cvar_cl_accuracy_data_receive = boolean(self.cvar_cl_accuracy_data_receive);
517 GetCvars_handleFloatOnce(s, f, cvar_cl_gunalign, "cl_gunalign");
518 GetCvars_handleFloat(s, f, cvar_cl_allow_uid2name, "cl_allow_uid2name");
519 GetCvars_handleFloat(s, f, cvar_cl_allow_uidtracking, "cl_allow_uidtracking");
520 GetCvars_handleFloat(s, f, cvar_cl_movement_track_canjump, "cl_movement_track_canjump");
521 GetCvars_handleFloat(s, f, cvar_cl_newusekeysupported, "cl_newusekeysupported");
523 // fixup of switchweapon (needed for LMS or when spectating is disabled, as PutClientInServer comes too early)
526 if (s == "cl_weaponpriority")
527 self.switchweapon = w_getbestweapon(self);
528 if (s == "cl_allow_uidtracking")
529 PlayerStats_AddPlayer(self);
533 // decolorizes and team colors the player name when needed
534 string playername(entity p)
537 if (teamplay && !intermission_running && IS_PLAYER(p))
539 t = Team_ColorCode(p.team);
540 return strcat(t, strdecolorize(p.netname));
546 vector randompos(vector m1, vector m2)
550 v_x = m2_x * random() + m1_x;
551 v_y = m2_y * random() + m1_y;
552 v_z = m2_z * random() + m1_z;
556 //#NO AUTOCVARS START
558 float g_pickup_shells;
559 float g_pickup_shells_max;
560 float g_pickup_nails;
561 float g_pickup_nails_max;
562 float g_pickup_rockets;
563 float g_pickup_rockets_max;
564 float g_pickup_cells;
565 float g_pickup_cells_max;
566 float g_pickup_plasma;
567 float g_pickup_plasma_max;
569 float g_pickup_fuel_jetpack;
570 float g_pickup_fuel_max;
571 float g_pickup_armorsmall;
572 float g_pickup_armorsmall_max;
573 float g_pickup_armorsmall_anyway;
574 float g_pickup_armormedium;
575 float g_pickup_armormedium_max;
576 float g_pickup_armormedium_anyway;
577 float g_pickup_armorbig;
578 float g_pickup_armorbig_max;
579 float g_pickup_armorbig_anyway;
580 float g_pickup_armorlarge;
581 float g_pickup_armorlarge_max;
582 float g_pickup_armorlarge_anyway;
583 float g_pickup_healthsmall;
584 float g_pickup_healthsmall_max;
585 float g_pickup_healthsmall_anyway;
586 float g_pickup_healthmedium;
587 float g_pickup_healthmedium_max;
588 float g_pickup_healthmedium_anyway;
589 float g_pickup_healthlarge;
590 float g_pickup_healthlarge_max;
591 float g_pickup_healthlarge_anyway;
592 float g_pickup_healthmega;
593 float g_pickup_healthmega_max;
594 float g_pickup_healthmega_anyway;
595 float g_pickup_ammo_anyway;
596 float g_pickup_weapons_anyway;
598 WepSet g_weaponarena_weapons;
599 float g_weaponarena_random;
600 float g_weaponarena_random_with_blaster;
601 string g_weaponarena_list;
602 float g_weaponspeedfactor;
603 float g_weaponratefactor;
604 float g_weapondamagefactor;
605 float g_weaponforcefactor;
606 float g_weaponspreadfactor;
608 WepSet start_weapons;
609 WepSet start_weapons_default;
610 WepSet start_weapons_defaultmask;
612 float start_ammo_shells;
613 float start_ammo_nails;
614 float start_ammo_rockets;
615 float start_ammo_cells;
616 float start_ammo_plasma;
617 float start_ammo_fuel;
619 float start_armorvalue;
620 WepSet warmup_start_weapons;
621 WepSet warmup_start_weapons_default;
622 WepSet warmup_start_weapons_defaultmask;
623 #define WARMUP_START_WEAPONS ((g_warmup_allguns == 1) ? (warmup_start_weapons & (weaponsInMap | start_weapons)) : warmup_start_weapons)
624 float warmup_start_ammo_shells;
625 float warmup_start_ammo_nails;
626 float warmup_start_ammo_rockets;
627 float warmup_start_ammo_cells;
628 float warmup_start_ammo_plasma;
629 float warmup_start_ammo_fuel;
630 float warmup_start_health;
631 float warmup_start_armorvalue;
634 float want_weapon(entity weaponinfo, float allguns) // WEAPONTODO: what still needs done?
636 var float i = weaponinfo.weapon;
642 if (g_lms || g_ca || allguns)
644 if(weaponinfo.spawnflags & WEP_FLAG_NORMAL)
650 d = (i == WEP_SHOTGUN);
652 d = 0; // weapon is set a few lines later
654 d = !(!weaponinfo.weaponstart);
656 if(g_grappling_hook) // if possible, redirect off-hand hook to on-hand hook
657 d |= (i == WEP_HOOK);
658 if(!g_cts && (weaponinfo.spawnflags & WEP_FLAG_MUTATORBLOCKED)) // never default mutator blocked guns
661 var float t = weaponinfo.weaponstartoverride;
663 //print(strcat("want_weapon: ", weaponinfo.netname, " - d: ", ftos(d), ", t: ", ftos(t), ". \n"));
668 // 4: is set by default?
677 void readplayerstartcvars()
683 // initialize starting values for players
684 start_weapons = '0 0 0';
685 start_weapons_default = '0 0 0';
686 start_weapons_defaultmask = '0 0 0';
688 start_ammo_shells = 0;
689 start_ammo_nails = 0;
690 start_ammo_rockets = 0;
691 start_ammo_cells = 0;
692 start_ammo_plasma = 0;
693 start_health = cvar("g_balance_health_start");
694 start_armorvalue = cvar("g_balance_armor_start");
697 g_weaponarena_weapons = '0 0 0';
699 s = cvar_string("g_weaponarena");
700 if (s == "0" || s == "")
706 if (s == "0" || s == "")
712 // forcibly turn off weaponarena
714 else if (s == "all" || s == "1")
717 g_weaponarena_list = "All Weapons";
718 for (j = WEP_FIRST; j <= WEP_LAST; ++j)
720 e = get_weaponinfo(j);
721 if (!(e.spawnflags & WEP_FLAG_MUTATORBLOCKED))
722 g_weaponarena_weapons |= WepSet_FromWeapon(j);
725 else if (s == "most")
728 g_weaponarena_list = "Most Weapons";
729 for (j = WEP_FIRST; j <= WEP_LAST; ++j)
731 e = get_weaponinfo(j);
732 if (!(e.spawnflags & WEP_FLAG_MUTATORBLOCKED))
733 if (e.spawnflags & WEP_FLAG_NORMAL)
734 g_weaponarena_weapons |= WepSet_FromWeapon(j);
737 else if (s == "none")
740 g_weaponarena_list = "No Weapons";
745 t = tokenize_console(s);
746 g_weaponarena_list = "";
747 for (i = 0; i < t; ++i)
750 for (j = WEP_FIRST; j <= WEP_LAST; ++j)
752 e = get_weaponinfo(j);
755 g_weaponarena_weapons |= WepSet_FromWeapon(j);
756 g_weaponarena_list = strcat(g_weaponarena_list, e.message, " & ");
762 print("The weapon mutator list contains an unknown weapon ", s, ". Skipped.\n");
765 g_weaponarena_list = strzone(substring(g_weaponarena_list, 0, strlen(g_weaponarena_list) - 3));
769 g_weaponarena_random = cvar("g_weaponarena_random");
771 g_weaponarena_random = 0;
772 g_weaponarena_random_with_blaster = cvar("g_weaponarena_random_with_blaster");
776 g_weapon_stay = 0; // incompatible
777 start_weapons = g_weaponarena_weapons;
778 start_items |= IT_UNLIMITED_AMMO;
782 for (i = WEP_FIRST; i <= WEP_LAST; ++i)
784 e = get_weaponinfo(i);
785 float w = want_weapon(e, FALSE);
787 start_weapons |= WepSet_FromWeapon(i);
789 start_weapons_default |= WepSet_FromWeapon(i);
791 start_weapons_defaultmask |= WepSet_FromWeapon(i);
795 if(!cvar("g_use_ammunition"))
796 start_items |= IT_UNLIMITED_AMMO;
798 if(start_items & IT_UNLIMITED_WEAPON_AMMO)
800 start_ammo_shells = 999;
801 start_ammo_nails = 999;
802 start_ammo_rockets = 999;
803 start_ammo_cells = 999;
804 start_ammo_plasma = 999;
805 start_ammo_fuel = 999;
809 start_ammo_shells = cvar("g_start_ammo_shells");
810 start_ammo_nails = cvar("g_start_ammo_nails");
811 start_ammo_rockets = cvar("g_start_ammo_rockets");
812 start_ammo_cells = cvar("g_start_ammo_cells");
813 start_ammo_plasma = cvar("g_start_ammo_plasma");
814 start_ammo_fuel = cvar("g_start_ammo_fuel");
819 warmup_start_ammo_shells = start_ammo_shells;
820 warmup_start_ammo_nails = start_ammo_nails;
821 warmup_start_ammo_rockets = start_ammo_rockets;
822 warmup_start_ammo_cells = start_ammo_cells;
823 warmup_start_ammo_plasma = start_ammo_plasma;
824 warmup_start_ammo_fuel = start_ammo_fuel;
825 warmup_start_health = start_health;
826 warmup_start_armorvalue = start_armorvalue;
827 warmup_start_weapons = start_weapons;
828 warmup_start_weapons_default = start_weapons_default;
829 warmup_start_weapons_defaultmask = start_weapons_defaultmask;
831 if (!g_weaponarena && !g_ca)
833 warmup_start_ammo_shells = cvar("g_warmup_start_ammo_shells");
834 warmup_start_ammo_nails = cvar("g_warmup_start_ammo_nails");
835 warmup_start_ammo_rockets = cvar("g_warmup_start_ammo_rockets");
836 warmup_start_ammo_cells = cvar("g_warmup_start_ammo_cells");
837 warmup_start_ammo_plasma = cvar("g_warmup_start_ammo_plasma");
838 warmup_start_ammo_fuel = cvar("g_warmup_start_ammo_fuel");
839 warmup_start_health = cvar("g_warmup_start_health");
840 warmup_start_armorvalue = cvar("g_warmup_start_armor");
841 warmup_start_weapons = '0 0 0';
842 warmup_start_weapons_default = '0 0 0';
843 warmup_start_weapons_defaultmask = '0 0 0';
844 for (i = WEP_FIRST; i <= WEP_LAST; ++i)
846 e = get_weaponinfo(i);
847 float w = want_weapon(e, g_warmup_allguns);
849 warmup_start_weapons |= WepSet_FromWeapon(i);
851 warmup_start_weapons_default |= WepSet_FromWeapon(i);
853 warmup_start_weapons_defaultmask |= WepSet_FromWeapon(i);
859 start_items |= IT_JETPACK;
861 MUTATOR_CALLHOOK(SetStartItems);
863 if ((start_items & IT_JETPACK) || (g_grappling_hook && (start_weapons & WEPSET_HOOK)))
865 g_grappling_hook = 0; // these two can't coexist, as they use the same button
866 start_items |= IT_FUEL_REGEN;
867 start_ammo_fuel = max(start_ammo_fuel, cvar("g_balance_fuel_rotstable"));
868 warmup_start_ammo_fuel = max(warmup_start_ammo_fuel, cvar("g_balance_fuel_rotstable"));
871 WepSet precache_weapons = start_weapons;
872 if (g_warmup_allguns != 1)
873 precache_weapons |= warmup_start_weapons;
874 for (i = WEP_FIRST; i <= WEP_LAST; ++i)
876 e = get_weaponinfo(i);
877 if(precache_weapons & WepSet_FromWeapon(i))
878 WEP_ACTION(i, WR_INIT);
881 start_ammo_shells = max(0, start_ammo_shells);
882 start_ammo_nails = max(0, start_ammo_nails);
883 start_ammo_rockets = max(0, start_ammo_rockets);
884 start_ammo_cells = max(0, start_ammo_cells);
885 start_ammo_plasma = max(0, start_ammo_plasma);
886 start_ammo_fuel = max(0, start_ammo_fuel);
888 warmup_start_ammo_shells = max(0, warmup_start_ammo_shells);
889 warmup_start_ammo_nails = max(0, warmup_start_ammo_nails);
890 warmup_start_ammo_rockets = max(0, warmup_start_ammo_rockets);
891 warmup_start_ammo_cells = max(0, warmup_start_ammo_cells);
892 warmup_start_ammo_plasma = max(0, warmup_start_ammo_plasma);
893 warmup_start_ammo_fuel = max(0, warmup_start_ammo_fuel);
897 float g_bugrigs_planar_movement;
898 float g_bugrigs_planar_movement_car_jumping;
899 float g_bugrigs_reverse_spinning;
900 float g_bugrigs_reverse_speeding;
901 float g_bugrigs_reverse_stopping;
902 float g_bugrigs_air_steering;
903 float g_bugrigs_angle_smoothing;
904 float g_bugrigs_friction_floor;
905 float g_bugrigs_friction_brake;
906 float g_bugrigs_friction_air;
907 float g_bugrigs_accel;
908 float g_bugrigs_speed_ref;
909 float g_bugrigs_speed_pow;
910 float g_bugrigs_steer;
915 string GetGametype(); // g_world.qc
916 void mutators_add(); // mutators.qc
917 void readlevelcvars(void)
922 if(cvar("sv_allow_fullbright"))
923 serverflags |= SERVERFLAG_ALLOW_FULLBRIGHT;
925 g_bugrigs = cvar("g_bugrigs");
926 g_bugrigs_planar_movement = cvar("g_bugrigs_planar_movement");
927 g_bugrigs_planar_movement_car_jumping = cvar("g_bugrigs_planar_movement_car_jumping");
928 g_bugrigs_reverse_spinning = cvar("g_bugrigs_reverse_spinning");
929 g_bugrigs_reverse_speeding = cvar("g_bugrigs_reverse_speeding");
930 g_bugrigs_reverse_stopping = cvar("g_bugrigs_reverse_stopping");
931 g_bugrigs_air_steering = cvar("g_bugrigs_air_steering");
932 g_bugrigs_angle_smoothing = cvar("g_bugrigs_angle_smoothing");
933 g_bugrigs_friction_floor = cvar("g_bugrigs_friction_floor");
934 g_bugrigs_friction_brake = cvar("g_bugrigs_friction_brake");
935 g_bugrigs_friction_air = cvar("g_bugrigs_friction_air");
936 g_bugrigs_accel = cvar("g_bugrigs_accel");
937 g_bugrigs_speed_ref = cvar("g_bugrigs_speed_ref");
938 g_bugrigs_speed_pow = cvar("g_bugrigs_speed_pow");
939 g_bugrigs_steer = cvar("g_bugrigs_steer");
941 g_instagib = cvar("g_instagib");
943 sv_clones = cvar("sv_clones");
944 sv_foginterval = cvar("sv_foginterval");
945 g_cloaked = cvar("g_cloaked");
946 g_footsteps = cvar("g_footsteps");
947 g_grappling_hook = cvar("g_grappling_hook");
948 g_jetpack = cvar("g_jetpack");
949 sv_maxidle = cvar("sv_maxidle");
950 sv_maxidle_spectatorsareidle = cvar("sv_maxidle_spectatorsareidle");
951 sv_autotaunt = cvar("sv_autotaunt");
952 sv_taunt = cvar("sv_taunt");
954 warmup_stage = cvar("g_warmup");
955 g_warmup_limit = cvar("g_warmup_limit");
956 g_warmup_allguns = cvar("g_warmup_allguns");
957 g_warmup_allow_timeout = cvar("g_warmup_allow_timeout");
959 if ((g_race && g_race_qualifying == 2) || g_assault || cvar("g_campaign"))
960 warmup_stage = 0; // these modes cannot work together, sorry
962 g_pickup_respawntime_weapon = cvar("g_pickup_respawntime_weapon");
963 g_pickup_respawntime_superweapon = cvar("g_pickup_respawntime_superweapon");
964 g_pickup_respawntime_ammo = cvar("g_pickup_respawntime_ammo");
965 g_pickup_respawntime_short = cvar("g_pickup_respawntime_short");
966 g_pickup_respawntime_medium = cvar("g_pickup_respawntime_medium");
967 g_pickup_respawntime_long = cvar("g_pickup_respawntime_long");
968 g_pickup_respawntime_powerup = cvar("g_pickup_respawntime_powerup");
969 g_pickup_respawntimejitter_weapon = cvar("g_pickup_respawntimejitter_weapon");
970 g_pickup_respawntimejitter_superweapon = cvar("g_pickup_respawntimejitter_superweapon");
971 g_pickup_respawntimejitter_ammo = cvar("g_pickup_respawntimejitter_ammo");
972 g_pickup_respawntimejitter_short = cvar("g_pickup_respawntimejitter_short");
973 g_pickup_respawntimejitter_medium = cvar("g_pickup_respawntimejitter_medium");
974 g_pickup_respawntimejitter_long = cvar("g_pickup_respawntimejitter_long");
975 g_pickup_respawntimejitter_powerup = cvar("g_pickup_respawntimejitter_powerup");
977 g_weaponspeedfactor = cvar("g_weaponspeedfactor");
978 g_weaponratefactor = cvar("g_weaponratefactor");
979 g_weapondamagefactor = cvar("g_weapondamagefactor");
980 g_weaponforcefactor = cvar("g_weaponforcefactor");
981 g_weaponspreadfactor = cvar("g_weaponspreadfactor");
983 g_pickup_shells = cvar("g_pickup_shells");
984 g_pickup_shells_max = cvar("g_pickup_shells_max");
985 g_pickup_nails = cvar("g_pickup_nails");
986 g_pickup_nails_max = cvar("g_pickup_nails_max");
987 g_pickup_rockets = cvar("g_pickup_rockets");
988 g_pickup_rockets_max = cvar("g_pickup_rockets_max");
989 g_pickup_cells = cvar("g_pickup_cells");
990 g_pickup_cells_max = cvar("g_pickup_cells_max");
991 g_pickup_plasma = cvar("g_pickup_plasma");
992 g_pickup_plasma_max = cvar("g_pickup_plasma_max");
993 g_pickup_fuel = cvar("g_pickup_fuel");
994 g_pickup_fuel_jetpack = cvar("g_pickup_fuel_jetpack");
995 g_pickup_fuel_max = cvar("g_pickup_fuel_max");
996 g_pickup_armorsmall = cvar("g_pickup_armorsmall");
997 g_pickup_armorsmall_max = cvar("g_pickup_armorsmall_max");
998 g_pickup_armorsmall_anyway = cvar("g_pickup_armorsmall_anyway");
999 g_pickup_armormedium = cvar("g_pickup_armormedium");
1000 g_pickup_armormedium_max = cvar("g_pickup_armormedium_max");
1001 g_pickup_armormedium_anyway = cvar("g_pickup_armormedium_anyway");
1002 g_pickup_armorbig = cvar("g_pickup_armorbig");
1003 g_pickup_armorbig_max = cvar("g_pickup_armorbig_max");
1004 g_pickup_armorbig_anyway = cvar("g_pickup_armorbig_anyway");
1005 g_pickup_armorlarge = cvar("g_pickup_armorlarge");
1006 g_pickup_armorlarge_max = cvar("g_pickup_armorlarge_max");
1007 g_pickup_armorlarge_anyway = cvar("g_pickup_armorlarge_anyway");
1008 g_pickup_healthsmall = cvar("g_pickup_healthsmall");
1009 g_pickup_healthsmall_max = cvar("g_pickup_healthsmall_max");
1010 g_pickup_healthsmall_anyway = cvar("g_pickup_healthsmall_anyway");
1011 g_pickup_healthmedium = cvar("g_pickup_healthmedium");
1012 g_pickup_healthmedium_max = cvar("g_pickup_healthmedium_max");
1013 g_pickup_healthmedium_anyway = cvar("g_pickup_healthmedium_anyway");
1014 g_pickup_healthlarge = cvar("g_pickup_healthlarge");
1015 g_pickup_healthlarge_max = cvar("g_pickup_healthlarge_max");
1016 g_pickup_healthlarge_anyway = cvar("g_pickup_healthlarge_anyway");
1017 g_pickup_healthmega = cvar("g_pickup_healthmega");
1018 g_pickup_healthmega_max = cvar("g_pickup_healthmega_max");
1019 g_pickup_healthmega_anyway = cvar("g_pickup_healthmega_anyway");
1021 g_pickup_ammo_anyway = cvar("g_pickup_ammo_anyway");
1022 g_pickup_weapons_anyway = cvar("g_pickup_weapons_anyway");
1024 g_weapon_stay = cvar(strcat("g_", GetGametype(), "_weapon_stay"));
1026 g_weapon_stay = cvar("g_weapon_stay");
1029 game_starttime = time + cvar("g_start_delay");
1031 readplayerstartcvars();
1037 string precache_sound (string s) = #19;
1038 float precache_sound_index (string s) = #19;
1040 #define SND_VOLUME 1
1041 #define SND_ATTENUATION 2
1042 #define SND_LARGEENTITY 8
1043 #define SND_LARGESOUND 16
1045 float sound_allowed(float dest, entity e)
1047 // sounds from world may always pass
1050 if (e.classname == "body")
1052 else if (e.realowner && e.realowner != e)
1054 else if (e.owner && e.owner != e)
1059 // sounds to self may always pass
1060 if (dest == MSG_ONE)
1061 if (e == msg_entity)
1063 // sounds by players can be removed
1064 if (autocvar_bot_sound_monopoly)
1065 if (IS_REAL_CLIENT(e))
1067 // anything else may pass
1072 void sound(entity e, float chan, string samp, float vol, float atten)
1074 if (!sound_allowed(MSG_BROADCAST, e))
1076 sound7(e, chan, samp, vol, atten, 0, 0);
1079 void soundtoat(float dest, entity e, vector o, float chan, string samp, float vol, float atten)
1083 if (!sound_allowed(dest, e))
1086 entno = num_for_edict(e);
1087 idx = precache_sound_index(samp);
1092 atten = floor(atten * 64);
1093 vol = floor(vol * 255);
1096 sflags |= SND_VOLUME;
1098 sflags |= SND_ATTENUATION;
1099 if (entno >= 8192 || chan < 0 || chan > 7)
1100 sflags |= SND_LARGEENTITY;
1102 sflags |= SND_LARGESOUND;
1104 WriteByte(dest, SVC_SOUND);
1105 WriteByte(dest, sflags);
1106 if (sflags & SND_VOLUME)
1107 WriteByte(dest, vol);
1108 if (sflags & SND_ATTENUATION)
1109 WriteByte(dest, atten);
1110 if (sflags & SND_LARGEENTITY)
1112 WriteShort(dest, entno);
1113 WriteByte(dest, chan);
1117 WriteShort(dest, entno * 8 + chan);
1119 if (sflags & SND_LARGESOUND)
1120 WriteShort(dest, idx);
1122 WriteByte(dest, idx);
1124 WriteCoord(dest, o_x);
1125 WriteCoord(dest, o_y);
1126 WriteCoord(dest, o_z);
1128 void soundto(float dest, entity e, float chan, string samp, float vol, float atten)
1132 if (!sound_allowed(dest, e))
1135 o = e.origin + 0.5 * (e.mins + e.maxs);
1136 soundtoat(dest, e, o, chan, samp, vol, atten);
1138 void soundat(entity e, vector o, float chan, string samp, float vol, float atten)
1140 soundtoat(((chan & 8) ? MSG_ALL : MSG_BROADCAST), e, o, chan, samp, vol, atten);
1142 void stopsoundto(float dest, entity e, float chan)
1146 if (!sound_allowed(dest, e))
1149 entno = num_for_edict(e);
1151 if (entno >= 8192 || chan < 0 || chan > 7)
1154 idx = precache_sound_index("misc/null.wav");
1155 sflags = SND_LARGEENTITY;
1157 sflags |= SND_LARGESOUND;
1158 WriteByte(dest, SVC_SOUND);
1159 WriteByte(dest, sflags);
1160 WriteShort(dest, entno);
1161 WriteByte(dest, chan);
1162 if (sflags & SND_LARGESOUND)
1163 WriteShort(dest, idx);
1165 WriteByte(dest, idx);
1166 WriteCoord(dest, e.origin_x);
1167 WriteCoord(dest, e.origin_y);
1168 WriteCoord(dest, e.origin_z);
1172 WriteByte(dest, SVC_STOPSOUND);
1173 WriteShort(dest, entno * 8 + chan);
1176 void stopsound(entity e, float chan)
1178 if (!sound_allowed(MSG_BROADCAST, e))
1181 stopsoundto(MSG_BROADCAST, e, chan); // unreliable, gets there fast
1182 stopsoundto(MSG_ALL, e, chan); // in case of packet loss
1185 void play2(entity e, string filename)
1187 //stuffcmd(e, strcat("play2 ", filename, "\n"));
1189 soundtoat(MSG_ONE, world, '0 0 0', CH_INFO, filename, VOL_BASE, ATTEN_NONE);
1192 // use this one if you might be causing spam (e.g. from touch functions that might get called more than once per frame)
1194 float spamsound(entity e, float chan, string samp, float vol, float atten)
1196 if (!sound_allowed(MSG_BROADCAST, e))
1199 if (time > e.spamtime)
1202 sound(e, chan, samp, vol, atten);
1208 void play2team(float t, string filename)
1212 if (autocvar_bot_sound_monopoly)
1215 FOR_EACH_REALPLAYER(head)
1218 play2(head, filename);
1222 void play2all(string samp)
1224 if (autocvar_bot_sound_monopoly)
1227 sound(world, CH_INFO, samp, VOL_BASE, ATTEN_NONE);
1230 void PrecachePlayerSounds(string f);
1231 void precache_playermodel(string m)
1233 float globhandle, i, n;
1236 if(substring(m, -9,5) == "_lod1")
1238 if(substring(m, -9,5) == "_lod2")
1241 f = strcat(substring(m, 0, -5), "_lod1", substring(m, -4, -1));
1244 f = strcat(substring(m, 0, -5), "_lod2", substring(m, -4, -1));
1248 globhandle = search_begin(strcat(m, "_*.sounds"), TRUE, FALSE);
1251 n = search_getsize(globhandle);
1252 for (i = 0; i < n; ++i)
1254 //print(search_getfilename(globhandle, i), "\n");
1255 f = search_getfilename(globhandle, i);
1256 PrecachePlayerSounds(f);
1258 search_end(globhandle);
1260 void precache_all_playermodels(string pattern)
1262 float globhandle, i, n;
1265 globhandle = search_begin(pattern, TRUE, FALSE);
1268 n = search_getsize(globhandle);
1269 for (i = 0; i < n; ++i)
1271 //print(search_getfilename(globhandle, i), "\n");
1272 f = search_getfilename(globhandle, i);
1273 precache_playermodel(f);
1275 search_end(globhandle);
1280 // gamemode related things
1281 precache_model ("models/misc/chatbubble.spr");
1282 precache_model("models/ice/ice.md3");
1284 #ifdef TTURRETS_ENABLED
1285 if (autocvar_g_turrets)
1289 // Precache all player models if desired
1290 if (autocvar_sv_precacheplayermodels)
1292 PrecachePlayerSounds("sound/player/default.sounds");
1293 precache_all_playermodels("models/player/*.zym");
1294 precache_all_playermodels("models/player/*.dpm");
1295 precache_all_playermodels("models/player/*.md3");
1296 precache_all_playermodels("models/player/*.psk");
1297 precache_all_playermodels("models/player/*.iqm");
1300 if (autocvar_sv_defaultcharacter)
1303 s = autocvar_sv_defaultplayermodel_red;
1305 precache_playermodel(s);
1306 s = autocvar_sv_defaultplayermodel_blue;
1308 precache_playermodel(s);
1309 s = autocvar_sv_defaultplayermodel_yellow;
1311 precache_playermodel(s);
1312 s = autocvar_sv_defaultplayermodel_pink;
1314 precache_playermodel(s);
1315 s = autocvar_sv_defaultplayermodel;
1317 precache_playermodel(s);
1322 PrecacheGlobalSound((globalsound_step = "misc/footstep0 6"));
1323 PrecacheGlobalSound((globalsound_metalstep = "misc/metalfootstep0 6"));
1326 // gore and miscellaneous sounds
1327 //precache_sound ("misc/h2ohit.wav");
1328 precache_model ("models/hook.md3");
1329 precache_sound ("misc/armorimpact.wav");
1330 precache_sound ("misc/bodyimpact1.wav");
1331 precache_sound ("misc/bodyimpact2.wav");
1332 precache_sound ("misc/gib.wav");
1333 precache_sound ("misc/gib_splat01.wav");
1334 precache_sound ("misc/gib_splat02.wav");
1335 precache_sound ("misc/gib_splat03.wav");
1336 precache_sound ("misc/gib_splat04.wav");
1337 PrecacheGlobalSound((globalsound_fall = "misc/hitground 4"));
1338 PrecacheGlobalSound((globalsound_metalfall = "misc/metalhitground 4"));
1339 precache_sound ("misc/null.wav");
1340 precache_sound ("misc/spawn.wav");
1341 precache_sound ("misc/talk.wav");
1342 precache_sound ("misc/teleport.wav");
1343 precache_sound ("misc/poweroff.wav");
1344 precache_sound ("player/lava.wav");
1345 precache_sound ("player/slime.wav");
1347 precache_model ("models/sprites/0.spr32");
1348 precache_model ("models/sprites/1.spr32");
1349 precache_model ("models/sprites/2.spr32");
1350 precache_model ("models/sprites/3.spr32");
1351 precache_model ("models/sprites/4.spr32");
1352 precache_model ("models/sprites/5.spr32");
1353 precache_model ("models/sprites/6.spr32");
1354 precache_model ("models/sprites/7.spr32");
1355 precache_model ("models/sprites/8.spr32");
1356 precache_model ("models/sprites/9.spr32");
1357 precache_model ("models/sprites/10.spr32");
1359 // common weapon precaches
1360 precache_sound ("weapons/reload.wav"); // until weapons have individual reload sounds, precache the reload sound here
1361 precache_sound ("weapons/weapon_switch.wav");
1362 precache_sound ("weapons/weaponpickup.wav");
1363 precache_sound ("weapons/unavailable.wav");
1364 precache_sound ("weapons/dryfire.wav");
1365 if (g_grappling_hook)
1367 precache_sound ("weapons/hook_fire.wav"); // hook
1368 precache_sound ("weapons/hook_impact.wav"); // hook
1371 precache_model("models/elaser.mdl");
1372 precache_model("models/laser.mdl");
1373 precache_model("models/ebomb.mdl");
1376 // Disabled this code because it simply does not work (e.g. ignores bgmvolume, overlaps with "cd loop" controlled tracks).
1378 if (!self.noise && self.music) // quake 3 uses the music field
1379 self.noise = self.music;
1381 // plays music for the level if there is any
1384 precache_sound (self.noise);
1385 ambientsound ('0 0 0', self.noise, VOL_BASE, ATTEN_NONE);
1389 #include "precache-for-csqc.inc"
1392 // WARNING: this kills the trace globals
1393 #define EXACTTRIGGER_TOUCH if(WarpZoneLib_ExactTrigger_Touch()) return
1394 #define EXACTTRIGGER_INIT WarpZoneLib_ExactTrigger_Init()
1396 #define INITPRIO_FIRST 0
1397 #define INITPRIO_GAMETYPE 0
1398 #define INITPRIO_GAMETYPE_FALLBACK 1
1399 #define INITPRIO_FINDTARGET 10
1400 #define INITPRIO_DROPTOFLOOR 20
1401 #define INITPRIO_SETLOCATION 90
1402 #define INITPRIO_LINKDOORS 91
1403 #define INITPRIO_LAST 99
1405 .void(void) initialize_entity;
1406 .float initialize_entity_order;
1407 .entity initialize_entity_next;
1408 entity initialize_entity_first;
1410 void make_safe_for_remove(entity e)
1412 if (e.initialize_entity)
1414 entity ent, prev = world;
1415 for (ent = initialize_entity_first; ent; )
1417 if ((ent == e) || ((ent.classname == "initialize_entity") && (ent.enemy == e)))
1419 //print("make_safe_for_remove: getting rid of initializer ", etos(ent), "\n");
1420 // skip it in linked list
1423 prev.initialize_entity_next = ent.initialize_entity_next;
1424 ent = prev.initialize_entity_next;
1428 initialize_entity_first = ent.initialize_entity_next;
1429 ent = initialize_entity_first;
1435 ent = ent.initialize_entity_next;
1441 void objerror(string s)
1443 make_safe_for_remove(self);
1444 builtin_objerror(s);
1447 .float remove_except_protected_forbidden;
1448 void remove_except_protected(entity e)
1450 if(e.remove_except_protected_forbidden)
1451 error("not allowed to remove this at this point");
1455 void remove_unsafely(entity e)
1457 if(e.classname == "spike")
1458 error("Removing spikes is forbidden (crylink bug), please report");
1462 void remove_safely(entity e)
1464 make_safe_for_remove(e);
1468 void InitializeEntity(entity e, void(void) func, float order)
1472 if (!e || e.initialize_entity)
1474 // make a proxy initializer entity
1478 e.classname = "initialize_entity";
1482 e.initialize_entity = func;
1483 e.initialize_entity_order = order;
1485 cur = initialize_entity_first;
1489 if (!cur || cur.initialize_entity_order > order)
1491 // insert between prev and cur
1493 prev.initialize_entity_next = e;
1495 initialize_entity_first = e;
1496 e.initialize_entity_next = cur;
1500 cur = cur.initialize_entity_next;
1503 void InitializeEntitiesRun()
1506 startoflist = initialize_entity_first;
1507 initialize_entity_first = world;
1508 remove = remove_except_protected;
1509 for (self = startoflist; self; self = self.initialize_entity_next)
1511 self.remove_except_protected_forbidden = 1;
1513 for (self = startoflist; self; )
1516 var void(void) func;
1517 e = self.initialize_entity_next;
1518 func = self.initialize_entity;
1519 self.initialize_entity_order = 0;
1520 self.initialize_entity = func_null;
1521 self.initialize_entity_next = world;
1522 self.remove_except_protected_forbidden = 0;
1523 if (self.classname == "initialize_entity")
1527 builtin_remove(self);
1530 //dprint("Delayed initialization: ", self.classname, "\n");
1536 backtrace(strcat("Null function in: ", self.classname, "\n"));
1540 remove = remove_unsafely;
1543 .float uncustomizeentityforclient_set;
1544 .void(void) uncustomizeentityforclient;
1545 void UncustomizeEntitiesRun()
1549 for (self = world; (self = findfloat(self, uncustomizeentityforclient_set, 1)); )
1550 self.uncustomizeentityforclient();
1553 void SetCustomizer(entity e, float(void) customizer, void(void) uncustomizer)
1555 e.customizeentityforclient = customizer;
1556 e.uncustomizeentityforclient = uncustomizer;
1557 e.uncustomizeentityforclient_set = !!uncustomizer;
1561 #define IFTARGETED if(!self.nottargeted && self.targetname != "")
1564 void Net_LinkEntity(entity e, float docull, float dt, float(entity, float) sendfunc)
1568 if (e.classname == "")
1569 e.classname = "net_linked";
1571 if (e.model == "" || self.modelindex == 0)
1575 setmodel(e, "null");
1579 e.SendEntity = sendfunc;
1580 e.SendFlags = 0xFFFFFF;
1583 e.effects |= EF_NODEPTHTEST;
1587 e.nextthink = time + dt;
1588 e.think = SUB_Remove;
1593 entity eliminatedPlayers;
1594 .float(entity) isEliminated;
1595 float EliminatedPlayers_SendEntity(entity to, float sendflags)
1599 WriteByte(MSG_ENTITY, ENT_CLIENT_ELIMINATEDPLAYERS);
1600 WriteByte(MSG_ENTITY, sendflags);
1604 for(i = 1; i <= maxclients; i += 8)
1606 for(f = 0, e = edict_num(i), b = 1; b < 256; b *= 2, e = nextent(e))
1608 if(eliminatedPlayers.isEliminated(e))
1611 WriteByte(MSG_ENTITY, f);
1618 void EliminatedPlayers_Init(float(entity) isEliminated_func)
1620 if(eliminatedPlayers)
1622 backtrace("Can't spawn eliminatedPlayers again!");
1625 Net_LinkEntity(eliminatedPlayers = spawn(), FALSE, 0, EliminatedPlayers_SendEntity);
1626 eliminatedPlayers.isEliminated = isEliminated_func;
1630 void adaptor_think2touch()
1639 void adaptor_think2use()
1651 void adaptor_think2use_hittype_splash() // for timed projectile detonation
1653 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
1654 self.projectiledeathtype |= HITTYPE_SPLASH;
1655 adaptor_think2use();
1658 // deferred dropping
1659 void DropToFloor_Handler()
1661 builtin_droptofloor();
1662 self.dropped_origin = self.origin;
1667 InitializeEntity(self, DropToFloor_Handler, INITPRIO_DROPTOFLOOR);
1672 float trace_hits_box_a0, trace_hits_box_a1;
1674 float trace_hits_box_1d(float end, float thmi, float thma)
1678 // just check if x is in range
1686 // do the trace with respect to x
1687 // 0 -> end has to stay in thmi -> thma
1688 trace_hits_box_a0 = max(trace_hits_box_a0, min(thmi / end, thma / end));
1689 trace_hits_box_a1 = min(trace_hits_box_a1, max(thmi / end, thma / end));
1690 if (trace_hits_box_a0 > trace_hits_box_a1)
1696 float trace_hits_box(vector start, vector end, vector thmi, vector thma)
1701 // now it is a trace from 0 to end
1703 trace_hits_box_a0 = 0;
1704 trace_hits_box_a1 = 1;
1706 if (!trace_hits_box_1d(end_x, thmi_x, thma_x))
1708 if (!trace_hits_box_1d(end_y, thmi_y, thma_y))
1710 if (!trace_hits_box_1d(end_z, thmi_z, thma_z))
1716 float tracebox_hits_box(vector start, vector mi, vector ma, vector end, vector thmi, vector thma)
1718 return trace_hits_box(start, end, thmi - ma, thma - mi);
1721 float SUB_NoImpactCheck()
1723 // zero hitcontents = this is not the real impact, but either the
1724 // mirror-impact of something hitting the projectile instead of the
1725 // projectile hitting the something, or a touchareagrid one. Neither of
1726 // these stop the projectile from moving, so...
1727 if(trace_dphitcontents == 0)
1729 //dprint("A hit happened with zero hit contents... DEBUG THIS, this should never happen for projectiles! Projectile will self-destruct.\n");
1730 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));
1733 if (trace_dphitq3surfaceflags & Q3SURFACEFLAG_NOIMPACT)
1735 if (other == world && self.size != '0 0 0')
1738 tic = self.velocity * sys_frametime;
1739 tic = tic + normalize(tic) * vlen(self.maxs - self.mins);
1740 traceline(self.origin - tic, self.origin + tic, MOVE_NORMAL, self);
1741 if (trace_fraction >= 1)
1743 dprint("Odd... did not hit...?\n");
1745 else if (trace_dphitq3surfaceflags & Q3SURFACEFLAG_NOIMPACT)
1747 dprint("Detected and prevented the sky-grapple bug.\n");
1755 #define SUB_OwnerCheck() (other && (other == self.owner))
1757 void RemoveGrapplingHook(entity pl);
1758 void W_Crylink_Dequeue(entity e);
1759 float WarpZone_Projectile_Touch_ImpactFilter_Callback()
1761 if(SUB_OwnerCheck())
1763 if(SUB_NoImpactCheck())
1765 if(self.classname == "grapplinghook")
1766 RemoveGrapplingHook(self.realowner);
1767 else if(self.classname == "spike")
1769 W_Crylink_Dequeue(self);
1776 if(trace_ent && trace_ent.solid > SOLID_TRIGGER)
1777 UpdateCSQCProjectile(self);
1780 #define PROJECTILE_TOUCH if(WarpZone_Projectile_Touch()) return
1782 #define ITEM_TOUCH_NEEDKILL() (((trace_dpstartcontents | trace_dphitcontents) & DPCONTENTS_NODROP) || (trace_dphitq3surfaceflags & Q3SURFACEFLAG_SKY))
1783 #define ITEM_DAMAGE_NEEDKILL(dt) (((dt) == DEATH_HURTTRIGGER) || ((dt) == DEATH_SLIME) || ((dt) == DEATH_LAVA) || ((dt) == DEATH_SWAMP))
1785 void URI_Get_Callback(float id, float status, string data)
1787 if(url_URI_Get_Callback(id, status, data))
1791 else if (id == URI_GET_DISCARD)
1795 else if (id >= URI_GET_CURL && id <= URI_GET_CURL_END)
1798 Curl_URI_Get_Callback(id, status, data);
1800 else if (id >= URI_GET_IPBAN && id <= URI_GET_IPBAN_END)
1803 OnlineBanList_URI_Get_Callback(id, status, data);
1807 print("Received HTTP request data for an invalid id ", ftos(id), ".\n");
1811 string uid2name(string myuid) {
1813 s = db_get(ServerProgsDB, strcat("/uid2name/", myuid));
1815 // FIXME remove this later after 0.6 release
1816 // convert old style broken records to correct style
1819 s = db_get(ServerProgsDB, strcat("uid2name", myuid));
1822 db_put(ServerProgsDB, strcat("/uid2name/", myuid), s);
1823 db_put(ServerProgsDB, strcat("uid2name", myuid), "");
1828 s = "^1Unregistered Player";
1832 float MoveToRandomMapLocation(entity e, float goodcontents, float badcontents, float badsurfaceflags, float attempts, float maxaboveground, float minviewdistance)
1835 vector start, org, delta, end, enddown, mstart;
1838 m = e.dphitcontentsmask;
1839 e.dphitcontentsmask = goodcontents | badcontents;
1842 delta = world.maxs - world.mins;
1846 for (i = 0; i < attempts; ++i)
1848 start_x = org_x + random() * delta_x;
1849 start_y = org_y + random() * delta_y;
1850 start_z = org_z + random() * delta_z;
1852 // rule 1: start inside world bounds, and outside
1853 // solid, and don't start from somewhere where you can
1854 // fall down to evil
1855 tracebox(start, e.mins, e.maxs, start - '0 0 1' * delta_z, MOVE_NORMAL, e);
1856 if (trace_fraction >= 1)
1858 if (trace_startsolid)
1860 if (trace_dphitcontents & badcontents)
1862 if (trace_dphitq3surfaceflags & badsurfaceflags)
1865 // rule 2: if we are too high, lower the point
1866 if (trace_fraction * delta_z > maxaboveground)
1867 start = trace_endpos + '0 0 1' * maxaboveground;
1868 enddown = trace_endpos;
1870 // rule 3: make sure we aren't outside the map. This only works
1871 // for somewhat well formed maps. A good rule of thumb is that
1872 // the map should have a convex outside hull.
1873 // these can be traceLINES as we already verified the starting box
1874 mstart = start + 0.5 * (e.mins + e.maxs);
1875 traceline(mstart, mstart + '1 0 0' * delta_x, MOVE_NORMAL, e);
1876 if (trace_fraction >= 1 || trace_dphittexturename == "common/caulk")
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 + '0 1 0' * delta_y, 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 0 1' * delta_z, MOVE_NORMAL, e);
1888 if (trace_fraction >= 1 || trace_dphittexturename == "common/caulk")
1891 // rule 4: we must "see" some spawnpoint or item
1892 for(sp = world; (sp = find(sp, classname, "info_player_deathmatch")); )
1893 if(checkpvs(mstart, sp))
1894 if((traceline(mstart, sp.origin, MOVE_NORMAL, e), trace_fraction) >= 1)
1898 for(sp = world; (sp = findflags(sp, flags, FL_ITEM)); )
1899 if(checkpvs(mstart, sp))
1900 if((traceline(mstart, sp.origin + (sp.mins + sp.maxs) * 0.5, MOVE_NORMAL, e), trace_fraction) >= 1)
1906 // find a random vector to "look at"
1907 end_x = org_x + random() * delta_x;
1908 end_y = org_y + random() * delta_y;
1909 end_z = org_z + random() * delta_z;
1910 end = start + normalize(end - start) * vlen(delta);
1912 // rule 4: start TO end must not be too short
1913 tracebox(start, e.mins, e.maxs, end, MOVE_NORMAL, e);
1914 if (trace_startsolid)
1916 if (trace_fraction < minviewdistance / vlen(delta))
1919 // rule 5: don't want to look at sky
1920 if (trace_dphitq3surfaceflags & Q3SURFACEFLAG_SKY)
1923 // rule 6: we must not end up in trigger_hurt
1924 if (tracebox_hits_trigger_hurt(start, e.mins, e.maxs, enddown))
1930 e.dphitcontentsmask = m;
1934 setorigin(e, start);
1935 e.angles = vectoangles(end - start);
1936 dprint("Needed ", ftos(i + 1), " attempts\n");
1943 void write_recordmarker(entity pl, float tstart, float dt)
1945 GameLogEcho(strcat(":recordset:", ftos(pl.playerid), ":", ftos(dt)));
1947 // also write a marker into demo files for demotc-race-record-extractor to find
1950 strcat("//", strconv(2, 0, 0, GetGametype()), " RECORD SET ", TIME_ENCODED_TOSTRING(TIME_ENCODE(dt))),
1951 " ", ftos(tstart), " ", ftos(dt), "\n"));
1954 vector shotorg_adjustfromclient(vector vecs, float y_is_right, float allowcenter, float algn)
1967 if(allowcenter) // 2: allow center handedness
1980 if(allowcenter) // 2: allow center handedness
1996 vector shotorg_adjust_values(vector vecs, float y_is_right, float visual, float algn)
2001 if (autocvar_g_shootfromeye)
2005 if (autocvar_g_shootfromclient) { vecs = shotorg_adjustfromclient(vecs, y_is_right, (autocvar_g_shootfromclient >= 2), algn); }
2006 else { vecs_y = 0; vecs_z -= 2; }
2014 else if (autocvar_g_shootfromcenter)
2019 else if ((s = autocvar_g_shootfromfixedorigin) != "")
2029 else if (autocvar_g_shootfromclient)
2031 vecs = shotorg_adjustfromclient(vecs, y_is_right, (autocvar_g_shootfromclient >= 2), algn);
2036 vector shotorg_adjust(vector vecs, float y_is_right, float visual)
2038 return shotorg_adjust_values(vecs, y_is_right, visual, self.owner.cvar_cl_gunalign);
2042 void attach_sameorigin(entity e, entity to, string tag)
2044 vector org, t_forward, t_left, t_up, e_forward, e_up;
2047 org = e.origin - gettaginfo(to, gettagindex(to, tag));
2048 tagscale = pow(vlen(v_forward), -2); // undo a scale on the tag
2049 t_forward = v_forward * tagscale;
2050 t_left = v_right * -tagscale;
2051 t_up = v_up * tagscale;
2053 e.origin_x = org * t_forward;
2054 e.origin_y = org * t_left;
2055 e.origin_z = org * t_up;
2057 // current forward and up directions
2058 if (substring(e.model, 0, 1) == "*") // bmodels have their own rules
2059 e.angles = AnglesTransform_FromVAngles(e.angles);
2061 e.angles = AnglesTransform_FromAngles(e.angles);
2062 fixedmakevectors(e.angles);
2064 // untransform forward, up!
2065 e_forward_x = v_forward * t_forward;
2066 e_forward_y = v_forward * t_left;
2067 e_forward_z = v_forward * t_up;
2068 e_up_x = v_up * t_forward;
2069 e_up_y = v_up * t_left;
2070 e_up_z = v_up * t_up;
2072 e.angles = fixedvectoangles2(e_forward, e_up);
2073 if (substring(e.model, 0, 1) == "*") // bmodels have their own rules
2074 e.angles = AnglesTransform_ToVAngles(e.angles);
2076 e.angles = AnglesTransform_ToAngles(e.angles);
2078 setattachment(e, to, tag);
2079 setorigin(e, e.origin);
2082 void detach_sameorigin(entity e)
2085 org = gettaginfo(e, 0);
2086 e.angles = fixedvectoangles2(v_forward, v_up);
2087 if (substring(e.model, 0, 1) == "*") // bmodels have their own rules
2088 e.angles = AnglesTransform_ToVAngles(e.angles);
2090 e.angles = AnglesTransform_ToAngles(e.angles);
2092 setattachment(e, world, "");
2093 setorigin(e, e.origin);
2096 void follow_sameorigin(entity e, entity to)
2098 e.movetype = MOVETYPE_FOLLOW; // make the hole follow
2099 e.aiment = to; // make the hole follow bmodel
2100 e.punchangle = to.angles; // the original angles of bmodel
2101 e.view_ofs = e.origin - to.origin; // relative origin
2102 e.v_angle = e.angles - to.angles; // relative angles
2105 void unfollow_sameorigin(entity e)
2107 e.movetype = MOVETYPE_NONE;
2110 entity gettaginfo_relative_ent;
2111 vector gettaginfo_relative(entity e, float tag)
2113 if (!gettaginfo_relative_ent)
2115 gettaginfo_relative_ent = spawn();
2116 gettaginfo_relative_ent.effects = EF_NODRAW;
2118 gettaginfo_relative_ent.model = e.model;
2119 gettaginfo_relative_ent.modelindex = e.modelindex;
2120 gettaginfo_relative_ent.frame = e.frame;
2121 return gettaginfo(gettaginfo_relative_ent, tag);
2126 float modeleffect_SendEntity(entity to, float sf)
2129 WriteByte(MSG_ENTITY, ENT_CLIENT_MODELEFFECT);
2132 if(self.velocity != '0 0 0')
2134 if(self.angles != '0 0 0')
2136 if(self.avelocity != '0 0 0')
2139 WriteByte(MSG_ENTITY, f);
2140 WriteShort(MSG_ENTITY, self.modelindex);
2141 WriteByte(MSG_ENTITY, self.skin);
2142 WriteByte(MSG_ENTITY, self.frame);
2143 WriteCoord(MSG_ENTITY, self.origin_x);
2144 WriteCoord(MSG_ENTITY, self.origin_y);
2145 WriteCoord(MSG_ENTITY, self.origin_z);
2148 WriteCoord(MSG_ENTITY, self.velocity_x);
2149 WriteCoord(MSG_ENTITY, self.velocity_y);
2150 WriteCoord(MSG_ENTITY, self.velocity_z);
2154 WriteCoord(MSG_ENTITY, self.angles_x);
2155 WriteCoord(MSG_ENTITY, self.angles_y);
2156 WriteCoord(MSG_ENTITY, self.angles_z);
2160 WriteCoord(MSG_ENTITY, self.avelocity_x);
2161 WriteCoord(MSG_ENTITY, self.avelocity_y);
2162 WriteCoord(MSG_ENTITY, self.avelocity_z);
2164 WriteShort(MSG_ENTITY, self.scale * 256.0);
2165 WriteShort(MSG_ENTITY, self.scale2 * 256.0);
2166 WriteByte(MSG_ENTITY, self.teleport_time * 100.0);
2167 WriteByte(MSG_ENTITY, self.fade_time * 100.0);
2168 WriteByte(MSG_ENTITY, self.alpha * 255.0);
2173 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)
2178 e.classname = "modeleffect";
2186 e.teleport_time = t1;
2190 e.scale = s0 / max6(-e.mins_x, -e.mins_y, -e.mins_z, e.maxs_x, e.maxs_y, e.maxs_z);
2194 e.scale2 = s2 / max6(-e.mins_x, -e.mins_y, -e.mins_z, e.maxs_x, e.maxs_y, e.maxs_z);
2197 sz = max(e.scale, e.scale2);
2198 setsize(e, e.mins * sz, e.maxs * sz);
2199 Net_LinkEntity(e, FALSE, 0.1, modeleffect_SendEntity);
2202 void shockwave_spawn(string m, vector org, float sz, float t1, float t2)
2204 return modeleffect_spawn(m, 0, 0, org, '0 0 0', '0 0 0', '0 0 0', 0, sz, 1, t1, t2);
2207 float randombit(float bits)
2209 if(!(bits & (bits-1))) // this ONLY holds for powers of two!
2218 for(f = 1; f <= bits; f *= 2)
2227 r = (r - 1) / (n - 1);
2234 float randombits(float bits, float k, float error_return)
2238 while(k > 0 && bits != r)
2240 r += randombit(bits - r);
2249 void randombit_test(float bits, float iter)
2253 print(ftos(randombit(bits)), "\n");
2258 float ExponentialFalloff(float mindist, float maxdist, float halflifedist, float d)
2260 if(halflifedist > 0)
2261 return pow(0.5, (bound(mindist, d, maxdist) - mindist) / halflifedist);
2262 else if(halflifedist < 0)
2263 return pow(0.5, (bound(mindist, d, maxdist) - maxdist) / halflifedist);
2272 #define cvar_string_normal builtin_cvar_string
2273 #define cvar_normal builtin_cvar
2275 string cvar_string_normal(string n)
2277 if (!(cvar_type(n) & 1))
2278 backtrace(strcat("Attempt to access undefined cvar: ", n));
2279 return builtin_cvar_string(n);
2282 float cvar_normal(string n)
2284 return stof(cvar_string_normal(n));
2287 #define cvar_set_normal builtin_cvar_set
2295 oself.think = SUB_Remove;
2296 oself.nextthink = time;
2302 Execute func() after time + fdelay.
2303 self when func is executed = self when defer is called
2305 void defer(float fdelay, void() func)
2312 e.think = defer_think;
2313 e.nextthink = time + fdelay;
2316 .string aiment_classname;
2317 .float aiment_deadflag;
2318 void SetMovetypeFollow(entity ent, entity e)
2320 // FIXME this may not be warpzone aware
2321 ent.movetype = MOVETYPE_FOLLOW; // make the hole follow
2322 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.
2323 ent.aiment = e; // make the hole follow bmodel
2324 ent.punchangle = e.angles; // the original angles of bmodel
2325 ent.view_ofs = ent.origin - e.origin; // relative origin
2326 ent.v_angle = ent.angles - e.angles; // relative angles
2327 ent.aiment_classname = strzone(e.classname);
2328 ent.aiment_deadflag = e.deadflag;
2330 void UnsetMovetypeFollow(entity ent)
2332 ent.movetype = MOVETYPE_FLY;
2333 PROJECTILE_MAKETRIGGER(ent);
2336 float LostMovetypeFollow(entity ent)
2339 if(ent.movetype != MOVETYPE_FOLLOW)
2345 if(ent.aiment.classname != ent.aiment_classname)
2347 if(ent.aiment.deadflag != ent.aiment_deadflag)
2353 float isPushable(entity e)
2362 case "droppedweapon":
2363 case "keepawayball":
2364 case "nexball_basketball":
2365 case "nexball_football":
2367 case "bullet": // antilagged bullets can't hit this either
2370 if (e.projectiledeathtype)