Вопросы по 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.
Как получить транспорт, в котором сидит игрок?
Lua:
local veh = storeCarCharIsInNoSave(PLAYER_PED)
Как получить свой id или id другого игрока?
Lua:
local _, id = sampGetPlayerIdByCharHandle(PLAYER_PED) -- получить свой ид
local _, id = sampGetPlayerIdByCharHandle(ped) -- получить ид другого игрока. ped - это хендл персонажа
Как проверить, что строка содержит какой-то текст?
Lua:
if string.find(str, 'текст', 1, true) then
-- строка str содержит "текст"
end
Как эмулировать нажатие игровой клавиши?
Lua:
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 другого игрока, в которого целюсь я?
Lua:
local valid, ped = getCharPlayerIsTargeting(PLAYER_HANDLE) -- получить хендл персонажа, в которого целится игрок
if valid and doesCharExist(ped) then -- если цель есть и персонаж существует
  local result, id = sampGetPlayerIdByCharHandle(ped) -- получить samp-ид игрока по хендлу персонажа
  if result then -- проверить, прошло ли получение ида успешно
    -- здесь любые действия с полученным идом игрока
  end
end
Как зарегистрировать команду чата SAMP?
Lua:
-- До бесконечного цикла/задержки
sampRegisterChatCommand("mycommand", function (param)
     -- param будет содержать весь текст введенный после команды, чтобы разделить его на аргументы используйте string.match()
    sampAddChatMessage("MyCMD", -1)
end)
Крашит игру при вызове sampSendChat. Как это исправить?
Это происходит из-за бага в SAMPFUNCS, когда производится попытка отправки пакета определенными функциями изнутри события исходящих RPC и пакетов. Исправления для этого бага нет, но есть способ не провоцировать его. Вызов sampSendChat изнутри обработчика исходящих RPC/пакетов нужно обернуть в скриптовый поток с нулевой задержкой:
Lua:
function onSendRpc(id)
  -- крашит:
  -- sampSendChat('Send RPC: ' .. id)

  -- норм:
  lua_thread.create(function()
    wait(0)
    sampSendChat('Send RPC: ' .. id)
  end)
end
 
Последнее редактирование:

AnWu

Известный
Всефорумный модератор
4,780
5,413
Lua:
imgui.SetWindowFontScale(жирность)
imgui.SetWindowFontScale(1.0)
убил бы за такие советы. жирность и размер задаются при создании шрифта.

@DonHomka я так и не понял, как задать функцию, когда кнопка оффнута (ну то есть, я врубил, и когда вырубил, то всё равно всё работает, как выключить?)
Посмотреть вложение 17856

Lua:
        if page_select == 1 then
            imgui.AlignTextToFramePadding()
            imgui.Text(u8("Сбив ВСЕХ серверных анимок."))
            imgui.SameLine()
            if imgui.ToggleButton("Test##1", imBool) then
               one = true
               two = true
            end
        end
one = imBool.v
аналогия Checkbox
 
  • Нравится
Реакции: atizoff

atizoff

приобретаю кашель за деньги
Проверенный
1,296
1,181
Как сделать так, чтобы при выборе одного из пунктов диалога открывался следующий диалог или же например что-то отправлялось в чат.
Lua:
--в main
while true do
wait(0)
local result, button, list, input = sampHasDialogRespond(66)
if result then
if button == 1 and list == 0 then
sampAddChatMessage("строка0", -1) end
if button == 1 and list == 1 then
sampAddChatMessage("строка1", -1) end
if button == 1 and list == 2 then
sampAddChatMessage("строка2", -1) end
end
end
--в main

function vaccine()
local strings = [[VAC-1 Цена:550 от гриппа Тип:1
VAC-2 Цена:650 от ангины Тип:2
VAC-3 Цена:750 от бронхита Тип: 3
VAC-3 Цена:850 от бронхита Тип:4]]
sampAddChatMessage("{ffffff}* [Helper{77dd77}for{ffffff}Doctor]: Выберите тип {77dd77}вакцины ", 0xC1C1C1)
sampShowDialog(66, "Вакцины", strings, "ОК", "Отмена", 2)
end

ПРИМЕР ОТ Trefa_
 
  • Нравится
Реакции: biscuitt

castlefamily

