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

 

[Dmitriy Makarov]

Как сохранить текст из буффера imgui в конфиг?

local inicfg = require 'inicfg' -- Подключение

-- INI
local mainIni = inicfg.load({
    config = {
        text = ""
    }
}, "cfg.ini")

-- Создание файла
if not doesFileExist('moonloader/config/cfg.ini') then
    inicfg.save(mainIni, 'cfg.ini')
end

local buf = imgui.ImBuffer(mainIni.config.text, 256)

-- OnDrawFrame
if imgui.InputText("Some text", buf) then
    mainIni.config.text = buf.v -- Перезапись текста
    inicfg.save(mainIni, 'cfg.ini') -- Сохранение
end

Я правда не знаю, как там дела будут обстоят с кодировкой. Поэкспериментируй..)

 

[ice_ice]

Суть такая скрипт записывает значения в массив и порой может записать одинаковые как в примере ниже

{"res1":['a']},{"res":["11"]} -- изначальный массив
{"res1":['a','w','q','e']},{"res":["11",'12','11','32']} -- финальный массив

function sampev.onServerMessage(collor, text)
    if string.find(text, 'Хорошо. Вот', 1, true) then
        num, txt = string.match(text, '(%d+)%s.*(%u%a+).*')
        table.insert(inf.res1,txt)
        table.insert(inf.res,num)
        savejs()
    end
end
function savejs()
    local f = io.open(spath, "w")
    f:write(encodeJson(inf))
    f:close()
end

Вопрос: Как удалить эти повторяющиеся значения? Или хотя бы как узнать номер ключа на повторяющемся значении?

Up.

 

[Sanchez.]

Как зарендерить окружность вокруг своего персонажа?

 

[krim]

Как зарендерить окружность вокруг своего персонажа?

че?

 

[Alkoigel]

Не могу догнать, как сделатьсохранение выбранной кнопки, чтобы она не слетала после каждой перезагрузки скрипта

local inicfg = require 'inicfg'
local der = "moonloader\\test.ini"

local maincfg = inicfg.load({
    config = {
        tifloppa = true
    },

    hotkeys = {
        bindText = VK_F3
    },
    mcfg =    {
        day = " ",
        time = " ",
        money = " "
    },
        Style = {
        theme = 0
    }
},'test.ini')
inicfg.save(maincfg, der)

function save()
    inicfg.save(maincfg, "test.ini")
end

local bindtext = imgui.ImBuffer(tostring(maincfg.hotkeys.bindText), 256) -- Делаем переменную для текста кнопки активации скрипта

    if tab.v == 1 then
            for k,v in pairs(hotkeys) do
                if v.edit then
                    local downKey = getDownKeys()
                    maincfg.hotkeys[k] = downKey
                    if downKey == '' then
                        if os.clock() - v.ticked > 0.5 then
                            v.ticked = os.clock()
                            v.tickedState = not v.tickedState
                        end
                        v.name = v.tickedState and "No" or "##isNo "..v.ticked
                    else
                        v.name = vkeys.key_names[maincfg.hotkeys[k]]
                        v.edit = false
                    end
                end
                if imgui.Button(u8(tostring(maincfg.hotkeys[k] == nil and "Отсутствует".."##"..k or v.name.."##"..k)), imgui.ImVec2(110, 0)) then
                    v.edit = true
                end imgui.SameLine() imgui.Text(u8(v.sName))
            end

            imgui.Separator()

        end

 

[Sanchez.]

че?

Бля, что непонятного. Есть персонаж, мне нужно сделать, чтобы вокруг него был круг. Как это сделать?

 

[krim]

Бля, что непонятного. Есть персонаж, мне нужно сделать, чтобы вокруг него был круг. Как это сделать?

Исходник - 3Д круги

credits: MalikMontana Тупо выложил чтобы было, под мун не сложно перевести local function Draw_3D_Circle(x, y, z, radius, r, g, b, a, accuracy) local accuracy = accuracy or 3; local screen_x_line_old, screen_y_line_old; for rot=0, 360,accuracy do local rot_temp =...

www.blast.hk

 

[Sanchez.]

Не могу догнать, как сделатьсохранение выбранной кнопки, чтобы она не слетала после каждой перезагрузки скрипта

local inicfg = require 'inicfg'
local der = "moonloader\\test.ini"

