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

 

[lemonager]

if status then
sampAddChatMessage(tag.. "включен", 0x71B8FF)
else
sampAddChatMessage(tag.. "выключен", 0x71B8FF)
end
как сократить?

 status = not status
sampAddChatMessage(status and 'Script {00ff00}activated' or 'Script {ff0000}deactivated', -1)

 

[moreveal]

function sampev.onShowDialog(dialogid, style, title, button1, button2, text)
    if dialogid == 484 then
        local price = text:match('%{......%}Для полного бака вам требуется%: $d+ литров %{......%}%[(%d+)%$%]')
        sampSendDialogResponse(484, 1, -1, price)
    end
end

Результат тот же.

 

[frit]

как получить текст отправленный в диалоге?

 

[moreveal]

как получить текст отправленный в диалоге?

sampev = require 'lib.samp.events'

function sampev.onSendDialogResponse(dialogid, button, list, input)
    -- dialogid = id диалога
    -- button = нажатая кнопка
    -- list = выбранный пункт
    -- input = введенный текст (тебе нужно это)
end

 

[Anton Nixon]

помогите довести до ума данный отрывок кода, нужно чтобы drawbox растягивался в длине, в зависимости от длины текста внутри,
пока есть такой вариант, но он почему-то не хочет работать, так шо хелпа бы не помешала

        if imgui_imbool.player_info.v then -- панель информации об игроке в слежке
            nick_text = "Ник игрока: %s [%i]\n"
            player_nojoin = "Игрок не подключен.\n"
            last_text = "Предыдущий: %s [%i]"
            if sp_player_id ~= nil then
                if sampIsPlayerConnected(sp_player_id) then
                    sp_player_name = sampGetPlayerNickname(sp_player_id)
                    temp_name = sp_player_name
                    sp_score = sampGetPlayerScore(sp_player_id)
                    
                    local nick_player = string.format(nick_text, sp_player_name, sp_player_id)
                    local lvl_player = string.format("Уровень игрока: %i", sp_score)
                    renderText = nick_player .. lvl_player
                else
                    local nick_player = string.format(player_nojoin)
                    local last_player = string.format(last_text, temp_name, sp_player_id)
                    renderText = nick_player .. last_player
                end
            else
                
                local nick_player = string.format(player_nojoin)
                local last_player = string.format(last_text, temp_name, myid)
                renderText = nick_player .. last_player
            end
            rx_nick = renderGetFontDrawTextLength(sfont, nick_text)
            rx_nojoin = renderGetFontDrawTextLength(sfont, player_nojoin)
            rx_last = renderGetFontDrawTextLength(sfont, last_text)
            if rx_last < rx_nick then
                new_rx = rx_nick
                ry = renderGetFontDrawHeight(sfont)
                new_ry = ry * 2.1
            elseif rx_last < rx_nojoin then
                new_rx = rx_nojoin
                ry = renderGetFontDrawHeight(sfont)
                new_ry = ry * 2.1
            else
                new_rx = rx_last
                ry = renderGetFontDrawHeight(sfont)
                new_ry = ry * 2.1
            end
            renderDrawBoxWithBorder(check_X, check_Y - 45, new_rx, new_ry + 10, 2013265920, 2, 2365564160)
            renderFontDrawText(sfont, renderText, check_X + 7, check_Y - 40, -1)
        end

 

[paulohardy]

Возможно ли, переписать lua в cleo?

Возможно

 

[_razor]

Возможно ли, переписать lua в cleo?

Да и аналогично

 

[DANIIL XPC]

Why return on /sw only -1?
what i wrong?

function sampev.onServerMessage(color, text)
    if text:find("Player: (.+)") then
        local nickname = text:match("Player: (.+)")
        sampSendChat("/sw "..idbynick(nickname))
    end
end

function idbynick(nick)
    for i = 0, sampGetMaxPlayerId() do
        if sampIsPlayerConnected(i) then
            if sampGetPlayerNickname(i) == nick then
                id = i
            end
        end
    end
    local i = id
    id = nil
    return i == nil and -1 or i
end

 

[ImPasha]

Why return on /sw only -1?
what i wrong?

function sampev.onServerMessage(color, text)
    if text:find("Player: (.+)") then
        local nickname = text:match("Player: (.+)")
        sampSendChat("/sw "..idbynick(nickname))
    end
end

function idbynick(nick)
    for i = 0, sampGetMaxPlayerId() do
        if sampIsPlayerConnected(i) then
            if sampGetPlayerNickname(i) == nick then
                id = i
            end
        end
    end
    local i = id
    id = nil
    return i == nil and -1 or i
end

Just try to use another function to get player ID by player nickname. For example, you can use this one.

 

[Anton Nixon]

Why return on /sw only -1?
what i wrong?

function sampev.onServerMessage(color, text)
    if text:find("Player: (.+)") then
        local nickname = text:match("Player: (.+)")
        sampSendChat("/sw "..idbynick(nickname))
    end
end

function idbynick(nick)
    for i = 0, sampGetMaxPlayerId() do
        if sampIsPlayerConnected(i) then
            if sampGetPlayerNickname(i) == nick then
                id = i
            end
        end
    end
    local i = id
    id = nil
    return i == nil and -1 or i
end

show this line from chatlog where do you want to get the ID

 

[DANIIL XPC]

show this line from chatlog where do you want to get the ID

[21:39:30] * Daniil[114]'s starts to play.
[114] is from script chatid.sf.

 

[Anton Nixon]

[21:39:30] * Daniil[114]'s starts to play.
[114] is from script chatid.sf.

try this but i'm not sure

function sampev.onServerMessage(color, text)
    if text:find(".*(%s+)%[") then
        local nickname = text:match(".*(%s+)%[")
        sampSendChat("/sw "..idbynick(nickname))
    end
end

 

[DANIIL XPC]

try this but i'm not sure

function sampev.onServerMessage(color, text)
    if text:find(".*(%s+)%[") then
        local nickname = text:match(".*(%s+)%[")
        sampSendChat("/sw "..idbynick(nickname))
    end
end

dont work.
lets try something with this text * Daniil[202] raises his hand and looks down at his watch.

 

[Kepler]

Как на луа такое сделать? (черный экран для СС)

Camera.SetPosition(1412.64, -1.78751, 1000.924, 0.0, 0.0, 90)
Camera.PointAt(-830.8118, -1360.361, 87.0289, 2)

 

[_razor]

Как на луа такое сделать? (черный экран для СС)

Camera.SetPosition(1412.64, -1.78751, 1000.924, 0.0, 0.0, 90)
Camera.PointAt(-830.8118, -1360.361, 87.0289, 2)

setFixedCameraPosition(float positionX, float positionY, float positionZ, float rotationX, float rotationY, float rotationZ)
pointCameraAtPoint(float pointAtX, float pointAtY, float pointAtZ, int switchstyle)