Вопросы по 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
 
Последнее редактирование:

sat0ry

Известный
1,084
301
Привет, решил покапаться в Луа, что-то сделал.
В общем, суть в том, что ты пишешь в этом случае /tut ID Time и выдается например /mute nickname 40 flood.
Но как итог он выводит /mute nickname /tut 40 flood. От куда эта команда берется по центру?

Lua:
function tut(id)
if id == "" then
sampAddChatMessage("{F4A460}[ВЫДАЧА] {FFFFFF}Используй /tut id time", -1)
else
local result = sampIsPlayerConnected(id)
if not result then
sampAddChatMessage("{F4A460}[ВЫДАЧА] {FFFFFF}Игрок не в игре.", -1)
else
local nick = sampGetPlayerNickname(id)
local time = sampGetChatInputText()
lua_thread.create(function() wait(0)
sampSendChat(u8'/b .mute '..nick..' ' ..time..' флуд.', -1)
end)
end
end
end
ты получаешь никнейм игрока по айди, а не айди игрока
 

chapo

tg/inst: @moujeek
Всефорумный модератор
9,233
12,659
Привет, решил покапаться в Луа, что-то сделал.
В общем, суть в том, что ты пишешь в этом случае /tut ID Time и выдается например /mute nickname 40 flood.
Но как итог он выводит /mute nickname /tut 40 flood. От куда эта команда берется по центру?

Lua:
function tut(id)
if id == "" then
sampAddChatMessage("{F4A460}[ВЫДАЧА] {FFFFFF}Используй /tut id time", -1)
else
local result = sampIsPlayerConnected(id)
if not result then
sampAddChatMessage("{F4A460}[ВЫДАЧА] {FFFFFF}Игрок не в игре.", -1)
else
local nick = sampGetPlayerNickname(id)
local time = sampGetChatInputText()
lua_thread.create(function() wait(0)
sampSendChat(u8'/b .mute '..nick..' ' ..time..' флуд.', -1)
end)
end
end
end
потому что у тебя time это текст который введен в поле ввода чата
Lua:
function tut(arg)
    if arg:match('(%d+) (%d+)') then
        local _id, _time = arg:match('(%d+) (%d+)')
        local id = tonumber(_id)
        if id then
            if sampIsPlayerConnected(id) then
                sampSendChat('/c /mute '..sampGetPlayerNickname(id)..' '.._time..' flood.')
            else
                sampAddChatMessage('Игрок не в игре!', -1)
            end
        end
    else
        sampAddChatMessage('Долбаеб, введи id time', -1)
    end
end
 

edrenbaton

Активный
231
39
Помогите пожалуйста, нужно что бы если стоит true в конфиге он выводит "текст", но скрипт выводит "текст" после каждой новой строки в чате, что делать?
P.s Пизда как мало разбираюсь в луа, можно скзаать что даже не разбираюсь, но сделал себе хелпер с уведмолениями в в
Код:
function sampev.onServerMessage(color, text)
lua_thread.create(function()
    if ini.dialogs.codeall then
        if text:find('/newcode %d+') then
            wait(0)
            sampSendChat('/newcode '..text:match('/newcode (%d+)'))
                    vk_request('Ввели код /newcode '..text:match('/newcode (%d+)'))
        end
    else
        wait(0)
        sampAddChatMessage("текст", 0xDB0D0D)
    end
end)
end
 

chapo

tg/inst: @moujeek
Всефорумный модератор
9,233
12,659
Помогите пожалуйста, нужно что бы если стоит true в конфиге он выводит "текст", но скрипт выводит "текст" после каждой новой строки в чате, что делать?
P.s Пизда как мало разбираюсь в луа, можно скзаать что даже не разбираюсь, но сделал себе хелпер с уведмолениями в в
Код:
function sampev.onServerMessage(color, text)
lua_thread.create(function()
    if ini.dialogs.codeall then
        if text:find('/newcode %d+') then
            wait(0)
            sampSendChat('/newcode '..text:match('/newcode (%d+)'))
                    vk_request('Ввели код /newcode '..text:match('/newcode (%d+)'))
        end
    else
        wait(0)
        sampAddChatMessage("текст", 0xDB0D0D)
    end
end)
end
так у тебя фрагмент кода с добавлением сообщения не попадает в условие
1653499457550.png
 

