Вопросы по 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
 
Последнее редактирование:
  • Нравится
  • Эм
Реакции: S1nlef, nakahara, riverya4life и 33 других
Нажмите для раскрытия...
Мира

Мира

Участник
455
9
помогите пж сохранить выбранный цвет в .cfg

Lua: 
local mainIni = inicfg.load({
    settings =
    {
        clrs = 1
    }
}, 'Random.ini')
if not doesFileExist("moonloader/config/Random.ini") then inicfg.save(mainIni, "Random.ini") end



local clrs = imgui.ImInt(mainIni.settings.clrs)



imgui.SwitchContext()
themes.SwitchColorTheme()



if imgui.CollapsingHeader(fa.ICON_PAINT_BRUSH .. u8" Цвет интерфейса") then

    imgui.BeginChild("ChildWindow2", imgui.ImVec2(200, 175), true)
        for i, value in ipairs(themes.colorThemes) do
            if imgui.RadioButton(value, checked_radio, i) then
                themes.SwitchColorTheme(i)
                mainIni.settings.clrs = clrs.v
                inicfg.save(mainIni, "Random.ini")
            end
        end
    imgui.EndChild()

end
 
Последнее редактирование:
Сheesecake

Сheesecake

Участник
61
3
Как сделать, чтобы (Я кнопка 2) находилась на другой половине, а не впритык к кнопки слева (текст кнопки)?
Например где стоит стрелка?
P.S SameLine делает не так, как надо :/

1612549647690.png
 
chapo

chapo

В армии с 17.10.2023. В ЛС НЕ ОТВЕЧАЮ
Друг
8,643
10,806
Сheesecake написал(а):
Как сделать, чтобы (Я кнопка 2) находилась на другой половине, а не впритык к кнопки слева (текст кнопки)?
Например где стоит стрелка?
P.S SameLine делает не так, как надо :/

Посмотреть вложение 85318
Нажмите для раскрытия...
Lua: 
imgui.SetCursorPos(imgui.ImVec2(5, 24)) --(позиция по X, позиция по Y)
(это перед строкой if imgui.button ...)
 
  • Нравится
Реакции: Сheesecake
Kirill Dumchik

Kirill Dumchik

Участник
61
3
Привет ребят. Как правильно сделать.
Есть такая команда в скрипте:
Lua: 
sampRegisterChatCommand('whh', function() state = not state if state then sampAddChatMessage('Скрипт включен.', 0x00FF00) else sampAddChatMessage('Скрипт выключен.', 0xFF0000) end;end)
Как правильно сделать, чтобы во время активации в чате прописалась серверная команда, например: sampSendChat("/hi") и через 2 секунды sampSendChat("/bay")
 
bottom_text

bottom_text

Известный
675
315
borodatiykeks написал(а):
Привет ребят. Как правильно сделать.
Есть такая команда в скрипте:
Lua: 
sampRegisterChatCommand('whh', function() state = not state if state then sampAddChatMessage('Скрипт включен.', 0x00FF00) else sampAddChatMessage('Скрипт выключен.', 0xFF0000) end;end)
Как правильно сделать, чтобы во время активации в чате прописалась серверная команда, например: sampSendChat("/hi") и через 2 секунды sampSendChat("/bay")
Нажмите для раскрытия...
Lua: 
sampRegisterChatCommand('whh', function() state = not state if state then sampAddChatMessage('Скрипт включен.', 0x00FF00) else sampAddChatMessage('Скрипт выключен.', 0xFF0000) lua_thread.create(function() sampSendChat("/hi") wait(2000) sampSendChat("/bay") end) end;end)
 
bottom_text

bottom_text

Известный
675
315
PoundFoolish написал(а):
Как сделать правильно, есть код:

Lua: 
local se = require 'lib.samp.events'
function se.onSendCommand(cmd)
    if cmd:match('^/alltp') then
        local args = cmd:match('^/.+%([%d%s]+%)')
        if args then
            for a in args:gmatch('%d+') do
                sampSendChat( cmd:gsub('%([%d%s]+%)', a, 1) )
            end
            return false
        end
    end
