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

Dmitriy Makarov

25.05.2021
Проверенный
2,505
1,134
Ну, в прямом.. В VS Code это в правом нижнем углу вот так. Не знаю, где ты код пишешь, поэтому не могу сказать, где проверить.
1705873582413.png
 

Oleg1337228

Участник
337
15
Ну, в прямом.. В VS Code это в правом нижнем углу вот так. Не знаю, где ты код пишешь, поэтому не могу сказать, где проверить.
Посмотреть вложение 229658
Это не мой код, мне чел сделал в теме но не работает отключение скрипта после этого сообщения
 

Dmitriy Makarov

25.05.2021
Проверенный
2,505
1,134
Это не мой код, мне чел сделал но не работает
Ну я поэтому и спрашиваю по поводу кодировки, может поэтому и не работает. Вдруг там UTF-8 кодировка стоит? С ним же текст на русском никак не дружит. Нужно поставить Windows-1251 и переписать текст на русском, так как после перевода с UTF-8 на Windows-1251, вместо текста на русском будут иероглифы.
 

Oleg1337228

Участник
337
15
Ну я поэтому и спрашиваю по поводу кодировки, может поэтому и не работает. Вдруг там UTF-8 кодировка стоит? С ним же текст на русском никак не дружит. Нужно поставить Windows-1251 и переписать текст на русском, так как после перевода с UTF-8 на Windows-1251, вместо текста на русском будут иероглифы.
Сделай пж я ток по форуму багаю прошу сделать, а сам не пишу
 

Dmitriy Makarov

25.05.2021
Проверенный
2,505
1,134
Сделай пж я ток по форуму багаю прошу сделать, а сам не пишу
Вот писал бы - не бегал бы.) За всё время, что на форуме, думаю, ты смог бы научиться писать скрипты. Хотя бы лёгкие.
Удели время изучению, за месяц, думаю, сможешь научиться писать скриптики.) Тем более, что Lua - очень лёгкий язык.
 

Вложения

  • scr.lua
    733 байт · Просмотры: 3

Oleg1337228

Участник
337
15
Вот писал бы - не бегал бы.) За всё время, что на форуме, думаю, ты смог бы научиться писать скрипты. Хотя бы лёгкие.
Удели время изучению, за месяц, думаю, сможешь научиться писать скриптики.) Тем более, что Lua - очень лёгкий язык.
Спасибо за совет друг, мне как-то лень начинать было, посмотрю.
 
D

deleted-user-139653

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

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

Известный
Модератор
5,656
3,959
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

Участник
337
15
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

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