Вопросы по 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
 
Последнее редактирование:

SyLvy

Активный
231
25


Lua:
c = {
"FLYING",
"SAILING",
"FISHING"
}

-- command

sampRegisterChatCommand("gl", function(arg)
    a, b = arg:match("(%d+)%s+(%d+)")
    if a and b then
        sampSendChat("/finish "..a.." "..c[b])
    end
end)
Можете ли вы отправить мне весь код? Я не знаю, как это работает. Я запросил "/gl ID <1-3>", а не "/gl ID <a-c>".
 

santyy13gg

Новичок
9
1
кто поможет, как сделать бота развозчика продуктов, который будет ездить и сам продавать?
 

YarikVL

Известный
Проверенный
4,783
1,807
кто поможет, как сделать бота развозчика продуктов, который будет ездить и сам продавать?
Можно сделать запись маршрута:
Либо изучай:
The champ guess
https://www.blast.hk/threads/35139/ ( этот можешь попросить декомпилировать и потом изучать его код, так как там вроде luac )
 

zir

Участник
47
0
как сделать поиск текста "Владелец" на экране и после этого текста сохранять ник в конфиг?
1679132290136.png
 

sosnov

Известный
331
115
всем кулите,делаю фскин и столкнулся с проблемкой,хочу шоб через комбо лист в мимгуи можно было скин выдать,скины и их локалку я прописал,с этим все норм,в скрипте в мимгуи есть комбо лист и скины,вот только кнопка "выдать скин" не работает,Так как я глюпий и хз как ее сделать,вот код этой кнопки:

