Вопросы по 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.
Как получить транспорт, в котором сидит игрок?
Lua:
local veh = storeCarCharIsInNoSave(PLAYER_PED)
Как получить свой id или id другого игрока?
Lua:
local _, id = sampGetPlayerIdByCharHandle(PLAYER_PED) -- получить свой ид
local _, id = sampGetPlayerIdByCharHandle(ped) -- получить ид другого игрока. ped - это хендл персонажа
Как проверить, что строка содержит какой-то текст?
Lua:
if string.find(str, 'текст', 1, true) then
-- строка str содержит "текст"
end
Как эмулировать нажатие игровой клавиши?
Lua:
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 другого игрока, в которого целюсь я?
Lua:
local valid, ped = getCharPlayerIsTargeting(PLAYER_HANDLE) -- получить хендл персонажа, в которого целится игрок
if valid and doesCharExist(ped) then -- если цель есть и персонаж существует
  local result, id = sampGetPlayerIdByCharHandle(ped) -- получить samp-ид игрока по хендлу персонажа
  if result then -- проверить, прошло ли получение ида успешно
    -- здесь любые действия с полученным идом игрока
  end
end
Как зарегистрировать команду чата SAMP?
Lua:
-- До бесконечного цикла/задержки
sampRegisterChatCommand("mycommand", function (param)
     -- param будет содержать весь текст введенный после команды, чтобы разделить его на аргументы используйте string.match()
    sampAddChatMessage("MyCMD", -1)
end)
Крашит игру при вызове sampSendChat. Как это исправить?
Это происходит из-за бага в SAMPFUNCS, когда производится попытка отправки пакета определенными функциями изнутри события исходящих RPC и пакетов. Исправления для этого бага нет, но есть способ не провоцировать его. Вызов sampSendChat изнутри обработчика исходящих RPC/пакетов нужно обернуть в скриптовый поток с нулевой задержкой:
Lua:
function onSendRpc(id)
  -- крашит:
  -- sampSendChat('Send RPC: ' .. id)

  -- норм:
  lua_thread.create(function()
    wait(0)
    sampSendChat('Send RPC: ' .. id)
  end)
end
 
Последнее редактирование:

biGliGma

Участник
78
5
В moonloader выдает ошибку, что getAllPickups равно ничему. (attempt to call global 'getAllPickups' (a nil value))
Lua:
function NearestPickup()
    local minDist = 20
    local nearestPickup = -1
    local mX, mY, mZ = getCharCoordinates(playerPed)
    for _, v in pairs(getAllPickups()) do
        if getPickupModel(v) == 1318 then
            local x, y, z = getPickupCoordinates(v)
            local distance = getDistanceBetweenCoords3d(x, y, z, mX, mY, mZ)
            if distance < minDist then
                minDist = distance
                nearestPickup = v
            end
        end
    end
    local picid = sampGetPickupSampIdByHandle(nearestPickup)
    sampSendPickedUpPickup(picid)
end
 

Adrian G.

Известный
Проверенный
521
454
Как получить текст над игроком (тот что в чате) и изменить его?
Попробуй
Lua:
local sampev = require 'lib.samp.events'

function sampev.onPlayerChatBubble(playerId, color, distance, duration, message)
    if message:find('Заменяемый текст') then
        message = message:gsub('Заменяемый текст', 'Замененный текст.')
        return{playerId, color, distance, duration, message}
    end
end
 

CaJlaT

Овощ
Модератор
2,806
2,614
В moonloader выдает ошибку, что getAllPickups равно ничему. (attempt to call global 'getAllPickups' (a nil value))
Lua:
function NearestPickup()
    local minDist = 20
    local nearestPickup = -1
    local mX, mY, mZ = getCharCoordinates(playerPed)
    for _, v in pairs(getAllPickups()) do
        if getPickupModel(v) == 1318 then
            local x, y, z = getPickupCoordinates(v)
            local distance = getDistanceBetweenCoords3d(x, y, z, mX, mY, mZ)
            if distance < minDist then
                minDist = distance
                nearestPickup = v
            end
        end
    end
    local picid = sampGetPickupSampIdByHandle(nearestPickup)
    sampSendPickedUpPickup(picid)
