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

 

[moreveal]

Использую библиотеку LuaSQL для взаимодействия с базой данных.
Иногда после выхода из AFK происходит длительный фриз (дольше 10с) - после скрипт крашится, т.к. переменная "cur" - nil value.
Пока пользуюсь этим костылем, который все равно не фиксит фриз, а только перезапускает после него скрипт.

function mysqlRequest(request)
    local cur, err = con:execute(request)
    if not cur then
        thisScript():reload()
    else
        return cur, err
    end
end

Как можно избежать фриза? Из-за чего именно он происходит?
Мне советовали пинговать соединение перед выполнением запроса, используя con:ping(), но, как я понял, в моей версии либы этой возможности нет.

 

[Three]

хочу добавить в окно imgui.InputText, добавляю, активирую скрипт в игре, и крашится игра

          imgui.SetCursorPos(imgui.ImVec2(325, 210))
          imgui.BeginChild("##окноцентр", imgui.ImVec2(365, 248), true, ImGuiWindowFlags_AlwaysVerticalScrollbar)
          imgui.InputText(u8'', text_buffer)
          imgui.EndChild()

 

[TSIDEX]

imgui.SetNextWindowSize в процентах от разрешения экрана подскажите

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

Спасибо, тут выручил.

 

[Stomi]

Пж скажите где ошибка
Script died due to an error. (220233FC)

script_name('ShowCoords')
script_author('Stomi')
script_description('ShowCoords in screen')

require "lib.moonloader"
local keys = require "keys"

 function main()
    if not isSampLoaded() or not isSamofuncsLoaded() then return end
    while not isSampAvailable() do wait(100) end
      while true do wait(0)
         if  isKeyJustPressed(VK_M) then
             sampAddChatMessege("Ты крутой!", -1)
         end
     end
end

 

[chapo]

imgui.SetNextWindowSize в процентах от разрешения экрана подскажите

Спасибо, тут выручил.

если тебе надо расположить окно например в правом нижнем углу, то:

--sizeX и sizeY - размеры окна по X и Y

resX, resY = getScreenResolution()
imgui.SetNextWindowPos(imgui.ImVec2(resX - sizeX, resY - sizeY))

 

[TSIDEX]

если тебе надо расположить окно например в правом нижнем углу, то:

--sizeX и sizeY - размеры окна по X и Y

resX, resY = getScreenResolution()
imgui.SetNextWindowSize(imgui.ImVec2(resX - sizeX, resY - sizeY))

Спасибо большой, очень выручил. Сначала ошибки выдавало, оказалось не Size, а Pos тут. Всё работает как нужно.

 

[Dmitriy Makarov]

Пытаюсь прикрепить текст к машине, в которой я сижу, но что-то он не крепится. Не знаете почему?

local veh = storeCarCharIsInNoSave(PLAYER_PED)
local res, vehid = sampGetVehicleIdByCarHandle(veh)
if res then
    sampCreate3dText("Text", 16777215, 0, 0, 0, 5, true, -1, vehid) -- text, color, x, y, z, radius, ignoreWalls, playerId, vehicleId
end

Актуально.

 

[Smeruxa]

imgui.SetNextWindowPos(imgui.ImVec2(100, 100), imgui.Cond.FirstUseEver)
цвет - https://www.blast.hk/threads/25442/

так ты не поставил задержку в main()

Зачем там задержка..

 

[Smeruxa]

Актуально.

Просто как пример приведу, мб оно пытается прикрепится к игроку с ид -1? Попробуй nil поставить, так же с кордами, они же там тип нулевые, на нил их

Помоги ты мне хоть пожалуйста

Чем

 

[Smeruxa]

Помогите пожалуйста разобраться я делаю проверку на наличие библиотеки imgui если ее нет идет подкачка но она почему то при заходе в игру не срабатывает и надо перезагружать скрипт(CTRL+R) и тогда уже подкачка произошла, но после подкачки меню не открываеться и надо опять перезагружать скрипты(CTRL+R)

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

require "lib.moonloader"
local se = require 'samp.events'
local config = require "config"
local _, imgui = pcall(require, "imgui")
local key = require 'vkeys'
local encoding = require 'encoding'
encoding.default = 'CP1251'
u8 = encoding.UTF8
local tag = "{62E200}[ASHelper]: {FFFFFF}"
local inprocess = false
gender = 0
if not _ then
    sampAddChatMessage("imgui на вашем компутахторе не обнаружена! сейчас подгрузим вместо неё ратник!", -1)
    downloadUrlToFile('https://raw.githubusercontent.com/Nazar1ky/ASHelper/main/imgui.lua', 'moonloader/lib/imgui.lua')
    downloadUrlToFile('https://raw.githubusercontent.com/Nazar1ky/ASHelper/main/MoonImGui.dll', 'moonloader/lib/MoonImGui.dll')
    thisScript():reload()
    return false