local maincfg = inicfg.load({
    config = {
        tifloppa = true
    },

    hotkeys = {
        bindText = VK_F3
    },
    mcfg =    {
        day = " ",
        time = " ",
        money = " "
    },
        Style = {
        theme = 0
    }
},'test.ini')
inicfg.save(maincfg, der)

function save()
    inicfg.save(maincfg, "test.ini")
end

local bindtext = imgui.ImBuffer(tostring(maincfg.hotkeys.bindText), 256) -- Делаем переменную для текста кнопки активации скрипта

    if tab.v == 1 then
            for k,v in pairs(hotkeys) do
                if v.edit then
                    local downKey = getDownKeys()
                    maincfg.hotkeys[k] = downKey
                    if downKey == '' then
                        if os.clock() - v.ticked > 0.5 then
                            v.ticked = os.clock()
                            v.tickedState = not v.tickedState
                        end
                        v.name = v.tickedState and "No" or "##isNo "..v.ticked
                    else
                        v.name = vkeys.key_names[maincfg.hotkeys[k]]
                        v.edit = false
                    end
                end
                if imgui.Button(u8(tostring(maincfg.hotkeys[k] == nil and "Отсутствует".."##"..k or v.name.."##"..k)), imgui.ImVec2(110, 0)) then
                    v.edit = true
                end imgui.SameLine() imgui.Text(u8(v.sName))
            end

            imgui.Separator()

        end

Так как у тебя имеется функа для сохранения в кфг, то просто пропиши save() в том месте, где тебе нужно сохранить определенные данные

 

[Alkoigel]

Так как у тебя имеется функа для сохранения в кфг, то просто пропиши save() в том месте, где тебе нужно сохранить определенные данные

кнопка слетает обратно на 114 (f3)
Я мудак, я понял где я скосяил :D, Спасибо)

 

[JustFedot]

Доброго времени суток!
Помогите пожалуйста, три дня поисков не дали результатов.
Есть функция sampev.onSetObjectMaterialText(id, data), даёт мне текст.
Мне нужно получать этот же текст, но не при его обновлении, а в реальном времени.
while true do wait(0)
for i=0,2500 do
И сюда вот получать текст объектов....
Это я привёл пример кода. Если есть какой-то вариант, очень прошу помочь.

 

[sep]

кто знает как сделать Отключение активации чата на клавишу T НА ЛУА
это не пашет https://www.blast.hk/threads/56298/ там все работает кроме отключение т

 

[Sanchez.]

Доброго времени суток!
Помогите пожалуйста, три дня поисков не дали результатов.
Есть функция sampev.onSetObjectMaterialText(id, data), даёт мне текст.
Мне нужно получать этот же текст, но не при его обновлении, а в реальном времени.
while true do wait(0)
for i=0,2500 do
И сюда вот получать текст объектов....
Это я привёл пример кода. Если есть какой-то вариант, очень прошу помочь.

while true do
    wait(0)
    for i=0, 2500 do
        if sampIs3dTextDefined(i) then
            text, color, x, y, z, dist, walls, player, veh = sampGet3dTextInfoById(i)
        end
    end
end

кто знает как сделать Отключение активации чата на клавишу T НА ЛУА
это не пашет https://www.blast.hk/threads/56298/ там все работает кроме отключение т

while true do
    wait(0)
    if sampIsChatInputActive() then
        sampSetChatInputEnabled(false)
    end
end

 

[sep]

while true do
    wait(0)
    if sampIsChatInputActive() then
        sampSetChatInputEnabled(false)
    end
end

ты сам понел что написал ?
я просил Отключение активации чата на клавишу T
а ты мне весь чат заблочил ))

 

[Sanchez.]

ты сам понел что написал ?
я просил Отключение активации чата на клавишу T
а ты мне весь чат заблочил ))

тогда вот

if isKeyJustPressed(0x54) and sampIsChatInputActive() then
    sampSetChatInputEnabled(false)
end

 

[JustFedot]

while true do
    wait(0)
    for i=0, 2500 do
        if sampIs3dTextDefined(i) then
            text, color, x, y, z, dist, walls, player, veh = sampGet3dTextInfoById(i)
        end
    end
end

while true do
    wait(0)
    if sampIsChatInputActive() then
        sampSetChatInputEnabled(false)
    end
end

Друг, не 3д текст.