Флудер с автовыключением

[Kaktyc007]

Версия MoonLoader

.026-beta

Добрый вечер, ищу флудер с автовыключением если в чате появится определенный текст.

 

[YarikVL]

Добрый вечер, ищу флудер с автовыключением если в чате появится определенный текст.

function main()
    while not isSampAvailable() do wait(0) end
    sampRegisterChatCommand("active", function() active = not active end)
    while true do
        wait(0)
        if not stop and active then
            sampSendChat("Tvoy soobjenie")
            wait(100) --tvoy zadershka v millisekundax
        end
    end
end
local sampev = require "lib.samp.events"
function sampev.onServerMessage(clr, text)
    if text:find("Текст в чате при котором флуд останрвится") then
        stop = true
    end
end

/active активирует скрипт
«Текст в чате при котором флуд остановится» замени на своё, и там Ещё я написал где менять задержку и Tvoy soobjenie замени на своё которое нужно флудить
После того как изменишь - сохрани в кодировке windows1251 ( загуглишь как это делать )

 

[Kaktyc007]

Cпасибо. Но есть еще пару вопросов. 1. Как к команде добавит еще текст флуда? например я напишу "/active 4", как эту 4 добавить в строку для флуда?
2. Если меня надо несколько строк искать в чате, то условия делать elseif или можно написать так: if text:find("Текст в чате при котором флуд остановится" or "второй текст для остановки флуда") then

function main()
    while not isSampAvailable() do wait(0) end
    sampRegisterChatCommand("active", function() active = not active end)
    while true do
        wait(0)
        if not stop and active then
            sampSendChat("Tvoy soobjenie")
            wait(100) --tvoy zadershka v millisekundax
        end
    end
end
local sampev = require "lib.samp.events"
function sampev.onServerMessage(clr, text)
    if text:find("Текст в чате при котором флуд останрвится") then
        stop = true
    end
end

/active активирует скрипт
«Текст в чате при котором флуд остановится» замени на своё, и там Ещё я написал где менять задержку и Tvoy soobjenie замени на своё которое нужно флудить
После того как изменишь - сохрани в кодировке windows1251 ( загуглишь как это делать )

 

[YarikVL]

Cпасибо. Но есть еще пару вопросов. 1. Как к команде добавит еще текст флуда? например я напишу "/active 4", как эту 4 добавить в строку для флуда?
2. Если меня надо несколько строк искать в чате, то условия делать elseif или можно написать так: if text:find("Текст в чате при котором флуд остановится" or "второй текст для остановки флуда") then

Посмотри уроки на ютубе канале the champ guess
Там он объясняет на похожих примерах

 

[Kaktyc007]

Посмотри уроки на ютубе канале the champ guess
Там он объясняет на похожих примерах