Участник
104
3
Вопросик,
Код:
function sampev.onServerMessage(color, text)
       
        if isPauseMenuActive() then return end
        if isGamePaused() then return end
Если прожать ESC и выйти в АФК после некоторое время обратно вернутся, начинается дикий флуд, так как скрипт продолжил работу, а если альт+таб то все норм, не флудит. Как можно пофиксить?
 

atizoff

приобретаю кашель за деньги
Проверенный
1,296
1,181
Вопросик,
Код:
function sampev.onServerMessage(color, text)
      
        if isPauseMenuActive() then return end
        if isGamePaused() then return end
Если прожать ESC и выйти в АФК после некоторое время обратно вернутся, начинается дикий флуд, так как скрипт продолжил работу, а если альт+таб то все норм, не флудит. Как можно пофиксить?
Попробуйте return false
 

Hatiko

Известный
Проверенный
1,516
633
Для создании Гм используется функция setCharProofs(PlayerPed, true, true, true, true, true), она как бы работает, т.е. хп не сносит от падений, пуль, огня и т.п., но от кулаков не спасает. Как можно это исправить, чтобы гм и на кулаки работал. (На Аризоне РП)
 

castlefamily

Участник
104
3
Еще вопросик.

Код:
if show_moon_imgui_tutorial.v then
        local sw, sh = getScreenResolution()
        imgui.SetNextWindowPos(imgui.ImVec2(sw/2, (sh/2)), imgui.Cond.FirstUseEver, imgui.ImVec2(0.5, 0.5))
        imgui.SetNextWindowSize(imgui.ImVec2(800, 500), imgui.Cond.FirstUseEver)
...
end

и еще используется такого же type windows, но чуть с меньшим размером
Код:
if show_moon_imgui_reminder.v then
        local sw, sh = getScreenResolution()
        imgui.SetNextWindowPos(imgui.ImVec2(sw/2, (sh/2)), imgui.Cond.FirstUseEver, imgui.ImVec2(0.5, 0.5))
        imgui.SetNextWindowSize(imgui.ImVec2(640, 250), imgui.Cond.FirstUseEver)
        ...
end

Итог такой какое первое окно откроется, такого и все окна размером будут, мне бы хотелось сделать чтобы под каждый заданный размер окна был таким как задан, а не допустим если первое открыть reminder и он откроется размером 640, 250 и если открыть tutorial то он тоже будет размером 640, 250
 

atizoff

приобретаю кашель за деньги
Проверенный
1,296
1,181
Для создании Гм используется функция setCharProofs(PlayerPed, true, true, true, true, true), она как бы работает, т.е. хп не сносит от падений, пуль, огня и т.п., но от кулаков не спасает. Как можно это исправить, чтобы гм и на кулаки работал. (На Аризоне РП)
Посмотри опкод данной команды, может где-то нужно поставить false

Еще вопросик.

Код:
if show_moon_imgui_tutorial.v then
        local sw, sh = getScreenResolution()
        imgui.SetNextWindowPos(imgui.ImVec2(sw/2, (sh/2)), imgui.Cond.FirstUseEver, imgui.ImVec2(0.5, 0.5))
        imgui.SetNextWindowSize(imgui.ImVec2(800, 500), imgui.Cond.FirstUseEver)
...
end

и еще используется такого же type windows, но чуть с меньшим размером
Код:
if show_moon_imgui_reminder.v then
        local sw, sh = getScreenResolution()
        imgui.SetNextWindowPos(imgui.ImVec2(sw/2, (sh/2)), imgui.Cond.FirstUseEver, imgui.ImVec2(0.5, 0.5))
        imgui.SetNextWindowSize(imgui.ImVec2(640, 250), imgui.Cond.FirstUseEver)
        ...
end

Итог такой какое первое окно откроется, такого и все окна размером будут, мне бы хотелось сделать чтобы под каждый заданный размер окна был таким как задан, а не допустим если первое открыть reminder и он откроется размером 640, 250 и если открыть tutorial то он тоже будет размером 640, 250
Вроде же вы неверно написали?
Lua:
function imgui.OnDrawFrame()
    imgui.SetNextWindowPos(imgui.ImVec2(sw / 2, sh / 2), imgui.Cond.FirstUseEver, imgui.ImVec2(0.5, 0.5))
  if main_window_state.v then
 
