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

 

[danywa]

local active = true
local font = renderCreateFont("Arial", 10, 12)
local sms = true

function main()
    while not isSampAvailable() do wait(100) end
    sampRegisterChatCommand("specadm", function() active = not active sampAddChatMessage(active and "[SpectateAdmin] activated. " or "[SpectateAdmin] off", -1)
    end)
    sampAddChatMessage("[SpectateAdmin] Çàïóùåí.", 0x6B025E)
    wait(30000)
    sampAddChatMessage("[SpectateAdmin] Àâòîð ñèäèò òóò youtube.com/goxashow")
    while true do wait(0)
        if active then
            for i=0, 2048 do
                if sampIs3dTextDefined(i) then
                local text, color, posX, posY, posZ, distance, ignoreWalls, playerId, vehicleId = sampGet3dTextInfoById(i)
                    if text:find("Family") or text:find("Empire") or text:find("Squad") or text:find("Dynasty") or text:find("Corporation") or text:find("Crew") or text:find("Brotherhood") then
                        admid = playerId
                        local _, myid = sampGetPlayerIdByCharHandle(PLAYER_PED)
                        if admid ~= myid then
                            local admres, admped = sampGetCharHandleBySampPlayerId(admid)
                            if admped then
                                admdoes = doesCharExist(admped)
                                if not admdoes then
                                    local admname = sampGetPlayerNickname(admid)
                                    if sms then
                                        sampAddChatMessage("[SpectateAdmin] Çà òîáîé ñëåäèò äîëáàåá: ["..admid.."] "..admname.."",-1)
                                        sms = false
                                        smsreset()
                                    end
                                    renderDrawBoxWithBorder(39, 270, 200, 90, 0xFF600B0B, 5, 0xFFFF0000)
                                    renderFontDrawText(font, "Çà òîáîé ñëåäèò äîëáàåá:", 49, 285, 0xFFFFFFFF, 0x90000000)
                                    renderFontDrawText(font, "["..admid.."] "..admname.."", 49, 320, 0xFFFFFFFF, 0x90000000)
                                end   
                            end
                        end
                    end
                end
            end
        end
    end 
end


function smsreset()
    lua_thread.create(function ()
            wait(5000)
            sms = true
    end)
end

После запуска,работает 30с и крашится что делать?

 

[chapo]

тут и цикл не нужен тогда)

 sampRegisterChatCommand('input', function(id)
            local result, char = sampGetCharHandleBySampPlayerId(id)
            if result then
                    sampAddChatMessage(getCharModel(char), -1)
            end
end)

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

мне надо узнать не только его скин но и находится ли он в зоне стрима или нет

---

как перевести этот цвет в HEX или RGB?

 

[gleguwka1]

Здравствуйте, уважаемые форумчане, меня интересует, как образуется данное значение?
Вот небольшой отрывок LUA-скрипта:

function sampev.onServerMessage(color, text)
    if color == -65281 and text:find(" %| Получатель: ") then
        ....
    end
end

-
Откуда получилось значение -65281?! Здесь желтый цвет RBG(255, 255, 0). Введя значения RGB в конвертер в int (ссылка), я получил абсолютно другое значение?
Или вот ещё цвет - 13369599, это зеленый, а проверяя через сайт выдает вообще розовый? Откуда берутся эти -65281 и 13369599???

 

[Smeruxa]

мне надо узнать не только его скин но и находится ли он в зоне стрима или нет

---

как перевести этот цвет в HEX или RGB?

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

result это и говорит, if result then значит что в, if not result then значит что вне

мне надо узнать не только его скин но и находится ли он в зоне стрима или нет

---

как перевести этот цвет в HEX или RGB?

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

function join_argb(a, r, g, b)
    local argb = b  -- b
    argb = bit.bor(argb, bit.lshift(g, 8))  -- g
    argb = bit.bor(argb, bit.lshift(r, 16)) -- r
    argb = bit.bor(argb, bit.lshift(a, 24)) -- a
    return argb
end

 

[monolith04]

Как остановить транспорт когда открывается окно? (про samp.events вкурсе). Есть какая-то функция которая это делает? Шоб случайно в реку не улететь 😅

 

[chapo]

Как остановить транспорт когда открывается окно? (про samp.events вкурсе). Есть какая-то функция которая это делает? Шоб случайно в реку не улететь 😅

local sampev = require 'lib.samp.events'

function sampev.onShowDialog(id, style, title, button1, button2, text)
    if isCharInAnyCar(PLAYER_PED)
        x, y, z = getCarCoordinates(storeCarCharIsInNoSave(PLAYER_PED))
        setCarCoordinates(storeCarCharIsInNoSave(PLAYER_PED), x, y, z)
    end
end

 

[EclipsedFlow]

Как изменить цвет текста mimgui?

 

[Dashok.]

Как сделать что-бы imgui.Columns стоял не по середине, а допустем на 80 пикселей влево?

 

[chapo]

function join_argb(a, r, g, b)
    local argb = b  -- b
    argb = bit.bor(argb, bit.lshift(g, 8))  -- g
    argb = bit.bor(argb, bit.lshift(r, 16)) -- r
    argb = bit.bor(argb, bit.lshift(a, 24)) -- a
    return argb
end

можно сделать это вручную? Мне это нужно не в коде.

 

[EclipsedFlow]

СРОЧНО!
Как засунуть переменную в строку?

imgui.TextColoredRGB(u8"{ПЕРЕМЕННАЯ}ТЕКСТ")

 

[Dashok.]

СРОЧНО!
Как засунуть переменную в строку?

imgui.TextColoredRGB(u8"{ПЕРЕМЕННАЯ}ТЕКСТ")

imgui.TextColoredRGB(u8"{Цвет}Текст", 2);
2 - По центру
1 - По левой стороне окна
3 - По правой стороне окна

 

[Next..]

СРОЧНО!
Как засунуть переменную в строку?

imgui.TextColoredRGB(u8"{ПЕРЕМЕННАЯ}ТЕКСТ")

Возможно так переменная.."текст"

 

[EclipsedFlow]

Как сделать радужный текст в imgui?

 

[monolith04]

local sampev = require 'lib.samp.events'

function sampev.onShowDialog(id, style, title, button1, button2, text)
    if isCharInAnyCar(PLAYER_PED)
        x, y, z = getCarCoordinates(storeCarCharIsInNoSave(PLAYER_PED))
        setCarCoordinates(storeCarCharIsInNoSave(PLAYER_PED), x, y, z)
    end
end

Благодарю. Все работает. Но еще такой вопрос, нельзя сделать так чтобы транспорт плавно тормозил а не резко останавливался с помощью телепорта на текущие координаты?

 

[chapo]

Благодарю. Все работает. Но еще такой вопрос, нельзя сделать так чтобы транспорт плавно тормозил а не резко останавливался с помощью телепорта на текущие координаты?

local sampev = require 'lib.samp.events'

function sampev.onShowDialog(id, style, title, button1, button2, text)
    if isCharInAnyCar(PlAYER_PED) then
        speed = getCarSpeed(storeCarCharIsInNoSave(PLAYER_PED))
        for speed, 0 do
            setCarForwardSpeed(storeCarCharIsInNoSave(PLAYER_PED), speed)
        end
    end
end