]> de.git.xonotic.org Git - xonotic/xonotic-data.pk3dir.git/blob - qcsrc/common/gamemodes/gamemode/domination/sv_domination.qc
Use gender-neutral pronouns when referring to the player
[xonotic/xonotic-data.pk3dir.git] / qcsrc / common / gamemodes / gamemode / domination / sv_domination.qc
1 #include "sv_domination.qh"
2
3 #include <server/client.qh>
4 #include <server/command/vote.qh>
5 #include <server/damage.qh>
6 #include <server/gamelog.qh>
7 #include <server/items/items.qh>
8 #include <server/teamplay.qh>
9 #include <server/world.qh>
10 #include <common/mapobjects/platforms.qh>
11 #include <common/mapobjects/triggers.qh>
12
13 bool g_domination;
14
15 int autocvar_g_domination_default_teams;
16 bool autocvar_g_domination_disable_frags;
17 int autocvar_g_domination_point_amt;
18 bool autocvar_g_domination_point_fullbright;
19 float autocvar_g_domination_round_timelimit;
20 float autocvar_g_domination_warmup;
21 float autocvar_g_domination_point_rate;
22 int autocvar_g_domination_teams_override;
23
24 void dom_EventLog(string mode, float team_before, entity actor) // use an alias for easy changing and quick editing later
25 {
26         if(autocvar_sv_eventlog)
27                 GameLogEcho(strcat(":dom:", mode, ":", ftos(team_before), ((actor != NULL) ? (strcat(":", ftos(actor.playerid))) : "")));
28 }
29
30 void set_dom_state(entity e)
31 {
32         STAT(DOM_TOTAL_PPS, e) = total_pps;
33         STAT(DOM_PPS_RED, e) = pps_red;
34         STAT(DOM_PPS_BLUE, e) = pps_blue;
35         if(domination_teams & BIT(2))
36                 STAT(DOM_PPS_YELLOW, e) = pps_yellow;
37         if(domination_teams & BIT(3))
38                 STAT(DOM_PPS_PINK, e) = pps_pink;
39 }
40
41 void dompoint_captured(entity this)
42 {
43         float old_delay, old_team, real_team;
44
45         // now that the delay has expired, switch to the latest team to lay claim to this point
46         entity head = this.owner;
47
48         real_team = this.cnt;
49         this.cnt = -1;
50
51         dom_EventLog("taken", this.team, this.dmg_inflictor);
52         this.dmg_inflictor = NULL;
53
54         this.goalentity = head;
55         this.model = head.mdl;
56         this.modelindex = head.dmg;
57         this.skin = head.skin;
58
59         float points, wait_time;
60         if (autocvar_g_domination_point_amt)
61                 points = autocvar_g_domination_point_amt;
62         else
63                 points = this.frags;
64         if (autocvar_g_domination_point_rate)
65                 wait_time = autocvar_g_domination_point_rate;
66         else
67                 wait_time = this.wait;
68
69         if(domination_roundbased)
70                 bprint(sprintf("^3%s^3%s\n", head.netname, this.message));
71         else
72                 Send_Notification(NOTIF_ALL, NULL, MSG_INFO, INFO_DOMINATION_CAPTURE_TIME, head.netname, this.message, points, wait_time);
73
74         if(this.enemy.playerid == this.enemy_playerid)
75                 GameRules_scoring_add(this.enemy, DOM_TAKES, 1);
76         else
77                 this.enemy = NULL;
78
79         if (head.noise != "")
80         {
81                 if(this.enemy)
82                         _sound(this.enemy, CH_TRIGGER, head.noise, VOL_BASE, ATTEN_NORM);
83                 else
84                         _sound(this, CH_TRIGGER, head.noise, VOL_BASE, ATTEN_NORM);
85         }
86         if (head.noise1 != "")
87                 play2all(head.noise1);
88
89         this.delay = time + wait_time;
90
91         // do trigger work
92         old_delay = this.delay;
93         old_team = this.team;
94         this.team = real_team;
95         this.delay = 0;
96         SUB_UseTargets (this, this, NULL);
97         this.delay = old_delay;
98         this.team = old_team;
99
100         entity msg = WP_DomNeut;
101         switch(real_team)
102         {
103                 case NUM_TEAM_1: msg = WP_DomRed; break;
104                 case NUM_TEAM_2: msg = WP_DomBlue; break;
105                 case NUM_TEAM_3: msg = WP_DomYellow; break;
106                 case NUM_TEAM_4: msg = WP_DomPink; break;
107         }
108
109         WaypointSprite_UpdateSprites(this.sprite, msg, WP_Null, WP_Null);
110
111         total_pps = 0, pps_red = 0, pps_blue = 0, pps_yellow = 0, pps_pink = 0;
112         IL_EACH(g_dompoints, true,
113         {
114                 if (autocvar_g_domination_point_amt)
115                         points = autocvar_g_domination_point_amt;
116                 else
117                         points = it.frags;
118                 if (autocvar_g_domination_point_rate)
119                         wait_time = autocvar_g_domination_point_rate;
120                 else
121                         wait_time = it.wait;
122                 switch(it.goalentity.team)
123                 {
124                         case NUM_TEAM_1: pps_red += points/wait_time; break;
125                         case NUM_TEAM_2: pps_blue += points/wait_time; break;
126                         case NUM_TEAM_3: pps_yellow += points/wait_time; break;
127                         case NUM_TEAM_4: pps_pink += points/wait_time; break;
128                 }
129                 total_pps += points/wait_time;
130         });
131
132         WaypointSprite_UpdateTeamRadar(this.sprite, RADARICON_DOMPOINT, colormapPaletteColor(this.goalentity.team - 1, 0));
133         WaypointSprite_Ping(this.sprite);
134
135         this.captime = time;
136
137         FOREACH_CLIENT(IS_REAL_CLIENT(it), { set_dom_state(it); });
138 }
139
140 void AnimateDomPoint(entity this)
141 {
142         if(this.pain_finished > time)
143                 return;
144         this.pain_finished = time + this.t_width;
145         if(this.nextthink > this.pain_finished)
146                 this.nextthink = this.pain_finished;
147
148         this.frame = this.frame + 1;
149         if(this.frame > this.t_length)
150                 this.frame = 0;
151 }
152
153 void dompointthink(entity this)
154 {
155         float fragamt;
156
157         this.nextthink = time + 0.1;
158
159         //this.frame = this.frame + 1;
160         //if(this.frame > 119)
161         //      this.frame = 0;
162         AnimateDomPoint(this);
163
164         // give points
165
166         if (game_stopped || this.delay > time || time < game_starttime) // game has ended, don't keep giving points
167                 return;
168
169         if(autocvar_g_domination_point_rate)
170                 this.delay = time + autocvar_g_domination_point_rate;
171         else
172                 this.delay = time + this.wait;
173
174         // give credit to the team
175         // NOTE: this defaults to 0
176         if (!domination_roundbased)
177         if (this.goalentity.netname != "")
178         {
179                 if(autocvar_g_domination_point_amt)
180                         fragamt = autocvar_g_domination_point_amt;
181                 else
182                         fragamt = this.frags;
183                 TeamScore_AddToTeam(this.goalentity.team, ST_SCORE, fragamt);
184                 TeamScore_AddToTeam(this.goalentity.team, ST_DOM_TICKS, fragamt);
185
186                 // give credit to the individual player, if they are still there
187                 if (this.enemy.playerid == this.enemy_playerid)
188                 {
189                         GameRules_scoring_add(this.enemy, SCORE, fragamt);
190                         GameRules_scoring_add(this.enemy, DOM_TICKS, fragamt);
191                 }
192                 else
193                         this.enemy = NULL;
194         }
195 }
196
197 void dompointtouch(entity this, entity toucher)
198 {
199         if(!IS_PLAYER(toucher))
200                 return;
201         if(GetResource(toucher, RES_HEALTH) < 1)
202                 return;
203
204         if(round_handler_IsActive() && !round_handler_IsRoundStarted())
205                 return;
206
207         if(time < this.captime + 0.3)
208                 return;
209
210         // only valid teams can claim it
211         entity head = find(NULL, classname, "dom_team");
212         while (head && head.team != toucher.team)
213                 head = find(head, classname, "dom_team");
214         if (!head || head.netname == "" || head == this.goalentity)
215                 return;
216
217         // delay capture
218
219         this.team = this.goalentity.team; // this stores the PREVIOUS team!
220
221         this.cnt = toucher.team;
222         this.owner = head; // team to switch to after the delay
223         this.dmg_inflictor = toucher;
224
225         // this.state = 1;
226         // this.delay = time + cvar("g_domination_point_capturetime");
227         //this.nextthink = time + cvar("g_domination_point_capturetime");
228         //this.think = dompoint_captured;
229
230         // go to neutral team in the mean time
231         head = find(NULL, classname, "dom_team");
232         while (head && head.netname != "")
233                 head = find(head, classname, "dom_team");
234         if(head == NULL)
235                 return;
236
237         WaypointSprite_UpdateSprites(this.sprite, WP_DomNeut, WP_Null, WP_Null);
238         WaypointSprite_UpdateTeamRadar(this.sprite, RADARICON_DOMPOINT, '0 1 1');
239         WaypointSprite_Ping(this.sprite);
240
241         this.goalentity = head;
242         this.model = head.mdl;
243         this.modelindex = head.dmg;
244         this.skin = head.skin;
245
246         this.enemy = toucher; // individual player scoring
247         this.enemy_playerid = toucher.playerid;
248         dompoint_captured(this);
249 }
250
251 void dom_controlpoint_setup(entity this)
252 {
253         entity head;
254         // find the spawnfunc_dom_team representing unclaimed points
255         head = find(NULL, classname, "dom_team");
256         while(head && head.netname != "")
257                 head = find(head, classname, "dom_team");
258         if (!head)
259                 objerror(this, "no spawnfunc_dom_team with netname \"\" found\n");
260
261         // copy important properties from spawnfunc_dom_team entity
262         this.goalentity = head;
263         _setmodel(this, head.mdl); // precision already set
264         this.skin = head.skin;
265
266         this.cnt = -1;
267
268         if(this.message == "")
269                 this.message = " has captured a control point";
270
271         if(this.frags <= 0)
272                 this.frags = 1;
273         if(this.wait <= 0)
274                 this.wait = 5;
275
276         float points, waittime;
277         if (autocvar_g_domination_point_amt)
278                 points = autocvar_g_domination_point_amt;
279         else
280                 points = this.frags;
281         if (autocvar_g_domination_point_rate)
282                 waittime = autocvar_g_domination_point_rate;
283         else
284                 waittime = this.wait;
285
286         total_pps += points/waittime;
287
288         if(!this.t_width)
289                 this.t_width = 0.02; // frame animation rate
290         if(!this.t_length)
291                 this.t_length = 239; // maximum frame
292
293         setthink(this, dompointthink);
294         this.nextthink = time;
295         settouch(this, dompointtouch);
296         this.solid = SOLID_TRIGGER;
297         if(!this.flags & FL_ITEM)
298                 IL_PUSH(g_items, this);
299         this.flags = FL_ITEM;
300         setsize(this, '-32 -32 -32', '32 32 32');
301         setorigin(this, this.origin + '0 0 20');
302         droptofloor(this);
303
304         waypoint_spawnforitem(this);
305         WaypointSprite_SpawnFixed(WP_DomNeut, this.origin + '0 0 32', this, sprite, RADARICON_DOMPOINT);
306 }
307
308 int total_control_points;
309 void Domination_count_controlpoints()
310 {
311         total_control_points = 0;
312         for (int i = 1; i <= NUM_TEAMS; ++i)
313         {
314                 Team_SetNumberOfOwnedItems(Team_GetTeamFromIndex(i), 0);
315         }
316         IL_EACH(g_dompoints, true,
317         {
318                 ++total_control_points;
319                 if (!Entity_HasValidTeam(it.goalentity))
320                 {
321                         continue;
322                 }
323                 entity team_ = Entity_GetTeam(it.goalentity);
324                 int num_control_points = Team_GetNumberOfOwnedItems(team_);
325                 ++num_control_points;
326                 Team_SetNumberOfOwnedItems(team_, num_control_points);
327         });
328 }
329
330 bool Domination_CheckWinner()
331 {
332         if(round_handler_GetEndTime() > 0 && round_handler_GetEndTime() - time <= 0)
333         {
334                 Send_Notification(NOTIF_ALL, NULL, MSG_CENTER, CENTER_ROUND_OVER);
335                 Send_Notification(NOTIF_ALL, NULL, MSG_INFO, INFO_ROUND_OVER);
336
337                 game_stopped = true;
338                 round_handler_Init(5, autocvar_g_domination_warmup, autocvar_g_domination_round_timelimit);
339                 return true;
340         }
341
342         Domination_count_controlpoints();
343         int winner_team = Team_GetWinnerTeam_WithOwnedItems(total_control_points);
344         if (winner_team == -1)
345                 return 0;
346
347         if(winner_team > 0)
348         {
349                 Send_Notification(NOTIF_ALL, NULL, MSG_CENTER, APP_TEAM_NUM(winner_team, CENTER_ROUND_TEAM_WIN));
350                 Send_Notification(NOTIF_ALL, NULL, MSG_INFO, APP_TEAM_NUM(winner_team, INFO_ROUND_TEAM_WIN));
351                 TeamScore_AddToTeam(winner_team, ST_DOM_CAPS, +1);
352         }
353
354         game_stopped = true;
355         round_handler_Init(5, autocvar_g_domination_warmup, autocvar_g_domination_round_timelimit);
356
357         return true;
358 }
359
360 bool Domination_CheckPlayers()
361 {
362         return true;
363 }
364
365 void Domination_RoundStart()
366 {
367         FOREACH_CLIENT(IS_PLAYER(it), { it.player_blocked = false; });
368 }
369
370 //go to best items, or control points you don't own
371 void havocbot_goalrating_controlpoints(entity this, float ratingscale, vector org, float sradius)
372 {
373         IL_EACH(g_dompoints, vdist((((it.absmin + it.absmax) * 0.5) - org), <, sradius),
374         {
375                 if(it.cnt > -1) // this is just being fought
376                         navigation_routerating(this, it, ratingscale, 5000);
377                 else if(it.goalentity.cnt == 0) // unclaimed
378                         navigation_routerating(this, it, ratingscale, 5000);
379                 else if(it.goalentity.team != this.team) // other team's point
380                         navigation_routerating(this, it, ratingscale, 5000);
381         });
382 }
383
384 void havocbot_role_dom(entity this)
385 {
386         if(IS_DEAD(this))
387                 return;
388
389         if (navigation_goalrating_timeout(this))
390         {
391                 navigation_goalrating_start(this);
392                 havocbot_goalrating_controlpoints(this, 10000, this.origin, 15000);
393                 havocbot_goalrating_items(this, 20000, this.origin, 8000);
394                 //havocbot_goalrating_enemyplayers(this, 1500, this.origin, 2000);
395                 havocbot_goalrating_waypoints(this, 1, this.origin, 3000);
396                 navigation_goalrating_end(this);
397
398                 navigation_goalrating_timeout_set(this);
399         }
400 }
401
402 MUTATOR_HOOKFUNCTION(dom, TeamBalance_CheckAllowedTeams)
403 {
404         // fallback?
405         M_ARGV(0, float) = domination_teams;
406         string ret_string = "dom_team";
407
408         entity head = find(NULL, classname, ret_string);
409         while(head)
410         {
411                 if(head.netname != "")
412                 {
413                         if (Team_IsValidTeam(head.team))
414                         {
415                                 M_ARGV(0, float) |= Team_TeamToBit(head.team);
416                         }
417                 }
418
419                 head = find(head, classname, ret_string);
420         }
421
422         M_ARGV(1, string) = string_null;
423
424         return true;
425 }
426
427 MUTATOR_HOOKFUNCTION(dom, reset_map_players)
428 {
429         total_pps = 0, pps_red = 0, pps_blue = 0, pps_yellow = 0, pps_pink = 0;
430         FOREACH_CLIENT(true, {
431                 if (IS_PLAYER(it))
432                 {
433                         PutClientInServer(it);
434                         if(domination_roundbased)
435                                 it.player_blocked = 1;
436                 }
437                 if(IS_REAL_CLIENT(it))
438                         set_dom_state(it);
439         });
440         return true;
441 }
442
443 MUTATOR_HOOKFUNCTION(dom, PlayerSpawn)
444 {
445         entity player = M_ARGV(0, entity);
446
447         if(domination_roundbased)
448                 player.player_blocked = !round_handler_IsRoundStarted();
449 }
450
451 MUTATOR_HOOKFUNCTION(dom, ClientConnect)
452 {
453         entity player = M_ARGV(0, entity);
454
455         set_dom_state(player);
456 }
457
458 MUTATOR_HOOKFUNCTION(dom, HavocBot_ChooseRole)
459 {
460         entity bot = M_ARGV(0, entity);
461
462         bot.havocbot_role = havocbot_role_dom;
463         return true;
464 }
465
466 /*QUAKED spawnfunc_dom_controlpoint (0 .5 .8) (-16 -16 -24) (16 16 32)
467 Control point for Domination gameplay.
468 */
469 spawnfunc(dom_controlpoint)
470 {
471         if(!g_domination)
472         {
473                 delete(this);
474                 return;
475         }
476         setthink(this, dom_controlpoint_setup);
477         this.nextthink = time + 0.1;
478         this.reset = dom_controlpoint_setup;
479
480         if(!this.scale)
481                 this.scale = 0.6;
482
483         this.effects = this.effects | EF_LOWPRECISION;
484         if (autocvar_g_domination_point_fullbright)
485                 this.effects |= EF_FULLBRIGHT;
486
487         IL_PUSH(g_dompoints, this);
488 }
489
490 /*QUAKED spawnfunc_dom_team (0 .5 .8) (-32 -32 -24) (32 32 32)
491 Team declaration for Domination gameplay, this allows you to decide what team
492 names and control point models are used in your map.
493
494 Note: If you use spawnfunc_dom_team entities you must define at least 3 and only two
495 can have netname set!  The nameless team owns all control points at start.
496
497 Keys:
498 "netname"
499  Name of the team (for example Red Team, Blue Team, Green Team, Yellow Team, Life, Death, etc)
500 "cnt"
501  Scoreboard color of the team (for example 4 is red and 13 is blue)
502 "model"
503  Model to use for control points owned by this team (for example
504  "progs/b_g_key.mdl" is a gold keycard, and "progs/b_s_key.mdl" is a silver
505  keycard)
506 "skin"
507  Skin of the model to use (for team skins on a single model)
508 "noise"
509  Sound to play when this team captures a point.
510  (this is a localized sound, like a small alarm or other effect)
511 "noise1"
512  Narrator speech to play when this team captures a point.
513  (this is a global sound, like "Red team has captured a control point")
514 */
515
516 spawnfunc(dom_team)
517 {
518         if(!g_domination || autocvar_g_domination_teams_override >= 2)
519         {
520                 delete(this);
521                 return;
522         }
523         precache_model(this.model);
524         if (this.noise != "")
525                 precache_sound(this.noise);
526         if (this.noise1 != "")
527                 precache_sound(this.noise1);
528         _setmodel(this, this.model); // precision not needed
529         this.mdl = this.model;
530         this.dmg = this.modelindex;
531         this.model = "";
532         this.modelindex = 0;
533         // this would have to be changed if used in quakeworld
534         if(this.cnt)
535                 this.team = this.cnt + 1; // WHY are these different anyway?
536 }
537
538 // scoreboard setup
539 void ScoreRules_dom(int teams)
540 {
541         if(domination_roundbased)
542         {
543             GameRules_scoring(teams, SFL_SORT_PRIO_PRIMARY, 0, {
544             field_team(ST_DOM_CAPS, "caps", SFL_SORT_PRIO_PRIMARY);
545             field(SP_DOM_TAKES, "takes", 0);
546             });
547         }
548         else
549         {
550                 float sp_domticks, sp_score;
551                 sp_score = sp_domticks = 0;
552                 if(autocvar_g_domination_disable_frags)
553                         sp_domticks = SFL_SORT_PRIO_PRIMARY;
554                 else
555                         sp_score = SFL_SORT_PRIO_PRIMARY;
556                 GameRules_scoring(teams, sp_score, sp_score, {
557             field_team(ST_DOM_TICKS, "ticks", sp_domticks);
558             field(SP_DOM_TICKS, "ticks", sp_domticks);
559             field(SP_DOM_TAKES, "takes", 0);
560                 });
561         }
562 }
563
564 // code from here on is just to support maps that don't have control point and team entities
565 void dom_spawnteam(string teamname, float teamcolor, string pointmodel, float pointskin, Sound capsound, string capnarration, string capmessage)
566 {
567         TC(Sound, capsound);
568         entity e = new_pure(dom_team);
569         e.netname = strzone(teamname);
570         e.cnt = teamcolor;
571         e.model = pointmodel;
572         e.skin = pointskin;
573         e.noise = strzone(Sound_fixpath(capsound));
574         e.noise1 = strzone(capnarration);
575         e.message = strzone(capmessage);
576
577         // this code is identical to spawnfunc_dom_team
578         _setmodel(e, e.model); // precision not needed
579         e.mdl = e.model;
580         e.dmg = e.modelindex;
581         e.model = "";
582         e.modelindex = 0;
583         // this would have to be changed if used in quakeworld
584         e.team = e.cnt + 1;
585
586         //eprint(e);
587 }
588
589 void dom_spawnpoint(vector org)
590 {
591         entity e = spawn();
592         setthink(e, spawnfunc_dom_controlpoint);
593         e.nextthink = time;
594         setorigin(e, org);
595         spawnfunc_dom_controlpoint(e);
596 }
597
598 // spawn some default teams if the map is not set up for domination
599 void dom_spawnteams(int teams)
600 {
601         TC(int, teams);
602         dom_spawnteam(Team_ColoredFullName(NUM_TEAM_1), NUM_TEAM_1-1, "models/domination/dom_red.md3", 0, SND_DOM_CLAIM, "", "Red team has captured a control point");
603         dom_spawnteam(Team_ColoredFullName(NUM_TEAM_2), NUM_TEAM_2-1, "models/domination/dom_blue.md3", 0, SND_DOM_CLAIM, "", "Blue team has captured a control point");
604         if(teams & BIT(2))
605                 dom_spawnteam(Team_ColoredFullName(NUM_TEAM_3), NUM_TEAM_3-1, "models/domination/dom_yellow.md3", 0, SND_DOM_CLAIM, "", "Yellow team has captured a control point");
606         if(teams & BIT(3))
607                 dom_spawnteam(Team_ColoredFullName(NUM_TEAM_4), NUM_TEAM_4-1, "models/domination/dom_pink.md3", 0, SND_DOM_CLAIM, "", "Pink team has captured a control point");
608         dom_spawnteam("", 0, "models/domination/dom_unclaimed.md3", 0, SND_Null, "", "");
609 }
610
611 void dom_DelayedInit(entity this) // Do this check with a delay so we can wait for teams to be set up.
612 {
613         // if no teams are found, spawn defaults
614         if(find(NULL, classname, "dom_team") == NULL || autocvar_g_domination_teams_override >= 2)
615         {
616                 LOG_TRACE("No \"dom_team\" entities found on this map, creating them anyway.");
617                 domination_teams = autocvar_g_domination_teams_override;
618                 if (domination_teams < 2)
619                         domination_teams = autocvar_g_domination_default_teams;
620                 domination_teams = BITS(bound(2, domination_teams, 4));
621                 dom_spawnteams(domination_teams);
622         }
623         else
624         {
625                 entity balance = TeamBalance_CheckAllowedTeams(NULL);
626                 domination_teams = TeamBalance_GetAllowedTeams(balance);
627                 TeamBalance_Destroy(balance);
628         }
629
630         domination_roundbased = autocvar_g_domination_roundbased;
631
632         ScoreRules_dom(domination_teams);
633
634         if(domination_roundbased)
635         {
636                 round_handler_Spawn(Domination_CheckPlayers, Domination_CheckWinner, Domination_RoundStart);
637                 round_handler_Init(5, autocvar_g_domination_warmup, autocvar_g_domination_round_timelimit);
638         }
639 }
640
641 void dom_Initialize()
642 {
643         g_domination = true;
644         g_dompoints = IL_NEW();
645
646         InitializeEntity(NULL, dom_DelayedInit, INITPRIO_GAMETYPE);
647 }