end
Работает так: Я пишу /alltp (1 2 3) и он пишет 3 раза
/alltp 1
/alltp 2
/alltp 3

Но как сделать так, допустим я пишу /alltp (1 2 3) и он пишет:
/tphere 1
/tphere 2
/tphere 3?
Надеюсь понятно объяснил
Нажмите для раскрытия...
Просто что ли команду изменить?
Lua: 
local se = require 'lib.samp.events'
function se.onSendCommand(cmd)
    if cmd:match('^/tphere') then
        local args = cmd:match('^/.+%([%d%s]+%)')
        if args then
            for a in args:gmatch('%d+') do
                sampSendChat( cmd:gsub('%([%d%s]+%)', a, 1) )
            end
            return false
        end
    end
end

Ну на
 
PoundFoolish

PoundFoolish

Участник
81
1
bottom_text написал(а):
Просто что ли команду изменить?
Lua: 
local se = require 'lib.samp.events'
function se.onSendCommand(cmd)
    if cmd:match('^/tphere') then
        local args = cmd:match('^/.+%([%d%s]+%)')
        if args then
            for a in args:gmatch('%d+') do
                sampSendChat( cmd:gsub('%([%d%s]+%)', a, 1) )
            end
            return false
        end
    end
end

Ну на
Нажмите для раскрытия...
Нет. Не совсем так, он мне нужно чтобы именно я писал допустим команду /allgh ( Именно ее, не ту, которую она будет повторять ) а повторяло команду /tphere
 
Kirill Dumchik

Kirill Dumchik

Участник
61
3
bottom_text написал(а):
Lua: 
sampRegisterChatCommand('whh', function() state = not state if state then sampAddChatMessage('Скрипт включен.', 0x00FF00) else sampAddChatMessage('Скрипт выключен.', 0xFF0000) lua_thread.create(function() sampSendChat("/hi") wait(2000) sampSendChat("/bay") end) end;end)
Нажмите для раскрытия...
Смотри, вот щас после выключения допустим то, что я написал продолжает писать, как сделать чтобы после выключения строки не продолжали идти?
Поправил под себя:
Lua: 
sampRegisterChatCommand('whh', function() state = not state if state then sampAddChatMessage('Скрипт включен.', 0x00FF00) lua_thread.create(function() sampSendChat("/me test") wait(2000) sampSendChat("/do test") end) else sampAddChatMessage('Скрипт выключен.', 0xFF0000) end;end)
 
bottom_text

bottom_text

Известный
675
315
borodatiykeks написал(а):
Смотри, вот щас после выключения допустим то, что я написал продолжает писать, как сделать чтобы после выключения строки не продолжали идти?
Поправил под себя:
Lua: 
sampRegisterChatCommand('whh', function() state = not state if state then sampAddChatMessage('Скрипт включен.', 0x00FF00) lua_thread.create(function() sampSendChat("/me test") wait(2000) sampSendChat("/do test") end) else sampAddChatMessage('Скрипт выключен.', 0xFF0000) end;end)
Нажмите для раскрытия...
Lua: 
sampRegisterChatCommand('whh', function() state = not state if state then sampAddChatMessage('Скрипт включен.', 0x00FF00) lua_thread.create(function() sampSendChat("/me test") wait(2000) if state then sampSendChat("/do test")  end end) else sampAddChatMessage('Скрипт выключен.', 0xFF0000) end;end)
Мб можно как-то по другому, но по идеи должно работать так, как тебе нужно
 
  • Влюблен
Реакции: Kirill Dumchik
A

Anton228155

