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

 

[chapo]

Ребят, написал скрипт (lua) который на команду /ctc чистит чат. Это мой первый скрипт, не судите строго.
Подскажите, как можно подправить код, чтобы это был не говнокод.

script_name('Очистка чата')
script_author('Берегите природу!')

local q = require 'lib.samp.events'

function main()
    repeat wait(0) until isSampAvailable()
    sampRegisterChatCommand("ctc", function() state = not state
        sampAddChatMessage((state and ' ' or ' '), -1)
        sampAddChatMessage((state and ' ' or ' '), -1)
        sampAddChatMessage((state and ' ' or ' '), -1)
        sampAddChatMessage((state and ' ' or ' '), -1)
        sampAddChatMessage((state and ' ' or ' '), -1)
        sampAddChatMessage((state and ' ' or ' '), -1)
        sampAddChatMessage((state and ' ' or ' '), -1)
        sampAddChatMessage((state and ' ' or ' '), -1)
        sampAddChatMessage((state and ' ' or ' '), -1)
        sampAddChatMessage((state and ' ' or ' '), -1)
    end)
    sampAddChatMessage("{32CD32}Берегите природу!{32CD32}{ffffff}{ffffff} Очистка чата /ctc",-1)
end

function main()
    while not isSampAvailable() do wait(0) end
    sampRegisterChatCommand('ctc', function()
        for _ = 1, 100 do sampAddChatMessage('', -1) end
    end)
    wait(-1)
end

 

[why ega]

Ребят, написал скрипт (lua) который на команду /ctc чистит чат. Это мой первый скрипт, не судите строго.
Подскажите, как можно подправить код, чтобы это был не говнокод.

script_name('Очистка чата')
script_author('Берегите природу!')

local q = require 'lib.samp.events'

function main()
    repeat wait(0) until isSampAvailable()
    sampRegisterChatCommand("ctc", function() state = not state
        sampAddChatMessage((state and ' ' or ' '), -1)
        sampAddChatMessage((state and ' ' or ' '), -1)
        sampAddChatMessage((state and ' ' or ' '), -1)
        sampAddChatMessage((state and ' ' or ' '), -1)
        sampAddChatMessage((state and ' ' or ' '), -1)
        sampAddChatMessage((state and ' ' or ' '), -1)
        sampAddChatMessage((state and ' ' or ' '), -1)
        sampAddChatMessage((state and ' ' or ' '), -1)
        sampAddChatMessage((state and ' ' or ' '), -1)
        sampAddChatMessage((state and ' ' or ' '), -1)
    end)
    sampAddChatMessage("{32CD32}Берегите природу!{32CD32}{ffffff}{ffffff} Очистка чата /ctc",-1)
end

1) Зачем тебе тернарные операторы, если в любом случае будет выведено одно и тоже (хотя у тя даже переменной state нема)?

(state and ' ' or ' ')

2) Зачем ты подключил библиотеку samp.events, если нигде не используешь ее?
3) Не стоит повторять одну строчку несколько раз, для этого есть циклы:

for i = 1, 10 do
    sampAddChatMessage((state and ' ' or ' '), -1) -- лучше эту строчку подкорректировать, как я сказал в 1 пункте
end

4) Да и если твоя цель очистить чат, то лучше воспользоваться специальной функцией:

function clearChat()
    local pChat = sampGetChatInfoPtr()
    memory.fill(pChat + 306, 0x0, 25200)
    memory.write(pChat + 306, 25562, 4, 0x0)
    memory.write(pChat + 0x63DA, 1, 1)
end

---

Готовый код:

--[[
    Также стоит придерживаться единого стиля.
    В 6 и 7 строке у тебя '', а в 12 "".
    Лично я всегда использую ""
]]

script_name('Очистка чата')
script_author('Берегите природу!')

function main()
    repeat wait(0) until isSampAvailable()
    sampRegisterChatCommand("ctc", clearChat)
    sampAddChatMessage("{32CD32}Берегите природу!{32CD32}{ffffff}{ffffff} Очистка чата /ctc", -1)
end

function clearChat()
    local pChat = sampGetChatInfoPtr()
    memory.fill(pChat + 306, 0x0, 25200)
    memory.write(pChat + 306, 25562, 4, 0x0)
    memory.write(pChat + 0x63DA, 1, 1)
end

 

[Julimba]

qq, такой трабл, решил попробовать mimgui
взял с инета где то базовое мимгуи окно, все запускает и все работает, после того как меняю кодировку файла на windows 1251 все последующие изменения в скрипте не отображаются в игре, в чем проблема? P.S. изменения касаемые размера и т.п. мимгуи окна

 

[Andrinall]

а как цифры эти достать чтобы умножить?

local temp = colors[clr.WindowBg]
local t = ("{%06X}"):format(
    bit.band(
        bit.bor(
            bit.lshift(temp.x * 255, 16),
            bit.lshift(temp.y * 255, 8),
            bit.lshift(temp.z * 255, 0)
        ),
        0xFFFFFF
    )
)
print(t)

 

[Revavi]

Как в mimgui на fAwesome 6 изменять размер значка? если просто менять размер шрифта, то вместо значка отображается вопросительный знак

 

[Andrinall]

Как в mimgui на fAwesome 6 изменять размер значка? если просто менять размер шрифта, то вместо значка отображается вопросительный знак

Что-то вроде такого получается.

