Вопросы по 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
 
Последнее редактирование:
  • Нравится
  • Клоун
  • Эм
Реакции: knowfaq, FreX, Deps и 37 других
Нажмите для раскрытия...
percheklii

percheklii

Известный
730
268
pugovkin228 написал(а):
Мой тоже вроде работает, кинь сюда, если не сложно. Интересно посмотреть каким способом)
Нажмите для раскрытия...
Lua: 
local inicfg = require("inicfg")
local sampev = require("samp.events")
local imgui = require("mimgui")
local ffi = require("ffi")
local encoding = require("encoding")
encoding.default = ("CP1251")
local u8 = encoding.UTF8

local ini = inicfg.load({
    nicknames = {}
}, "Angar.ini")

local window = imgui.new.bool()
local buffer = imgui.new.char[256](u8(table.concat(ini.nicknames, "\n")))

function main()
    repeat wait(0) until isSampAvailable()
    sampRegisterChatCommand("angar", function()
        window[0] = not window[0]
    end)
    wait(-1)
end

imgui.OnInitialize(function()
    imgui.GetIO().IniFilename = nil
end)

imgui.OnFrame(function() return window[0] end, function(player)
    local sw, sh = getScreenResolution()
    imgui.SetNextWindowPos(imgui.ImVec2(sw / 2, sh / 2), imgui.Cond.FirstUseEver, imgui.ImVec2(0.5, 0.5))
    imgui.Begin("Angar", window, imgui.WindowFlags.NoCollapse + imgui.WindowFlags.AlwaysAutoResize)
    
    imgui.PushItemWidth(200)

    if imgui.InputTextMultiline("##1", buffer, 256) then
        local text = ffi.string(buffer)
        ini.nicknames = {}
        for line in text:gmatch("[^\r\n]+") do
            table.insert(ini.nicknames, line)
        end
        inicfg.save(ini, "Angar.ini")
    end

    imgui.PopItemWidth()
    imgui.End()
end)
 
P

pugovkin228

Участник
33
2
Yans написал(а):
Как сделать рендер на скин?
Нажмите для раскрытия...
Спизжено у чапо
Код: 
local Font = renderCreateFont('Trebuchet MS', 13, 5)

function main()
    while not isSampAvailable() do wait(0) end
    while true do
        wait(0)
        for _, ped in ipairs(getAllChars()) do
            if isCharOnScreen(ped) and getCharModel(ped) == ID SKIN then
                local x, y = convert3DCoordsToScreen(getCharCoordinates(ped))
                renderFontDrawText(Font, 'RENDER NA SKIN', x, y, -1)
            end
        end
    end
end
 
  • Эм
Реакции: ChromiusJ
ARMOR

ARMOR

kjor32 is legend
Модератор
4,852
6,083
Yans написал(а):
Как сделать рендер на скин?
Нажмите для раскрытия...
Самое крутое ВХ ( можно типо добавить что чамсы рендерятся цветом клиста и будет прикольно )
www.blast.hk

Полезные сниппеты и функции

Описание: Клонирует table function clone (t) if type(t) ~= "table" then return t end local meta = getmetatable(t) local target = {} for k, v in pairs(t) do if type(v) == "table" then target[k] = clone(v) else target[k] = v end...
www.blast.hk www.blast.hk
 
  • Вау
Реакции: percheklii
percheklii

percheklii

Известный
730
268
Yans написал(а):
Как сделать рендер на скин?
Нажмите для раскрытия...
Я как-то еще такое делал
Рендерит точку на скине игрока с цветом игрока.
Еще если поставить везде false в isLineOfSightClear, будет что-то типо вх. 😆

Lua: 
require("moonloader")

