Вопросы по 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
 
Последнее редактирование:
  • Нравится
  • Клоун
  • Эм
Реакции: EnScryptior, minxty, RatnikSrb и 41 других
Нажмите для раскрытия...
dinky

dinky

Участник
78
23
как рендерить на экране неполный квадрат(чтобы была только обводка, внутри обводи прозрачное)
 
abnomegd

abnomegd

Известный
358
39
Почему не работает, некоторые функции в диалоге /dialog 5
script: 
require "lib.moonloader"
local color_dialog = 0xDEB887

-- Для диалога с ID 12
local dialogArr = {"История ников", "Добавить в записную книгу", "Показать документы", "Действия", "Имущество"};
local dialogStr = ""

for _, str in ipairs(dialogArr) do
    dialogStr = dialogStr .. str .. "\n"
end

-- Для диалога с ID 13
local dialogArra = {"Паспорт", "Лицензии", "Медкарта", "МедДиплом", "Выписка из тира", "Трудовая книга", "Военный билет", "Повестка в армию", "Отчёт о работе"}
local dialogStra = ""

for _, stra in ipairs(dialogArra) do
    dialogStra = dialogStra .. stra .. "\n"
end

-- Для диалога с ID 14
local dialogArras = {"Дать денег", "Передать металл / патроны / наркотики / маски / аптечки", "Подарить цветы", "Жениться", "Предложить побег", "Поселить к себе", "Дать ключи от авто"};
local dialogStras = ""

for _, stras in ipairs(dialogArras) do
    dialogStras = dialogStras .. stras .. "\n"
end

-- Для диалога с ID 15
local dialogArrasa = {"Продать машину", "Продать дом", "Продать бизнес", "Обмен авто", "Обмен домами", "Обмен бизнесами"};
local dialogStrasa = ""

for _, strasa in ipairs(dialogArrasa) do
    dialogStrasa = dialogStrasa .. strasa .. "\n"
end

