CR:MP Rodina Авто инвайт в семью по фразе

[Weshnovsky]

Ищу рабочий скрипт на Родину где будет авто инвайтить челов в семью которые напишут например слово инвайт в чате.

 

[SAKUTA]

распиши как происходит инвайт на родине, просто команду надо написать? или диалогом или еще как то?

 

[Weshnovsky]

распиши как происходит инвайт на родине, просто команду надо написать? или диалогом или еще как то?

Ну есть приглашение через /fammenu и командой /faminvite

распиши как происходит инвайт на родине, просто команду надо написать? или диалогом или еще как то?

Именно если через меню то там открывается диалог ближайших существ. Ну а через команду то по айди

 

[FANAT.FANATA]

Ну есть приглашение через /fammenu и командой /faminvite


Именно если через меню то там открывается диалог ближайших существ. Ну а через команду то по айди

Щас сделаем

 

[Weshnovsky]

Щас сделаем

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

 

[FANAT.FANATA]

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

Что по шаблонам и задержкой от флуда на родине? Типо какой интервал между сообщениями?

 

[Weshnovsky]

Что по шаблонам и задержкой от флуда на родине? Типо какой интервал между сообщениями?

Если прям раз за разом около 5+ секунд

 

[FANAT.FANATA]

Если прям раз за разом около 5+ секунд

Ща поменяю

local keywords = {
    "инвайт", "прими в семью", "инв", "инвайт в семью", "инв в фаму", "инвайт в фаму", "инвайт в семью"
}

local command_delay = 5000

function extractPlayerInfoFromMessage(message)
    local id = message:match("%d+")
    local nick = message:match("[%w_]+")
    return id, nick
end

function logToFile(message)
    local file = io.open("autofaminvite.log", "a")
    if file then
        file:write(os.date("[%Y-%m-%d %H:%M:%S] ") .. message .. "\n")
        file:close()
    end
end

function main()
    while true do
        wait(0)
        for i = 0, 99 do
            local result, chat_message = sampGetChatString(i)
            if result then
                for _, keyword in ipairs(keywords) do
                    if chat_message:lower():find(keyword:lower()) then
                        local player_id, player_nick = extractPlayerInfoFromMessage(chat_message)
                        if player_id or player_nick then
                            if not player_id and player_nick then
                                player_id = sampGetPlayerIdByNickname(player_nick)
                            end


                            if player_id then
                                sampSendChat("/faminvite " .. player_id)
                                logToFile("Отправлена команда: /faminvite " .. player_id .. " (ник: " .. (player_nick or "неизвестно") .. ")")
                                wait(command_delay)
                                break
                            else
                                logToFile("Не удалось найти ID игрока по нику: " .. (player_nick or "неизвестно"))
                            end
                        end
                    end
                end
            end
        end
    end
end

 

[Weshnovsky]

Ща поменяю

local keywords = {
    "инвайт", "прими в семью", "инв", "инвайт в семью", "инв в фаму", "инвайт в фаму", "инвайт в семью"
}

local command_delay = 5000

function extractPlayerInfoFromMessage(message)
    local id = message:match("%d+")
    local nick = message:match("[%w_]+")
    return id, nick
end

function logToFile(message)
    local file = io.open("autofaminvite.log", "a")
    if file then
        file:write(os.date("[%Y-%m-%d %H:%M:%S] ") .. message .. "\n")
        file:close()
    end
end

function main()
    while true do
        wait(0)
        for i = 0, 99 do
            local result, chat_message = sampGetChatString(i)
            if result then
                for _, keyword in ipairs(keywords) do
                    if chat_message:lower():find(keyword:lower()) then
                        local player_id, player_nick = extractPlayerInfoFromMessage(chat_message)
                        if player_id or player_nick then
                            if not player_id and player_nick then
                                player_id = sampGetPlayerIdByNickname(player_nick)
                            end


                            if player_id then
                                sampSendChat("/faminvite " .. player_id)
                                logToFile("Отправлена команда: /faminvite " .. player_id .. " (ник: " .. (player_nick or "неизвестно") .. ")")
                                wait(command_delay)
                                break
                            else
                                logToFile("Не удалось найти ID игрока по нику: " .. (player_nick or "неизвестно"))
                            end
                        end
                    end
                end
            end
        end
    end
end

Спасибо, как смогу проверю

Ща поменяю

local keywords = {
    "инвайт", "прими в семью", "инв", "инвайт в семью", "инв в фаму", "инвайт в фаму", "инвайт в семью"
}

local command_delay = 5000

function extractPlayerInfoFromMessage(message)
    local id = message:match("%d+")
    local nick = message:match("[%w_]+")
    return id, nick
end

function logToFile(message)
    local file = io.open("autofaminvite.log", "a")
    if file then
        file:write(os.date("[%Y-%m-%d %H:%M:%S] ") .. message .. "\n")
        file:close()
    end
end

function main()
    while true do
        wait(0)
        for i = 0, 99 do
            local result, chat_message = sampGetChatString(i)
            if result then
                for _, keyword in ipairs(keywords) do
                    if chat_message:lower():find(keyword:lower()) then
                        local player_id, player_nick = extractPlayerInfoFromMessage(chat_message)
                        if player_id or player_nick then
                            if not player_id and player_nick then
                                player_id = sampGetPlayerIdByNickname(player_nick)
                            end


                            if player_id then
                                sampSendChat("/faminvite " .. player_id)
                                logToFile("Отправлена команда: /faminvite " .. player_id .. " (ник: " .. (player_nick or "неизвестно") .. ")")
                                wait(command_delay)
                                break
                            else
                                logToFile("Не удалось найти ID игрока по нику: " .. (player_nick or "неизвестно"))
                            end
                        end
                    end
                end
            end
        end
    end
end

Не работает чёт, ладно буду инвайтить по радиусу