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

Andrinall

Известный
680
532
Как читать и записывать hex(0xFFFFFFFF) цвет через coloredit4?
1678711758496.png

Lua:
local imgui = require 'mimgui'

function explode_argb(argb)
    local a = bit.band(bit.rshift(argb, 24), 0xFF)
    local r = bit.band(bit.rshift(argb, 16), 0xFF)
    local g = bit.band(bit.rshift(argb, 8), 0xFF)
    local b = bit.band(argb, 0xFF)
    return a, r, g, b
end

local a, r, g, b = explode_argb(0xFF55F290)
local col = imgui.new.float[4]( r / 255, g / 255, b / 255, a / 255 )
--[[
    Брать инфу из переменной -
    R = col[0]
    G = col[1]
    B = col[2]
    A = col[3]
]]

imgui.OnInitialize(function() imgui.GetIO().IniFilename = nil end)
imgui.OnFrame(function() return true end, function()
    imgui.Begin("Test")

    imgui.ColorEdit4("Edit", col)

    imgui.End()
end).HideCursor = true
 

zir

Участник
47
0
Покажи как реализовал
Lua:
status = false

function main()
    if not isSampfuncsLoaded() or not isSampLoaded() then return end
    while not isSampAvailable() do wait(100) end
    sampAddChatMessage('{FB7B1F}test', -1)
    sampRegisterChatCommand('tst', function()
        status = not status
        if status then
            sampAddChatMessage('{caa605}On', 0xCAA605)
        else
            sampAddChatMessage('{caa605}Off', 0xCAA605)
        end   
    end)
    while true do wait(0)
        if status == true and state == 1 then
            taskCarDriveToCoord(PLAYER_PED, -1, 419.71548461914, 1553.1573486328, 11.509296417236, 15, 2, null, 4)
            state = 2
        elseif status == true and state == 2 then
            taskCarDriveToCoord(PLAYER_PED, -1, 398.26593017578, 1553.1186523438, 11.506862640381, 15, 2, null, 4)
        end   
    end
end
 

YarikVL

Известный
Проверенный
4,798
1,814
Lua:
status = false

function main()
    if not isSampfuncsLoaded() or not isSampLoaded() then return end
    while not isSampAvailable() do wait(100) end
    sampAddChatMessage('{FB7B1F}test', -1)
    sampRegisterChatCommand('tst', function()
        status = not status
        if status then
            sampAddChatMessage('{caa605}On', 0xCAA605)
        else
            sampAddChatMessage('{caa605}Off', 0xCAA605)
        end  
    end)
    while true do wait(0)
        if status == true and state == 1 then
            taskCarDriveToCoord(PLAYER_PED, -1, 419.71548461914, 1553.1573486328, 11.509296417236, 15, 2, null, 4)
            state = 2
        elseif status == true and state == 2 then
            taskCarDriveToCoord(PLAYER_PED, -1, 398.26593017578, 1553.1186523438, 11.506862640381, 15, 2, null, 4)
        end  
    end
end
У тебя переменная state не имеет значения 1 и поэтому условие не выполняется
В taskCarDriveToCoord вторым аргументом надо хендл тачки записать: https://wiki.blast.hk/ru/moonloader/lua/storeCarCharIsInNoSave
А в предпоследнем аргументе напиши nil а не null
Ну и желательно удали дробовые числа, оставь целые типо 398,1553,11
 

percheklii

Известный
730
268
Посмотреть вложение 193392
Lua:
local imgui = require 'mimgui'

function explode_argb(argb)
    local a = bit.band(bit.rshift(argb, 24), 0xFF)
    local r = bit.band(bit.rshift(argb, 16), 0xFF)
    local g = bit.band(bit.rshift(argb, 8), 0xFF)
    local b = bit.band(argb, 0xFF)
    return a, r, g, b
end

local a, r, g, b = explode_argb(0xFF55F290)
local col = imgui.new.float[4]( r / 255, g / 255, b / 255, a / 255 )
--[[
    Брать инфу из переменной -
    R = col[0]
    G = col[1]
    B = col[2]
    A = col[3]
]]

