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

 

[Rei]

Как сделать скрипт, что бы после того как в чате появится определённая надпись, автоматически через 10 секунд ввелась команда в чат?
Например инет вылетел и в чате написало The server is restarting.. - после этой надписи через 10 секунд ввелась команда /log пароль

function sampev.onServerMessage(color, text)
   if text:find('hui') then
      lua_thread.create(function()
         wait(10000)
         sampSendChat('/log пароль')
      end)
   end
end

только это конкретно в твоем случае с вылетом не сработает :)

 

[xzolxzolxzol]

help

 

[Anton Nixon]

Посмотреть вложение 61928
Посмотреть вложение 61927
help

На 40й строке end потерял

 

[astynk]

К какой палитре относятся цвета ImVec4 в стилях? Не могу понять как RGB превратить в нецелочисленные

Просто делишь на 255
0 -> 0, 255 -> 1, 127 -> 0.5 и т.д.

 

[kizn]

      sampSendChat("/rcon login a4ko")

SERVER: Unknown command.
Как авторизоваться в ркон через луа?

 

[Fott]

      sampSendChat("/rcon login a4ko")

SERVER: Unknown command.
Как авторизоваться в ркон через луа?

sampProcessChatInput("/rcon login a4ko")
----------------------------------------------------------------------------------------------------------------------------------
Возможно создать кнопку на экране с каким либо текстом, либо же текстрав, при нажатии на которую будет выполнятся что-либо?

 

[Biuti]

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

 

[F1ake]

Добрый день, давно ищу как сделать такое условие, чтобы при нахождении 3dtext, к примеру заправка, выполнялось какое-либо условие.

 

[Dmitriy Makarov]

Добрый день, давно ищу как сделать такое условие, чтобы при нахождении 3dtext, к примеру заправка, выполнялось какое-либо условие.

local sampev = require 'lib.samp.events'


function sampev.onCreate3DText(id, col, pos, dist, los, plid, vehid, text)
    if text:find("Заправка") then
        -- Действие
    end
end

 

[enyag]

как использовать on.ServerMessage вместе с командой?

 

[CaJlaT]

как использовать on.ServerMessage вместе с командой?

Не совсем понял, пиши более подроьно

function samp.onServerMessage(color, text)
    if text:find('/test') then
        sampSendChat('/test')
    end
end



-- 2 вариант
function samp.onSendCommand(cmd)
    if cmd:find('/id (%d+)') then -- на сервере если ввести /id и не часть ника, а id, то выдаст ошибку
        local id = cmd:match('/id (.+)')
        if tonumber(id) ~= nil then -- Если после /id стоит цифра
            cmd = "/nick "..id -- а вот /nick [id] показывает ник по id
            return {cmd}
        end
    end
end

 

[xzolxzolxzol]

суть скрипта, оно ждет строку, в которой находит заданные слова, это работает, но чтобы когда нашло, было 2 варианта ДА / НЕТ, на Y и N.. Находит строку, нажимаю Y но ничего не происходит, такое чувство что функция сразу же заканчивается..

function sampev.onServerMessage(color, text)
    local id, message = string.match(text,'%[(%d+)%]: (.*)')
    if id ~= nil and message ~= nil then
        for k, v in pairs(answers) do
            if string.find(message, k) then
                lua_thread.create(function()
                    wait(50)
                    sampAddChatMessage("Для автоматического ответа нажмите Y!", 0x00DD00)
                    sampAddChatMessage("Для скипа N", 0x00DD00)
                    if isKeyJustPressed(89) then
                    wait(250)
                    sampSendChat(string.format('/ak %s %s', id, v))
                    if isKeyJustPressed(78) then
                    sampAddChatMessage("Скипаю", 0x00DD00)
                    end
                end
            end)
        end
    end
end
end
function main()
    if not isSampLoaded() and not isSampfuncsLoaded() then return end
    while not isSampAvailable() do wait(100) end
    wait(2000)
    wait(-1)
