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

 

[мистер вселенная]

есть ли функция, которая возвращает название модели?

 

[DedPoet]

это так не работает блять, onChatMessage не видит сообщения клиента


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

local ffi = require('ffi')
local hook = require("hooks")
local Count = { Full = 0, Respond = 0 }

function main()
    sampChatHook = hook.jmp.new("void(__thiscall *)(uintptr_t this, uint32_t type, const char* text, const char* prefix, uint32_t color, uint32_t pcolor)", sampChatHook, getModuleHandle('samp.dll') + 0x64010)
    wait(-1)
end

function sampChatHook(this, type, text, prefix, color, pcolor)
    local text = ffi.string(text)
    print(text)
    if text:find('^The server is full%. Retrying%.%.%.') then
        Count.Full = Count.Full + 1
        return sampChatHook(this, type, ffi.cast('char*', ffi.string(text)..' (x'..tostring(Count.Full)..')'), prefix, color, pcolor)
    elseif text:find('^The server didn\'t respond%. Retrying%.%.') then
        Count.Respond = Count.Respond + 1
        return sampChatHook(this, type, ffi.cast('char*', ffi.string(text)..' (x'..tostring(Count.Respond)..')'), prefix, color, pcolor)
    end
    sampChatHook(this, type, text, prefix, color, pcolor)
end

нужна библиотека hooks (https://www.blast.hk/threads/55743/) и работает только на R1 (для других нужны другие адреса)

если имгуи окно перестало реагировать, как реанимировать?

 

[Botik228]

Приветствую
Хочу сделать простого бота для ракбота,но луа вообще не занимаюсь,и мало шарю
Нужен шаблончик,куда я смогу вставить список координат (200+ штук),и он будет телепортироваться по каждому из них в рандомном порядке (или по очереди хотя бы),и тыкать alt
Кому не сложно,сделайте пожалуйста шаблончик :)🥺

Активация не важна,будь то команда,или сразу после спавна персонажа