function main()
    if not isSampLoaded() or not isSampfuncsLoaded() then return end
    while not isSampAvailable() do wait(100) end
    sampRegisterChatCommand("dialog", cmd_dialog)
    sampAddChatMessage("[HelperARP]: {FFFFFF}Скрипт загружен!", 0x5CBCFF)

    while true do
        wait(0)

        local valid, ped = getCharPlayerIsTargeting(PLAYER_HANDLE)
        if valid and doesCharExist(ped) then
            local result, id = sampGetPlayerIdByCharHandle(ped)
            if result and isKeyJustPressed(VK_X) then
                playerid = id
                cmd_dialog(2)
            end
        end

        local result, button, list, input = sampHasDialogRespond(11)
        if result then
            if button == 1 then
                if list == 0 then
                    sampSendChat("/pay "..tostring(playerid)..' '..input)
                end
            end
        end

        local result, button, list, input = sampHasDialogRespond(12)
        if result then
            if button == 1 then
                if list == 0 then -- "История ников"
                    sampSendChat("/history "..sampGetPlayerNickname(tonumber(playerid)))
                elseif list == 1 then -- "Добавить в записную книгу"
                    sampSendChat("/add "..tostring(playerid))
                elseif list == 2 then -- "Показать документы"
                    cmd_dialog(3)
                elseif list == 3 then -- "Действия"
                    cmd_dialog(4)
                elseif list == 4 then -- "Имущество"
                    cmd_dialog(5)
                end
            end
        end

        local result, button, list, input = sampHasDialogRespond(13)
        if result then
            if button == 1 then
                if list == 0 then -- Паспорт
                    lua_thread.create(function()
                        sampSendChat("/do Папка с документами в руке.")
                        wait(1000)
                        sampSendChat("/me достает из папки паспорт")
                        wait(1000)
                        sampSendChat("/pass "..tostring(playerid))
                    end)
                elseif list == 1 then -- Лицензии
                    lua_thread.create(function()
                        sampSendChat("/do Папка с документами в руке.")
                        wait(1000)
                        sampSendChat("/me достает из папки лицензии")
                        wait(1000)
                        sampSendChat("/lic "..tostring(playerid))
                    end)
                elseif list == 2 then -- Медкарта
                    lua_thread.create(function()
                        sampSendChat("/do Папка с документами в руке.")
                        wait(1000)
                        sampSendChat("/me достает из папки медицинскую карту")
                        wait(1000)
                        sampSendChat("/me показывает медицинскую карту человеку напротив")
                        wait(1000)
                        sampSendChat("/med "..tostring(playerid))
                    end)
                elseif list == 3 then -- МедДиплом
                    lua_thread.create(function()
                        sampSendChat("/do Папка с документами в руке.")
                        wait(1000)
                        sampSendChat("/me достает из папки медицинский диплом")
                        wait(1000)
                        sampSendChat("/me показывает медицинский диплом человеку напротив")
                    end)
                elseif list == 4 then -- Выписка из тира
                    lua_thread.create(function()
                        sampSendChat("/do Папка с документами в руке.")
                        wait(1000)
                        sampSendChat("/me достает из папки выписку из тира")
                        wait(1000)
                        sampSendChat("/skill "..tostring(playerid))
                    end)
                elseif list == 5 then -- Трудовая книга
                    lua_thread.create(function()
                        sampSendChat("/do Папка с документами в руке.")
                        wait(1000)
                        sampSendChat("/me достает из папки трудовую книгу")
                        wait(1000)
                        sampSendChat("/wbook "..tostring(playerid))
                    end)
                elseif list == 6 then -- Военный билет
                    lua_thread.create(function()
                        sampSendChat("/do Папка с документами в руке.")
                        wait(1000)
                        sampSendChat("/me достает из папки военный билет")
                        wait(1000)
                        sampSendChat("/me показывает военный билет человеку напротив")
                    end)
                elseif list == 7 then -- Повестка в армию
                    lua_thread.create(function()
                        sampSendChat("/do Папка с документами в руке.")
                        wait(1000)
                        sampSendChat("/me достает из папки повестку")
                        wait(1000)
                        sampSendChat("/me показывает повестку в армию человеку напротив")
                    end)
                elseif list == 8 then -- Отчёт о работе
                    lua_thread.create(function()
                        sampSendChat("/do Папка с документами в руке.")
                        wait(1000)
                        sampSendChat("/me достает из папки отчёт о выполненой работе")
                        wait(1000)
                        sampSendChat("/team "..tostring(playerid))
                    end)
                end
            else
            end
        end

        local result, button, list, input = sampHasDialogRespond(14)
        if result then
            if button == 1 then
                if list == 0 then -- Дать денег
                    cmd_dialog(1)
                elseif list == 1 then -- Передать
                    sampSendChat("/give "..tostring(playerid))
                elseif list == 2 then -- Подарить цветы
                    lua_thread.create(function()
                        sampSendChat("В знак моего внимания к Вам,")
                        wait(1000)
                        sampSendChat("Прошу принять этот подарок")
                        wait(1000)
                        sampSendChat("/do Букет цветов в руках.")
                        wait(1000)
                        sampSendChat("/me передает букет в руки")
                        wait(1000)
                        sampSendChat("/present "..tostring(playerid))
                    end)
                elseif list == 3 then -- Жениться на
                    sampSendChat("/wedding "..tostring(playerid))
                elseif list == 4 then -- Предложить побег
                    sampSendChat("/jailbreak "..tostring(playerid))
                elseif list == 5 then -- Поселить к себе
                    sampSendChat("/live "..tostring(playerid))
                elseif list == 6 then -- Дать ключи от авто
                    sampSendChat("/allow "..tostring(playerid))
                end
            else
            end
        end

        local result, button, list, input = sampHasDialogRespond(15)
        if result then
            if button == 1 then
                if list == 0 then -- Продать авто
                    cmd_dialog(6)
                elseif list == 1 then -- Передать дом
                    cmd_dialog(7)
                elseif list == 2 then -- Подарить бизнес
                    cmd_dialog(8)
                elseif list == 3 then -- Обмен авто
                    cmd_dialog(9)
                elseif list == 4 then -- Обмен домами
                    cmd_dialog(10)
                elseif list == 5 then -- Обмен бизнесами
                    cmd_dialog(11)
                end
            else
            end
        end

        local result, button, list, input = sampHasDialogRespond(16)
        if result then
            if button == 1 then
                if list == 0 then
                    sampSendChat("/sellmycar "..tostring(playerid).." "..input)
                end
            end
        end

        local result, button, list, input = sampHasDialogRespond(17)
        if result then
            if button == 1 then
                if list == 0 then
                    sampSendChat("/sellmyhome "..tostring(playerid).." "..input)
                end
            end
        end

        local result, button, list, input = sampHasDialogRespond(18)
        if result then
            if button == 1 then
                if list == 0 then
                    sampSendChat("/sellmybiz "..tostring(playerid).." "..input)
                end
            end
        end

        local result, button, list, input = sampHasDialogRespond(19)
        if result then
            if button == 1 then
                if list == 0 then
                    sampSendChat("/changecar "..tostring(playerid).." "..input)
                end
            end
        end

        local result, button, list, input = sampHasDialogRespond(20)
        if result then
            if button == 1 then
                if list == 0 then
                    sampSendChat("/changehome "..tostring(playerid).." "..input)
                end
            end
        end

        local result, button, list, input = sampHasDialogRespond(21)
        if result then
            if button == 1 then
                if list == 0 then
                    sampSendChat("/changebiz "..tostring(playerid).." "..input)
                end
            end
        end
    end
