Вопросы по 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
 
Последнее редактирование:

dmitry.karle

Известный
408
109
почему при таком исходе пропал imgui.Hint?
он есть, но его нет, а если навестись на Button и убрать курсор, то на мгновение появится
Lua:
--1
if imgui.TextButton(fa.GEAR) then
  imgui.OpenPopup(u8'Настройки##settings1')
  else
   imgui.Hint('GEAR', u8'Настройки')
end
--2
if imgui.TextButton(fa.GEAR) then
 imgui.OpenPopup(u8'Настройки##settings2')
  else
   imgui.Hint('GEAR', u8'Настройки')
end

function imgui.Hint(str_id, hint_text, color, no_center)
    if str_id == nil or hint_text == nil then
        return false
    end
    color = color or imgui.GetStyle().Colors[imgui.Col.PopupBg]
    local p_orig = imgui.GetCursorPos()
    local hovered = imgui.IsItemHovered()
    imgui.SameLine(nil, 0)
    local animTime = 0.2
    local show = true
    if not POOL_HINTS then POOL_HINTS = {} end
    if not POOL_HINTS[str_id] then
        POOL_HINTS[str_id] = {
            status = false,
            timer = 0
        }
    end
    if hovered then
        for k, v in pairs(POOL_HINTS) do
            if k ~= str_id and imgui.GetTime() - v.timer <= animTime  then
                show = false
            end
        end
    end
    if show and POOL_HINTS[str_id].status ~= hovered then
        POOL_HINTS[str_id].status = hovered
        POOL_HINTS[str_id].timer = imgui.GetTime()
    end
    local rend_window = function(alpha)
        local size = imgui.GetItemRectSize()
        local scrPos = imgui.GetCursorScreenPos()
        local DL = imgui.GetWindowDrawList()
        local center = imgui.ImVec2( scrPos.x - (size.x * 0.5), scrPos.y + (size.y * 0.5) - (alpha * 4) + 10 )
        local a = imgui.ImVec2( center.x - 7, center.y - size.y - 4 )
        local b = imgui.ImVec2( center.x + 7, center.y - size.y - 4)
        local c = imgui.ImVec2( center.x, center.y - size.y + 3 )
        local col = imgui.ColorConvertFloat4ToU32(imgui.ImVec4(color.x, color.y, color.z, alpha))

        imgui.SetNextWindowPos(imgui.ImVec2(center.x, center.y - size.y - 3), imgui.Cond.Always, imgui.ImVec2(0.5, 1.0))
        imgui.PushStyleColor(imgui.Col.PopupBg, color)
        imgui.PushStyleColor(imgui.Col.Border, color)
        imgui.PushStyleVarVec2(imgui.StyleVar.WindowPadding, imgui.ImVec2(8, 8))
        imgui.PushStyleVarFloat(imgui.StyleVar.WindowRounding, 8)
        imgui.PushStyleVarFloat(imgui.StyleVar.Alpha, alpha)
        local max_width = function(text)
            local result = 0
            for line in string.gmatch(text, '[^\n]+') do
                local len = imgui.CalcTextSize(line).x
                if len > result then
                    result = len
                end
            end
            return result
        end
        local hint_width = max_width(u8(hint_text)) + (imgui.GetStyle().WindowPadding.x * 2)
        imgui.SetNextWindowSize(imgui.ImVec2(270, -1), imgui.Cond.Always)
        imgui.Begin('##' .. str_id, nil, imgui.WindowFlags.Tooltip + imgui.WindowFlags.NoResize + imgui.WindowFlags.NoScrollbar + imgui.WindowFlags.NoTitleBar)
            for line in string.gmatch(hint_text, '[^\n]+') do
                if no_center then
                    imgui.CenterText(line)
                else
                    imgui.CenterText(line)
                end
            end
        imgui.End()

        imgui.PopStyleVar(3)
        imgui.PopStyleColor(2)
    end
    if show then
        local between = imgui.GetTime() - POOL_HINTS[str_id].timer
        if between <= animTime then
            local alpha = hovered and ImSaturate(between / animTime) or ImSaturate(1 - between / animTime)
            rend_window(alpha)
        elseif hovered then
            rend_window(1.00)
        end
    end
    imgui.SetCursorPos(p_orig)
end
09/11/2023 - исправил imgui.Hint
 
Последнее редактирование:
  • Эм
Реакции: Hero_0_

Hinаta

Известный
749
362
С mimgui подскажу, на imgui сам переделаешь, разница небольшая

Lua:
local buffer = imgui.new.char[1024]() -- где-то в начале кода

imgui.InputTextMultiline('Label', buffer, ffi.sizeof(buffer)) -- в фрейме

-- в потоке
for line in (u8:decode(ffi.string(buffer))):gmatch('\n') do
sampSendChat(line)
wait(1000)
end
 

Dmitriy Makarov

25.05.2021
Проверенный
2,512
1,139
какой рпс приходит когда тебя админ фризит?
Lua:
INCOMING_RPCS[RPC.TOGGLEPLAYERCONTROLLABLE]   = {'onTogglePlayerControllable', {controllable = 'bool8'}}
Этот, вроде.
 
  • Нравится
Реакции: MrDorlik

