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

 

[deleted-user-139653]

Здраствуйте, как правильно сделать функцию при которой в 30 минут в чат выведется текст "ON", а уже в 31 минуту выведет "OFF"
И чтобы выводило в чат только один раз, а не несколько

function main()
    repeat wait(0) until isSampAvailable()

    while true do wait(0)
        local min = tonumber(os.date("%M"))
        if min == 30 then
            sampAddChatMessage("ON", -1)
            return
        elseif min == 31 then
            sampAddChatMessage("OFF", -1)
            return
        end
    end
end

 

[MrDorlik]

function main()
    repeat wait(0) until isSampAvailable()

    while true do wait(0)
        local min = tonumber(os.date("%M"))
        if min == 30 then
            sampAddChatMessage("ON", -1)
            return
        elseif min == 31 then
            sampAddChatMessage("OFF", -1)
            return
        end
    end
end

у тебя из цикла выйдет когда 30 минута будет, условие на 31 минуту не сработает никогда

 

[deleted-user-139653]

это же каждый кадр будет спамить ON в чат, надо булевую переменную добавить и сравнивать
А не, у тебя из цикла выйдет когда 30 минута будет, условие на 31 минуту не сработает никогда

ну тогда такое говно

function main()
    repeat wait(0) until isSampAvailable()

    while true do wait(0)
        local min = tonumber(os.date("%M"))
        if min == 30 then
            if not xz then
                sampAddChatMessage("ON", -1)
                xz = true
            end
        elseif xz then
            xz = false
        end

        if min == 31 then
            if not xz2 then
                sampAddChatMessage("OFF", -1)
                xz2 = true
            end
        elseif xz2 then
            xz2 = false
        end
    end
end

 

[MLycoris]

ну тогда такое говно

function main()
    repeat wait(0) until isSampAvailable()

    while true do wait(0)
        local min = tonumber(os.date("%M"))
        if min == 30 then
            if not xz then
                sampAddChatMessage("ON", -1)
                xz = true
            end
        elseif xz then
            xz = false
        end

        if min == 31 then
            if not xz2 then
                sampAddChatMessage("OFF", -1)
                xz2 = true
            end
        elseif xz2 then
            xz2 = false
        end
    end
end

а чем тебя такой вариант не возбуждает

function main()
    while true do wait(0)
        if os.date('%M') == '30' then
            sampAddChatMessage('ON', -1)
            wait(60000)
            sampAddChatMessage('OFF', -1)
        end
    end
end

 

[CaJlaT]

а чем тебя такой вариант не возбуждает

function main()
    while true do wait(0)
        if os.date('%M') == '30' then
            sampAddChatMessage('ON', -1)
            wait(60000)
            sampAddChatMessage('OFF', -1)
        end
    end
end

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

function main()
    repeat wait(0) until isSampAvailable()
    local act = false
    while true do wait(0)
        if os.date('%M') == 30 and not act then
            sampAddChatMessage('ON', -1)
            act = true
        elseif os.date('%M') ~= 30 and act then
            sampAddChatMessage('OFF', -1)
            act = false
        end
    end
end

 

[Rice.]

а чем тебя такой вариант не возбуждает

function main()
    while true do wait(0)
        if os.date('%M') == '30' then
            sampAddChatMessage('ON', -1)
            wait(60000)
            sampAddChatMessage('OFF', -1)
        end
    end
end

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

потому что это кринж

 

[Rice.]

Здраствуйте, как правильно сделать функцию при которой в 30 минут в чат выведется текст "ON", а уже в 31 минуту выведет "OFF"
И чтобы выводило в чат только один раз, а не несколько

function main()
    lua_thread.create(checkingMinuteChanges)
    wait(-1)
end

function checkingMinuteChanges()
    local currentTime = -1
    while true do wait(0)
        local minutes = tonumber(os.date('%M'))
        if currentTime ~= minutes then
            changeTime(minutes)
            currentTime = minutes
        end
    end
end

function changeTime(minutes)
    if minutes == 30 then
        sampAddChatMessage('on', -1)
    elseif minutes == 31 then
        sampAddChatMessage('off', -1)
    end
end

 

[kuboni]

Can anyone help me decompile it? It has the effect of driving according to points, so I need it to rework auto farming a bit

 

[minxty]

проблему я нашел, была в самом имени шрифта, имя шрифта я менял через InputText в mimgui окне, но даже добавления
u8:decode(ffi.string(font)) не помогло, когда меняю размер/флаг то текст в inputtext стает каракулями, но даже флаг/размер не меняется

актуально

 

[deleted-user-139653]

актуально

local ffi = require("ffi")
local imgui = require("mimgui")
local inicfg = require("inicfg")
local ini = inicfg.load({
    set = {
        fontname = "Arial",
        fontsize = 9,
        fontflag = 13,
    }
}, "test")

