Вопросы по 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.
Как получить транспорт, в котором сидит игрок?
Lua:
local veh = storeCarCharIsInNoSave(PLAYER_PED)
Как получить свой id или id другого игрока?
Lua:
local _, id = sampGetPlayerIdByCharHandle(PLAYER_PED) -- получить свой ид
local _, id = sampGetPlayerIdByCharHandle(ped) -- получить ид другого игрока. ped - это хендл персонажа
Как проверить, что строка содержит какой-то текст?
Lua:
if string.find(str, 'текст', 1, true) then
-- строка str содержит "текст"
end
Как эмулировать нажатие игровой клавиши?
Lua:
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 другого игрока, в которого целюсь я?
Lua:
local valid, ped = getCharPlayerIsTargeting(PLAYER_HANDLE) -- получить хендл персонажа, в которого целится игрок
if valid and doesCharExist(ped) then -- если цель есть и персонаж существует
  local result, id = sampGetPlayerIdByCharHandle(ped) -- получить samp-ид игрока по хендлу персонажа
  if result then -- проверить, прошло ли получение ида успешно
    -- здесь любые действия с полученным идом игрока
  end
end
Как зарегистрировать команду чата SAMP?
Lua:
-- До бесконечного цикла/задержки
sampRegisterChatCommand("mycommand", function (param)
     -- param будет содержать весь текст введенный после команды, чтобы разделить его на аргументы используйте string.match()
    sampAddChatMessage("MyCMD", -1)
end)
Крашит игру при вызове sampSendChat. Как это исправить?
Это происходит из-за бага в SAMPFUNCS, когда производится попытка отправки пакета определенными функциями изнутри события исходящих RPC и пакетов. Исправления для этого бага нет, но есть способ не провоцировать его. Вызов sampSendChat изнутри обработчика исходящих RPC/пакетов нужно обернуть в скриптовый поток с нулевой задержкой:
Lua:
function onSendRpc(id)
  -- крашит:
  -- sampSendChat('Send RPC: ' .. id)

  -- норм:
  lua_thread.create(function()
    wait(0)
    sampSendChat('Send RPC: ' .. id)
  end)
end
 
Последнее редактирование:

Double Tap Inside

Известный
Проверенный
1,897
1,245
Через onShowDialog() нет. Для работы с TAB есть некоторые события, есть другие инструменты. Посмотри исходник

Там работа с TAB показана наглядно.
Я так понимаю через sampShowDialog такой таб как стандартный сделать не выйдет?
 

Dmitriy Makarov

25.05.2021
Проверенный
2,479
1,113
Помогите хукнуть номера с диалога
Lua:
function sampev.onShowDialog(id, style, title, b1, b2, text)
    if title:find("Адвокаты") then
        local number = text:match("тел. (%d+)")
        sampAddChatMessage("Номера: "..number, -1)
    end
end
45070

Код который выше хукает только первый номер, на остальные не реагирует чет
Пример строки.
Мэрия Лас-Вентураса - Nick_Name - тел. 123456
Нужно хукнуть сами номера
 

Double Tap Inside

Известный
Проверенный
1,897
1,245
Помогите хукнуть номера с диалога
Lua:
function sampev.onShowDialog(id, style, title, b1, b2, text)
    if title:find("Адвокаты") then
        local number = text:match("тел. (%d+)")
        sampAddChatMessage("Номера: "..number, -1)
    end
end
Посмотреть вложение 45070
Код который выше хукает только первый номер, на остальные не реагирует чет
Пример строки.
Мэрия Лас-Вентураса - Nick_Name - тел. 123456
Нужно хукнуть сами номера


Типо так?

Lua:
function sampev.onShowDialog(id, style, title, b1, b2, text)
    if title:match("Адвокаты") then
        local nomera = {}

        for line in text:gmatch("[^\r\n]+") do
            local number = line:match("тел%. (d+)")
            if number then
                table.insert(nomera, number)
            end
        end

        --[[
        for number in ipairs(nomera) do
            sampAddChatMessage("Номер: "..number, -1)
        end
        --]]
    end
