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

 

[Daniel_Reker]

Как сделать, чтоб при появлении строки в чате скрипт выполнял какое-то действие лишь единожды? Например, в чате появилось сообщение "test123", и скрипт ТОЛЬКО 1 РАЗ выполнял какое-либо действие, например, прописывал команду, и так при каждом появлении этой строки в чате. Если делаю обычную проверку на строку в бесконечном цикле, то скрипт продолжает прописывать команду до тех пор, пока её не сменит другая строка. Как этого избежать? Заранее спс

 

[Shamanije]

Как сделать, чтоб при появлении строки в чате скрипт выполнял какое-то действие лишь единожды? Например, в чате появилось сообщение "test123", и скрипт ТОЛЬКО 1 РАЗ выполнял какое-либо действие, например, прописывал команду, и так при каждом появлении этой строки в чате. Если делаю обычную проверку на строку в бесконечном цикле, то скрипт продолжает прописывать команду до тех пор, пока её не сменит другая строка. Как этого избежать? Заранее спс

local sampev = require 'lib.samp.events'

function sampev.onServerMessage(col, msg)
    if msg:match('test123') then
        sampAddChatMessage('matched string', -1)
    end
end

Такое сделал в первую очередь. Не пашет. Или ты имеешь в виду убрать Z координату?

Сделай неравенство, так как координаты могут полностью не совпадать, например

if x > 1000 and x < 1002 then
    action
end

 

[Ashot148]

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

 

[H.e.a.v.e.n.l.y]

Как можно обойти античит ? можно хотя бы принцип или сами функции

 

[LuaMaster]

Кто может написать пример, что бы чел ставал в афк перед PayDay

 

[H.e.a.v.e.n.l.y]

function main()
    while not isSampAvailable() do wait(100) end
    sampRegisterChatCommand('teleport',command)
    while true do wait(0) end end
function command()
    if isCharInAnyCar(Ped ped) and not printStringNow(Get car, 1000) then
    bool,x,y,z = getTargetBlipCoordinates()
    if bool then setCharCoordinates(playerPed,x,y,z) end end

Хельп

 

[Supra]

Как чекнуть уперся ли персонаж куда либо?

 

[777qwerty777]

if isCharInAnyCar(Ped ped) and not printStringNow(Get car, 1000) then

if isCharInAnyCar(PLAYER_PED) then

 

[Eugene Crabs]

local sampev = require 'lib.samp.events'

function sampev.onServerMessage(col, msg)
    if msg:match('test123') then
        sampAddChatMessage('matched string', -1)
    end
end

Сделай неравенство, так как координаты могут полностью не совпадать, например

if x > 1000 and x < 1002 then
    action
end

В чем здесь ошибка?

for q = 1, 15 do
            if positionX-1 >coordx[w] < positionX+1 and positionY-1 > coordy[w] < positionY +1 and positionZ-1> coordz[w] < positionZ+1
            then
                w = w+1
                       
            else
                taskGoStraightToCoord(playerPed, coordx[w], coordy[w], coordz[w], 6, -1)
                            positionX, positionY, positionZ = getCharCoordinates(playerPed)
            end
        end

 

[Shamanije]

В чем здесь ошибка?

for q = 1, 15 do
            if positionX-1 >coordx[w] < positionX+1 and positionY-1 > coordy[w] < positionY +1 and positionZ-1> coordz[w] < positionZ+1
            then
                w = w+1
                      
            else
                taskGoStraightToCoord(playerPed, coordx[w], coordy[w], coordz[w], 6, -1)
                            positionX, positionY, positionZ = getCharCoordinates(playerPed)
            end
        end

Отпиши в ВК.

 

[mrdiimax]

Каким образом отправить серверу нажатие на кнопку закрыть?
"sampSendDialogResponse(dialogId, 0, 0)" не сработало, как и с sampSendDialogResponse(dialogId, 2, 2)

 

[Shamanije]

Посмотреть вложение 22670
Каким образом отправить серверу нажатие на кнопку закрыть?
"sampSendDialogResponse(dialogId, 0, 0)" не сработало, как и с sampSendDialogResponse(dialogId, 2, 2)

Возращать false из события или

sampCloseCurrentDialogWithButton(int button)

 

[H.e.a.v.e.n.l.y]

function main()
    while not isSampAvailable() do wait(100) end
    sampRegisterChatCommand('teleport',command)
    while true do wait(0) end end
function command()
    bool,x,y,z = getTargetBlipCoordinates()
    if bool then setCharCoordinates(playerPed,x,y,z) end end

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

 

[mrdiimax]

Возращать false из события или

sampCloseCurrentDialogWithButton(int button)

не профит

 

[Shamanije]

не профит

false из события

function main()
    while not isSampAvailable() do wait(100) end
    sampRegisterChatCommand('teleport',command)
    while true do wait(0) end end
function command()
    bool,x,y,z = getTargetBlipCoordinates()
    if bool then setCharCoordinates(playerPed,x,y,z) end end

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

function main()
    while not isSampAvailable() do wait(100) end
    sampRegisterChatCommand('teleport',command)
    while true do wait(0) end
end

function command()
    bool, x, y, z = getTargetBlipCoordinates()
    if bool == true and isCharInAnyCar(PLAYER_PED) then
        setCharCoordinates(playerPed,x,y,z)
    end
end