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

 

[Мира]

не тупи, я тебе функцию дал

local t = {}
while true do wait(0)
    for k,v in ipairs(getAllChars()) do
        local myPos = {getCharCoordinates(playerPed)}
        local pPos = {getCharCoordinates(v)}
        if getDistanceBetweenCoords3d(myPos[1], myPos[2], myPos[3], pPos[1], pPos[2], pPos[3]) <= 5 then
            t[#t + 1] = {
                nick = sampGetPlayerNickname(select(2, sampGetPlayerIdByCharHandle(v))),
                id = select(2, sampGetPlayerIdByCharHandle(playerPed))
            }
        end
    end
    for i = 0, #t do
        sampAddChatMessage("Найденные игроки: "..t[i].nick.."["..t[i].id.."]")
    end
end

я так понимаю в local t = {} координаты, но как их записать туда? Z ну нужен был

 

[Corrygan]

Есть команда /leaders, которая показывает лидеров в сети(в чате).
Как сделать чекер лидеров в сети по чекбоксу в интерфейсе? Сказали хукать чат, ещё бы знать как это сделать.

 

[Smeruxa]

норм флудик в чат будет

та просто показал пример вывода :D

 

[Smeruxa]

я так понимаю в local t = {} координаты, но как их записать туда? Z ну нужен был

t[#t + 1] = {
    z = pPos[3]
}

 

[moreveal]

setClipboardText("Русский"), clipboard.settext("Русский") - при CTRL+V выдает кракозябры. Всувывал в кодировке CP1251 и UTF8. Как сделать шоб копировалось нормально с русским?

Все отлично вставляется без мудреностей) Проверь кодировку у самого луашника

 

[Double Tap Inside]

Все отлично вставляется без мудреностей) Проверь кодировку у самого луашника

естесна уже все проверено....

 

[Enlizmee]

как перехватить буллет синхру?

 

[chapo]

как перехватить буллет синхру?

onSendBulletSync

struct BulletSyncData
{
    uint8_t               targetType;
    uint16_t           targetId;
    struct VectorXYZ origin;
    struct VectorXYZ target;
    struct VectorXYZ center;
    uint8_t               weaponId;
}

 

[Corrygan]

Есть команда /leaders, которая показывает лидеров в сети(в чате).
Как сделать чекер лидеров в сети по чекбоксу в интерфейсе? Сказали хукать чат, ещё бы знать как это сделать.

 

[morti.]

Называется регулярные выражения, писал на счет этого тему - https://www.blast.hk/threads/62661/

function samp.onServerMessage(clr, text)
    if text:find("Заработано за рейс: (%d+%.%d+)$") then
        local money = text:match("Заработано за рейс: (%d+%.%d+)$")
    end
end

Слушай, у меня что-то не хочет обновлятся значение переменной в окошке imgui в игре, вот код функции с релулярным выражением, мб тут я что-то начудил:

function hook.onServerMessage(color, text)
 if text:find("Заработано за рейс: (%d+%.%d+)$") then
    local money = text:match('(%d+%.%d+)$')
    zarabotok = zarabotok + money
  end
end

 

[Lamprecht]

При вводе команды с аргументом крашит, в чем проблема? В логе ничего нет

function Test(arg)
    if #arg == 0 then
        dl.AddMessageToChat(4, "false", "", 0xBA55D3, 0xBA55D3)
    else
        dl.AddMessageToChat(4, "True - " .. arg .. " -", "", 0xBA55D3, 0xBA55D3)
    end
end

Команда зарегистрирована так.. с этим не должно быть проблем, ибо другие команды без аргумента не крашит

dl.RegisterClientCommand("test", Test, "test")

Спойлер

SA-MP 0.3DL
Exception At Address: 0x7722A6E2 in KERNELBASE.dll+0x12A6E2
Exception: 0xE24C4A02 - NO_DESCRIPTION