end
парни помогите, как правильно вывести текст в строку из того что было записано в IdInYourCar в таблице
Или может можно записать не через table.insert который в таблицу пишет, а что б как-то сразу записывало в строку?

Lua:
local IdInYourCar = {}

function getpassenger()
  local AllChars = getAllChars()
    if isCharInAnyCar(PLAYER_PED) then
    local PlayerCarHandle = storeCarCharIsInNoSave(PLAYER_PED)
        for _, Ped in ipairs(AllChars) do
            if Ped ~= PLAYER_PED and isCharInAnyCar(Ped) then
                local result, id = sampGetPlayerIdByCharHandle(Ped)
                local CarHandle = storeCarCharIsInNoSave(Ped)
                    if CarHandle == PlayerCarHandle then
                    table.insert(IdInYourCar, tostring(sampGetPlayerNickname(id):gsub('(.*_)', '')))
                    end
            end
        end
    end
    return #IdInYourCar == 0 and 'None' or table.concat(IdInYourCar, ', ')
end

function cmd_getpassenger()
    sampAddChatMessage("Фамилии пасажиров - ", -1)
end

Типо так?


Lua:
function getpassenger()
    local IdInYourCar = {}
    local AllChars = getAllChars()
    if isCharInAnyCar(PLAYER_PED) then
        local PlayerCarHandle = storeCarCharIsInNoSave(PLAYER_PED)
        for _, Ped in ipairs(AllChars) do
            if Ped ~= PLAYER_PED and isCharInAnyCar(Ped) then
                local result, id = sampGetPlayerIdByCharHandle(Ped)
                local CarHandle = storeCarCharIsInNoSave(Ped)
                if CarHandle == PlayerCarHandle then
                    table.insert(IdInYourCar, tostring(sampGetPlayerNickname(id):gsub('(.*_)', '')))
                end
            end
        end
    end

    if #IdInYourCar ~= 0 then
        return table.concat(IdInYourCar, ', ')
    else
        return "пассажиров нет"
    end
end

function cmd_getpassenger()
    sampAddChatMessage("Фамилии пасажиров: "..getpassenger(), -1)
end
 
Последнее редактирование:
  • Нравится
Реакции: Dmitriy Makarov и Benya

neverlane

t.me/neverlane00
Друг
998
1,141
Как можно поменять кнопку активации какой-либо функции без HotKey в Imgui? Тип HotKey он вкл/выкл а мне надо чтоб 1 раз срабатывало.
 

neverlane

t.me/neverlane00
Друг
998
1,141
isKeyJustPressed(int key) - если нажал сработало
Пример:
local test = false
if isKeyJustPressed(VK_3) then
    test = not test -- установит true а при след. нажатии false
end


isKeyDown(int key) - если зажал сработает и будет работать пока не отпустишь
Пример2:
if isKeyDown(VK_MENU) and isKeyJustPressed(VK_3) then -- проверят зажата ли "Альт" и нажал ли "3"
    sampSendChat("test")
end

if isKeyDown(VK_MENU) -- будет выполнятся пока не отпустишь Альт
    sampSendChat("test")
end
Мне надо чтобы я настроил кнопку в окне имгуи и принажатии её срабатывала функция
 

Angr

Известный
291
97
Мне надо чтобы я настроил кнопку в окне имгуи и принажатии её срабатывала функция
Lua:
local key = requier "vkeys"
local setting_input_key = ImBuffer("12",64)
if imgui.inputText("key", setting_input_key, imgui.inputTextFlags.EnterReturnsTrue) then
 local inpt = setting_input_key.v
 if key.name_to_id(inpt) ~= nil then
    newkey = inpt
 else
 
 end
end
 

Warflex

Участник
158
17
Хелп