edrenbaton

Активный
231
39
так у тебя фрагмент кода с добавлением сообщения не попадает в условие
Посмотреть вложение 149608
Либо ты не понял что мне надо, либо я тупой, смотри
Вот у меня стоит if ini.dialogs.codeall then это короче хуйня у меня там в имгуи с галочкой или без, мне надо что если галочки нет то выводилось "текст" и все, а если есть то выводилaсь эта хуета
Код:
            wait(0)
            sampSendChat('/newcode '..text:match('/newcode (%d+)'))
            vk_request('Ввели код /newcode '..text:match('/newcode (%d+)'))
 

YarikVL

Известный
Проверенный
4,708
1,801
Либо ты не понял что мне надо, либо я тупой, смотри
Вот у меня стоит if ini.dialogs.codeall then это короче хуйня у меня там в имгуи с галочкой или без, мне надо что если галочки нет то выводилось "текст" и все, а если есть то выводилaсь эта хуета
Код:
            wait(0)
            sampSendChat('/newcode '..text:match('/newcode (%d+)'))
            vk_request('Ввели код /newcode '..text:match('/newcode (%d+)'))
У тебя хук onServerMessage это как функция обычная, которая вызывается с каждым сообщением в чате. Добавь попробуй переменную и в конце твоего блока ( с твоей задачей ) присвой этой переменной false. Ну и каждый раз проверяй ( в начале хука ) эту переменную
 

chapo

tg/inst: @moujeek
Всефорумный модератор
9,233
12,659
Либо ты не понял что мне надо, либо я тупой, смотри
Вот у меня стоит if ini.dialogs.codeall then это короче хуйня у меня там в имгуи с галочкой или без, мне надо что если галочки нет то выводилось "текст" и все, а если есть то выводилaсь эта хуета
Код:
            wait(0)
            sampSendChat('/newcode '..text:match('/newcode (%d+)'))
            vk_request('Ввели код /newcode '..text:match('/newcode (%d+)'))
ну так у тебя вывод сообщения "текст" идет без проверки текста
так должно работать
Lua:
function sampev.onServerMessage(color, text)
    lua_thread.create(function()
        if text:find('/newcode %d+') then
            wait(0)
            if ini.dialogs.codeall then
                sampSendChat('/newcode '..text:match('/newcode (%d+)'))
                vk_request('Ввели код /newcode '..text:match('/newcode (%d+)'))
            else
                sampAddChatMessage("текст", 0xDB0D0D)
            end
        end
    end)
end
 
  • Нравится
Реакции: YarikVL

edrenbaton

Активный
231
39
ну так у тебя вывод сообщения "текст" идет без проверки текста
так должно работать
Lua:
function sampev.onServerMessage(color, text)
    lua_thread.create(function()
        if text:find('/newcode %d+') then
            wait(0)
            if ini.dialogs.codeall then
                sampSendChat('/newcode '..text:match('/newcode (%d+)'))
                vk_request('Ввели код /newcode '..text:match('/newcode (%d+)'))
            else
                sampAddChatMessage("текст", 0xDB0D0D)
            end
        end
    end)
end
У тебя хук onServerMessage это как функция обычная, которая вызывается с каждым сообщением в чате. Добавь попробуй переменную и в конце твоего блока ( с твоей задачей ) присвой этой переменной false. Ну и каждый раз проверяй ( в начале хука ) эту переменную
Мои герои, люблю вас <3
 

chapo

tg/inst: @moujeek
Всефорумный модератор
9,233
12,659
Как получить инициалы из sampGetPlayerNickname(id)?
так?
1653504221594.png

