Вопросы по Lua скриптингу

Общая тема для вопросов по разработке скриптов на языке программирования Lua, в частности под MoonLoader.

• Задавая вопрос, убедитесь, что его нет в списке частых вопросов и что на него ещё не отвечали (воспользуйтесь поиском).
• Поищите ответ в теме посвященной разработке Lua скриптов в MoonLoader
• Отвечая, убедитесь, что ваш ответ корректен.
• Старайтесь как можно точнее выразить мысль, а если проблема связана с кодом, то обязательно прикрепите его к сообщению, используя блок [code=lua]здесь мог бы быть ваш код[/code].
• Если вопрос связан с MoonLoader-ом первым делом желательно поискать решение на wiki.

Частые вопросы

— Как научиться писать скрипты? С чего начать?
Информация - Гайд - Всё о Lua скриптинге для MoonLoader^{(https://blast.hk/threads/22707/)}
— Как вывести текст на русском? Вместо русского текста у меня какие-то каракули.

Спойлер

Изменить кодировку файла скрипта на Windows-1251. В Atom: комбинация клавиш Ctrl+Shift+U, в Notepad++: меню Кодировки -> Кодировки -> Кириллица -> Windows-1251.

— Как получить транспорт, в котором сидит игрок?

Спойлер

local veh = storeCarCharIsInNoSave(PLAYER_PED)

— Как получить свой id или id другого игрока?

Спойлер

local _, id = sampGetPlayerIdByCharHandle(PLAYER_PED) -- получить свой ид
local _, id = sampGetPlayerIdByCharHandle(ped) -- получить ид другого игрока. ped - это хендл персонажа

— Как проверить, что строка содержит какой-то текст?

Спойлер

if string.find(str, 'текст', 1, true) then
-- строка str содержит "текст"
end

— Как эмулировать нажатие игровой клавиши?

Спойлер

local game_keys = require 'game.keys' -- где-нибудь в начале скрипта вне функции main

setGameKeyState(game_keys.player.FIREWEAPON, -1) -- будет сэмулировано нажатие клавиши атаки

Все иды клавиш находятся в файле moonloader/lib/game/keys.lua.
Подробнее о функции setGameKeyState здесь: lua - setgamekeystate | BlastHack — DEV_WIKI^{(https://www.blast.hk/wiki/lua:setgamekeystate)}

— Как получить id другого игрока, в которого целюсь я?

Спойлер

local valid, ped = getCharPlayerIsTargeting(PLAYER_HANDLE) -- получить хендл персонажа, в которого целится игрок
if valid and doesCharExist(ped) then -- если цель есть и персонаж существует
  local result, id = sampGetPlayerIdByCharHandle(ped) -- получить samp-ид игрока по хендлу персонажа
  if result then -- проверить, прошло ли получение ида успешно
    -- здесь любые действия с полученным идом игрока
  end
end

— Как зарегистрировать команду чата SAMP?

Спойлер

-- До бесконечного цикла/задержки
sampRegisterChatCommand("mycommand", function (param)
     -- param будет содержать весь текст введенный после команды, чтобы разделить его на аргументы используйте string.match()
    sampAddChatMessage("MyCMD", -1)
end)

— Крашит игру при вызове sampSendChat. Как это исправить?

Спойлер

Это происходит из-за бага в SAMPFUNCS, когда производится попытка отправки пакета определенными функциями изнутри события исходящих RPC и пакетов. Исправления для этого бага нет, но есть способ не провоцировать его. Вызов sampSendChat изнутри обработчика исходящих RPC/пакетов нужно обернуть в скриптовый поток с нулевой задержкой:

function onSendRpc(id)
  -- крашит:
  -- sampSendChat('Send RPC: ' .. id)

  -- норм:
  lua_thread.create(function()
    wait(0)
    sampSendChat('Send RPC: ' .. id)
  end)
end

 

[Pu$$y]

I have a string that has some coordinates. For example

 S = "15 , 12, 20"

I want to do this

 S = "15 , 12, 20"
x, y, z = tonumber(S)

Will it work?

 

[copypaste_scripter]

А код мы телепатией узнаем? 😁

Как кофе допьешь чашку мне отдай,буду на кофейной гуще гадать

script_name('CPS_Script')
script_author('Copy_Paste_from_Internet')
script_description('Something')

require "lib.moonloader"
require "lib.samp.events"

local sampev = require "lib.samp.events"
local keys = require "vkeys"
local main_color = 0x8B0000

function main()
    if not isSampLoaded() or not isSampfuncsLoaded() then return end
    while not isSampAvailable() do wait(100) end
    
    sampRegisterChatCommand("cg", cmd_cg)
    sampRegisterChatCommand("sellstuff", cmd_sellstuff)

    while true do
        wait(0)

        --[[if isKeyJustPressed(VK_CAPITAL) then
            wait(100)
            setVirtualKeyDown(VK_LMENU, true)
            wait(10)
            setVirtualKeyDown(VK_LSHIFT, true)
            wait(100)
            setVirtualKeyDown(VK_LMENU, false)
            setVirtualKeyDown(VK_LSHIFT, false)
        end]]

        if isKeyJustPressed(VK_F3) then            --    F3        /s text
            sampSendChat("/s 123")
        end
        
        if isKeyJustPressed(VK_F13) then        --    F13        /key
            sampSendChat("/key")
        end
        
        if isKeyJustPressed(VK_F14) then        --    F14        /lock
            sampSendChat("/lock")
        end
        
        if isKeyJustPressed(VK_F18) then        --    F18        /repcar
            sampSendChat("/repcar")
        end
        
        if isKeyJustPressed(VK_F19) then        --    F19        /fillcar
            sampSendChat("/fillcar")
        end
        
        if isKeyJustPressed(VK_F20) then        --    F20        /house
            sampSendChat("/house")
        end
        
        if isKeyJustPressed(VK_F16) then        --    F16        /cars
            sampSendChat("/cars")
        end
        
        if isKeyJustPressed(VK_NUMPAD0) then    --    Num0    /jlock
            sampSendChat("/jlock")
        end
        
        if isKeyJustPressed(VK_NUMPAD8) then    --    Num8    /beer
            sampSendChat("/beer")
        end
        
        if isKeyJustPressed(VK_F9) then            --    F9        /time
            sampSendChat("/time")
        end
        
        if isKeyJustPressed(VK_F2) then            --    F2        /unrentcar
            sampSendChat("/unrentcar")
        end
        
        if isKeyDown(VK_MENU) and isKeyJustPressed(VK_F11) then
            sampProcessChatInput("/fpslimit 90")
        end
        
        if isKeyDown(VK_MENU) and isKeyJustPressed(VK_F12) then
            sampProcessChatInput("/fpslimit 20")
        end
        
        if isKeyDown(VK_MENU) and isKeyJustPressed(VK_J) then
            id_dialog = sampGetCurrentDialogId()
            sampAddChatMessage(id_dialog, main_color)
        end
        
        if isKeyDown(VK_CONTROL) and isKeyJustPressed(VK_P) then
            sampSendChat("/phone")
            wait (300)
            setVirtualKeyDown(VK_RETURN)
        end
    end
end

function cmd_cg(arg)                                                --    /creategun > /cg
    sampSendChat("/creategun")
end

function cmd_sellstuff(arg)
    lua_thread.create(function()
        sampSendChat("/s ")
        wait (3500)
        sampSendChat("/s ")
        wait (3500)
        sampSendChat("/s ")
        wait (3500)
        sampSendChat("/s ")
        wait (3500)
        sampSendChat("/s ")
    end)
end

function sampev.onServerMessage(color, text)
--
--                    CHAT HELP
--
    if text:find("Вы успешно зарегистрировали новую SIM карту. Ваш новый номер телефона:") then
        lua_thread.create(function()
            wait (30000)
            sampAddChatMessage("SIM карта", main_color)
        end)
    end
    
    if text:find("Номера телефонов государственных служб:") then
        sampAddChatMessage("111 - баланс | 060 - время | 911 - полиция | 912 - скорая | 913 - такси | 914 - механик | 8828 - банк", main_color)
    end    --    rabotaet
    
    if text:find("Приветствуем нового члена нашей организации") then
        sampAddChatMessage("invite", main_color)    --    rabotaet
    end
--
--                    CHAT TRASH
--
    if text:find("Отредактировал сотрудник СМИ") then
        return false
    end    --    rabotaet
    
    if text:find("В нашем магазине ты можешь приобрести нужное количество игровых денег и потратить") or text:find("или на покупку каких-нибудь безделушек") or text:find("В магазине так-же можно приобрести редкие") or text:find("- Игроки со статусом VIP имеют большие возможности, подробнее /help [Преимущества VIP]") or text:find("предметы, которые выделят тебя из толпы! Наш сайт: arizona-rp.com") then
        return false
    end

    if text:find("начал работу новый инкассатор") or text:find("Убив его, вы сможете получить деньги") then
        return false
    end

    if text:find("Репортёр [LS]") or text:find("Репортёр [SF]") or text:find("Репортёр [LV]") or text:find(" Гость ") or text:find(" [ News LS ]") or text:find(" [ News SF ]") or text:find(" [ News LV ]") then
        return false
    end

    if text:find("[Внимание] Быстрее отправляйтесь на его разгрузку, чтобы его не забрали другие!") then
        return false
    end

    if text:find("Чтобы завести двигатель введите") or text:find("Для управления поворотниками используйте клавиши") or text:find("В транспорте присутствует радио") then
        return false
    end    --    rabotaet

    if text:find("Чтобы закрыть автомобиль используйте ") or text:find("Чтобы отказаться от аренды") then
        return false
    end

    if text:find("111 - Проверить баланс телефона") or text:find("060 - Служба точного времени") or text:find("911 - Полицейский участок") or text:find("912 - Скорая помощь") or text:find("913 - Такси") or text:find("914 - Механик") or text:find("8828 - Справочная центрального банка") then
        return false
    end

    if text:find("Состояние вашего авто крайне плохое! Машина может сломаться!") or text:find("Необходимо заехать на станцию тех. обслуживания!") then
        return false
    end
end

--[[
230 arenda
162 /cars
163 zagruzit mashinu
]]

 

[Izvinisb]

I have a string that has some coordinates. For example

 S = "15 , 12, 20"

I want to do this

 S = "15 , 12, 20"
x, y, z = tonumber(S)

Will it work?

nope
upd: but u can do it like this

S = "15, 12, 20"
local x, y, z = S:match('(%d+), (%d+), (%d+)')
print(tonumber(x), tonumber(y), tonumber(z))

 

[JustFedot]

script_name('CPS_Script')
script_author('Copy_Paste_from_Internet')
script_description('Something')

require "lib.moonloader"
require "lib.samp.events"

local sampev = require "lib.samp.events"
local keys = require "vkeys"
local main_color = 0x8B0000

function main()
    if not isSampLoaded() or not isSampfuncsLoaded() then return end
    while not isSampAvailable() do wait(100) end
   
    sampRegisterChatCommand("cg", cmd_cg)
    sampRegisterChatCommand("sellstuff", cmd_sellstuff)

    while true do
        wait(0)

        --[[if isKeyJustPressed(VK_CAPITAL) then
            wait(100)
            setVirtualKeyDown(VK_LMENU, true)
            wait(10)
            setVirtualKeyDown(VK_LSHIFT, true)
            wait(100)
            setVirtualKeyDown(VK_LMENU, false)
            setVirtualKeyDown(VK_LSHIFT, false)
        end]]

        if isKeyJustPressed(VK_F3) then            --    F3        /s text
            sampSendChat("/s 123")
        end
       
        if isKeyJustPressed(VK_F13) then        --    F13        /key
            sampSendChat("/key")
        end
       
        if isKeyJustPressed(VK_F14) then        --    F14        /lock
            sampSendChat("/lock")
        end
       
        if isKeyJustPressed(VK_F18) then        --    F18        /repcar
            sampSendChat("/repcar")
        end
       
        if isKeyJustPressed(VK_F19) then        --    F19        /fillcar
            sampSendChat("/fillcar")
        end
       
        if isKeyJustPressed(VK_F20) then        --    F20        /house
            sampSendChat("/house")
        end
       
        if isKeyJustPressed(VK_F16) then        --    F16        /cars
            sampSendChat("/cars")
        end
       
        if isKeyJustPressed(VK_NUMPAD0) then    --    Num0    /jlock
            sampSendChat("/jlock")
        end
       
        if isKeyJustPressed(VK_NUMPAD8) then    --    Num8    /beer
            sampSendChat("/beer")
        end
       
        if isKeyJustPressed(VK_F9) then            --    F9        /time
            sampSendChat("/time")
        end
       
        if isKeyJustPressed(VK_F2) then            --    F2        /unrentcar
            sampSendChat("/unrentcar")
        end
       
        if isKeyDown(VK_MENU) and isKeyJustPressed(VK_F11) then
            sampProcessChatInput("/fpslimit 90")
        end
       
        if isKeyDown(VK_MENU) and isKeyJustPressed(VK_F12) then
            sampProcessChatInput("/fpslimit 20")
        end
       
        if isKeyDown(VK_MENU) and isKeyJustPressed(VK_J) then
            id_dialog = sampGetCurrentDialogId()
            sampAddChatMessage(id_dialog, main_color)
        end
       
        if isKeyDown(VK_CONTROL) and isKeyJustPressed(VK_P) then
            sampSendChat("/phone")
            wait (300)
            setVirtualKeyDown(VK_RETURN)
        end
    end
end

function cmd_cg(arg)                                                --    /creategun > /cg
    sampSendChat("/creategun")
end

function cmd_sellstuff(arg)
    lua_thread.create(function()
        sampSendChat("/s ")
        wait (3500)
        sampSendChat("/s ")
        wait (3500)
        sampSendChat("/s ")
        wait (3500)
        sampSendChat("/s ")
        wait (3500)
        sampSendChat("/s ")
    end)
end

function sampev.onServerMessage(color, text)
--
--                    CHAT HELP
--
    if text:find("Вы успешно зарегистрировали новую SIM карту. Ваш новый номер телефона:") then
        lua_thread.create(function()
            wait (30000)
            sampAddChatMessage("SIM карта", main_color)
        end)
    end
   
    if text:find("Номера телефонов государственных служб:") then
        sampAddChatMessage("111 - баланс | 060 - время | 911 - полиция | 912 - скорая | 913 - такси | 914 - механик | 8828 - банк", main_color)
    end    --    rabotaet
   
    if text:find("Приветствуем нового члена нашей организации") then
        sampAddChatMessage("invite", main_color)    --    rabotaet
    end
--
--                    CHAT TRASH
--
    if text:find("Отредактировал сотрудник СМИ") then
        return false
    end    --    rabotaet
   
    if text:find("В нашем магазине ты можешь приобрести нужное количество игровых денег и потратить") or text:find("или на покупку каких-нибудь безделушек") or text:find("В магазине так-же можно приобрести редкие") or text:find("- Игроки со статусом VIP имеют большие возможности, подробнее /help [Преимущества VIP]") or text:find("предметы, которые выделят тебя из толпы! Наш сайт: arizona-rp.com") then
        return false
    end

    if text:find("начал работу новый инкассатор") or text:find("Убив его, вы сможете получить деньги") then
        return false
    end

    if text:find("Репортёр [LS]") or text:find("Репортёр [SF]") or text:find("Репортёр [LV]") or text:find(" Гость ") or text:find(" [ News LS ]") or text:find(" [ News SF ]") or text:find(" [ News LV ]") then
        return false
    end

    if text:find("[Внимание] Быстрее отправляйтесь на его разгрузку, чтобы его не забрали другие!") then
        return false
    end

    if text:find("Чтобы завести двигатель введите") or text:find("Для управления поворотниками используйте клавиши") or text:find("В транспорте присутствует радио") then
        return false
    end    --    rabotaet

    if text:find("Чтобы закрыть автомобиль используйте ") or text:find("Чтобы отказаться от аренды") then
        return false
    end

    if text:find("111 - Проверить баланс телефона") or text:find("060 - Служба точного времени") or text:find("911 - Полицейский участок") or text:find("912 - Скорая помощь") or text:find("913 - Такси") or text:find("914 - Механик") or text:find("8828 - Справочная центрального банка") then
        return false
    end

    if text:find("Состояние вашего авто крайне плохое! Машина может сломаться!") or text:find("Необходимо заехать на станцию тех. обслуживания!") then
        return false
    end
end

--[[
230 arenda
162 /cars
163 zagruzit mashinu
]]

Даю тебе пример:

if text:find("%[Внимание%] Быстрее отправляйтесь на его разгрузку, чтобы его не забрали другие!") then
        return false
 end

Некоторые символы являются регулярными выражениями, перед ними нужно ставить %. Узнать какие символы являются регулярками можешь в инете.

 

[Dmitriy Makarov]

Мб у вас есть нормальный анти афк который не будет творить вот такой фигни?)

Баг сампа или самой игры если не ошибаюсь
Во многих интерьерах если длительное время афк стоять и выйти с афк то такая фигня появляется

 

[JustFedot]

Решил попробовать сделать типа пищалку чтоб оно пищало когда админы пишут.
Вот код функции проигрывания:

function play()
    lua_thread.create(function()
        playsound = loadAudioStream('moonloader/gonwik.mp3')
        setAudioStreamVolume(playsound, volume)
        while true do
            wait(0)
            setAudioStreamState(playsound, as_action.PLAY)
            printStringNow('Press Alt (Fedot OneLove)', 100)
            wait(upd_delay)
            setAudioStreamState(playsound, as_action.STOP)
            if isKeyJustPressed(VK_MENU) then
                playsound = nil
                ebosh = false
                return
            end
        end
    end)
end

Всё работает нормально, но вот в анти афк например оно не пищит, а хотелось бы, может вы подскажете решение?

P.S. Мб у вас есть нормальный анти афк который не будет творить вот такой фигни?)

Спойлер: Вот эта Фигня

Посмотреть вложение 55467

Проблема решена переходом на либу bass

 

[niki4]

I have a string that has some coordinates. For example

 S = "15 , 12, 20"

I want to do this

 S = "15 , 12, 20"
x, y, z = tonumber(S)

Will it work?

local x,y,z = string.match("20,21,10",(%d+)(%d+)(%d+))

Вроде должно работать вот так

 

[copypaste_scripter]

Даю тебе пример:

if text:find("%[Внимание%] Быстрее отправляйтесь на его разгрузку, чтобы его не забрали другие!") then
        return false
end

Некоторые символы являются регулярными выражениями, перед ними нужно ставить %. Узнать какие символы являются регулярками можешь в инете.

^$()%.[]*+-? значек процента тоже входит в регулярним выражениях, в сампе нельзя писать знак процента, это из-за того чтобы был один знак зарезервирован для этого?

 

[Pasquale Developer]

пацаны, почему у меня ник в /f чате не красный при том что номер аккаунта == 978699

 

[JustFedot]

^$()%.[]*+-? значек процента тоже входит в регулярним выражениях, в сампе нельзя писать знак процента, это из-за того чтобы был один знак зарезервирован для этого?

Знак процента пиши перед другими символами тогда они не будут читаться как регулярки и всё будет збс

 

[sesr4g3w]

Помогите, как получить ранг и название ранга из диалога? Что нужно писать в text:match?

 

[NetyEgo]

как сделать вместо прямоугольных кнопок(imgui.Button) сделать закруглённые края.

 

[JustFedot]

Помогите, как получить ранг и название ранга из диалога? Что нужно писать в text:match?

Посмотреть вложение 55479

dolznost, rank = text:match('Должность: (.+)%((%d)%)')

 

[klk300]

как сделать вместо прямоугольных кнопок(imgui.Button) сделать закруглённые края.

PushStyleVar загугли, в инете есть

 

[NetyEgo]

PushStyleVar загугли, в инете есть

не нашёл.
Как сделать чтоб персонаж при вызове main_window_state не мог двигаться