Lua:
sampRegisterChatCommand("vac", vac)
Lua:
function vac()
        lua_thread.create(function()
    sampSendChat("/me достал пачку шприцов из ящика, предварительно открыв её.")
    wait(2000)
    sampSendChat("/me достал шприц из пачки, затем взяв со стола ампулу с вакциной.")
    wait(2000)
    sampSendChat("/me продезинфицировал руки специальным средством.")
    wait(2000)
    sampSendChat("/me взял со стола ватку и спирт, затем открыл флакончик и смочил ватку спиртом.")
    wait(2000)
    sampSendChat("/me взял со стола медицинские перчатки, надел их на руки.")
    wait(2000)
    sampSendChat("/me вколол шприц с вакциной в вену человека.")
    wait(2000)
    sampSendChat("/me нажимает на клапан шприца, тем самым вгоняет содержимое в вену.")
    sampSendChat('/vac'..vac)
        end)   
end

мне надо сделать так что бы при /vac [id] всё было нормально и писать его айди
 

Dmitriy Makarov

25.05.2021
Проверенный
2,479
1,113
Хелп

Lua:
sampRegisterChatCommand("vac", vac)
Lua:
function vac()
        lua_thread.create(function()
    sampSendChat("/me достал пачку шприцов из ящика, предварительно открыв её.")
    wait(2000)
    sampSendChat("/me достал шприц из пачки, затем взяв со стола ампулу с вакциной.")
    wait(2000)
    sampSendChat("/me продезинфицировал руки специальным средством.")
    wait(2000)
    sampSendChat("/me взял со стола ватку и спирт, затем открыл флакончик и смочил ватку спиртом.")
    wait(2000)
    sampSendChat("/me взял со стола медицинские перчатки, надел их на руки.")
    wait(2000)
    sampSendChat("/me вколол шприц с вакциной в вену человека.")
    wait(2000)
    sampSendChat("/me нажимает на клапан шприца, тем самым вгоняет содержимое в вену.")
    sampSendChat('/vac'..vac)
        end)
end

мне надо сделать так что бы при /vac [id] всё было нормально и писать его айди
Lua:
function vac(param)
local id = tonumber(param)
-- code
end


-- Использование
sampSendChat("/vac "..id)
 

Yung Hefner

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

Lua:
require "lib.moonloader"
local sampev = require 'lib.samp.events'

function main()
    if not isSampfuncsLoaded() or not isSampLoaded() then return end
    while not isSampAvailable() do wait(100) end
    sampAddChatMessage("{00FFFF}[SLET] {FFFFFF}Загружен! Автор:{00FFFF} Joni Scripts ", -1)
    while true do
        wait(0)
    end
end

function sampev.onServerMessage(clr, msg)
    if msg:find("%[%№(%d+)%] %| гос") then
        local hid = msg:match("%[%№(%d+)%] %| гос")
        sampProcessChatInput("/hmm "..hid)
        sampAddChatMessage("{00FFFF}[SLET] {FFFFFF}Поiхали так сказать. {FFFF00}ID{FFFFFF} слетевшего дома: {00FFFF}"..hid, -1)
        lua_thread.create(function()
            wait(250)
            sampSendChat("/exit")
            wait(2500)
            sampProcessChatInput("/gtpm")
        end)
    end
end
 

no3jour

Участник
55
0
В окнах вводяться параметры криво и в двух разных частях SMS и Chat ( отделили их ) пишет одно и то-же помогите решить проблему
PHP:
local scriptConfig = cfg.load({
    inputs = {
        psnick = '';
        pstext = '';
        pstext2 = '';
        pctext = '';
        pctext2 = '';
        pcnick = '';
        patext = '';
        patext2 = '';
        panick = '';
        pref = '';
        prtext = '';
        prnick = '';
    }
}, script_patch_config)

local psnick = imgui.ImBuffer(''..scriptConfig.inputs.psnick, 256)
local pstext = imgui.ImBuffer(''..scriptConfig.inputs.pstext, 256)
local pstext2 = imgui.ImBuffer(''..scriptConfig.inputs.pstext2, 256)
local pctext = imgui.ImBuffer(''..scriptConfig.inputs.pctext, 256)
local pctext2 = imgui.ImBuffer(''..scriptConfig.inputs.pctext2, 256)
local pcnick = imgui.ImBuffer(''..scriptConfig.inputs.pcnick, 256)
local panick = imgui.ImBuffer(''..scriptConfig.inputs.panick, 256)
local patext = imgui.ImBuffer(''..scriptConfig.inputs.patext, 256)
local patext2 = imgui.ImBuffer(''..scriptConfig.inputs.patext2, 256)
local pref = imgui.ImBuffer(''..scriptConfig.inputs.pref, 256)
local prtext = imgui.ImBuffer(''..scriptConfig.inputs.prtext, 256)
local prnick = imgui.ImBuffer(''..scriptConfig.inputs.prnick, 256)

