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

 

[CaJlaT]

local _, myid = sampGetPlayerIdByCharHandle(PLAYER_PED)
local anm = false

function main()
    while not isSampAvailable() do wait(100) end
    --
    sampRegisterChatCommand('animka', cmd_animka)
    --
    animid = sampGetPlayerAnimationId(myid)
    --
    while true do
    wait(0)
        if anm then
            sampAddChatMessage(animid, -1)
        end
    end
end

function cmd_animka()
    anm = not anm
    if anm then
        printStringNow('on', 1000)
    else
        printStringNow('off', 1000)
    end
end

Почему выводит только: 1136? (юзал все анимки, выводит - только 1136)

Я же сказал что animid = sampGetPlayerAnimationId(myid) в цикл

local _, myid = sampGetPlayerIdByCharHandle(PLAYER_PED)
local anm = false

function main()
    while not isSampAvailable() do wait(100) end
    --
    sampRegisterChatCommand('animka', cmd_animka)
    --
    while true do
    wait(0)
        if anm then
            animid = sampGetPlayerAnimationId(myid)
            sampAddChatMessage(animid, -1)
        end
    end
end

function cmd_animka()
    anm = not anm
    if anm then
        printStringNow('on', 1000)
    else
        printStringNow('off', 1000)
    end
end

 

[Letovo]

Всех приветствую, вот на одном сервере когда человек пишет что-то в чат, то у него над головой пишется текст, как можно этот текст скрыть?

 

[atomlin]

Как можно сделать проверку на AttachedObject? Т.e если на игроке есть аттачнутый объект а именно: (ниже) то выполнять мой код.

 

[McLore]

Проверка на анимацию или спец действия

 

[Eugene Crabs]

Как можно сделать проверку на AttachedObject? Т.e если на игроке есть аттачнутый объект а именно: (ниже) то выполнять мой код.Посмотреть вложение 53913

Насколько мне известно - никак. Вроде как можно только менять его положение и т.д.

Проверка на анимацию или спец действия

int animid = sampGetPlayerAnimationId(int playerId)

Вопрос. Как отправить значение переменной в буфер обмена?

 

[Izvinisb]

Насколько мне известно - никак. Вроде как можно только менять его положение и т.д.

int animid = sampGetPlayerAnimationId(int playerId)

Вопрос. Как отправить значение переменной в буфер обмена?

bool result = setClipboardText(string text)

 

[MaksQ]

как думаете что должно быть тут вместо этого slot0?

 function sampev.onSendPlayerSync(slot0)
            if slot0.keysData == 40 then
                    slot0.keysData = 32
            end
        end

 

[Izvinisb]

как думаете что должно быть тут вместо этого slot0?

 function sampev.onSendPlayerSync(slot0)
            if slot0.keysData == 40 then
                    slot0.keysData = 32
            end
        end

data

 

[CanslerW]

Смотри я хочу сделать, когда нажимаешь на Автор Скрипта, выскакивало новое диалоговое окно, как это сделать?

 

[MaksQ]

Смотри я хочу сделать, когда нажимаешь на Автор Скрипта, выскакивало новое диалоговое окно, как это сделать?

Moon ImGui — Dear ImGui for MoonLoader

Представляю вам Moon ImGui - Lua биндинг ImGui для MoonLoader. Он включает все основные возможности фреймворка, а API максимально приближен к оригинальному по мере возможного. Тут не будут подробно рассматриваться возможности и особенности ImGui, в этой теме будет рассказано и показано как...

www.blast.hk

data

а тут?

function sampev.onSendVehicleDamaged(slot0, slot1, slot2, slot3, slot4)
            return false
        end

 

[Izvinisb]

Moon ImGui — Dear ImGui for MoonLoader

Представляю вам Moon ImGui - Lua биндинг ImGui для MoonLoader. Он включает все основные возможности фреймворка, а API максимально приближен к оригинальному по мере возможного. Тут не будут подробно рассматриваться возможности и особенности ImGui, в этой теме будет рассказано и показано как...

www.blast.hk

а тут?

function sampev.onSendVehicleDamaged(slot0, slot1, slot2, slot3, slot4)
            return false
        end

onSendVehicleDamaged(vehicleId, panelDmg, doorDmg ,lights , tires)

По этому пути зайди в events.lua и там можешь смотреть структуры.

 

[Letovo]

Как можно скрыть текст, который пишется над головой у человека (написал человек что-то в чат и у него над головой это сообщение повторилось)?

 

[atomlin]

Как можно сделать проверку на специальное действие? Пример: (ниже

)

 

[si0z]

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

 

[Kaspersss]

