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

percheklii

Известный
730
268
Возможно ли сделать так чтобы не палило ники игроков которые в маске?

Lua:
local NTdist, NTwalls, NTshow = 40, 1, 1

function nameTagOn()
    local pStSet = sampGetServerSettingsPtr()
    memory.setfloat(pStSet + 39, 1488.0)
    memory.setint8(pStSet + 47, 0)
    memory.setint8(pStSet + 56, 1)
end

function nameTagOff()
    local pStSet = sampGetServerSettingsPtr()
    memory.setfloat(pStSet + 39, NTdist)
    memory.setint8(pStSet + 47, NTwalls)
    memory.setint8(pStSet + 56, NTshow)
end
Или же надо рисовать ники через рендер и пропускать через проверку на видимость неймтега?

Lua:
function GetNameTag(ID)
    local StructPtr = sampGetPlayerStructPtr(ID)
    local StructPtr = readMemory(StructPtr, 4, true)
    return getStructElement(StructPtr, 179, 2, false)
end
 

ChromiusJ

PARΛDIGM ΛSS
Друг
4,913
3,201
Scr.lua: ...A\Arizona Games Launcher\bin\arizona\moonloader\scr.lua:20: 'then' expected near '25220'
[00:39:05.419087] (error) scr.lua: Script died due to an error. (1C0E7FC4)
Lua:
local sampev = require('lib.samp.events')
local state = false

function main()
    sampRegisterChatCommand("lovc", function()
        state = not state
        sampAddChatMessage(string.format("Car lovec %s", state and "enabled" or "disabled"), -1)
    end)
    wait(-1)
end

function sampev.onServerMessage(color, text)
    if text:find('%[Информация%] {.-}Поздравляем с приобретением транспортного средства') then     
        state = false
    end
end

function sampev.onShowDialog(dialogId, style, title, button1, button2, text)
    if state then
        if dialogId == 25217 or dialogId == 25220 then
            sampSendDialogResponse(dialogId, 1, 2, nil)
            return false
        end
    end
end
 
  • Нравится
Реакции: Dmitriy Makarov

Oleg1337228

Участник
237
12
Lua:
local sampev = require('lib.samp.events')
local state = false

function main()
    sampRegisterChatCommand("lovc", function()
        state = not state
        sampAddChatMessage(string.format("Car lovec %s", state and "enabled" or "disabled"), -1)
    end)
    wait(-1)
end

function sampev.onServerMessage(color, text)
    if text:find('%[Информация%] {.-}Поздравляем с приобретением транспортного средства') then    
        state = false
    end
end

function sampev.onShowDialog(dialogId, style, title, button1, button2, text)
    if state then
        if dialogId == 25217 or dialogId == 25220 then
            sampSendDialogResponse(dialogId, 1, 2, nil)
            return false
        end
    end
end
Вот писал бы - не бегал бы.) За всё время, что на форуме, думаю, ты смог бы научиться писать скрипты. Хотя бы лёгкие.
Удели время изучению, за месяц, думаю, сможешь научиться писать скриптики.) Тем более, что Lua - очень лёгкий язык.
Все работает спс, очень нужно было чтобы сам отключался
 
  • Нравится
Реакции: Dmitriy Makarov

Milukation

Участник
41
9
Что с текстом?
IMG_20240123_154458.jpg
 
  • Злость
Реакции: qdIbp

ariad

Участник
15
0
Всем дарова, хочу снова осветить свой (бх пользователи тоже помогали) простейший говнокод
Через пот и кровь учу луа, но не могу вывести рендер картинки/текста в потоках
xui:
require('lib.moonloader')


function main()
    if not isSampfuncsLoaded() or not isSampLoaded() then return end
    while not isSampAvailable() do wait(100) end
    sampRegisterChatCommand('docgive', binderdocgive)
    sampRegisterChatCommand('igh', isgivehedoc)
    sampRegisterChatCommand('gmyd', GiveMeYourDoc)
    sampRegisterChatCommand('bpg', pogonya)
    sampRegisterChatCommand('obySk', obysk)
    sampRegisterChatCommand('megafon', megafon)
    sampRegisterChatCommand('bwanted', wanted)
    sampRegisterChatCommand('rozySk', rozysk)
    sampRegisterChatCommand('bhelp', help)
    sampRegisterChatCommand('bticket', ticket)
    sampRegisterChatCommand('br', autotag)
    sampRegisterChatCommand('bcuff', bcuff)
    sampRegisterChatCommand('kpz', bkpz)
    sampRegisterChatCommand('avto', avto)
    sampRegisterChatCommand('avtod', avtod)
    sampRegisterChatCommand('clearchat', clear)
    -сюда бы стоило засунуть но тут бесконечное ожидание
    wait(-1)
