Lua [SAMP-RP] Простой AdBlock

[Test Subject]

Версия SA-MP

1. Любая

Простой adblock (скрытие обьявлений в чате) для samp-rp с вкл/выкл. Можно сменить строки на другой сервер при желании.
Требует только одну библиотеку Events.

sampev = require "lib.samp.events"
local toggle = true --Ставь false если хочешь чтобы при ыходе был выключен адблок

function main()
    if not isSampLoaded() or not isSampfuncsLoaded() then return end
    while not isSampAvailable() do wait(0) end
  sampRegisterChatCommand("ads", ads) --тут можно поменять название команды, если эта не нравиться
  sampAddChatMessage("AdBlock запущен и автоматом включён!", 0xA5FF00)
end

function ads() --тут функция самой команды - обычный переключатель вкл/выкл
  if toggle==true then
  toggle=false
  sampAddChatMessage("AdBlock выключен!", 0xFF2600)
  else
  toggle=true
  sampAddChatMessage("AdBlock включён!", 0xA5FF00)
  end
end

function sampev.onServerMessage(color, text)
if toggle==true then
    if string.find (text,'Объявление:',1,true) then --Сюда писать текст для блокировки, тут настроено для SAMP-RP
    return false
    end
    if string.find (text,'Редакция News',1,true) then --Сюда писать текст для блокировки, тут настроено для SAMP-RP
    return false
    end
end
end

 

[MLycoris]

local sampev = require "lib.samp.events"
local ads = {'Объявление:','Редакция News'} -- таблица со словами, которые надо сносить
local toggle = true --Ставь false если хочешь чтобы при ыходе был выключен адблок

function main()
    while not isSampAvailable() do wait(0) end
    sampRegisterChatCommand("ads", function() --тут можно поменять название команды, если эта не нравиться
        toggle = not toggle -- переключаем режим скрипта
        sampAddChatMessage(string.format('{%s}AdBlock %s',toggle and 'A5FF00' or 'FF2600', toggle and 'включен!' or 'выключен!'), -1)
    end)
    sampAddChatMessage("AdBlock запущен и автоматом включён!", 0xA5FF00)
    wait(-1)
end
function sampev.onServerMessage(color, text)
    if toggle then -- если активен
        for k, v in pairs(ads) do -- то парсим таблицу со словами на 2 строке
            if text:find(v) then -- если слово найдено, то
                return false -- сносим его
            end
        end
    end
end