end

function cmd_dialog(arg)
    if tonumber(arg) == 1 then
        sampShowDialog(11, "{00ff00}Дать денег", "", "Дать", "Не дать", 1)
    elseif tonumber(arg) == 2 then
        sampShowDialog(12, "{00ff00}Меню взаимодействия с игроком", dialogStr, "Выбрать", "Закрыть", 2)
    elseif tonumber(arg) == 3 then
        sampShowDialog(13, "{00ff00}Показать документы", dialogStra, "Выбрать", "Закрыть", 2)
    elseif tonumber(arg) == 4 then
        sampShowDialog(14, "{00ff00}Действия", dialogStras, "Выбрать", "Закрыть", 2)
    elseif tonumber(arg) == 5 then
        sampShowDialog(15, "{00ff00}Имущество", dialogStrasa, "Выбрать", "Закрыть", 2)
    elseif tonumber(arg) == 6 then
        sampShowDialog(16, "{00ff00}Продать авто", "Введите цену машины.", "Выбрать", "Закрыть", 1)   
    elseif tonumber(arg) == 7 then
        sampShowDialog(17, "{00ff00}Продать дом", "Введите цену дома.", "Выбрать", "Закрыть", 1)   
    elseif tonumber(arg) == 8 then
        sampShowDialog(18, "{00ff00}Продать бизнес", "Введите цену бизнеса.", "Выбрать", "Закрыть", 1)
    elseif tonumber(arg) == 9 then
        sampShowDialog(19, "{00ff00}Обмен авто", "Введите столько сколько должен доплатить человек напротив.", "Выбрать", "Закрыть", 1)     
    elseif tonumber(arg) == 10 then
        sampShowDialog(20, "{00ff00}Обмен домами", "Введите столько сколько должен доплатить человек напротив.", "Выбрать", "Закрыть", 1)
    elseif tonumber(arg) == 11 then
        sampShowDialog(21, "{00ff00}Обмен бизнесами", "Введите столько сколько должен доплатить человек напротив.", "Выбрать", "Закрыть", 1)
    end
end
 
Fluffy1560

Fluffy1560

Активный
279
37
Господа, подскажите как сделать из этого нормальный цикл который будет делаться определенное количество раз
Lua: 
function onSetSkin(playerId, SkinId) -- если поставлен скин рабочего то запускаем цикл тп по чекпоинтам(вот он и не работает)
  local botid = getBotId()
  if (playerId == botid) and (SkinId == 16) then
   defCallAdd(5000, false, function()
     local x = getCheckx()
     local y = getChecky()
     local z = getCheckz()
     coordMasterStart(x, y, z)
     for i = 1, 10 do
     function onCoordMasterComplete()
       local x = getCheckx()
       local y = getChecky()
       local z = getCheckz()
       i = i - 1
       printLog("Done: "..i)
       coordMasterStart(x, y, z)
end
end
end)
end
end
 
Sanchez.

Sanchez.

Известный
704
190
Fluffy1560 написал(а):
Господа, подскажите как сделать из этого нормальный цикл который будет делаться определенное количество раз
Lua: 
function onSetSkin(playerId, SkinId) -- если поставлен скин рабочего то запускаем цикл тп по чекпоинтам(вот он и не работает)
  local botid = getBotId()
  if (playerId == botid) and (SkinId == 16) then
   defCallAdd(5000, false, function()
     local x = getCheckx()
     local y = getChecky()
     local z = getCheckz()
     coordMasterStart(x, y, z)
     for i = 1, 10 do
     function onCoordMasterComplete()
       local x = getCheckx()
       local y = getChecky()
       local z = getCheckz()
       i = i - 1
       printLog("Done: "..i)
       coordMasterStart(x, y, z)
end
end
end)
end
end
Нажмите для раскрытия...
Можно сделать циклом repeat
Lua: 
repeat
    --code
until act ~= false
Это пример если что. Это будет повторяться, пока act не будет false
 
R

romacaddy

Известный
Проверенный
237
203
kaifa написал(а):
ссылку можешь дать?
Нажмите для раскрытия...
www.blast.hk

Информация - Гайд - Эмуляция RPC, заполнение BitStream для кипятильников

Всем салам, в этой "статье" я попытаюсь объяснить как эмулировать получение RPC, а так же как "заполнить" битстрим. Для начала нам необходимо найти айди и содержимое RPC, получение которого мы будем эмулировать. Для этого перейдем по этой ссылке. Лично я выберу RPC 153 (установка скина игроку)...
www.blast.hk www.blast.hk
 
SamperJostkiy

SamperJostkiy

Участник
172
19
SamperJostkiy написал(а):
Верхний код |

