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

 

[Smeruxa]

как создавать текстдрав не через sampTextdrawCreate?

Может не просто так эта функция придумана?

 

[вайега52]

как создавать текстдрав не через sampTextdrawCreate?

Попробуй эмулировать рпс о текстдраве
{134, {"textdrawId", "int16"}, {"flags", "int8"}, {"letterWidth", "float"}, {"letterHeight", "float"}, {"letterColor", "int32"}, {"lineWidth", "float"}, {"lineHeight", "float"}, {"boxColor", "int32"}, {"shadow", "int8"}, {"outline", "int8"}, {"backgroundColor", "int32"}, {"style", "int8"}, {"selectable", "int8"}, {"position", "vector2d"}, {"modelId", "int16"}, {"rotation", "vector3d"}, {"zoom", "float"}, {"color", "int32"}, {"text", "string16"}, description = "Показывает TextDraw."}, - его структура

 

[вайега52]

как юзать это хз

объявляешь битстрим, заполняешь его, эмулируешь 134 rpc

Эксклюзив - RakLua — RakNet hooks, functions for MoonLoader

Представляю вам RakLua. RakLua — это новая библиотека, которая служит заменой событиям и функциям SAMPFUNCS для взаимодействия с RakNet'ом и BitStream — классом, позволяющим SAMPy отправлять/получать данные от сервера. Библиотека использует sol3 для биндинга C++ (самой библиотеки) и самого...

www.blast.hk

Информация - Гайд - Эмуляция RPC, заполнение BitStream для кипятильников

Всем салам, в этой "статье" я попытаюсь объяснить как эмулировать получение RPC, а так же как "заполнить" битстрим. Для начала нам необходимо найти айди и содержимое RPC, получение которого мы будем эмулировать. Для этого перейдем по этой ссылке. Лично я выберу RPC 153 (установка скина игроку)...

www.blast.hk

 

[Мандрагора]

Вот есть цикл и в нем еное кол-во кнопок.
Есть условие, при котором цвет кнопок будет изменен через imgui.PushStyleColor, но изменяется он для всех сразу, а нужно для одной.
Через цикл это можно сделать или нужно на отдельную кнопку флаг вешать?

 for i = 1, 9 do
    if tb[i] and tonumber(tb[i]) > tb[251] then
      tb[252] = imgui.ImVec4(1.96, 0.24, 0.24, 1.00)
    else
      tb[252] = imgui.ImVec4(0.00, 2.04, 0.03, 0.90)
    end

    imgui.PushStyleColor(imgui.Col.Text, tb[252])
        if imgui.Button(tb[i], imgui.ImVec2(58, 16)) then sampSendChat("/pursuit " .. tb[i]) end
    imgui.PopStyleColor()
end

 

[вайега52]

function onSendPacket(id, bs, priority, reliability, orderingChannel)
    -- ..
end

function onReceivePacket(id, bs)
    -- ..
end

В этих функциях первый аргумент id пакета, а второй битстрим, так вот, в битстриме первый байт - это id пакета, мне интересно, откуда берется первый аргумент, и могу ли я пропускать 8 битов при записи/чтении исходящих/входящих пакетов?

нашел в самп эвентсе этот пакет, нигде не могу найти о нем инфы, шо эт?

OUTCOMING_PACKETS[PACKET.AUTHENTICATION] = {'onSendAuthenticationResponse', {response = 'string8'}}

Опять нашел в эвентсе следующий пакет:

INCOMING_PACKETS[PACKET.CONNECTION_ATTEMPT_FAILED] = {'onConnectionAttemptFailed'}

Нашел его ID тут и с помощью функции raknetGetPacketName(35) пытаюсь получить его название, но возвращает nil, шо делать?)

 

[Мандрагора]

Не воспроизводятся звуки через setAudioStreamState. Лаунчер АРЗ, моон 26.5.

function main()
    while not isSampAvailable() do wait(0) end
    local boolsound, sound = loadAudioStream("moonloader\\sound\\SoundRadar.mp3")
  while true do
      wait(0)
  end
end
-- где-то при активации окна имгуи
if tb[20].v then --главное окно
  lua_thread.create(function()
    wait(100)
    if boolsound then
      setAudioStreamState(sound, 1)
    end
  end)
end

 

[Sadow]

Как можно сделать закрытие/открытие имгуи окна только по команде? Не по нажатию на крестик

 

[вайега52]

Как можно сделать закрытие/открытие имгуи окна только по команде? Не по нажатию на крестик

как ты будешь закрывать на крестик, если имгуи окно закрыто?

 

[chapo]

Как можно сделать закрытие/открытие имгуи окна только по команде? Не по нажатию на крестик

в imgui.Begin в качестве второго аргумента (вместо переменной окна) введи nil, тогда крестика не будет

 

[Мандрагора]

Как можно сделать закрытие/открытие имгуи окна только по команде? Не по нажатию на крестик

Скрыть тайт через флаг, вроде NoTitleBar. Тогда закрыть можно будет только через команду или отдельную кнопку.

 

[вайега52]

как ты будешь закрывать на крестик, если имгуи окно закрыто?

Не так прочитал. Как написал выше Чапо, просто не указывай переменную окна в бегин

 

[Sadow]

Как сделать так чтобы в аргумент команды можно было вписать цифренное значение? И как сделать поиск в list диалоге и выбрать нужный пункт? И как сделать кнопки в самом внизу Imgui окна и как их сделать на всю ширину Imgui окна? И как выводить все данные записанные в .ini файле? Например в mainIni.config.

 

[halfastrc]

Why the licence don't got expired?

local https = require 'ssl.https'
local effil = require 'effil'
local sampev = require 'lib.samp.events'

function main()
    while not isSampAvailable() do wait(0) end
end

function getTime(timezone)
    local time = https.request('http://alat.specihost.com/unix-time/')
    return time and tonumber(time:match('^Current Unix Timestamp: <b>(%d+)</b>')) + (timezone or 0) * 60 * 60
end

local time = getTime(3)

if os.date('%d %m %Y', time) <= os.date('01 11 2022', time) then --Verify the date, if is <= 01 11 2022 then licence got expired, but this doesn't work properly, and I got the Available licence
    sampAddChatMessage('Expired', -1)
else
    sampAddChatMessage('Available', -1)
end

 

[вайега52]

В mimgui и moon imgui есть такая штука, что когда у тебя открыто окно, то при взаимодействии с пакетами и рпц игре становиться плохо (может зависнуть намертво, может застопить персонажа и всякая такая хрень). Из-за чего это происходит и можно-ли это как-то фикс, если не брать способ с закрытием окна?

 

[deleted-user-139653]

Как сделать выравнивание текста по правой стороне? По дефолту вроде бы выравнивание по левой

function main()
    if not isSampfuncsLoaded() or not isSampLoaded() then return end
    while not isSampAvailable() do wait(0) end
    font = renderCreateFont(Arial, 10, 13)

while true do
    wait(0)
        _, id = sampGetPlayerIdByCharHandle(playerPed)
        health = sampGetPlayerHealth(id)
        renderFontDrawText(font, string.format("%d", health), 1161, 112, -1)
    end
end