From cc815fc534bd2bab7bd9d3a2a4c50a3881bbde52 Mon Sep 17 00:00:00 2001 From: ChocoTaco1 Date: Fri, 24 Jul 2020 15:50:57 -0400 Subject: [PATCH] Added TKwarn Warn players of excessive tks Boot them when threshold is met --- Classic/scripts/autoexec/TKwarn.cs | 39 ++++++++++++++++++++++++++++++ 1 file changed, 39 insertions(+) create mode 100644 Classic/scripts/autoexec/TKwarn.cs diff --git a/Classic/scripts/autoexec/TKwarn.cs b/Classic/scripts/autoexec/TKwarn.cs new file mode 100644 index 0000000..6940caa --- /dev/null +++ b/Classic/scripts/autoexec/TKwarn.cs @@ -0,0 +1,39 @@ +$Host::TKMax = 12; +$Host::TKWarn1 = 4; +$Host::TKWarn2 = 8; + +package TKwarn +{ + + +// From Evo +function DefaultGame::testTeamKill(%game, %victimID, %killerID) +{ + %tk = Parent::testTeamKill(%game, %victimID, %killerID); + if(!%tk) + return false; // is not a tk + + if($Host::TournamentMode || %killerID.isAdmin || %killerID.isAIcontrolled() || %victimID.isAIcontrolled()) + return true; + + // warn the player + if((%killerID.teamkills == $Host::TKWarn1 - 1) && $Host::TKWarn1 != 0) + centerprint(%killerID, "You have teamkilled " @ %killerID.teamkills + 1 @ " players.\nCut it out!", 5, 3); + // warn the player of his imminent kick + else if((%killerID.teamkills == $Host::TKWarn2 - 1) && $Host::TKWarn2 != 0) + centerprint(%killerID, "You have teamkilled " @ %killerID.teamkills + 1 @ " players.\nWith " @ $Host::TKMax @ " teamkills, you will be kicked.", 5, 3); + // kick the player + else if((%killerID.teamkills >= $Host::TKMax - 1) && $Host::TKMax != 0) + { + Game.kickClientName = %killerID.name; + kick(%killerID, false, %killerID.guid); + adminLog( %killerID, " was autokicked for too many teamkills." ); + } + return true; +} + +}; + +// Prevent package from being activated if it is already +if (!isActivePackage(TKwarn)) + activatePackage(TKwarn); \ No newline at end of file