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

 

[kizn]

{FFFFFF}Статистика успеваемости сотрудника {66FF6C}TV студия SF{FFFFFF}: Stenford_Pains
Объявлений отредактировано: {FFB323}19{FFFFFF}
Объявлений отредактировано за сегодня {F9FF23}19{FFFFFF}

Последнее повышение:
{cccccc}03.11.2020 13:46:51

local sampev = require  'lib.samp.events'

function main()
    wait(-1) -- если в скрипте не участвует функция main вообще, можно ее не писать (при наличии хуков) либо поставить минусовую задержку чтобы скрипт не завершал работу
end

function sampev.onShowDialog(dialogId, style, title, button1, button2, text)
    if dialogId == 0 then
        local x = text:match('Объявлений отредактировано: %{FFB323%}(%d+)%{FFFFFF%}') 
        sampAddChatMessage(x, -1)
    end
end

мб так, попробуй

 

[chapo]

Как получить/изменить значение из определенной кнопки в MimGui?

 

[Стэнфорд]

У меня через sampSendChat не получается написать команду за игрока. Для этого есть другая команда или как?

 

[Dmitriy Makarov]

У меня через sampSendChat не получается написать команду за игрока. Для этого есть другая команда или как?

Если это не серверная команда, а например команда какого-то скрипта или же /q, то нужно через эту функцию: sampProcessChatInput("/q"))

 

[Стэнфорд]

Если это не серверная команда, а например команда какого-то скрипта или же /q, то нужно через эту функцию: sampProcessChatInput("/q"))

Серверная команда. (нужно сделать что бы она раз в 10 секунд писалась), попытался в вечный впихнуть, не работает

 

[Salvatore_Ferrari]

Серверная команда. (нужно сделать что бы она раз в 10 секунд писалась), попытался в вечный впихнуть, не работает

sampSendChat("/mn") Если не работает , значит какой левый скрипт перехватывает хук. Поудаляй по очереди скрипты и попробуй.

Серверная команда. (нужно сделать что бы она раз в 10 секунд писалась), попытался в вечный впихнуть, не работает

function main()



while true do

wait(10000)

sampSendChat("/mn")

end



end

 

[Jendosik]

Дайте сылку на полезные сниппеты и функции про диалоги

 

[1fs1]

Как задать проверку, если было 2 входящих хука в течение 250 мс, тогда идём дальше... ? К примеру входящий хук на серверные сообщения. Если пришло 2 сообщения в течение 250 мс.

 

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

не работает скрипт из за данной функции,что изменить что бы заработало?

function bcar
if bcar then
while not isSampAvailable() do wait(100) end
while true do
wait(0)
  if isKeyDown(VK_MENU) and isKeyJustPressed(VK_5) then -- Если нажать ALT + 5, то..
     if isCharInAnyCar(PLAYER_PED) then -- проверка на транспорт
      local carhandle = storeCarCharIsInNoSave(PLAYER_PED)-- Получения handle транспорта
      local idcar = getCarModel(carhandle) -- Получение ИД транспорта
        warpCharIntoCarAsPassenger(PLAYER_PED, carhandle,1)
        end
    end
end

 

[Wycmpblu]

