-- Автор: Kimbo 2012 год
-- Скрипт глушит страны внесённые в таблицу tCountryGag, есть исключение для IP из заглушеной страны.
local tCountryGag = { -- Код страны который глушим
  ["CN"] = true,
  ["US"] = true,
  ["IT"] = true,
  ["VN"] = true,
}

local Exclude = { -- IP которым разрешено апчатсо в чате и лс
["208.115.230.197"] = true,
} 

function UserConnected(tUser)
  local value = tCountryGag[IP2Country.GetCountryCode(tUser.sIP)]
  if value and not Exclude[tUser.sIP]  then -- делаем исключение на IP
	Core.SendPmToNick("Kimbo", "GagCountry", "*** Зашёл IP: « "..tUser.sIP.." » с гагнутой страны: « "..IP2Country.GetCountryCode(tUser.sIP).." »")
	end
end

function ChatArrival(tUser, sData)
	local value = tCountryGag[IP2Country.GetCountryCode(tUser.sIP)]
	if value and not Exclude[tUser.sIP]  then -- делаем исключение на IP
	local sMsg = sData:match"%b<>%s+(.*)"
    Core.SendToUser(tUser, "Your country is muted")
	--Ниже можно закомментировать дабы спамеры не терзали вашу душу своим текстом:)
	Core.SendPmToNick("Kimbo", "GagCountry", "*** Засветился IP: « "..tUser.sIP.." » с гагнутой страны: « "..IP2Country.GetCountryCode(tUser.sIP).." » Пытался написать: "..sMsg)
		return true
	end
end
ToArrival = ChatArrival
RegConnected = UserConnected