function main()
    repeat wait(0) until isSampAvailable()

    while true do wait(0)
        
        if wasKeyPressed(VK_F2) then;
            on = not on
            printStyledString("~w~DotOnSkin: " .. (on and "~g~ON" or "~r~OFF"), 1000, 5)
        end

        if on then
            for i = 0, sampGetMaxPlayerId() do
                if sampIsPlayerConnected(i) then
                    local result, ped = sampGetCharHandleBySampPlayerId(i)
                    local color = sampGetPlayerColor(i)
                    if result then
                        xx, yy, zz = getCharCoordinates(PLAYER_PED)
                        x, y, z = getCharCoordinates(ped)
                        if isLineOfSightClear(xx, yy, zz, x, y , z, true, false, false, true, false) then
                            if doesCharExist(ped) and isCharOnScreen(ped) then
                                x, y = convert3DCoordsToScreen(x, y, z)
                                renderDrawPolygon(x, y, 6, 6, 40, 0, color)
                            end
                        end
                    end
                end
            end
        end
    end
end
 
tsunamiqq

tsunamiqq

Участник
429
16
Хелпаните, нужно сделать меню, которая будет выводиться если она включена к примеру через чекбокс, и будет оставаться на экране всегда, пока соответственно не выключу её
 
percheklii

percheklii

Известный
730
268
tsunamiqq написал(а):
Хелпаните, нужно сделать меню, которая будет выводиться если она включена к примеру через чекбокс, и будет оставаться на экране всегда, пока соответственно не выключу её
Нажмите для раскрытия...
Lua: 
local imgui = require("mimgui")

local firstWindow, secondWindow = imgui.new.bool(), imgui.new.bool()
local checkbox = imgui.new.bool()

imgui.OnFrame(function() return firstWindow[0] end, function(player)
    local sx, sy = getScreenResolution()
    imgui.SetNextWindowPos(imgui.ImVec2(sx / 2, sy /2), imgui.Cond.FirstUseEver, imgui.ImVec2(0.5, 0.5))
    imgui.Begin("Test", firstWindow, imgui.WindowFlags.NoCollapse + imgui.WindowFlags.AlwaysAutoResize)
    if imgui.Checkbox("ON/OFF", checkbox) then
        secondWindow[0] = not secondWindow[0]
    end
    imgui.End()
end)

imgui.OnFrame(function() return secondWindow[0] end, function(player)
    player.HideCursor = true
    imgui.SetNextWindowPos(imgui.ImVec2(500, 500), imgui.Cond.Always, imgui.ImVec2(1, 1))
    imgui.SetNextWindowSize(imgui.ImVec2(130, 175), imgui.Cond.Always)
    imgui.Begin("", secondWindow, imgui.WindowFlags.NoDecoration, imgui.WindowFlags.NoSavedSettings, imgui.WindowFlags.NoMove, imgui.WindowFlags.NoInputs)
    imgui.Text("Hello, world!")
    imgui.End()
end)

function main()
    repeat wait(0) until isSampAvailable()
    sampRegisterChatCommand("test", function()
        firstWindow[0] = not firstWindow[0]
    end)
    wait(-1)
end
 
  • Нравится
Реакции: ChromiusJ
Stepaa

Stepaa

Новичок
13
3
Загрузил картинку в IMGUI , работает пару секунд и вместо картинки появляется - Белый квадрат
Как можно решить
 
  • Эм
Реакции: YarikVL
Stepaa

Stepaa

Новичок
13
3
pugovkin228 написал(а):
кинь код
Нажмите для раскрытия...
local image = {
file = getWorkingDirectory()..'\\resource\\ava.png',
handle = nil
}



imgui.BeginChild('##asdasdada', imgui.ImVec2(125, 100), false, imgui.WindowFlags.NoScrollbar + imgui.WindowFlags.NoScrollbar + imgui.WindowFlags.NoScrollbar)


if doesFileExist(image.file) then
image.handle = imgui.CreateTextureFromFile(image.file)
end

if image.handle then
imgui.SetCursorPos(imgui.ImVec2(10, 1))
imgui.Image(image.handle, imgui.ImVec2(100, 100))
end


imgui.EndChild()
 
percheklii

percheklii

Известный
730
268
Stepaa написал(а):
local image = {
file = getWorkingDirectory()..'\\resource\\ava.png',
handle = nil
}



imgui.BeginChild('##asdasdada', imgui.ImVec2(125, 100), false, imgui.WindowFlags.NoScrollbar + imgui.WindowFlags.NoScrollbar + imgui.WindowFlags.NoScrollbar)