Как нажать в диалоге по строчке, с нужным мне текстом? Голову ломаю не могу понять как.(
Например если диалог содержит в списке строчку с текстом "тест", то он по ней нажимает

 

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

не работает скрипт из за данной функции,что изменить что бы заработало?

function bcar
if bcar then
while not isSampAvailable() do wait(100) end
while true do
wait(0)
  if isKeyDown(VK_MENU) and isKeyJustPressed(VK_5) then -- Если нажать ALT + 5, то..
     if isCharInAnyCar(PLAYER_PED) then -- проверка на транспорт
      local carhandle = storeCarCharIsInNoSave(PLAYER_PED)-- Получения handle транспорта
      local idcar = getCarModel(carhandle) -- Получение ИД транспорта
        warpCharIntoCarAsPassenger(PLAYER_PED, carhandle,1)
        end
    end
end

function bcar() + переменную нужно поменять

Как нажать в диалоге по строчке, с нужным мне текстом? Голову ломаю не могу понять как.(
Например если диалог содержит в списке строчку с текстом "тест", то он по ней нажимает

result, button, list, input = sampHasDialogRespond(sampGetCurrentDialogId())
if result then
    if list == 1 and button == 1 then
    
    end
end

 

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

Блять нихуя не робит Функция сесть в кар на альт 5 че делать

local ev = require("samp.events")
local lcbk1 = false

function main()
    if not isSampLoaded() or not isSampfuncsLoaded() then return end
    while not isSampAvailable() do wait(100) end
    sampRegisterChatCommand("lcbk", lcbk)
    if isKeyDown(VK_MENU) and isKeyJustPressed(VK_5) then -- Если нажать ALT + 5, то..
     if isCharInAnyCar(PLAYER_PED) then -- проверка на транспорт
      local carhandle = storeCarCharIsInNoSave(PLAYER_PED)-- Получения handle транспорта
      local idcar = getCarModel(carhandle) -- Получение ИД транспорта
        warpCharIntoCarAsPassenger(PLAYER_PED, carhandle,1)
        end
    end
end

function ev.onPlayerEnterVehicle(playerId, vehicleId, passenger)
    if lcbk1 then
        local _, fp = sampGetCharHandleBySampPlayerId(playerId)
        if _ then
            local x1, y1, z1 = getCharCoordinates(PLAYER_PED)
            local x2, y2, z2 = getCharCoordinates(fp)
            if getDistanceBetweenCoords2d(x1, y1, x2, y2) < 50 then
                return false
            end
        end
    end
end

function lcbk()
    lcbk1 = not lcbk1
    if lcbk1 then
        printStyledString("~n~~n~~n~~n~~n~~n~~n~~n~~w~Lovec carov - ~g~activated", 1000, 4)
    else
        printStyledString("~n~~n~~n~~n~~n~~n~~n~~n~~w~Lovec carov - ~r~deactivated", 1000, 4)
    end
end

 

[Salvatore_Ferrari]

Блять нихуя не робит Функция сесть в кар на альт 5 че делать

local ev = require("samp.events")
local lcbk1 = false

function main()
    if not isSampLoaded() or not isSampfuncsLoaded() then return end
    while not isSampAvailable() do wait(100) end
    sampRegisterChatCommand("lcbk", lcbk)
    if isKeyDown(VK_MENU) and isKeyJustPressed(VK_5) then -- Если нажать ALT + 5, то..
     if isCharInAnyCar(PLAYER_PED) then -- проверка на транспорт
      local carhandle = storeCarCharIsInNoSave(PLAYER_PED)-- Получения handle транспорта
      local idcar = getCarModel(carhandle) -- Получение ИД транспорта
        warpCharIntoCarAsPassenger(PLAYER_PED, carhandle,1)
        end
    end
end

function ev.onPlayerEnterVehicle(playerId, vehicleId, passenger)
    if lcbk1 then
        local _, fp = sampGetCharHandleBySampPlayerId(playerId)
        if _ then
            local x1, y1, z1 = getCharCoordinates(PLAYER_PED)
            local x2, y2, z2 = getCharCoordinates(fp)
            if getDistanceBetweenCoords2d(x1, y1, x2, y2) < 50 then
                return false
            end
        end
    end
end

function lcbk()
    lcbk1 = not lcbk1
    if lcbk1 then
        printStyledString("~n~~n~~n~~n~~n~~n~~n~~n~~w~Lovec carov - ~g~activated", 1000, 4)
    else
        printStyledString("~n~~n~~n~~n~~n~~n~~n~~n~~w~Lovec carov - ~r~deactivated", 1000, 4)
    end
end

local ev = require("samp.events")

local lcbk1 = false



function main()

    if not isSampLoaded() or not isSampfuncsLoaded() then return end

    while not isSampAvailable() do wait(100) end

    sampRegisterChatCommand("lcbk", lcbk)
    while true do
    wait(0)

    if isKeyDown(VK_MENU) and isKeyJustPressed(VK_5) then -- Если нажать ALT + 5, то..

     if isCharInAnyCar(PLAYER_PED) then -- проверка на транспорт

      local carhandle = storeCarCharIsInNoSave(PLAYER_PED)-- Получения handle транспорта

      local idcar = getCarModel(carhandle) -- Получение ИД транспорта

        warpCharIntoCarAsPassenger(PLAYER_PED, carhandle,1)
        end

        end

    end

end



function ev.onPlayerEnterVehicle(playerId, vehicleId, passenger)

    if lcbk1 then

        local _, fp = sampGetCharHandleBySampPlayerId(playerId)

        if _ then

            local x1, y1, z1 = getCharCoordinates(PLAYER_PED)

            local x2, y2, z2 = getCharCoordinates(fp)

            if getDistanceBetweenCoords2d(x1, y1, x2, y2) < 50 then

                return false

            end

        end

    end

end



function lcbk()

    lcbk1 = not lcbk1

    if lcbk1 then

        printStyledString("~n~~n~~n~~n~~n~~n~~n~~n~~w~Lovec carov - ~g~activated", 1000, 4)

    else

        printStyledString("~n~~n~~n~~n~~n~~n~~n~~n~~w~Lovec carov - ~r~deactivated", 1000, 4)

    end

 

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

все сделал как ты пишет неизвестная комманда

local ev = require("samp.events")

local lcbk1 = false



function main()

    if not isSampLoaded() or not isSampfuncsLoaded() then return end

    while not isSampAvailable() do wait(100) end

    sampRegisterChatCommand("lcbk", lcbk)
    while true do
    wait(0)

    if isKeyDown(VK_MENU) and isKeyJustPressed(VK_5) then -- Если нажать ALT + 5, то..

     if isCharInAnyCar(PLAYER_PED) then -- проверка на транспорт

      local carhandle = storeCarCharIsInNoSave(PLAYER_PED)-- Получения handle транспорта

      local idcar = getCarModel(carhandle) -- Получение ИД транспорта

        warpCharIntoCarAsPassenger(PLAYER_PED, carhandle,1)
        end

        end

    end

end



function ev.onPlayerEnterVehicle(playerId, vehicleId, passenger)

    if lcbk1 then

        local _, fp = sampGetCharHandleBySampPlayerId(playerId)

        if _ then

            local x1, y1, z1 = getCharCoordinates(PLAYER_PED)

            local x2, y2, z2 = getCharCoordinates(fp)

            if getDistanceBetweenCoords2d(x1, y1, x2, y2) < 50 then

                return false

            end

        end

    end

end



function lcbk()

    lcbk1 = not lcbk1

    if lcbk1 then

        printStyledString("~n~~n~~n~~n~~n~~n~~n~~n~~w~Lovec carov - ~g~activated", 1000, 4)

    else

        printStyledString("~n~~n~~n~~n~~n~~n~~n~~n~~w~Lovec carov - ~r~deactivated", 1000, 4)

    end

local ev = require("samp.events")
local lcbk1 = false
function main()
    if not isSampLoaded() or not isSampfuncsLoaded() then return end
    while not isSampAvailable() do wait(100) end
    sampRegisterChatCommand("lcbk", lcbk)
    while true do
    wait(0)
    if isKeyDown(VK_MENU) and isKeyJustPressed(VK_5) then -- Если нажать ALT + 5, то..
     if isCharInAnyCar(PLAYER_PED) then -- проверка на транспорт
      local carhandle = storeCarCharIsInNoSave(PLAYER_PED)-- Получения handle транспорта
      local idcar = getCarModel(carhandle) -- Получение ИД транспорта
        warpCharIntoCarAsPassenger(PLAYER_PED, carhandle,1)
        end
    end
end
function ev.onPlayerEnterVehicle(playerId, vehicleId, passenger)
    if lcbk1 then
        local _, fp = sampGetCharHandleBySampPlayerId(playerId)
        if _ then
            local x1, y1, z1 = getCharCoordinates(PLAYER_PED)
            local x2, y2, z2 = getCharCoordinates(fp)
            if getDistanceBetweenCoords2d(x1, y1, x2, y2) < 50 then
                return false
            end
        end
    end
end
function lcbk()
    lcbk1 = not lcbk1
    if lcbk1 then
        printStyledString("~n~~n~~n~~n~~n~~n~~n~~n~~w~Lovec carov - ~g~activated", 1000, 4)
    else
        printStyledString("~n~~n~~n~~n~~n~~n~~n~~n~~w~Lovec carov - ~r~deactivated", 1000, 4)
    end

 

[Salvatore_Ferrari]

local ev = require("samp.events")

local lcbk1 = false

function main()

    if not isSampLoaded() or not isSampfuncsLoaded() then return end

    while not isSampAvailable() do wait(100) end

    sampRegisterChatCommand("lcbk", lcbk)

    while true do

    wait(0)

    if isKeyDown(VK_MENU) and isKeyJustPressed(VK_5) then -- Если нажать ALT + 5, то..

     if isCharInAnyCar(PLAYER_PED) then -- проверка на транспорт

      local carhandle = storeCarCharIsInNoSave(PLAYER_PED)-- Получения handle транспорта

      local idcar = getCarModel(carhandle) -- Получение ИД транспорта

        warpCharIntoCarAsPassenger(PLAYER_PED, carhandle,1)

        end

    end

wait(-1)

end

function ev.onPlayerEnterVehicle(playerId, vehicleId, passenger)

    if lcbk1 then

        local _, fp = sampGetCharHandleBySampPlayerId(playerId)

        if _ then

            local x1, y1, z1 = getCharCoordinates(PLAYER_PED)

            local x2, y2, z2 = getCharCoordinates(fp)

            if getDistanceBetweenCoords2d(x1, y1, x2, y2) < 50 then

                return false

            end

        end

    end



end

function lcbk()

    lcbk1 = not lcbk1

    if lcbk1 then

        printStyledString("~n~~n~~n~~n~~n~~n~~n~~n~~w~Lovec carov - ~g~activated", 1000, 4)

    else

        printStyledString("~n~~n~~n~~n~~n~~n~~n~~n~~w~Lovec carov - ~r~deactivated", 1000, 4)

    end