imgui.OnInitialize(function() imgui.GetIO().IniFilename = nil end)
imgui.OnFrame(function() return true end, function()
    imgui.Begin("Test")

    imgui.ColorEdit4("Edit", col)

    imgui.End()
end).HideCursor = true
Чет не получается получить, записать цвет в ini =(

Код:
script_name"test"

local imgui = require 'mimgui'
local inicfg = require ("inicfg")
local font = renderCreateFont('Arial', 10, 13)

local path = getWorkingDirectory() .. "\\config\\test.ini"
local ini = inicfg.load({
    hp = {
        color = 0xFF55F290
    }
}, path)

    function main()
        if not doesDirectoryExist("moonloader\\config") then
            createDirectory("moonloader\\config")
        end
       
        if not doesFileExist(thisScript().name .. ".ini") then
            inicfg.save(ini, thisScript().name .. ".ini")
        end
   
        while true do wait(0)
            renderFontDrawText(font, "test", 300, 300, ini.hp.color)
        end
    end

function explode_argb(argb)
    local a = bit.band(bit.rshift(argb, 24), 0xFF)
    local r = bit.band(bit.rshift(argb, 16), 0xFF)
    local g = bit.band(bit.rshift(argb, 8), 0xFF)
    local b = bit.band(argb, 0xFF)
    return a, r, g, b
end

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

local a, r, g, b = explode_argb(ini.hp.color)
local col = imgui.new.float[4]( r / 255, g / 255, b / 255, a / 255 )
--[[
    Брать инфу из переменной -
    R = col[0]
    G = col[1]
    B = col[2]
    A = col[3]
]]

imgui.OnInitialize(function() imgui.GetIO().IniFilename = nil end)
imgui.OnFrame(function() return true end, function()
    imgui.Begin("Test")

    if imgui.ColorEdit4("Edit", col) then
        ini.hp.color = join_argb(col[0], col[1], col[2], col[4])
        inicfg.save(ini, path)
    end

    imgui.End()
end).HideCursor = true
 
Последнее редактирование:

alifeduse

Активный
144
25
Чет не получается получить, записать =(

Код:
script_name"test"

local imgui = require 'mimgui'
local inicfg = require ("inicfg")
local font = renderCreateFont('Arial', 10, 13)

local path = getWorkingDirectory() .. "\\config\\test.ini"
local ini = inicfg.load({
    hp = {
        color = 0xFF55F290
    }
}, path)

    function main()
        if not doesDirectoryExist("moonloader\\config") then
            createDirectory("moonloader\\config")
        end
     
        if not doesFileExist(thisScript().name .. ".ini") then
            inicfg.save(ini, thisScript().name .. ".ini")
        end
 
        while true do wait(0)
            renderFontDrawText(font, "test", 300, 300, ini.hp.color)
        end
    end

function explode_argb(argb)
    local a = bit.band(bit.rshift(argb, 24), 0xFF)
    local r = bit.band(bit.rshift(argb, 16), 0xFF)
    local g = bit.band(bit.rshift(argb, 8), 0xFF)
    local b = bit.band(argb, 0xFF)
    return a, r, g, b
end

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

local a, r, g, b = explode_argb(ini.hp.color)
local col = imgui.new.float[4]( r / 255, g / 255, b / 255, a / 255 )
--[[
    Брать инфу из переменной -
    R = col[0]
    G = col[1]
    B = col[2]
    A = col[3]
]]

imgui.OnInitialize(function() imgui.GetIO().IniFilename = nil end)
imgui.OnFrame(function() return true end, function()
    imgui.Begin("Test")

    if imgui.ColorEdit4("Edit", col) then
        ini.hp.color = join_argb(col[0], col[1], col[2], col[4])
        inicfg.save(ini, path)
    end

    imgui.End()
end).HideCursor = true
не знаю как закрыть, взял с кода который кидали
 

Вложения

  • kakayatozalupa.lua
    753 байт · Просмотры: 3
Последнее редактирование:

zir

Участник
47
0
У тебя переменная state не имеет значения 1 и поэтому условие не выполняется
В taskCarDriveToCoord вторым аргументом надо хендл тачки записать: https://wiki.blast.hk/ru/moonloader/lua/storeCarCharIsInNoSave
А в предпоследнем аргументе напиши nil а не null
Ну и желательно удали дробовые числа, оставь целые типо 398,1553,11
Lua:
status = false
state = 1

function main()
    if not isSampfuncsLoaded() or not isSampLoaded() then return end
    while not isSampAvailable() do wait(100) end
    sampAddChatMessage('{FB7B1F}test', -1)
    sampRegisterChatCommand('tst', function()
        status = not status
        if status then
            sampAddChatMessage('{caa605}On', 0xCAA605)
        else
            sampAddChatMessage('{caa605}Off', 0xCAA605)
        end   
    end)
    while true do wait(0)
        if status == true and state == 1 then
            taskCarDriveToCoord(PLAYER_PED, -1, -706, 941, 11, 15, 2, nil, 4)
            state = 2
        elseif status == true and state == 2 then
            taskCarDriveToCoord(PLAYER_PED, -1, -691, 980, 11, 15, 2, nil, 4)                   
        end   
    end
end

Сделал так, но все равно почему-то едет только на одну координату
 

alifeduse

Активный
144
25
приветствую, можно ли как-то сделать чтобы при нажатии на Z бег на рп педе становился стандартным? сам луа делает бег сиджея на всех педах
Lua:
 script_name("cj run")
script_author("rockstar games")
require "lib.moonloader"

function main()
  while true do
    wait(0)
    if isKeyDown(VK_Z) and isPlayerPlaying(playerHandle) then
      local m = require("memory")
      m.setuint8(sampGetServerSettingsPtr(), 1)
      while isKeyDown(VK_Z) do wait(100) end
    end
  end
end
?
 

Dmitriy Makarov

25.05.2021
Проверенный
2,478
1,113
Ну, во-первых, убери подключение библиотеки memory при зажатии клавиши. Строку ниже, наверное, тоже нужно убрать.
А во-вторых, можно отсюда код взять и внедрить в свой.
 

alifeduse

Активный
144
25
Ну, во-первых, убери подключение библиотеки memory при зажатии клавиши. Строку ниже, наверное, тоже нужно убрать.
А во-вторых, можно отсюда код взять и внедрить в свой.
не помогло
 

Strand

Участник
48
27
Есть идеи как улучшить это дерьмо?
Жопа:
local group = {
    ['0049FF'] = 'pd', ['004EFF'] = 'sfpd', ['FF7E7E'] = 'mc', ['CCFF00'] = 'gov',
    ['BDBDBD'] = 'fp', ['FF6633'] = 'ml', ['FF8000'] = 'cnn', ['996633'] = 'arm',
    ['298CB7'] = 'cb', ['009327'] = 'gs', ['D1DB1C'] = 'vag', ['CC00CC'] = 'bal',
    ['00FFE2'] = 'azt', ['6666FF'] = 'rifa', ['336699'] = 'rm', ['960202'] = 'ykz',
    ['993366'] = 'lcn', ['BA541D'] = 'wmc', ['A87878'] = 'nw', ['4682B4'] = 'ins',
    ['CFAF46'] = 'trb'
}

local orgs = {
    {'none', false},
    {'Полиция ЛС', true, 'pd'}, {'RCSD', true, 'pd'}, {'Полиция SF', true, 'sfpd'}, {'Больница LS', true, 'mc'},
    {'Больница LV', true, 'mc'}, {'Правительство', true, 'gov'}, {'Тюрьма Строгого режима LV', true, 'fp'}, {'Больница SF', true, 'mc'},
    {'Лицензеры', true, 'ml'}, {'Radio LS', true, 'cnn'}, {'Армия LS', true, 'arm'}, {'Центральный Банк', true, 'cb'},
    {'Полиция LV', true, 'pd'}, {'Radio LV', true, 'cnn'}, {'Radio SF', true, 'cnn'}, {'Армия SF', true, 'arm'},
    {'Grove Street', true, 'gs'}, {'Vagos Family', true, 'vag'}, {'East Side Ballas', true, 'bal'}, {'Varrios Los Aztecas', true, 'azt'},
    {'The Rifa Gang', true, 'rifa'}, {'Russian Mafia', true, 'rm'}, {'Yakuza', true, 'ykz'}, {'La Cosa Nostra', true, 'lcn'},
    {'Warlock MC', true, 'wmc'}, {'Night Wolves', true, 'nw'}, {'Таксисты', false}, {'Механики', false},
    {'Дальнобойщики', false}, {'Налоговая служба', false}, {'Адвокаты', false}, {'Страховая Компания', true, 'ins'},
    {'Tierra Robada Bikers', true, 'trb'}, {'Больница Jefferson', true, 'mc'}
}

local function getColor(id)
    return ("%06X"):format(bit.band(sampGetPlayerColor(id), 0xFFFFFF))
end

local col = group[getColor(playerId)]

for i = 1, #orgs do
    if not orgs[i][2] or col ~= orgs[i][3] and col ~= nil then goto continue end
    --Поиск игрока в организациях
    ::continue::
end
 
Последнее редактирование:

sssilvian

Активный
230
25
Как мне сделать так, чтобы когда мод обнаружит это в чате: "You gave Hyndrus a Flying License." он печатает "/stoplessson Hyndrus" ?
 

santyy13gg

Новичок
9
1
как сделать скрипт, который находит всю информацию о выбитых тачках из ларцов и записывает в txt?