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

 

[tr0dy_]

когда я пишу перед русским текстом просто u8"text" чтобы не было иероглифов оно не работает а когда пишу u8:decode(text) просто пропадает текст, как исправить?

 

[Lolikas]

когда я пишу перед русским текстом просто u8"text" чтобы не было иероглифов оно не работает а когда пишу u8:decode(text) просто пропадает текст, как исправить?

попробуй

encoding.default = "CP1251"
u8 = encoding.UTF8

 

[Viem]

Нашел такой мини чит подсказка для кладоменов и на аризоне чтоб взломать клад тебе дают вопрос и ты должен ответить

И вопрос как в диалог он добавил свой текст?

если что тема с читом: https://www.blast.hk/threads/84183/
смотрел код ничего не понял

function SE.onShowDialog(c1,c2,c3,c4,c5,text)

     if c1 == Нужный_ид then
           local edit_text = text:gsub('Введите ответ в пустое', '\n\n{FF0000}Возможный ответ '..otvet..'\n\nВведите ответ в пустое')
            return {c1,c2,c3,c4,c5,edit_text}
     end 

end

 

[Viem]

а типо я редактирую полностью весь текст? P.s принял понял

Да, либо напиши новый) Взяв вопрос в регулярку.

 

[Sanchez.]

Почему у меня не рисуется линия к пикапу?
И я не могу нормально определить айди этого пикапа, чтобы нарисовать ему линию.
Поправьте пожалуйста код, я совсем запутался...

require 'lib.moonloader'

local hook = require 'lib.samp.events'

local line = false

function main()
    if not isSampLoaded() or not isSampfuncsLoaded() then return end
    while not isSampAvailable() do wait(100) end

    while true do
        wait(0)
        if line == true then
            mx, my, mz = getCharCoordinates(PLAYER_PED)

            wposX1, wposY1 = convert3DCoordsToScreen(x, y, z)
            wposX2, wposY2 = convert3DCoordsToScreen(mx, my, mz)

            renderDrawLine(wposX2, wposY2, wposX1, wposY1, 3, 0xFFFF0000)
            renderDrawLine(wposX2, wposY2, wposX1, wposY1, 3, 0xFFFF0000)
        end
    end
end

function hook.onCreatePickup(id, model, type, position)
    print('id: ' .. id .. ' model: ' .. model .. ' type: ' .. type)

    position.x, position.y, position.z = x, y, z

    if id == 191 --[[точно не знаю какой айди]] then
        line = true
    end[ATTACH type="full"]107515[/ATTACH]
end

p.s Линия начала рисоваться, только конец линии не привязан к пикапу

 

[Мира]

как запретить выход с т/с на ENTER?
не понимаю как использовать onWindowMessage

 

[meowprd]

Посмотреть вложение 107514Почему у меня не рисуется линия к пикапу?
И я не могу нормально определить айди этого пикапа, чтобы нарисовать ему линию.
Поправьте пожалуйста код, я совсем запутался...

require 'lib.moonloader'

local hook = require 'lib.samp.events'

local line = false

function main()
    if not isSampLoaded() or not isSampfuncsLoaded() then return end
    while not isSampAvailable() do wait(100) end

    while true do
        wait(0)
        if line == true then
            mx, my, mz = getCharCoordinates(PLAYER_PED)

            wposX1, wposY1 = convert3DCoordsToScreen(x, y, z)
            wposX2, wposY2 = convert3DCoordsToScreen(mx, my, mz)

            renderDrawLine(wposX2, wposY2, wposX1, wposY1, 3, 0xFFFF0000)
            renderDrawLine(wposX2, wposY2, wposX1, wposY1, 3, 0xFFFF0000)
        end
    end
end

function hook.onCreatePickup(id, model, type, position)
    print('id: ' .. id .. ' model: ' .. model .. ' type: ' .. type)

    position.x, position.y, position.z = x, y, z

    if id == 191 --[[точно не знаю какой айди]] then
        line = true
    end[ATTACH type="full"]107515[/ATTACH]
end

p.s Линия начала рисоваться, только конец линии не привязан к пикапу

require 'lib.moonloader'

local hook = require 'lib.samp.events'

local line = false
local x, y, z = 0, 0, 0

