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

 

[AnWu]

Я имел введу в радиусе, как ты себе представляешь math.random(x,y) и что оно мне выдаст?

Он предложил написать функцию которая высчитает рандом точку от XYZ до X+-R, Y+-R

 

[T1cKz]

Он предложил написать функцию которая высчитает рандом точку от XYZ до X+-R, Y+-R

Я поход ньюбие у меня не робит

Спойлер

randomCoordsInRadius(128, 256, 30)


function randomCoordsInRadius(xX,yY, rR)
local posX1, posX2, posY1, posY2
local radius = rR / 2
 posX1 = xX - radius
 posX2 = xX + radius
 posY1 = yY - radius
 posY2 = yY - radius
local xr = math.random(posX1, posX2)
local yr = math.random(posY1, posY2)
sampfuncsLog("your x: %.2f, y: %.2f, radius: %d(%d)", xX,yY,rR,radius)
sampfuncsLog("random coords x: %.2f y: %.2f", xr, yr)
end

 

[AnWu]

Я поход ньюбие у меня не робит

Спойлер

randomCoordsInRadius(128, 256, 30)


function randomCoordsInRadius(xX,yY, rR)
local posX1, posX2, posY1, posY2
local radius = rR / 2
 posX1 = xX - radius
 posX2 = xX + radius
 posY1 = yY - radius
 posY2 = yY - radius
local xr = math.random(posX1, posX2)
local yr = math.random(posY1, posY2)
sampfuncsLog("your x: %.2f, y: %.2f, radius: %d(%d)", xX,yY,rR,radius)
sampfuncsLog("random coords x: %.2f y: %.2f", xr, yr)
end

А что не работает? Кстати ты же с целыми числами работаешь. Не работает скрипт или что? Если скрипт - лог кидай

 

[T1cKz]

А что не работает? Кстати ты же с целыми числами работает. Не работает скрипт или что? Если скрипт - лог кидай

Спойлер: Лог с СФ

your x: 0.00, y: 0.00, radius: 439213612
your x: 0.00, y: 0.00, radius: 439213612(439213612)
random coords x: 0.00 y: 0.00
RETURN: random coords x: 0.00 y: 0.00

Спойлер: Скрупт

local posX1, posX2, posY1, posY2
local radius
function main()
sampRegisterChatCommand("xyz", myfuck)
end

function myfuck()
randomCoordsInRadius(128.0, 256.0, 30.0)
sampfuncsLog("RETURN: random coords x: %.2f y: %.2f", xr, yr)
end

function randomCoordsInRadius(xX,yY, rR)
sampfuncsLog("your x: %.2f, y: %.2f, radius: %d", xX,yY,rR)
 posX1 = xX - rR
 posX2 = xX + rR
 posY1 = yY - rR
 posY2 = yY - rR
local xr = math.random(posX1, posX2)
local yr = math.random(posY1, posY2)
sampfuncsLog("your x: %.2f, y: %.2f, radius: %d(%d)", xX,yY,rR,radius)
sampfuncsLog("random coords x: %.2f y: %.2f", xr, yr)
return xr, yr
end

[/code]

 

[AnWu]

Спойлер: Лог с СФ

your x: 0.00, y: 0.00, radius: 439213612
your x: 0.00, y: 0.00, radius: 439213612(439213612)
random coords x: 0.00 y: 0.00
RETURN: random coords x: 0.00 y: 0.00

Спойлер: Скрупт

local posX1, posX2, posY1, posY2
local radius
function main()
sampRegisterChatCommand("xyz", myfuck)
end

function myfuck()
randomCoordsInRadius(128.0, 256.0, 30.0)
sampfuncsLog("RETURN: random coords x: %.2f y: %.2f", xr, yr)
end

function randomCoordsInRadius(xX,yY, rR)
sampfuncsLog("your x: %.2f, y: %.2f, radius: %d", xX,yY,rR)
 posX1 = xX - rR
 posX2 = xX + rR
 posY1 = yY - rR
 posY2 = yY - rR
local xr = math.random(posX1, posX2)
local yr = math.random(posY1, posY2)
sampfuncsLog("your x: %.2f, y: %.2f, radius: %d(%d)", xX,yY,rR,radius)
sampfuncsLog("random coords x: %.2f y: %.2f", xr, yr)
return xr, yr
end

[/code]

Пробуй %d выводить.

 

[T1cKz]

Пробуй %d выводить.

Не выходит, просто при каждой перезагрузке выбивает рандомные числа

your x: 550643796, y: 550643796, radius: 550643796

 

[imring]

Есть ли в мунлоадере функция подобной этой
018C: play_sound 1058 at 0.0 0.0 0.0

addOneOffSound(float atX, float atY, float atZ, int sound) -- 018C

 

[AnWu]

Не выходит, просто при каждой перезагрузке выбивает рандомные числа

your x: 550643796, y: 550643796, radius: 550643796

При рандоме флоат в деминал превращай. math.floor(PosY), math.floor(PosX)