if doesFileExist(image.file) then
image.handle = imgui.CreateTextureFromFile(image.file)
end

if image.handle then
imgui.SetCursorPos(imgui.ImVec2(10, 1))
imgui.Image(image.handle, imgui.ImVec2(100, 100))
end


imgui.EndChild()
Нажмите для раскрытия...
Lua: 
local imgui = require("mimgui")
local window = imgui.new.bool(true)

imgui.OnInitialize(function()
    imgui.GetIO().IniFilename = nil
    img = imgui.CreateTextureFromFile(getGameDirectory() .. '\\moonloader\\recource\\123.png') -- Путь к картинке
end)

local newFrame = imgui.OnFrame(function() return window[0] end, function(self)
    local resX, resY = getScreenResolution()
    local sizeX, sizeY = 600, 600
    imgui.SetNextWindowPos(imgui.ImVec2(resX / 2, resY / 2), imgui.Cond.FirstUseEver, imgui.ImVec2(0.5, 0.5))
    imgui.SetNextWindowSize(imgui.ImVec2(sizeX, sizeY), imgui.Cond.FirstUseEver)
    imgui.Begin("test", window)
    imgui.Image(img, imgui.ImVec2(300,300))
    imgui.End()
end)
 
Stepaa

Stepaa

Новичок
13
3
imgui

percheklii написал(а):
Lua: 
local imgui = require("mimgui")
local window = imgui.new.bool(true)

imgui.OnInitialize(function()
    imgui.GetIO().IniFilename = nil
    img = imgui.CreateTextureFromFile(getGameDirectory() .. '\\moonloader\\recource\\123.png') -- Путь к картинке
end)

local newFrame = imgui.OnFrame(function() return window[0] end, function(self)
    local resX, resY = getScreenResolution()
    local sizeX, sizeY = 600, 600
    imgui.SetNextWindowPos(imgui.ImVec2(resX / 2, resY / 2), imgui.Cond.FirstUseEver, imgui.ImVec2(0.5, 0.5))
    imgui.SetNextWindowSize(imgui.ImVec2(sizeX, sizeY), imgui.Cond.FirstUseEver)
    imgui.Begin("test", window)
    imgui.Image(img, imgui.ImVec2(300,300))
    imgui.End()
end)
Нажмите для раскрытия...
у меня на imgui
 
percheklii

percheklii

Известный
730
268
Stepaa написал(а):
imgui


у меня на imgui
Нажмите для раскрытия...
Lua: 
local imgui = require("imgui")
local window = imgui.ImBool(false)
        
function main()
    while not isSampAvailable() do wait(200) end
    imgui.Process = false
    sampgui_texture = imgui.CreateTextureFromFile(getGameDirectory() .. '\\moonloader\\recource\\123.png')
    window.v = true
    while true do
        wait(0)
        imgui.Process = window.v
    end
end
        
function imgui.OnDrawFrame()
    if window.v then
        local resX, resY = getScreenResolution()
        local sizeX, sizeY = 300, 300 -- WINDOW SIZE
        imgui.SetNextWindowPos(imgui.ImVec2(resX / 2 - sizeX / 2, resY / 2 - sizeY / 2), imgui.Cond.FirstUseEver)
        imgui.SetNextWindowSize(imgui.ImVec2(sizeX, sizeY), imgui.Cond.FirstUseEver)
        imgui.Begin('Window Title', window)
        imgui.Image(sampgui_texture, imgui.ImVec2(250, 200))
        imgui.End()
    end
end
 
Yans

Yans

Активный
190
32
Рендерит в 2 стороны

Render: 
local font = renderCreateFont('ShellyAllegroC',13,5)

local massive = {
    [12642] = "Кот",
    [26] = "Турист"
}