Новичок
6
1
Lua: 
function mask()
    if not data.on_mask then
    sampSendChat('/mm')
    sampSendDialogResponse(10411, 1, 10, '')
    while not sampIsDialogActive() do wait(25) end
    local text = sampGetDialogText()
    local mask_list = -1
    local est = false
        for cc = 0, 20 do
            if text:find('\n.-\t.-\n') then
            local nazv, status = text:match('\n(.-)\t(.-)\n')
                if nazv ~= '' and nazv ~= ' ' then
                    if nazv:find('Mask') or nazv:find('Shawl') then
                        if status:find('Надет') then
                        est = true
                        break
                        else
                        if mask_list == -1 then mask_list = cc end
                        end
                    end
                text = text:gsub(nazv..'\t'..status, '')
                end
            end
        end

        if not est then
            if mask_list ~= -1 then
                sampSendDialogResponse(10418, 1, mask_list, '')
                while not sampIsDialogActive() do wait(25) end
                sampSendDialogResponse(10419, 1, 0, '')
                sampCloseCurrentDialogWithButton()
                while not sampIsDialogActive() do wait(25) end
                sampCloseCurrentDialogWithButton()
                wait(1000)
                sampSendChat('/mask')
            else
                msg('У вас нет масок.')
            end
        else
            sampCloseCurrentDialogWithButton()
            while not sampIsDialogActive() do wait(25) end
            sampCloseCurrentDialogWithButton()
            wait(1000)
            sampSendChat('/mask')
        end
    else
    sampSendChat('/mask')
    end
end

Маска эвольв
не работает
 
  • Нравится
Реакции: Gorskin
[SA ARZ]

[SA ARZ]

Известный
390
8
код: 
local f = io.open(getGameDirectory()..'\\moonloader\\'..script.this.filename)
if f then
for line in f:lines() do
sampAddChatMessage(line, -1)
end
end

выводил по порядку строки при нажатие f1
 
wulfandr

wulfandr

Известный
641
257
Anton228155 написал(а):
Lua: 
function mask()
    if not data.on_mask then
    sampSendChat('/mm')
    sampSendDialogResponse(10411, 1, 10, '')
    while not sampIsDialogActive() do wait(25) end
    local text = sampGetDialogText()
    local mask_list = -1
    local est = false
        for cc = 0, 20 do
            if text:find('\n.-\t.-\n') then
            local nazv, status = text:match('\n(.-)\t(.-)\n')
                if nazv ~= '' and nazv ~= ' ' then
                    if nazv:find('Mask') or nazv:find('Shawl') then
                        if status:find('Надет') then
                        est = true
                        break
                        else
                        if mask_list == -1 then mask_list = cc end
                        end
                    end
                text = text:gsub(nazv..'\t'..status, '')
                end
            end
        end

        if not est then
            if mask_list ~= -1 then
                sampSendDialogResponse(10418, 1, mask_list, '')
                while not sampIsDialogActive() do wait(25) end
                sampSendDialogResponse(10419, 1, 0, '')
                sampCloseCurrentDialogWithButton()
                while not sampIsDialogActive() do wait(25) end
                sampCloseCurrentDialogWithButton()
                wait(1000)
                sampSendChat('/mask')
            else
                msg('У вас нет масок.')
            end
        else
            sampCloseCurrentDialogWithButton()
            while not sampIsDialogActive() do wait(25) end
            sampCloseCurrentDialogWithButton()
            wait(1000)
            sampSendChat('/mask')
        end
    else
    sampSendChat('/mask')
    end
end

Маска эвольв
не работает
Нажмите для раскрытия...
а должна работать? там новая система на TD, используй FBI Tools, там вшита автомаска
 
Войдите или зарегистрируйтесь для ответа.

Похожие темы

  1. AnWu
    • Закреплено
    • Статья
    Информация Гайд Всё о Lua скриптинге для MoonLoader
      • Нравится
    Ответы
    49
    Просмотры
    145K
    Lua
    FlouZip
    FlouZip
  2. Frapsy
    • Опрос
    Исходник Полноценный исходник фракционного(МО) скрипта ARP
      • Нравится
    Ответы
    74
    Просмотры
    27K
    Lua
    Frapsy
    Frapsy
  3. PanSeek
    Интервью с Fomikus
      • Нравится
      • Влюблен
    Ответы
    3
    Просмотры
    763
    Общение
    ChromiusJ
    ChromiusJ
  4. AnWu
    • Закреплено
    Информация Ответы на часто задаваемые вопросы [FAQ]
      • Нравится
      • Влюблен
    Ответы
    13
    Просмотры
    9K
    Lua
    why ega
    why ega
  5. PanSeek
    Интервью с chapo
      • Нравится
    Ответы
    16
    Просмотры
    2K
    Общение
    Стэнфорд
    Стэнфорд
Сверху Снизу