Как получить цвет клиста игрока в которого я прицелился?

  local valid, ped = getCharPlayerIsTargeting(PLAYER_HANDLE) -- получить хендл персонажа, в которого целится игрок
  if valid and doesCharExist(ped) then -- если цель есть и персонаж существует
    local result, id = sampGetPlayerIdByCharHandle(ped) -- получить samp-ид игрока по хендлу персонажа
    if result then -- проверить, прошло ли получение ида успешно
          Но тут я не знаю как сделать проверку  на цвет
    if цвет_клиста == '035C00' then
      sampAddChatMessage('Это же грув')
    end
  end
end

помогите мне дополнить код)

sampGetPlayerColor()

 

[iXiW]

imgui.Text(u8''..string.gsub(line, '\\n', '\n')..'')

На английском всё в порядке
На русском языке выдает:

1.1 ???????

В чём может быть проблема ?

 

[RTD]

imgui.Text(u8''..string.gsub(line, '\\n', '\n')..'')

На английском всё в порядке
На русском языке выдает:

1.1 ???????

В чём может быть проблема ?

imgui.Text(u8(string.gsub(line, '\\n', '\n')))

 

[iXiW]

imgui.Text(u8(string.gsub(line, '\\n', '\n')))

ML] (error) Zakoni.lua: E:\Games\GTA SAMP wo ML\moonloader\lib\encoding.lua:60: assertion failed!
stack traceback:
    [C]: in function 'assert'
    E:\Games\GTA SAMP wo ML\moonloader\lib\encoding.lua:60: in function 'u8'
    E:\Games\GTA SAMP wo ML\moonloader\Zakoni.lua:107: in function 'ImFileParse'
    E:\Games\GTA SAMP wo ML\moonloader\Zakoni.lua:87: in function 'OnDrawFrame'
    E:\Games\GTA SAMP wo ML\moonloader\lib\imgui.lua:1377: in function <E:\Games\GTA SAMP wo ML\moonloader\lib\imgui.lua:1366>
[ML] (error) Zakoni.lua: Script died due to an error. (2ADBD02C)

 

[iXiW]

imgui.Text(u8(string.gsub(line, '\\n', '\n')))

Решил проблему, текстовый файл откуда я беру текст преобразовал в UTF8, и всё заработало
P.s. Не "Кодировка в UTF8", а именно "Преобразовать в UTF8"

 

[AnWu]

Решил проблему, текстовый файл откуда я беру текст преобразовал в UTF8, и всё заработало
P.s. Не "Кодировка в UTF8", а именно "Преобразовать в UTF8"

а надо windows-1251

 

[Timofey122345]

Дальше сам:

Спойлер

require 'lib.sampfuncs'
local vkeys = require 'lib.vkeys'

function main()
  if not isSampLoaded() or not isSampfuncsLoaded() then return end
 
  while not isSampAvailable() do wait(0) end

  local playerId = -1
  local playerNickname = ''

  sampRegisterChatCommand('sellic', function(param)
    local id = param:match('%d+')
    if id ~= nil then
      if sampIsPlayerConnected(id) then
        playerId = id
   
        local nickname = sampGetPlayerNickname(id)
        playerNickname = nickname:gsub('_', ' ')

        dialoge()
      end
    else
      sampAddChatMessage("/sellic [id]", -1)
    end
  end)
 
  while true do
    local result, button, list = sampHasDialogRespond(2)
    if result and button == 1 then
      if list == 0 then
        sampSendChat('Здравствуйте. Я лицензер мэрии Лос-Сантоса Оливер Ревс. Вам нужна лицензия?')
        wait(1000)
        sampAddChatMessage("[F11]:Открыть диалог с возможными действиями.", -1)

        while not isKeyDown(vkeys.VK_F11) do wait(0) end

        dialoge()
      elseif list == 1 then
        sampSendChat('/me достал бланк и ручку из кармана')
        wait(100)
        sampSendChat('Ваше имя и фамилия')
        sampAddChatMessage('[F12]:Если человек сказал имя и фамилию.', -1)

        while not isKeyDown(vkeys.VK_F12) do wait(0) end

        sampSendChat('/me заполнил бланк и передал его человеку напротив')
        wait(100)
        sampSendChat('Распишитесь')
        wait(200)
        sampSendChat('/n /me расписался(-ася)')

        sampAddChatMessage('[F12]:Если человек расписался.', -1)

        while not isKeyDown(vkeys.VK_F12) do wait(0) end

        sampSendChat('/me забрал бланк у ' .. playerNickname .. ' и передал лицензию напротив')
        wait(100)
        sampSendChat('/givelic ' .. playerId .. ' 1 1000')
      elseif list == 2 then
        -- ...
      elseif list == 3 then
        -- ...
      end
    end
 
    wait(0)
  end
end

function dialoge()
  sampShowDialog(2, "Продажа лицензии", "Приветствовать\nЛицензия на права(1.000)\nПроф.права(10.000)\nЛицензия на оружие(30.000)", "Окей", "", DIALOG_STYLE_LIST)
end

Можешь попробовать осилить это: Полезные сниппеты и функции^{(https://blast.hk/threads/13380/#post-160343)}

Так, помоги ещё, я уже 10000000 раз менял эту кодировку, но в Сампе нихера не работает(робит, но каракули всякие)

 

[imring]

В какой цветовой схеме эта функция возвращает цвет?

AARRGGBB