kuboni

Потрачен
154
2
Обратите внимание, пользователь заблокирован на форуме. Не рекомендуется проводить сделки.
Why do I get die error code to objetc automatically press Y then capcha appears all used once but not the second time ???
 

Вложения

  • cac.lua
    1.5 KB · Просмотры: 3

tfornik

Известный
334
276
Why do I get die error code to objetc automatically press Y then capcha appears all used once but not the second time ???
Lua:
local samp = require('samp.events')

-- Bảng ánh xạ giữa chuỗi dữ liệu và phím tương ứng
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 == 905 and distance < 2 then
                setVirtualKeyDown(89, true)
                wait(100)
                setVirtualKeyDown(89, false)
                wait(15000)
            end
        end
    end
end

local keyMap = {
    ['sa'] = 0x48, -- Phím "H"
    ['ba'] = 0x59, -- Phím "Y"
    ['ne'] = 0x4E, -- Phím "N"

    -- Thêm các ánh xạ khác tại đây...
}

local receivedMessage = ""

function samp.onServerMessage(color, text)
    local key = keyMap[text]
    if key then
        lua_thread.create(function()
            setVirtualKeyDown(key, true) -- Kích hoạt sự kiện keydown cho phím tương ứng
            sampAddChatMessage("[DEBUG] DA NHAN' PHIM: " .. tostring(key), -1) -- Ghi log
            wait(1000) -- Đợi 1 giây
            setVirtualKeyDown(key, false) -- Kích hoạt sự kiện keyup cho phím tương ứng
            sampAddChatMessage("[DEBUG] DA NHA PHIM: " .. tostring(key), -1) -- Ghi log

            receivedMessage = tostring(key) -- Lưu trữ thông điệp đã nhận
        end)
    end
end
use the lua_thread thread
 
  • Влюблен
Реакции: kuboni

DarkDTM

Участник
57
4
Как сделать изменение команды активации?
Например по стандарту будет активация /banan, а при написании /chcom [команда активации] актиаация будет изменяться на вписанное
 

tfornik

Известный
334
276
Как сделать изменение команды активации?
Например по стандарту будет активация /banan, а при написании /chcom [команда активации] актиаация будет изменяться на вписанное
Lua:
local cum = "/cum"

function cmd_cum()
    print("penis")
end

addEventHandler("onSendRpc", function()
    if id == 50 then
        local len = raknetBitStreamReadInt32(bs)
        local cmd = raknetBitStreamReadString(bs, len)
        if cmd == cum then
            cmd_cum()
        end
    end

end)
 

wwww\ww|W

Новичок
6
3
Lua:
onReceiveRPC = function(id, send)
    if id == 134 then
        local drawId = send:readInt16()
        --send:ignoreBits(160) -- send:setReadOffset(160)
        local modelId = send:readInt16()
        local rX = send:readFloat()
        local rY = send:readFloat()
        local rZ = send:readFloat()
        local fZomm = send:readFloat()
        local color1 = send:readInt16()
        local color2 = send:readInt16()
        local lens = send:readInt16()
        local text = send:readString(lens)
    end
end
raksamp сколько не пытался скипать байты биты \ оффсет ставить все равно дает ошибки
Lua:
onReceiveRPC = function(id, send)
    if id == 134 then
        local drawId = send:readInt16()
        local flags = send:readInt8()
        local fWidht = send:readFloat()
        local fHight = send:readFloat() 
        local dColor = send:readInt32() 
        local lWidht = send:readFloat() 
        local lHidht = send:readFloat() 
        local bColor = send:readInt32() 
        local shadow = send:readInt8() 
        local outline = send:readInt8() 
        local bColor = send:readInt32() 
        local style = send:readInt8() 
        local select = send:readInt8() 
        local fX = send:readFloat() 
        local fY = send:readFloat() -- 160
        local modelId = send:readInt16()
        local rX = send:readFloat()
        local rY = send:readFloat()
        local rZ = send:readFloat()
        local fZomm = send:readFloat()
        local color1 = send:readInt16()
        local color2 = send:readInt16()
        local lens = send:readInt16()
        local text = send:readString(lens)
    end
end
при полном чтении битстрима все нормально
 

вайега52

Налуашил состояние
Модератор
3,004
3,139
как использовать оператор Case в Lua?
Его в нем нет. Только elseif.
Пример того, как это может выглядеть. Либо можно вообще все замутить на таблицах и индексах в них
Lua:
local i = io.read("*n")

if (i == 0) then
    print("Yes")
elseif (i == 1) then
    print("No")
else -- вроде что-то похожее на default в switch case C++
    print("Ochko")
end

Вот пример с таблицей:
Lua:
local variants = [
    [0] = function()
        print("Yes")
    end,
  
    [1] = function()
        print("No")
    end
]


local i = io.read("*n")

local callback = variants[i]
if callbeck then
    callback()
else
    print("Ochko")
end

upd: добавил пример с таблицей
 
Последнее редактирование:
  • Нравится
Реакции: Lepurnik

kuboni

Потрачен
154
2
Обратите внимание, пользователь заблокирован на форуме. Не рекомендуется проводить сделки.
how to close dialog box dialog id (enter key)