Последнее редактирование модератором:

Hatiko

Известный
Проверенный
1,516
633
Ну так вот же, в опкоде:
4@ [byte] - иммунитет на холодное оружие/кулаки(true/false).
Если не работает, возможно просто на сервере это пофиксили
Так вот в чём прикол, гм на клео робит полностью, а вот в луа нет, можно ли как-то через память например передать иммунитет?
 

atizoff

приобретаю кашель за деньги
Проверенный
1,296
1,181
Так вот в чём прикол, гм на клео робит полностью, а вот в луа нет, можно ли как-то через память например передать иммунитет?
Проверь это, может заработает.
Скрипт от @checkdasound
Lua:
script_name('GM For Arizona RP')
script_author('checkdasound')
script_version('0.1')
script_url('https://perfect-soft.net/')

local playermg = false
--
function main()
    while not isSampAvailable() do wait(100) end
    gmPatch()
    while true do
    wait(0)
        if testCheat('GM') then
            playermg = not playermg
            if playermg then
                setCharProofs(PLAYER_PED, true, true, true, true, true)
                writeMemory(0x96916D, 1,  1, true)
                writeMemory(0xB7CEE6, 1, 1, true)
                makePlayerFireProof(PLAYER_HANDLE, true)
                local cped = getCharPointer(PLAYER_PED)
                local cped1 = cped + 66
                writeMemory(cped1, 1, 0xCC, false)
                printStringNow('~g~ARZ GM ON', 2000)
            else
                setCharProofs(PLAYER_PED, false, false, false, false, false)
                writeMemory(0x96916D, 1,  0, true)
                writeMemory(0xB7CEE6, 1, 0, true)
                makePlayerFireProof(PLAYER_HANDLE, false)
                local cped = getCharPointer(PLAYER_PED)
                local cped1 = cped + 66
                writeMemory(cped1, 1, 0, false)
                printStringNow('~r~ARZ GM OFF', 2000)
            end
        end
    end
end
--
function gmPatch()
    writeMemory(0x004B35A0, 4, 0x560CEC83, true)
    writeMemory(0x004B35A4, 2, 0xF18B, true)
end
 

Harryss

Участник
233
26
Как отправлять данные серверным диалогам со стилем 0 ? Заметил, что ни DialogResponse ни CloseWithButton на них не работают, а ID у них 0-ой, хотя серверные. Как их закрывать?
 

MITQAA

Известный
17
0
Подскажите, пожалуйста, как исправить эту ошибку
Ошибка:
Lua:
[ML] (error) test.lua: ...es (x86)\GTA San Andreas MultiPlayer\moonloader\test.lua:450: attempt to call global 'sampisdialogactive' (a nil value)
stack traceback:
    ...es (x86)\GTA San Andreas MultiPlayer\moonloader\test.lua:450: in function <...es (x86)\GTA San Andreas MultiPlayer\moonloader\test.lua:443>
[ML] (error) test.lua: Script died due to an error. (01B8362C)
Код
Lua:
function cmd_uninvit(param)
    local id = string.match(param, "%d+")
    if id ~= nil then
        local name = sampGetPlayerNickname(id)
        local rpname = name:gsub('_', ' ') -- так получим рп ник на всякий случай
          sampAddChatMessage("{ffffff}* [Helper{77dd77}for{ffffff}Doctor]: Введите причину {77dd77}увольнения", 0xC1C1C1)
          sampShowDialog(67, "Увольнение", "Введите причину увольнения "..rpname, "ОК", "Отмена", 1)
            while not sampisdialogactive(67) do
           lua_thread.create(function()
            sampSendChat("/do В кармане телефон.")
            wait(2000)
            sampSendChat("/me достал из кармана телефон")
            wait(2000)
            sampSendChat("/me разблокировал телефон и ввёл пин-код")
            wait(2000)
            sampSendChat("/me открыл программу МЗ")
            wait(2000)
            sampSendChat("/do Программа открылась и показала меню.")
            wait(2000)
            sampSendChat("/me выбрал раздел Уволить и ввёл "..rpname)
            wait(2000)
            sampSendChat("/do Человек удалён из базы данных")
            wait(3000)
            sampSendChat("/uninvite "..id.."LS | "..reasonuninvite)
            wait(700)
            sampSendChat("/time")
           end)
        end