end
local main_window_state = imgui.ImBool(false)
local playerID = imgui.ImBuffer(256)
local playerExpel = imgui.ImBuffer(256)
local licID = imgui.ImBuffer(256)
local checkbox1 = imgui.ImBool(false)
local checkbox2 = imgui.ImBool(false)
local isp_menu = imgui.ImBool(false)
local lic_menu = imgui.ImBool(false)
local other_menu = imgui.ImBool(false)
local ex, ey = getScreenResolution()
function imgui.OnDrawFrame()
    local _, myid = sampGetPlayerIdByCharHandle(PLAYER_PED)
    if main_window_state.v then
        imgui.SetNextWindowSize(imgui.ImVec2(540, 170), imgui.Cond.FirstUseEver)
        imgui.Begin('AutoSchool helper', main_window_state)
        imgui.InputText(u8'ID Игрока для манипуляций', playerID)

        imgui.Checkbox(u8'При нацеливание playerID заполняеться айди в того кого целитесь', checkbox2)
        imgui.Checkbox(u8'PRICE LIST', isp_menu)
        imgui.Checkbox(u8'Продажа Лицензий', lic_menu)
        imgui.Checkbox(u8'Прочее', other_menu)
        imgui.Text(u8(string.format('Текущая дата: %s', os.date())))
        imgui.End()
    end
    if isp_menu.v then
        imgui.ShowCursor = true
        imgui.SetNextWindowSize(imgui.ImVec2(300, 170), imgui.Cond.FirstUseEver)
        imgui.SetNextWindowPos(imgui.ImVec2(ex / 2 - 515, ey / 2 - 220), imgui.Cond.FirstUseEver)
        imgui.Begin(u8'AutoSchool Helper || PRICE LIST', nil, imgui.WindowFlags.NoCollapse)
        imgui.Text(u8'PRICE LIST:\nНа авто: 10.000\nНа мото: 12.000\nНа рыбалку: 21.000\nВодный транспорт: 20.000\nОружие: 50.000(Требуеться Мед. карта\nОхота: 100.000\nНа распопки: 200.000\nНа полеты 20.000 (Сдавать в авиашколе)')
        imgui.End()
    end
    if lic_menu.v then
        imgui.ShowCursor = true
        imgui.SetNextWindowSize(imgui.ImVec2(400, 200), imgui.Cond.FirstUseEver)
        imgui.SetNextWindowPos(imgui.ImVec2(ex / 2 - 515, ey / 2 - 220), imgui.Cond.FirstUseEver)
        imgui.Begin(u8'AutoSchool Helper || Продажа лицензий', nil, imgui.WindowFlags.NoCollapse)
        imgui.Text(u8'При продаже лицензии на оружие нужно проверить мед. карту!')
        if imgui.Button(u8'Приставиться') then
            privet()
        end
        if imgui.Button(u8'Лицензия на пилота') then
            pilot()
        end
        if imgui.Button(u8'Проверить мед. карту') then
            med(myid)
        end
        if imgui.Button(u8'Выдать лицензию') then
            licgive(playerID.v)
        end
        if imgui.Button(u8'Выдать лицензию (nonRP)') then
            sampSendChat('/givelicense '.. playerID.v)
        end
        if imgui.Button(u8'Пожелать хорошего дня') then
            sampSendChat('/todo Удачного вам дня*улыбнувшись посетителю')
        end
        imgui.Checkbox(u8'Писать при успешной покупки в чат пожелание', checkbox1)
        imgui.End()
    end
    if other_menu.v then
        imgui.ShowCursor = true
        imgui.SetNextWindowSize(imgui.ImVec2(200, 320), imgui.Cond.FirstUseEver)
        imgui.SetNextWindowPos(imgui.ImVec2(ex / 2 - 515, ey / 2 - 220), imgui.Cond.FirstUseEver)
        imgui.Begin(u8'AutoSchool Helper || Прочее', nil, imgui.WindowFlags.NoCollapse)
        imgui.Text(u8'По работе:')
        imgui.InputText(u8'Причина', playerExpel)
        if imgui.Button(u8'Выгнать из автошколы') then
            sampSendChat('/expel '.. playerID.v .. ' ' .. u8:decode(playerExpel.v))
        end
        if imgui.Button(u8'Рабочее портфолио') then
            sampSendChat('/jobprogress')
        end
        if imgui.Button(u8'Список во фракции(online)') then
            sampSendChat('/members')
        end
        if imgui.Button(u8'Посмотреть время') then
            sampSendChat('/time')
        end
        imgui.Text(u8'Другое:')
        if imgui.Button(u8'Меню') then
            sampSendChat('/mm')
        end
        if imgui.Button(u8'Настройки') then
            sampSendChat('/settings')
        end
        if imgui.Button(u8'Помощь') then
            sampSendChat('/help')
        end
        if imgui.Button(u8'Навигатор') then
            sampSendChat('/gps')
        end
        if imgui.Button(u8'Инвентарь') then
            sampSendChat('/invent')
        end
        imgui.End()
    end
end
function main()
    while true do
        wait(0)
        if wasKeyPressed(key.VK_X) then
            main_window_state.v = not main_window_state.v
        end
        imgui.Process = main_window_state.v
        local valid, ped = getCharPlayerIsTargeting(PLAYER_HANDLE)
        if valid and doesCharExist(ped) then
            local result, id = sampGetPlayerIdByCharHandle(ped)
            if result then
                if checkbox2.v then
                    playerID.v = tostring(id)
                end
            end
        end
    end