помогите разобраться, в коде ниже, у меня при вводе /cmd - берется размер этой команды, а после этого ввожу /ignews например, и остается размер /cmd, как сделать что бы к каждому окну был свой размер?

function imgui.OnDrawFrame()

if isMenuActive1.v then
    imgui.SetNextWindowSize(imgui.ImVec2(501,300), imgui.Cond.FirstUseEver)
    imgui.SetNextWindowPos(imgui.ImVec2((sw / 2), sh / 2), imgui.Cond.FirstUseEver, imgui.ImVec2(0.5, 0.5))
    imgui.Begin(u8 "Команды:", isMenuActive1.v)
    imgui.Text(u8 '1. /cam - включить РП камеру.\n2./selllicd [ID] [Граммы] - продать лицензию на рыбу.\n3./rcmd - команды руководства.\n4./tag [Тэг] - ввести тэг(город вашей организации, пример: SF).\n5./nomer [номер] - ввести номер своего телефона(Пример: 551-551).\n6./frac [Фракция] - ввести свою фракцию(Пример: San-Fierro)\n7./fte [Text] - сообщение в /f с тэгом.\n8./cc - очистить все сообщения.\n9./mlec - меню с лекциями.\n10./post [Свой пост] - доклад в рацию о посту.\n11./adv [ID] - освободить по УДО человека.\n12./sobes [ID] - начать проверку на собеседовании.\n \n13./sms [ID/Номер] [Текст] - отправка СМС по ID.\nТак-же, если вы уже писали собеседнику - можно написать просто /sms [Текст]\n \n14./ - .\n')
    imgui.End()
end

if isMenuActive2.v then
    imgui.SetNextWindowSize(imgui.ImVec2(500,300), imgui.Cond.FirstUseEver)
    imgui.SetNextWindowPos(imgui.ImVec2((sw / 2), sh / 2), imgui.Cond.FirstUseEver, imgui.ImVec2(0.5, 0.5))
    imgui.Begin(u8 "Ввод текста:", isMenuActive2.v)
    imgui.InputText(u8 'Введите текст', text_buffer)
    if imgui.Button(u8 'Сохранить') then
    sampAddChatMessage('Хай', -1)
    end
    imgui.SetCursorPosY(250)
    imgui.Text(u8 'Привет')
    imgui.End()
end

if isMenuActive3.v then
    imgui.SetNextWindowSize(imgui.ImVec2(500,300), imgui.Cond.FirstUseEver)
    imgui.SetNextWindowPos(imgui.ImVec2((sw / 2), sh / 2), imgui.Cond.FirstUseEver, imgui.ImVec2(0.5, 0.5))
    imgui.Begin(u8 "Команды:", isMenuActive3.v)
    imgui.Text(u8 '1./uninvited [ID] [Причина] - увольнение человека.\n2./fwarnd [ID] [Причина] - выдать выговор.\n3./fwarnoffd [Nick_Name] [Причина] - выдача выговора в offline.\n4./unfwarnd [ID] [Причина] - снятие выговора.\n5./chip - активировать свой чип.\n6./invited [ID] - принять человека в организацию.\n7./setskind [ID] - выдать скин.\n8./uninviteoffd [Nick_Name] [Причина] - увольнение offline.\n9./ignews - информация про gnews(как кидать скриптом).\n10./rangd [ID] - повысить ранг человеку.\n11./perevod - сообщить о открытых переводах в свою мэрию.')
    imgui.End()
end

if isMenuActive4.v then
    imgui.SetNextWindowSize(imgui.ImVec2(530,200), imgui.Cond.FirstUseEver)
    imgui.SetNextWindowPos(imgui.ImVec2((sw / 2), sh / 2), imgui.Cond.FirstUseEver, imgui.ImVec2(0.5, 0.5))
    imgui.Begin(u8 "Команды:", isMenuActive4.v)
    imgui.Text(u8 '1./gnews1 [Text] - ввести 1 строку gnews.\n2./gnews2 [Text] - ввести 2 строку gnews.\n3./gnews3 [Text] - ввести 3 строку gnews.\n4./gnewsd - (НЕ ВВОДИТЬ ПОКА НЕ ВВЕДЕТЕ /gnews[1,2,3]) | отправить gnews(3 строки).\n ------------------------- \n5./tex -  тех.неполадки.\n ------------------------- \n6./1gnews - ввести текст для 1 строки.\n7./dgnews - (НЕ ВВОДИТЬ ПОКА НЕ ВВЕДЕТЕ /1gnews) | отправить 1 строку.\n ------------------------- \n8./ltex - попросить в ln, что бы вам кинули техи.')
    imgui.End()
end
end