upd: Планирую юзать на raksamp Lite поскольку там тп на много быстрее и не кикает
Но можно и на обычном хотя бы(

Up

 

[ARMOR]

это так не работает блять, onChatMessage не видит сообщения клиента


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

local ffi = require('ffi')
local hook = require("hooks")
local Count = { Full = 0, Respond = 0 }

function main()
    sampChatHook = hook.jmp.new("void(__thiscall *)(uintptr_t this, uint32_t type, const char* text, const char* prefix, uint32_t color, uint32_t pcolor)", sampChatHook, getModuleHandle('samp.dll') + 0x64010)
    wait(-1)
end

function sampChatHook(this, type, text, prefix, color, pcolor)
    local text = ffi.string(text)
    print(text)
    if text:find('^The server is full%. Retrying%.%.%.') then
        Count.Full = Count.Full + 1
        return sampChatHook(this, type, ffi.cast('char*', ffi.string(text)..' (x'..tostring(Count.Full)..')'), prefix, color, pcolor)
    elseif text:find('^The server didn\'t respond%. Retrying%.%.') then
        Count.Respond = Count.Respond + 1
        return sampChatHook(this, type, ffi.cast('char*', ffi.string(text)..' (x'..tostring(Count.Respond)..')'), prefix, color, pcolor)
    end
    sampChatHook(this, type, text, prefix, color, pcolor)
end

нужна библиотека hooks (https://www.blast.hk/threads/55743/) и работает только на R1 (для других нужны другие адреса)

Вот адреса для всех версий САМПа

local sampVer = {
R1 = 0x64010, -- Ну, у тебя указано уже...
R2 = 0x640E0,
R3 = 0x67460,
R4 = 0x67BE0,
DL = 0x67650}

 

[Revavi]

Что делать, если при запуске wait(5000) в цикле for выдёт ошибку?

attempt to yield across C-call boundary
stack traceback:
    [C]: in function 'wait'

 

[ARMOR]

Что делать, если при запуске wait(5000) в цикле for выдёт ошибку?

attempt to yield across C-call boundary
stack traceback:
    [C]: in function 'wait'

Фулл код дай

 

[Revavi]

Фулл код дай

for ad in string.gmatch(adText.v, "[^/]+") do
        if #ad > 89 then
            msg('/fam '..string.sub(ad, 1, 89))
            wait(5000)
        else
            msg('/fam '..ad)
            wait(5000)
        end
    end

 

[Rice.]

for ad in string.gmatch(adText.v, "[^/]+") do
        if #ad > 89 then
            msg('/fam '..string.sub(ad, 1, 89))
            wait(5000)
        else
            msg('/fam '..ad)
            wait(5000)
        end
    end

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

 

[ARMOR]

Как получить версию SAMP?

 

[sizeoftrickster]

Как получить версию SAMP?

По EntryPoint, у каждой версии он разный 😉

 

[chapo]

как изменить раскладку клавиатуры без эмуляции нажатия SHIFT + ALT?

 

[F0RQU1N and]

как изменить раскладку клавиатуры без эмуляции нажатия SHIFT + ALT?

сообщение WM_INPUTLANGCHANGEREQUEST (Winuser.h) - Win32 apps

Отображается в окне с фокусом, когда пользователь выбирает новый язык ввода с помощью горячей клавиши (указанной в приложении панели управления клавиатуры) или из индикатора на системной панели задач.

docs.microsoft.com

 

[sizeoftrickster]

как изменить раскладку клавиатуры без эмуляции нажатия SHIFT + ALT?

require( "moonloader" )

local ffi = require( "ffi" )

ffi.cdef[[
    typedef unsigned int BOOL;
    typedef void *HWND;
    typedef unsigned int UINT;
    typedef unsigned int LONG;

    typedef UINT UINT_PTR, *PUINT_PTR;
    typedef LONG        LONG_PTR, *PLONG_PTR;


    typedef UINT_PTR WPARAM;
    typedef LONG_PTR LPARAM;


    // https://docs.microsoft.com/en-us/windows/win32/api/winuser/nf-winuser-postmessagea
    BOOL PostMessageA(
        HWND hWnd,
        UINT Msg,
        WPARAM wParam,
        LPARAM lParam
    );

    // https://docs.microsoft.com/en-us/windows/win32/api/winuser/nf-winuser-getactivewindow
    HWND GetActiveWindow();
]]

function main()

    sampRegisterChatCommand("emulShiftAlt=)", function()
        local hWnd = ffi.C.GetActiveWindow()
        local WM_INPUTLANGCHANGEREQUEST = 0x0050
        local INPUTLANGCHANGE_SYSCHARSET = 0x0001
        -- полный список https://docs.microsoft.com/en-us/windows/win32/msi/localizing-the-error-and-actiontext-tables
        local english = 0x409
        local russian = 0x419

        ffi.C.PostMessageA(
            hWnd,
            WM_INPUTLANGCHANGEREQUEST,
            INPUTLANGCHANGE_SYSCHARSET,
            russian -- или же english
        )

    end)

   wait( -1 )
end

 

[Andrinall]

Как получить версию SAMP?

Уже не помню откуда я это брал, лежало в одном из скриптов.
Вроде из полезных сниппетов когда-то выцепил с какой-то переделкой.

function get_samp_version()
    local versions = { [0x31df13]="0.3.7-R1", [0xcc4d0]="0.3.7-R3", [0xcbcb0]="0.3.7-R4", [0xfdb60]="0.3.DL-R1" }
    local samp_base = getModuleHandle("samp.dll")
    if samp_base == 0 then return "not loaded" end
   
    local e_lfanew = ffi.cast("long*", samp_base + 60)[0]
    local nt_header = samp_base + e_lfanew
    local entry_point_addr = ffi.cast("unsigned int*", nt_header + 40)[0]
    return (versions[entry_point_addr] ~= nil and versions[entry_point_addr] or "unknown")
end

 

[F L I P S T A R]

Появился вопрос. Есть скрипт с циклом, который срабатывает, если хп персонажа меньше определенного значения и вводит определенную команду в чат. Мне нужно, чтобы как только здоровье опустится ниже 45, скрипт сработал 1 раз и после этого цикл обновился и дальше ждал момента, пока хп опять настанет ниже 45. Как мне это сделать? Пробовал return false, break, но тогда скрипт выключался полностью и только после рестарта скрипта он начинал работать заново. Сейчас у меня он работает так: если хп меньше 45, он бесконечно выводит команду в чат без остановки(выключается, только если принудительно отключить его через команду /hp).
Можете помочь?

act = false

function main()
    repeat
        wait(0)
    until isSampAvailable()
    sampRegisterChatCommand("hp",function() act = not act printStringNow(act and "~b~[AUTOHILL]: ~g~ON" or "~b~[AUTOHILL]: ~r~OFF", 1000) end)
    while true do
        wait(0)
        hp = getCharHealth(PLAYER_PED)
        if act and hp < 45 then
            sampSendChat("/healme")
        end
    end
end