function imgui.OnDrawFrame()
    if main_window_state.v then
    local btnSize = imgui.ImVec2(120, 0)
   -- imgui.SetNextWindowSize(imgui.ImVec2(600, 700))
    imgui.Begin(u8'Панель подставы', main_window_state, imgui.WindowFlags.AlwaysAutoResize)
    if imgui.Button(u8'Команды', btnSize) then selected = 1 end; imgui.SameLine()
    if imgui.Button(u8'Функции', btnSize) then selected = 2 end; imgui.SameLine()
    if imgui.Button(u8'Итог:', btnSize) then selected = 3 end; imgui.SameLine()
    imgui.Separator()
    if selected == 1 then 
        TextColoredRGB(commands)
    elseif selected == 2 then
        if imgui.Text(u8'---------------SMS-----------') then end
        if imgui.InputText(u8'Ник:', psnick, imgui.ImVec2(200, 0)) then
            scriptConfig.inputs.psnick = psnick.v 
            cfg.save(scriptConfig, script_patch_config)
        end        
        if imgui.InputText(u8'Текст №1', pstext, imgui.ImVec2(200, 0)) then
            scriptConfig.inputs.pstext = pstext.v 
            cfg.save(scriptConfig, script_patch_config)
        end        
        if imgui.InputText(u8'Текст №2', pstext2, imgui.ImVec2(200, 0)) then
            scriptConfig.inputs.pstext2 = pstext2.v 
            cfg.save(scriptConfig, script_patch_config)
        end
        if imgui.Text(u8'---------------CHAT-----------') then end
        if imgui.InputText(u8'Ник:', pcnick, imgui.ImVec2(200, 0)) then
            scriptConfig.inputs.pcnick = pcnick.v 
            cfg.save(scriptConfig, script_patch_config)
        end        
        if imgui.InputText(u8'Текст №1', pctext, imgui.ImVec2(200, 0)) then
            scriptConfig.inputs.pctext = pctext.v 
            cfg.save(scriptConfig, script_patch_config)
        end        
        if imgui.InputText(u8'Текст №2', pctext2, imgui.ImVec2(200, 0)) then
            scriptConfig.inputs.pctext2 = pctext2.v 
            cfg.save(scriptConfig, script_patch_config)
        end
    elseif selected == 3 then 
        if imgui.Text(u8'Русский текст отоброжается в виде "??????????????"') then end
        if imgui.Text(u8'---------------------SMS-------------------') then end
        if imgui.Text(u8'Входящее: '..u8:decode(pstext.v)..' Отправитель: '..u8:decode(psnick.v)..'') then end
        if imgui.Text(u8'Входящее: '..u8:decode(pstext2.v)..' Отправитель: '..u8:decode(psnick.v)..'') then end
        if imgui.Text(u8'---------------------CHAT-------------------') then end
        if imgui.Text(u8'- '..u8:decode(pctext.v)..' '..u8:decode(pcnick.v)..'') then end
        if imgui.Text(u8'- '..u8:decode(pctext2.v)..' '..u8:decode(pcnick.v)..'') then end
    end
    imgui.End()
    end
end
 

S-Sirius

Известный
353
21
Как можно разделить текст на переменных?

Допустим с чата получил следующий текст:
Ранг Nick_Name: Text Text...

Как делать так чтобы текст делился на части? Допустим так:
Ранг - будет var0,
NickName - var1,
Text Text...: var3
 

Petr_Sergeevich

Известный
Проверенный
707
296
Как можно разделить текст на переменных?

Допустим с чата получил следующий текст:


Как делать так чтобы текст делился на части? Допустим так:

Lua:
local rank, nick, text = ("Ранг Nick_Name: Text Text... "):match("(.+) (.+)%: (.+)")