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

 

[Vintik]

function sampev.onShowDialog(id, style, title, b1, b2, text)
    if id == 1234 then  
    freezeCharPosition(PLAYER_PED, true)
        wait (3000)
    freezeCharPosition(PLAYER_PED, false)
    wait(-1)
    end
end

Памагити парни крашит

sampev.onShowDialog(id, style, title, b1, b2, text)
    lua_thread.create(function()
    if id == 1234 then 
    freezeCharPosition(PLAYER_PED, true)
        wait (3000)
    freezeCharPosition(PLAYER_PED, false)
    end
    end)
end

 

[Wei Huang]

function tmpRemove(fileName)
    local tmpPath = os.getenv('TEMP')
    local correctPath, res = tmpPath:gsub('\\', "/")
    local path = correctPath..'/'..fileName
    if doesFileExist(path) then os.remove(path) end
end

Можешь подробнее обьяснить как использовать (будет использоваться при
if imgui.Button(u8"Oтгрузкa") then
thisScript():unload()
end
)

 

[Neon3333]

Можешь подробнее обьяснить как использовать (будет использоваться при
if imgui.Button(u8"Oтгрузкa") then
thisScript():unload()
end
)

tmpRemove('file.txt') -- удалит файл file.txt из твоей папки TEMP

 

[frit]

Как я и говорил, я смотрел примеры с получением ближайшего транспорта и игрока, всё делалось через формулу. Попытавшись это повторить, у меня ничего не вышло:

for _, v in pairs(getAllPickups()) do -- Перебор
    if getPickupModel(v) == 19135 then
        local minDist = 333
        local x, y, z = getPickupCoordinates(v) -- Кординаты пикапов "v" (зона стрима)
        local pX, pY = convert3DCoordsToScreen(x, y, z)
        local mX, mY, mZ = getCharCoordinates(PLAYER_PED) -- Мои координаты
        local draw1, draw2 = convert3DCoordsToScreen(mX, mY, mZ)
        renderDrawLine(draw1, draw2, pX, pY, 2.0, 0xFFD00000) -- Рисую линию к пикапам
        -- local distance = string.format("%.0f", getDistanceBetweenCoords3d(x, y, z, mX, mY, mZ)) -- Есть dist, поэтому не юзаю пока
        local dist = math.sqrt((x - mX)^2 + (y - mY)^2 + (z - mZ)^2) -- Сама формула вычисления ближайшего пикапа.
        if dist < minDist then
            renderFontDrawText(my_font, "{0089FF}Distance: {FFFFFF}"..dist, pX, pY, -1) -- Если всё гуд, то прикрепляю текст к ближайшему пикапу
        end
    end
end

UPD: Фотокарточку забыл. Тут текст прикрепляется ко всем пикапам, вместо того, чтобы прикрепиться к ближайшему.
Посмотреть вложение 75936

for _, v in pairs(getAllPickups()) do -- Перебор
    if getPickupModel(v) == 19135 then
        local minDist = 333
        local x, y, z = getPickupCoordinates(v) -- Кординаты пикапов "v" (зона стрима)
        local pX, pY = convert3DCoordsToScreen(x, y, z)
        local mX, mY, mZ = getCharCoordinates(PLAYER_PED) -- Мои координаты
        local draw1, draw2 = convert3DCoordsToScreen(mX, mY, mZ)
        renderDrawLine(draw1, draw2, pX, pY, 2.0, 0xFFD00000) -- Рисую линию к пикапам
        -- local distance = string.format("%.0f", getDistanceBetweenCoords3d(x, y, z, mX, mY, mZ)) -- Есть dist, поэтому не юзаю пока
        local dist = math.sqrt((x - mX)^2 + (y - mY)^2 + (z - mZ)^2) -- Сама формула вычисления ближайшего пикапа.
        if dist < minDist then
            minDist = dist
            renderFontDrawText(my_font, "{0089FF}Distance: {FFFFFF}"..dist, pX, pY, -1) -- Если всё гуд, то прикрепляю текст к ближайшему пикапу
        end
    end
end

 