Что то у меня вообще ошибка(

10: attempt to concatenate global 'arg' (a nil value)

function main()
    while not isSampAvailable() do wait(0) end
    sampRegisterChatCommand("active", function(arg) active = not active end)
    stop = false
    local id = tonumber(arg)
    while true do
        wait(0)
        if not stop and active then
            sampSendChat('/id ' .. arg)
            wait(1000) --tvoy zadershka v millisekundax
        end
    end
end
local sampev = require "lib.samp.events"
function sampev.onServerMessage(clr, text)
    if text:find("qwe") or text:find("ewq") then
        stop = true
    end
end

 

[AugustTN]

Что то у меня вообще ошибка(

10: attempt to concatenate global 'arg' (a nil value)

function main()
    while not isSampAvailable() do wait(0) end
    sampRegisterChatCommand("active", function(arg) active = not active end)
    stop = false
    local id = tonumber(arg)
    while true do
        wait(0)
        if not stop and active then
            sampSendChat('/id ' .. arg)
            wait(1000) --tvoy zadershka v millisekundax
        end
    end
end
local sampev = require "lib.samp.events"
function sampev.onServerMessage(clr, text)
    if text:find("qwe") or text:find("ewq") then
        stop = true
    end
end

посмотри ролики чамп гуесса

 

[YarikVL]

Что то у меня вообще ошибка(

10: attempt to concatenate global 'arg' (a nil value)

function main()
    while not isSampAvailable() do wait(0) end
    sampRegisterChatCommand("active", function(arg) active = not active end)
    stop = false
    local id = tonumber(arg)
    while true do
        wait(0)
        if not stop and active then
            sampSendChat('/id ' .. arg)
            wait(1000) --tvoy zadershka v millisekundax
        end
    end
end
local sampev = require "lib.samp.events"
function sampev.onServerMessage(clr, text)
    if text:find("qwe") or text:find("ewq") then
        stop = true
    end
end

Ты после закрытой функции прописываешь то что должно быть в блоке который закрыл выше.
Короче ты функцию закрыл, но думаешь что ты пишешь в ней

А вообще, человек выше прав

 

[Kaktyc007]

Да видосик то смотрел, но там проще, а тут еще цикл для аргумента. Если поставить 'end)' в конец function main() что-то не бом бом(

 

[YarikVL]

Да видосик то смотрел, но там проще, а тут еще цикл для аргумента. Если поставить 'end)' в конец function main() что-то не бом бом(

Посмотри полностью и внимательно все ролики по несколько раз каждый The champ guess и потом смотри на свой код

 

[влад динозавр]

у thechampguess есть уроки на ютубе. он объясняет луа хорошо

 

[anklain]

Посмотри уроки на ютубе канале the champ guess
Там он объясняет на похожих примерах

у thechampguess есть уроки на ютубе. он объясняет луа хорошо

только у него жалко что нету про поиск в чате сообщений :(
А так да, топовый учитель

 

[Kaktyc007]

Может кому понадобиться говнокод

local flood = false
function main()
    while not isSampAvailable() do wait(0) end
    sampRegisterChatCommand("qw", cmd)
end
local sampev = require "lib.samp.events"
function sampev.onServerMessage(clr, text)
    if text:find("qwe") or text:find("ewq") then
        flood = false
    end
end

function cmd(arg)
    flood = not flood
    lua_thread.create(function()
        while flood do
            sampSendChat("/id " .. arg)
            wait(1000)
        end
    end)
end

 

[qdIbp]

Может кому понадобиться говнокод

local flood = false
function main()
    while not isSampAvailable() do wait(0) end
    sampRegisterChatCommand("qw", cmd)
end
local sampev = require "lib.samp.events"
function sampev.onServerMessage(clr, text)
    if text:find("qwe") or text:find("ewq") then
        flood = false
    end
end

function cmd(arg)
    flood = not flood
    lua_thread.create(function()
        while flood do
            sampSendChat("/id " .. arg)
            wait(1000)
        end
    end)
end

он не будет работать пчел...

Нету беск. цикла/задержки

local sampev = require('lib.samp.events')

local flood = false

function main()
    while not isSampAvailable() do wait(0) end
        sampRegisterChatCommand("qw", cmd)
        lua_thread.create(cmd)
    wait(-1)
end

function sampev.onServerMessage(clr, text)
    if string.find(text,'qwe') or string.find(text,'ewq') then
        flood = false
    end
end

function cmd(arg)
    flood = not flood
    while flood do
        sampSendChat('/id ' .. arg)
        wait(1000)
    end
end

 

[Kaktyc007]

он не будет работать пчел...

Нету беск. цикла/задержки

local sampev = require('lib.samp.events')

local flood = false

function main()
    while not isSampAvailable() do wait(0) end
        sampRegisterChatCommand("qw", cmd)
        lua_thread.create(cmd)
    wait(-1)
end

function sampev.onServerMessage(clr, text)
    if string.find(text,'qwe') or string.find(text,'ewq') then
        flood = false
    end
end

function cmd(arg)
    flood = not flood
    while flood do
        sampSendChat('/id ' .. arg)
        wait(1000)
    end
end

Ну у меня работает)
Бесконечный цикл или задержка обязательны?

и че отличается text:find('qwe') от string.find(text,'qwe')?

 

[chapo]

он не будет работать пчел...
Нету беск. цикла/задержки

он будет работать потому что там есть хуки, они не дают скрипту выгрузится