function main()
    if not isSampLoaded() or not isSampfuncsLoaded() then return end
    while not isSampAvailable() do wait(100) end

    while true do
        wait(0)
        if line then
            local mx, my, mz = getCharCoordinates(PLAYER_PED)

            local wposX1, wposY1 = convert3DCoordsToScreen(x, y, z)
            local wposX2, wposY2 = convert3DCoordsToScreen(mx, my, mz)

            renderDrawLine(wposX2, wposY2, wposX1, wposY1, 3, 0xFFFF0000)
        end
    end
end

function hook.onCreatePickup(id, model, type, position)
    print('id: ' .. id .. ' model: ' .. model .. ' type: ' .. type)

    -- твой неправильный код: position.x, position.y, position.z = x, y, z
    x, y, z = position.x, position.y, position.z

    if id == 191 then
        line = true
    end
end

плюс ко всему этот код сработает только тогда, когда в зоне стрима впервые появится пикап (то есть надо перезаходить в зону стрима)

 

[Fott]

не понимаю как использовать onWindowMessage

Событие onWindowMessage

Вызывается при получении основным окном игры оконного сообщения Windows

wiki.blast.hk

Результаты поиска по запросу: onWindowMessage

www.blast.hk

 

[Sanchez.]

require 'lib.moonloader'

local hook = require 'lib.samp.events'

local line = false
local x, y, z = 0, 0, 0

function main()
    if not isSampLoaded() or not isSampfuncsLoaded() then return end
    while not isSampAvailable() do wait(100) end

    while true do
        wait(0)
        if line then
            local mx, my, mz = getCharCoordinates(PLAYER_PED)

            local wposX1, wposY1 = convert3DCoordsToScreen(x, y, z)
            local wposX2, wposY2 = convert3DCoordsToScreen(mx, my, mz)

            renderDrawLine(wposX2, wposY2, wposX1, wposY1, 3, 0xFFFF0000)
        end
    end
end

function hook.onCreatePickup(id, model, type, position)
    print('id: ' .. id .. ' model: ' .. model .. ' type: ' .. type)

    -- твой неправильный код: position.x, position.y, position.z = x, y, z
    x, y, z = position.x, position.y, position.z

    if id == 191 then
        line = true
    end
end

плюс ко всему этот код сработает только тогда, когда в зоне стрима впервые появится пикап (то есть надо перезаходить в зону стрима)

Спасибо, только как сделать так, что если в зоне стрима много таких пикапов, то рисовалось столько линий, сколько и пикапов?

 

[meowprd]

как запретить выход с т/с на ENTER?
не понимаю как использовать onWindowMessage

local wm = require 'lib.windows.message'
function onWindowMessage(msg, wparam, lparam)
    if msg == wm.WM_KEYDOWN or msg == wm.WM_SYSKEYDOWN then
        if wparam == 0x0D then -- enter
            if not sampIsChatInputActive() and not sampIsDialogActive() and not sampIsScoreboardOpen() and not isSampfuncsConsoleActive() then
                if isCharInAnyCar(PLAYER_PED) then
                    consumeWindowMessage(true, true)
                end
            end
        end
    end
end

Спасибо, только как сделать так, что если в зоне стрима много таких пикапов, то рисовалось столько линий, сколько и пикапов?

использовать массив (таблицу)

 

[Dmitriy Makarov]

Посмотреть вложение 107514Почему у меня не рисуется линия к пикапу?
И я не могу нормально определить айди этого пикапа, чтобы нарисовать ему линию.
Поправьте пожалуйста код, я совсем запутался...

require 'lib.moonloader'

local hook = require 'lib.samp.events'

local line = false

function main()
    if not isSampLoaded() or not isSampfuncsLoaded() then return end
    while not isSampAvailable() do wait(100) end

    while true do
        wait(0)
        if line == true then
            mx, my, mz = getCharCoordinates(PLAYER_PED)

            wposX1, wposY1 = convert3DCoordsToScreen(x, y, z)
            wposX2, wposY2 = convert3DCoordsToScreen(mx, my, mz)

            renderDrawLine(wposX2, wposY2, wposX1, wposY1, 3, 0xFFFF0000)
            renderDrawLine(wposX2, wposY2, wposX1, wposY1, 3, 0xFFFF0000)
        end
    end
end

function hook.onCreatePickup(id, model, type, position)
    print('id: ' .. id .. ' model: ' .. model .. ' type: ' .. type)

    position.x, position.y, position.z = x, y, z

    if id == 191 --[[точно не знаю какой айди]] then
        line = true
    end[ATTACH type="full"]107515[/ATTACH]
