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

 

[Aniki]

Как записать массив ников в диалог стиля 2?

в цикле пройдись по массиву и собери строку с разделителями в виде \n (стиль 2 это лист?)

 

[Данекк]

помогите, нужно искать в чате цифры а именно там будет 2 числа подскажите как можно это провернуть

 

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

помогите, нужно искать в чате цифры а именно там будет 2 числа подскажите как можно это провернуть

Кусь, друг.
По идее должно работать так:

local sampev   = require 'lib.samp.events'

function sampev.onServerMessage(clr, msg)
        if msg:find('текст который тебе нужен') then
        
        end
end

 

[Dmitriy Makarov]

Кусь господа!
Столкнулся я значит с проблемой, не могу писать кирилицей в imgui :C
помогите пожалуйста с библиотекой encoding, что куда написать для того, чтобы всё работало?

--Arizona Helper v0.1
require "lib.moonloader"

local keys = require "vkeys"
local imgui = require "lib.imgui"
local encoding = require "lib.encoding"
local tag = "{FFFFFF}[7P Script]:{3BADFE} "
local mc = 0x3BADFE
local wc = 0xFFFFFF
local mct = '{3BADFE}'
local wct = '{FFFFFF}'
local name = '"{FF2E2E}Arizona {FFFFFF}Helper"{3BADFE}'
local version = '0.1'
local sampev = require 'lib.samp.events'
encoding.default = 'CP-1251'
u8 = encoding.UTF8

local main_window_state = imgui.ImBool(false)
local text_buffer = imgui.ImBuffer(256)

function main()
    if not isSampLoaded() or not isSampfuncsLoaded() then return end
    while not isSampAvailable() do wait(100) end
    color = ("%06x"):format(sampGetPlayerColor(idp))
    thread = lua_thread.create_suspended(thread_function)
    sampRegisterChatCommand("azhelp", cmd_azhelp)
    sampRegisterChatCommand("cchat", cmd_cchat) -- регистрируем команду очистки чата
    sampAddChatMessage(tag .. name .. "- активирован!!",wc)
    sampAddChatMessage(tag .. 'Версия скрипта - ' .. version,wc)
        sampAddChatMessage(tag .. 'Используйте: ' .. wct .. '/azhelp' .. mct .. ' для того, что-бы узнать весь список функций скрипта!',wc)
    print(mct .. "Скрипт Активирован!")
    while not sampIsLocalPlayerSpawned() do wait(100) return end --[[делаем проверку на то заспавнен ли игрок потому что после доступности сампа твой локальный ид будет равен 0 и вот только потом получаем ID]]
    _, idp = sampGetPlayerIdByCharHandle(PLAYER_PED)
    imgui.Process = false
    while true do
        wait(0)
     
        if main_window_state.v == false then
            imgui.Process = false
        end
     
        if isKeyJustPressed(VK_L) then
            sampSendChat("/lock")
        end
     
        if isKeyDown(VK_I) and isKeyJustPressed(VK_D) then -- узнаём свой ID
            sampAddChatMessage(tag .. 'Ваш ID: {FFFFFF}' .. idp, wc)
        end
        if isKeyDown(VK_E) and isKeyJustPressed(VK_Z) then -- ez - время
            sampAddChatMessage(tag .. "Время:", wc)
            sampSendChat("/time")
        end      
        if isKeyDown(VK_S) and isKeyDown(VK_M) and isKeyJustPressed(VK_K) then -- SMK - сигарета
            sampSendChat("/smoke")
        end      
        if isKeyDown(VK_A) and isKeyDown(VK_R) and isKeyJustPressed(VK_M) then  -- При нажатии ARM вы юзаете броник
            sampSendChat("/armour")
        end  
        if isKeyDown(VK_M) and isKeyDown(VK_S) and isKeyJustPressed(VK_K) then
            sampSendChat("/mask")
        end
    end
end

function sampev.onShowDialog(id, style, title, b1, b2, text)
    if id == 1000 then
    lua_thread.create(function()
    wait(10)
    sampCloseCurrentDialogWithButton(1)
    end)
    end
end

function cmd_cchat()
        for i=1, 30 do
        sampAddChatMessage("", wc)
        end
end

--function sampev.onShowDialog(dialogId, style, title, button1, button2, text)
--print(dialogId)
--print(style)
--print(title)
--print(buuton1)
--print(button2)
--print(text)
--end

