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

 

[LuaQ]

Как переместить килллист?

writeMemory(sampGetKillInfoPtr() + 303, offset x, 4)
writeMemory(sampGetKillInfoPtr() + 307, offset y, 4)
Вроде так

attempt to index global 'imgui' (a nil value)
stack traceback:
Помогите решить проблему

local imgui = require("imgui") в начало скрипта

Как изменить исходящий текст? Который в function SE.onSendChat(msg)
К примеру, мне нужно в рандомной строке заменить #test на лол.

А отправится в чат:

При том что #test может быть и в начале строки, и в конце, и вообще в команде по типу /r #test.

function SE.onSendChat(msg)
msg:gsub("#test", "lol")
return {msg}
end

 

[Belo4ka_belka]

Здравствуйте, необходимо перевести float в hex, нагуглил функцию, но интерпретатор ругается что не может метод mod использовать (рекваер не нужен же для такого дефолта верно?). Этот код я подключаю через require.

local function to_hex(n)
   if (type(n) ~= "number") then
      error("non-number type passed in.")
   end

   -- checking not float
   if (n - math.floor(n) > 0) then
      error("trying to apply bitwise operation on non-integer!")
   end

   if (n < 0) then
      -- negative
      n = bit.tobits(bit.bnot(math.abs(n)) + 1)
      n = bit.tonumb(n)
   end

   hex_tbl = {'A', 'B', 'C', 'D', 'E', 'F'}
   hex_str = ""

   while (n ~= 0) do
      last = math.mod(n, 16)
      if (last < 10) then
         hex_str = tostring(last) .. hex_str
      else
         hex_str = hex_tbl[last-10+1] .. hex_str
      end
      n = math.floor(n/16)
   end
   if (hex_str == "") then
      hex_str = "0"
   end
   return "0x" .. hex_str
end

local function to_dec(hex)
   if (type(hex) ~= "string") then
      error("non-string type passed in.")
   end

   head = string.sub(hex, 1, 2)

   if (head ~= "0x" and head ~= "0X") then
      error("wrong hex format, should lead by 0x or 0X.")
   end

   v = tonumber(string.sub(hex, 3), 16)
   return v;
end

--------------------
-- hex lib interface
return {
   to_dec = to_dec,
   to_hex = to_hex
}

Применяю внутри выражения:

ffi.C.SendMessageA(hex.to_hex(wparam), 0x1002, 0xFF, 0xFFF)

wparam существует, принт мне показывает большое число.

[11:27:52.442659] (error)    test.lua: C:\Games\GTA San Andreas\moonloader\lib\hex.lua:21: attempt to call field 'mod' (a nil value)

Помогите пожалуйста.

 

[LuaQ]

Здравствуйте, необходимо перевести float в hex, нагуглил функцию, но интерпретатор ругается что не может метод mod использовать (рекваер не нужен же для такого дефолта верно?). Этот код я подключаю через require.

local function to_hex(n)
   if (type(n) ~= "number") then
      error("non-number type passed in.")
   end

   -- checking not float
   if (n - math.floor(n) > 0) then
      error("trying to apply bitwise operation on non-integer!")
   end

   if (n < 0) then
      -- negative
      n = bit.tobits(bit.bnot(math.abs(n)) + 1)
      n = bit.tonumb(n)
   end

   hex_tbl = {'A', 'B', 'C', 'D', 'E', 'F'}
   hex_str = ""

   while (n ~= 0) do
      last = math.mod(n, 16)
      if (last < 10) then
         hex_str = tostring(last) .. hex_str
      else
         hex_str = hex_tbl[last-10+1] .. hex_str
      end
      n = math.floor(n/16)
   end
   if (hex_str == "") then
      hex_str = "0"
   end
   return "0x" .. hex_str
end

local function to_dec(hex)
   if (type(hex) ~= "string") then
      error("non-string type passed in.")
   end

   head = string.sub(hex, 1, 2)

   if (head ~= "0x" and head ~= "0X") then
      error("wrong hex format, should lead by 0x or 0X.")
   end

   v = tonumber(string.sub(hex, 3), 16)
   return v;
