Merge branch 'master' into Lyberta/TeamplayOverhaul
[xonotic/xonotic-data.pk3dir.git] / qcsrc / common / gamemodes / gamemode / assault / assault.qc
1 #include "assault.qh"
2
3 // TODO: split into sv_assault
4 #ifdef SVQC
5 .entity sprite;
6 #define AS_ROUND_DELAY 5
7
8 IntrusiveList g_assault_destructibles;
9 IntrusiveList g_assault_objectivedecreasers;
10 IntrusiveList g_assault_objectives;
11 STATIC_INIT(g_assault)
12 {
13         g_assault_destructibles = IL_NEW();
14         g_assault_objectivedecreasers = IL_NEW();
15         g_assault_objectives = IL_NEW();
16 }
17
18 // random functions
19 void assault_objective_use(entity this, entity actor, entity trigger)
20 {
21         // activate objective
22         SetResourceAmountExplicit(this, RESOURCE_HEALTH, 100);
23         //print("^2Activated objective ", this.targetname, "=", etos(this), "\n");
24         //print("Activator is ", actor.classname, "\n");
25
26         IL_EACH(g_assault_objectivedecreasers, it.target == this.targetname,
27         {
28                 target_objective_decrease_activate(it);
29         });
30 }
31
32 vector target_objective_spawn_evalfunc(entity this, entity player, entity spot, vector current)
33 {
34         float hlth = GetResourceAmount(this, RESOURCE_HEALTH);
35         if (hlth < 0 || hlth >= ASSAULT_VALUE_INACTIVE)
36                 return '-1 0 0';
37         return current;
38 }
39
40 // reset this objective. Used when spawning an objective
41 // and when a new round starts
42 void assault_objective_reset(entity this)
43 {
44         SetResourceAmountExplicit(this, RESOURCE_HEALTH, ASSAULT_VALUE_INACTIVE);
45 }
46
47 // decrease the health of targeted objectives
48 void assault_objective_decrease_use(entity this, entity actor, entity trigger)
49 {
50         if(actor.team != assault_attacker_team)
51         {
52                 // wrong team triggered decrease
53                 return;
54         }
55
56         if(trigger.assault_sprite)
57         {
58                 WaypointSprite_Disown(trigger.assault_sprite, waypointsprite_deadlifetime);
59                 if(trigger.classname == "func_assault_destructible")
60                         trigger.sprite = NULL; // TODO: just unsetting it?!
61         }
62         else
63                 return; // already activated! cannot activate again!
64
65         float hlth = GetResourceAmount(this.enemy, RESOURCE_HEALTH);
66         if (hlth < ASSAULT_VALUE_INACTIVE)
67         {
68                 if (hlth - this.dmg > 0.5)
69                 {
70                         GameRules_scoring_add_team(actor, SCORE, this.dmg);
71                         TakeResource(this.enemy, RESOURCE_HEALTH, this.dmg);
72                 }
73                 else
74                 {
75                         GameRules_scoring_add_team(actor, SCORE, hlth);
76                         GameRules_scoring_add_team(actor, ASSAULT_OBJECTIVES, 1);
77                         SetResourceAmountExplicit(this.enemy, RESOURCE_HEALTH, -1);
78
79                         if(this.enemy.message)
80                                 FOREACH_CLIENT(IS_PLAYER(it), { centerprint(it, this.enemy.message); });
81
82                         SUB_UseTargets(this.enemy, this, trigger);
83                 }
84         }
85 }
86
87 void assault_setenemytoobjective(entity this)
88 {
89         IL_EACH(g_assault_objectives, it.targetname == this.target,
90         {
91                 if(this.enemy == NULL)
92                         this.enemy = it;
93                 else
94                         objerror(this, "more than one objective as target - fix the map!");
95                 break;
96         });
97
98         if(this.enemy == NULL)
99                 objerror(this, "no objective as target - fix the map!");
100 }
101
102 bool assault_decreaser_sprite_visible(entity this, entity player, entity view)
103 {
104         if(GetResourceAmount(this.assault_decreaser.enemy, RESOURCE_HEALTH) >= ASSAULT_VALUE_INACTIVE)
105                 return false;
106
107         return true;
108 }
109
110 void target_objective_decrease_activate(entity this)
111 {
112         entity spr;
113         this.owner = NULL;
114         FOREACH_ENTITY_STRING(target, this.targetname,
115         {
116                 if(it.assault_sprite != NULL)
117                 {
118                         WaypointSprite_Disown(it.assault_sprite, waypointsprite_deadlifetime);
119                         if(it.classname == "func_assault_destructible")
120                                 it.sprite = NULL; // TODO: just unsetting it?!
121                 }
122
123                 spr = WaypointSprite_SpawnFixed(WP_AssaultDefend, 0.5 * (it.absmin + it.absmax), it, assault_sprite, RADARICON_OBJECTIVE);
124                 spr.assault_decreaser = this;
125                 spr.waypointsprite_visible_for_player = assault_decreaser_sprite_visible;
126                 spr.classname = "sprite_waypoint";
127                 WaypointSprite_UpdateRule(spr, assault_attacker_team, SPRITERULE_TEAMPLAY);
128                 if(it.classname == "func_assault_destructible")
129                 {
130                         WaypointSprite_UpdateSprites(spr, WP_AssaultDefend, WP_AssaultDestroy, WP_AssaultDestroy);
131                         WaypointSprite_UpdateMaxHealth(spr, it.max_health);
132                         WaypointSprite_UpdateHealth(spr, GetResourceAmount(it, RESOURCE_HEALTH));
133                         it.sprite = spr;
134                 }
135                 else
136                         WaypointSprite_UpdateSprites(spr, WP_AssaultDefend, WP_AssaultPush, WP_AssaultPush);
137         });
138 }
139
140 void target_objective_decrease_findtarget(entity this)
141 {
142         assault_setenemytoobjective(this);
143 }
144
145 void target_assault_roundend_reset(entity this)
146 {
147         //print("round end reset\n");
148         ++this.cnt; // up round counter
149         this.winning = false; // up round
150 }
151
152 void target_assault_roundend_use(entity this, entity actor, entity trigger)
153 {
154         this.winning = 1; // round has been won by attackers
155 }
156
157 void assault_roundstart_use(entity this, entity actor, entity trigger)
158 {
159         SUB_UseTargets(this, this, trigger);
160
161         //(Re)spawn all turrets
162         IL_EACH(g_turrets, true,
163         {
164                 // Swap turret teams
165                 if(it.team == NUM_TEAM_1)
166                         it.team = NUM_TEAM_2;
167                 else
168                         it.team = NUM_TEAM_1;
169
170                 // Doubles as teamchange
171                 turret_respawn(it);
172         });
173 }
174 void assault_roundstart_use_this(entity this)
175 {
176         assault_roundstart_use(this, NULL, NULL);
177 }
178
179 void assault_wall_think(entity this)
180 {
181         if(GetResourceAmount(this.enemy, RESOURCE_HEALTH) < 0)
182         {
183                 this.model = "";
184                 this.solid = SOLID_NOT;
185         }
186         else
187         {
188                 this.model = this.mdl;
189                 this.solid = SOLID_BSP;
190         }
191
192         this.nextthink = time + 0.2;
193 }
194
195 // trigger new round
196 // reset objectives, toggle spawnpoints, reset triggers, ...
197 void assault_new_round(entity this)
198 {
199         //bprint("ASSAULT: new round\n");
200
201         // up round counter
202         this.winning = this.winning + 1;
203
204         // swap attacker/defender roles
205         if(assault_attacker_team == NUM_TEAM_1)
206                 assault_attacker_team = NUM_TEAM_2;
207         else
208                 assault_attacker_team = NUM_TEAM_1;
209
210         IL_EACH(g_saved_team, !IS_CLIENT(it),
211         {
212                 if(it.team_saved == NUM_TEAM_1)
213                         it.team_saved = NUM_TEAM_2;
214                 else if(it.team_saved == NUM_TEAM_2)
215                         it.team_saved = NUM_TEAM_1;
216         });
217
218         // reset the level with a countdown
219         cvar_set("timelimit", ftos(ceil(time - AS_ROUND_DELAY - game_starttime) / 60));
220         ReadyRestart_force(); // sets game_starttime
221 }
222
223 entity as_round;
224 .entity ent_winning;
225 void as_round_think()
226 {
227         game_stopped = false;
228         assault_new_round(as_round.ent_winning);
229         delete(as_round);
230         as_round = NULL;
231 }
232
233 // Assault winning condition: If the attackers triggered a round end (by fulfilling all objectives)
234 // they win. Otherwise the defending team wins once the timelimit passes.
235 int WinningCondition_Assault()
236 {
237         if(as_round)
238                 return WINNING_NO;
239
240         WinningConditionHelper(NULL); // set worldstatus
241
242         int status = WINNING_NO;
243         // as the timelimit has not yet passed just assume the defending team will win
244         if(assault_attacker_team == NUM_TEAM_1)
245         {
246                 SetWinners(team, NUM_TEAM_2);
247         }
248         else
249         {
250                 SetWinners(team, NUM_TEAM_1);
251         }
252
253         entity ent;
254         ent = find(NULL, classname, "target_assault_roundend");
255         if(ent)
256         {
257                 if(ent.winning) // round end has been triggered by attacking team
258                 {
259                         bprint("Assault: round completed.\n");
260                         SetWinners(team, assault_attacker_team);
261
262                         TeamScore_AddToTeam(assault_attacker_team, ST_ASSAULT_OBJECTIVES, 666 - TeamScore_AddToTeam(assault_attacker_team, ST_ASSAULT_OBJECTIVES, 0));
263
264                         if(ent.cnt == 1 || autocvar_g_campaign) // this was the second round
265                         {
266                                 status = WINNING_YES;
267                         }
268                         else
269                         {
270                                 Send_Notification(NOTIF_ALL, NULL, MSG_CENTER, CENTER_ASSAULT_OBJ_DESTROYED, ceil(time - game_starttime));
271                                 as_round = new(as_round);
272                                 as_round.think = as_round_think;
273                                 as_round.ent_winning = ent;
274                                 as_round.nextthink = time + AS_ROUND_DELAY;
275                                 game_stopped = true;
276
277                                 // make sure timelimit isn't hit while the game is blocked
278                                 if(autocvar_timelimit > 0)
279                                 if(time + AS_ROUND_DELAY >= game_starttime + autocvar_timelimit * 60)
280                                         cvar_set("timelimit", ftos(autocvar_timelimit + AS_ROUND_DELAY / 60));
281                         }
282                 }
283         }
284
285         return status;
286 }
287
288 // spawnfuncs
289 spawnfunc(info_player_attacker)
290 {
291         if (!g_assault) { delete(this); return; }
292
293         this.team = NUM_TEAM_1; // red, gets swapped every round
294         spawnfunc_info_player_deathmatch(this);
295 }
296
297 spawnfunc(info_player_defender)
298 {
299         if (!g_assault) { delete(this); return; }
300
301         this.team = NUM_TEAM_2; // blue, gets swapped every round
302         spawnfunc_info_player_deathmatch(this);
303 }
304
305 spawnfunc(target_objective)
306 {
307         if (!g_assault) { delete(this); return; }
308
309         this.classname = "target_objective";
310         IL_PUSH(g_assault_objectives, this);
311         this.use = assault_objective_use;
312         this.reset = assault_objective_reset;
313         this.reset(this);
314         this.spawn_evalfunc = target_objective_spawn_evalfunc;
315 }
316
317 spawnfunc(target_objective_decrease)
318 {
319         if (!g_assault) { delete(this); return; }
320
321         this.classname = "target_objective_decrease";
322         IL_PUSH(g_assault_objectivedecreasers, this);
323
324         if(!this.dmg)
325                 this.dmg = 101;
326
327         this.use = assault_objective_decrease_use;
328         SetResourceAmountExplicit(this, RESOURCE_HEALTH, ASSAULT_VALUE_INACTIVE);
329         this.max_health = ASSAULT_VALUE_INACTIVE;
330         this.enemy = NULL;
331
332         InitializeEntity(this, target_objective_decrease_findtarget, INITPRIO_FINDTARGET);
333 }
334
335 // destructible walls that can be used to trigger target_objective_decrease
336 bool destructible_heal(entity targ, entity inflictor, float amount, float limit)
337 {
338         float true_limit = ((limit != RESOURCE_LIMIT_NONE) ? limit : targ.max_health);
339         float hlth = GetResourceAmount(targ, RESOURCE_HEALTH);
340         if (hlth <= 0 || hlth >= true_limit)
341                 return false;
342
343         GiveResourceWithLimit(targ, RESOURCE_HEALTH, amount, true_limit);
344         if(targ.sprite)
345         {
346                 WaypointSprite_UpdateHealth(targ.sprite, GetResourceAmount(targ, RESOURCE_HEALTH));
347         }
348         func_breakable_colormod(targ);
349         return true;
350 }
351
352 spawnfunc(func_breakable);
353 spawnfunc(func_assault_destructible)
354 {
355         if (!g_assault) { delete(this); return; }
356
357         this.spawnflags = 3;
358         this.classname = "func_assault_destructible";
359         this.event_heal = destructible_heal;
360         IL_PUSH(g_assault_destructibles, this);
361
362         if(assault_attacker_team == NUM_TEAM_1)
363                 this.team = NUM_TEAM_2;
364         else
365                 this.team = NUM_TEAM_1;
366
367         spawnfunc_func_breakable(this);
368 }
369
370 spawnfunc(func_assault_wall)
371 {
372         if (!g_assault) { delete(this); return; }
373
374         this.classname = "func_assault_wall";
375         this.mdl = this.model;
376         _setmodel(this, this.mdl);
377         this.solid = SOLID_BSP;
378         setthink(this, assault_wall_think);
379         this.nextthink = time;
380         InitializeEntity(this, assault_setenemytoobjective, INITPRIO_FINDTARGET);
381 }
382
383 spawnfunc(target_assault_roundend)
384 {
385         if (!g_assault) { delete(this); return; }
386
387         this.winning = 0; // round not yet won by attackers
388         this.classname = "target_assault_roundend";
389         this.use = target_assault_roundend_use;
390         this.cnt = 0; // first round
391         this.reset = target_assault_roundend_reset;
392 }
393
394 spawnfunc(target_assault_roundstart)
395 {
396         if (!g_assault) { delete(this); return; }
397
398         assault_attacker_team = NUM_TEAM_1;
399         this.classname = "target_assault_roundstart";
400         this.use = assault_roundstart_use;
401         this.reset2 = assault_roundstart_use_this;
402         InitializeEntity(this, assault_roundstart_use_this, INITPRIO_FINDTARGET);
403 }
404
405 // legacy bot code
406 void havocbot_goalrating_ast_targets(entity this, float ratingscale)
407 {
408         IL_EACH(g_assault_destructibles, it.bot_attack,
409         {
410                 if (it.target == "")
411                         continue;
412
413                 bool found = false;
414                 entity destr = it;
415                 IL_EACH(g_assault_objectivedecreasers, it.targetname == destr.target,
416                 {
417                         float hlth = GetResourceAmount(it.enemy, RESOURCE_HEALTH);
418                         if (hlth > 0 && hlth < ASSAULT_VALUE_INACTIVE)
419                         {
420                                 found = true;
421                                 break;
422                         }
423                 });
424
425                 if(!found)
426                         continue;
427
428                 vector p = 0.5 * (it.absmin + it.absmax);
429
430                 // Find and rate waypoints around it
431                 found = false;
432                 entity best = NULL;
433                 float bestvalue = 99999999999;
434                 entity des = it;
435                 for(float radius = 0; radius < 1500 && !found; radius += 500)
436                 {
437                         FOREACH_ENTITY_RADIUS(p, radius, it.classname == "waypoint" && !(it.wpflags & WAYPOINTFLAG_GENERATED),
438                         {
439                                 if(checkpvs(it.origin, des))
440                                 {
441                                         found = true;
442                                         if(it.cnt < bestvalue)
443                                         {
444                                                 best = it;
445                                                 bestvalue = it.cnt;
446                                         }
447                                 }
448                         });
449                 }
450
451                 if(best)
452                 {
453                 ///     dprint("waypoints around target were found\n");
454                 //      te_lightning2(NULL, '0 0 0', best.origin);
455                 //      te_knightspike(best.origin);
456
457                         navigation_routerating(this, best, ratingscale, 4000);
458                         best.cnt += 1;
459
460                         this.havocbot_attack_time = 0;
461
462                         if(checkpvs(this.origin + this.view_ofs, it))
463                         if(checkpvs(this.origin + this.view_ofs, best))
464                         {
465                         //      dprint("increasing attack time for this target\n");
466                                 this.havocbot_attack_time = time + 2;
467                         }
468                 }
469         });
470 }
471
472 void havocbot_role_ast_offense(entity this)
473 {
474         if(IS_DEAD(this))
475         {
476                 this.havocbot_attack_time = 0;
477                 havocbot_ast_reset_role(this);
478                 return;
479         }
480
481         // Set the role timeout if necessary
482         if (!this.havocbot_role_timeout)
483                 this.havocbot_role_timeout = time + 120;
484
485         if (time > this.havocbot_role_timeout)
486         {
487                 havocbot_ast_reset_role(this);
488                 return;
489         }
490
491         if(this.havocbot_attack_time>time)
492                 return;
493
494         if (navigation_goalrating_timeout(this))
495         {
496                 navigation_goalrating_start(this);
497                 havocbot_goalrating_enemyplayers(this, 20000, this.origin, 650);
498                 havocbot_goalrating_ast_targets(this, 20000);
499                 havocbot_goalrating_items(this, 15000, this.origin, 10000);
500                 navigation_goalrating_end(this);
501
502                 navigation_goalrating_timeout_set(this);
503         }
504 }
505
506 void havocbot_role_ast_defense(entity this)
507 {
508         if(IS_DEAD(this))
509         {
510                 this.havocbot_attack_time = 0;
511                 havocbot_ast_reset_role(this);
512                 return;
513         }
514
515         // Set the role timeout if necessary
516         if (!this.havocbot_role_timeout)
517                 this.havocbot_role_timeout = time + 120;
518
519         if (time > this.havocbot_role_timeout)
520         {
521                 havocbot_ast_reset_role(this);
522                 return;
523         }
524
525         if(this.havocbot_attack_time>time)
526                 return;
527
528         if (navigation_goalrating_timeout(this))
529         {
530                 navigation_goalrating_start(this);
531                 havocbot_goalrating_enemyplayers(this, 20000, this.origin, 3000);
532                 havocbot_goalrating_ast_targets(this, 20000);
533                 havocbot_goalrating_items(this, 15000, this.origin, 10000);
534                 navigation_goalrating_end(this);
535
536                 navigation_goalrating_timeout_set(this);
537         }
538 }
539
540 void havocbot_role_ast_setrole(entity this, float role)
541 {
542         switch(role)
543         {
544                 case HAVOCBOT_AST_ROLE_DEFENSE:
545                         this.havocbot_role = havocbot_role_ast_defense;
546                         this.havocbot_role_flags = HAVOCBOT_AST_ROLE_DEFENSE;
547                         this.havocbot_role_timeout = 0;
548                         break;
549                 case HAVOCBOT_AST_ROLE_OFFENSE:
550                         this.havocbot_role = havocbot_role_ast_offense;
551                         this.havocbot_role_flags = HAVOCBOT_AST_ROLE_OFFENSE;
552                         this.havocbot_role_timeout = 0;
553                         break;
554         }
555 }
556
557 void havocbot_ast_reset_role(entity this)
558 {
559         if(IS_DEAD(this))
560                 return;
561
562         if(this.team == assault_attacker_team)
563                 havocbot_role_ast_setrole(this, HAVOCBOT_AST_ROLE_OFFENSE);
564         else
565                 havocbot_role_ast_setrole(this, HAVOCBOT_AST_ROLE_DEFENSE);
566 }
567
568 // mutator hooks
569 MUTATOR_HOOKFUNCTION(as, PlayerSpawn)
570 {
571         entity player = M_ARGV(0, entity);
572
573         if(player.team == assault_attacker_team)
574                 Send_Notification(NOTIF_ONE, player, MSG_CENTER, CENTER_ASSAULT_ATTACKING);
575         else
576                 Send_Notification(NOTIF_ONE, player, MSG_CENTER, CENTER_ASSAULT_DEFENDING);
577 }
578
579 MUTATOR_HOOKFUNCTION(as, TurretSpawn)
580 {
581         entity turret = M_ARGV(0, entity);
582
583         if(!turret.team || turret.team == FLOAT_MAX)
584                 turret.team = 5; // this gets reversed when match starts?
585 }
586
587 MUTATOR_HOOKFUNCTION(as, VehicleInit)
588 {
589         entity veh = M_ARGV(0, entity);
590
591         veh.nextthink = time + 0.5;
592 }
593
594 MUTATOR_HOOKFUNCTION(as, HavocBot_ChooseRole)
595 {
596         entity bot = M_ARGV(0, entity);
597
598         havocbot_ast_reset_role(bot);
599         return true;
600 }
601
602 MUTATOR_HOOKFUNCTION(as, PlayHitsound)
603 {
604         entity frag_victim = M_ARGV(0, entity);
605
606         return (frag_victim.classname == "func_assault_destructible");
607 }
608
609 MUTATOR_HOOKFUNCTION(as, TeamBalance_CheckAllowedTeams)
610 {
611         // assault always has 2 teams
612         M_ARGV(0, float) = BIT(0) | BIT(1);
613         return true;
614 }
615
616 MUTATOR_HOOKFUNCTION(as, CheckRules_World)
617 {
618         M_ARGV(0, float) = WinningCondition_Assault();
619         return true;
620 }
621
622 MUTATOR_HOOKFUNCTION(as, ReadLevelCvars)
623 {
624         // incompatible
625         warmup_stage = 0;
626         sv_ready_restart_after_countdown = 0;
627 }
628
629 MUTATOR_HOOKFUNCTION(as, OnEntityPreSpawn)
630 {
631     entity ent = M_ARGV(0, entity);
632
633         switch(ent.classname)
634         {
635                 case "info_player_team1":
636                 case "info_player_team2":
637                 case "info_player_team3":
638                 case "info_player_team4":
639                         return true;
640         }
641 }
642
643 MUTATOR_HOOKFUNCTION(as, ReadyRestart_Deny)
644 {
645         // readyrestart not supported (yet)
646         return true;
647 }
648 #endif