Вопросы по 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

 

[FYP]

Возможно ли "заблокировать" отправку нажатой клавиши игре? Например чтобы на F6 чат не открывалс, или на Escape не открывалось меню паузы

в событии onWindowMessage ловить WM_KEYDOWN, WM_SYSKEYDOWN и, сверяя с нужными, вызывать consumeWindowMessage()

Помогите, я просто немного глупенький. Кто-нибудь может объяснить почему не работает и поправить меня?

function cmdMenu()
sampShowDialog(15, "Menu", "Odin \nDva", "Okey", "Close", 2)
local result, button, list, input = sampHasDialogRespond(15)
sampAddChatMessage("Вы выбрали: "..list, 0xFFFF00)
end

sampHasDialogRespond нужно вызывать циклично, пока в result не вернётся true

 

[ufdhbi]

Что-то ему не нравится в этой строке:

wait(100)

Спойлер: Лог в SF

[ML] (error) AHK by Pavel Davidson: C:\GTASAMP\moonloader\MVDHelperByDavidson.lua:30: attempt to yield across C-call boundary
stack traceback:
[C]: in function 'wait'
C:\GTASAMP\moonloader\MVDHelperByDavidson.lua:30: in function <C:\GTASAMP\moonloader\MVDHelperByDavidson.lua:20>
[ML] (error) AHK by Pavel Davidson: Script died due to error. (146A23FC)

Код функции:

function cmdhm()
    shm = "Информация о скрипте \nНастройки скрипта"
    sampShowDialog(2, "Меню MVD Helper", shm, "Окей", "Закрыть", 2)
    dialogstop = false
    while dialogstop == false do
        local result, button, list, input = sampHasDialogRespond(2)
        if result == true then
            dialogstop = true
            sampAddChatMessage("Выбран пункт: "..list, 0x4682B4)
        else
        wait(100)
        end
    end
end

В командах, хуках использовать задержки нельзя, кинь весь код

 

[ufdhbi]

Спойлер: Открой

script_name("AHK by Pavel Davidson")
script_author("Pavel Davidson")
script_description("/mh - main menu")
script_version_number(1)

scriptname = "MVD Helper"
scriptauthor = "Pavel Davidson"
function main()
sampAddChatMessage("{4682B4}[MVDHelper]{FFA500} "..scriptname.." стартовал.", 0x4682B4)
sampAddChatMessage("{4682B4}[MVDHelper]{FFA500} Разработкик: {0000CD}"..scriptauthor, 0x4682B4)
sampRegisterChatCommand("mvdhelper", cmdmvdhelper)
sampRegisterChatCommand("hm", cmdhm)
wait(-1)
end

function cmdmvdhelper()
    sampShowDialog(1, "[!] MVD Helper [!]", "{4682B4}MVD Helper{FFA500} - это помощник игрокам фракций МВД на сервере Advance RP. \nСкрипт выполняет функцию AHK.", "Закрыть")
end

function cmdhm()
    shm = "Информация о скрипте \nНастройки скрипта"
    sampShowDialog(2, "Меню MVD Helper", shm, "Окей", "Закрыть", 2)
    dialogstop = false
    while dialogstop == false do
        wait(100)
        local result, button, list, input = sampHasDialogRespond(2)
        if result == true then
            dialogstop = true
            sampAddChatMessage("Выбран пункт: "..list, 0x4682B4)
        end
    end
end

Можно переведу на более понятную систему диалогов?
Кину полностью прокомментированный код сюда

 

[ufdhbi]

Буду только благодарен.

script_name("AHK by Pavel Davidson")
script_author("Pavel Davidson")
script_description("/mh - main menu")
script_version_number(1)
local sf = require 'sampfuncs'
require "lib.moonloader"

scriptname = "MVD Helper"
scriptauthor = "Pavel Davidson"
local dialog = {
    {
        title = 'Информация о скрипте',
        onclick = function()
            cmdmvdhelper()
        end
    },
    {
        title = 'Настройки скрипта',
        submenu =     {
                title = 'Настройки скрипта',
                {
                    title = 'Пункт 1',
                    onclick = function()
                        sampAddChatMessage("Выбран пункт 1", -1)
                    end
                },
                {
                    title = 'Пункт 2',
                    onclick = function()
                        sampAddChatMessage("Выбран пункт 2", -1)
                    end
                }
                    }
    }
}