end

function isgivehedoc()
    lua_thread.create(function ()
        sampSendChat('Здравия желаю, Лейтенант Антон Печкин!')
        wait(1000)
        sampSendChat('Удостоверение требуется?')
    end)
end

function binderdocgive(binderdocgive)
    lua_thread.create(function()
        sampSendChat('/do Удостоверение в кармане.')
        wait(1000)
        sampSendChat('/me засунул руку, затем резким движением достал удостоверение')
        wait(1000)
        sampSendChat('/do Документы в руке.')
        wait(1000)
        sampSendChat('/me передал документы человеку напротив')
        wait(1000)
        sampSendChat('/doc '..binderdocgive)
        wait(1000)
        sampSendChat('Предъявите документы на транспорт, а также Ваш паспорт')
        wait(1000)
        sampSendChat('Также, расстегните ремень!')
        wait(1000)
        sampSendChat('При попытке уезда, мы имеем право...')
        wait(1000)
        sampSendChat(' ...открыть огонь по колесам вашего Т/С')
    end)
end

function GiveMeYourDoc()
    lua_thread.create(function ()
        sampSendChat('Предъявите, пожалуйста документы')
        wait(1000)
        sampSendChat('А то есть: Паспорт Транспортного Средства и собственный паспорт!')
        wait(1000)
        sampSendChat('Уход от проверки/ареста - открытие огня')
        wait(1000)
        sampSendChat('Согласно статье 8, части 1 УК РФ в таком случае мы имеем Вас арестовать')
    end)
end

function pogonya(pogonyaarg)
    lua_thread.create(function ()
        sampSendChat('/me взял рацию в руки')
        wait(1000)
        sampSendChat('/do Рация в руках.')
        wait(1000)
        sampSendChat('/me сообщил диспетчеру, о погоне за нарушителем')
        wait(1000)
        sampSendChat('Всем постам! Докладывает Лейтенант Печкин, начинаем погоню за жетоном  '..pogonyaarg)
        wait(1000)
        sampSendChat('/pg '..pogonyaarg)
    end)
end

function megafon()
    lua_thread.create(function ()
        sampSendChat('/m [МВД] Водитель, прижмитесь к обочине, остановитесь и заглушите двигатель!')
        wait(1000)
        sampSendChat('/m [МВД] В противном случае мы объявим вас в розыск и откроем огонь!')
        wait(1000)
        sampSendChat('/m [МВД] Только Вы несете ответственность за свою жизнь!')
        wait(1000)
        sampSendChat('/me отпустил кнопку мегафона и зафиксировал его на держателе')
        wait(1000)
        sampSendChat('/do Мегафон на держателе.')
    end)
end

function obysk(obysk)
    lua_thread.create(function ()
        sampSendChat('/do Значок сотрудника МВД на груди.')
        wait(1000)
        sampSendChat('/me достал ордер на обыск из переднего кармана спецодежды')
        wait(1000)
        sampSendChat('/do Ордер в руке.')
        wait(1000)
        sampSendChat('/do На бумаге написано: Ордер на обыск...')
        wait(1000)
        sampSendChat('/do На бумаге написано: ...гражданина.')
        wait(1000)
        sampSendChat('/do На бумаге написано: Причина: Плановая проверка граждан.')
        wait(1000)
        sampSendChat('/me показал его человеку напротив')
        wait(1000)
        sampSendChat('/me провел руками по всем частям тела')
        wait(1000)
        sampSendChat('/me изъял запрещенные предметы у человека напротив')
        wait(1000)
        sampSendChat('/do Запрещенные предметы изъяты. ')
        wait(1000)
        sampSendChat('/search '..obysk)
    end)
end