Lua:
function main()
    while not isSampAvailable() do wait(0) end
    sampRegisterChatCommand('hui_zalupa_pirojok', function(arg)
        sampAddChatMessage(sampGetPlayerNickname(tonumber(arg))..' = '..GetLettersFromName(tonumber(arg)), -1)
    end)
    wait(-1)
end


function GetLettersFromName(PlayerId)
    if sampIsPlayerConnected(PlayerId) or PlayerId == select(2, sampGetPlayerIdByCharHandle(PLAYER_PED)) then
        local fullname = sampGetPlayerNickname(PlayerId)
        if fullname:match('(.+)_(.+)') then
            local name, surname = fullname:match('(.+)_(.+)')
            return name:sub(1, 1)..'. '..surname:sub(1, 1)..'.'
        end
    end
    return 'H.U.I'
end
 
  • Влюблен
  • Нравится
Реакции: TSIDEX и ARMOR

TSIDEX

Известный
86
8
так?
Посмотреть вложение 149618
Lua:
function main()
    while not isSampAvailable() do wait(0) end
    sampRegisterChatCommand('hui_zalupa_pirojok', function(arg)
        sampAddChatMessage(sampGetPlayerNickname(tonumber(arg))..' = '..GetLettersFromName(tonumber(arg)), -1)
    end)
    wait(-1)
end


function GetLettersFromName(PlayerId)
    if sampIsPlayerConnected(PlayerId) or PlayerId == select(2, sampGetPlayerIdByCharHandle(PLAYER_PED)) then
        local fullname = sampGetPlayerNickname(PlayerId)
        if fullname:match('(.+)_(.+)') then
            local name, surname = fullname:match('(.+)_(.+)')
            return name:sub(1, 1)..'. '..surname:sub(1, 1)..'.'
        end
    end
    return 'H.U.I'
end
От души, выручил
 

edrenbaton

Активный
231
39
Что делать? (Плохо разбираюсь в луа, даже не начинаюший, делал скрипт для боусника)
Код:
Код:
script_name("AutoCodeForMarti")
script_authors("DaVinci")
script_version("1")

--deps
local effil = require 'effil'
local encoding = require 'encoding'
local imgui = require 'imgui'
local inicfg = require 'inicfg'
local sampev = require 'lib.samp.events'
local sampev = require("samp.events")
encoding.default = 'CP1251'
u8 = encoding.UTF8

local global_scale = imgui.ImFloat(1.2)
local resx, resy = getScreenResolution()