function imgui.OnDrawFrame()
    imgui.Begin(u8"Первая помощь!", main_window_state)
    imgui.Text("just text")
    imgui.End()
end

function cmd_azhelp()
    main_window_state.v = not main_window_state.v
    imgui.Process = main_window_state.v
end

imgui.Text(u8"Привет")

 

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

imgui.Text(u8"Привет")

Спасибо за ответ, но проблема там была слегка не там от куда ждали :D
Проблемку нашел в строчке:
encoding.default = 'CP-1251'

Написал, идиот, CP-1251, а нужно CP1251, без дефиса фообщем, грац :D

 

[deleted-user-204957]

куда направляет x, куда z, куда y?

x - прямо, назад. y - влево, вправо. z - вверх, вниз.

 

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

Ку, как сделать так, что-бы функция isKeyJustPressed() не работала когда чат активен?
Грац.

        if isKeyJustPressed(VK_L) then
            sampSendChat("/lock")
        end

 

[Интересный пользователь]

Ку, как сделать так, что-бы функция isKeyJustPressed() не работала когда чат активен?
Грац.

        if isKeyJustPressed(VK_L) then
            sampSendChat("/lock")
        end

if not sampIsChatInputActive()

 

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

Простите дурачка, а почему в данной ситуации не меняется позиция imgui менюшки?

function imgui.OnDrawFrame()
    imgui.Begin(u8"Первая помощь!", main_window_state)
    imgui.SetNextWindowPos(imgui.ImVec2(400, 400), imgui.Cond.FirstUseEver) -- Позиция
    imgui.SetNextWindowSize(imgui.ImVec2(200, 200), imgui.Cond.FirstUseEver) -- Размер
    imgui.Text(u8" /azhelp - Вывести это окно.")
    imgui.Text(u8" /cchat - очистить чат.")
    imgui.Text(u8" 'P' - Достать телефон")
    imgui.Text(u8" 'L' - Открыть/закрыть личный транспорт")
    imgui.Text(u8" 'I + D' - Узнать свой ID")
    imgui.Text(u8" 'E + Z' - Посмотреть время (/time)")
    imgui.Text(u8" 'S + M + K' - Использывать сигарету.")
    imgui.Text(u8" 'A + R + M' - Надеть бронежилет.")
    imgui.Text(u8" 'M + S + K' - Надеть маску.")
    imgui.Text(u8" ")
    imgui.Text(u8" Специально для BlastHack, автор: vendykoff")

    imgui.End()
end

И ещё одно, как сделать так, что-бы персонаж не бил воздух когда менюшка imgui открыта и ты нажимаешь на ЛКМ?

 

[BARRY BRADLEY]

что не так?

local data = {
    settings = {
        tx.v = nickadm
    }
}

Ты хочешь присвоить таблице переменную? Используй: data["settings"]["tx.v"] = nickadm
Но это крайни глупо.

 

[BARRY BRADLEY]

if tx.v > "15" and mm then sampAddChatMessage('{0000CD}Сохранить настройки - {FF0000}не удалось{0000CD}, превышено кол-во символов', -1) mm = false end

           if string.len(tx.v) > 15 and mm then
                sampAddChatMessage('{0000CD}Сохранить настройки - {FF0000}не удалось{0000CD}, превышено кол-во символов', -1)
                mm = false
            end

Если я тебя правильно понял тебе нужно ограничение на кол-во символов в строке. Используй string.len() чтоб посчитать количество символов в строке и потом уже приравнивай к числу.

[ML] (error) Obnova.lua: D:\Dsamp\moonloader\Obnova.lua:17: '}' expected (to close '{' at line 16) near '='

Полный код давай

 

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

Кусь, как сделать 2 меню imgui в одном скрипте? Есть ли где-то большой тутор по работе с imgui?

 

[paulohardy]

Кусь, как сделать 2 меню imgui в одном скрипте? Есть ли где-то большой тутор по работе с imgui?

--OnDrawFrame
imgui.Begin() -- 1 окно
imgui.End()
imgui.Begin() -- 2 окно
imgui.End()

 

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

--OnDrawFrame
imgui.Begin() -- 1 окно
imgui.End()
imgui.Begin() -- 2 окно
imgui.End()

Окей, а как сделать, что-бы оно открывалось отдельно от первого окна?

 

[trefa]

Окей, а как сделать, что-бы оно открывалось отдельно от первого окна?

Добавить условие.