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

 

[the same]

Как сделать чтобы скрипт начинал проверку/работу/че то ещё после того как подключился к серверу ,а не в очереди?

 

[SurnikSur]

sampRegisterChatCommand("hz", function()
    inicfg.save(mainIni, "file.ini") -- file.ini заменяешь на свое
end)

крашит

local sp                    = require 'lib.samp.events'
local inicfg = require 'inicfg'

local directIni = 'myIni.ini'

function main()
    if not isSampLoaded() or not isSampfuncsLoaded() then return end
    while not isSampAvailable() do wait(100) end
    sampRegisterChatCommand("hz", function()
    local x, y, z = getCharCoordinates(PLAYER_PED)
    inicfg.save(mainIni, x, y, z) -- file.ini заменяешь на свое
end)
    wait(-1)
end

    
local ini = inicfg.load(inicfg.load({
 
}, directIni))
inicfg.save(ini, directIni)

 

[why ega]

Как сделать чтобы скрипт начинал проверку/работу/че то ещё после того как подключился к серверу ,а не в очереди?

попробуй

local connect = false

function main()
    while not connect do wait(100) end
    sampAddChatMessage("Законнектились", -1)
end

function onReceivePacket(id, bitStream)
    if id == 34 then connect = true end
end

крашит

local sp                    = require 'lib.samp.events'
local inicfg = require 'inicfg'

local directIni = 'myIni.ini'

function main()
    if not isSampLoaded() or not isSampfuncsLoaded() then return end
    while not isSampAvailable() do wait(100) end
    sampRegisterChatCommand("hz", function()
    local x, y, z = getCharCoordinates(PLAYER_PED)
    inicfg.save(mainIni, x, y, z) -- file.ini заменяешь на свое
end)
    wait(-1)
end

   
local ini = inicfg.load(inicfg.load({
 
}, directIni))
inicfg.save(ini, directIni)

local sp = require("lib.samp.events")
local inicfg = require("inicfg")

local directIni = "myIni.ini"
local ini = inicfg.load({
    config =
    {
        x = 0,
        y = 0,
        z = 0
    }
}, directIni)
inicfg.save(ini, directIni)

function main()
    while not isSampAvailable() do wait(100) end
    
    sampRegisterChatCommand("hz", function()
        ini.config.x, ini.config.y, ini.config.z = getCharCoordinates(PLAYER_PED)
        inicfg.save(ini, directIni)
    end)
    wait(-1)
end

 

[yung milonov]

крашит

local sp                    = require 'lib.samp.events'
local inicfg = require 'inicfg'

local directIni = 'myIni.ini'

function main()
    if not isSampLoaded() or not isSampfuncsLoaded() then return end
    while not isSampAvailable() do wait(100) end
    sampRegisterChatCommand("hz", function()
    local x, y, z = getCharCoordinates(PLAYER_PED)
    inicfg.save(mainIni, x, y, z) -- file.ini заменяешь на свое
end)
    wait(-1)
end

   
local ini = inicfg.load(inicfg.load({
 
}, directIni))
inicfg.save(ini, directIni)

оно и ясно что крашит, 3 параметра передаешь где должен быть только один

inicfg.save(string.format("%f, %f, %f", x, y, z), directIni)

а ваще, погляди урок

 

[Gorskin]

Кто может перевести на lua c использованием либы hooks ?

Исходник - Гайд - Lua vmt+jmp/call hook | Библиотека hooks.lua