local window = imgui.new.bool()
local imgui_fontname = imgui.new.char[128](ini.set.fontname)
local imgui_fontsize = imgui.new.int(ini.set.fontsize)
local imgui_fontflag = imgui.new.int(ini.set.fontflag)
local font = renderCreateFont(ini.set.fontname, ini.set.fontsize, ini.set.fontflag)

function main()
    repeat wait(0) until isSampAvailable()

    sampRegisterChatCommand("test", function()
        window[0] = not window[0]
    end)

    while true do wait(0)
        renderFontDrawText(font, "test", 500, 500, -1)
    end
end

imgui.OnInitialize(function()
    imgui.GetIO().IniFilename = nil
end)

imgui.OnFrame(function() return window[0] end, function(player)
    local sw, sh = getScreenResolution()
    imgui.SetNextWindowPos(imgui.ImVec2(sw / 2, sh / 2), imgui.Cond.FirstUseEver, imgui.ImVec2(0.5, 0.5))
    imgui.Begin("test", window, imgui.WindowFlags.NoCollapse + imgui.WindowFlags.AlwaysAutoResize)

    imgui.PushItemWidth(130)

    if imgui.InputText("FontName", imgui_fontname, 128) then
        ini.set.fontname = ffi.string(imgui_fontname)
        font = renderCreateFont(ini.set.fontname, ini.set.fontsize, ini.set.fontflag)
        inicfg.save(ini, "test")
    end

    if imgui.InputInt("FontSize", imgui_fontsize) then
        ini.set.fontsize = imgui_fontsize[0]
        font = renderCreateFont(ini.set.fontname, ini.set.fontsize, ini.set.fontflag)
        inicfg.save(ini, "test")
    end

    if imgui.InputInt("FontFlag", imgui_fontflag) then
        ini.set.fontflag = imgui_fontflag[0]
        font = renderCreateFont(ini.set.fontname, ini.set.fontsize, ini.set.fontflag)
        inicfg.save(ini, "test")
    end

    imgui.PopItemWidth()
    imgui.End()
end)

Допустим там если русский язык в название шрифта, хотя такой не встречал, то надо уже через u8

local encoding = require("encoding")
encoding.default = ("CP1251")
local u8 = encoding.UTF8

-- при чтение
local imgui_fontname = imgui.new.char[128](u8(ini.set.fontname))

--при сохранение
ini.set.fontname = u8:decode(ffi.string(imgui_fontname))

 

[egorikbebenov]

Как можно записать маршрут для раксампа с поезда?

 

[Skreet]

Как можно отследить иконку VIP / Admin / Коронка лидера / оглушение над игроком на Arizona RP?

Актуально

 

[dmitry.karle]

как отправить sampAddChatMessage 1 раз в чат? А-то он видит текст и флудит

ap , на экран выводится временный textdraw, текстдрав идёт через

if sampTextdrawIsExists() then
    text = sampTextdrawGetString()
    if text:find('(.+) ID (%d) (.+) x(%d)') then
                wplayer, wid, warning, n = text:match('(.+) ID (%d (.+) x(%d)') 
                if tonumber(n) == 1 then
                    sampAddChatMessage('WARNING: '..wplayer..' ID '..wid.. ' Категория: '..warning..' x '..n, MSG_COLOR['RED'])
                end
            end
end

после вывода textdraw'a на экран начинается флуд в чате (пока он на экране, пропадает с экрана и всё нормально), как сделать что бы отобразило 1 раз через sampAddChatMessage?
У текстдрава имеется количество, x1 x2 x3 и тд. что бы один раз вывело х1, x2 и х3

 

[MrDorlik]

ap , на экран выводится временный textdraw, текстдрав идёт через

if sampTextdrawIsExists() then
    text = sampTextdrawGetString()
    if text:find('(.+) ID (%d) (.+) x(%d)') then
                wplayer, wid, warning, n = text:match('(.+) ID (%d (.+) x(%d)')
                if tonumber(n) == 1 then
                    sampAddChatMessage('WARNING: '..wplayer..' ID '..wid.. ' Категория: '..warning..' x '..n, MSG_COLOR['RED'])
                end
            end
end

после вывода textdraw'a на экран начинается флуд в чате (пока он на экране, пропадает с экрана и всё нормально), как сделать что бы отобразило 1 раз через sampAddChatMessage?
У текстдрава имеется количество, x1 x2 x3 и тд. что бы один раз вывело х1, x2 и х3

samp = require('samp.events')
function samp.onShowTextDraw(id, data)
    text = data.text
    --code
end

 

[egorikbebenov]

Как можно записать маршрут для раксампа с поезда?