function wanted(wanted)
    lua_thread.create(function ()
        sampSendChat('/do Темно-матовый КПК "МВД:профи" в правом кармане.')
        wait(1000)
        sampSendChat('/me достал планшет из правого кармана')
        wait(1000)
        sampSendChat('/do Планшет в руках.')
        wait(1000)
        sampSendChat('/me зашел в раздел "База | Записи | AI Face Identify"')
        wait(1000)
        sampSendChat('/do Раздел найден.')
        wait(1000)
        sampSendChat('/me Ввел жетон: '..wanted)
        wait(1000)
        sampSendChat('/do Процесс проверки личности...')
        wait(1000)
        sampSendChat('/do Распознано: Гражданин | Жетон номер '..wanted..'.')
    end)
end

function rozysk(rozysknick)
    lua_thread.create(function()
        sampSendChat('/do Черный планшет "МВД:профи" в правом кармане.')
        wait(1000)
        sampSendChat('/me достал планшет из правого кармана')
        wait(1000)
        sampSendChat('/do Планшет в руках.')
        wait(1000)
        sampSendChat('/me зашел в раздел "База | Розыск"')
        wait(1000)
        sampSendChat('/do Раздел открыт.')
        wait(1000)
        sampSendChat('/me Ввел: '..rozysknick)
        wait(1000)
        sampSendChat('/do Человек в розыске.')
    end)
end

function autotag(tag)
    lua_thread.create(function()
    sampSendChat('/r [Л] '..tag)
    end)
end

function help()
    lua_thread.create(function ()
    sampAddChatMessage('{0000ff}[INFO] {ffffff}Привет! Сейчас тут напишутся все рабочие функции', -1)
    sampAddChatMessage('{0000ff}[INFO] {ffffff}/rozysk - Выдача розыска', -1)
    sampAddChatMessage('{0000ff}[INFO] {ffffff}/bwanted - Фоторобот', -1)
    sampAddChatMessage('{0000ff}[INFO] {ffffff}/megafon - Мегафон', -1)
    sampAddChatMessage('{0000ff}[INFO] {ffffff}/obySk - Выдача ордера и соответственно обыск', -1)
    sampAddChatMessage('{0000ff}[INFO] {ffffff}/bpg - ПГ', -1)
    sampAddChatMessage('{0000ff}[INFO] {ffffff}/gmyd - Просьба предъявить документы', -1)
    sampAddChatMessage('{0000ff}[INFO] {ffffff}/igh - Нужно ли показать документы гражданину', -1)
    sampAddChatMessage('{0000ff}[INFO] {ffffff}/docgive - Показать документы', -1)
    sampAddChatMessage('{0000ff}[INFO] {ffffff}/br - РП рация с автотегом', -1)
    sampAddChatMessage('{0000ff}[INFO] {ffffff}/ticket - Выдача штрафов', -1)
    sampAddChatMessage('{0000ff}[INFO] {ffffff}/avto - Просьба выйти из авто', -1)
    sampAddChatMessage('{0000ff}[INFO] {ffffff}/avtod - Взлом двери', -1)
    sampAddChatMessage('{0000ff}[INFO] {ffffff}/clearchat - Чистка чата', -1)
    end)
end

function ticket (ticketnum)
    lua_thread.create(function ()
        sampSendChat('Сидите в машине, сейчас я выпишу штраф')
        wait(1000)
        sampSendChat('При уезде мы имеем право открыть огонь!')
        wait(1000)
        sampSendChat('/do Готовый лист с надписью "Протокол" и ручка лежат в рюкзаке.')
        wait(1000)
        sampSendChat('/me достал лист и ручку')
        wait(1000)
        sampSendChat('/do Лист и ручка в руке.')
        wait(1000)
        sampSendChat('/me начал записывать протокол: нарушение коАП.')
        wait(1000)
        sampSendChat('/do На листе: Нарушитель носит жетон '..ticketnum)
    end)
end

function bcuff(cuff)
    lua_thread.create(function ()
        sampSendChat('/do Наручники висят на поясе.')
        wait(1000)
        sampSendChat('/me снял наручники с пояса')
        wait(1000)
        sampSendChat('/do Наручники в руках.')
        wait(1000)
        sampSendChat('/me заковал преступника в наручники')
        wait(1000)
        sampSendChat('/cuff '..cuff)
        wait(1000)
        sampSendChat('/do Руки закованы.')
        wait(1000)
        sampSendChat('/me начал вести человека за собой')
        wait(1000)
        sampSendChat('/escort '..cuff)
        wait(1000)
        sampSendChat('/do Подозреваемый идет вслед за сотрудником.')
        wait(1000)
        sampSendChat('!Был пацан, и нет пацана!')
    end)