end

 

[CaJlaT]

суть скрипта, оно ждет строку, в которой находит заданные слова, это работает, но чтобы когда нашло, было 2 варианта ДА / НЕТ, на Y и N.. Находит строку, нажимаю Y но ничего не происходит, такое чувство что функция сразу же заканчивается..

function sampev.onServerMessage(color, text)
    local id, message = string.match(text,'%[(%d+)%]: (.*)')
    if id ~= nil and message ~= nil then
        for k, v in pairs(answers) do
            if string.find(message, k) then
                lua_thread.create(function()
                    wait(50)
                    sampAddChatMessage("Для автоматического ответа нажмите Y!", 0x00DD00)
                    sampAddChatMessage("Для скипа N", 0x00DD00)
                    if isKeyJustPressed(89) then
                    wait(250)
                    sampSendChat(string.format('/ak %s %s', id, v))
                    if isKeyJustPressed(78) then
                    sampAddChatMessage("Скипаю", 0x00DD00)
                    end
                end
            end)
        end
    end
end
end
function main()
    if not isSampLoaded() and not isSampfuncsLoaded() then return end
    while not isSampAvailable() do wait(100) end
    wait(2000)
    wait(-1)
end

function sampev.onServerMessage(color, text)
    local id, message = string.match(text,'%[(%d+)%]: (.*)')
    if id ~= nil and message ~= nil then
        for k, v in pairs(answers) do
            if string.find(message, k) then
                lua_thread.create(function()
                    wait(50)
                    sampAddChatMessage("Для автоматического ответа нажмите Y!", 0x00DD00)
                    sampAddChatMessage("Для скипа N", 0x00DD00)
                    while not isKeyJustPressed(89) and not isKeyJustPressed(78) do wait(0) end -- беск.цикл до нажатия на одну из кнопок
                    if isKeyJustPressed(89) then
                        wait(250)
                        sampSendChat(string.format('/ak %s %s', id, v))
                    elseif isKeyJustPressed(78) then
                        sampAddChatMessage("Скипаю", 0x00DD00)
                    end
                end)
            end
        end
    end
end
function main()
    if not isSampLoaded() and not isSampfuncsLoaded() then return end
    while not isSampAvailable() do wait(100) end
    wait(2000)
    wait(-1)
end

 

[Deniska.lua]

Как менять размер imgui.InputText?

 

[Rei]

буду благодарен, если подскажете некоторые моменты по имгуи
1. как сделать, чтобы кнопки в чилде слева подстраивались под длину текста и все были одинаковой длины? ( еще хотелось бы узнать как выравнивать текст по левому краю, но в принципе похер на это ) и желательно, чтобы сам чилд подстраивался под кнопки по ширине
2. как сделать, чтобы само окно подстраивалось? т.е. чтобы чилд справа не был закрыт и его не нужно было вручную каждый раз растягивать?

Спойлер: код

function imgui.OnDrawFrame()
   if main_window_state.v then
      if imgui.Button('State', imgui.ImVec2(160, 25)) then
         act = not act
      end
      if imgui.Button('Get3d', imgui.ImVec2(160, 25)) then
         getAll3dTexts()
      end
      imgui.BeginChild("child", imgui.ImVec2(230, 300), true)
      for _, s in pairs(huita) do
         if imgui.Button(u8(s.name), imgui.ImVec2(50, 25)) then
            menu = true
            text = _
         end
      end
      imgui.EndChild()
      imgui.SameLine()
      if menu then
         imgui.BeginChild("child2", imgui.ImVec2(300, 100), true)
         if huita[text].smin ~= 999999999 then
            imgui.Text(u8('самая выгодная продажа по: $'..huita[text].smin))
         end
         if huita[text].bmax ~= 0 then
            imgui.Text(u8('самая выгодная скупка по:  $'..huita[text].bmax))
         end      
         imgui.EndChild()
      end
   end
end