Registers:
EAX: 0x0177E5A0    EBX: 0x06C7B878    ECX: 0x00000000    EDX: 0xE24C4A02
ESI: 0x06C7B878    EDI: 0x06C7F968    EBP: 0x0177E5F8    ESP: 0x0177E5A0
EFLAGS: 0x00200246

Backtrace:
0x7722A6E2 RaiseException+0x62 in KERNELBASE.dll+0x12A6E2
0x71543ADE lua_sethook+0x14E in lua51.dll+0x23ADE
0x71544284 lua_sethook+0x8F4 in lua51.dll+0x24284
0x71543F65 lua_sethook+0x5D5 in lua51.dll+0x23F65
0x71543F95 lua_sethook+0x605 in lua51.dll+0x23F95
0x71534510 lua_yield+0xC320 in lua51.dll+0x14510
0x71534646 lua_yield+0xC456 in lua51.dll+0x14646
0x7156BABA luaopen_debug+0x47A in lua51.dll+0x4BABA
0x7152280D in lua51.dll+0x280D
0x03C694C7 in samp.dll+0x694C7
0x766A23A7 GetTickCount+0x7 in KERNEL32.DLL+0x223A7
0x03C85E7B in samp.dll+0x85E7B
0x03CC6C1F in samp.dll+0xC6C1F
0x03C8448E in samp.dll+0x8448E
0x03C88FB5 in samp.dll+0x88FB5

ASI plugins:
audio.asi
Cleo.asi
colormod.asi
connection.asi
InterfaceEditor.asi
modloader.asi
MoonLoader.asi
mousefix.asi
NormalMapFix.asi
outfit.asi
OutFitFix.asi
samp.asi
SAMPGraphicRestore.asi
ShellFix.asi
StreamMemFix.asi

Cleo:
SkyBoX.cs
SkyBoX2.cs
SkyBoX3.cs
SkyBoX4.cs

Address code: 8B 46 08 8B 80
Before address code: 15 2C 90 59 71

Crash module: lua51.dll
Size: 606208
CRC32: C5307085

Stack:
+0000: 0xE24C4A02   0x00000001   0x00000000   0x7722A6E2
+0010: 0x00000000   0x0000003D   0x22D4C4B8   0x0177E5D8
+0020: 0x06BE2480   0x0000003C   0x06C7B878   0x06C7F988
+0030: 0xFFFFFFFF   0x71541EC5   0x475C3A43   0x53204154
+0040: 0x41206E61   0x6572646E   0x6D5C7361   0x6C6E6F6F
+0050: 0x6564616F   0xEA400FE4   0xFFFFFFFF   0x71543ADE
+0060: 0xE24C4A02   0x00000001   0x00000000   0x00000000
+0070: 0x06C7F978   0x71544284   0x06C7B878   0x06C7F988

Game work: 8 sec

Pos: 273.000000 175.300003 1007.671875

Game Version: US 1.0

Memory: 687 MB
Stream memory: 131/1024 MB

Windows 10 64 bit

 

[Double Tap Inside]

Все отлично вставляется без мудреностей) Проверь кодировку у самого луашника

Короче, если копировать русский текст при английской расскладке, то при вставке будут кракозябры... И как это исправить...

Решение
imgui.SetClipboardText( u8("Русский") )

 

[Tachomi]

Пацаны что делать если У меня Клео работает а Вот Луа нет,
раньше и луа работал но сейчас как то не работает
Все Исходники и Библ есть

 

[Quasper]

Пацаны что делать если У меня Клео работает а Вот Луа нет,
раньше и луа работал но сейчас как то не работает
Все Исходники и Библ есть

moonloader.log кинь, без него тебе никто ничего не скажет

 

[copypaste_scripter]

function main()
if not isSampLoaded() or not isSampfuncsLoaded() then return end
  while not isSampAvailable() do wait(100) end
  while true do
    wait(0)
    setVehicleCameraTweak(526, 0, 0, 0)
  end
end

помогитеееее, сделал эту фигню (пробовал сделать новую камеры для машины) и теперь камера через жопу работает на этом ТС, как починить?