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 const string STR_PLAYER = "player";
81 const string STR_SPECTATOR = "spectator";
82 const string STR_OBSERVER = "observer";
84 #define IS_PLAYER(v) (v.classname == STR_PLAYER)
85 #define IS_SPEC(v) (v.classname == STR_SPECTATOR)
86 #define IS_OBSERVER(v) (v.classname == STR_OBSERVER)
87 #define IS_CLIENT(v) (v.flags & FL_CLIENT)
88 #define IS_BOT_CLIENT(v) (clienttype(v) == CLIENTTYPE_BOT)
89 #define IS_REAL_CLIENT(v) (clienttype(v) == CLIENTTYPE_REAL)
90 #define IS_NOT_A_CLIENT(v) (clienttype(v) == CLIENTTYPE_NOTACLIENT)
92 #define FOR_EACH_CLIENTSLOT(v) for(v = world; (v = nextent(v)) && (num_for_edict(v) <= maxclients); )
93 #define FOR_EACH_CLIENT(v) FOR_EACH_CLIENTSLOT(v) if(IS_CLIENT(v))
94 #define FOR_EACH_REALCLIENT(v) FOR_EACH_CLIENT(v) if(IS_REAL_CLIENT(v))
96 #define FOR_EACH_PLAYER(v) FOR_EACH_CLIENT(v) if(IS_PLAYER(v))
97 #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
98 #define FOR_EACH_REALPLAYER(v) FOR_EACH_REALCLIENT(v) if(IS_PLAYER(v))
100 #define FOR_EACH_MONSTER(v) for(v = world; (v = findflags(v, flags, FL_MONSTER)) != world; )
102 #define CENTER_OR_VIEWOFS(ent) (ent.origin + (IS_PLAYER(ent) ? ent.view_ofs : ((ent.mins + ent.maxs) * 0.5)))
104 // copies a string to a tempstring (so one can strunzone it)
105 string strcat1(string s) = #115; // FRIK_FILE
110 void GameLogEcho(string s)
115 if (autocvar_sv_eventlog_files)
120 matches = autocvar_sv_eventlog_files_counter + 1;
121 cvar_set("sv_eventlog_files_counter", ftos(matches));
124 fn = strcat(substring("00000000", 0, 8 - strlen(fn)), fn);
125 fn = strcat(autocvar_sv_eventlog_files_nameprefix, fn, autocvar_sv_eventlog_files_namesuffix);
126 logfile = fopen(fn, FILE_APPEND);
127 fputs(logfile, ":logversion:3\n");
131 if (autocvar_sv_eventlog_files_timestamps)
132 fputs(logfile, strcat(":time:", strftime(TRUE, "%Y-%m-%d %H:%M:%S", "\n", s, "\n")));
134 fputs(logfile, strcat(s, "\n"));
137 if (autocvar_sv_eventlog_console)
146 // will be opened later
151 if (logfile_open && logfile >= 0)
158 #define strstr strstrofs
160 // NOTE: DO NOT USE THIS FUNCTION TOO OFTEN.
161 // IT WILL MOST PROBABLY DESTROY _ALL_ OTHER TEMP
162 // STRINGS AND TAKE QUITE LONG. haystack and needle MUST
163 // BE CONSTANT OR strzoneD!
164 float strstr(string haystack, string needle, float offset)
168 len = strlen(needle);
169 endpos = strlen(haystack) - len;
170 while(offset <= endpos)
172 found = substring(haystack, offset, len);
181 const float NUM_NEAREST_ENTITIES = 4;
182 entity nearest_entity[NUM_NEAREST_ENTITIES];
183 float nearest_length[NUM_NEAREST_ENTITIES];
184 entity findnearest(vector point, .string field, string value, vector axismod)
195 localhead = find(world, field, value);
198 if ((localhead.items == IT_KEY1 || localhead.items == IT_KEY2) && localhead.target == "###item###")
199 dist = localhead.oldorigin;
201 dist = localhead.origin;
203 dist = dist_x * axismod_x * '1 0 0' + dist_y * axismod_y * '0 1 0' + dist_z * axismod_z * '0 0 1';
206 for (i = 0; i < num_nearest; ++i)
208 if (len < nearest_length[i])
212 // now i tells us where to insert at
213 // INSERTION SORT! YOU'VE SEEN IT! RUN!
214 if (i < NUM_NEAREST_ENTITIES)
216 for (j = NUM_NEAREST_ENTITIES - 1; j >= i; --j)
218 nearest_length[j + 1] = nearest_length[j];
219 nearest_entity[j + 1] = nearest_entity[j];
221 nearest_length[i] = len;
222 nearest_entity[i] = localhead;
223 if (num_nearest < NUM_NEAREST_ENTITIES)
224 num_nearest = num_nearest + 1;
227 localhead = find(localhead, field, value);
230 // now use the first one from our list that we can see
231 for (i = 0; i < num_nearest; ++i)
233 traceline(point, nearest_entity[i].origin, TRUE, world);
234 if (trace_fraction == 1)
238 dprint("Nearest point (");
239 dprint(nearest_entity[0].netname);
240 dprint(") is not visible, using a visible one.\n");
242 return nearest_entity[i];
246 if (num_nearest == 0)
249 dprint("Not seeing any location point, using nearest as fallback.\n");
251 dprint("Candidates were: ");
252 for(j = 0; j < num_nearest; ++j)
256 dprint(nearest_entity[j].netname);
261 return nearest_entity[0];
264 void spawnfunc_target_location()
266 self.classname = "target_location";
267 // location name in netname
268 // eventually support: count, teamgame selectors, line of sight?
271 void spawnfunc_info_location()
273 self.classname = "target_location";
274 self.message = self.netname;
277 string NearestLocation(vector p)
282 loc = findnearest(p, classname, "target_location", '1 1 1');
289 loc = findnearest(p, target, "###item###", '1 1 4');
296 string formatmessage(string msg)
307 WarpZone_crosshair_trace(self);
308 cursor = trace_endpos;
309 cursor_ent = trace_ent;
313 break; // too many replacements
316 p1 = strstr(msg, "%", p); // NOTE: this destroys msg as it's a tempstring!
317 p2 = strstr(msg, "\\", p); // NOTE: this destroys msg as it's a tempstring!
330 replacement = substring(msg, p, 2);
331 escape = substring(msg, p + 1, 1);
335 else if (escape == "\\")
337 else if (escape == "n")
339 else if (escape == "a")
340 replacement = ftos(floor(self.armorvalue));
341 else if (escape == "h")
342 replacement = ftos(floor(self.health));
343 else if (escape == "l")
344 replacement = NearestLocation(self.origin);
345 else if (escape == "y")
346 replacement = NearestLocation(cursor);
347 else if (escape == "d")
348 replacement = NearestLocation(self.death_origin);
349 else if (escape == "w") {
353 wep = self.switchweapon;
356 replacement = WEP_NAME(wep);
357 } else if (escape == "W") {
358 if (self.items & IT_SHELLS) replacement = "shells";
359 else if (self.items & IT_NAILS) replacement = "bullets";
360 else if (self.items & IT_ROCKETS) replacement = "rockets";
361 else if (self.items & IT_CELLS) replacement = "cells";
362 else if (self.items & IT_PLASMA) replacement = "plasma";
363 else replacement = "batteries"; // ;)
364 } else if (escape == "x") {
365 replacement = cursor_ent.netname;
366 if (replacement == "" || !cursor_ent)
367 replacement = "nothing";
368 } else if (escape == "s")
369 replacement = ftos(vlen(self.velocity - self.velocity_z * '0 0 1'));
370 else if (escape == "S")
371 replacement = ftos(vlen(self.velocity));
373 msg = strcat(substring(msg, 0, p), replacement, substring(msg, p+2, strlen(msg) - (p+2)));
374 p = p + strlen(replacement);
379 float boolean(float value) { // if value is 0 return FALSE (0), otherwise return TRUE (1)
380 return (value == 0) ? FALSE : TRUE;
389 >0: receives a cvar from name=argv(f) value=argv(f+1)
391 void GetCvars_handleString(string thisname, float f, .string field, string name)
396 strunzone(self.field);
397 self.field = string_null;
401 if (thisname == name)
404 strunzone(self.field);
405 self.field = strzone(argv(f + 1));
409 stuffcmd(self, strcat("cl_cmd sendcvar ", name, "\n"));
411 void GetCvars_handleString_Fixup(string thisname, float f, .string field, string name, string(string) func)
413 GetCvars_handleString(thisname, f, field, name);
414 if (f >= 0) // also initialize to the fitting value for "" when sending cvars out
415 if (thisname == name)
418 s = func(strcat1(self.field));
421 strunzone(self.field);
422 self.field = strzone(s);
426 void GetCvars_handleFloat(string thisname, float f, .float field, string name)
433 if (thisname == name)
434 self.field = stof(argv(f + 1));
437 stuffcmd(self, strcat("cl_cmd sendcvar ", name, "\n"));
439 void GetCvars_handleFloatOnce(string thisname, float f, .float field, string name)
446 if (thisname == name)
450 self.field = stof(argv(f + 1));
459 stuffcmd(self, strcat("cl_cmd sendcvar ", name, "\n"));
462 string W_FixWeaponOrder_ForceComplete_AndBuildImpulseList(string wo)
465 o = W_FixWeaponOrder_ForceComplete(wo);
466 if(self.weaponorder_byimpulse)
468 strunzone(self.weaponorder_byimpulse);
469 self.weaponorder_byimpulse = string_null;
471 self.weaponorder_byimpulse = strzone(W_FixWeaponOrder_BuildImpulseList(o));
474 void GetCvars(float f)
476 string s = string_null;
479 s = strcat1(argv(f));
484 MUTATOR_CALLHOOK(GetCvars);
486 Notification_GetCvars();
488 GetCvars_handleFloat(s, f, autoswitch, "cl_autoswitch");
489 GetCvars_handleFloat(s, f, cvar_cl_autoscreenshot, "cl_autoscreenshot");
490 GetCvars_handleFloat(s, f, cvar_cl_jetpack_jump, "cl_jetpack_jump");
491 GetCvars_handleString(s, f, cvar_g_xonoticversion, "g_xonoticversion");
492 GetCvars_handleFloat(s, f, cvar_cl_handicap, "cl_handicap");
493 GetCvars_handleFloat(s, f, cvar_cl_clippedspectating, "cl_clippedspectating");
494 GetCvars_handleString_Fixup(s, f, cvar_cl_weaponpriority, "cl_weaponpriority", W_FixWeaponOrder_ForceComplete_AndBuildImpulseList);
495 GetCvars_handleString_Fixup(s, f, cvar_cl_weaponpriorities[0], "cl_weaponpriority0", W_FixWeaponOrder_AllowIncomplete);
496 GetCvars_handleString_Fixup(s, f, cvar_cl_weaponpriorities[1], "cl_weaponpriority1", W_FixWeaponOrder_AllowIncomplete);
497 GetCvars_handleString_Fixup(s, f, cvar_cl_weaponpriorities[2], "cl_weaponpriority2", W_FixWeaponOrder_AllowIncomplete);
498 GetCvars_handleString_Fixup(s, f, cvar_cl_weaponpriorities[3], "cl_weaponpriority3", W_FixWeaponOrder_AllowIncomplete);
499 GetCvars_handleString_Fixup(s, f, cvar_cl_weaponpriorities[4], "cl_weaponpriority4", W_FixWeaponOrder_AllowIncomplete);
500 GetCvars_handleString_Fixup(s, f, cvar_cl_weaponpriorities[5], "cl_weaponpriority5", W_FixWeaponOrder_AllowIncomplete);
501 GetCvars_handleString_Fixup(s, f, cvar_cl_weaponpriorities[6], "cl_weaponpriority6", W_FixWeaponOrder_AllowIncomplete);
502 GetCvars_handleString_Fixup(s, f, cvar_cl_weaponpriorities[7], "cl_weaponpriority7", W_FixWeaponOrder_AllowIncomplete);
503 GetCvars_handleString_Fixup(s, f, cvar_cl_weaponpriorities[8], "cl_weaponpriority8", W_FixWeaponOrder_AllowIncomplete);
504 GetCvars_handleString_Fixup(s, f, cvar_cl_weaponpriorities[9], "cl_weaponpriority9", W_FixWeaponOrder_AllowIncomplete);
505 GetCvars_handleFloat(s, f, cvar_cl_weaponimpulsemode, "cl_weaponimpulsemode");
506 GetCvars_handleFloat(s, f, cvar_cl_autotaunt, "cl_autotaunt");
507 GetCvars_handleFloat(s, f, cvar_cl_noantilag, "cl_noantilag");
508 GetCvars_handleFloat(s, f, cvar_cl_voice_directional, "cl_voice_directional");
509 GetCvars_handleFloat(s, f, cvar_cl_voice_directional_taunt_attenuation, "cl_voice_directional_taunt_attenuation");
510 GetCvars_handleFloat(s, f, cvar_cl_accuracy_data_share, "cl_accuracy_data_share");
511 GetCvars_handleFloat(s, f, cvar_cl_accuracy_data_receive, "cl_accuracy_data_receive");
513 self.cvar_cl_accuracy_data_share = boolean(self.cvar_cl_accuracy_data_share);
514 self.cvar_cl_accuracy_data_receive = boolean(self.cvar_cl_accuracy_data_receive);
516 GetCvars_handleFloatOnce(s, f, cvar_cl_gunalign, "cl_gunalign");
517 GetCvars_handleFloat(s, f, cvar_cl_allow_uid2name, "cl_allow_uid2name");
518 GetCvars_handleFloat(s, f, cvar_cl_allow_uidtracking, "cl_allow_uidtracking");
519 GetCvars_handleFloat(s, f, cvar_cl_movement_track_canjump, "cl_movement_track_canjump");
520 GetCvars_handleFloat(s, f, cvar_cl_newusekeysupported, "cl_newusekeysupported");
522 // fixup of switchweapon (needed for LMS or when spectating is disabled, as PutClientInServer comes too early)
525 if (s == "cl_weaponpriority")
526 self.switchweapon = w_getbestweapon(self);
527 if (s == "cl_allow_uidtracking")
528 PlayerStats_GameReport_AddPlayer(self);
532 // decolorizes and team colors the player name when needed
533 string playername(entity p)
536 if (teamplay && !intermission_running && IS_PLAYER(p))
538 t = Team_ColorCode(p.team);
539 return strcat(t, strdecolorize(p.netname));
545 vector randompos(vector m1, vector m2)
549 v_x = m2_x * random() + m1_x;
550 v_y = m2_y * random() + m1_y;
551 v_z = m2_z * random() + m1_z;
555 //#NO AUTOCVARS START
557 float g_pickup_shells;
558 float g_pickup_shells_max;
559 float g_pickup_nails;
560 float g_pickup_nails_max;
561 float g_pickup_rockets;
562 float g_pickup_rockets_max;
563 float g_pickup_cells;
564 float g_pickup_cells_max;
565 float g_pickup_plasma;
566 float g_pickup_plasma_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_blaster;
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_plasma;
616 float start_ammo_fuel;
618 float start_armorvalue;
619 WepSet warmup_start_weapons;
620 WepSet warmup_start_weapons_default;
621 WepSet warmup_start_weapons_defaultmask;
622 #define WARMUP_START_WEAPONS ((g_warmup_allguns == 1) ? (warmup_start_weapons & (weaponsInMap | start_weapons)) : warmup_start_weapons)
623 float warmup_start_ammo_shells;
624 float warmup_start_ammo_nails;
625 float warmup_start_ammo_rockets;
626 float warmup_start_ammo_cells;
627 float warmup_start_ammo_plasma;
628 float warmup_start_ammo_fuel;
629 float warmup_start_health;
630 float warmup_start_armorvalue;
633 float want_weapon(entity weaponinfo, float allguns) // WEAPONTODO: what still needs done?
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 = !(!weaponinfo.weaponstart);
655 if(g_grappling_hook) // if possible, redirect off-hand hook to on-hand hook
656 d |= (i == WEP_HOOK);
657 if(!g_cts && (weaponinfo.spawnflags & WEP_FLAG_MUTATORBLOCKED)) // never default mutator blocked guns
660 var float t = weaponinfo.weaponstartoverride;
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_ammo_plasma = 0;
692 start_health = cvar("g_balance_health_start");
693 start_armorvalue = cvar("g_balance_armor_start");
696 g_weaponarena_weapons = '0 0 0';
698 s = cvar_string("g_weaponarena");
699 if (s == "0" || s == "")
705 if (s == "0" || s == "")
711 // forcibly turn off weaponarena
713 else if (s == "all" || s == "1")
716 g_weaponarena_list = "All Weapons";
717 for (j = WEP_FIRST; j <= WEP_LAST; ++j)
719 e = get_weaponinfo(j);
720 if (!(e.spawnflags & WEP_FLAG_MUTATORBLOCKED))
721 g_weaponarena_weapons |= WepSet_FromWeapon(j);
724 else if (s == "most")
727 g_weaponarena_list = "Most Weapons";
728 for (j = WEP_FIRST; j <= WEP_LAST; ++j)
730 e = get_weaponinfo(j);
731 if (!(e.spawnflags & WEP_FLAG_MUTATORBLOCKED))
732 if (e.spawnflags & WEP_FLAG_NORMAL)
733 g_weaponarena_weapons |= WepSet_FromWeapon(j);
736 else if (s == "none")
739 g_weaponarena_list = "No Weapons";
744 t = tokenize_console(s);
745 g_weaponarena_list = "";
746 for (i = 0; i < t; ++i)
749 for (j = WEP_FIRST; j <= WEP_LAST; ++j)
751 e = get_weaponinfo(j);
754 g_weaponarena_weapons |= WepSet_FromWeapon(j);
755 g_weaponarena_list = strcat(g_weaponarena_list, e.message, " & ");
761 print("The weapon mutator list contains an unknown weapon ", s, ". Skipped.\n");
764 g_weaponarena_list = strzone(substring(g_weaponarena_list, 0, strlen(g_weaponarena_list) - 3));
768 g_weaponarena_random = cvar("g_weaponarena_random");
770 g_weaponarena_random = 0;
771 g_weaponarena_random_with_blaster = cvar("g_weaponarena_random_with_blaster");
775 g_weapon_stay = 0; // incompatible
776 start_weapons = g_weaponarena_weapons;
777 start_items |= IT_UNLIMITED_AMMO;
781 for (i = WEP_FIRST; i <= WEP_LAST; ++i)
783 e = get_weaponinfo(i);
784 float w = want_weapon(e, FALSE);
786 start_weapons |= WepSet_FromWeapon(i);
788 start_weapons_default |= WepSet_FromWeapon(i);
790 start_weapons_defaultmask |= WepSet_FromWeapon(i);
794 if(!cvar("g_use_ammunition"))
795 start_items |= IT_UNLIMITED_AMMO;
797 if(start_items & IT_UNLIMITED_WEAPON_AMMO)
799 start_ammo_shells = 999;
800 start_ammo_nails = 999;
801 start_ammo_rockets = 999;
802 start_ammo_cells = 999;
803 start_ammo_plasma = 999;
804 start_ammo_fuel = 999;
808 start_ammo_shells = cvar("g_start_ammo_shells");
809 start_ammo_nails = cvar("g_start_ammo_nails");
810 start_ammo_rockets = cvar("g_start_ammo_rockets");
811 start_ammo_cells = cvar("g_start_ammo_cells");
812 start_ammo_plasma = cvar("g_start_ammo_plasma");
813 start_ammo_fuel = cvar("g_start_ammo_fuel");
818 warmup_start_ammo_shells = start_ammo_shells;
819 warmup_start_ammo_nails = start_ammo_nails;
820 warmup_start_ammo_rockets = start_ammo_rockets;
821 warmup_start_ammo_cells = start_ammo_cells;
822 warmup_start_ammo_plasma = start_ammo_plasma;
823 warmup_start_ammo_fuel = start_ammo_fuel;
824 warmup_start_health = start_health;
825 warmup_start_armorvalue = start_armorvalue;
826 warmup_start_weapons = start_weapons;
827 warmup_start_weapons_default = start_weapons_default;
828 warmup_start_weapons_defaultmask = start_weapons_defaultmask;
830 if (!g_weaponarena && !g_ca)
832 warmup_start_ammo_shells = cvar("g_warmup_start_ammo_shells");
833 warmup_start_ammo_nails = cvar("g_warmup_start_ammo_nails");
834 warmup_start_ammo_rockets = cvar("g_warmup_start_ammo_rockets");
835 warmup_start_ammo_cells = cvar("g_warmup_start_ammo_cells");
836 warmup_start_ammo_plasma = cvar("g_warmup_start_ammo_plasma");
837 warmup_start_ammo_fuel = cvar("g_warmup_start_ammo_fuel");
838 warmup_start_health = cvar("g_warmup_start_health");
839 warmup_start_armorvalue = cvar("g_warmup_start_armor");
840 warmup_start_weapons = '0 0 0';
841 warmup_start_weapons_default = '0 0 0';
842 warmup_start_weapons_defaultmask = '0 0 0';
843 for (i = WEP_FIRST; i <= WEP_LAST; ++i)
845 e = get_weaponinfo(i);
846 float w = want_weapon(e, g_warmup_allguns);
848 warmup_start_weapons |= WepSet_FromWeapon(i);
850 warmup_start_weapons_default |= WepSet_FromWeapon(i);
852 warmup_start_weapons_defaultmask |= WepSet_FromWeapon(i);
858 start_items |= IT_JETPACK;
860 MUTATOR_CALLHOOK(SetStartItems);
862 if ((start_items & IT_JETPACK) || (g_grappling_hook && (start_weapons & WEPSET_HOOK)))
864 start_items |= IT_FUEL_REGEN;
865 start_ammo_fuel = max(start_ammo_fuel, cvar("g_balance_fuel_rotstable"));
866 warmup_start_ammo_fuel = max(warmup_start_ammo_fuel, cvar("g_balance_fuel_rotstable"));
869 WepSet precache_weapons = start_weapons;
870 if (g_warmup_allguns != 1)
871 precache_weapons |= warmup_start_weapons;
872 for (i = WEP_FIRST; i <= WEP_LAST; ++i)
874 e = get_weaponinfo(i);
875 if(precache_weapons & WepSet_FromWeapon(i))
876 WEP_ACTION(i, WR_INIT);
879 start_ammo_shells = max(0, start_ammo_shells);
880 start_ammo_nails = max(0, start_ammo_nails);
881 start_ammo_rockets = max(0, start_ammo_rockets);
882 start_ammo_cells = max(0, start_ammo_cells);
883 start_ammo_plasma = max(0, start_ammo_plasma);
884 start_ammo_fuel = max(0, start_ammo_fuel);
886 warmup_start_ammo_shells = max(0, warmup_start_ammo_shells);
887 warmup_start_ammo_nails = max(0, warmup_start_ammo_nails);
888 warmup_start_ammo_rockets = max(0, warmup_start_ammo_rockets);
889 warmup_start_ammo_cells = max(0, warmup_start_ammo_cells);
890 warmup_start_ammo_plasma = max(0, warmup_start_ammo_plasma);
891 warmup_start_ammo_fuel = max(0, warmup_start_ammo_fuel);
895 float g_bugrigs_planar_movement;
896 float g_bugrigs_planar_movement_car_jumping;
897 float g_bugrigs_reverse_spinning;
898 float g_bugrigs_reverse_speeding;
899 float g_bugrigs_reverse_stopping;
900 float g_bugrigs_air_steering;
901 float g_bugrigs_angle_smoothing;
902 float g_bugrigs_friction_floor;
903 float g_bugrigs_friction_brake;
904 float g_bugrigs_friction_air;
905 float g_bugrigs_accel;
906 float g_bugrigs_speed_ref;
907 float g_bugrigs_speed_pow;
908 float g_bugrigs_steer;
913 string GetGametype(); // g_world.qc
914 void mutators_add(); // mutators.qc
915 void readlevelcvars(void)
920 if(cvar("sv_allow_fullbright"))
921 serverflags |= SERVERFLAG_ALLOW_FULLBRIGHT;
923 g_bugrigs = cvar("g_bugrigs");
924 g_bugrigs_planar_movement = cvar("g_bugrigs_planar_movement");
925 g_bugrigs_planar_movement_car_jumping = cvar("g_bugrigs_planar_movement_car_jumping");
926 g_bugrigs_reverse_spinning = cvar("g_bugrigs_reverse_spinning");
927 g_bugrigs_reverse_speeding = cvar("g_bugrigs_reverse_speeding");
928 g_bugrigs_reverse_stopping = cvar("g_bugrigs_reverse_stopping");
929 g_bugrigs_air_steering = cvar("g_bugrigs_air_steering");
930 g_bugrigs_angle_smoothing = cvar("g_bugrigs_angle_smoothing");
931 g_bugrigs_friction_floor = cvar("g_bugrigs_friction_floor");
932 g_bugrigs_friction_brake = cvar("g_bugrigs_friction_brake");
933 g_bugrigs_friction_air = cvar("g_bugrigs_friction_air");
934 g_bugrigs_accel = cvar("g_bugrigs_accel");
935 g_bugrigs_speed_ref = cvar("g_bugrigs_speed_ref");
936 g_bugrigs_speed_pow = cvar("g_bugrigs_speed_pow");
937 g_bugrigs_steer = cvar("g_bugrigs_steer");
939 g_instagib = cvar("g_instagib");
941 sv_clones = cvar("sv_clones");
942 sv_foginterval = cvar("sv_foginterval");
943 g_cloaked = cvar("g_cloaked");
944 g_footsteps = cvar("g_footsteps");
945 g_grappling_hook = cvar("g_grappling_hook");
946 g_jetpack = cvar("g_jetpack");
947 sv_maxidle = cvar("sv_maxidle");
948 sv_maxidle_spectatorsareidle = cvar("sv_maxidle_spectatorsareidle");
949 sv_autotaunt = cvar("sv_autotaunt");
950 sv_taunt = cvar("sv_taunt");
952 warmup_stage = cvar("g_warmup");
953 g_warmup_limit = cvar("g_warmup_limit");
954 g_warmup_allguns = cvar("g_warmup_allguns");
955 g_warmup_allow_timeout = cvar("g_warmup_allow_timeout");
957 if ((g_race && g_race_qualifying == 2) || g_assault || cvar("g_campaign"))
958 warmup_stage = 0; // these modes cannot work together, sorry
960 g_pickup_respawntime_weapon = cvar("g_pickup_respawntime_weapon");
961 g_pickup_respawntime_superweapon = cvar("g_pickup_respawntime_superweapon");
962 g_pickup_respawntime_ammo = cvar("g_pickup_respawntime_ammo");
963 g_pickup_respawntime_short = cvar("g_pickup_respawntime_short");
964 g_pickup_respawntime_medium = cvar("g_pickup_respawntime_medium");
965 g_pickup_respawntime_long = cvar("g_pickup_respawntime_long");
966 g_pickup_respawntime_powerup = cvar("g_pickup_respawntime_powerup");
967 g_pickup_respawntimejitter_weapon = cvar("g_pickup_respawntimejitter_weapon");
968 g_pickup_respawntimejitter_superweapon = cvar("g_pickup_respawntimejitter_superweapon");
969 g_pickup_respawntimejitter_ammo = cvar("g_pickup_respawntimejitter_ammo");
970 g_pickup_respawntimejitter_short = cvar("g_pickup_respawntimejitter_short");
971 g_pickup_respawntimejitter_medium = cvar("g_pickup_respawntimejitter_medium");
972 g_pickup_respawntimejitter_long = cvar("g_pickup_respawntimejitter_long");
973 g_pickup_respawntimejitter_powerup = cvar("g_pickup_respawntimejitter_powerup");
975 g_weaponspeedfactor = cvar("g_weaponspeedfactor");
976 g_weaponratefactor = cvar("g_weaponratefactor");
977 g_weapondamagefactor = cvar("g_weapondamagefactor");
978 g_weaponforcefactor = cvar("g_weaponforcefactor");
979 g_weaponspreadfactor = cvar("g_weaponspreadfactor");
981 g_pickup_shells = cvar("g_pickup_shells");
982 g_pickup_shells_max = cvar("g_pickup_shells_max");
983 g_pickup_nails = cvar("g_pickup_nails");
984 g_pickup_nails_max = cvar("g_pickup_nails_max");
985 g_pickup_rockets = cvar("g_pickup_rockets");
986 g_pickup_rockets_max = cvar("g_pickup_rockets_max");
987 g_pickup_cells = cvar("g_pickup_cells");
988 g_pickup_cells_max = cvar("g_pickup_cells_max");
989 g_pickup_plasma = cvar("g_pickup_plasma");
990 g_pickup_plasma_max = cvar("g_pickup_plasma_max");
991 g_pickup_fuel = cvar("g_pickup_fuel");
992 g_pickup_fuel_jetpack = cvar("g_pickup_fuel_jetpack");
993 g_pickup_fuel_max = cvar("g_pickup_fuel_max");
994 g_pickup_armorsmall = cvar("g_pickup_armorsmall");
995 g_pickup_armorsmall_max = cvar("g_pickup_armorsmall_max");
996 g_pickup_armorsmall_anyway = cvar("g_pickup_armorsmall_anyway");
997 g_pickup_armormedium = cvar("g_pickup_armormedium");
998 g_pickup_armormedium_max = cvar("g_pickup_armormedium_max");
999 g_pickup_armormedium_anyway = cvar("g_pickup_armormedium_anyway");
1000 g_pickup_armorbig = cvar("g_pickup_armorbig");
1001 g_pickup_armorbig_max = cvar("g_pickup_armorbig_max");
1002 g_pickup_armorbig_anyway = cvar("g_pickup_armorbig_anyway");
1003 g_pickup_armorlarge = cvar("g_pickup_armorlarge");
1004 g_pickup_armorlarge_max = cvar("g_pickup_armorlarge_max");
1005 g_pickup_armorlarge_anyway = cvar("g_pickup_armorlarge_anyway");
1006 g_pickup_healthsmall = cvar("g_pickup_healthsmall");
1007 g_pickup_healthsmall_max = cvar("g_pickup_healthsmall_max");
1008 g_pickup_healthsmall_anyway = cvar("g_pickup_healthsmall_anyway");
1009 g_pickup_healthmedium = cvar("g_pickup_healthmedium");
1010 g_pickup_healthmedium_max = cvar("g_pickup_healthmedium_max");
1011 g_pickup_healthmedium_anyway = cvar("g_pickup_healthmedium_anyway");
1012 g_pickup_healthlarge = cvar("g_pickup_healthlarge");
1013 g_pickup_healthlarge_max = cvar("g_pickup_healthlarge_max");
1014 g_pickup_healthlarge_anyway = cvar("g_pickup_healthlarge_anyway");
1015 g_pickup_healthmega = cvar("g_pickup_healthmega");
1016 g_pickup_healthmega_max = cvar("g_pickup_healthmega_max");
1017 g_pickup_healthmega_anyway = cvar("g_pickup_healthmega_anyway");
1019 g_pickup_ammo_anyway = cvar("g_pickup_ammo_anyway");
1020 g_pickup_weapons_anyway = cvar("g_pickup_weapons_anyway");
1022 g_weapon_stay = cvar(strcat("g_", GetGametype(), "_weapon_stay"));
1024 g_weapon_stay = cvar("g_weapon_stay");
1027 game_starttime = time + cvar("g_start_delay");
1029 readplayerstartcvars();
1035 string precache_sound (string s) = #19;
1036 float precache_sound_index (string s) = #19;
1038 #define SND_VOLUME 1
1039 #define SND_ATTENUATION 2
1040 #define SND_LARGEENTITY 8
1041 #define SND_LARGESOUND 16
1043 float sound_allowed(float dest, entity e)
1045 // sounds from world may always pass
1048 if (e.classname == "body")
1050 else if (e.realowner && e.realowner != e)
1052 else if (e.owner && e.owner != e)
1057 // sounds to self may always pass
1058 if (dest == MSG_ONE)
1059 if (e == msg_entity)
1061 // sounds by players can be removed
1062 if (autocvar_bot_sound_monopoly)
1063 if (IS_REAL_CLIENT(e))
1065 // anything else may pass
1070 void sound(entity e, float chan, string samp, float vol, float atten)
1072 if (!sound_allowed(MSG_BROADCAST, e))
1074 sound7(e, chan, samp, vol, atten, 0, 0);
1077 void soundtoat(float dest, entity e, vector o, float chan, string samp, float vol, float atten)
1081 if (!sound_allowed(dest, e))
1084 entno = num_for_edict(e);
1085 idx = precache_sound_index(samp);
1090 atten = floor(atten * 64);
1091 vol = floor(vol * 255);
1094 sflags |= SND_VOLUME;
1096 sflags |= SND_ATTENUATION;
1097 if (entno >= 8192 || chan < 0 || chan > 7)
1098 sflags |= SND_LARGEENTITY;
1100 sflags |= SND_LARGESOUND;
1102 WriteByte(dest, SVC_SOUND);
1103 WriteByte(dest, sflags);
1104 if (sflags & SND_VOLUME)
1105 WriteByte(dest, vol);
1106 if (sflags & SND_ATTENUATION)
1107 WriteByte(dest, atten);
1108 if (sflags & SND_LARGEENTITY)
1110 WriteShort(dest, entno);
1111 WriteByte(dest, chan);
1115 WriteShort(dest, entno * 8 + chan);
1117 if (sflags & SND_LARGESOUND)
1118 WriteShort(dest, idx);
1120 WriteByte(dest, idx);
1122 WriteCoord(dest, o_x);
1123 WriteCoord(dest, o_y);
1124 WriteCoord(dest, o_z);
1126 void soundto(float dest, entity e, float chan, string samp, float vol, float atten)
1130 if (!sound_allowed(dest, e))
1133 o = e.origin + 0.5 * (e.mins + e.maxs);
1134 soundtoat(dest, e, o, chan, samp, vol, atten);
1136 void soundat(entity e, vector o, float chan, string samp, float vol, float atten)
1138 soundtoat(((chan & 8) ? MSG_ALL : MSG_BROADCAST), e, o, chan, samp, vol, atten);
1140 void stopsoundto(float dest, entity e, float chan)
1144 if (!sound_allowed(dest, e))
1147 entno = num_for_edict(e);
1149 if (entno >= 8192 || chan < 0 || chan > 7)
1152 idx = precache_sound_index("misc/null.wav");
1153 sflags = SND_LARGEENTITY;
1155 sflags |= SND_LARGESOUND;
1156 WriteByte(dest, SVC_SOUND);
1157 WriteByte(dest, sflags);
1158 WriteShort(dest, entno);
1159 WriteByte(dest, chan);
1160 if (sflags & SND_LARGESOUND)
1161 WriteShort(dest, idx);
1163 WriteByte(dest, idx);
1164 WriteCoord(dest, e.origin_x);
1165 WriteCoord(dest, e.origin_y);
1166 WriteCoord(dest, e.origin_z);
1170 WriteByte(dest, SVC_STOPSOUND);
1171 WriteShort(dest, entno * 8 + chan);
1174 void stopsound(entity e, float chan)
1176 if (!sound_allowed(MSG_BROADCAST, e))
1179 stopsoundto(MSG_BROADCAST, e, chan); // unreliable, gets there fast
1180 stopsoundto(MSG_ALL, e, chan); // in case of packet loss
1183 void play2(entity e, string filename)
1185 //stuffcmd(e, strcat("play2 ", filename, "\n"));
1187 soundtoat(MSG_ONE, world, '0 0 0', CH_INFO, filename, VOL_BASE, ATTEN_NONE);
1190 // use this one if you might be causing spam (e.g. from touch functions that might get called more than once per frame)
1192 float spamsound(entity e, float chan, string samp, float vol, float atten)
1194 if (!sound_allowed(MSG_BROADCAST, e))
1197 if (time > e.spamtime)
1200 sound(e, chan, samp, vol, atten);
1206 void play2team(float t, string filename)
1210 if (autocvar_bot_sound_monopoly)
1213 FOR_EACH_REALPLAYER(head)
1216 play2(head, filename);
1220 void play2all(string samp)
1222 if (autocvar_bot_sound_monopoly)
1225 sound(world, CH_INFO, samp, VOL_BASE, ATTEN_NONE);
1228 void PrecachePlayerSounds(string f);
1229 void precache_playermodel(string m)
1231 float globhandle, i, n;
1234 if(substring(m, -9,5) == "_lod1")
1236 if(substring(m, -9,5) == "_lod2")
1239 f = strcat(substring(m, 0, -5), "_lod1", substring(m, -4, -1));
1242 f = strcat(substring(m, 0, -5), "_lod2", substring(m, -4, -1));
1246 globhandle = search_begin(strcat(m, "_*.sounds"), TRUE, FALSE);
1249 n = search_getsize(globhandle);
1250 for (i = 0; i < n; ++i)
1252 //print(search_getfilename(globhandle, i), "\n");
1253 f = search_getfilename(globhandle, i);
1254 PrecachePlayerSounds(f);
1256 search_end(globhandle);
1258 void precache_all_playermodels(string pattern)
1260 float globhandle, i, n;
1263 globhandle = search_begin(pattern, TRUE, FALSE);
1266 n = search_getsize(globhandle);
1267 for (i = 0; i < n; ++i)
1269 //print(search_getfilename(globhandle, i), "\n");
1270 f = search_getfilename(globhandle, i);
1271 precache_playermodel(f);
1273 search_end(globhandle);
1278 // gamemode related things
1279 precache_model ("models/misc/chatbubble.spr");
1280 precache_model("models/ice/ice.md3");
1282 #ifdef TTURRETS_ENABLED
1283 if (autocvar_g_turrets)
1287 // Precache all player models if desired
1288 if (autocvar_sv_precacheplayermodels)
1290 PrecachePlayerSounds("sound/player/default.sounds");
1291 precache_all_playermodels("models/player/*.zym");
1292 precache_all_playermodels("models/player/*.dpm");
1293 precache_all_playermodels("models/player/*.md3");
1294 precache_all_playermodels("models/player/*.psk");
1295 precache_all_playermodels("models/player/*.iqm");
1298 if (autocvar_sv_defaultcharacter)
1301 s = autocvar_sv_defaultplayermodel_red;
1303 precache_playermodel(s);
1304 s = autocvar_sv_defaultplayermodel_blue;
1306 precache_playermodel(s);
1307 s = autocvar_sv_defaultplayermodel_yellow;
1309 precache_playermodel(s);
1310 s = autocvar_sv_defaultplayermodel_pink;
1312 precache_playermodel(s);
1313 s = autocvar_sv_defaultplayermodel;
1315 precache_playermodel(s);
1320 PrecacheGlobalSound((globalsound_step = "misc/footstep0 6"));
1321 PrecacheGlobalSound((globalsound_metalstep = "misc/metalfootstep0 6"));
1324 // gore and miscellaneous sounds
1325 //precache_sound ("misc/h2ohit.wav");
1326 precache_model ("models/hook.md3");
1327 precache_sound ("misc/armorimpact.wav");
1328 precache_sound ("misc/bodyimpact1.wav");
1329 precache_sound ("misc/bodyimpact2.wav");
1330 precache_sound ("misc/gib.wav");
1331 precache_sound ("misc/gib_splat01.wav");
1332 precache_sound ("misc/gib_splat02.wav");
1333 precache_sound ("misc/gib_splat03.wav");
1334 precache_sound ("misc/gib_splat04.wav");
1335 PrecacheGlobalSound((globalsound_fall = "misc/hitground 4"));
1336 PrecacheGlobalSound((globalsound_metalfall = "misc/metalhitground 4"));
1337 precache_sound ("misc/null.wav");
1338 precache_sound ("misc/spawn.wav");
1339 precache_sound ("misc/talk.wav");
1340 precache_sound ("misc/teleport.wav");
1341 precache_sound ("misc/poweroff.wav");
1342 precache_sound ("player/lava.wav");
1343 precache_sound ("player/slime.wav");
1345 precache_model ("models/sprites/0.spr32");
1346 precache_model ("models/sprites/1.spr32");
1347 precache_model ("models/sprites/2.spr32");
1348 precache_model ("models/sprites/3.spr32");
1349 precache_model ("models/sprites/4.spr32");
1350 precache_model ("models/sprites/5.spr32");
1351 precache_model ("models/sprites/6.spr32");
1352 precache_model ("models/sprites/7.spr32");
1353 precache_model ("models/sprites/8.spr32");
1354 precache_model ("models/sprites/9.spr32");
1355 precache_model ("models/sprites/10.spr32");
1357 // common weapon precaches
1358 precache_sound ("weapons/reload.wav"); // until weapons have individual reload sounds, precache the reload sound here
1359 precache_sound ("weapons/weapon_switch.wav");
1360 precache_sound ("weapons/weaponpickup.wav");
1361 precache_sound ("weapons/unavailable.wav");
1362 precache_sound ("weapons/dryfire.wav");
1363 if (g_grappling_hook)
1365 precache_sound ("weapons/hook_fire.wav"); // hook
1366 precache_sound ("weapons/hook_impact.wav"); // hook
1369 precache_model("models/elaser.mdl");
1370 precache_model("models/laser.mdl");
1371 precache_model("models/ebomb.mdl");
1374 // Disabled this code because it simply does not work (e.g. ignores bgmvolume, overlaps with "cd loop" controlled tracks).
1376 if (!self.noise && self.music) // quake 3 uses the music field
1377 self.noise = self.music;
1379 // plays music for the level if there is any
1382 precache_sound (self.noise);
1383 ambientsound ('0 0 0', self.noise, VOL_BASE, ATTEN_NONE);
1387 #include "precache-for-csqc.inc"
1390 // WARNING: this kills the trace globals
1391 #define EXACTTRIGGER_TOUCH if(WarpZoneLib_ExactTrigger_Touch()) return
1392 #define EXACTTRIGGER_INIT WarpZoneLib_ExactTrigger_Init()
1394 #define INITPRIO_FIRST 0
1395 #define INITPRIO_GAMETYPE 0
1396 #define INITPRIO_GAMETYPE_FALLBACK 1
1397 #define INITPRIO_FINDTARGET 10
1398 #define INITPRIO_DROPTOFLOOR 20
1399 #define INITPRIO_SETLOCATION 90
1400 #define INITPRIO_LINKDOORS 91
1401 #define INITPRIO_LAST 99
1403 .void(void) initialize_entity;
1404 .float initialize_entity_order;
1405 .entity initialize_entity_next;
1406 entity initialize_entity_first;
1408 void make_safe_for_remove(entity e)
1410 if (e.initialize_entity)
1412 entity ent, prev = world;
1413 for (ent = initialize_entity_first; ent; )
1415 if ((ent == e) || ((ent.classname == "initialize_entity") && (ent.enemy == e)))
1417 //print("make_safe_for_remove: getting rid of initializer ", etos(ent), "\n");
1418 // skip it in linked list
1421 prev.initialize_entity_next = ent.initialize_entity_next;
1422 ent = prev.initialize_entity_next;
1426 initialize_entity_first = ent.initialize_entity_next;
1427 ent = initialize_entity_first;
1433 ent = ent.initialize_entity_next;
1439 void objerror(string s)
1441 make_safe_for_remove(self);
1442 builtin_objerror(s);
1445 .float remove_except_protected_forbidden;
1446 void remove_except_protected(entity e)
1448 if(e.remove_except_protected_forbidden)
1449 error("not allowed to remove this at this point");
1453 void remove_unsafely(entity e)
1455 if(e.classname == "spike")
1456 error("Removing spikes is forbidden (crylink bug), please report");
1460 void remove_safely(entity e)
1462 make_safe_for_remove(e);
1466 void InitializeEntity(entity e, void(void) func, float order)
1470 if (!e || e.initialize_entity)
1472 // make a proxy initializer entity
1476 e.classname = "initialize_entity";
1480 e.initialize_entity = func;
1481 e.initialize_entity_order = order;
1483 cur = initialize_entity_first;
1487 if (!cur || cur.initialize_entity_order > order)
1489 // insert between prev and cur
1491 prev.initialize_entity_next = e;
1493 initialize_entity_first = e;
1494 e.initialize_entity_next = cur;
1498 cur = cur.initialize_entity_next;
1501 void InitializeEntitiesRun()
1504 startoflist = initialize_entity_first;
1505 initialize_entity_first = world;
1506 remove = remove_except_protected;
1507 for (self = startoflist; self; self = self.initialize_entity_next)
1509 self.remove_except_protected_forbidden = 1;
1511 for (self = startoflist; self; )
1514 var void(void) func;
1515 e = self.initialize_entity_next;
1516 func = self.initialize_entity;
1517 self.initialize_entity_order = 0;
1518 self.initialize_entity = func_null;
1519 self.initialize_entity_next = world;
1520 self.remove_except_protected_forbidden = 0;
1521 if (self.classname == "initialize_entity")
1525 builtin_remove(self);
1528 //dprint("Delayed initialization: ", self.classname, "\n");
1534 backtrace(strcat("Null function in: ", self.classname, "\n"));
1538 remove = remove_unsafely;
1541 .float uncustomizeentityforclient_set;
1542 .void(void) uncustomizeentityforclient;
1543 void UncustomizeEntitiesRun()
1547 for (self = world; (self = findfloat(self, uncustomizeentityforclient_set, 1)); )
1548 self.uncustomizeentityforclient();
1551 void SetCustomizer(entity e, float(void) customizer, void(void) uncustomizer)
1553 e.customizeentityforclient = customizer;
1554 e.uncustomizeentityforclient = uncustomizer;
1555 e.uncustomizeentityforclient_set = !!uncustomizer;
1559 #define IFTARGETED if(!self.nottargeted && self.targetname != "")
1562 void Net_LinkEntity(entity e, float docull, float dt, float(entity, float) sendfunc)
1566 if (e.classname == "")
1567 e.classname = "net_linked";
1569 if (e.model == "" || self.modelindex == 0)
1573 setmodel(e, "null");
1577 e.SendEntity = sendfunc;
1578 e.SendFlags = 0xFFFFFF;
1581 e.effects |= EF_NODEPTHTEST;
1585 e.nextthink = time + dt;
1586 e.think = SUB_Remove;
1591 entity eliminatedPlayers;
1592 .float(entity) isEliminated;
1593 float EliminatedPlayers_SendEntity(entity to, float sendflags)
1597 WriteByte(MSG_ENTITY, ENT_CLIENT_ELIMINATEDPLAYERS);
1598 WriteByte(MSG_ENTITY, sendflags);
1602 for(i = 1; i <= maxclients; i += 8)
1604 for(f = 0, e = edict_num(i), b = 1; b < 256; b *= 2, e = nextent(e))
1606 if(eliminatedPlayers.isEliminated(e))
1609 WriteByte(MSG_ENTITY, f);
1616 void EliminatedPlayers_Init(float(entity) isEliminated_func)
1618 if(eliminatedPlayers)
1620 backtrace("Can't spawn eliminatedPlayers again!");
1623 Net_LinkEntity(eliminatedPlayers = spawn(), FALSE, 0, EliminatedPlayers_SendEntity);
1624 eliminatedPlayers.isEliminated = isEliminated_func;
1628 void adaptor_think2touch()
1637 void adaptor_think2use()
1649 void adaptor_think2use_hittype_splash() // for timed projectile detonation
1651 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
1652 self.projectiledeathtype |= HITTYPE_SPLASH;
1653 adaptor_think2use();
1656 // deferred dropping
1657 void DropToFloor_Handler()
1659 builtin_droptofloor();
1660 self.dropped_origin = self.origin;
1665 InitializeEntity(self, DropToFloor_Handler, INITPRIO_DROPTOFLOOR);
1670 float trace_hits_box_a0, trace_hits_box_a1;
1672 float trace_hits_box_1d(float end, float thmi, float thma)
1676 // just check if x is in range
1684 // do the trace with respect to x
1685 // 0 -> end has to stay in thmi -> thma
1686 trace_hits_box_a0 = max(trace_hits_box_a0, min(thmi / end, thma / end));
1687 trace_hits_box_a1 = min(trace_hits_box_a1, max(thmi / end, thma / end));
1688 if (trace_hits_box_a0 > trace_hits_box_a1)
1694 float trace_hits_box(vector start, vector end, vector thmi, vector thma)
1699 // now it is a trace from 0 to end
1701 trace_hits_box_a0 = 0;
1702 trace_hits_box_a1 = 1;
1704 if (!trace_hits_box_1d(end_x, thmi_x, thma_x))
1706 if (!trace_hits_box_1d(end_y, thmi_y, thma_y))
1708 if (!trace_hits_box_1d(end_z, thmi_z, thma_z))
1714 float tracebox_hits_box(vector start, vector mi, vector ma, vector end, vector thmi, vector thma)
1716 return trace_hits_box(start, end, thmi - ma, thma - mi);
1719 float SUB_NoImpactCheck()
1721 // zero hitcontents = this is not the real impact, but either the
1722 // mirror-impact of something hitting the projectile instead of the
1723 // projectile hitting the something, or a touchareagrid one. Neither of
1724 // these stop the projectile from moving, so...
1725 if(trace_dphitcontents == 0)
1727 //dprint("A hit happened with zero hit contents... DEBUG THIS, this should never happen for projectiles! Projectile will self-destruct.\n");
1728 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));
1731 if (trace_dphitq3surfaceflags & Q3SURFACEFLAG_NOIMPACT)
1733 if (other == world && self.size != '0 0 0')
1736 tic = self.velocity * sys_frametime;
1737 tic = tic + normalize(tic) * vlen(self.maxs - self.mins);
1738 traceline(self.origin - tic, self.origin + tic, MOVE_NORMAL, self);
1739 if (trace_fraction >= 1)
1741 dprint("Odd... did not hit...?\n");
1743 else if (trace_dphitq3surfaceflags & Q3SURFACEFLAG_NOIMPACT)
1745 dprint("Detected and prevented the sky-grapple bug.\n");
1753 #define SUB_OwnerCheck() (other && (other == self.owner))
1755 void RemoveGrapplingHook(entity pl);
1756 void W_Crylink_Dequeue(entity e);
1757 float WarpZone_Projectile_Touch_ImpactFilter_Callback()
1759 if(SUB_OwnerCheck())
1761 if(SUB_NoImpactCheck())
1763 if(self.classname == "nade")
1764 return FALSE; // no checks here
1765 else if(self.classname == "grapplinghook")
1766 RemoveGrapplingHook(self.realowner);
1767 else if(self.classname == "spike")
1769 W_Crylink_Dequeue(self);
1776 if(trace_ent && trace_ent.solid > SOLID_TRIGGER)
1777 UpdateCSQCProjectile(self);
1780 #define PROJECTILE_TOUCH if(WarpZone_Projectile_Touch()) return
1782 #define ITEM_TOUCH_NEEDKILL() (((trace_dpstartcontents | trace_dphitcontents) & DPCONTENTS_NODROP) || (trace_dphitq3surfaceflags & Q3SURFACEFLAG_SKY))
1783 #define ITEM_DAMAGE_NEEDKILL(dt) (((dt) == DEATH_HURTTRIGGER) || ((dt) == DEATH_SLIME) || ((dt) == DEATH_LAVA) || ((dt) == DEATH_SWAMP))
1785 void URI_Get_Callback(float id, float status, string data)
1787 if(url_URI_Get_Callback(id, status, data))
1791 else if (id == URI_GET_DISCARD)
1795 else if (id >= URI_GET_CURL && id <= URI_GET_CURL_END)
1798 Curl_URI_Get_Callback(id, status, data);
1800 else if (id >= URI_GET_IPBAN && id <= URI_GET_IPBAN_END)
1803 OnlineBanList_URI_Get_Callback(id, status, data);
1807 print("Received HTTP request data for an invalid id ", ftos(id), ".\n");
1811 string uid2name(string myuid) {
1813 s = db_get(ServerProgsDB, strcat("/uid2name/", myuid));
1815 // FIXME remove this later after 0.6 release
1816 // convert old style broken records to correct style
1819 s = db_get(ServerProgsDB, strcat("uid2name", myuid));
1822 db_put(ServerProgsDB, strcat("/uid2name/", myuid), s);
1823 db_put(ServerProgsDB, strcat("uid2name", myuid), "");
1828 s = "^1Unregistered Player";
1832 float MoveToRandomMapLocation(entity e, float goodcontents, float badcontents, float badsurfaceflags, float attempts, float maxaboveground, float minviewdistance)
1835 vector start, org, delta, end, enddown, mstart;
1838 m = e.dphitcontentsmask;
1839 e.dphitcontentsmask = goodcontents | badcontents;
1842 delta = world.maxs - world.mins;
1846 for (i = 0; i < attempts; ++i)
1848 start_x = org_x + random() * delta_x;
1849 start_y = org_y + random() * delta_y;
1850 start_z = org_z + random() * delta_z;
1852 // rule 1: start inside world bounds, and outside
1853 // solid, and don't start from somewhere where you can
1854 // fall down to evil
1855 tracebox(start, e.mins, e.maxs, start - '0 0 1' * delta_z, MOVE_NORMAL, e);
1856 if (trace_fraction >= 1)
1858 if (trace_startsolid)
1860 if (trace_dphitcontents & badcontents)
1862 if (trace_dphitq3surfaceflags & badsurfaceflags)
1865 // rule 2: if we are too high, lower the point
1866 if (trace_fraction * delta_z > maxaboveground)
1867 start = trace_endpos + '0 0 1' * maxaboveground;
1868 enddown = trace_endpos;
1870 // rule 3: make sure we aren't outside the map. This only works
1871 // for somewhat well formed maps. A good rule of thumb is that
1872 // the map should have a convex outside hull.
1873 // these can be traceLINES as we already verified the starting box
1874 mstart = start + 0.5 * (e.mins + e.maxs);
1875 traceline(mstart, mstart + '1 0 0' * delta_x, MOVE_NORMAL, e);
1876 if (trace_fraction >= 1 || trace_dphittexturename == "common/caulk")
1878 traceline(mstart, mstart - '1 0 0' * delta_x, MOVE_NORMAL, e);
1879 if (trace_fraction >= 1 || trace_dphittexturename == "common/caulk")
1881 traceline(mstart, mstart + '0 1 0' * delta_y, MOVE_NORMAL, e);
1882 if (trace_fraction >= 1 || trace_dphittexturename == "common/caulk")
1884 traceline(mstart, mstart - '0 1 0' * delta_y, MOVE_NORMAL, e);
1885 if (trace_fraction >= 1 || trace_dphittexturename == "common/caulk")
1887 traceline(mstart, mstart + '0 0 1' * delta_z, MOVE_NORMAL, e);
1888 if (trace_fraction >= 1 || trace_dphittexturename == "common/caulk")
1891 // rule 4: we must "see" some spawnpoint or item
1892 for(sp = world; (sp = find(sp, classname, "info_player_deathmatch")); )
1893 if(checkpvs(mstart, sp))
1894 if((traceline(mstart, sp.origin, MOVE_NORMAL, e), trace_fraction) >= 1)
1898 for(sp = world; (sp = findflags(sp, flags, FL_ITEM)); )
1899 if(checkpvs(mstart, sp))
1900 if((traceline(mstart, sp.origin + (sp.mins + sp.maxs) * 0.5, MOVE_NORMAL, e), trace_fraction) >= 1)
1906 // find a random vector to "look at"
1907 end_x = org_x + random() * delta_x;
1908 end_y = org_y + random() * delta_y;
1909 end_z = org_z + random() * delta_z;
1910 end = start + normalize(end - start) * vlen(delta);
1912 // rule 4: start TO end must not be too short
1913 tracebox(start, e.mins, e.maxs, end, MOVE_NORMAL, e);
1914 if (trace_startsolid)
1916 if (trace_fraction < minviewdistance / vlen(delta))
1919 // rule 5: don't want to look at sky
1920 if (trace_dphitq3surfaceflags & Q3SURFACEFLAG_SKY)
1923 // rule 6: we must not end up in trigger_hurt
1924 if (tracebox_hits_trigger_hurt(start, e.mins, e.maxs, enddown))
1930 e.dphitcontentsmask = m;
1934 setorigin(e, start);
1935 e.angles = vectoangles(end - start);
1936 dprint("Needed ", ftos(i + 1), " attempts\n");
1943 void write_recordmarker(entity pl, float tstart, float dt)
1945 GameLogEcho(strcat(":recordset:", ftos(pl.playerid), ":", ftos(dt)));
1947 // also write a marker into demo files for demotc-race-record-extractor to find
1950 strcat("//", strconv(2, 0, 0, GetGametype()), " RECORD SET ", TIME_ENCODED_TOSTRING(TIME_ENCODE(dt))),
1951 " ", ftos(tstart), " ", ftos(dt), "\n"));
1954 vector shotorg_adjustfromclient(vector vecs, float y_is_right, float allowcenter, float algn)
1967 if(allowcenter) // 2: allow center handedness
1980 if(allowcenter) // 2: allow center handedness
1996 vector shotorg_adjust_values(vector vecs, float y_is_right, float visual, float algn)
2001 if (autocvar_g_shootfromeye)
2005 if (autocvar_g_shootfromclient) { vecs = shotorg_adjustfromclient(vecs, y_is_right, (autocvar_g_shootfromclient >= 2), algn); }
2006 else { vecs_y = 0; vecs_z -= 2; }
2014 else if (autocvar_g_shootfromcenter)
2019 else if ((s = autocvar_g_shootfromfixedorigin) != "")
2029 else if (autocvar_g_shootfromclient)
2031 vecs = shotorg_adjustfromclient(vecs, y_is_right, (autocvar_g_shootfromclient >= 2), algn);
2036 vector shotorg_adjust(vector vecs, float y_is_right, float visual)
2038 return shotorg_adjust_values(vecs, y_is_right, visual, self.owner.cvar_cl_gunalign);
2042 void attach_sameorigin(entity e, entity to, string tag)
2044 vector org, t_forward, t_left, t_up, e_forward, e_up;
2047 org = e.origin - gettaginfo(to, gettagindex(to, tag));
2048 tagscale = pow(vlen(v_forward), -2); // undo a scale on the tag
2049 t_forward = v_forward * tagscale;
2050 t_left = v_right * -tagscale;
2051 t_up = v_up * tagscale;
2053 e.origin_x = org * t_forward;
2054 e.origin_y = org * t_left;
2055 e.origin_z = org * t_up;
2057 // current forward and up directions
2058 if (substring(e.model, 0, 1) == "*") // bmodels have their own rules
2059 e.angles = AnglesTransform_FromVAngles(e.angles);
2061 e.angles = AnglesTransform_FromAngles(e.angles);
2062 fixedmakevectors(e.angles);
2064 // untransform forward, up!
2065 e_forward_x = v_forward * t_forward;
2066 e_forward_y = v_forward * t_left;
2067 e_forward_z = v_forward * t_up;
2068 e_up_x = v_up * t_forward;
2069 e_up_y = v_up * t_left;
2070 e_up_z = v_up * t_up;
2072 e.angles = fixedvectoangles2(e_forward, e_up);
2073 if (substring(e.model, 0, 1) == "*") // bmodels have their own rules
2074 e.angles = AnglesTransform_ToVAngles(e.angles);
2076 e.angles = AnglesTransform_ToAngles(e.angles);
2078 setattachment(e, to, tag);
2079 setorigin(e, e.origin);
2082 void detach_sameorigin(entity e)
2085 org = gettaginfo(e, 0);
2086 e.angles = fixedvectoangles2(v_forward, v_up);
2087 if (substring(e.model, 0, 1) == "*") // bmodels have their own rules
2088 e.angles = AnglesTransform_ToVAngles(e.angles);
2090 e.angles = AnglesTransform_ToAngles(e.angles);
2092 setattachment(e, world, "");
2093 setorigin(e, e.origin);
2096 void follow_sameorigin(entity e, entity to)
2098 e.movetype = MOVETYPE_FOLLOW; // make the hole follow
2099 e.aiment = to; // make the hole follow bmodel
2100 e.punchangle = to.angles; // the original angles of bmodel
2101 e.view_ofs = e.origin - to.origin; // relative origin
2102 e.v_angle = e.angles - to.angles; // relative angles
2105 void unfollow_sameorigin(entity e)
2107 e.movetype = MOVETYPE_NONE;
2110 entity gettaginfo_relative_ent;
2111 vector gettaginfo_relative(entity e, float tag)
2113 if (!gettaginfo_relative_ent)
2115 gettaginfo_relative_ent = spawn();
2116 gettaginfo_relative_ent.effects = EF_NODRAW;
2118 gettaginfo_relative_ent.model = e.model;
2119 gettaginfo_relative_ent.modelindex = e.modelindex;
2120 gettaginfo_relative_ent.frame = e.frame;
2121 return gettaginfo(gettaginfo_relative_ent, tag);
2126 float modeleffect_SendEntity(entity to, float sf)
2129 WriteByte(MSG_ENTITY, ENT_CLIENT_MODELEFFECT);
2132 if(self.velocity != '0 0 0')
2134 if(self.angles != '0 0 0')
2136 if(self.avelocity != '0 0 0')
2139 WriteByte(MSG_ENTITY, f);
2140 WriteShort(MSG_ENTITY, self.modelindex);
2141 WriteByte(MSG_ENTITY, self.skin);
2142 WriteByte(MSG_ENTITY, self.frame);
2143 WriteCoord(MSG_ENTITY, self.origin_x);
2144 WriteCoord(MSG_ENTITY, self.origin_y);
2145 WriteCoord(MSG_ENTITY, self.origin_z);
2148 WriteCoord(MSG_ENTITY, self.velocity_x);
2149 WriteCoord(MSG_ENTITY, self.velocity_y);
2150 WriteCoord(MSG_ENTITY, self.velocity_z);
2154 WriteCoord(MSG_ENTITY, self.angles_x);
2155 WriteCoord(MSG_ENTITY, self.angles_y);
2156 WriteCoord(MSG_ENTITY, self.angles_z);
2160 WriteCoord(MSG_ENTITY, self.avelocity_x);
2161 WriteCoord(MSG_ENTITY, self.avelocity_y);
2162 WriteCoord(MSG_ENTITY, self.avelocity_z);
2164 WriteShort(MSG_ENTITY, self.scale * 256.0);
2165 WriteShort(MSG_ENTITY, self.scale2 * 256.0);
2166 WriteByte(MSG_ENTITY, self.teleport_time * 100.0);
2167 WriteByte(MSG_ENTITY, self.fade_time * 100.0);
2168 WriteByte(MSG_ENTITY, self.alpha * 255.0);
2173 void modeleffect_spawn(string m, float s, float f, vector o, vector v, vector ang, vector angv, float s0, float s2, float a, float t1, float t2)
2178 e.classname = "modeleffect";
2186 e.teleport_time = t1;
2190 e.scale = s0 / max6(-e.mins_x, -e.mins_y, -e.mins_z, e.maxs_x, e.maxs_y, e.maxs_z);
2194 e.scale2 = s2 / max6(-e.mins_x, -e.mins_y, -e.mins_z, e.maxs_x, e.maxs_y, e.maxs_z);
2197 sz = max(e.scale, e.scale2);
2198 setsize(e, e.mins * sz, e.maxs * sz);
2199 Net_LinkEntity(e, FALSE, 0.1, modeleffect_SendEntity);
2202 void shockwave_spawn(string m, vector org, float sz, float t1, float t2)
2204 return modeleffect_spawn(m, 0, 0, org, '0 0 0', '0 0 0', '0 0 0', 0, sz, 1, t1, t2);
2207 float randombit(float bits)
2209 if(!(bits & (bits-1))) // this ONLY holds for powers of two!
2218 for(f = 1; f <= bits; f *= 2)
2227 r = (r - 1) / (n - 1);
2234 float randombits(float bits, float k, float error_return)
2238 while(k > 0 && bits != r)
2240 r += randombit(bits - r);
2249 void randombit_test(float bits, float iter)
2253 print(ftos(randombit(bits)), "\n");
2258 float ExponentialFalloff(float mindist, float maxdist, float halflifedist, float d)
2260 if(halflifedist > 0)
2261 return pow(0.5, (bound(mindist, d, maxdist) - mindist) / halflifedist);
2262 else if(halflifedist < 0)
2263 return pow(0.5, (bound(mindist, d, maxdist) - maxdist) / halflifedist);
2272 #define cvar_string_normal builtin_cvar_string
2273 #define cvar_normal builtin_cvar
2275 string cvar_string_normal(string n)
2277 if (!(cvar_type(n) & 1))
2278 backtrace(strcat("Attempt to access undefined cvar: ", n));
2279 return builtin_cvar_string(n);
2282 float cvar_normal(string n)
2284 return stof(cvar_string_normal(n));
2287 #define cvar_set_normal builtin_cvar_set
2295 oself.think = SUB_Remove;
2296 oself.nextthink = time;
2302 Execute func() after time + fdelay.
2303 self when func is executed = self when defer is called
2305 void defer(float fdelay, void() func)
2312 e.think = defer_think;
2313 e.nextthink = time + fdelay;
2316 .string aiment_classname;
2317 .float aiment_deadflag;
2318 void SetMovetypeFollow(entity ent, entity e)
2320 // FIXME this may not be warpzone aware
2321 ent.movetype = MOVETYPE_FOLLOW; // make the hole follow
2322 ent.solid = SOLID_NOT; // MOVETYPE_FOLLOW is always non-solid - this means this cannot be teleported by warpzones any more! Instead, we must notice when our owner gets teleported.
2323 ent.aiment = e; // make the hole follow bmodel
2324 ent.punchangle = e.angles; // the original angles of bmodel
2325 ent.view_ofs = ent.origin - e.origin; // relative origin
2326 ent.v_angle = ent.angles - e.angles; // relative angles
2327 ent.aiment_classname = strzone(e.classname);
2328 ent.aiment_deadflag = e.deadflag;
2330 void UnsetMovetypeFollow(entity ent)
2332 ent.movetype = MOVETYPE_FLY;
2333 PROJECTILE_MAKETRIGGER(ent);
2336 float LostMovetypeFollow(entity ent)
2339 if(ent.movetype != MOVETYPE_FOLLOW)
2345 if(ent.aiment.classname != ent.aiment_classname)
2347 if(ent.aiment.deadflag != ent.aiment_deadflag)
2353 float isPushable(entity e)
2362 case "droppedweapon":
2363 case "keepawayball":
2364 case "nexball_basketball":
2365 case "nexball_football":
2367 case "bullet": // antilagged bullets can't hit this either
2370 if (e.projectiledeathtype)