[#Northn]

local mX, mY, mZ = getCharCoordinates(PLAYER_PED) -- Мои координаты

Зачем ты в цикле получаешь свои координаты

 

[Neon3333]

for _, v in pairs(getAllPickups()) do -- Перебор
    if getPickupModel(v) == 19135 then
        local minDist = 333
        local x, y, z = getPickupCoordinates(v) -- Кординаты пикапов "v" (зона стрима)
        local pX, pY = convert3DCoordsToScreen(x, y, z)
        local mX, mY, mZ = getCharCoordinates(PLAYER_PED) -- Мои координаты
        local draw1, draw2 = convert3DCoordsToScreen(mX, mY, mZ)
        renderDrawLine(draw1, draw2, pX, pY, 2.0, 0xFFD00000) -- Рисую линию к пикапам
        -- local distance = string.format("%.0f", getDistanceBetweenCoords3d(x, y, z, mX, mY, mZ)) -- Есть dist, поэтому не юзаю пока
        local dist = math.sqrt((x - mX)^2 + (y - mY)^2 + (z - mZ)^2) -- Сама формула вычисления ближайшего пикапа.
        if dist < minDist then
            minDist = dist
            renderFontDrawText(my_font, "{0089FF}Distance: {FFFFFF}"..dist, pX, pY, -1) -- Если всё гуд, то прикрепляю текст к ближайшему пикапу
        end
    end
end

Ответ уже дан выше

 

[frit]

Зачем ты в цикле получаешь свои координаты

я одну строчку добавил, остальной код не мой

 

[Rei]

function sampev.onSendTakeDamage(playerId, damage, weapon, bodypart, is_take_damage)
lua_thread.create(function()
    if act and damage >= 1.30 then
        printString("damage", 500)
        wait(500)
        addArmourToChar(PLAYER_PED, 1.00)
    end
end)
return true
end

How can I be sure that, if the condition occurs, perform the action only once?
So, if I take the damage, the script will continue to repeat the action indefinitely. How can I fix this?

function sampev.onSendTakeDamage(playerId, damage, weapon, bodypart, is_take_damage)
lua_thread.create(function()
    if act and damage >= 1.30 and not done then
        done = true
        printString("damage", 500)
        wait(500)
        addArmourToChar(PLAYER_PED, 1.00)
    end
end)
return true
end

 

[Letovo]

Привет! Как можно по айди машины узнать кто её водитель?

 

[Sana_Minotazaki]

Привет, как отправлять rpc без использования samp.lua
Примером если можно

 

[NGTeam]

Привет всем. В общем. На аризону добавили новую фракцию, там есть один ТекстДрав

Хочу сделать, что бы когда писало Пресс N то нажималось автоматом N, а когда Пресс H то нажималось автоматом H. Но тут одинаковые айди текстдравов. Как быть?

 

[Удалённый пользователь 341712]

Привет, как отправлять rpc без использования samp.lua
Примером если можно

Гайд - Урок по регулярным выражениям и использование хука.

Доброго времени суток, многие новички не знают как использовать регулярные выражения и хуки, в этом я вам помогу. И так, приступим, допустим, мы хотим поймать сообщение и дать на него ответ, как это сделать: local samp = require 'lib.samp.events' function samp.onServerMessage(color--[[Цвет]]...

www.blast.hk

 

[frit]

Гайд - Урок по регулярным выражениям и использование хука.

Доброго времени суток, многие новички не знают как использовать регулярные выражения и хуки, в этом я вам помогу. И так, приступим, допустим, мы хотим поймать сообщение и дать на него ответ, как это сделать: local samp = require 'lib.samp.events' function samp.onServerMessage(color--[[Цвет]]...

www.blast.hk

чо ты ему скинул

 

[Sana_Minotazaki]

чо ты ему скинул

Через битстрим если можно

 

[#Northn]

Привет, как отправлять rpc без использования samp.lua
Примером если можно

Эксклюзив - RakLua — RakNet hooks, functions for MoonLoader [UPDATE 2.13 | OPEN-SOURCE]

Представляю вам RakLua. RakLua — это новая библиотека, которая служит заменой событиям и функциям SAMPFUNCS для взаимодействия с RakNet'ом и BitStream — классом, позволяющим SAMPy отправлять/получать данные от сервера. Библиотека использует sol3 для биндинга C++ (самой библиотеки) и самого...

www.blast.hk