end

function bkpz(kpz)
    lua_thread.create(function ()
        sampSendChat('/do Человек в авто')
            wait(1000)
            sampSendChat('/me достал преступника из авто')
            wait(1000)
            sampSendChat('/do Преступник вышел из салона.')
            wait(1000)
            sampSendChat('/me открыл в дверь с табличкой "КПЗ"')
            wait(1000)
            sampSendChat('/do Дверь открыта.')
            wait(1000)
            sampSendChat('/me открыв решетку, затащил преступника')
            wait(1000)
            sampSendChat('/do Преступник в КПЗ.')
            wait(1000)
            sampSendChat('/me Закрыл дверь и решетку')
            wait(1000)
            sampSendChat('/do Ограждения закрыты.')
            wait(1000)
            sampSendChat('/arrest '..kpz)
    end)
end
    function avto()
        lua_thread.create(function ()
            sampSendChat('Живо вышел из машины!')
            wait(1000)
            sampSendChat('Согласно поставленным мне правилам...')
            wait(1000)
            sampSendChat(' ..я могу Вас вытащить из авто или применить силу!')
            wait(1000)
            sampSendChat('Если не будете подчиняться, я объявлю Вас... ')
            wait(1000)
            sampSendChat(' ...в розыск согласно статье 8.1 УК РФ!')
        end)
    end
   
    function avtod()
        lua_thread.create(function ()
            sampSendChat('/do Лом в багажнике.')
            wait(1000)
            sampSendChat('/me вытащил лом')
            wait(1000)
            sampSendChat('/do Лом в руках.')
            wait(1000)
            sampSendChat('/me просунул лом к проему')
            wait(1000)
            sampSendChat('/do Процесс...')
            wait(1000)
            sampSendChat('/do Дверь выломана.')
            wait(1000)
            sampSendChat('Работает ОМОН!')
        end)
    end

    function clear()
        lua_thread.create(function ()
            sampAddChatMessage('[CLEAR] Очистка чата...', -1)
            sampAddChatMessage(' ', -1)
            sampAddChatMessage(' ', -1)
            sampAddChatMessage(' ', -1)
            sampAddChatMessage(' ', -1)
            sampAddChatMessage(' ', -1)
            sampAddChatMessage(' ', -1)
            sampAddChatMessage(' ', -1)
            sampAddChatMessage(' ', -1)
            sampAddChatMessage(' ', -1)
            sampAddChatMessage(' ', -1)
            sampAddChatMessage(' ', -1)
            sampAddChatMessage(' ', -1)
            sampAddChatMessage(' ', -1)
            sampAddChatMessage(' ', -1)
        end)
    end
 
Последнее редактирование:
  • Злость
Реакции: qdIbp

7 СМЕРТНЫХ ГРЕХОВ

Известный
515
159
Почему скипает все 215 пакеты ?


LUA:
local bytes = { 2, 0, 0, 0, 0, 0, 16, 0, 0, 0, 79, 110, 68, 105, 97, 108, 111, 103, 82, 101, 115, 112, 111, 110, 115, 101, 8, 0, 0, 0, 100, 0, 0, 0, 0, 100 }
function onReceivePacket(id, bs)
    if id == 215 and skip[0] then
        raknetBitStreamIgnoreBits(bs, 8)
        if raknetBitStreamReadInt16(bs) == 2 then
            raknetBitStreamReadInt32(bs)
            local e = {}
            for i = 1, raknetBitStreamReadInt8(bs) do
                local l = raknetBitStreamReadInt32(bs)
                table.insert(e, raknetBitStreamReadString(bs, l))
            end
            if table.getn(e) > 0 then
                local text = e[1]
                if text:find("text") or ("text") then
                    sendDialogResponse(1,0,'by 7sg')
                    return false
                elseif text:find("text") then
                    local bs = raknetNewBitStream()
                    local bytes = { 2, 0, 0, 0, 0, 0, 16, 0, 0, 0, 79, 110, 68, 105, 97, 108, 111, 103, 82, 101, 115, 112, 111, 110, 115, 101, 8, 0, 0, 0, 100, 0, 0, 0, 0, 100 }
                    raknetBitStreamWriteInt8(bs, 215)
                    for i = 1, #bytes do
                        raknetBitStreamWriteInt8(bs, bytes[i])
                    end
                    raknetBitStreamWriteInt32(bs, 1)
                    raknetBitStreamWriteInt8(bs, 100)
                    raknetBitStreamWriteInt32(bs, 0)
                    raknetBitStreamWriteInt8(bs, 115)
                    raknetBitStreamWriteInt32(bs, 8)
                    raknetSendBitStreamEx(bs, 1, 7, 1)
                    raknetDeleteBitStream(bs)
                end
            end
        end
    end
