TacoServer/Classic/scripts/autoexec/AntiCloak.cs

// Amount of players needed on server for CloakPack to be banned/unbanned
//
// $Host::AntiCloakEnable = 1;
// $Host::AntiCloakPlayerCount = 6;

// Called in GetCounts.cs
function ActivateAntiCloak( %game )
{
	//CTF only
	if( $Host::AntiCloakEnable && $CurrentMissionType $= "CTF" )
	{
		//echo("TotalTeamPlayerCount " @ $TotalTeamPlayerCount);
		//echo("AntiCloakPlayerCount " @ $AntiCloakPlayerCount);
	
		//If server is in Tourny mode and the team population is lower than the AntiCloakPlayerCount cloak is not selectable.
		if( !$Host::TournamentMode && $TotalTeamPlayerCount < $Host::AntiCloakPlayerCount )
		{
			if( $AntiCloakRunOnce !$= 0 )
			{
				$InvBanList[CTF, "CloakingPack"] = 1;
			
				if(!isActivePackage(DisableCloakPack))
					activatePackage(DisableCloakPack);
			
				$AntiCloakRunOnce = 0;
			}
		}
		//Off
		else
		{
			if( $AntiCloakRunOnce !$= 1 )
			{
				$InvBanList[CTF, "CloakingPack"] = 0;
			
				if(isActivePackage(DisableCloakPack))
					deactivatePackage(DisableCloakPack);
			
				$AntiCloakRunOnce = 1;
			}
		}
	}
	//All other cases outside of CTF.
	else
	{
		if( $AntiCloakRunOnce !$= 1 )	
		{
			$InvBanList[CTF, "CloakingPack"] = 0;
			
			if(isActivePackage(DisableCloakPack))
				deactivatePackage(DisableCloakPack);
			
			$AntiCloakRunOnce = 1;
		}
	}	
}

//So if the player is able to get a cloakpack, he cant use it
package DisableCloakPack
{

function CloakingPackImage::onActivate(%data, %obj, %slot)
{
   if(%obj.client.armor $= "Light") 
   {
      if(%obj.canCloak() $= "true")
         messageClient(%obj.client, 'MsgCloakingPackInvalid', '\c2Cloakpack is disabled until %1 players.', $Host::AntiCloakPlayerCount );
   }
   else
   {
      messageClient(%obj.client, 'MsgCloakingPackInvalid', '\c2Cloaking available for light armors only.');
   }
}

};