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

Does anyone have a soucer that displays the dialog id?

require("lib.samp.events").onShowDialog = function(id, style, title, button1, button2, text)
    sampAddChatMessage("Dialog ID: "..id, -1)
end

-- Or
require("lib.samp.events").onShowDialog = function(id, style, title, button1, button2, text)
    return {id, style, "[ID: "..id.."] "..title, button1, button2, text}
end

 

[deleted-user-139653]

Does anyone have a soucer that displays the dialog id?

local sampev = require("samp.events")

function sampev.onShowDialog(id, style, title, b1, b2, text)
    print(id)
end

 

[kuboni]

Press y to get object = 3931, does anyone have the option to automatically press the Y button?

 

[deleted-user-139653]

Посмотреть вложение 220271Press y to get object = 3931, does anyone have the option to automatically press the Y button?

не уверен, но должно работать

function main()
    repeat wait(0) until isSampAvailable()
    while true do wait(0)
        for _, v in pairs(getAllObjects()) do
            local _, ox, oy, oz = getObjectCoordinates(v)
            local px, py, pz = getCharCoordinates(PLAYER_PED)
            local model = getObjectModel(v)
            local distance = getDistanceBetweenCoords3d(ox, oy, oz, px, py, pz)
            if model == 3931 and distance < 2 then
                setVirtualKeyDown(89, true)
                wait(100)
                setVirtualKeyDown(89, false)
            end
        end
    end
end

 

[kuboni]

не уверен, но должно работать

function main()
    repeat wait(0) until isSampAvailable()
    while true do wait(0)
        for _, v in pairs(getAllObjects()) do
            local _, ox, oy, oz = getObjectCoordinates(v)
            local px, py, pz = getCharCoordinates(PLAYER_PED)
            local model = getObjectModel(v)
            local distance = getDistanceBetweenCoords3d(ox, oy, oz, px, py, pz)
            if model == 3931 and distance < 2 then
                setVirtualKeyDown(89, true)
                wait(100)
                setVirtualKeyDown(89, false)
            end
        end
    end
end

Can you give me the complete code? Can you also add the library because I just learned a little about lua :(

 

[deleted-user-139653]

Can you give me the complete code? Can you also add the library because I just learned a little about lua :(

for this code don't need any library, only cleo, sampfuncs, moonloader

 

[unknown557]

как узнать текущий виртуальный мир?

 

[tfornik]

как узнать текущий виртуальный мир?

никак, только интерьер.

 

[advancerp]

как сделать такое:

если после подключения к серверу через 3 секунды переменная ~= истина тогда ЭтотCкрипт:выгрузить

 

[Hinаta]

как сделать такое:

если после подключения к серверу через 3 секунды переменная ~= истина тогда ЭтотCкрипт:выгрузить

function main()
 repeat wait(0) until sampIsLocalPlayerConnected() -- по-моему, можно заменить на sampGetGameState() == 3
wait(3000)
 if not (тут переменная) then
  thisScript():unload()
end
end

Как-то так. Не могу быть уверен в правильности, ибо с телефона никак не проверю

 

[TSIDEX]

Как открыть диалоговое окно по его id, если например стандартным способом это окно открывается на чекпоинте?

 

[kuboni]

Can you virtual key while exiting the game tab and it will still work?

не уверен, но должно работать

function main()
    repeat wait(0) until isSampAvailable()
    while true do wait(0)
        for _, v in pairs(getAllObjects()) do
            local _, ox, oy, oz = getObjectCoordinates(v)
            local px, py, pz = getCharCoordinates(PLAYER_PED)
            local model = getObjectModel(v)
            local distance = getDistanceBetweenCoords3d(ox, oy, oz, px, py, pz)
            if model == 3931 and distance < 2 then
                setVirtualKeyDown(89, true)
                wait(100)
                setVirtualKeyDown(89, false)
            end
        end
    end
end

 

[deleted-user-139653]

Can you virtual key while exiting the game tab and it will still work?

если правильно понял, в начало кода

script_properties("work-in-pause")

 

[Evgeniy_orb]

чем больше тем лучше

Но зачем нужен радиус 500 метров.. это считая 1/4 карты.
Ставь от 50 до 150, в твоем случае идеально будет.

 

[monolith04]

У меня есть строка:

Продам скин под биркой 103 Цена догворная.

Мне нужно через регулярные выражения выдернуть оттуда число 103.
Я написал выражение для захвата строки. НО, мне нужно, чтобы если перед цифрой вместо слова "биркой" было другое, например "скин" или "пошив", оно все равно эту строку захватывало, то есть перебирало слова через оператор ИЛИ.

if str:find("%s(биркой|пошив|скин)%s%d+%s") then skin_id = str:match("%s(биркой|пошив|скин)%s(%d+)%s")

Суть проблемы: строку оно не хочет захватывать. Если просто оставить слово "биркой", то все работает. Как мне сделать чтобы при наличии одного из трех слов оно срабатывало?