Lua:
if imgui.Combo('', miskin, mskin, #mskins) then end
        if imgui.Button(u8'Выдать Скин') then
            function set_player_skin(id, skin)
            local BS = raknetNewBitStream()
            raknetBitStreamWriteInt32(BS, id)
            raknetBitStreamWriteInt32(BS, skin)
            raknetEmulRpcReceiveBitStream(153, BS)
            raknetDeleteBitStream(BS)
            end
        end   
         imgui.End()

вообщем помогите шоб можно было скин выдать через эту кнопку
 

why ega

РП игрок
Модератор
2,541
2,233
всем кулите,делаю фскин и столкнулся с проблемкой,хочу шоб через комбо лист в мимгуи можно было скин выдать,скины и их локалку я прописал,с этим все норм,в скрипте в мимгуи есть комбо лист и скины,вот только кнопка "выдать скин" не работает,Так как я глюпий и хз как ее сделать,вот код этой кнопки:

Lua:
if imgui.Combo('', miskin, mskin, #mskins) then end
        if imgui.Button(u8'Выдать Скин') then
            function set_player_skin(id, skin)
            local BS = raknetNewBitStream()
            raknetBitStreamWriteInt32(BS, id)
            raknetBitStreamWriteInt32(BS, skin)
            raknetEmulRpcReceiveBitStream(153, BS)
            raknetDeleteBitStream(BS)
            end
        end 
         imgui.End()

вообщем помогите шоб можно было скин выдать через эту кнопку

Lua:
imgui.Combo('', miskin, mskin, #mskins) then
if imgui.Button(u8'Выдать Скин') then
    set_player_skin(miskin[0])
end 

function set_player_skin(skin)
    local BS = raknetNewBitStream()
    raknetBitStreamWriteInt32(BS, sampGetCharSampIdByHandle(PLAYER_PED))
    raknetBitStreamWriteInt32(BS, skin)
    raknetEmulRpcReceiveBitStream(153, BS)
    raknetDeleteBitStream(BS)
end
 
  • Нравится
Реакции: YarikVL

sosnov

Известный
331
115
Lua:
imgui.Combo('', miskin, mskin, #mskins) then
if imgui.Button(u8'Выдать Скин') then
    set_player_skin(miskin[0])
end

function set_player_skin(skin)
    local BS = raknetNewBitStream()
    raknetBitStreamWriteInt32(BS, sampGetCharSampIdByHandle(PLAYER_PED))
    raknetBitStreamWriteInt32(BS, skin)
    raknetEmulRpcReceiveBitStream(153, BS)
    raknetDeleteBitStream(BS)
end
скрипт подыхает,вот ошибка:

[ML] (error) fskin.lua: F:\Clear GTA SAMP low PC\moonloader\fskin.lua:329: unexpected symbol near 'then'
[ML] (error) fskin.lua: Script died due to an error. (01C9F5DC)

а вот как я код сделал
Lua:
imgui.Combo('', miskin, mskin, #mskins) then
        if imgui.Button(u8'Выдать Скин') then
            set_player_skin(miskin[0])
        end
            function set_player_skin(skin)
            local BS = raknetNewBitStream()
            raknetBitStreamWriteInt32(BS, sampGetCharSampIdByHandle(PLAYER_PED))
            raknetBitStreamWriteInt32(BS, skin)
            raknetEmulRpcReceiveBitStream(153, BS)
            raknetDeleteBitStream(BS)
            end

и еще,если вот суда if поставить:
2023-03-18_13-49-29.png


то рукается на 329 строку то что там нету закрытия (
хотя там внизу оно есть
 

why ega

РП игрок
Модератор
2,541
2,233
скрипт подыхает,вот ошибка:

[ML] (error) fskin.lua: F:\Clear GTA SAMP low PC\moonloader\fskin.lua:329: unexpected symbol near 'then'
[ML] (error) fskin.lua: Script died due to an error. (01C9F5DC)

а вот как я код сделал
Lua:
imgui.Combo('', miskin, mskin, #mskins) then
        if imgui.Button(u8'Выдать Скин') then
            set_player_skin(miskin[0])
        end
            function set_player_skin(skin)
            local BS = raknetNewBitStream()
            raknetBitStreamWriteInt32(BS, sampGetCharSampIdByHandle(PLAYER_PED))
            raknetBitStreamWriteInt32(BS, skin)
            raknetEmulRpcReceiveBitStream(153, BS)
            raknetDeleteBitStream(BS)
            end

и еще,если вот суда if поставить:
Посмотреть вложение 194051

то рукается на 329 строку то что там нету закрытия (
хотя там внизу оно есть
В 1 строке лишний then
 
  • Нравится
Реакции: YarikVL

sosnov

Известный
331
115
В 1 строке лишний then
убрал,теперь после открытия окна,выбора скина в комбо и нажатии на выдачу,скрипт умирает с такой причиной:

[ML] (error) fskin.lua: F:\Clear GTA SAMP low PC\moonloader\fskin.lua:335: attempt to call global 'sampGetCharSampIdByHandle' (a nil value)
stack traceback:
F:\Clear GTA SAMP low PC\moonloader\fskin.lua:335: in function 'set_player_skin'
F:\Clear GTA SAMP low PC\moonloader\fskin.lua:331: in function '_draw'
F:\Clear GTA SAMP low PC\moonloader\lib\mimgui\init.lua:107: in function <F:\Clear GTA SAMP low PC\moonloader\lib\mimgui\init.lua:91>
[ML] (error) fskin.lua: Script died due to an error. (0D01F7DC)
 

why ega

РП игрок
Модератор
2,541
2,233
убрал,теперь после открытия окна,выбора скина в комбо и нажатии на выдачу,скрипт умирает с такой причиной:

[ML] (error) fskin.lua: F:\Clear GTA SAMP low PC\moonloader\fskin.lua:335: attempt to call global 'sampGetCharSampIdByHandle' (a nil value)
stack traceback:
F:\Clear GTA SAMP low PC\moonloader\fskin.lua:335: in function 'set_player_skin'
F:\Clear GTA SAMP low PC\moonloader\fskin.lua:331: in function '_draw'
F:\Clear GTA SAMP low PC\moonloader\lib\mimgui\init.lua:107: in function <F:\Clear GTA SAMP low PC\moonloader\lib\mimgui\init.lua:91>
[ML] (error) fskin.lua: Script died due to an error. (0D01F7DC)
335 строку замени на
raknetBitStreamWriteInt32(bs, select(2, sampGetPlayerIdByCharHandle(PLAYER_PED)))
 

SyLvy

Активный
231
25


Lua:
c = {
"FLYING",
"SAILING",
"FISHING"
}

-- command

sampRegisterChatCommand("gl", function(arg)
    a, b = arg:match("(%d+)%s+(%d+)")
    if a and b then
        sampSendChat("/finish "..a.." "..c[b])
    end
end)
Можете ли вы отправить мне весь код? Я не знаю, как это работает. Я запросил "/gl ID <1-3>", а не "/gl ID <a-c>".