function main()
    if not isSampLoaded() or not isSampfuncsLoaded() then return end
    while not isSampAvailable() do wait(100) end
    active = false
    sampRegisterChatCommand("Quest", function() active = not active sampAddChatMessage(active and ("Работаю") or ("Выключен"), 0x5A90CE) end)
    while true do
        wait(0)
        if active then
            for _, v in pairs(getAllChars()) do
                for obj, text in pairs(massive) do
                    if getCharModel(v) == obj then
                        if isCharOnScreen(v) then
                            local pX, pY, pZ = getCharCoordinates(PLAYER_PED)
                            local result, oX, oY, oZ = getCharCoordinates(v)
                            if result then
                                local dist = math.floor(getDistanceBetweenCoords3d(pX, pY, pZ, oX, oY, oZ))
                                local pOSx, pOSy = convert3DCoordsToScreen(pX, pY, pZ)
                                local oOSx, oOSy = convert3DCoordsToScreen(oX, oY, oZ)
                                renderDrawLine(pOSx, pOSy, oOSx, oOSy, 1, 0xFFFFFF00)
                                renderFontDrawText(font, '{669900}'..text..'[{FFFFFF}'..dist..'{669900}]', oOSx, oOSy,-1)
                            end
                        end
                    end
                end
            end
        end
    end
end
 
P

pugovkin228

Участник
33
2
Yans написал(а):
Рендерит в 2 стороны

Render: 
local font = renderCreateFont('ShellyAllegroC',13,5)

local massive = {
    [12642] = "Кот",
    [26] = "Турист"
}

function main()
    if not isSampLoaded() or not isSampfuncsLoaded() then return end
    while not isSampAvailable() do wait(100) end
    active = false
    sampRegisterChatCommand("Quest", function() active = not active sampAddChatMessage(active and ("Работаю") or ("Выключен"), 0x5A90CE) end)
    while true do
        wait(0)
        if active then
            for _, v in pairs(getAllChars()) do
                for obj, text in pairs(massive) do
                    if getCharModel(v) == obj then
                        if isCharOnScreen(v) then
                            local pX, pY, pZ = getCharCoordinates(PLAYER_PED)
                            local result, oX, oY, oZ = getCharCoordinates(v)
                            if result then
                                local dist = math.floor(getDistanceBetweenCoords3d(pX, pY, pZ, oX, oY, oZ))
                                local pOSx, pOSy = convert3DCoordsToScreen(pX, pY, pZ)
                                local oOSx, oOSy = convert3DCoordsToScreen(oX, oY, oZ)
                                renderDrawLine(pOSx, pOSy, oOSx, oOSy, 1, 0xFFFFFF00)
                                renderFontDrawText(font, '{669900}'..text..'[{FFFFFF}'..dist..'{669900}]', oOSx, oOSy,-1)
                            end
                        end
                    end
                end
            end
        end
    end
end
Нажмите для раскрытия...
www.blast.hk

Рендерит зеркально.

if isCarOnScreen(veh) then local x, y, z = getCharCoordinates(1) local vx, vy, vz = getCarCoordinates(veh) local xx, yy = convert3DCoordsToScreen(x, y, z) local vxx, vyy = convert3DCoordsToScreen(vx, vy, vz) renderDrawLine(xx, yy, vxx, vyy, 3, 0xFFFFA07A)...
www.blast.hk www.blast.hk
 
Войдите или зарегистрируйтесь для ответа.

Похожие темы

  1. AnWu
    • Закреплено
    • Статья
    Информация Гайд Всё о Lua скриптинге для MoonLoader
      • Нравится
    Ответы
    49
    Просмотры
    156K
    Lua
    FlouZip
    FlouZip
  2. Frapsy
    • Опрос
    Исходник Полноценный исходник фракционного(МО) скрипта ARP
      • Нравится
    Ответы
    74
    Просмотры
    28K
    Lua
    Frapsy
    Frapsy
  3. PanSeek
    Интервью с Fomikus
      • Нравится
      • Влюблен
    Ответы
    3
    Просмотры
    1K
    Общение
    ChromiusJ
    ChromiusJ
  4. AnWu
    • Закреплено
    Информация Ответы на часто задаваемые вопросы [FAQ]
      • Нравится
      • Влюблен
    Ответы
    19
    Просмотры
    11K
    Lua
    Kusnrchik
    Kusnrchik
  5. PanSeek
    Интервью с chapo
      • Нравится
      • Клоун
    Ответы
    16
    Просмотры
    2K
    Общение
    Стэнфорд
    Стэнфорд
Сверху Снизу