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

 

[Eugene Crabs]

Вообще для некого биндера, нажимаешь на кнопку и оно выполняет сначала кмд(допустим /mn), а потом 2 раза кликает на пункт.

Попробуй это:
Для проверки нужного элемента - int list = sampGetCurrentDialogListItem()
Для нажатия - sampSetCurrentDialogListItem(int list)

И в конце клацает на текстдрав

С этим посложнее. У меня есть способ, лучше него пока ничего не придумал.

Тебе нужно найти/создать скрипт, который будет выводить на твой экран все ID текстдравов.
Далее нужно будет найти на экране ID нужного тебе текстдрава и узнать ID его модели или же узнать его буквенный текст.
Далее записать полученный тобою результат в переменную в самой программе.
После этого можно уже будет создать функцию, которая пробегает по всем существующим текстдравам, сверяет их модель/текст с нужным тебе и начинает действие в случае удачи.

Также одинаковых моделей/текстов на экране может быть более 1, тогда нужно пропускать несколько при поиске.

p.s. Разве что с хуком поиграть, но там такие дебри, что мне страшно

 

[Eugene Crabs]

А как правильно все это оформить не знаешь? Чет все равно не получается

К какому "if" у тебя привязан второй "else"?

 

[Сheesecake]

К какому "if" у тебя привязан второй "else"?

По сути 2 должен быть привязан к проверки ввел ли я айдишники, а первый к sampIsPlayerConnected(id)

 

[Eugene Crabs]

По сути 2 должен быть привязан к проверки ввел ли я айдишники, а первый к sampIsPlayerConnected(id)

Попробуй заменить его на if id == nil then

 

[Eugene Crabs]

INCOMING_RPCS[RPC.DISPLAYGAMETEXT] = {'onDisplayGameText', {style = 'int32'}, {time = 'int32'}, {text = 'string32'}}
либо onShowTextdraw, сам проверяй

sampev.onDisplayGameText(style, time, text)

А функцию до сих пор не завезли? Библиотеку подключать как-то...

 

[6y6Jluk]

function samp.onShowDialog(did, style, title, button1, button2, text)
    print("did: " .. did .. ", title: " .. title) -- did = id диалога, title = заголовок диалога
    if did == 3075 and title:find("{FFFFFF}Транспортная компания") then
        sampSendDialogResponse(did, 1, 0, 0) -- вот так нажимаем на кнопки диалога
    end
end

addOneOffSound(0, 0, 0, 1057) -- ну это не музыка, но какой то звуковой сигнал будет)

а как сделать что б был этот звуковой сигнал, потом через 1 секунду опять повторился? и так например 3 раза? и Ещё как сделать что б закрылся диалог? Оно ентер нажимает, метка на карте ставится, но диалог не исчезает

 

[Eugene Crabs]

а как сделать что б был этот звуковой сигнал, потом через 1 секунду опять повторился? и так например 3 раза? и Ещё как сделать что б закрылся диалог? Оно ентер нажимает, метка на карте ставится, но диалог не исчезает

Со звуком просто попробуй поиграться с wait. Закрылся диалог - не знаю, обычно enter работает. Можешь еще попробовать нажимать на кнопку самого диалога

 

[Basho]

Каково значение click.object при первом запуске скрипта и при последующем? Если при первом false, а при втором true, то возможная ошибка в отсутствии присвоения ему false после нажатия на текстдрав

p.s. Для какого сервера эта хреновина?

даймонд

 

[Flandi]

Ищу код для отправки в чат твоих координат, желательно с описанием как работает.

 

[Next..]

Ищу код для отправки в чат твоих координат, желательно с описанием как работает.

function main()
    if not isSampLoaded() or not isSampfuncsLoaded() then return end
    while not isSampAvailable() do wait(100) end
    sampRegisterChatCommand('mycoord', mycoord)--регистрация команды
    while true do wait(0)
    end
end

function mycoord()
    sampAddChatMessage(string.format('x: %d, y: %d, z: %d', getCharCoordinates(PLAYER_PED)), -1) -- вывод сообщения если прописали команду /mycoord
end

 

[Сheesecake]

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

/poehali Ivan_Pupkin Test

function cmd_poehali(pam)
    lua_thread.create(function()
        local nick, nak = pam:match('(.+)%s(.+)')
        nick = sampGetPlayerNickname(nick)
        if nick and nak then
        if sampIsPlayerConnected(nick) then
            sampSendChat('/f ' .. nick .. ' ' ..nak)
        else
            sampAddChatMessage('Игрок офф.', -1)
        end
        else
            sampAddChatMessage('Не ввел ничего', -1)
        end
    end)
end

function sampGetPlayerIdByNickname(nick)
    local _, myid = sampGetPlayerIdByCharHandle(playerPed)
    if tostring(nick) == sampGetPlayerNickname(myid) then return myid end
    for i = 0, sampGetMaxPlayerId() do if sampIsPlayerConnected(i) and sampGetPlayerNickname(i) == tostring(nick) then return i end end
    return -1
end

Не то все выходит

 

[biGliGma]

Когда я прописываю свою команду "/sback" в игре, пишет, что такой команды не существует

function main()
        if not isSampfuncsLoaded() or not isSampLoaded() then return end
        while not isSampAvailable() do wait(100) end
        while true do
        wait(0)
        end
        sampRegisterChatCommand("sback", sback)
end

function sback(param)
        sampSendClickTextdraw(466)   
end

 

[#Northn]

while true do wait(0) end

sampRegisterChatCommand("sback", sback)

потому что бесконечный цикл и он не завершается, по этой причине функция дальше не идёт
переставь их местами

 

[Curtis]

Как сделать нажатие клавиши ЛМК при этом тексте ?

 

[HarlyCloud]

Почему изображение белое?????