function main()
    if not isSampLoaded() or not isSampfuncsLoaded() then return end
    while not isSampAvailable() do wait(100) end
    sampAddChatMessage("{4682B4}[MVDHelper]{FFA500} "..scriptname.." стартовал.", 0x4682B4)
    sampAddChatMessage("{4682B4}[MVDHelper]{FFA500} Разработкик: {0000CD}"..scriptauthor, 0x4682B4)
    sampRegisterChatCommand("mvdhelper", cmdmvdhelper)
    while true do
    wait(0)
        if isKeyDown(VK_3) and isKeyJustPressed(VK_7) then
            submenus_show(dialog, "Меню MVD Helper") -- вызываем диалог настроек, указывая в 1 параметре таблицу диалога, 2 - титл
        end
    end
end

function cmdmvdhelper()
    sampShowDialog(1, "[!] MVD Helper [!]", "{4682B4}MVD Helper{FFA500} - это помощник игрокам фракций МВД на сервере Advance RP. \nСкрипт выполняет функцию AHK.", "Закрыть")
end
function submenus_show(menu, caption, select_button, close_button, back_button)
    select_button, close_button, back_button = select_button or 'Выбрать', close_button or 'Закрыть', back_button or 'Назад'
    prev_menus = {}
    function display(menu, id, caption)
        local string_list = {}
        for i, v in ipairs(menu) do
            table.insert(string_list, type(v.submenu) == 'table' and v.title .. '  >>>' or v.title)
        end
        sampShowDialog(id, caption, table.concat(string_list, '\n'), select_button, (#prev_menus > 0) and back_button or close_button, sf.DIALOG_STYLE_LIST)
        repeat
            wait(0)
            local result, button, list = sampHasDialogRespond(id)
            if result then
                if button == 1 and list ~= -1 then
                    local item = menu[list + 1]
                    if type(item.submenu) == 'table' then
                        table.insert(prev_menus, {menu = menu, caption = caption})
                        if type(item.onclick) == 'function' then
                            item.onclick(menu, list + 1, item.submenu)
                        end
                        return display(item.submenu, id + 1, item.submenu.title and item.submenu.title or item.title)
                    elseif type(item.onclick) == 'function' then
                        local result = item.onclick(menu, list + 1)
                        if not result then return result end
                        return display(menu, id, caption)
                    end
                else
                    if #prev_menus > 0 then
                        local prev_menu = prev_menus[#prev_menus]
                        prev_menus[#prev_menus] = nil
                        return display(prev_menu.menu, id - 1, prev_menu.caption)
                    end
                    return false
                end
            end
        until result
    end
    return display(menu, 31337, caption or menu.title)
end

Активация 3+7, т.к. в командах запрещены задержки
Полезные сниппеты и функции^{(https://blast.hk/threads/13380/#post-160343)}

 

[AnWu]

Та делал уже, всё равно.

while true do
wait(100) -- в начале цикла, но ошибка всё равно появляется
-- тута основой код
end

wait можно использовать только в функции-потоке. Основной поток - main() и во всех созданных через theard_lua.create.

 

[Danil_Hades]

Какой ip получает local _, id = sampGetPlayerIdByCharHandle(PED)

 

[AnWu]

Как запретить показ диалога на F1?

Какой ip получает local _, id = sampGetPlayerIdByCharHandle(PED)

получает ид соотвествующий актеру. Всё зависит от значения PED.

 

[4el0ve4ik]

Как запретить показ диалога на F1?


получает ид соотвествующий актеру. Всё зависит от значения PED.

Ноп 5 байт по samp.dll+713F2

 

[AnWu]

Ноп 5 байт по samp.dll+713F2

а как ноп ебануть? я немного тупой в этой теме.

 

[4el0ve4ik]

а как ноп ебануть? я немного тупой в этой теме.

memory.fill(address, 0x90, 5, true)

 

[NoobMan=)]

Посмотрел в сообщениях выше то, что wait() в командах не работает.
Чем его можно заменить? Как задержку-то сделать?

 

[Dark_Knight]

Посмотрел в сообщениях выше то, что wait() в командах не работает.
Чем его можно заменить? Как задержку-то сделать?

Код с хука переносить в main

 

[4el0ve4ik]

Посмотрел в сообщениях выше то, что wait() в командах не работает.
Чем его можно заменить? Как задержку-то сделать?

local activation = false

function main()
    while not isSampAvailable() do wait(0) end
    sampRegisterChatCommand("cmd", cmd)
    while true do
        wait(0)
        if activation then
            --body
        end
    end
end

function cmd()
    activation = not actiation
end

 

[drags]

Как отправить пакет о поднятии пикапа с фейк данными о позиции?

 

[ufdhbi]

Как отправить пакет о поднятии пикапа с фейк данными о позиции?

Полезные сниппеты и функции^{(https://blast.hk/threads/13380/#post-153001)}