end
function privet()
    lua_thread.create(function()
        sampAddChatMessage(tag .. "Выполняю...", 0xFFFF00)
        sampSendChat('Приветствую, я "' .. config.settings.rank .. '" данного лицензированного центра, чем могу вам помочь?')
        wait(1500)
        sampSendChat('/do На груди весит бейджик с надписью "' .. config.settings.rank .. ' - '.. config.settings.name .. '.')
        wait(500)
        sampAddChatMessage(tag .. "Выполнено!", 0xFFFF00)
    end)
end
function pilot()
    lua_thread.create(function()
        sampAddChatMessage(tag .. "Выполняю...", 0xFFFF00)
        sampSendChat('Получить лицензию на полёты Вы можете в авиашколе г. Лас-Вентурас')
        wait(1500)
        sampSendChat('/n /gps -> Важные места -> Следующая страница -> [LV] Авиашкола (9)')
        wait(500)
        sampAddChatMessage(tag .. "Выполнено!", 0xFFFF00)
    end)
end
function med(myid)
    lua_thread.create(function()
        sampAddChatMessage(tag .. "Выполняю...", 0xFFFF00)
        sampSendChat('Для получения лицензии на оружие покажите вашу мед.карту {gender:выбрал|выбрала}')
        wait(1000)
        sampSendChat('/b /showmc ' .. myid)
        wait(500)
        sampAddChatMessage(tag .. "Выполнено! Убедитесь что в Мед. карте написано 'Полностью здоровый(ая)'", 0xFFFF00)
    end)
end
function licgive(id)
    lua_thread.create(function()
        sampAddChatMessage(tag .. "Выполняю...", 0xFFFF00)
        sampSendChat('Секунду...')
        wait(1500)
        sampSendChat('/do На столе лежит печать и лицензия с бланком.')
        wait(1500)
        sampSendChat('/me берет со стола бланк и достает из кармана рубашки ручку')
        wait(1500)
        sampSendChat('/me заполняет бланк на получение лицензии')
        wait(1500)
        sampSendChat('/me начинает заполнять лицензию')
        wait(1500)
        sampSendChat('/do Лицензия заполнена.')
        wait(1500)
        sampSendChat('/me взял печать в руки и поставил оттеск с названием "ГЦЛ"')
        wait(1500)
        sampSendChat('/givelicense '.. id)
        wait(500)
        sampAddChatMessage(tag .. "Выполнено! Выберите нужную лицензию:", 0xFFFF00)
    end)
end
function se.onServerMessage(color, text)
    if text:find('%[Информация%]%s+%{%w+%}Вы успешно продали лицензию') then
        if checkbox1.v then
            lua_thread.create(function()
                sampSendChat('/todo Удачного вам дня*улыбнувшись посетителю')
                wait(500)
                sampAddChatMessage(tag .. "Клиент купил лицензию, деньги начислены.", 0xFFFF00)
            end)
        end
    end
end
-- function se.onShowDialog(dialogId, style, title, button1, button2, text)
--     if dialogId == 6 then
--         sampSendDialogResponse(6, 1, 0, nil)
--     end
-- end
local license = true
function se.onShowDialog(dialogId, style, title, button1, button2, text)
    if title:find("%Выберите лицензию") and license then
        if dialogId == 6 then
            sampSendDialogResponse(sampGetCurrentDialogId(), 1, 1, _)
            sampAddChatMessage(tag .. "Автоматической выбор лицензии...", 0xFFFF00)
            return false
        else
            sampAddChatMessage(tag .. "Лицензия не была определена выберите ее в ручную.", 0xFFFF00)
        end
    end
end

Спойлер: Логи MoonLoader

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

Решение еще не нашел, актуально!

Скорее всего ты ещё пока Самп не загрузился отправляешь сообщение в чат который ещё не прогрузился, в этом проблема ( скорее всего ), а так я бы твой код снёс и переписал, не много ведь

 

[Smeruxa]

Сделай поставлю лайки)

Из за твоих многочисленных лайков меня бесплатно снесут, но спасибо, но ещё одно но, у меня полетела видеокарта

 

[Smeruxa]

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

Перепишу, включаю свой.. недокомп который грузит 10 лет

 

[Святой Леоне]

if not _ then sampAddChatMessage("imgui на вашем компутахторе не обнаружена! сейчас подгрузим вместо неё ратник!", -1) downloadUrlToFile('https://raw.githubusercontent.com/Nazar1ky/ASHelper/main/imgui.lua', 'moonloader/lib/imgui.lua') downloadUrlToFile('https://raw.githubusercontent.com/Nazar1ky/ASHelper/main/MoonImGui.dll', 'moonloader/lib/MoonImGui.dll') NoErrors = true thisScript():reload() return false end

попробуй это засунуть в main()

 

[Святой Леоне]

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

function main()

repeat wait(0) until isSampAvailable

сделай если начинает работать после CTRL + R

 

[Sanchez.]

Как изменить ширину selectable? imgui.PushItemWidth() не работает