function imgui.TextResized(font, size, text)
	if not font or not size or not text or size <= 0.0 or #text == 0 then return end
	local style = imgui.GetStyle()
	imgui.GetWindowDrawList():AddTextFontPtr(font, size, imgui.GetCursorScreenPos(), imgui.ColorConvertFloat4ToU32(style.Colors[imgui.Col.Text]), text)
	imgui.SetCursorPosY(imgui.GetCursorPos().y + size + style.ItemSpacing.y)
end

Спойлер: микропример

imgui.OnFrame(function() return true end, function()
	imgui.Text("Test function\n====================")
	for i = 0, 20 do
		imgui.TextResized(imgui.GetFont(), i, "tested resized text ["..i.."]")
	end
	imgui.Text("==================\nend test")
end).HideCursor = true

 

[Revavi]

Что-то вроде такого получается.

function imgui.TextResized(font, size, text)
    if not font or not size or not text or size <= 0.0 or #text == 0 then return end
    local style = imgui.GetStyle()
    imgui.GetWindowDrawList():AddTextFontPtr(font, size, imgui.GetCursorScreenPos(), imgui.ColorConvertFloat4ToU32(style.Colors[imgui.Col.Text]), text)
    imgui.SetCursorPosY(imgui.GetCursorPos().y + size + style.ItemSpacing.y)
end

Спойлер: микропример

imgui.OnFrame(function() return true end, function()
    imgui.Text("Test function\n====================")
    for i = 0, 20 do
        imgui.TextResized(imgui.GetFont(), i, "tested resized text ["..i.."]")
    end
    imgui.Text("==================\nend test")
end).HideCursor = true

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

он конечно увеличивает, но очень качество теряется, а это глаза режет
других вариантов нет?

 

[Andrinall]

он конечно увеличивает, но очень качество теряется, а это глаза режет
других вариантов нет?

Загрузить несколько шрифтов с разным размером, но это достаточно сильно ударит по использованию ОЗУ, если не указывать только нужный glyph_range, а не сразу весь для всех иконок.
Даже с загрузкой 1 иконочного шрифта достаточно много сжирает оперативы.

upd: нашёл вот такое, попробуй переделать под себя

imgui fonts

как в real time менять шрифт-размер шрифта(IMGUI)

www.blast.hk

 

[Viem]

Парни, подскажите как поймать появление редактора

Знаю что это 116 ped, 117 обычный Rpc, если кто может , нужно его обработать и вытащить ид объекта на который он сработал, либо может уже есть существующие функции?



UPD:

onReceiveRpc


if id == 117 then
local playerObject = raknetBitStreamReadBool(bitStream)
local objectId = raknetBitStreamReadInt16(bitStream)
local response = raknetBitStreamReadInt32(bitStream)
local position_X = raknetBitStreamReadFloat(bitStream)
local position_Y = raknetBitStreamReadFloat(bitStream)
local position_Z = raknetBitStreamReadFloat(bitStream)
local rotation_X = raknetBitStreamReadFloat(bitStream)
local rotation_Y = raknetBitStreamReadFloat(bitStream)
local rotation_Z = raknetBitStreamReadFloat(bitStream)
end

 

[riverya4life]

Как в mimgui на fAwesome 6 изменять размер значка? если просто менять размер шрифта, то вместо значка отображается вопросительный знак

Меняй размер шрифта, который юзаешь вместе с иконками

 

[Julimba]

qq, в чем трабл, при нажатии сохраняет все в ини кфг, но если где то будет пропущено какое то значение, то ничего не должно сохраняться, но оно сохраняет в любом случае почему то. Хелп плз

if imgui.Button(u8'Сохранить') then
sampAddChatMessage(tag.. 'Изменения сохранены', -1)
mainIni.config.OPG = u8:decode(buffer1.v)
mainIni.config.GHETTO = u8:decode(buffer2.v)
mainIni.config.GOS = u8:decode(buffer3.v)
mainIni.config.PLAYERS = u8:decode(buffer4.v)
inicfg.save(mainIni, directIni)
elseif buffer1.v == nil and buffer2.v == nil and buffer3.v == nil and buffer4.v == nil then
sampAddChatMessage(tag.. 'Дурак, ты не вписал значения', -1)
end

 

[chapo]

qq, в чем трабл, при нажатии сохраняет все в ини кфг, но если где то будет пропущено какое то значение, то ничего не должно сохраняться, но оно сохраняет в любом случае почему то. Хелп плз

if imgui.Button(u8'Сохранить') then
sampAddChatMessage(tag.. 'Изменения сохранены', -1)
mainIni.config.OPG = u8:decode(buffer1.v)
mainIni.config.GHETTO = u8:decode(buffer2.v)
mainIni.config.GOS = u8:decode(buffer3.v)
mainIni.config.PLAYERS = u8:decode(buffer4.v)
inicfg.save(mainIni, directIni)
elseif buffer1.v == nil and buffer2.v == nil and buffer3.v == nil and buffer4.v == nil then
sampAddChatMessage(tag.. 'Дурак, ты не вписал значения', -1)
end

"buffer" никогда не будет nil, его длина будет 0, так что вместо buffer1.v == nil пиши if #buffer1.v > 0 and #buffer2.v > 0 и тд

 

[lucifertakaxasi]

Как читать кириллицу из файла? Менял кодировку файла на ANSI, но при изменении чего-либо кодировка возвращается обратно на UTF-8. Как можно это изменить?

 

[joumey]

Как читать кириллицу из файла? Менял кодировку файла на ANSI, но при изменении чего-либо кодировка возвращается обратно на UTF-8. Как можно это изменить?

Меняй на Windows 1251

 

[F.Fox]

Как сделать мини-скрипт, который бы раз в минуту отправлял текст в чат и нажимал бы кнопку энтер постоянно?