end

--------------------
-- hex lib interface
return {
   to_dec = to_dec,
   to_hex = to_hex
}

Применяю внутри выражения:

ffi.C.SendMessageA(hex.to_hex(wparam), 0x1002, 0xFF, 0xFFF)

wparam существует, принт мне показывает большое число.

[11:27:52.442659] (error)    test.lua: C:\Games\GTA San Andreas\moonloader\lib\hex.lua:21: attempt to call field 'mod' (a nil value)

Помогите пожалуйста.

Вот все функции math
https://www.cronos.ru/kb-1554.html

 

[osminog]

Как сделать чтобы по нажатию любой кнопки писалось в репорт "мать ебал" для Адванс рп

 

[James Hawk]

Как сделать чтобы по нажатию любой кнопки писалось в репорт "мать ебал" для Адванс рп

С деградированием не к нам.
Репорт как отправляется на адвансе?

 

[vova2999]

Как можно вытолкнуть педа с тс, именно вытолкнуть а не отправить серверу ExitVehicle

 

[osminog]

С деградированием не к нам.
Репорт как отправляется на адвансе?

Через /mn, 6 пункт и открываеться диалоговое окно
Ps. Хочу челика одного забанить

 

[James Hawk]

Через /mn, 6 пункт и открываеться диалоговое окно
Ps. Хочу челика одного забанить

Вводи комманду /mn, выбирай нужный пункт в диалоге, отправляй нужный текст в репорт

sampSendDialogResponse(dialog_id, button, item, input)

 

[vova2999]

Делал так, не работает.


Подойди к машине и нажми Enter.

Я имелл ввиду моего педа

 

[osminog]

Вводи комманду /mn, выбирай нужный пункт в диалоге, отправляй нужный текст в репорт

sampSendDialogResponse(dialog_id, button, item, input)

Как выбрать клавишу?

Как выбрать клавишу?

Вводи комманду /mn, выбирай нужный пункт в диалоге, отправляй нужный текст в репорт

sampSendDialogResponse(dialog_id, button, item, input)

Какой код чтобы просто сообщения отправлялось, а то я тупой как пробка

 

[James Hawk]

Как выбрать клавишу?
Какой код чтобы просто сообщения отправлялось, а то я тупой как пробка

Ну что сказать, сочувствую.
Button - (с англ.) клавиша.

За тебя код писать не будут, подсказка тебе дана

 

[CyberSuslik]

Как выбрать клавишу?



Какой код чтобы просто сообщения

sampSendDialogResponse(dialog_id, button, item, input)

Укажи свой ID диалога только 

sampSendDialogResponse(0, 0, 0, "Твой текст")

отправлялось, а то я тупой как пробка

 

[[SA ARZ]]

            if text:find("Мин. здравоохранения") then getMZLeader = text:match(".*\n(.*)\tМин. здравоохранения\tМинистр здравоохранения") end
            if text:find("Городская больница ЛС") then getLSLeader = text:match(".*\n(.*)\tГородская больница ЛС\tГлавный врач") end
            if text:find("Городская больница СФ") then getSFLeader = text:match(".*\n(.*)\tГородская больница СФ\tГлавный врач") end
            if text:find("Городская больница ЛВ") then getLVLeader = text:match(".*\n(.*)\tГородская больница ЛВ\tГлавный врач") end

Помогите пытаюсь вытащить название ранга , а вытаскивается всё сразу (

актуально!!

 

[astynk]

Как можно вытолкнуть педа с тс, именно вытолкнуть а не отправить серверу ExitVehicle

warpCharFromCarToCoord(Ped ped, float placeAtX, float placeAtY, float placeAtZ)

актуально!!

Попробуй (.-) вместо (.*)

 

[[SA ARZ]]

warpCharFromCarToCoord(Ped ped, float placeAtX, float placeAtY, float placeAtZ)

Попробуй (.-) вместо (.*)

я так беру ники, а мне нужно регулировку сделать чтоб брал название рангов, не знаю как