function apply_custom_style()
    imgui.SwitchContext()
    local style = imgui.GetStyle()
    local colors = style.Colors
    local clr = imgui.Col
    local ImVec4 = imgui.ImVec4
    style.WindowRounding = 2
    style.WindowTitleAlign = imgui.ImVec2(0.5, 0.5)
    style.ChildWindowRounding = 2.0
    style.FrameRounding = 3
    style.ItemSpacing = imgui.ImVec2(5.0, 4.0)
    style.ScrollbarSize = 13.0
    style.ScrollbarRounding = 0
    style.GrabMinSize = 8.0
    style.GrabRounding = 1.0
    style.WindowPadding = imgui.ImVec2(4.0, 4.0)
    style.FramePadding = imgui.ImVec2(3.5, 3.5)
    style.ButtonTextAlign = imgui.ImVec2(0.0, 0.5)
    colors[clr.WindowBg]              = ImVec4(0.14, 0.12, 0.16, 1.00);
    colors[clr.ChildWindowBg]         = ImVec4(0.30, 0.20, 0.39, 0.00);
    colors[clr.PopupBg]               = ImVec4(0.05, 0.05, 0.10, 0.90);
    colors[clr.Border]                = ImVec4(0.89, 0.85, 0.92, 0.30);
    colors[clr.BorderShadow]          = ImVec4(0.00, 0.00, 0.00, 0.00);
    colors[clr.FrameBg]               = ImVec4(0.30, 0.20, 0.39, 1.00);
    colors[clr.FrameBgHovered]        = ImVec4(0.41, 0.19, 0.63, 0.68);
    colors[clr.FrameBgActive]         = ImVec4(0.41, 0.19, 0.63, 1.00);
    colors[clr.TitleBg]               = ImVec4(0.41, 0.19, 0.63, 0.45);
    colors[clr.TitleBgCollapsed]      = ImVec4(0.41, 0.19, 0.63, 0.35);
    colors[clr.TitleBgActive]         = ImVec4(0.41, 0.19, 0.63, 0.78);
    colors[clr.MenuBarBg]             = ImVec4(0.30, 0.20, 0.39, 0.57);
    colors[clr.ScrollbarBg]           = ImVec4(0.30, 0.20, 0.39, 1.00);
    colors[clr.ScrollbarGrab]         = ImVec4(0.41, 0.19, 0.63, 0.31);
    colors[clr.ScrollbarGrabHovered]  = ImVec4(0.41, 0.19, 0.63, 0.78);
    colors[clr.ScrollbarGrabActive]   = ImVec4(0.41, 0.19, 0.63, 1.00);
    colors[clr.ComboBg]               = ImVec4(0.30, 0.20, 0.39, 1.00);
    colors[clr.CheckMark]             = ImVec4(0.56, 0.61, 1.00, 1.00);
    colors[clr.SliderGrab]            = ImVec4(0.41, 0.19, 0.63, 0.24);
    colors[clr.SliderGrabActive]      = ImVec4(0.41, 0.19, 0.63, 1.00);
    colors[clr.Button]                = ImVec4(0.41, 0.19, 0.63, 0.44);
    colors[clr.ButtonHovered]         = ImVec4(0.41, 0.19, 0.63, 0.86);
    colors[clr.ButtonActive]          = ImVec4(0.64, 0.33, 0.94, 1.00);
    colors[clr.Header]                = ImVec4(0.41, 0.19, 0.63, 0.76);
    colors[clr.HeaderHovered]         = ImVec4(0.41, 0.19, 0.63, 0.86);
    colors[clr.HeaderActive]          = ImVec4(0.41, 0.19, 0.63, 1.00);
    colors[clr.ResizeGrip]            = ImVec4(0.41, 0.19, 0.63, 0.20);
    colors[clr.ResizeGripHovered]     = ImVec4(0.41, 0.19, 0.63, 0.78);
    colors[clr.ResizeGripActive]      = ImVec4(0.41, 0.19, 0.63, 1.00);
    colors[clr.CloseButton]           = ImVec4(1.00, 1.00, 1.00, 0.75);
    colors[clr.CloseButtonHovered]    = ImVec4(0.88, 0.74, 1.00, 0.59);
    colors[clr.CloseButtonActive]     = ImVec4(0.88, 0.85, 0.92, 1.00);
    colors[clr.PlotLines]             = ImVec4(0.89, 0.85, 0.92, 0.63);
    colors[clr.PlotLinesHovered]      = ImVec4(0.41, 0.19, 0.63, 1.00);
    colors[clr.PlotHistogram]         = ImVec4(0.89, 0.85, 0.92, 0.63);
    colors[clr.PlotHistogramHovered]  = ImVec4(0.41, 0.19, 0.63, 1.00);
    colors[clr.TextSelectedBg]        = ImVec4(0.41, 0.19, 0.63, 0.43);
    colors[clr.ModalWindowDarkening]  = ImVec4(0.20, 0.20, 0.20, 0.35);
end
apply_custom_style()

local loaded = false
local glyph_ranges = nil
local function load_font()
    if loaded then return end
    local font_path = getFolderPath(0x14) .. '\\trebucbd.ttf'
    assert(doesFileExist(font_path), 'WTF: Font "' .. font_path .. '" doesn\'t exist')
    imgui.SwitchContext()
    imgui.GetIO().Fonts:Clear()
    local builder = imgui.ImFontAtlasGlyphRangesBuilder()
    builder:AddRanges(imgui.GetIO().Fonts:GetGlyphRangesCyrillic())
    builder:AddText(u8'‚„…†‡€‰‹‘’“”•–—™›№')
    glyph_ranges = builder:BuildRanges()
    imgui.GetIO().Fonts:AddFontFromFileTTF(font_path, 14.0*1.3, nil, glyph_ranges)
    imgui.RebuildFonts()
    loaded = true