Кхмм, прошу прощения, не то скинул, вот теперь правильный код:
code: 
require "lib.moonloader"
local hook = require 'samp.events'
local work = true

function main()
    sampRegisterChatCommand("Leader", function()
        work = not work
        sampAddChatMessage("Авто взятие лидерки: "..(work and "Включено" or "Выключено"), -1)
    end)
    wait(-1)
end

function hook.onServerMessage(color,text)
    if not sampIsCursorActive() and work and text:find('%{42AAFF%}Вы лидируете по убийствам среди членов банды, желаете стать лидером банды?') then
        lua_thread.create(function()
            wait(1000)
            sampAddChatMessage("Ооo тебе предлагают стать лидером, я сам это сделаю!!!", 0xFF004D)
            setVirtualKeyDown(89, true)
            wait(250)
            setVirtualKeyDown(89, false)
        end)
    end
end

и ошибка в SF консоли:
[ML] (error) Auto Leader.lua: cannot resume non-suspended coroutine
stack traceback:
[C]: in function 'setVirtualKeyDown'
E:\NoRead\MyGTA\moonloader\Auto Leader.lua:18: in function <E:\DaVid\MyGTA\moonloader\Auto Leader.lua:15>
[ML] (error) Auto Leader.lua: Script died due to an error. (01D5E38C)

Все библиотеки, у меня есть
Нажмите для раскрытия...
ап
 
Fluffy1560

Fluffy1560

Активный
279
37
Как добавить к команде параметр?
Тип хочу чтоб если ввел !adm Denis_Sevens он printLog("Администратор ".. admin)
Администратор Denis_Sevens
 
wulfandr

wulfandr

Известный
635
259
Fluffy1560 написал(а):
Как добавить к команде параметр?
Тип хочу чтоб если ввел !adm Denis_Sevens он printLog("Администратор ".. admin)
Администратор Denis_Sevens
Нажмите для раскрытия...
Lua: 
function main()
    sampRegisterChatCommand("adm", function(pam)
        if #pam ~= 0 then
            sampAddChatMessage("Администратор "..pam, -1)
        else
            sampAddChatMessage('/adm [nick]', -1)
        end
    end)
    wait(-1)
end
 
kizn

kizn

q(≧▽≦q)
Всефорумный модератор
2,411
2,139
Fluffy1560 написал(а):
Как добавить к команде параметр?
Тип хочу чтоб если ввел !adm Denis_Sevens он printLog("Администратор ".. admin)
Администратор Denis_Sevens
Нажмите для раскрытия...
если ты про ракбот, то
Lua: 
function onRunCommand(cmd)
    if cmd:match('!adm%s+(.+)') then
        local nickname = cmd:match('!adm%s+(.+)')
        printLog('Администратор '..nickname)
        return true
    end
end
 
Kuharz

Kuharz

Известный
407
158
Такой вопрос, допустим у меня есть бот, который бежит к определенной точке, но на его пути есть объекты с коллизией. Можно ли как-то сделать, чтобы бот определял эти объекты и обходил их?
 
[w0te]

[w0te]

Известный
819
543
Kuharz написал(а):
Такой вопрос, допустим у меня есть бот, который бежит к определенной точке, но на его пути есть объекты с коллизией. Можно ли как-то сделать, чтобы бот определял эти объекты и обходил их?
Нажмите для раскрытия...
перед преградой обьектом с эмулируй клавишу прыжка - emulatekey,
 
Последнее редактирование:
  • Ха-ха
Реакции: Kuharz
Стэнфорд

Стэнфорд

Потрачен
1,033
537
Обратите внимание, пользователь заблокирован на форуме. Не рекомендуется проводить сделки.
Как найти в слове нужные символы? Например букву "а". А в случае если буква найдена - заменить ее на "о"
 
Войдите или зарегистрируйтесь для ответа.

Similar threads

  1. AnWu
    • Закреплено
    Информация Ответы на часто задаваемые вопросы [FAQ]
      • Нравится
      • Влюблен
    Ответы
    26
    Просмотры
    22K
    Lua
    вайега52
    вайега52
  2. Smeruxa
    Вопросы по Lua скриптингу
      • Клоун
    Ответы
    1
    Просмотры
    454
    Общение
    chromiusj
    chromiusj
  3. W
    • Решено
    Не работает у меня downloadUrlToFile
    Ответы
    6
    Просмотры
    2K
    Вопросы
    wintreist
    W
  4. Frapsy
    • Опрос
    Исходник Полноценный исходник фракционного(МО) скрипта ARP
      • Нравится
    Ответы
    74
    Просмотры
    42K
    Lua
    Frapsy
    Frapsy
  5. Taisheika
    • Вопрос
    Вопросы по Lua скриптингу
    Ответы
    2
    Просмотры
    1K
    Помощь
    Vintik
    Vintik
Сверху Снизу