end

p.s Линия начала рисоваться, только конец линии не привязан к пикапу

MoonLoader 0.27 вроде требуется для функции getAllPickups

local my_font = renderCreateFont("Arial", 9, 5) -- Твой шрифт

-- Беск. цикл
for _, v in pairs(getAllPickups()) do
    local minDist = 333
    x, y, z = getPickupCoordinates(v)
    local pX, pY = convert3DCoordsToScreen(x, y, z)
    local mX, mY, mZ = getCharCoordinates(PLAYER_PED)
    local draw1, draw2 = convert3DCoordsToScreen(mX, mY, mZ)
    local dist = math.sqrt((x - mX)^2 + (y - mY)^2 + (z - mZ)^2)
    if dist < minDist then
        if isPointOnScreen(x, y, z, 1.0) then
            renderDrawLine(draw1, draw2, pX, pY, 2.0, 0xFFD00000)
            renderFontDrawText(my_font, string.format("{0089FF}Distance: {FFFFFF}%0.1fm", dist), pX, pY, -1)
        end
    end
end

 

[meowprd]

MoonLoader 0.27 вроде требуется для функции getAllPickups

local my_font = renderCreateFont("Arial", 9, 5) -- Твой шрифт

-- Беск. цикл
for _, v in pairs(getAllPickups()) do
    local minDist = 333
    x, y, z = getPickupCoordinates(v)
    local pX, pY = convert3DCoordsToScreen(x, y, z)
    local mX, mY, mZ = getCharCoordinates(PLAYER_PED)
    local draw1, draw2 = convert3DCoordsToScreen(mX, mY, mZ)
    local dist = math.sqrt((x - mX)^2 + (y - mY)^2 + (z - mZ)^2)
    if dist < minDist then
        if isPointOnScreen(x, y, z, 1.0) then
            renderDrawLine(draw1, draw2, pX, pY, 2.0, 0xFFD00000)
            renderFontDrawText(my_font, string.format("{0089FF}Distance: {FFFFFF}%0.1fm", dist), pX, pY, -1)
        end
    end
end

Посмотреть вложение 107521

Это че еще такое?

local dist = math.sqrt((x - mX)^2 + (y - mY)^2 + (z - mZ)^2)

А как же:

float distance = getDistanceBetweenCoords2d(float x1, float y1, float x2, float y2)  -- 0509
float distance = getDistanceBetweenCoords3d(float x1, float y1, float z1, float x2, float y2, float z2)  -- 050A

 

[Dmitriy Makarov]

Привет всем, как телепортироваться в координаты с интерьером

Вроде как-то так.

-- main
sampRegisterChatCommand("tpcor", function(arg) -- /tpcor 1761.5470, -1897.4117, 13.5625 0 (ТПхнет на ЖДЛС и установит 0-й интерьер, т.е улицу)
    local x, y, z, int = string.match(arg, "(.+) (.+) (.+) (%d+)")
    setCharCoordinates(PLAYER_PED, x, y, z)
    setCharInterior(PLAYER_PED, int)
end)

Это че еще такое?

local dist = math.sqrt((x - mX)^2 + (y - mY)^2 + (z - mZ)^2)

А как же:

float distance = getDistanceBetweenCoords2d(float x1, float y1, float x2, float y2)  -- 0509
float distance = getDistanceBetweenCoords3d(float x1, float y1, float z1, float x2, float y2, float z2)  -- 050A

Да там разницы нет вроде. Формулу я давно нашёл на форуме и хранил у себя на всякий.)

 

[Judo!]

Привет

if text:find(' (.+) убил (.+)') then

  local killer ,victim = text:match(' (.+) убил (.+))')
 
  table.insert(fplayer, {killer})

  table.insert(fplayer, {victim})

end



for k, v in ipairs(fplayer) do

  if v[1] ~= nil then

    imgui.Text(v[1])

  end

end

Как мне в дальнейшем изменить значения? К примеру, вместо Killer вписать Killer.1 при повторном появлении Killer в тексте

 

[meowprd]

Как поставить такую метку на карту и если можно то например цвет поменятьПосмотреть вложение 107529

Checkpoint checkpoint = addBlipForCoord(float atX, float atY, float atZ)
changeBlipColour(Marker marker, int color)  -- 0165

-- example:
local mark = addBlipForCoord(0.0, 0.0, 0.0)
changeBlipColour(mark, 0xFFFFFFFF) -- full white