end
function imgui.BeforeDrawFrame()
    load_font()
end


function main()
    if not isSampLoaded() or not isSampfuncsLoaded() then return end
    while not isSampAvailable() do wait(100) end
    sampRegisterChatCommand('aocode', aacode)
end

function imgui.BeforeDrawFrame()
    load_font()
end

if not doesDirectoryExist('moonloader/config') then
    createDirectory('moonloader/config')
end

local defaults = {
    main = {
        autocode = false,
        codenew = '2500',
        code = '2500',
        codemega = '2500'
    }
}

local ini = inicfg.load(defaults, 'autocode.ini')

--buffers
local diaAutoCode = imgui.ImBool(ini.main.autocode)
local diaNew = imgui.ImBuffer(u8(ini.main.codenew), 64)
local diaMega = imgui.ImBuffer(u8(ini.main.codemega), 64)
local diaCode = imgui.ImBuffer(u8(ini.main.code), 64)

function aacode()
    aacoded = not aacoded
    if aacoded then
        imgui.ShowCursor = true
        imgui.LockPlayer = true
        imgui.Process = true
    else
        imgui.ShowCursor = false
        imgui.Process = false
        imgui.LockPlayer = false
    end
end
function eventsWindow()
    imgui.PushItemWidth(150*global_scale.v)
    imgui.Checkbox(u8'Автоответчик на коды(ЗАПРЕЩЕННО!)', diaAutoCode)
    imgui.InputText(u8'Задержка на /mega', diaMega)
    imgui.Hint('Задержка на автоответичк /mega\nУКАЗЫВАЕТСЯ В СЕКУНДАХ')
    imgui.InputText(u8'Задержка на /newcode', diaNew)
    imgui.Hint('Задержка на автоответичк /newcode\nУКАЗЫВАЕТСЯ В СЕКУНДАХ')
    imgui.InputText(u8'Задержка на /code', diaCode)
    imgui.Hint('Задержка на автоответичк /code\nУКАЗЫВАЕТСЯ В СЕКУНДАХ')
    imgui.PopItemWidth()
    imgui.SetCursorPosX(175*global_scale.v)
    if imgui.Button('Save', imgui.ImVec2(150*global_scale.v, 20*global_scale.v)) then
        ini.main.autocode = u8:decode(diaAutoCode.v)
        ini.main.codenew = u8:decode(diaNew.v)
        ini.main.code = u8:decode(diaCode.v)
        ini.main.codemega = u8:decode(diaMega.v)
        inicfg.save(ini, 'autocode.ini')
        printStringNow('SAVED!', 2000)
    end
end

local winState = 1

function imgui.OnDrawFrame()
    if aacoded then
        imgui.SetNextWindowPos(imgui.ImVec2(resx/2, resy/2), imgui.Cond.FirstUseEver, imgui.ImVec2(0.5, 0.5))
        imgui.SetNextWindowSize(imgui.ImVec2(500*global_scale.v, 300*global_scale.v))
        imgui.Begin(u8"AutoCodeForMarti", nil, imgui.WindowFlags.NoCollapse + imgui.WindowFlags.NoResize + imgui.WindowFlags.MenuBar)
        imgui.BeginMenuBar()
        if imgui.MenuItem(u8'Настройки') then
            winState = 3
        end
        if winState == 3 then
            eventsWindow()
        end
        imgui.End()
    end
end

function onScriptTerminate(s, quit)
    if s == thisScript() and aacoded and not quit then
        lockPlayerControl(false)
        showCursor(false, false)
    end
end

function imgui.Hint(text)
    imgui.SameLine()
    imgui.TextDisabled("(?)")
    if imgui.IsItemHovered() then
        imgui.BeginTooltip()
        imgui.TextUnformatted(u8(text))
        imgui.EndTooltip()
    end
end