::MaxPlayers <- MaxClients().tointeger()

::baseX <- -680
::baseY <- 0

::tpBoi <- function(distance, pDistance)
{
	for (local i = 1; i <= MaxPlayers ; i++)
	{
		local player = PlayerInstanceFromIndex(i)
		if (player == null) continue
		if (!(IsPlayerABot(player))) {
			player.Teleport(true, Vector(baseX - pDistance, baseY, 0), false, QAngle(0,0,0), false, Vector(0,0,0))
			continue
		}
		if (player.HasBotTag("bot_1")) {
			player.Teleport(true, Vector(baseX, baseY, 0), false, QAngle(0,0,0), false, Vector(0,0,0))
		}
		else if (player.HasBotTag("bot_2")) {
			player.Teleport(true, Vector(baseX, baseY + distance, 0), false, QAngle(0,0,0), false, Vector(0,0,0))
		}
		else if (player.HasBotTag("bot_3")) {
			player.Teleport(true, Vector(baseX, baseY - distance, 0), false, QAngle(0,0,0), false, Vector(0,0,0))
		}
	}
}

::MAX_WEAPONS_KSF <- 8

::addWeaponAttributes <- function(attribute, value)
{
	for (local i = 0; i < MAX_WEAPONS_KSF; i++)
	{
		local weapon = NetProps.GetPropEntityArray(activator, "m_hMyWeapons", i)
		if (weapon == null)
			continue
		weapon.AddAttribute(attribute, value, -1)
	}
}

::addBotAttributes <- function(attribute, value)
{
	for (local i = 1; i <= MaxPlayers ; i++)
	{
		local player = PlayerInstanceFromIndex(i)
		if (player == null) continue
		if (!(IsPlayerABot(player))) continue
		player.AddCustomAttribute(attribute, value, -1)
	}
}