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_GameReport_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 start_items |= IT_FUEL_REGEN;
866 start_ammo_fuel = max(start_ammo_fuel, cvar("g_balance_fuel_rotstable"));
867 warmup_start_ammo_fuel = max(warmup_start_ammo_fuel, cvar("g_balance_fuel_rotstable"));
870 WepSet precache_weapons = start_weapons;
871 if (g_warmup_allguns != 1)
872 precache_weapons |= warmup_start_weapons;
873 for (i = WEP_FIRST; i <= WEP_LAST; ++i)
875 e = get_weaponinfo(i);
876 if(precache_weapons & WepSet_FromWeapon(i))
877 WEP_ACTION(i, WR_INIT);
880 start_ammo_shells = max(0, start_ammo_shells);
881 start_ammo_nails = max(0, start_ammo_nails);
882 start_ammo_rockets = max(0, start_ammo_rockets);
883 start_ammo_cells = max(0, start_ammo_cells);
884 start_ammo_plasma = max(0, start_ammo_plasma);
885 start_ammo_fuel = max(0, start_ammo_fuel);
887 warmup_start_ammo_shells = max(0, warmup_start_ammo_shells);
888 warmup_start_ammo_nails = max(0, warmup_start_ammo_nails);
889 warmup_start_ammo_rockets = max(0, warmup_start_ammo_rockets);
890 warmup_start_ammo_cells = max(0, warmup_start_ammo_cells);
891 warmup_start_ammo_plasma = max(0, warmup_start_ammo_plasma);
892 warmup_start_ammo_fuel = max(0, warmup_start_ammo_fuel);
896 float g_bugrigs_planar_movement;
897 float g_bugrigs_planar_movement_car_jumping;
898 float g_bugrigs_reverse_spinning;
899 float g_bugrigs_reverse_speeding;
900 float g_bugrigs_reverse_stopping;
901 float g_bugrigs_air_steering;
902 float g_bugrigs_angle_smoothing;
903 float g_bugrigs_friction_floor;
904 float g_bugrigs_friction_brake;
905 float g_bugrigs_friction_air;
906 float g_bugrigs_accel;
907 float g_bugrigs_speed_ref;
908 float g_bugrigs_speed_pow;
909 float g_bugrigs_steer;
914 string GetGametype(); // g_world.qc
915 void mutators_add(); // mutators.qc
916 void readlevelcvars(void)
921 if(cvar("sv_allow_fullbright"))
922 serverflags |= SERVERFLAG_ALLOW_FULLBRIGHT;
924 g_bugrigs = cvar("g_bugrigs");
925 g_bugrigs_planar_movement = cvar("g_bugrigs_planar_movement");
926 g_bugrigs_planar_movement_car_jumping = cvar("g_bugrigs_planar_movement_car_jumping");
927 g_bugrigs_reverse_spinning = cvar("g_bugrigs_reverse_spinning");
928 g_bugrigs_reverse_speeding = cvar("g_bugrigs_reverse_speeding");
929 g_bugrigs_reverse_stopping = cvar("g_bugrigs_reverse_stopping");
930 g_bugrigs_air_steering = cvar("g_bugrigs_air_steering");
931 g_bugrigs_angle_smoothing = cvar("g_bugrigs_angle_smoothing");
932 g_bugrigs_friction_floor = cvar("g_bugrigs_friction_floor");
933 g_bugrigs_friction_brake = cvar("g_bugrigs_friction_brake");
934 g_bugrigs_friction_air = cvar("g_bugrigs_friction_air");
935 g_bugrigs_accel = cvar("g_bugrigs_accel");
936 g_bugrigs_speed_ref = cvar("g_bugrigs_speed_ref");
937 g_bugrigs_speed_pow = cvar("g_bugrigs_speed_pow");
938 g_bugrigs_steer = cvar("g_bugrigs_steer");
940 g_instagib = cvar("g_instagib");
942 sv_clones = cvar("sv_clones");
943 sv_foginterval = cvar("sv_foginterval");
944 g_cloaked = cvar("g_cloaked");
945 g_footsteps = cvar("g_footsteps");
946 g_grappling_hook = cvar("g_grappling_hook");
947 g_jetpack = cvar("g_jetpack");
948 sv_maxidle = cvar("sv_maxidle");
949 sv_maxidle_spectatorsareidle = cvar("sv_maxidle_spectatorsareidle");
950 sv_autotaunt = cvar("sv_autotaunt");
951 sv_taunt = cvar("sv_taunt");
953 warmup_stage = cvar("g_warmup");
954 g_warmup_limit = cvar("g_warmup_limit");
955 g_warmup_allguns = cvar("g_warmup_allguns");
956 g_warmup_allow_timeout = cvar("g_warmup_allow_timeout");
958 if ((g_race && g_race_qualifying == 2) || g_assault || cvar("g_campaign"))
959 warmup_stage = 0; // these modes cannot work together, sorry
961 g_pickup_respawntime_weapon = cvar("g_pickup_respawntime_weapon");
962 g_pickup_respawntime_superweapon = cvar("g_pickup_respawntime_superweapon");
963 g_pickup_respawntime_ammo = cvar("g_pickup_respawntime_ammo");
964 g_pickup_respawntime_short = cvar("g_pickup_respawntime_short");
965 g_pickup_respawntime_medium = cvar("g_pickup_respawntime_medium");
966 g_pickup_respawntime_long = cvar("g_pickup_respawntime_long");
967 g_pickup_respawntime_powerup = cvar("g_pickup_respawntime_powerup");
968 g_pickup_respawntimejitter_weapon = cvar("g_pickup_respawntimejitter_weapon");
969 g_pickup_respawntimejitter_superweapon = cvar("g_pickup_respawntimejitter_superweapon");
970 g_pickup_respawntimejitter_ammo = cvar("g_pickup_respawntimejitter_ammo");
971 g_pickup_respawntimejitter_short = cvar("g_pickup_respawntimejitter_short");
972 g_pickup_respawntimejitter_medium = cvar("g_pickup_respawntimejitter_medium");
973 g_pickup_respawntimejitter_long = cvar("g_pickup_respawntimejitter_long");
974 g_pickup_respawntimejitter_powerup = cvar("g_pickup_respawntimejitter_powerup");
976 g_weaponspeedfactor = cvar("g_weaponspeedfactor");
977 g_weaponratefactor = cvar("g_weaponratefactor");
978 g_weapondamagefactor = cvar("g_weapondamagefactor");
979 g_weaponforcefactor = cvar("g_weaponforcefactor");
980 g_weaponspreadfactor = cvar("g_weaponspreadfactor");
982 g_pickup_shells = cvar("g_pickup_shells");
983 g_pickup_shells_max = cvar("g_pickup_shells_max");
984 g_pickup_nails = cvar("g_pickup_nails");
985 g_pickup_nails_max = cvar("g_pickup_nails_max");
986 g_pickup_rockets = cvar("g_pickup_rockets");
987 g_pickup_rockets_max = cvar("g_pickup_rockets_max");
988 g_pickup_cells = cvar("g_pickup_cells");
989 g_pickup_cells_max = cvar("g_pickup_cells_max");
990 g_pickup_plasma = cvar("g_pickup_plasma");
991 g_pickup_plasma_max = cvar("g_pickup_plasma_max");
992 g_pickup_fuel = cvar("g_pickup_fuel");
993 g_pickup_fuel_jetpack = cvar("g_pickup_fuel_jetpack");
994 g_pickup_fuel_max = cvar("g_pickup_fuel_max");
995 g_pickup_armorsmall = cvar("g_pickup_armorsmall");
996 g_pickup_armorsmall_max = cvar("g_pickup_armorsmall_max");
997 g_pickup_armorsmall_anyway = cvar("g_pickup_armorsmall_anyway");
998 g_pickup_armormedium = cvar("g_pickup_armormedium");
999 g_pickup_armormedium_max = cvar("g_pickup_armormedium_max");
1000 g_pickup_armormedium_anyway = cvar("g_pickup_armormedium_anyway");
1001 g_pickup_armorbig = cvar("g_pickup_armorbig");
1002 g_pickup_armorbig_max = cvar("g_pickup_armorbig_max");
1003 g_pickup_armorbig_anyway = cvar("g_pickup_armorbig_anyway");
1004 g_pickup_armorlarge = cvar("g_pickup_armorlarge");
1005 g_pickup_armorlarge_max = cvar("g_pickup_armorlarge_max");
1006 g_pickup_armorlarge_anyway = cvar("g_pickup_armorlarge_anyway");
1007 g_pickup_healthsmall = cvar("g_pickup_healthsmall");
1008 g_pickup_healthsmall_max = cvar("g_pickup_healthsmall_max");
1009 g_pickup_healthsmall_anyway = cvar("g_pickup_healthsmall_anyway");
1010 g_pickup_healthmedium = cvar("g_pickup_healthmedium");
1011 g_pickup_healthmedium_max = cvar("g_pickup_healthmedium_max");
1012 g_pickup_healthmedium_anyway = cvar("g_pickup_healthmedium_anyway");
1013 g_pickup_healthlarge = cvar("g_pickup_healthlarge");
1014 g_pickup_healthlarge_max = cvar("g_pickup_healthlarge_max");
1015 g_pickup_healthlarge_anyway = cvar("g_pickup_healthlarge_anyway");
1016 g_pickup_healthmega = cvar("g_pickup_healthmega");
1017 g_pickup_healthmega_max = cvar("g_pickup_healthmega_max");
1018 g_pickup_healthmega_anyway = cvar("g_pickup_healthmega_anyway");
1020 g_pickup_ammo_anyway = cvar("g_pickup_ammo_anyway");
1021 g_pickup_weapons_anyway = cvar("g_pickup_weapons_anyway");
1023 g_weapon_stay = cvar(strcat("g_", GetGametype(), "_weapon_stay"));
1025 g_weapon_stay = cvar("g_weapon_stay");
1028 game_starttime = time + cvar("g_start_delay");
1030 readplayerstartcvars();
1036 string precache_sound (string s) = #19;
1037 float precache_sound_index (string s) = #19;
1039 #define SND_VOLUME 1
1040 #define SND_ATTENUATION 2
1041 #define SND_LARGEENTITY 8
1042 #define SND_LARGESOUND 16
1044 float sound_allowed(float dest, entity e)
1046 // sounds from world may always pass
1049 if (e.classname == "body")
1051 else if (e.realowner && e.realowner != e)
1053 else if (e.owner && e.owner != e)
1058 // sounds to self may always pass
1059 if (dest == MSG_ONE)
1060 if (e == msg_entity)
1062 // sounds by players can be removed
1063 if (autocvar_bot_sound_monopoly)
1064 if (IS_REAL_CLIENT(e))
1066 // anything else may pass
1071 void sound(entity e, float chan, string samp, float vol, float atten)
1073 if (!sound_allowed(MSG_BROADCAST, e))
1075 sound7(e, chan, samp, vol, atten, 0, 0);
1078 void soundtoat(float dest, entity e, vector o, float chan, string samp, float vol, float atten)
1082 if (!sound_allowed(dest, e))
1085 entno = num_for_edict(e);
1086 idx = precache_sound_index(samp);
1091 atten = floor(atten * 64);
1092 vol = floor(vol * 255);
1095 sflags |= SND_VOLUME;
1097 sflags |= SND_ATTENUATION;
1098 if (entno >= 8192 || chan < 0 || chan > 7)
1099 sflags |= SND_LARGEENTITY;
1101 sflags |= SND_LARGESOUND;
1103 WriteByte(dest, SVC_SOUND);
1104 WriteByte(dest, sflags);
1105 if (sflags & SND_VOLUME)
1106 WriteByte(dest, vol);
1107 if (sflags & SND_ATTENUATION)
1108 WriteByte(dest, atten);
1109 if (sflags & SND_LARGEENTITY)
1111 WriteShort(dest, entno);
1112 WriteByte(dest, chan);
1116 WriteShort(dest, entno * 8 + chan);
1118 if (sflags & SND_LARGESOUND)
1119 WriteShort(dest, idx);
1121 WriteByte(dest, idx);
1123 WriteCoord(dest, o_x);
1124 WriteCoord(dest, o_y);
1125 WriteCoord(dest, o_z);
1127 void soundto(float dest, entity e, float chan, string samp, float vol, float atten)
1131 if (!sound_allowed(dest, e))
1134 o = e.origin + 0.5 * (e.mins + e.maxs);
1135 soundtoat(dest, e, o, chan, samp, vol, atten);
1137 void soundat(entity e, vector o, float chan, string samp, float vol, float atten)
1139 soundtoat(((chan & 8) ? MSG_ALL : MSG_BROADCAST), e, o, chan, samp, vol, atten);
1141 void stopsoundto(float dest, entity e, float chan)
1145 if (!sound_allowed(dest, e))
1148 entno = num_for_edict(e);
1150 if (entno >= 8192 || chan < 0 || chan > 7)
1153 idx = precache_sound_index("misc/null.wav");
1154 sflags = SND_LARGEENTITY;
1156 sflags |= SND_LARGESOUND;
1157 WriteByte(dest, SVC_SOUND);
1158 WriteByte(dest, sflags);
1159 WriteShort(dest, entno);
1160 WriteByte(dest, chan);
1161 if (sflags & SND_LARGESOUND)
1162 WriteShort(dest, idx);
1164 WriteByte(dest, idx);
1165 WriteCoord(dest, e.origin_x);
1166 WriteCoord(dest, e.origin_y);
1167 WriteCoord(dest, e.origin_z);
1171 WriteByte(dest, SVC_STOPSOUND);
1172 WriteShort(dest, entno * 8 + chan);
1175 void stopsound(entity e, float chan)
1177 if (!sound_allowed(MSG_BROADCAST, e))
1180 stopsoundto(MSG_BROADCAST, e, chan); // unreliable, gets there fast
1181 stopsoundto(MSG_ALL, e, chan); // in case of packet loss
1184 void play2(entity e, string filename)
1186 //stuffcmd(e, strcat("play2 ", filename, "\n"));
1188 soundtoat(MSG_ONE, world, '0 0 0', CH_INFO, filename, VOL_BASE, ATTEN_NONE);
1191 // use this one if you might be causing spam (e.g. from touch functions that might get called more than once per frame)
1193 float spamsound(entity e, float chan, string samp, float vol, float atten)
1195 if (!sound_allowed(MSG_BROADCAST, e))
1198 if (time > e.spamtime)
1201 sound(e, chan, samp, vol, atten);
1207 void play2team(float t, string filename)
1211 if (autocvar_bot_sound_monopoly)
1214 FOR_EACH_REALPLAYER(head)
1217 play2(head, filename);
1221 void play2all(string samp)
1223 if (autocvar_bot_sound_monopoly)
1226 sound(world, CH_INFO, samp, VOL_BASE, ATTEN_NONE);
1229 void PrecachePlayerSounds(string f);
1230 void precache_playermodel(string m)
1232 float globhandle, i, n;
1235 if(substring(m, -9,5) == "_lod1")
1237 if(substring(m, -9,5) == "_lod2")
1240 f = strcat(substring(m, 0, -5), "_lod1", substring(m, -4, -1));
1243 f = strcat(substring(m, 0, -5), "_lod2", substring(m, -4, -1));
1247 globhandle = search_begin(strcat(m, "_*.sounds"), TRUE, FALSE);
1250 n = search_getsize(globhandle);
1251 for (i = 0; i < n; ++i)
1253 //print(search_getfilename(globhandle, i), "\n");
1254 f = search_getfilename(globhandle, i);
1255 PrecachePlayerSounds(f);
1257 search_end(globhandle);
1259 void precache_all_playermodels(string pattern)
1261 float globhandle, i, n;
1264 globhandle = search_begin(pattern, TRUE, FALSE);
1267 n = search_getsize(globhandle);
1268 for (i = 0; i < n; ++i)
1270 //print(search_getfilename(globhandle, i), "\n");
1271 f = search_getfilename(globhandle, i);
1272 precache_playermodel(f);
1274 search_end(globhandle);
1279 // gamemode related things
1280 precache_model ("models/misc/chatbubble.spr");
1281 precache_model("models/ice/ice.md3");
1283 #ifdef TTURRETS_ENABLED
1284 if (autocvar_g_turrets)
1288 // Precache all player models if desired
1289 if (autocvar_sv_precacheplayermodels)
1291 PrecachePlayerSounds("sound/player/default.sounds");
1292 precache_all_playermodels("models/player/*.zym");
1293 precache_all_playermodels("models/player/*.dpm");
1294 precache_all_playermodels("models/player/*.md3");
1295 precache_all_playermodels("models/player/*.psk");
1296 precache_all_playermodels("models/player/*.iqm");
1299 if (autocvar_sv_defaultcharacter)
1302 s = autocvar_sv_defaultplayermodel_red;
1304 precache_playermodel(s);
1305 s = autocvar_sv_defaultplayermodel_blue;
1307 precache_playermodel(s);
1308 s = autocvar_sv_defaultplayermodel_yellow;
1310 precache_playermodel(s);
1311 s = autocvar_sv_defaultplayermodel_pink;
1313 precache_playermodel(s);
1314 s = autocvar_sv_defaultplayermodel;
1316 precache_playermodel(s);
1321 PrecacheGlobalSound((globalsound_step = "misc/footstep0 6"));
1322 PrecacheGlobalSound((globalsound_metalstep = "misc/metalfootstep0 6"));
1325 // gore and miscellaneous sounds
1326 //precache_sound ("misc/h2ohit.wav");
1327 precache_model ("models/hook.md3");
1328 precache_sound ("misc/armorimpact.wav");
1329 precache_sound ("misc/bodyimpact1.wav");
1330 precache_sound ("misc/bodyimpact2.wav");
1331 precache_sound ("misc/gib.wav");
1332 precache_sound ("misc/gib_splat01.wav");
1333 precache_sound ("misc/gib_splat02.wav");
1334 precache_sound ("misc/gib_splat03.wav");
1335 precache_sound ("misc/gib_splat04.wav");
1336 PrecacheGlobalSound((globalsound_fall = "misc/hitground 4"));
1337 PrecacheGlobalSound((globalsound_metalfall = "misc/metalhitground 4"));
1338 precache_sound ("misc/null.wav");
1339 precache_sound ("misc/spawn.wav");
1340 precache_sound ("misc/talk.wav");
1341 precache_sound ("misc/teleport.wav");
1342 precache_sound ("misc/poweroff.wav");
1343 precache_sound ("player/lava.wav");
1344 precache_sound ("player/slime.wav");
1346 precache_model ("models/sprites/0.spr32");
1347 precache_model ("models/sprites/1.spr32");
1348 precache_model ("models/sprites/2.spr32");
1349 precache_model ("models/sprites/3.spr32");
1350 precache_model ("models/sprites/4.spr32");
1351 precache_model ("models/sprites/5.spr32");
1352 precache_model ("models/sprites/6.spr32");
1353 precache_model ("models/sprites/7.spr32");
1354 precache_model ("models/sprites/8.spr32");
1355 precache_model ("models/sprites/9.spr32");
1356 precache_model ("models/sprites/10.spr32");
1358 // common weapon precaches
1359 precache_sound ("weapons/reload.wav"); // until weapons have individual reload sounds, precache the reload sound here
1360 precache_sound ("weapons/weapon_switch.wav");
1361 precache_sound ("weapons/weaponpickup.wav");
1362 precache_sound ("weapons/unavailable.wav");
1363 precache_sound ("weapons/dryfire.wav");
1364 if (g_grappling_hook)
1366 precache_sound ("weapons/hook_fire.wav"); // hook
1367 precache_sound ("weapons/hook_impact.wav"); // hook
1370 precache_model("models/elaser.mdl");
1371 precache_model("models/laser.mdl");
1372 precache_model("models/ebomb.mdl");
1375 // Disabled this code because it simply does not work (e.g. ignores bgmvolume, overlaps with "cd loop" controlled tracks).
1377 if (!self.noise && self.music) // quake 3 uses the music field
1378 self.noise = self.music;
1380 // plays music for the level if there is any
1383 precache_sound (self.noise);
1384 ambientsound ('0 0 0', self.noise, VOL_BASE, ATTEN_NONE);
1388 #include "precache-for-csqc.inc"
1391 // WARNING: this kills the trace globals
1392 #define EXACTTRIGGER_TOUCH if(WarpZoneLib_ExactTrigger_Touch()) return
1393 #define EXACTTRIGGER_INIT WarpZoneLib_ExactTrigger_Init()
1395 #define INITPRIO_FIRST 0
1396 #define INITPRIO_GAMETYPE 0
1397 #define INITPRIO_GAMETYPE_FALLBACK 1
1398 #define INITPRIO_FINDTARGET 10
1399 #define INITPRIO_DROPTOFLOOR 20
1400 #define INITPRIO_SETLOCATION 90
1401 #define INITPRIO_LINKDOORS 91
1402 #define INITPRIO_LAST 99
1404 .void(void) initialize_entity;
1405 .float initialize_entity_order;
1406 .entity initialize_entity_next;
1407 entity initialize_entity_first;
1409 void make_safe_for_remove(entity e)
1411 if (e.initialize_entity)
1413 entity ent, prev = world;
1414 for (ent = initialize_entity_first; ent; )
1416 if ((ent == e) || ((ent.classname == "initialize_entity") && (ent.enemy == e)))
1418 //print("make_safe_for_remove: getting rid of initializer ", etos(ent), "\n");
1419 // skip it in linked list
1422 prev.initialize_entity_next = ent.initialize_entity_next;
1423 ent = prev.initialize_entity_next;
1427 initialize_entity_first = ent.initialize_entity_next;
1428 ent = initialize_entity_first;
1434 ent = ent.initialize_entity_next;
1440 void objerror(string s)
1442 make_safe_for_remove(self);
1443 builtin_objerror(s);
1446 .float remove_except_protected_forbidden;
1447 void remove_except_protected(entity e)
1449 if(e.remove_except_protected_forbidden)
1450 error("not allowed to remove this at this point");
1454 void remove_unsafely(entity e)
1456 if(e.classname == "spike")
1457 error("Removing spikes is forbidden (crylink bug), please report");
1461 void remove_safely(entity e)
1463 make_safe_for_remove(e);
1467 void InitializeEntity(entity e, void(void) func, float order)
1471 if (!e || e.initialize_entity)
1473 // make a proxy initializer entity
1477 e.classname = "initialize_entity";
1481 e.initialize_entity = func;
1482 e.initialize_entity_order = order;
1484 cur = initialize_entity_first;
1488 if (!cur || cur.initialize_entity_order > order)
1490 // insert between prev and cur
1492 prev.initialize_entity_next = e;
1494 initialize_entity_first = e;
1495 e.initialize_entity_next = cur;
1499 cur = cur.initialize_entity_next;
1502 void InitializeEntitiesRun()
1505 startoflist = initialize_entity_first;
1506 initialize_entity_first = world;
1507 remove = remove_except_protected;
1508 for (self = startoflist; self; self = self.initialize_entity_next)
1510 self.remove_except_protected_forbidden = 1;
1512 for (self = startoflist; self; )
1515 var void(void) func;
1516 e = self.initialize_entity_next;
1517 func = self.initialize_entity;
1518 self.initialize_entity_order = 0;
1519 self.initialize_entity = func_null;
1520 self.initialize_entity_next = world;
1521 self.remove_except_protected_forbidden = 0;
1522 if (self.classname == "initialize_entity")
1526 builtin_remove(self);
1529 //dprint("Delayed initialization: ", self.classname, "\n");
1535 backtrace(strcat("Null function in: ", self.classname, "\n"));
1539 remove = remove_unsafely;
1542 .float uncustomizeentityforclient_set;
1543 .void(void) uncustomizeentityforclient;
1544 void UncustomizeEntitiesRun()
1548 for (self = world; (self = findfloat(self, uncustomizeentityforclient_set, 1)); )
1549 self.uncustomizeentityforclient();
1552 void SetCustomizer(entity e, float(void) customizer, void(void) uncustomizer)
1554 e.customizeentityforclient = customizer;
1555 e.uncustomizeentityforclient = uncustomizer;
1556 e.uncustomizeentityforclient_set = !!uncustomizer;
1560 #define IFTARGETED if(!self.nottargeted && self.targetname != "")
1563 void Net_LinkEntity(entity e, float docull, float dt, float(entity, float) sendfunc)
1567 if (e.classname == "")
1568 e.classname = "net_linked";
1570 if (e.model == "" || self.modelindex == 0)
1574 setmodel(e, "null");
1578 e.SendEntity = sendfunc;
1579 e.SendFlags = 0xFFFFFF;
1582 e.effects |= EF_NODEPTHTEST;
1586 e.nextthink = time + dt;
1587 e.think = SUB_Remove;
1592 entity eliminatedPlayers;
1593 .float(entity) isEliminated;
1594 float EliminatedPlayers_SendEntity(entity to, float sendflags)
1598 WriteByte(MSG_ENTITY, ENT_CLIENT_ELIMINATEDPLAYERS);
1599 WriteByte(MSG_ENTITY, sendflags);
1603 for(i = 1; i <= maxclients; i += 8)
1605 for(f = 0, e = edict_num(i), b = 1; b < 256; b *= 2, e = nextent(e))
1607 if(eliminatedPlayers.isEliminated(e))
1610 WriteByte(MSG_ENTITY, f);
1617 void EliminatedPlayers_Init(float(entity) isEliminated_func)
1619 if(eliminatedPlayers)
1621 backtrace("Can't spawn eliminatedPlayers again!");
1624 Net_LinkEntity(eliminatedPlayers = spawn(), FALSE, 0, EliminatedPlayers_SendEntity);
1625 eliminatedPlayers.isEliminated = isEliminated_func;
1629 void adaptor_think2touch()
1638 void adaptor_think2use()
1650 void adaptor_think2use_hittype_splash() // for timed projectile detonation
1652 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
1653 self.projectiledeathtype |= HITTYPE_SPLASH;
1654 adaptor_think2use();
1657 // deferred dropping
1658 void DropToFloor_Handler()
1660 builtin_droptofloor();
1661 self.dropped_origin = self.origin;
1666 InitializeEntity(self, DropToFloor_Handler, INITPRIO_DROPTOFLOOR);
1671 float trace_hits_box_a0, trace_hits_box_a1;
1673 float trace_hits_box_1d(float end, float thmi, float thma)
1677 // just check if x is in range
1685 // do the trace with respect to x
1686 // 0 -> end has to stay in thmi -> thma
1687 trace_hits_box_a0 = max(trace_hits_box_a0, min(thmi / end, thma / end));
1688 trace_hits_box_a1 = min(trace_hits_box_a1, max(thmi / end, thma / end));
1689 if (trace_hits_box_a0 > trace_hits_box_a1)
1695 float trace_hits_box(vector start, vector end, vector thmi, vector thma)
1700 // now it is a trace from 0 to end
1702 trace_hits_box_a0 = 0;
1703 trace_hits_box_a1 = 1;
1705 if (!trace_hits_box_1d(end_x, thmi_x, thma_x))
1707 if (!trace_hits_box_1d(end_y, thmi_y, thma_y))
1709 if (!trace_hits_box_1d(end_z, thmi_z, thma_z))
1715 float tracebox_hits_box(vector start, vector mi, vector ma, vector end, vector thmi, vector thma)
1717 return trace_hits_box(start, end, thmi - ma, thma - mi);
1720 float SUB_NoImpactCheck()
1722 // zero hitcontents = this is not the real impact, but either the
1723 // mirror-impact of something hitting the projectile instead of the
1724 // projectile hitting the something, or a touchareagrid one. Neither of
1725 // these stop the projectile from moving, so...
1726 if(trace_dphitcontents == 0)
1728 //dprint("A hit happened with zero hit contents... DEBUG THIS, this should never happen for projectiles! Projectile will self-destruct.\n");
1729 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));
1732 if (trace_dphitq3surfaceflags & Q3SURFACEFLAG_NOIMPACT)
1734 if (other == world && self.size != '0 0 0')
1737 tic = self.velocity * sys_frametime;
1738 tic = tic + normalize(tic) * vlen(self.maxs - self.mins);
1739 traceline(self.origin - tic, self.origin + tic, MOVE_NORMAL, self);
1740 if (trace_fraction >= 1)
1742 dprint("Odd... did not hit...?\n");
1744 else if (trace_dphitq3surfaceflags & Q3SURFACEFLAG_NOIMPACT)
1746 dprint("Detected and prevented the sky-grapple bug.\n");
1754 #define SUB_OwnerCheck() (other && (other == self.owner))
1756 void RemoveGrapplingHook(entity pl);
1757 void W_Crylink_Dequeue(entity e);
1758 float WarpZone_Projectile_Touch_ImpactFilter_Callback()
1760 if(SUB_OwnerCheck())
1762 if(SUB_NoImpactCheck())
1764 if(self.classname == "grapplinghook")
1765 RemoveGrapplingHook(self.realowner);
1766 else if(self.classname == "spike")
1768 W_Crylink_Dequeue(self);
1775 if(trace_ent && trace_ent.solid > SOLID_TRIGGER)
1776 UpdateCSQCProjectile(self);
1779 #define PROJECTILE_TOUCH if(WarpZone_Projectile_Touch()) return
1781 #define ITEM_TOUCH_NEEDKILL() (((trace_dpstartcontents | trace_dphitcontents) & DPCONTENTS_NODROP) || (trace_dphitq3surfaceflags & Q3SURFACEFLAG_SKY))
1782 #define ITEM_DAMAGE_NEEDKILL(dt) (((dt) == DEATH_HURTTRIGGER) || ((dt) == DEATH_SLIME) || ((dt) == DEATH_LAVA) || ((dt) == DEATH_SWAMP))
1784 void URI_Get_Callback(float id, float status, string data)
1786 if(url_URI_Get_Callback(id, status, data))
1790 else if (id == URI_GET_DISCARD)
1794 else if (id >= URI_GET_CURL && id <= URI_GET_CURL_END)
1797 Curl_URI_Get_Callback(id, status, data);
1799 else if (id >= URI_GET_IPBAN && id <= URI_GET_IPBAN_END)
1802 OnlineBanList_URI_Get_Callback(id, status, data);
1806 print("Received HTTP request data for an invalid id ", ftos(id), ".\n");
1810 string uid2name(string myuid) {
1812 s = db_get(ServerProgsDB, strcat("/uid2name/", myuid));
1814 // FIXME remove this later after 0.6 release
1815 // convert old style broken records to correct style
1818 s = db_get(ServerProgsDB, strcat("uid2name", myuid));
1821 db_put(ServerProgsDB, strcat("/uid2name/", myuid), s);
1822 db_put(ServerProgsDB, strcat("uid2name", myuid), "");
1827 s = "^1Unregistered Player";
1831 float MoveToRandomMapLocation(entity e, float goodcontents, float badcontents, float badsurfaceflags, float attempts, float maxaboveground, float minviewdistance)
1834 vector start, org, delta, end, enddown, mstart;
1837 m = e.dphitcontentsmask;
1838 e.dphitcontentsmask = goodcontents | badcontents;
1841 delta = world.maxs - world.mins;
1845 for (i = 0; i < attempts; ++i)
1847 start_x = org_x + random() * delta_x;
1848 start_y = org_y + random() * delta_y;
1849 start_z = org_z + random() * delta_z;
1851 // rule 1: start inside world bounds, and outside
1852 // solid, and don't start from somewhere where you can
1853 // fall down to evil
1854 tracebox(start, e.mins, e.maxs, start - '0 0 1' * delta_z, MOVE_NORMAL, e);
1855 if (trace_fraction >= 1)
1857 if (trace_startsolid)
1859 if (trace_dphitcontents & badcontents)
1861 if (trace_dphitq3surfaceflags & badsurfaceflags)
1864 // rule 2: if we are too high, lower the point
1865 if (trace_fraction * delta_z > maxaboveground)
1866 start = trace_endpos + '0 0 1' * maxaboveground;
1867 enddown = trace_endpos;
1869 // rule 3: make sure we aren't outside the map. This only works
1870 // for somewhat well formed maps. A good rule of thumb is that
1871 // the map should have a convex outside hull.
1872 // these can be traceLINES as we already verified the starting box
1873 mstart = start + 0.5 * (e.mins + e.maxs);
1874 traceline(mstart, mstart + '1 0 0' * delta_x, MOVE_NORMAL, e);
1875 if (trace_fraction >= 1 || trace_dphittexturename == "common/caulk")
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 + '0 1 0' * delta_y, 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 0 1' * delta_z, MOVE_NORMAL, e);
1887 if (trace_fraction >= 1 || trace_dphittexturename == "common/caulk")
1890 // rule 4: we must "see" some spawnpoint or item
1891 for(sp = world; (sp = find(sp, classname, "info_player_deathmatch")); )
1892 if(checkpvs(mstart, sp))
1893 if((traceline(mstart, sp.origin, MOVE_NORMAL, e), trace_fraction) >= 1)
1897 for(sp = world; (sp = findflags(sp, flags, FL_ITEM)); )
1898 if(checkpvs(mstart, sp))
1899 if((traceline(mstart, sp.origin + (sp.mins + sp.maxs) * 0.5, MOVE_NORMAL, e), trace_fraction) >= 1)
1905 // find a random vector to "look at"
1906 end_x = org_x + random() * delta_x;
1907 end_y = org_y + random() * delta_y;
1908 end_z = org_z + random() * delta_z;
1909 end = start + normalize(end - start) * vlen(delta);
1911 // rule 4: start TO end must not be too short
1912 tracebox(start, e.mins, e.maxs, end, MOVE_NORMAL, e);
1913 if (trace_startsolid)
1915 if (trace_fraction < minviewdistance / vlen(delta))
1918 // rule 5: don't want to look at sky
1919 if (trace_dphitq3surfaceflags & Q3SURFACEFLAG_SKY)
1922 // rule 6: we must not end up in trigger_hurt
1923 if (tracebox_hits_trigger_hurt(start, e.mins, e.maxs, enddown))
1929 e.dphitcontentsmask = m;
1933 setorigin(e, start);
1934 e.angles = vectoangles(end - start);
1935 dprint("Needed ", ftos(i + 1), " attempts\n");
1942 void write_recordmarker(entity pl, float tstart, float dt)
1944 GameLogEcho(strcat(":recordset:", ftos(pl.playerid), ":", ftos(dt)));
1946 // also write a marker into demo files for demotc-race-record-extractor to find
1949 strcat("//", strconv(2, 0, 0, GetGametype()), " RECORD SET ", TIME_ENCODED_TOSTRING(TIME_ENCODE(dt))),
1950 " ", ftos(tstart), " ", ftos(dt), "\n"));
1953 vector shotorg_adjustfromclient(vector vecs, float y_is_right, float allowcenter, float algn)
1966 if(allowcenter) // 2: allow center handedness
1979 if(allowcenter) // 2: allow center handedness
1995 vector shotorg_adjust_values(vector vecs, float y_is_right, float visual, float algn)
2000 if (autocvar_g_shootfromeye)
2004 if (autocvar_g_shootfromclient) { vecs = shotorg_adjustfromclient(vecs, y_is_right, (autocvar_g_shootfromclient >= 2), algn); }
2005 else { vecs_y = 0; vecs_z -= 2; }
2013 else if (autocvar_g_shootfromcenter)
2018 else if ((s = autocvar_g_shootfromfixedorigin) != "")
2028 else if (autocvar_g_shootfromclient)
2030 vecs = shotorg_adjustfromclient(vecs, y_is_right, (autocvar_g_shootfromclient >= 2), algn);
2035 vector shotorg_adjust(vector vecs, float y_is_right, float visual)
2037 return shotorg_adjust_values(vecs, y_is_right, visual, self.owner.cvar_cl_gunalign);
2041 void attach_sameorigin(entity e, entity to, string tag)
2043 vector org, t_forward, t_left, t_up, e_forward, e_up;
2046 org = e.origin - gettaginfo(to, gettagindex(to, tag));
2047 tagscale = pow(vlen(v_forward), -2); // undo a scale on the tag
2048 t_forward = v_forward * tagscale;
2049 t_left = v_right * -tagscale;
2050 t_up = v_up * tagscale;
2052 e.origin_x = org * t_forward;
2053 e.origin_y = org * t_left;
2054 e.origin_z = org * t_up;
2056 // current forward and up directions
2057 if (substring(e.model, 0, 1) == "*") // bmodels have their own rules
2058 e.angles = AnglesTransform_FromVAngles(e.angles);
2060 e.angles = AnglesTransform_FromAngles(e.angles);
2061 fixedmakevectors(e.angles);
2063 // untransform forward, up!
2064 e_forward_x = v_forward * t_forward;
2065 e_forward_y = v_forward * t_left;
2066 e_forward_z = v_forward * t_up;
2067 e_up_x = v_up * t_forward;
2068 e_up_y = v_up * t_left;
2069 e_up_z = v_up * t_up;
2071 e.angles = fixedvectoangles2(e_forward, e_up);
2072 if (substring(e.model, 0, 1) == "*") // bmodels have their own rules
2073 e.angles = AnglesTransform_ToVAngles(e.angles);
2075 e.angles = AnglesTransform_ToAngles(e.angles);
2077 setattachment(e, to, tag);
2078 setorigin(e, e.origin);
2081 void detach_sameorigin(entity e)
2084 org = gettaginfo(e, 0);
2085 e.angles = fixedvectoangles2(v_forward, v_up);
2086 if (substring(e.model, 0, 1) == "*") // bmodels have their own rules
2087 e.angles = AnglesTransform_ToVAngles(e.angles);
2089 e.angles = AnglesTransform_ToAngles(e.angles);
2091 setattachment(e, world, "");
2092 setorigin(e, e.origin);
2095 void follow_sameorigin(entity e, entity to)
2097 e.movetype = MOVETYPE_FOLLOW; // make the hole follow
2098 e.aiment = to; // make the hole follow bmodel
2099 e.punchangle = to.angles; // the original angles of bmodel
2100 e.view_ofs = e.origin - to.origin; // relative origin
2101 e.v_angle = e.angles - to.angles; // relative angles
2104 void unfollow_sameorigin(entity e)
2106 e.movetype = MOVETYPE_NONE;
2109 entity gettaginfo_relative_ent;
2110 vector gettaginfo_relative(entity e, float tag)
2112 if (!gettaginfo_relative_ent)
2114 gettaginfo_relative_ent = spawn();
2115 gettaginfo_relative_ent.effects = EF_NODRAW;
2117 gettaginfo_relative_ent.model = e.model;
2118 gettaginfo_relative_ent.modelindex = e.modelindex;
2119 gettaginfo_relative_ent.frame = e.frame;
2120 return gettaginfo(gettaginfo_relative_ent, tag);
2125 float modeleffect_SendEntity(entity to, float sf)
2128 WriteByte(MSG_ENTITY, ENT_CLIENT_MODELEFFECT);
2131 if(self.velocity != '0 0 0')
2133 if(self.angles != '0 0 0')
2135 if(self.avelocity != '0 0 0')
2138 WriteByte(MSG_ENTITY, f);
2139 WriteShort(MSG_ENTITY, self.modelindex);
2140 WriteByte(MSG_ENTITY, self.skin);
2141 WriteByte(MSG_ENTITY, self.frame);
2142 WriteCoord(MSG_ENTITY, self.origin_x);
2143 WriteCoord(MSG_ENTITY, self.origin_y);
2144 WriteCoord(MSG_ENTITY, self.origin_z);
2147 WriteCoord(MSG_ENTITY, self.velocity_x);
2148 WriteCoord(MSG_ENTITY, self.velocity_y);
2149 WriteCoord(MSG_ENTITY, self.velocity_z);
2153 WriteCoord(MSG_ENTITY, self.angles_x);
2154 WriteCoord(MSG_ENTITY, self.angles_y);
2155 WriteCoord(MSG_ENTITY, self.angles_z);
2159 WriteCoord(MSG_ENTITY, self.avelocity_x);
2160 WriteCoord(MSG_ENTITY, self.avelocity_y);
2161 WriteCoord(MSG_ENTITY, self.avelocity_z);
2163 WriteShort(MSG_ENTITY, self.scale * 256.0);
2164 WriteShort(MSG_ENTITY, self.scale2 * 256.0);
2165 WriteByte(MSG_ENTITY, self.teleport_time * 100.0);
2166 WriteByte(MSG_ENTITY, self.fade_time * 100.0);
2167 WriteByte(MSG_ENTITY, self.alpha * 255.0);
2172 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)
2177 e.classname = "modeleffect";
2185 e.teleport_time = t1;
2189 e.scale = s0 / max6(-e.mins_x, -e.mins_y, -e.mins_z, e.maxs_x, e.maxs_y, e.maxs_z);
2193 e.scale2 = s2 / max6(-e.mins_x, -e.mins_y, -e.mins_z, e.maxs_x, e.maxs_y, e.maxs_z);
2196 sz = max(e.scale, e.scale2);
2197 setsize(e, e.mins * sz, e.maxs * sz);
2198 Net_LinkEntity(e, FALSE, 0.1, modeleffect_SendEntity);
2201 void shockwave_spawn(string m, vector org, float sz, float t1, float t2)
2203 return modeleffect_spawn(m, 0, 0, org, '0 0 0', '0 0 0', '0 0 0', 0, sz, 1, t1, t2);
2206 float randombit(float bits)
2208 if(!(bits & (bits-1))) // this ONLY holds for powers of two!
2217 for(f = 1; f <= bits; f *= 2)
2226 r = (r - 1) / (n - 1);
2233 float randombits(float bits, float k, float error_return)
2237 while(k > 0 && bits != r)
2239 r += randombit(bits - r);
2248 void randombit_test(float bits, float iter)
2252 print(ftos(randombit(bits)), "\n");
2257 float ExponentialFalloff(float mindist, float maxdist, float halflifedist, float d)
2259 if(halflifedist > 0)
2260 return pow(0.5, (bound(mindist, d, maxdist) - mindist) / halflifedist);
2261 else if(halflifedist < 0)
2262 return pow(0.5, (bound(mindist, d, maxdist) - maxdist) / halflifedist);
2271 #define cvar_string_normal builtin_cvar_string
2272 #define cvar_normal builtin_cvar
2274 string cvar_string_normal(string n)
2276 if (!(cvar_type(n) & 1))
2277 backtrace(strcat("Attempt to access undefined cvar: ", n));
2278 return builtin_cvar_string(n);
2281 float cvar_normal(string n)
2283 return stof(cvar_string_normal(n));
2286 #define cvar_set_normal builtin_cvar_set
2294 oself.think = SUB_Remove;
2295 oself.nextthink = time;
2301 Execute func() after time + fdelay.
2302 self when func is executed = self when defer is called
2304 void defer(float fdelay, void() func)
2311 e.think = defer_think;
2312 e.nextthink = time + fdelay;
2315 .string aiment_classname;
2316 .float aiment_deadflag;
2317 void SetMovetypeFollow(entity ent, entity e)
2319 // FIXME this may not be warpzone aware
2320 ent.movetype = MOVETYPE_FOLLOW; // make the hole follow
2321 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.
2322 ent.aiment = e; // make the hole follow bmodel
2323 ent.punchangle = e.angles; // the original angles of bmodel
2324 ent.view_ofs = ent.origin - e.origin; // relative origin
2325 ent.v_angle = ent.angles - e.angles; // relative angles
2326 ent.aiment_classname = strzone(e.classname);
2327 ent.aiment_deadflag = e.deadflag;
2329 void UnsetMovetypeFollow(entity ent)
2331 ent.movetype = MOVETYPE_FLY;
2332 PROJECTILE_MAKETRIGGER(ent);
2335 float LostMovetypeFollow(entity ent)
2338 if(ent.movetype != MOVETYPE_FOLLOW)
2344 if(ent.aiment.classname != ent.aiment_classname)
2346 if(ent.aiment.deadflag != ent.aiment_deadflag)
2352 float isPushable(entity e)
2361 case "droppedweapon":
2362 case "keepawayball":
2363 case "nexball_basketball":
2364 case "nexball_football":
2366 case "bullet": // antilagged bullets can't hit this either
2369 if (e.projectiledeathtype)