end

function sendDialogResponse(button, list, text)
    local bs = raknetNewBitStream()
    raknetBitStreamWriteInt8(bs, 215)
    for i = 1, #bytes do
        raknetBitStreamWriteInt8(bs, bytes[i])
    end
    raknetBitStreamWriteInt32(bs, button)
    raknetBitStreamWriteInt8(bs, 100)
    raknetBitStreamWriteInt32(bs, list)
    raknetBitStreamWriteInt8(bs, 115)
    raknetBitStreamWriteInt32(bs, #text)
    raknetBitStreamWriteString(bs, text)
    raknetSendBitStreamEx(bs, 1, 7, 1)
    raknetDeleteBitStream(bs)
end
 
Последнее редактирование:

Ejik_Letchik

Новичок
4
1
Существует ли библиотека lua для работы напрямую с игровыми устройствами, подключёнными к системе? (Джойстик/педали/руль/TrackIR/РУД/...)
 

ChromiusJ

PARΛDIGM ΛSS
Друг
4,913
3,201
Существует ли библиотека lua для работы напрямую с игровыми устройствами, подключёнными к системе? (Джойстик/педали/руль/TrackIR/РУД/...)
ну под капотом есть ffi,наверное с ним можно что то придумать
Например:
 

Dmitriy Makarov

25.05.2021
Проверенный
2,478
1,113
При отправке фейковых координат, функция телепортирует тебя туда и обратно где-то примерно за 1 секунду (или меньше). Можно ли задержаться на координатах на определенное время? А то чекпоинт не успевает появиться за время телепортации и чекпоинт не берётся.
Или можно ли сделать такое через onSendPlayerSync?

UPD: Неактуально.
 
Последнее редактирование:

Freym

Известный
487
203
При отправке фейковых координат, функция телепортирует тебя туда и обратно где-то примерно за 1 секунду (или меньше). Можно ли задержаться на координатах на определенное время? А то чекпоинт не успевает появиться за время телепортации и чекпоинт не берётся.
Или можно ли сделать такое через onSendPlayerSync?

lua:
function sampev.onSendPlayerSync(data)
    return false -- здесь просто делаешь переменную которая будет отвечать за игнор отправки твоей реальной синхры
end       

-- далее просто отправляешь синру в цикле через эмуляцию сколько тебе нужно, после того как тебе больше не нужно отправлять синхру просто офаешь переменную выше
 

Dmitriy Makarov

25.05.2021
Проверенный
2,478
1,113
lua:
function sampev.onSendPlayerSync(data)
    return false -- здесь просто делаешь переменную которая будет отвечать за игнор отправки твоей реальной синхры
end      

-- далее просто отправляешь синру в цикле через эмуляцию сколько тебе нужно, после того как тебе больше не нужно отправлять синхру просто офаешь переменную выше
Не, немного не то. Про то, что ты скинул я уже знаю.)
Даже в таком случае, мне нужен вариант с задержкой на координатах, чтобы чекпоинт успел появиться, ибо он появляется не сразу, а через секунду примерно.
 

Дядя Энрик.

Активный
319
75
подскажите пожалуйста.
В скрипте используется привязка по нику через local nametag = {}, как через эту таблицу можно вывести онлайн ребят в чате?
пишешь допустим /online и выводит всех кто играет со скриптом.
 
  • Грустно
Реакции: qdIbp