Здрасте, продолжаем насиловать игру хуками, только уже виртуальных таблиц(обычный jmp hook - https://www.blast.hk/threads/39138/). Решил сделать либу, в которой этот и jmp хук, ее нужно кинуть в папку /moonloader/lib/ Затрагивая jmp hook, использование никак не изменилось, только пишем local...

www.blast.hk

#define __RwD3DDevice                0x00C97C28
#define DIRECTX_VT_FUNC(offset)        (reinterpret_cast<void**>(*reinterpret_cast<void***>(*reinterpret_cast<DWORD*>(__RwD3DDevice)))[offset])

HRESULT __stdcall hkReset(IDirect3DDevice9* pDevice, D3DPRESENT_PARAMETERS* pPresentationParameters) {
    HRESULT hres = hook_d3dReset.call<urmem::calling_convention::stdcall, HRESULT>(pDevice, pPresentationParameters);
    return hres;
}

hook_d3dReset.install(urmem::get_func_addr(DIRECTX_VT_FUNC(16)), urmem::get_func_addr(&hkReset));

Вот пример с hkPresent

local ffi = require("ffi")
local hook = require("hooks")
do

    function hkPresent(pDevice, pSourceRect, pDestRect, hDestWindowOverride, pDirtyRegion)

        return hkPresent(pDevice, pSourceRect, pDestRect, hDestWindowOverride, pDirtyRegion)
    end
    local D3D9Device = hook.vmt.new(ffi.cast('intptr_t*', 0xC97C28)[0]) --эти строчки вынести в main или куда там хотите чтобы хукалось самым последним
    hkPresent = D3D9Device.hookMethod('long(__stdcall*)(void*, void*, void*, void*, void*)', hkPresent, 17) --эти строчки вынести чтобы хукалось самым последним

   
end

Up

 

[zir]

Можно ли как-то в один диалог вводить разный текст по очереди? Если да, то можно пожалуйста пример кода

Help

 

[chapo]

Можно ли как-то в один диалог вводить разный текст по очереди? Если да, то можно пожалуйста пример кода

так?

local active = true
local current = 1
local texts = {
    'one',
    'two',
    'three'
}

function sampev.onShowDialog(dialogId, style, title, button1, button2, text)
    if active and dialogId == 228 then
        sampSendDialogResponse(dialogId, 1, nil, texts[current])
        current = current + 1
        if not text[current] then
            active, current = false, 1
            sampAddChatMessage('все отправлено, скрипт выключен', -1)
        end
        return false
    end
end

 

[XRLM]

можно ли сделать координатную плоскость в луа?

 

[Julimba]

Здарова, есть такой код, он реагриует на сообщения диспетчера и копирует ид игрока, который отправил вызов и сразу как приходит сообщение, то оно само сразу принимает. Так вот в чем проблема, можно ли как то сделать так, чтобы оно после сообщения диспетчера давало выбор, принять вызов или нет.

function hook.onServerMessage(clr, text)
    if text:find('%[%Диспетчер] %a+_%a+%[%d*%] %.*') then
        local hid = text:match('%[%Диспетчер] %a+_%a+%[(%d*)%] %.*')
        lua_thread.create(function()
            wait(1)
            sampSendChat('/tc ' ..hid)
        end)
    end
end

 

[qdIbp]

Здарова, есть такой код, он реагриует на сообщения диспетчера и копирует ид игрока, который отправил вызов и сразу как приходит сообщение, то оно само сразу принимает. Так вот в чем проблема, можно ли как то сделать так, чтобы оно после сообщения диспетчера давало выбор, принять вызов или нет.

function hook.onServerMessage(clr, text)
    if text:find('%[%Диспетчер] %a+_%a+%[%d*%] %.*') then
        local hid = text:match('%[%Диспетчер] %a+_%a+%[(%d*)%] %.*')
        lua_thread.create(function()
            wait(1)
            sampSendChat('/tc ' ..hid)
        end)
    end
end

Что то на подобии?

function hook.onServerMessage(clr, text)
    local hid = text:match('%[%Диспетчер] .+%[(%d*)%] %.*')
    if hid then
        lua_thread.create(function()
            wait(1)
            sampSendChat('/tc ' ..hid)
            sampSendChat('Я даю тебе выбор')
        end)
    end
end

Не то ты не объяснил как давать этот выбор

 

[windranger]

как сделать автоматическую отправку того или иного сообщения сразу после захода на сервер?

 

[qdIbp]

как сделать автоматическую отправку того или иного сообщения сразу после захода на сервер?

Попробуй так, но в случае если ты перезагрузишь скрипты он снова сработает

function main()
    while not sampIsLocalPlayerSpawned() then wait(0) end
    sampSendChat('/hue')
    wait(-1)
end

 

[why ega]

как сделать автоматическую отправку того или иного сообщения сразу после захода на сервер?

local connect = false

function main()
    while not connect do wait(100) end
    sampAddChatMessage("Законнектились", -1)
end

function onReceivePacket(id, bitStream)
    if id == 34 then connect = true end
end

 

[Julimba]

Что то на подобии?

function hook.onServerMessage(clr, text)
    local hid = text:match('%[%Диспетчер] .+%[(%d*)%] %.*')
    if hid then
        lua_thread.create(function()
            wait(1)
            sampSendChat('/tc ' ..hid)
            sampSendChat('Я даю тебе выбор')
        end)
    end
end

Не то ты не объяснил как давать этот выбор

[Диспетчер] Baran_Baranov[154] сделал заказ.
Скрипт это детектит и визуально для тебя выводит сообщение
sampAddChatMessage('Чтобы принять вызов нажми - NumPad 1 | Чтобы отказаться от вызова нажми NumPad 2' -1)
и дальше если нажал NumPad 1, то вызов принимается
sampSendChat('/tc ' ..hid)
Если нажал NumPad 2, то вызов не принимается и в чат пишет, что вызов был отклонен
sampAddChatMessage('Вызов был отклонен' -1)

 

[windranger]

local connect = false

function main()
    while not connect do wait(100) end
    sampAddChatMessage("Законнектились", -1)
end

function onReceivePacket(id, bitStream)
    if id == 34 then connect = true end
end

можешь закомментировать? не очень понимаю, что ты написал