end
Версия муна не та, нужна 027!!! Скачать: https://www.blast.hk/threads/13305/page-2#post-386466
1610204793117.png
 
  • Нравится
Реакции: biGliGma

tor1

Активный
158
42
Подскажите, пожалуйста, почему может кикать античит?
Lua:
ev = require 'samp.events'

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


    sampRegisterChatCommand("cargo", changeCarHealth)

    wait(-1)
end

function changeCarHealth()
    if isCharInAnyCar(1) then
        local veh = storeCarCharIsInNoSave(PLAYER_PED)
        carHealth = getCarHealth(veh)
        fixCar(veh)
        hpBypass = true
    end
end

function ev.onSendVehicleSync(data)
    if hpBypass then
        if data.health > carHealth then
            hpBypass = false
        else
            data.health = carHealth
        end
    end
end
 

biGliGma

Участник
78
5
Проблема в том, что когда персонаж садится в тс, он дальше ничего не делает, идет бесконечный цикл. Как садится в машину, дальше скрипт не идет.
lua:
            while l < 10 do
                EmulateKey(0x46, true)
                wait(20)
                EmulateKey(0x46, false)
                sampAddChatMessage(string.format("[%s]: 1", thisScript().name), 0x40FF40)
                while isCharPlayingAnim(playerPed, _) do return end
                NearestPickup()
                wait(200)
                teleportPlayer(x3, y3, z3)
                sampAddChatMessage(string.format("[%s]: 2", thisScript().name), 0x40FF40)
                EmulateKey(0x12, true)
                wait(20)
                EmulateKey(0x12, false)
                wait(200)
                sampAddChatMessage(string.format("[%s]: 3", thisScript().name), 0x40FF40)
                EmulateKey(0x46, true)
                wait(20)
                EmulateKey(0x46, false)
                while not isCharInAnyCar(playerPed) do return end
                wait(200)
                sampAddChatMessage(string.format("[%s]: 4", thisScript().name), 0x40FF40)
                l = l + 1         
            end
 

daite na_vodky

Известный
147
47
что я делаю не так и почему у меня вместо дня недели на русском кракозябры?

Посмотреть вложение 82159
Lua:
local encoding = require'encoding'
encoding.default = 'CP1251'
u8 = encoding.UTF8

local day = os.date("%a")
local tWeekdays = {
    [0] = 'Воскресенье',
    [1] = 'Понедельник',
    [2] = 'Вторник',
    [3] = 'Среда',
    [4] = 'Четверг',
    [5] = 'Пятница',
    [6] = 'Суббота'
}
function main()
    repeat wait(0) until isSampAvailable()
    while true do wait(0)
        for day = 1, 6 do
            weekday = (u8(tWeekdays[day]))
        end
        if day == 0
            then weekday = (u8(tWeekdays[0]))
        end
    renderFontDrawText(font, string.format("%02d.%02d.%02d (%s)", os.date("%d"), os.date("%m"), os.date("%Y"), weekday), 3, slot1 - 30 - 7, string.format("0xFFFFFFFF"))
    renderFontDrawText(font, string.format("%02d:%02d:%02d", os.date("%H"), os.date("%M"), os.date("%S")), 3, slot1 - 30 + 7, string.format("0xFFFFFFFF"))
    end
end
 

CaJlaT

Овощ
Модератор
2,806
2,614
Проблема в том, что когда персонаж садится в тс, он дальше ничего не делает, идет бесконечный цикл. Как садится в машину, дальше скрипт не идет.
lua:
            while l < 10 do
                EmulateKey(0x46, true)
                wait(20)
                EmulateKey(0x46, false)
                sampAddChatMessage(string.format("[%s]: 1", thisScript().name), 0x40FF40)
                while isCharPlayingAnim(playerPed, _) do return end
                NearestPickup()
                wait(200)
                teleportPlayer(x3, y3, z3)
                sampAddChatMessage(string.format("[%s]: 2", thisScript().name), 0x40FF40)
                EmulateKey(0x12, true)
                wait(20)
                EmulateKey(0x12, false)
                wait(200)
                sampAddChatMessage(string.format("[%s]: 3", thisScript().name), 0x40FF40)
                EmulateKey(0x46, true)
                wait(20)
                EmulateKey(0x46, false)
                while not isCharInAnyCar(playerPed) do return end
                wait(200)
                sampAddChatMessage(string.format("[%s]: 4", thisScript().name), 0x40FF40)
                l = l + 1        
            end
