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 = W_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 replacement = "batteries"; // ;)
365 } else if (escape == "x") {
366 replacement = cursor_ent.netname;
367 if (replacement == "" || !cursor_ent)
368 replacement = "nothing";
369 } else if (escape == "s")
370 replacement = ftos(vlen(self.velocity - self.velocity_z * '0 0 1'));
371 else if (escape == "S")
372 replacement = ftos(vlen(self.velocity));
374 msg = strcat(substring(msg, 0, p), replacement, substring(msg, p+2, strlen(msg) - (p+2)));
375 p = p + strlen(replacement);
380 float boolean(float value) { // if value is 0 return FALSE (0), otherwise return TRUE (1)
381 return (value == 0) ? FALSE : TRUE;
390 >0: receives a cvar from name=argv(f) value=argv(f+1)
392 void GetCvars_handleString(string thisname, float f, .string field, string name)
397 strunzone(self.field);
398 self.field = string_null;
402 if (thisname == name)
405 strunzone(self.field);
406 self.field = strzone(argv(f + 1));
410 stuffcmd(self, strcat("cl_cmd sendcvar ", name, "\n"));
412 void GetCvars_handleString_Fixup(string thisname, float f, .string field, string name, string(string) func)
414 GetCvars_handleString(thisname, f, field, name);
415 if (f >= 0) // also initialize to the fitting value for "" when sending cvars out
416 if (thisname == name)
419 s = func(strcat1(self.field));
422 strunzone(self.field);
423 self.field = strzone(s);
427 void GetCvars_handleFloat(string thisname, float f, .float field, string name)
434 if (thisname == name)
435 self.field = stof(argv(f + 1));
438 stuffcmd(self, strcat("cl_cmd sendcvar ", name, "\n"));
440 void GetCvars_handleFloatOnce(string thisname, float f, .float field, string name)
447 if (thisname == name)
451 self.field = stof(argv(f + 1));
460 stuffcmd(self, strcat("cl_cmd sendcvar ", name, "\n"));
463 float w_getbestweapon(entity e);
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_handleString(s, f, cvar_cl_physics, "cl_physics");
494 GetCvars_handleFloat(s, f, cvar_cl_handicap, "cl_handicap");
495 GetCvars_handleFloat(s, f, cvar_cl_clippedspectating, "cl_clippedspectating");
496 GetCvars_handleString_Fixup(s, f, cvar_cl_weaponpriority, "cl_weaponpriority", W_FixWeaponOrder_ForceComplete_AndBuildImpulseList);
497 GetCvars_handleString_Fixup(s, f, cvar_cl_weaponpriorities[0], "cl_weaponpriority0", W_FixWeaponOrder_AllowIncomplete);
498 GetCvars_handleString_Fixup(s, f, cvar_cl_weaponpriorities[1], "cl_weaponpriority1", W_FixWeaponOrder_AllowIncomplete);
499 GetCvars_handleString_Fixup(s, f, cvar_cl_weaponpriorities[2], "cl_weaponpriority2", W_FixWeaponOrder_AllowIncomplete);
500 GetCvars_handleString_Fixup(s, f, cvar_cl_weaponpriorities[3], "cl_weaponpriority3", W_FixWeaponOrder_AllowIncomplete);
501 GetCvars_handleString_Fixup(s, f, cvar_cl_weaponpriorities[4], "cl_weaponpriority4", W_FixWeaponOrder_AllowIncomplete);
502 GetCvars_handleString_Fixup(s, f, cvar_cl_weaponpriorities[5], "cl_weaponpriority5", W_FixWeaponOrder_AllowIncomplete);
503 GetCvars_handleString_Fixup(s, f, cvar_cl_weaponpriorities[6], "cl_weaponpriority6", W_FixWeaponOrder_AllowIncomplete);
504 GetCvars_handleString_Fixup(s, f, cvar_cl_weaponpriorities[7], "cl_weaponpriority7", W_FixWeaponOrder_AllowIncomplete);
505 GetCvars_handleString_Fixup(s, f, cvar_cl_weaponpriorities[8], "cl_weaponpriority8", W_FixWeaponOrder_AllowIncomplete);
506 GetCvars_handleString_Fixup(s, f, cvar_cl_weaponpriorities[9], "cl_weaponpriority9", W_FixWeaponOrder_AllowIncomplete);
507 GetCvars_handleFloat(s, f, cvar_cl_weaponimpulsemode, "cl_weaponimpulsemode");
508 GetCvars_handleFloat(s, f, cvar_cl_autotaunt, "cl_autotaunt");
509 GetCvars_handleFloat(s, f, cvar_cl_noantilag, "cl_noantilag");
510 GetCvars_handleFloat(s, f, cvar_cl_voice_directional, "cl_voice_directional");
511 GetCvars_handleFloat(s, f, cvar_cl_voice_directional_taunt_attenuation, "cl_voice_directional_taunt_attenuation");
512 GetCvars_handleFloat(s, f, cvar_cl_accuracy_data_share, "cl_accuracy_data_share");
513 GetCvars_handleFloat(s, f, cvar_cl_accuracy_data_receive, "cl_accuracy_data_receive");
515 self.cvar_cl_accuracy_data_share = boolean(self.cvar_cl_accuracy_data_share);
516 self.cvar_cl_accuracy_data_receive = boolean(self.cvar_cl_accuracy_data_receive);
518 GetCvars_handleFloatOnce(s, f, cvar_cl_gunalign, "cl_gunalign");
519 GetCvars_handleFloat(s, f, cvar_cl_allow_uid2name, "cl_allow_uid2name");
520 GetCvars_handleFloat(s, f, cvar_cl_allow_uidtracking, "cl_allow_uidtracking");
521 GetCvars_handleFloat(s, f, cvar_cl_movement_track_canjump, "cl_movement_track_canjump");
522 GetCvars_handleFloat(s, f, cvar_cl_newusekeysupported, "cl_newusekeysupported");
524 // fixup of switchweapon (needed for LMS or when spectating is disabled, as PutClientInServer comes too early)
527 if (s == "cl_weaponpriority")
528 self.switchweapon = w_getbestweapon(self);
529 if (s == "cl_allow_uidtracking")
530 PlayerStats_AddPlayer(self);
534 // decolorizes and team colors the player name when needed
535 string playername(entity p)
538 if (teamplay && !intermission_running && IS_PLAYER(p))
540 t = Team_ColorCode(p.team);
541 return strcat(t, strdecolorize(p.netname));
547 vector randompos(vector m1, vector m2)
551 v_x = m2_x * random() + m1_x;
552 v_y = m2_y * random() + m1_y;
553 v_z = m2_z * random() + m1_z;
557 //#NO AUTOCVARS START
559 float g_pickup_shells;
560 float g_pickup_shells_max;
561 float g_pickup_nails;
562 float g_pickup_nails_max;
563 float g_pickup_rockets;
564 float g_pickup_rockets_max;
565 float g_pickup_cells;
566 float g_pickup_cells_max;
568 float g_pickup_fuel_jetpack;
569 float g_pickup_fuel_max;
570 float g_pickup_armorsmall;
571 float g_pickup_armorsmall_max;
572 float g_pickup_armorsmall_anyway;
573 float g_pickup_armormedium;
574 float g_pickup_armormedium_max;
575 float g_pickup_armormedium_anyway;
576 float g_pickup_armorbig;
577 float g_pickup_armorbig_max;
578 float g_pickup_armorbig_anyway;
579 float g_pickup_armorlarge;
580 float g_pickup_armorlarge_max;
581 float g_pickup_armorlarge_anyway;
582 float g_pickup_healthsmall;
583 float g_pickup_healthsmall_max;
584 float g_pickup_healthsmall_anyway;
585 float g_pickup_healthmedium;
586 float g_pickup_healthmedium_max;
587 float g_pickup_healthmedium_anyway;
588 float g_pickup_healthlarge;
589 float g_pickup_healthlarge_max;
590 float g_pickup_healthlarge_anyway;
591 float g_pickup_healthmega;
592 float g_pickup_healthmega_max;
593 float g_pickup_healthmega_anyway;
594 float g_pickup_ammo_anyway;
595 float g_pickup_weapons_anyway;
597 WepSet g_weaponarena_weapons;
598 float g_weaponarena_random;
599 float g_weaponarena_random_with_laser;
600 string g_weaponarena_list;
601 float g_weaponspeedfactor;
602 float g_weaponratefactor;
603 float g_weapondamagefactor;
604 float g_weaponforcefactor;
605 float g_weaponspreadfactor;
607 WepSet start_weapons;
608 WepSet start_weapons_default;
609 WepSet start_weapons_defaultmask;
611 float start_ammo_shells;
612 float start_ammo_nails;
613 float start_ammo_rockets;
614 float start_ammo_cells;
615 float start_ammo_fuel;
617 float start_armorvalue;
618 WepSet warmup_start_weapons;
619 WepSet warmup_start_weapons_default;
620 WepSet warmup_start_weapons_defaultmask;
621 #define WARMUP_START_WEAPONS ((g_warmup_allguns == 1) ? (warmup_start_weapons & (weaponsInMap | start_weapons)) : warmup_start_weapons)
622 float warmup_start_ammo_shells;
623 float warmup_start_ammo_nails;
624 float warmup_start_ammo_rockets;
625 float warmup_start_ammo_cells;
626 float warmup_start_ammo_fuel;
627 float warmup_start_health;
628 float warmup_start_armorvalue;
631 entity get_weaponinfo(float w);
633 float want_weapon(string cvarprefix, entity weaponinfo, float allguns)
635 var float i = weaponinfo.weapon;
641 if (g_lms || g_ca || allguns)
643 if(weaponinfo.spawnflags & WEP_FLAG_NORMAL)
649 d = (i == WEP_SHOTGUN);
651 d = 0; // weapon is set a few lines later
653 d = (i == WEP_LASER || i == WEP_SHOTGUN);
655 if(g_grappling_hook) // if possible, redirect off-hand hook to on-hand hook
656 d |= (i == WEP_HOOK);
657 if(weaponinfo.spawnflags & WEP_FLAG_MUTATORBLOCKED) // never default mutator blocked guns
660 var float t = cvar(strcat(cvarprefix, weaponinfo.netname));
662 //print(strcat("want_weapon: ", weaponinfo.netname, " - d: ", ftos(d), ", t: ", ftos(t), ". \n"));
667 // 4: is set by default?
676 void readplayerstartcvars()
682 // initialize starting values for players
683 start_weapons = '0 0 0';
684 start_weapons_default = '0 0 0';
685 start_weapons_defaultmask = '0 0 0';
687 start_ammo_shells = 0;
688 start_ammo_nails = 0;
689 start_ammo_rockets = 0;
690 start_ammo_cells = 0;
691 start_health = cvar("g_balance_health_start");
692 start_armorvalue = cvar("g_balance_armor_start");
695 g_weaponarena_weapons = '0 0 0';
697 s = cvar_string("g_weaponarena");
698 if (s == "0" || s == "")
704 if (s == "0" || s == "")
710 // forcibly turn off weaponarena
712 else if (s == "all" || s == "1")
715 g_weaponarena_list = "All Weapons";
716 for (j = WEP_FIRST; j <= WEP_LAST; ++j)
718 e = get_weaponinfo(j);
719 if (!(e.spawnflags & WEP_FLAG_MUTATORBLOCKED))
720 g_weaponarena_weapons |= WepSet_FromWeapon(j);
723 else if (s == "most")
726 g_weaponarena_list = "Most Weapons";
727 for (j = WEP_FIRST; j <= WEP_LAST; ++j)
729 e = get_weaponinfo(j);
730 if (!(e.spawnflags & WEP_FLAG_MUTATORBLOCKED))
731 if (e.spawnflags & WEP_FLAG_NORMAL)
732 g_weaponarena_weapons |= WepSet_FromWeapon(j);
735 else if (s == "none")
738 g_weaponarena_list = "No Weapons";
743 t = tokenize_console(s);
744 g_weaponarena_list = "";
745 for (i = 0; i < t; ++i)
748 for (j = WEP_FIRST; j <= WEP_LAST; ++j)
750 e = get_weaponinfo(j);
753 g_weaponarena_weapons |= WepSet_FromWeapon(j);
754 g_weaponarena_list = strcat(g_weaponarena_list, e.message, " & ");
760 print("The weapon mutator list contains an unknown weapon ", s, ". Skipped.\n");
763 g_weaponarena_list = strzone(substring(g_weaponarena_list, 0, strlen(g_weaponarena_list) - 3));
767 g_weaponarena_random = cvar("g_weaponarena_random");
769 g_weaponarena_random = 0;
770 g_weaponarena_random_with_laser = cvar("g_weaponarena_random_with_laser");
774 g_weapon_stay = 0; // incompatible
775 start_weapons = g_weaponarena_weapons;
776 start_items |= IT_UNLIMITED_AMMO;
780 for (i = WEP_FIRST; i <= WEP_LAST; ++i)
782 e = get_weaponinfo(i);
783 float w = want_weapon("g_start_weapon_", e, FALSE);
785 start_weapons |= WepSet_FromWeapon(i);
787 start_weapons_default |= WepSet_FromWeapon(i);
789 start_weapons_defaultmask |= WepSet_FromWeapon(i);
793 if(!cvar("g_use_ammunition"))
794 start_items |= IT_UNLIMITED_AMMO;
796 if(start_items & IT_UNLIMITED_WEAPON_AMMO)
798 start_ammo_rockets = 999;
799 start_ammo_shells = 999;
800 start_ammo_cells = 999;
801 start_ammo_nails = 999;
802 start_ammo_fuel = 999;
806 start_ammo_shells = cvar("g_start_ammo_shells");
807 start_ammo_nails = cvar("g_start_ammo_nails");
808 start_ammo_rockets = cvar("g_start_ammo_rockets");
809 start_ammo_cells = cvar("g_start_ammo_cells");
810 start_ammo_fuel = cvar("g_start_ammo_fuel");
815 warmup_start_ammo_shells = start_ammo_shells;
816 warmup_start_ammo_nails = start_ammo_nails;
817 warmup_start_ammo_rockets = start_ammo_rockets;
818 warmup_start_ammo_cells = start_ammo_cells;
819 warmup_start_ammo_fuel = start_ammo_fuel;
820 warmup_start_health = start_health;
821 warmup_start_armorvalue = start_armorvalue;
822 warmup_start_weapons = start_weapons;
823 warmup_start_weapons_default = start_weapons_default;
824 warmup_start_weapons_defaultmask = start_weapons_defaultmask;
826 if (!g_weaponarena && !g_ca)
828 warmup_start_ammo_shells = cvar("g_warmup_start_ammo_shells");
829 warmup_start_ammo_cells = cvar("g_warmup_start_ammo_cells");
830 warmup_start_ammo_nails = cvar("g_warmup_start_ammo_nails");
831 warmup_start_ammo_rockets = cvar("g_warmup_start_ammo_rockets");
832 warmup_start_ammo_fuel = cvar("g_warmup_start_ammo_fuel");
833 warmup_start_health = cvar("g_warmup_start_health");
834 warmup_start_armorvalue = cvar("g_warmup_start_armor");
835 warmup_start_weapons = '0 0 0';
836 warmup_start_weapons_default = '0 0 0';
837 warmup_start_weapons_defaultmask = '0 0 0';
838 for (i = WEP_FIRST; i <= WEP_LAST; ++i)
840 e = get_weaponinfo(i);
841 float w = want_weapon("g_start_weapon_", e, g_warmup_allguns);
843 warmup_start_weapons |= WepSet_FromWeapon(i);
845 warmup_start_weapons_default |= WepSet_FromWeapon(i);
847 warmup_start_weapons_defaultmask |= WepSet_FromWeapon(i);
853 start_items |= IT_JETPACK;
855 MUTATOR_CALLHOOK(SetStartItems);
857 if ((start_items & IT_JETPACK) || (g_grappling_hook && (start_weapons & WEPSET_HOOK)))
859 g_grappling_hook = 0; // these two can't coexist, as they use the same button
860 start_items |= IT_FUEL_REGEN;
861 start_ammo_fuel = max(start_ammo_fuel, cvar("g_balance_fuel_rotstable"));
862 warmup_start_ammo_fuel = max(warmup_start_ammo_fuel, cvar("g_balance_fuel_rotstable"));
865 WepSet precache_weapons = start_weapons;
866 if (g_warmup_allguns != 1)
867 precache_weapons |= warmup_start_weapons;
868 for (i = WEP_FIRST; i <= WEP_LAST; ++i)
870 e = get_weaponinfo(i);
871 if(precache_weapons & WepSet_FromWeapon(i))
872 weapon_action(i, WR_PRECACHE);
875 start_ammo_shells = max(0, start_ammo_shells);
876 start_ammo_nails = max(0, start_ammo_nails);
877 start_ammo_cells = max(0, start_ammo_cells);
878 start_ammo_rockets = max(0, start_ammo_rockets);
879 start_ammo_fuel = max(0, start_ammo_fuel);
881 warmup_start_ammo_shells = max(0, warmup_start_ammo_shells);
882 warmup_start_ammo_nails = max(0, warmup_start_ammo_nails);
883 warmup_start_ammo_cells = max(0, warmup_start_ammo_cells);
884 warmup_start_ammo_rockets = max(0, warmup_start_ammo_rockets);
885 warmup_start_ammo_fuel = max(0, warmup_start_ammo_fuel);
889 float g_bugrigs_planar_movement;
890 float g_bugrigs_planar_movement_car_jumping;
891 float g_bugrigs_reverse_spinning;
892 float g_bugrigs_reverse_speeding;
893 float g_bugrigs_reverse_stopping;
894 float g_bugrigs_air_steering;
895 float g_bugrigs_angle_smoothing;
896 float g_bugrigs_friction_floor;
897 float g_bugrigs_friction_brake;
898 float g_bugrigs_friction_air;
899 float g_bugrigs_accel;
900 float g_bugrigs_speed_ref;
901 float g_bugrigs_speed_pow;
902 float g_bugrigs_steer;
907 string GetGametype(); // g_world.qc
908 void mutators_add(); // mutators.qc
909 void readlevelcvars(void)
914 if(cvar("sv_allow_fullbright"))
915 serverflags |= SERVERFLAG_ALLOW_FULLBRIGHT;
917 g_bugrigs = cvar("g_bugrigs");
918 g_bugrigs_planar_movement = cvar("g_bugrigs_planar_movement");
919 g_bugrigs_planar_movement_car_jumping = cvar("g_bugrigs_planar_movement_car_jumping");
920 g_bugrigs_reverse_spinning = cvar("g_bugrigs_reverse_spinning");
921 g_bugrigs_reverse_speeding = cvar("g_bugrigs_reverse_speeding");
922 g_bugrigs_reverse_stopping = cvar("g_bugrigs_reverse_stopping");
923 g_bugrigs_air_steering = cvar("g_bugrigs_air_steering");
924 g_bugrigs_angle_smoothing = cvar("g_bugrigs_angle_smoothing");
925 g_bugrigs_friction_floor = cvar("g_bugrigs_friction_floor");
926 g_bugrigs_friction_brake = cvar("g_bugrigs_friction_brake");
927 g_bugrigs_friction_air = cvar("g_bugrigs_friction_air");
928 g_bugrigs_accel = cvar("g_bugrigs_accel");
929 g_bugrigs_speed_ref = cvar("g_bugrigs_speed_ref");
930 g_bugrigs_speed_pow = cvar("g_bugrigs_speed_pow");
931 g_bugrigs_steer = cvar("g_bugrigs_steer");
933 g_instagib = cvar("g_instagib");
935 sv_clones = cvar("sv_clones");
936 sv_foginterval = cvar("sv_foginterval");
937 g_cloaked = cvar("g_cloaked");
938 g_footsteps = cvar("g_footsteps");
939 g_grappling_hook = cvar("g_grappling_hook");
940 g_jetpack = cvar("g_jetpack");
941 sv_maxidle = cvar("sv_maxidle");
942 sv_maxidle_spectatorsareidle = cvar("sv_maxidle_spectatorsareidle");
943 sv_autotaunt = cvar("sv_autotaunt");
944 sv_taunt = cvar("sv_taunt");
946 warmup_stage = cvar("g_warmup");
947 g_warmup_limit = cvar("g_warmup_limit");
948 g_warmup_allguns = cvar("g_warmup_allguns");
949 g_warmup_allow_timeout = cvar("g_warmup_allow_timeout");
951 if ((g_race && g_race_qualifying == 2) || g_assault || cvar("g_campaign"))
952 warmup_stage = 0; // these modes cannot work together, sorry
954 g_pickup_respawntime_weapon = cvar("g_pickup_respawntime_weapon");
955 g_pickup_respawntime_superweapon = cvar("g_pickup_respawntime_superweapon");
956 g_pickup_respawntime_ammo = cvar("g_pickup_respawntime_ammo");
957 g_pickup_respawntime_short = cvar("g_pickup_respawntime_short");
958 g_pickup_respawntime_medium = cvar("g_pickup_respawntime_medium");
959 g_pickup_respawntime_long = cvar("g_pickup_respawntime_long");
960 g_pickup_respawntime_powerup = cvar("g_pickup_respawntime_powerup");
961 g_pickup_respawntimejitter_weapon = cvar("g_pickup_respawntimejitter_weapon");
962 g_pickup_respawntimejitter_superweapon = cvar("g_pickup_respawntimejitter_superweapon");
963 g_pickup_respawntimejitter_ammo = cvar("g_pickup_respawntimejitter_ammo");
964 g_pickup_respawntimejitter_short = cvar("g_pickup_respawntimejitter_short");
965 g_pickup_respawntimejitter_medium = cvar("g_pickup_respawntimejitter_medium");
966 g_pickup_respawntimejitter_long = cvar("g_pickup_respawntimejitter_long");
967 g_pickup_respawntimejitter_powerup = cvar("g_pickup_respawntimejitter_powerup");
969 g_weaponspeedfactor = cvar("g_weaponspeedfactor");
970 g_weaponratefactor = cvar("g_weaponratefactor");
971 g_weapondamagefactor = cvar("g_weapondamagefactor");
972 g_weaponforcefactor = cvar("g_weaponforcefactor");
973 g_weaponspreadfactor = cvar("g_weaponspreadfactor");
975 g_pickup_shells = cvar("g_pickup_shells");
976 g_pickup_shells_max = cvar("g_pickup_shells_max");
977 g_pickup_nails = cvar("g_pickup_nails");
978 g_pickup_nails_max = cvar("g_pickup_nails_max");
979 g_pickup_rockets = cvar("g_pickup_rockets");
980 g_pickup_rockets_max = cvar("g_pickup_rockets_max");
981 g_pickup_cells = cvar("g_pickup_cells");
982 g_pickup_cells_max = cvar("g_pickup_cells_max");
983 g_pickup_fuel = cvar("g_pickup_fuel");
984 g_pickup_fuel_jetpack = cvar("g_pickup_fuel_jetpack");
985 g_pickup_fuel_max = cvar("g_pickup_fuel_max");
986 g_pickup_armorsmall = cvar("g_pickup_armorsmall");
987 g_pickup_armorsmall_max = cvar("g_pickup_armorsmall_max");
988 g_pickup_armorsmall_anyway = cvar("g_pickup_armorsmall_anyway");
989 g_pickup_armormedium = cvar("g_pickup_armormedium");
990 g_pickup_armormedium_max = cvar("g_pickup_armormedium_max");
991 g_pickup_armormedium_anyway = cvar("g_pickup_armormedium_anyway");
992 g_pickup_armorbig = cvar("g_pickup_armorbig");
993 g_pickup_armorbig_max = cvar("g_pickup_armorbig_max");
994 g_pickup_armorbig_anyway = cvar("g_pickup_armorbig_anyway");
995 g_pickup_armorlarge = cvar("g_pickup_armorlarge");
996 g_pickup_armorlarge_max = cvar("g_pickup_armorlarge_max");
997 g_pickup_armorlarge_anyway = cvar("g_pickup_armorlarge_anyway");
998 g_pickup_healthsmall = cvar("g_pickup_healthsmall");
999 g_pickup_healthsmall_max = cvar("g_pickup_healthsmall_max");
1000 g_pickup_healthsmall_anyway = cvar("g_pickup_healthsmall_anyway");
1001 g_pickup_healthmedium = cvar("g_pickup_healthmedium");
1002 g_pickup_healthmedium_max = cvar("g_pickup_healthmedium_max");
1003 g_pickup_healthmedium_anyway = cvar("g_pickup_healthmedium_anyway");
1004 g_pickup_healthlarge = cvar("g_pickup_healthlarge");
1005 g_pickup_healthlarge_max = cvar("g_pickup_healthlarge_max");
1006 g_pickup_healthlarge_anyway = cvar("g_pickup_healthlarge_anyway");
1007 g_pickup_healthmega = cvar("g_pickup_healthmega");
1008 g_pickup_healthmega_max = cvar("g_pickup_healthmega_max");
1009 g_pickup_healthmega_anyway = cvar("g_pickup_healthmega_anyway");
1011 g_pickup_ammo_anyway = cvar("g_pickup_ammo_anyway");
1012 g_pickup_weapons_anyway = cvar("g_pickup_weapons_anyway");
1014 g_weapon_stay = cvar(strcat("g_", GetGametype(), "_weapon_stay"));
1016 g_weapon_stay = cvar("g_weapon_stay");
1019 game_starttime = time + cvar("g_start_delay");
1021 readplayerstartcvars();
1027 string precache_sound (string s) = #19;
1028 float precache_sound_index (string s) = #19;
1030 #define SND_VOLUME 1
1031 #define SND_ATTENUATION 2
1032 #define SND_LARGEENTITY 8
1033 #define SND_LARGESOUND 16
1035 float sound_allowed(float dest, entity e)
1037 // sounds from world may always pass
1040 if (e.classname == "body")
1042 else if (e.realowner && e.realowner != e)
1044 else if (e.owner && e.owner != e)
1049 // sounds to self may always pass
1050 if (dest == MSG_ONE)
1051 if (e == msg_entity)
1053 // sounds by players can be removed
1054 if (autocvar_bot_sound_monopoly)
1055 if (IS_REAL_CLIENT(e))
1057 // anything else may pass
1062 void sound(entity e, float chan, string samp, float vol, float atten)
1064 if (!sound_allowed(MSG_BROADCAST, e))
1066 sound7(e, chan, samp, vol, atten, 0, 0);
1069 void soundtoat(float dest, entity e, vector o, float chan, string samp, float vol, float atten)
1073 if (!sound_allowed(dest, e))
1076 entno = num_for_edict(e);
1077 idx = precache_sound_index(samp);
1082 atten = floor(atten * 64);
1083 vol = floor(vol * 255);
1086 sflags |= SND_VOLUME;
1088 sflags |= SND_ATTENUATION;
1089 if (entno >= 8192 || chan < 0 || chan > 7)
1090 sflags |= SND_LARGEENTITY;
1092 sflags |= SND_LARGESOUND;
1094 WriteByte(dest, SVC_SOUND);
1095 WriteByte(dest, sflags);
1096 if (sflags & SND_VOLUME)
1097 WriteByte(dest, vol);
1098 if (sflags & SND_ATTENUATION)
1099 WriteByte(dest, atten);
1100 if (sflags & SND_LARGEENTITY)
1102 WriteShort(dest, entno);
1103 WriteByte(dest, chan);
1107 WriteShort(dest, entno * 8 + chan);
1109 if (sflags & SND_LARGESOUND)
1110 WriteShort(dest, idx);
1112 WriteByte(dest, idx);
1114 WriteCoord(dest, o_x);
1115 WriteCoord(dest, o_y);
1116 WriteCoord(dest, o_z);
1118 void soundto(float dest, entity e, float chan, string samp, float vol, float atten)
1122 if (!sound_allowed(dest, e))
1125 o = e.origin + 0.5 * (e.mins + e.maxs);
1126 soundtoat(dest, e, o, chan, samp, vol, atten);
1128 void soundat(entity e, vector o, float chan, string samp, float vol, float atten)
1130 soundtoat(((chan & 8) ? MSG_ALL : MSG_BROADCAST), e, o, chan, samp, vol, atten);
1132 void stopsoundto(float dest, entity e, float chan)
1136 if (!sound_allowed(dest, e))
1139 entno = num_for_edict(e);
1141 if (entno >= 8192 || chan < 0 || chan > 7)
1144 idx = precache_sound_index("misc/null.wav");
1145 sflags = SND_LARGEENTITY;
1147 sflags |= SND_LARGESOUND;
1148 WriteByte(dest, SVC_SOUND);
1149 WriteByte(dest, sflags);
1150 WriteShort(dest, entno);
1151 WriteByte(dest, chan);
1152 if (sflags & SND_LARGESOUND)
1153 WriteShort(dest, idx);
1155 WriteByte(dest, idx);
1156 WriteCoord(dest, e.origin_x);
1157 WriteCoord(dest, e.origin_y);
1158 WriteCoord(dest, e.origin_z);
1162 WriteByte(dest, SVC_STOPSOUND);
1163 WriteShort(dest, entno * 8 + chan);
1166 void stopsound(entity e, float chan)
1168 if (!sound_allowed(MSG_BROADCAST, e))
1171 stopsoundto(MSG_BROADCAST, e, chan); // unreliable, gets there fast
1172 stopsoundto(MSG_ALL, e, chan); // in case of packet loss
1175 void play2(entity e, string filename)
1177 //stuffcmd(e, strcat("play2 ", filename, "\n"));
1179 soundtoat(MSG_ONE, world, '0 0 0', CH_INFO, filename, VOL_BASE, ATTEN_NONE);
1182 // use this one if you might be causing spam (e.g. from touch functions that might get called more than once per frame)
1184 float spamsound(entity e, float chan, string samp, float vol, float atten)
1186 if (!sound_allowed(MSG_BROADCAST, e))
1189 if (time > e.spamtime)
1192 sound(e, chan, samp, vol, atten);
1198 void play2team(float t, string filename)
1202 if (autocvar_bot_sound_monopoly)
1205 FOR_EACH_REALPLAYER(head)
1208 play2(head, filename);
1212 void play2all(string samp)
1214 if (autocvar_bot_sound_monopoly)
1217 sound(world, CH_INFO, samp, VOL_BASE, ATTEN_NONE);
1220 void PrecachePlayerSounds(string f);
1221 void precache_playermodel(string m)
1223 float globhandle, i, n;
1226 if(substring(m, -9,5) == "_lod1")
1228 if(substring(m, -9,5) == "_lod2")
1231 f = strcat(substring(m, 0, -5), "_lod1", substring(m, -4, -1));
1234 f = strcat(substring(m, 0, -5), "_lod2", substring(m, -4, -1));
1238 globhandle = search_begin(strcat(m, "_*.sounds"), TRUE, FALSE);
1241 n = search_getsize(globhandle);
1242 for (i = 0; i < n; ++i)
1244 //print(search_getfilename(globhandle, i), "\n");
1245 f = search_getfilename(globhandle, i);
1246 PrecachePlayerSounds(f);
1248 search_end(globhandle);
1250 void precache_all_playermodels(string pattern)
1252 float globhandle, i, n;
1255 globhandle = search_begin(pattern, TRUE, FALSE);
1258 n = search_getsize(globhandle);
1259 for (i = 0; i < n; ++i)
1261 //print(search_getfilename(globhandle, i), "\n");
1262 f = search_getfilename(globhandle, i);
1263 precache_playermodel(f);
1265 search_end(globhandle);
1270 // gamemode related things
1271 precache_model ("models/misc/chatbubble.spr");
1272 precache_model("models/ice/ice.md3");
1274 #ifdef TTURRETS_ENABLED
1275 if (autocvar_g_turrets)
1279 // Precache all player models if desired
1280 if (autocvar_sv_precacheplayermodels)
1282 PrecachePlayerSounds("sound/player/default.sounds");
1283 precache_all_playermodels("models/player/*.zym");
1284 precache_all_playermodels("models/player/*.dpm");
1285 precache_all_playermodels("models/player/*.md3");
1286 precache_all_playermodels("models/player/*.psk");
1287 precache_all_playermodels("models/player/*.iqm");
1290 if (autocvar_sv_defaultcharacter)
1293 s = autocvar_sv_defaultplayermodel_red;
1295 precache_playermodel(s);
1296 s = autocvar_sv_defaultplayermodel_blue;
1298 precache_playermodel(s);
1299 s = autocvar_sv_defaultplayermodel_yellow;
1301 precache_playermodel(s);
1302 s = autocvar_sv_defaultplayermodel_pink;
1304 precache_playermodel(s);
1305 s = autocvar_sv_defaultplayermodel;
1307 precache_playermodel(s);
1312 PrecacheGlobalSound((globalsound_step = "misc/footstep0 6"));
1313 PrecacheGlobalSound((globalsound_metalstep = "misc/metalfootstep0 6"));
1316 // gore and miscellaneous sounds
1317 //precache_sound ("misc/h2ohit.wav");
1318 precache_model ("models/hook.md3");
1319 precache_sound ("misc/armorimpact.wav");
1320 precache_sound ("misc/bodyimpact1.wav");
1321 precache_sound ("misc/bodyimpact2.wav");
1322 precache_sound ("misc/gib.wav");
1323 precache_sound ("misc/gib_splat01.wav");
1324 precache_sound ("misc/gib_splat02.wav");
1325 precache_sound ("misc/gib_splat03.wav");
1326 precache_sound ("misc/gib_splat04.wav");
1327 PrecacheGlobalSound((globalsound_fall = "misc/hitground 4"));
1328 PrecacheGlobalSound((globalsound_metalfall = "misc/metalhitground 4"));
1329 precache_sound ("misc/null.wav");
1330 precache_sound ("misc/spawn.wav");
1331 precache_sound ("misc/talk.wav");
1332 precache_sound ("misc/teleport.wav");
1333 precache_sound ("misc/poweroff.wav");
1334 precache_sound ("player/lava.wav");
1335 precache_sound ("player/slime.wav");
1337 precache_model ("models/sprites/0.spr32");
1338 precache_model ("models/sprites/1.spr32");
1339 precache_model ("models/sprites/2.spr32");
1340 precache_model ("models/sprites/3.spr32");
1341 precache_model ("models/sprites/4.spr32");
1342 precache_model ("models/sprites/5.spr32");
1343 precache_model ("models/sprites/6.spr32");
1344 precache_model ("models/sprites/7.spr32");
1345 precache_model ("models/sprites/8.spr32");
1346 precache_model ("models/sprites/9.spr32");
1347 precache_model ("models/sprites/10.spr32");
1349 // common weapon precaches
1350 precache_sound ("weapons/reload.wav"); // until weapons have individual reload sounds, precache the reload sound here
1351 precache_sound ("weapons/weapon_switch.wav");
1352 precache_sound ("weapons/weaponpickup.wav");
1353 precache_sound ("weapons/unavailable.wav");
1354 precache_sound ("weapons/dryfire.wav");
1355 if (g_grappling_hook)
1357 precache_sound ("weapons/hook_fire.wav"); // hook
1358 precache_sound ("weapons/hook_impact.wav"); // hook
1361 if(autocvar_sv_precacheweapons)
1363 //precache weapon models/sounds
1366 while (wep <= WEP_LAST)
1368 weapon_action(wep, WR_PRECACHE);
1373 precache_model("models/elaser.mdl");
1374 precache_model("models/laser.mdl");
1375 precache_model("models/ebomb.mdl");
1378 // Disabled this code because it simply does not work (e.g. ignores bgmvolume, overlaps with "cd loop" controlled tracks).
1380 if (!self.noise && self.music) // quake 3 uses the music field
1381 self.noise = self.music;
1383 // plays music for the level if there is any
1386 precache_sound (self.noise);
1387 ambientsound ('0 0 0', self.noise, VOL_BASE, ATTEN_NONE);
1391 #include "precache-for-csqc.inc"
1394 // WARNING: this kills the trace globals
1395 #define EXACTTRIGGER_TOUCH if(WarpZoneLib_ExactTrigger_Touch()) return
1396 #define EXACTTRIGGER_INIT WarpZoneLib_ExactTrigger_Init()
1398 #define INITPRIO_FIRST 0
1399 #define INITPRIO_GAMETYPE 0
1400 #define INITPRIO_GAMETYPE_FALLBACK 1
1401 #define INITPRIO_FINDTARGET 10
1402 #define INITPRIO_DROPTOFLOOR 20
1403 #define INITPRIO_SETLOCATION 90
1404 #define INITPRIO_LINKDOORS 91
1405 #define INITPRIO_LAST 99
1407 .void(void) initialize_entity;
1408 .float initialize_entity_order;
1409 .entity initialize_entity_next;
1410 entity initialize_entity_first;
1412 void make_safe_for_remove(entity e)
1414 if (e.initialize_entity)
1416 entity ent, prev = world;
1417 for (ent = initialize_entity_first; ent; )
1419 if ((ent == e) || ((ent.classname == "initialize_entity") && (ent.enemy == e)))
1421 //print("make_safe_for_remove: getting rid of initializer ", etos(ent), "\n");
1422 // skip it in linked list
1425 prev.initialize_entity_next = ent.initialize_entity_next;
1426 ent = prev.initialize_entity_next;
1430 initialize_entity_first = ent.initialize_entity_next;
1431 ent = initialize_entity_first;
1437 ent = ent.initialize_entity_next;
1443 void objerror(string s)
1445 make_safe_for_remove(self);
1446 builtin_objerror(s);
1449 .float remove_except_protected_forbidden;
1450 void remove_except_protected(entity e)
1452 if(e.remove_except_protected_forbidden)
1453 error("not allowed to remove this at this point");
1457 void remove_unsafely(entity e)
1459 if(e.classname == "spike")
1460 error("Removing spikes is forbidden (crylink bug), please report");
1464 void remove_safely(entity e)
1466 make_safe_for_remove(e);
1470 void InitializeEntity(entity e, void(void) func, float order)
1474 if (!e || e.initialize_entity)
1476 // make a proxy initializer entity
1480 e.classname = "initialize_entity";
1484 e.initialize_entity = func;
1485 e.initialize_entity_order = order;
1487 cur = initialize_entity_first;
1491 if (!cur || cur.initialize_entity_order > order)
1493 // insert between prev and cur
1495 prev.initialize_entity_next = e;
1497 initialize_entity_first = e;
1498 e.initialize_entity_next = cur;
1502 cur = cur.initialize_entity_next;
1505 void InitializeEntitiesRun()
1508 startoflist = initialize_entity_first;
1509 initialize_entity_first = world;
1510 remove = remove_except_protected;
1511 for (self = startoflist; self; self = self.initialize_entity_next)
1513 self.remove_except_protected_forbidden = 1;
1515 for (self = startoflist; self; )
1518 var void(void) func;
1519 e = self.initialize_entity_next;
1520 func = self.initialize_entity;
1521 self.initialize_entity_order = 0;
1522 self.initialize_entity = func_null;
1523 self.initialize_entity_next = world;
1524 self.remove_except_protected_forbidden = 0;
1525 if (self.classname == "initialize_entity")
1529 builtin_remove(self);
1532 //dprint("Delayed initialization: ", self.classname, "\n");
1538 backtrace(strcat("Null function in: ", self.classname, "\n"));
1542 remove = remove_unsafely;
1545 .float uncustomizeentityforclient_set;
1546 .void(void) uncustomizeentityforclient;
1547 void UncustomizeEntitiesRun()
1551 for (self = world; (self = findfloat(self, uncustomizeentityforclient_set, 1)); )
1552 self.uncustomizeentityforclient();
1555 void SetCustomizer(entity e, float(void) customizer, void(void) uncustomizer)
1557 e.customizeentityforclient = customizer;
1558 e.uncustomizeentityforclient = uncustomizer;
1559 e.uncustomizeentityforclient_set = !!uncustomizer;
1563 #define IFTARGETED if(!self.nottargeted && self.targetname != "")
1566 void Net_LinkEntity(entity e, float docull, float dt, float(entity, float) sendfunc)
1570 if (e.classname == "")
1571 e.classname = "net_linked";
1573 if (e.model == "" || self.modelindex == 0)
1577 setmodel(e, "null");
1581 e.SendEntity = sendfunc;
1582 e.SendFlags = 0xFFFFFF;
1585 e.effects |= EF_NODEPTHTEST;
1589 e.nextthink = time + dt;
1590 e.think = SUB_Remove;
1595 entity eliminatedPlayers;
1596 .float(entity) isEliminated;
1597 float EliminatedPlayers_SendEntity(entity to, float sendflags)
1601 WriteByte(MSG_ENTITY, ENT_CLIENT_ELIMINATEDPLAYERS);
1602 WriteByte(MSG_ENTITY, sendflags);
1606 for(i = 1; i <= maxclients; i += 8)
1608 for(f = 0, e = edict_num(i), b = 1; b < 256; b *= 2, e = nextent(e))
1610 if(eliminatedPlayers.isEliminated(e))
1613 WriteByte(MSG_ENTITY, f);
1620 void EliminatedPlayers_Init(float(entity) isEliminated_func)
1622 if(eliminatedPlayers)
1624 backtrace("Can't spawn eliminatedPlayers again!");
1627 Net_LinkEntity(eliminatedPlayers = spawn(), FALSE, 0, EliminatedPlayers_SendEntity);
1628 eliminatedPlayers.isEliminated = isEliminated_func;
1632 void adaptor_think2touch()
1641 void adaptor_think2use()
1653 void adaptor_think2use_hittype_splash() // for timed projectile detonation
1655 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
1656 self.projectiledeathtype |= HITTYPE_SPLASH;
1657 adaptor_think2use();
1660 // deferred dropping
1661 void DropToFloor_Handler()
1663 builtin_droptofloor();
1664 self.dropped_origin = self.origin;
1669 InitializeEntity(self, DropToFloor_Handler, INITPRIO_DROPTOFLOOR);
1674 float trace_hits_box_a0, trace_hits_box_a1;
1676 float trace_hits_box_1d(float end, float thmi, float thma)
1680 // just check if x is in range
1688 // do the trace with respect to x
1689 // 0 -> end has to stay in thmi -> thma
1690 trace_hits_box_a0 = max(trace_hits_box_a0, min(thmi / end, thma / end));
1691 trace_hits_box_a1 = min(trace_hits_box_a1, max(thmi / end, thma / end));
1692 if (trace_hits_box_a0 > trace_hits_box_a1)
1698 float trace_hits_box(vector start, vector end, vector thmi, vector thma)
1703 // now it is a trace from 0 to end
1705 trace_hits_box_a0 = 0;
1706 trace_hits_box_a1 = 1;
1708 if (!trace_hits_box_1d(end_x, thmi_x, thma_x))
1710 if (!trace_hits_box_1d(end_y, thmi_y, thma_y))
1712 if (!trace_hits_box_1d(end_z, thmi_z, thma_z))
1718 float tracebox_hits_box(vector start, vector mi, vector ma, vector end, vector thmi, vector thma)
1720 return trace_hits_box(start, end, thmi - ma, thma - mi);
1723 float SUB_NoImpactCheck()
1725 // zero hitcontents = this is not the real impact, but either the
1726 // mirror-impact of something hitting the projectile instead of the
1727 // projectile hitting the something, or a touchareagrid one. Neither of
1728 // these stop the projectile from moving, so...
1729 if(trace_dphitcontents == 0)
1731 //dprint("A hit happened with zero hit contents... DEBUG THIS, this should never happen for projectiles! Projectile will self-destruct.\n");
1732 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));
1735 if (trace_dphitq3surfaceflags & Q3SURFACEFLAG_NOIMPACT)
1737 if (other == world && self.size != '0 0 0')
1740 tic = self.velocity * sys_frametime;
1741 tic = tic + normalize(tic) * vlen(self.maxs - self.mins);
1742 traceline(self.origin - tic, self.origin + tic, MOVE_NORMAL, self);
1743 if (trace_fraction >= 1)
1745 dprint("Odd... did not hit...?\n");
1747 else if (trace_dphitq3surfaceflags & Q3SURFACEFLAG_NOIMPACT)
1749 dprint("Detected and prevented the sky-grapple bug.\n");
1757 #define SUB_OwnerCheck() (other && (other == self.owner))
1759 void RemoveGrapplingHook(entity pl);
1760 void W_Crylink_Dequeue(entity e);
1761 float WarpZone_Projectile_Touch_ImpactFilter_Callback()
1763 if(SUB_OwnerCheck())
1765 if(SUB_NoImpactCheck())
1767 if(self.classname == "grapplinghook")
1768 RemoveGrapplingHook(self.realowner);
1769 else if(self.classname == "spike")
1771 W_Crylink_Dequeue(self);
1778 if(trace_ent && trace_ent.solid > SOLID_TRIGGER)
1779 UpdateCSQCProjectile(self);
1782 #define PROJECTILE_TOUCH if(WarpZone_Projectile_Touch()) return
1784 #define ITEM_TOUCH_NEEDKILL() (((trace_dpstartcontents | trace_dphitcontents) & DPCONTENTS_NODROP) || (trace_dphitq3surfaceflags & Q3SURFACEFLAG_SKY))
1785 #define ITEM_DAMAGE_NEEDKILL(dt) (((dt) == DEATH_HURTTRIGGER) || ((dt) == DEATH_SLIME) || ((dt) == DEATH_LAVA) || ((dt) == DEATH_SWAMP))
1787 void URI_Get_Callback(float id, float status, string data)
1789 if(url_URI_Get_Callback(id, status, data))
1793 else if (id == URI_GET_DISCARD)
1797 else if (id >= URI_GET_CURL && id <= URI_GET_CURL_END)
1800 Curl_URI_Get_Callback(id, status, data);
1802 else if (id >= URI_GET_IPBAN && id <= URI_GET_IPBAN_END)
1805 OnlineBanList_URI_Get_Callback(id, status, data);
1809 print("Received HTTP request data for an invalid id ", ftos(id), ".\n");
1813 string uid2name(string myuid) {
1815 s = db_get(ServerProgsDB, strcat("/uid2name/", myuid));
1817 // FIXME remove this later after 0.6 release
1818 // convert old style broken records to correct style
1821 s = db_get(ServerProgsDB, strcat("uid2name", myuid));
1824 db_put(ServerProgsDB, strcat("/uid2name/", myuid), s);
1825 db_put(ServerProgsDB, strcat("uid2name", myuid), "");
1830 s = "^1Unregistered Player";
1834 float MoveToRandomMapLocation(entity e, float goodcontents, float badcontents, float badsurfaceflags, float attempts, float maxaboveground, float minviewdistance)
1837 vector start, org, delta, end, enddown, mstart;
1840 m = e.dphitcontentsmask;
1841 e.dphitcontentsmask = goodcontents | badcontents;
1844 delta = world.maxs - world.mins;
1848 for (i = 0; i < attempts; ++i)
1850 start_x = org_x + random() * delta_x;
1851 start_y = org_y + random() * delta_y;
1852 start_z = org_z + random() * delta_z;
1854 // rule 1: start inside world bounds, and outside
1855 // solid, and don't start from somewhere where you can
1856 // fall down to evil
1857 tracebox(start, e.mins, e.maxs, start - '0 0 1' * delta_z, MOVE_NORMAL, e);
1858 if (trace_fraction >= 1)
1860 if (trace_startsolid)
1862 if (trace_dphitcontents & badcontents)
1864 if (trace_dphitq3surfaceflags & badsurfaceflags)
1867 // rule 2: if we are too high, lower the point
1868 if (trace_fraction * delta_z > maxaboveground)
1869 start = trace_endpos + '0 0 1' * maxaboveground;
1870 enddown = trace_endpos;
1872 // rule 3: make sure we aren't outside the map. This only works
1873 // for somewhat well formed maps. A good rule of thumb is that
1874 // the map should have a convex outside hull.
1875 // these can be traceLINES as we already verified the starting box
1876 mstart = start + 0.5 * (e.mins + e.maxs);
1877 traceline(mstart, mstart + '1 0 0' * delta_x, MOVE_NORMAL, e);
1878 if (trace_fraction >= 1 || trace_dphittexturename == "common/caulk")
1880 traceline(mstart, mstart - '1 0 0' * delta_x, MOVE_NORMAL, e);
1881 if (trace_fraction >= 1 || trace_dphittexturename == "common/caulk")
1883 traceline(mstart, mstart + '0 1 0' * delta_y, MOVE_NORMAL, e);
1884 if (trace_fraction >= 1 || trace_dphittexturename == "common/caulk")
1886 traceline(mstart, mstart - '0 1 0' * delta_y, MOVE_NORMAL, e);
1887 if (trace_fraction >= 1 || trace_dphittexturename == "common/caulk")
1889 traceline(mstart, mstart + '0 0 1' * delta_z, MOVE_NORMAL, e);
1890 if (trace_fraction >= 1 || trace_dphittexturename == "common/caulk")
1893 // rule 4: we must "see" some spawnpoint or item
1894 for(sp = world; (sp = find(sp, classname, "info_player_deathmatch")); )
1895 if(checkpvs(mstart, sp))
1896 if((traceline(mstart, sp.origin, MOVE_NORMAL, e), trace_fraction) >= 1)
1900 for(sp = world; (sp = findflags(sp, flags, FL_ITEM)); )
1901 if(checkpvs(mstart, sp))
1902 if((traceline(mstart, sp.origin + (sp.mins + sp.maxs) * 0.5, MOVE_NORMAL, e), trace_fraction) >= 1)
1908 // find a random vector to "look at"
1909 end_x = org_x + random() * delta_x;
1910 end_y = org_y + random() * delta_y;
1911 end_z = org_z + random() * delta_z;
1912 end = start + normalize(end - start) * vlen(delta);
1914 // rule 4: start TO end must not be too short
1915 tracebox(start, e.mins, e.maxs, end, MOVE_NORMAL, e);
1916 if (trace_startsolid)
1918 if (trace_fraction < minviewdistance / vlen(delta))
1921 // rule 5: don't want to look at sky
1922 if (trace_dphitq3surfaceflags & Q3SURFACEFLAG_SKY)
1925 // rule 6: we must not end up in trigger_hurt
1926 if (tracebox_hits_trigger_hurt(start, e.mins, e.maxs, enddown))
1932 e.dphitcontentsmask = m;
1936 setorigin(e, start);
1937 e.angles = vectoangles(end - start);
1938 dprint("Needed ", ftos(i + 1), " attempts\n");
1945 void write_recordmarker(entity pl, float tstart, float dt)
1947 GameLogEcho(strcat(":recordset:", ftos(pl.playerid), ":", ftos(dt)));
1949 // also write a marker into demo files for demotc-race-record-extractor to find
1952 strcat("//", strconv(2, 0, 0, GetGametype()), " RECORD SET ", TIME_ENCODED_TOSTRING(TIME_ENCODE(dt))),
1953 " ", ftos(tstart), " ", ftos(dt), "\n"));
1956 vector shotorg_adjustfromclient(vector vecs, float y_is_right, float allowcenter, float algn)
1969 if(allowcenter) // 2: allow center handedness
1982 if(allowcenter) // 2: allow center handedness
1998 vector shotorg_adjust_values(vector vecs, float y_is_right, float visual, float algn)
2003 if (autocvar_g_shootfromeye)
2007 if (autocvar_g_shootfromclient) { vecs = shotorg_adjustfromclient(vecs, y_is_right, (autocvar_g_shootfromclient >= 2), algn); }
2008 else { vecs_y = 0; vecs_z -= 2; }
2016 else if (autocvar_g_shootfromcenter)
2021 else if ((s = autocvar_g_shootfromfixedorigin) != "")
2031 else if (autocvar_g_shootfromclient)
2033 vecs = shotorg_adjustfromclient(vecs, y_is_right, (autocvar_g_shootfromclient >= 2), algn);
2038 vector shotorg_adjust(vector vecs, float y_is_right, float visual)
2040 return shotorg_adjust_values(vecs, y_is_right, visual, self.owner.cvar_cl_gunalign);
2044 void attach_sameorigin(entity e, entity to, string tag)
2046 vector org, t_forward, t_left, t_up, e_forward, e_up;
2049 org = e.origin - gettaginfo(to, gettagindex(to, tag));
2050 tagscale = pow(vlen(v_forward), -2); // undo a scale on the tag
2051 t_forward = v_forward * tagscale;
2052 t_left = v_right * -tagscale;
2053 t_up = v_up * tagscale;
2055 e.origin_x = org * t_forward;
2056 e.origin_y = org * t_left;
2057 e.origin_z = org * t_up;
2059 // current forward and up directions
2060 if (substring(e.model, 0, 1) == "*") // bmodels have their own rules
2061 e.angles = AnglesTransform_FromVAngles(e.angles);
2063 e.angles = AnglesTransform_FromAngles(e.angles);
2064 fixedmakevectors(e.angles);
2066 // untransform forward, up!
2067 e_forward_x = v_forward * t_forward;
2068 e_forward_y = v_forward * t_left;
2069 e_forward_z = v_forward * t_up;
2070 e_up_x = v_up * t_forward;
2071 e_up_y = v_up * t_left;
2072 e_up_z = v_up * t_up;
2074 e.angles = fixedvectoangles2(e_forward, e_up);
2075 if (substring(e.model, 0, 1) == "*") // bmodels have their own rules
2076 e.angles = AnglesTransform_ToVAngles(e.angles);
2078 e.angles = AnglesTransform_ToAngles(e.angles);
2080 setattachment(e, to, tag);
2081 setorigin(e, e.origin);
2084 void detach_sameorigin(entity e)
2087 org = gettaginfo(e, 0);
2088 e.angles = fixedvectoangles2(v_forward, v_up);
2089 if (substring(e.model, 0, 1) == "*") // bmodels have their own rules
2090 e.angles = AnglesTransform_ToVAngles(e.angles);
2092 e.angles = AnglesTransform_ToAngles(e.angles);
2094 setattachment(e, world, "");
2095 setorigin(e, e.origin);
2098 void follow_sameorigin(entity e, entity to)
2100 e.movetype = MOVETYPE_FOLLOW; // make the hole follow
2101 e.aiment = to; // make the hole follow bmodel
2102 e.punchangle = to.angles; // the original angles of bmodel
2103 e.view_ofs = e.origin - to.origin; // relative origin
2104 e.v_angle = e.angles - to.angles; // relative angles
2107 void unfollow_sameorigin(entity e)
2109 e.movetype = MOVETYPE_NONE;
2112 entity gettaginfo_relative_ent;
2113 vector gettaginfo_relative(entity e, float tag)
2115 if (!gettaginfo_relative_ent)
2117 gettaginfo_relative_ent = spawn();
2118 gettaginfo_relative_ent.effects = EF_NODRAW;
2120 gettaginfo_relative_ent.model = e.model;
2121 gettaginfo_relative_ent.modelindex = e.modelindex;
2122 gettaginfo_relative_ent.frame = e.frame;
2123 return gettaginfo(gettaginfo_relative_ent, tag);
2128 float modeleffect_SendEntity(entity to, float sf)
2131 WriteByte(MSG_ENTITY, ENT_CLIENT_MODELEFFECT);
2134 if(self.velocity != '0 0 0')
2136 if(self.angles != '0 0 0')
2138 if(self.avelocity != '0 0 0')
2141 WriteByte(MSG_ENTITY, f);
2142 WriteShort(MSG_ENTITY, self.modelindex);
2143 WriteByte(MSG_ENTITY, self.skin);
2144 WriteByte(MSG_ENTITY, self.frame);
2145 WriteCoord(MSG_ENTITY, self.origin_x);
2146 WriteCoord(MSG_ENTITY, self.origin_y);
2147 WriteCoord(MSG_ENTITY, self.origin_z);
2150 WriteCoord(MSG_ENTITY, self.velocity_x);
2151 WriteCoord(MSG_ENTITY, self.velocity_y);
2152 WriteCoord(MSG_ENTITY, self.velocity_z);
2156 WriteCoord(MSG_ENTITY, self.angles_x);
2157 WriteCoord(MSG_ENTITY, self.angles_y);
2158 WriteCoord(MSG_ENTITY, self.angles_z);
2162 WriteCoord(MSG_ENTITY, self.avelocity_x);
2163 WriteCoord(MSG_ENTITY, self.avelocity_y);
2164 WriteCoord(MSG_ENTITY, self.avelocity_z);
2166 WriteShort(MSG_ENTITY, self.scale * 256.0);
2167 WriteShort(MSG_ENTITY, self.scale2 * 256.0);
2168 WriteByte(MSG_ENTITY, self.teleport_time * 100.0);
2169 WriteByte(MSG_ENTITY, self.fade_time * 100.0);
2170 WriteByte(MSG_ENTITY, self.alpha * 255.0);
2175 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)
2180 e.classname = "modeleffect";
2188 e.teleport_time = t1;
2192 e.scale = s0 / max6(-e.mins_x, -e.mins_y, -e.mins_z, e.maxs_x, e.maxs_y, e.maxs_z);
2196 e.scale2 = s2 / max6(-e.mins_x, -e.mins_y, -e.mins_z, e.maxs_x, e.maxs_y, e.maxs_z);
2199 sz = max(e.scale, e.scale2);
2200 setsize(e, e.mins * sz, e.maxs * sz);
2201 Net_LinkEntity(e, FALSE, 0.1, modeleffect_SendEntity);
2204 void shockwave_spawn(string m, vector org, float sz, float t1, float t2)
2206 return modeleffect_spawn(m, 0, 0, org, '0 0 0', '0 0 0', '0 0 0', 0, sz, 1, t1, t2);
2209 float randombit(float bits)
2211 if(!(bits & (bits-1))) // this ONLY holds for powers of two!
2220 for(f = 1; f <= bits; f *= 2)
2229 r = (r - 1) / (n - 1);
2236 float randombits(float bits, float k, float error_return)
2240 while(k > 0 && bits != r)
2242 r += randombit(bits - r);
2251 void randombit_test(float bits, float iter)
2255 print(ftos(randombit(bits)), "\n");
2260 float ExponentialFalloff(float mindist, float maxdist, float halflifedist, float d)
2262 if(halflifedist > 0)
2263 return pow(0.5, (bound(mindist, d, maxdist) - mindist) / halflifedist);
2264 else if(halflifedist < 0)
2265 return pow(0.5, (bound(mindist, d, maxdist) - maxdist) / halflifedist);
2274 #define cvar_string_normal builtin_cvar_string
2275 #define cvar_normal builtin_cvar
2277 string cvar_string_normal(string n)
2279 if (!(cvar_type(n) & 1))
2280 backtrace(strcat("Attempt to access undefined cvar: ", n));
2281 return builtin_cvar_string(n);
2284 float cvar_normal(string n)
2286 return stof(cvar_string_normal(n));
2289 #define cvar_set_normal builtin_cvar_set
2297 oself.think = SUB_Remove;
2298 oself.nextthink = time;
2304 Execute func() after time + fdelay.
2305 self when func is executed = self when defer is called
2307 void defer(float fdelay, void() func)
2314 e.think = defer_think;
2315 e.nextthink = time + fdelay;
2318 .string aiment_classname;
2319 .float aiment_deadflag;
2320 void SetMovetypeFollow(entity ent, entity e)
2322 // FIXME this may not be warpzone aware
2323 ent.movetype = MOVETYPE_FOLLOW; // make the hole follow
2324 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.
2325 ent.aiment = e; // make the hole follow bmodel
2326 ent.punchangle = e.angles; // the original angles of bmodel
2327 ent.view_ofs = ent.origin - e.origin; // relative origin
2328 ent.v_angle = ent.angles - e.angles; // relative angles
2329 ent.aiment_classname = strzone(e.classname);
2330 ent.aiment_deadflag = e.deadflag;
2332 void UnsetMovetypeFollow(entity ent)
2334 ent.movetype = MOVETYPE_FLY;
2335 PROJECTILE_MAKETRIGGER(ent);
2338 float LostMovetypeFollow(entity ent)
2341 if(ent.movetype != MOVETYPE_FOLLOW)
2347 if(ent.aiment.classname != ent.aiment_classname)
2349 if(ent.aiment.deadflag != ent.aiment_deadflag)
2355 float isPushable(entity e)
2364 case "droppedweapon":
2365 case "keepawayball":
2366 case "nexball_basketball":
2367 case "nexball_football":
2369 case "bullet": // antilagged bullets can't hit this either
2372 if (e.projectiledeathtype)