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

 

[Dmitriy Makarov]

Ребят, привет, хочу получить таргет игрока, и когда тыкаешь альт + пкм на игрока, то должно вылезти имгуи окно.

-- В самый верх, где local'ки
local playerid = -1

-- Бесконечный цикл
local valid, ped = getCharPlayerIsTargeting(PLAYER_HANDLE)
if valid and doesCharExist(ped) then
    local result, id = sampGetPlayerIdByCharHandle(ped)
    if result and isKeyJustPressed(VK_MENU) then -- Левый Альт - это вроде VK_MENU. Если нет, то попробуй VK_LMENU
        main_window_state.v = not main_window_state.v
        playerid = id
    end
end


-- OnDrawFrame
-- if main_window_state.v then
imgui.Begin(u8"Взаимодействие с "..sampGetPlayerNickname(tostring(playerid)).."["..tostring(playerid).."]", main_window_state.v)
if imgui.Button(u8"Показать пасспорт") then
    sampSendChat("/pass "..tostring(playerid))
end
-- Если нужен NickName: sampGetPlayerNickname(tostring(playerid))
-- Если нужен NickName без _ : sampGetPlayerNickname(tostring(playerid)):gsub('_', ' ')
-- Если нужен ID: tostring(playerid)

 

[Gruzin Gang]

-- В самый верх, где local'ки
local playerid = -1

-- Бесконечный цикл
local valid, ped = getCharPlayerIsTargeting(PLAYER_HANDLE)
if valid and doesCharExist(ped) then
    local result, id = sampGetPlayerIdByCharHandle(ped)
    if result and isKeyJustPressed(VK_MENU) then -- Левый Альт - это вроде VK_MENU. Если нет, то попробуй VK_LMENU
        main_window_state.v = not main_window_state.v
        playerid = id
    end
end


-- OnDrawFrame
-- if main_window_state.v then
imgui.Begin(u8"Взаимодействие с "..sampGetPlayerNickname(tostring(playerid)).."["..tostring(playerid).."]", main_window_state.v)
if imgui.Button(u8"Показать пасспорт") then
    sampSendChat("/pass "..tostring(playerid))
end
-- Если нужен NickName: sampGetPlayerNickname(tostring(playerid))
-- Если нужен NickName без _ : sampGetPlayerNickname(tostring(playerid)):gsub('_', ' ')
-- Если нужен ID: tostring(playerid)

ему еще нужно текстдравы убрать, ему для аризоны xD

 

[SamCamino]

Можно как то сделать если допустим мод сервера advance выполнялась одна функция, а если аризона то другая

 

[McLore]

Можно как то сделать если допустим мод сервера advance выполнялась одна функция, а если аризона то другая

хук на ип или на текстдрав сервера

 

[SamCamino]

хук на ип или на текстдрав сервера

ок. как хук на ип сделать?

 

[Quasper]

ок. как хук на ип сделать?

zstring ip, uint port = sampGetCurrentServerAddress()

 

[lemonager]

ок. как хук на ип сделать?

local servera = {"54.37.142.72:7777","54.37.142.73:7777","54.37.142.74:7777","54.37.142.75:7777"}

function main()
    while not isSampAvailable() do wait(100) end
    adress, port = sampGetCurrentServerAddress()
    ip = string.format('%s:%s', adress, port)
    for k,v in pairs(servera) do
        if ip == v then
            sampAddChatMessage("ну адванс", -1)
            break
        end
    end
    wait(-1)
end

 

[oBrabo]

guys, I have this code:

for k, char in pairs (getAllChars ()) from
if char ~ = PLAYER_PED then
taskPlayAnim (char, "FIGHTIDLE", "PED", 4.0, false, false, false, false, 99999)
wait (0)
end
end

I need the opponent to "lock" in the animation, to be able to move, but to lock.
Can someone help me?

 

[advancerp]

При входе на сервер определяется ранг, как сделать регистрацию команды только в том случае, если ранг, например выше 5?

 

[moreveal]

Как получить последнее вхождение шаблона Lua в string.match()?

При входе на сервер определяется ранг, как сделать регистрацию команды только в том случае, если ранг, например выше 5?

засунуть в место, где скрипт чекает выше ли ранг 5, регистрацию кмд :/

 

[Immortal-]

-- В самый верх, где local'ки
local playerid = -1

-- Бесконечный цикл
local valid, ped = getCharPlayerIsTargeting(PLAYER_HANDLE)
if valid and doesCharExist(ped) then
    local result, id = sampGetPlayerIdByCharHandle(ped)
    if result and isKeyJustPressed(VK_MENU) then -- Левый Альт - это вроде VK_MENU. Если нет, то попробуй VK_LMENU
        main_window_state.v = not main_window_state.v
        playerid = id
    end
end


-- OnDrawFrame
-- if main_window_state.v then
imgui.Begin(u8"Взаимодействие с "..sampGetPlayerNickname(tostring(playerid)).."["..tostring(playerid).."]", main_window_state.v)
if imgui.Button(u8"Показать пасспорт") then
    sampSendChat("/pass "..tostring(playerid))
end
-- Если нужен NickName: sampGetPlayerNickname(tostring(playerid))
-- Если нужен NickName без _ : sampGetPlayerNickname(tostring(playerid)):gsub('_', ' ')
-- Если нужен ID: tostring(playerid)

не помогло, при зажатии альт + пкм на игроке не выводит меню.

 

[moreveal]

Нужно перевести HEX: 37C844 в RGB: "55.528832884182, 200.41414, 68.823522"
Как?

 

[oBrabo]

guys, I have this code:

for k, char in pairs (getAllChars ()) from
if char ~ = PLAYER_PED then
taskPlayAnim (char, "FIGHTIDLE", "PED", 4.0, false, false, false, false, 99999)
wait (0)
end
end

I need the opponent to "lock" in the animation, to be able to move, but to lock.
Can someone help me?

help

 

[Rei]

help

stop spamming this. idk what you mean

 

[moreveal]

Нужно перевести HEX: 37C844 в RGB: "55.528832884182, 200.41414, 68.823522"
Как?

function hex2rgb (hex)
    local hex = hex:gsub("#","")
    if hex:len() == 3 then
      return (tonumber("0x"..hex:sub(1,1))*17)/255, (tonumber("0x"..hex:sub(2,2))*17)/255, (tonumber("0x"..hex:sub(3,3))*17)/255
    else
      return tonumber("0x"..hex:sub(1,2))/255, tonumber("0x"..hex:sub(3,4))/255, tonumber("0x"..hex:sub(5,6))/255
    end
end
--[[
Use example:
local hex = '7b8b34'
print(hex2rgb(hex))
]]

Как получить последнее вхождение шаблона Lua в string.match()?

   local last
   for w in string.gmatch(text, 'text'..name) do
   last = w
   end
--[[
Use example:
local test = string.match(text, '(text)', w)
]]

example of using the mysql library:

local mysql = require 'luasql.mysql' -- /moonloader/lib/luasql/mysql.dll

local hostname = "localhost"
local username = "root"
local password = ""
local database = "test"

local env = mysql.mysql()
local con = env:connect(database, username, password, hostname)

local cur, err = con:execute("select * from table_name where id = 1") -- returns the cursor or string with error
print(cur:fetch()) -- outputs the contents of the string with 'id' 1

-- More functions: https://keplerproject.github.io/luasql/manual.html