return на wait(0) поменяй и всё
Lua:
            while l < 10 do
                EmulateKey(0x46, true)
                wait(20)
                EmulateKey(0x46, false)
                sampAddChatMessage(string.format("[%s]: 1", thisScript().name), 0x40FF40)
                while isCharPlayingAnim(playerPed, _) do wait(0) end
                NearestPickup()
                wait(200)
                teleportPlayer(x3, y3, z3)
                sampAddChatMessage(string.format("[%s]: 2", thisScript().name), 0x40FF40)
                EmulateKey(0x12, true)
                wait(20)
                EmulateKey(0x12, false)
                wait(200)
                sampAddChatMessage(string.format("[%s]: 3", thisScript().name), 0x40FF40)
                EmulateKey(0x46, true)
                wait(20)
                EmulateKey(0x46, false)
                while not isCharInAnyCar(playerPed) do wait(0) end
                wait(200)
                sampAddChatMessage(string.format("[%s]: 4", thisScript().name), 0x40FF40)
                l = l + 1         
            end
 

CaJlaT

Овощ
Модератор
2,806
2,614
что я делаю не так и почему у меня вместо дня недели на русском кракозябры?

Посмотреть вложение 82159
Lua:
local encoding = require'encoding'
encoding.default = 'CP1251'
u8 = encoding.UTF8

local day = os.date("%a")
local tWeekdays = {
    [0] = 'Воскресенье',
    [1] = 'Понедельник',
    [2] = 'Вторник',
    [3] = 'Среда',
    [4] = 'Четверг',
    [5] = 'Пятница',
    [6] = 'Суббота'
}
function main()
    repeat wait(0) until isSampAvailable()
    while true do wait(0)
        for day = 1, 6 do
            weekday = (u8(tWeekdays[day]))
        end
        if day == 0
            then weekday = (u8(tWeekdays[0]))
        end
    renderFontDrawText(font, string.format("%02d.%02d.%02d (%s)", os.date("%d"), os.date("%m"), os.date("%Y"), weekday), 3, slot1 - 30 - 7, string.format("0xFFFFFFFF"))
    renderFontDrawText(font, string.format("%02d:%02d:%02d", os.date("%H"), os.date("%M"), os.date("%S")), 3, slot1 - 30 + 7, string.format("0xFFFFFFFF"))
    end
end
Как минимум нужно убрать эту поебень, что идёт перед рендером в цикле, вот рабочий вариант:

Lua:
font = renderCreateFont("Molot", 9, 5)
local tWeekdays = {
    [0] = 'Воскресенье',
    [1] = 'Понедельник',
    [2] = 'Вторник',
    [3] = 'Среда',
    [4] = 'Четверг',
    [5] = 'Пятница',
    [6] = 'Суббота'
}
function main()
    repeat wait(0) until isSampAvailable()
    while true do wait(0)
        renderFontDrawText(font, string.format("%02d.%02d.%02d (%s)", os.date("%d"), os.date("%m"), os.date("%Y"), tWeekdays[tonumber(os.date("%w"))]), 3, 30 - 7, string.format("0xFFFFFFFF"))
        renderFontDrawText(font, string.format("%02d:%02d:%02d", os.date("%H"), os.date("%M"), os.date("%S")), 3, 30 + 7, string.format("0xFFFFFFFF"))
    end
end
1610215120990.png
 
  • Нравится
Реакции: daite na_vodky

danywa

Активный
358
50
как можно в скрипте использовать команду,но при этом не оставлять ее в буфере чата?
 

advancerp

Известный
77
5
Как выводить весь полученный урон игроками в зоне стрима?
Например кто-нибудь выстрелил в другого и чтобы это отобразилось