1 #include "sv_clanarena.qh"
3 float autocvar_g_ca_damage2score_multiplier;
4 bool autocvar_g_ca_spectate_enemies;
6 float autocvar_g_ca_start_health = 200;
7 float autocvar_g_ca_start_armor = 200;
8 float autocvar_g_ca_start_ammo_shells = 60;
9 float autocvar_g_ca_start_ammo_nails = 320;
10 float autocvar_g_ca_start_ammo_rockets = 160;
11 float autocvar_g_ca_start_ammo_cells = 180;
12 float autocvar_g_ca_start_ammo_plasma = 180;
13 float autocvar_g_ca_start_ammo_fuel = 0;
15 void CA_count_alive_players()
18 for (int i = 1; i <= NUM_TEAMS; ++i)
20 Team_SetNumberOfAlivePlayers(Team_GetTeamFromIndex(i), 0);
22 FOREACH_CLIENT(IS_PLAYER(it) && Entity_HasValidTeam(it),
29 entity team_ = Entity_GetTeam(it);
30 int num_alive = Team_GetNumberOfAlivePlayers(team_);
32 Team_SetNumberOfAlivePlayers(team_, num_alive);
34 FOREACH_CLIENT(IS_REAL_CLIENT(it),
36 STAT(REDALIVE, it) = Team_GetNumberOfAlivePlayers(Team_GetTeamFromIndex(
38 STAT(BLUEALIVE, it) = Team_GetNumberOfAlivePlayers(
39 Team_GetTeamFromIndex(2));
40 STAT(YELLOWALIVE, it) = Team_GetNumberOfAlivePlayers(
41 Team_GetTeamFromIndex(3));
42 STAT(PINKALIVE, it) = Team_GetNumberOfAlivePlayers(
43 Team_GetTeamFromIndex(4));
47 int CA_GetWinnerTeam()
50 if (Team_GetNumberOfAlivePlayers(Team_GetTeamFromIndex(1)) >= 1)
52 winner_team = NUM_TEAM_1;
54 for (int i = 2; i <= NUM_TEAMS; ++i)
56 if (Team_GetNumberOfAlivePlayers(Team_GetTeamFromIndex(i)) >= 1)
62 winner_team = Team_IndexToTeam(i);
69 return -1; // no player left
72 void nades_Clear(entity player);
74 float CA_CheckWinner()
76 if(round_handler_GetEndTime() > 0 && round_handler_GetEndTime() - time <= 0)
78 Send_Notification(NOTIF_ALL, NULL, MSG_CENTER, CENTER_ROUND_OVER);
79 Send_Notification(NOTIF_ALL, NULL, MSG_INFO, INFO_ROUND_OVER);
80 FOREACH_CLIENT(IS_PLAYER(it), { nades_Clear(it); });
82 allowed_to_spawn = false;
84 round_handler_Init(5, autocvar_g_ca_warmup, autocvar_g_ca_round_timelimit);
88 CA_count_alive_players();
89 if (Team_GetNumberOfAliveTeams() > 1)
94 int winner_team = CA_GetWinnerTeam();
97 Send_Notification(NOTIF_ALL, NULL, MSG_CENTER, APP_TEAM_NUM(winner_team, CENTER_ROUND_TEAM_WIN));
98 Send_Notification(NOTIF_ALL, NULL, MSG_INFO, APP_TEAM_NUM(winner_team, INFO_ROUND_TEAM_WIN));
99 TeamScore_AddToTeam(winner_team, ST_CA_ROUNDS, +1);
101 else if(winner_team == -1)
103 Send_Notification(NOTIF_ALL, NULL, MSG_CENTER, CENTER_ROUND_TIED);
104 Send_Notification(NOTIF_ALL, NULL, MSG_INFO, INFO_ROUND_TIED);
107 allowed_to_spawn = false;
109 round_handler_Init(5, autocvar_g_ca_warmup, autocvar_g_ca_round_timelimit);
111 FOREACH_CLIENT(IS_PLAYER(it), { nades_Clear(it); });
118 allowed_to_spawn = boolean(warmup_stage);
123 static int prev_missing_teams_mask;
124 allowed_to_spawn = true;
125 CA_count_alive_players();
126 if (Team_GetNumberOfAliveTeams() == NumTeams(ca_teams))
128 if(prev_missing_teams_mask > 0)
129 Kill_Notification(NOTIF_ALL, NULL, MSG_CENTER, CPID_MISSING_TEAMS);
130 prev_missing_teams_mask = -1;
133 if(total_players == 0)
135 if(prev_missing_teams_mask > 0)
136 Kill_Notification(NOTIF_ALL, NULL, MSG_CENTER, CPID_MISSING_TEAMS);
137 prev_missing_teams_mask = -1;
140 int missing_teams_mask = 0;
141 for (int i = 1; i <= NUM_TEAMS; ++i)
143 if ((ca_teams & Team_IndexToBit(i)) &&
144 (Team_GetNumberOfAlivePlayers(Team_GetTeamFromIndex(i)) == 0))
146 missing_teams_mask |= Team_IndexToBit(i);
149 if(prev_missing_teams_mask != missing_teams_mask)
151 Send_Notification(NOTIF_ALL, NULL, MSG_CENTER, CENTER_MISSING_TEAMS, missing_teams_mask);
152 prev_missing_teams_mask = missing_teams_mask;
157 bool ca_isEliminated(entity e)
159 if(e.caplayer == 1 && (IS_DEAD(e) || e.frags == FRAGS_PLAYER_OUT_OF_GAME))
161 if(e.caplayer == 0.5)
166 /** Returns next available player to spectate if g_ca_spectate_enemies == 0 */
167 entity CA_SpectateNext(entity player, entity start)
169 if (SAME_TEAM(start, player)) return start;
170 // continue from current player
171 for (entity e = start; (e = find(e, classname, STR_PLAYER)); )
173 if (SAME_TEAM(player, e)) return e;
175 // restart from the beginning
176 for (entity e = NULL; (e = find(e, classname, STR_PLAYER)); )
178 if (SAME_TEAM(player, e)) return e;
184 MUTATOR_HOOKFUNCTION(ca, PlayerSpawn)
186 entity player = M_ARGV(0, entity);
190 eliminatedPlayers.SendFlags |= 1;
193 MUTATOR_HOOKFUNCTION(ca, ForbidSpawn)
195 entity player = M_ARGV(0, entity);
197 // spectators / observers that weren't playing can join; they are
198 // immediately forced to observe in the PutClientInServer hook
199 // this way they are put in a team and can play in the next round
200 if (!allowed_to_spawn && player.caplayer)
205 MUTATOR_HOOKFUNCTION(ca, PutClientInServer)
207 entity player = M_ARGV(0, entity);
209 if (!allowed_to_spawn && IS_PLAYER(player)) // this is true even when player is trying to join
211 TRANSMUTE(Observer, player);
212 if (CS(player).jointime != time && !player.caplayer) // not when connecting
214 player.caplayer = 0.5;
215 Send_Notification(NOTIF_ONE_ONLY, player, MSG_INFO, INFO_CA_JOIN_LATE);
220 MUTATOR_HOOKFUNCTION(ca, reset_map_players)
222 FOREACH_CLIENT(true, {
223 CS(it).killcount = 0;
224 if (!it.caplayer && IS_BOT_CLIENT(it))
231 TRANSMUTE(Player, it);
233 PutClientInServer(it);
239 MUTATOR_HOOKFUNCTION(ca, reset_map_global)
241 allowed_to_spawn = true;
245 MUTATOR_HOOKFUNCTION(ca, TeamBalance_CheckAllowedTeams, CBC_ORDER_EXCLUSIVE)
247 M_ARGV(0, float) = ca_teams;
251 entity ca_LastPlayerForTeam(entity this)
253 entity last_pl = NULL;
254 FOREACH_CLIENT(IS_PLAYER(it) && it != this, {
255 if (!IS_DEAD(it) && SAME_TEAM(this, it))
266 void ca_LastPlayerForTeam_Notify(entity this)
268 if (!warmup_stage && round_handler_IsActive() && round_handler_IsRoundStarted())
270 entity pl = ca_LastPlayerForTeam(this);
272 Send_Notification(NOTIF_ONE, pl, MSG_CENTER, CENTER_ALONE);
276 MUTATOR_HOOKFUNCTION(ca, PlayerDies)
278 entity frag_target = M_ARGV(2, entity);
280 ca_LastPlayerForTeam_Notify(frag_target);
281 if (!allowed_to_spawn)
283 frag_target.respawn_flags = RESPAWN_SILENT;
284 // prevent unwanted sudden rejoin as spectator and movement of spectator camera
285 frag_target.respawn_time = time + 2;
287 frag_target.respawn_flags |= RESPAWN_FORCE;
289 eliminatedPlayers.SendFlags |= 1;
293 MUTATOR_HOOKFUNCTION(ca, ClientDisconnect)
295 entity player = M_ARGV(0, entity);
297 if (IS_PLAYER(player) && !IS_DEAD(player))
298 ca_LastPlayerForTeam_Notify(player);
302 MUTATOR_HOOKFUNCTION(ca, MakePlayerObserver)
304 entity player = M_ARGV(0, entity);
306 bool is_forced = M_ARGV(1, bool);
307 if (is_forced && player.caplayer)
310 if (IS_PLAYER(player) && !IS_DEAD(player))
311 ca_LastPlayerForTeam_Notify(player);
312 if (player.killindicator_teamchange == -2) // player wants to spectate
314 entcs_update_players(player);
318 player.frags = FRAGS_PLAYER_OUT_OF_GAME;
320 eliminatedPlayers.SendFlags |= 1;
321 if (!player.caplayer)
322 return false; // allow team reset
323 return true; // prevent team reset
326 MUTATOR_HOOKFUNCTION(ca, ForbidThrowCurrentWeapon)
331 MUTATOR_HOOKFUNCTION(ca, GiveFragsForKill, CBC_ORDER_FIRST)
333 M_ARGV(2, float) = 0; // score will be given to the winner team when the round ends
337 MUTATOR_HOOKFUNCTION(ca, SetStartItems)
339 start_items &= ~(IT_UNLIMITED_AMMO | IT_UNLIMITED_SUPERWEAPONS);
340 if(!cvar("g_use_ammunition"))
341 start_items |= IT_UNLIMITED_AMMO;
343 start_health = warmup_start_health = autocvar_g_ca_start_health;
344 start_armorvalue = warmup_start_armorvalue = autocvar_g_ca_start_armor;
345 start_ammo_shells = warmup_start_ammo_shells = autocvar_g_ca_start_ammo_shells;
346 start_ammo_nails = warmup_start_ammo_nails = autocvar_g_ca_start_ammo_nails;
347 start_ammo_rockets = warmup_start_ammo_rockets = autocvar_g_ca_start_ammo_rockets;
348 start_ammo_cells = warmup_start_ammo_cells = autocvar_g_ca_start_ammo_cells;
349 start_ammo_plasma = warmup_start_ammo_plasma = autocvar_g_ca_start_ammo_plasma;
350 start_ammo_fuel = warmup_start_ammo_fuel = autocvar_g_ca_start_ammo_fuel;
353 MUTATOR_HOOKFUNCTION(ca, Damage_Calculate)
355 entity frag_attacker = M_ARGV(1, entity);
356 entity frag_target = M_ARGV(2, entity);
357 float frag_deathtype = M_ARGV(3, float);
358 float frag_damage = M_ARGV(4, float);
359 float frag_mirrordamage = M_ARGV(5, float);
361 if (IS_PLAYER(frag_target))
362 if (!IS_DEAD(frag_target))
363 if (frag_target == frag_attacker || SAME_TEAM(frag_target, frag_attacker) || frag_deathtype == DEATH_FALL.m_id)
366 frag_mirrordamage = 0;
368 M_ARGV(4, float) = frag_damage;
369 M_ARGV(5, float) = frag_mirrordamage;
372 MUTATOR_HOOKFUNCTION(ca, FilterItem)
374 entity item = M_ARGV(0, entity);
376 if (autocvar_g_powerups <= 0)
377 if (item.itemdef.instanceOfPowerup)
380 if (autocvar_g_pickup_items <= 0)
384 MUTATOR_HOOKFUNCTION(ca, PlayerDamage_SplitHealthArmor)
386 if (time < game_starttime || (round_handler_IsActive() && !round_handler_IsRoundStarted()))
389 entity frag_attacker = M_ARGV(1, entity);
390 entity frag_target = M_ARGV(2, entity);
391 float frag_deathtype = M_ARGV(6, float);
392 float frag_damage = M_ARGV(7, float);
393 float damage_take = bound(0, M_ARGV(4, float), GetResource(frag_target, RES_HEALTH));
394 float damage_save = bound(0, M_ARGV(5, float), GetResource(frag_target, RES_ARMOR));
396 float excess = max(0, frag_damage - damage_take - damage_save);
399 if (frag_target != frag_attacker && IS_PLAYER(frag_attacker) && DIFF_TEAM(frag_target, frag_attacker))
400 GameRules_scoring_add_team(frag_attacker, SCORE, (frag_damage - excess) * autocvar_g_ca_damage2score_multiplier);
403 if (SAME_TEAM(frag_target, frag_attacker))
404 GameRules_scoring_add_team(frag_attacker, SCORE, (-1 * (frag_damage - excess)) * autocvar_g_ca_damage2score_multiplier);
406 //handle (environmental hazard) suiciding, check first if player has a registered attacker who most likely pushed them there to avoid punishing pushed players as pushers are already rewarded
408 //kill = suicide, drown = drown in water/liquid, hurttrigger = out of the map void or hurt triggers inside maps like electric sparks
409 //camp = campcheck, lava = lava, slime = slime
410 //team change / rebalance suicides are currently not included
411 if (!IS_PLAYER(frag_attacker) && (
412 frag_deathtype == DEATH_KILL.m_id ||
413 frag_deathtype == DEATH_DROWN.m_id ||
414 frag_deathtype == DEATH_HURTTRIGGER.m_id ||
415 frag_deathtype == DEATH_CAMP.m_id ||
416 frag_deathtype == DEATH_LAVA.m_id ||
417 frag_deathtype == DEATH_SLIME.m_id ||
418 frag_deathtype == DEATH_SWAMP.m_id))
419 GameRules_scoring_add_team(frag_target, SCORE, (-1 * (frag_damage - excess)) * autocvar_g_ca_damage2score_multiplier);
422 MUTATOR_HOOKFUNCTION(ca, CalculateRespawnTime)
424 // no respawn calculations needed, player is forced to spectate anyway
428 MUTATOR_HOOKFUNCTION(ca, PlayerRegen)
430 // no regeneration in CA
434 MUTATOR_HOOKFUNCTION(ca, Scores_CountFragsRemaining)
436 // announce remaining frags
440 MUTATOR_HOOKFUNCTION(ca, SpectateSet)
442 entity client = M_ARGV(0, entity);
443 entity targ = M_ARGV(1, entity);
445 if (!autocvar_g_ca_spectate_enemies && client.caplayer)
446 if (DIFF_TEAM(targ, client))
450 MUTATOR_HOOKFUNCTION(ca, SpectateNext)
452 entity client = M_ARGV(0, entity);
454 if (!autocvar_g_ca_spectate_enemies && client.caplayer
455 && Team_GetNumberOfAlivePlayers(Entity_GetTeam(client)))
457 entity targ = M_ARGV(1, entity);
458 M_ARGV(1, entity) = CA_SpectateNext(client, targ);
463 MUTATOR_HOOKFUNCTION(ca, SpectatePrev)
465 entity client = M_ARGV(0, entity);
466 entity targ = M_ARGV(1, entity);
467 entity first = M_ARGV(2, entity);
469 if (!autocvar_g_ca_spectate_enemies && client.caplayer
470 && Team_GetNumberOfAlivePlayers(Entity_GetTeam(client)))
472 do { targ = targ.chain; }
473 while(targ && DIFF_TEAM(targ, client));
477 for (targ = first; targ && DIFF_TEAM(targ, client); targ = targ.chain);
479 if (targ == client.enemy)
480 return MUT_SPECPREV_RETURN;
484 return MUT_SPECPREV_CONTINUE;
486 M_ARGV(1, entity) = targ;
488 return MUT_SPECPREV_FOUND;
491 MUTATOR_HOOKFUNCTION(ca, Bot_FixCount, CBC_ORDER_EXCLUSIVE)
493 FOREACH_CLIENT(IS_REAL_CLIENT(it), {
494 if (IS_PLAYER(it) || it.caplayer == 1)
501 MUTATOR_HOOKFUNCTION(ca, ClientCommand_Spectate)
503 entity player = M_ARGV(0, entity);
507 // they're going to spec, we can do other checks
508 if (autocvar_sv_spectate && (IS_SPEC(player) || IS_OBSERVER(player)))
509 Send_Notification(NOTIF_ONE_ONLY, player, MSG_INFO, INFO_CA_LEAVE);
510 return MUT_SPECCMD_FORCE;
513 return MUT_SPECCMD_CONTINUE;
516 MUTATOR_HOOKFUNCTION(ca, HideTeamNagger)
518 return true; // doesn't work well with the whole spectator as player thing
521 MUTATOR_HOOKFUNCTION(ca, GetPlayerStatus)
523 entity player = M_ARGV(0, entity);
525 return player.caplayer == 1;
528 MUTATOR_HOOKFUNCTION(ca, SetWeaponArena)
530 if (M_ARGV(0, string) == "0" || M_ARGV(0, string) == "")
531 M_ARGV(0, string) = autocvar_g_ca_weaponarena;
534 MUTATOR_HOOKFUNCTION(ca, SV_ParseServerCommand)
536 string cmd_name = M_ARGV(0, string);
537 if (cmd_name == "shuffleteams")
538 shuffleteams_on_reset_map = !allowed_to_spawn;