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

E E E E E E E

Активный
154
29
поч кнопки робят, а функции не робят?
Lua:
script_author('E E E E E E E')
script_version('beta1.0.0')

require 'lib.moonloader'
local hook = require 'lib.samp.events'
local imgui = require 'imgui'
local red = 0xF24B4B
imgui.ToggleButton = require('imgui_addons').ToggleButton
local encoding = require 'encoding'
encoding.default = 'CP1251'
u8 = encoding.UTF8

local themes = import "resource/imgui_themes.lua"
local vkeys = require 'vkeys'

local main_window_state = imgui.ImBool(false)
local text_buffer = imgui.ImBuffer(256)
local anti_drop = imgui.ImBool(false)
local sbiv = imgui.ImBool(false)
local aptechka = imgui.ImBool(false)
local speedcar = imgui.ImBool(false)
local taxi = imgui.ImBool(false)
local sbiv_piss = imgui.ImBool(false)
local auto = imgui.ImBool(false)

function main()
    repeat wait(0) until isSampAvailable()
    printStringNow("~r~[Evolve~w~ Helper]: ~g~ON", 1500)
    wait(1500)
    printString('~r~[Evolve~w~ Helper]: ~r~/e.menu', 1500)
    sampRegisterChatCommand("e.menu", function()
    main_window_state.v = not main_window_state.v
        imgui.Process = main_window_state.v
    end)

        imgui.Process = false

        imgui.SwitchContext()
        themes.SwitchColorTheme(2)

                wait(-1)

        while true do
                    wait(0)
                    if auto.v then
                        if not sampIsDialogActive() and not sampIsChatInputActive() then
                            if isKeyJustPressed(VK_F11) then
                                local closestId = -1
                                local x, y, z = getCharCoordinates(PLAYER_PED)
                                for i = 0, 999 do
                                    local strem, ped = sampGetCharHandleBySampPlayerId(i)
                                         if strem then
                                            local mx, my, mz = getCharCoordinates(ped)
                                            local dist = getDistanceBetweenCoords3d(x, y, z, mx, my, mz)
                                            if dist < 5 then
                                                sampSendChat('Hello! '.. i)
                                            end
                                         end
                            end
                        end
                    end
                        end
            if sbiv_piss.v then
                if not sampIsDialogActive() and not sampIsChatInputActive() then
                    if isKeyDown(VK_R) and isKeyJustPressed(VK_3) then
                        sampSendChat("/piss")
                    end
                end
            end
            if taxi.v then
                if not sampIsDialogActive() and not sampIsChatInputActive() then
                    if isKeyDown(VK_N) and isKeyJustPressed(VK_M) then
                        sampSendChat('От души брат)')
                        wait(1500)
                        sampSendChat('Удачи')
                        wait(1000)
                        sampSendChat(')')
                    end
                end
            end
            if speedcar.v then
                speed = getCharSpeed(PLAYER_PED)
                if isCharInAnyCar(PLAYER_PED) then
                    printStringNow(math.floor(speed), 500)
                end
            end
            if aptechka.v then
                if not sampIsDialogActive() and not sampIsChatInputActive() then
                    if isKeyDown(VK_R) and isKeyJustPressed(VK_2) then
                        sampAddChatMessage("/usedrugs 15", -1)
                    end
                end
            end

            if sbiv.v then
                _, id = sampGetPlayerIdByCharHandle(PLAYER_PED)
                idanimation = sampGetPlayerAnimationId(id)
                if idanimation == 1191 then
                    wait(1)
                    x, y, z = getCharCoordinates(PLAYER_PED)
                    zi = z -1
                    setCharCoordinates(PLAYER_PED, x, y, zi)
                end
            end
        end

end

    function imgui.OnDrawFrame()
        local sw, sh = getScreenResolution()
        imgui.SetNextWindowPos(imgui.ImVec2(sw / 2, sh / 2), imgui.Cond.FirstUseEver, imgui.ImVec2(0.5, 0.5))
        imgui.SetNextWindowSize(imgui.ImVec2(577, 299), imgui.Cond.FirstUseEver)

        if not main_window_state.v then
            imgui.Process = false
        end
            imgui.Begin("Evolve Helper BETA 1.0.0 bY E E E E E E E", main_window_state, imgui.WindowFlags.NoResize)
            imgui.Text(u8"                           Работы:                                                        Транспорт:")
            imgui.BeginChild(u8"Работы", imgui.ImVec2(251, 112), true)
            imgui.ToggleButton('##anti_drop', anti_drop)
            imgui.SameLine()
            imgui.Text(u8'Анти дроп обьектов')
            imgui.SameLine()
            imgui.TextQuestion(u8'Вы не будете ронять мешок или другой любой обьект в руках. !WARNING!: Иногда может кикать!')
            imgui.ToggleButton('##sbiv', sbiv)
            imgui.SameLine()
            imgui.Text(u8'Авто сбив отдышки')
            imgui.SameLine()
            imgui.TextQuestion(u8'После удара у вашего персонажа не будет отдышки')
                        imgui.ToggleButton("auto", auto)
                        imgui.SameLine()
                        imgui.Text(u8'Авто продажа хот дога игроку\n(максимум 5 метров)')
                        imgui.SameLine()
                        imgui.TextQuestion(u8'Активация: F11')
            imgui.EndChild()

            imgui.SameLine()
            imgui.BeginChild("Транспорт", imgui.ImVec2(313, 112), true)
            imgui.ToggleButton('##speedcar', speedcar)
            imgui.SameLine()
            imgui.Text(u8'Спидометр(для мопедов)')
            imgui.SameLine()
            imgui.TextQuestion(u8'Как мы знаем, на Evolve нету спидометра когда сидишь за мопедом, это функция исправляет это!')
            imgui.ToggleButton('##taxi', taxi)
            imgui.SameLine()
            imgui.Text(u8'Отблагодарить таксиста за поездку (N + M)')
            imgui.SameLine()
            imgui.TextQuestion(u8'хз зач я это добавил, а может. B релизе этой надписи и не будет:(...')
            imgui.EndChild()

                        imgui.Text(u8"                   Разное:")
                        imgui.SetCursorPosY(178)
                        imgui.SetCursorPosX(4)
            imgui.BeginChild(u8"e", imgui.ImVec2(410, 100), true)
            imgui.ToggleButton('#pechka', aptechka)
            imgui.SameLine()
            imgui.Text(u8'Автоматически принимает вещества, активация:  R + 2')
            imgui.SameLine()
            imgui.TextQuestion(u8'При нажатии R + 2 игрок автоматически введёт "/usedrugs 15"')
                        imgui.ToggleButton("s", sbiv_piss)
                        imgui.SameLine()
                        imgui.Text(u8'Сбив на /piss (шоб по гетто ящерски выглядила)')
                        imgui.SameLine()
                        imgui.TextQuestion(u8'Активация: R + 3')
            imgui.EndChild()

            imgui.SetCursorPosY(220)
            imgui.SetCursorPosX(440)
            imgui.Text(u8'Автор на BlastHack:')
            imgui.SetCursorPosY(239)
            imgui.SetCursorPosX(440)
            if imgui.Button('Copy url') then
                setClipboardText('https://www.blast.hk/members/495401/')
            end
            imgui.End()
        end

function imgui.TextQuestion(text)
  imgui.TextDisabled('(?)')
      if imgui.IsItemHovered() then
            imgui.BeginTooltip()
          imgui.PushTextWrapPos(450)
          imgui.TextUnformatted(text)
          imgui.PopTextWrapPos()
          imgui.EndTooltip()
      end
    end

function hook.onSendPlayerSync(data)
    if anti_drop.v then
        data.keysData = 0
    end
end

function onScriptTerminate(script, quitGame)
    if script == thisScript() then
        sampAddChatMessage("{F24B4B}[Evolve Helper]:{FFFFFF} Скрипт был {F24B4B}крашнут{FFFFFF}, нажмите {F24B4B}CNTRL{FFFFFF} + {F24B4B}R{FFFFFF} чтобы перезагрузить", -1)
        printStringNow("~r~[Evolve ~w~Helper]: ~r~ OFF", 2500)
    end
end
хелп плиз
 

danny228

Участник
61
9
может ли кто сделать, чтобы когда персонаж садится в т/c, то вводятся 2 команды
вроде можно сделать как то через isCharSittingInCar (но не факт)
команды
1. /afix
2. /afixhp 600
 
D

deleted-user-139653

Гость
Есть функция быстрого скриншота (убрать фриз при нажатие f8) на lua? Весь бх облазил, не нашел, мб кто-то шарит. Буду благодарен👽
up

может ли кто сделать, чтобы когда персонаж садится в т/c, то вводятся 2 команды
вроде можно сделать как то через isCharSittingInCar (но не факт)
команды
1. /afix
2. /afixhp 600
шото типо этого
Код:
function main()
    while not isSampAvailable() do wait(0) end
    
    while true do wait(0)
    if isCharInAnyCar(PLAYER_PED) then
    wait(100)
    sampSendChat("/afix")
    wait(100)
    sampSendChat("/afixhp 600")
    end
end
 
Последнее редактирование модератором:
  • Bug
Реакции: chapo

danny228

Участник
61
9
up


шото типо этого
Код:
function main()
    while not isSampAvailable() do wait(0) end
   
    while true do wait(0)
    if isCharInAnyCar(PLAYER_PED) then
    wait(100)
    sampSendChat("/afix")
    wait(100)
    sampSendChat("/afixhp 600")
    end
end
попробуй тогда сделать так чтобы когда в авто в котором сидит персонаж меньше 600 hp, то прописывает /fix
 

kiyoshii

Известный
26
18
как вставить код в другой скрипт? первый код который нужно вставить в другой скрипт, второй код как я пытался его вставить, а третий код, это скрипт В который надо вставить первый код. Ничего не получается, просто весь скрипт не работает


1:
require 'lib.moonloader'

function main()
    while not isSampAvailable() do wait(0) end
    while true do
        wait(0)
        if wasKeyReleased(VK_RBUTTON) and not sampIsDialogActive()
            and not sampIsChatInputActive()
            and not isCharShooting(PLAYER_PED)
            then
                wait(125)
                setVirtualKeyDown(VK_Q, true)
                wait(15)
                setVirtualKeyDown(VK_Q, false)
                wait(25)
                setVirtualKeyDown(VK_E, true)
                wait(15)
                setVirtualKeyDown(VK_E, false)
        end
    end
end

2:
function as()
    lua_thread.create(function()
        while true do
        wait(0)
        if wasKeyReleased(VK_RBUTTON) and not sampIsDialogActive()
            and not sampIsChatInputActive()
            and not isCharShooting(PLAYER_PED)
            then
                wait(125)
                setVirtualKeyDown(VK_Q, true)
                wait(15)
                setVirtualKeyDown(VK_Q, false)
                wait(25)
                setVirtualKeyDown(VK_E, true)
                wait(15)
                setVirtualKeyDown(VK_E, false)
        end
    end)
end

3:
require 'lib.moonloader'
local active = true

function main()
    while not isSampAvailable() do wait(0) end
    sampRegisterChatCommand('as', function()
        active = not active
        sampAddChatMessage(active and 'AutoSprint ON' or 'AutoSprint OFF', -1)
    end)
    while true do
        wait(0)
        if active then
            if isCharOnFoot(PLAYER_PED) and not sampIsDialogActive()
                and not sampIsChatInputActive()
                and not isCharShooting(PLAYER_PED)
                then
                    wait(0)
                    setVirtualKeyDown(VK_SPACE, true)
                    wait(5)
                    setVirtualKeyDown(VK_SPACE, false)
            end
        end
    end
end
 
Последнее редактирование:

YarikVL

Известный
Проверенный
4,712
1,802
Lua:
require 'lib.moonloader'
local active = true

function main()
    while not isSampAvailable() do wait(0) end
    sampRegisterChatCommand('as', function()
        active = not active
        sampAddChatMessage(active and 'AutoSprint ON' or 'AutoSprint OFF', -1)
    end)
    while true do
        wait(0)
        if active then
            if isCharOnFoot(PLAYER_PED) and not sampIsDialogActive() and not sampIsChatInputActive() and not isCharShooting(PLAYER_PED) then
                setVirtualKeyDown(VK_SPACE, true)
                wait(5)
                setVirtualKeyDown(VK_SPACE, false)
            end
        end
        if wasKeyReleased(VK_RBUTTON) and not sampIsDialogActive() and not sampIsChatInputActive() and not isCharShooting(PLAYER_PED) then
            wait(125)
            setVirtualKeyDown(VK_Q, true)
            wait(15)
            setVirtualKeyDown(VK_Q, false)
            wait(25)
            setVirtualKeyDown(VK_E, true)
            wait(15)
            setVirtualKeyDown(VK_E, false)
        end
        if wasKeyReleased(VK_RBUTTON) and not sampIsDialogActive() and not sampIsChatInputActive() and not isCharShooting(PLAYER_PED) then
            wait(125)
            setVirtualKeyDown(VK_Q, true)
            wait(15)
            setVirtualKeyDown(VK_Q, false)
            wait(25)
            setVirtualKeyDown(VK_E, true)
            wait(15)
            setVirtualKeyDown(VK_E, false)
        end
    end
end
как вставить код в другой скрипт? первый код который нужно вставить в другой скрипт, второй код как я пытался его вставить, а третий код, это скрипт В который надо вставить первый код. Ничего не получается, просто весь скрипт не работает


1:
require 'lib.moonloader'

function main()
    while not isSampAvailable() do wait(0) end
    while true do
        wait(0)
        if wasKeyReleased(VK_RBUTTON) and not sampIsDialogActive()
            and not sampIsChatInputActive()
            and not isCharShooting(PLAYER_PED)
            then
                wait(125)
                setVirtualKeyDown(VK_Q, true)
                wait(15)
                setVirtualKeyDown(VK_Q, false)
                wait(25)
                setVirtualKeyDown(VK_E, true)
                wait(15)
                setVirtualKeyDown(VK_E, false)
        end
    end
end

2:
function as()
    lua_thread.create(function()
        while true do
        wait(0)
        if wasKeyReleased(VK_RBUTTON) and not sampIsDialogActive()
            and not sampIsChatInputActive()
            and not isCharShooting(PLAYER_PED)
            then
                wait(125)
                setVirtualKeyDown(VK_Q, true)
                wait(15)
                setVirtualKeyDown(VK_Q, false)
                wait(25)
                setVirtualKeyDown(VK_E, true)
                wait(15)
                setVirtualKeyDown(VK_E, false)
        end
    end)
end

3:
require 'lib.moonloader'
local active = true

function main()
    while not isSampAvailable() do wait(0) end
    sampRegisterChatCommand('as', function()
        active = not active
        sampAddChatMessage(active and 'AutoSprint ON' or 'AutoSprint OFF', -1)
    end)
    while true do
        wait(0)
        if active then
            if isCharOnFoot(PLAYER_PED) and not sampIsDialogActive()
                and not sampIsChatInputActive()
                and not isCharShooting(PLAYER_PED)
                then
                    wait(0)
                    setVirtualKeyDown(VK_SPACE, true)
                    wait(5)
                    setVirtualKeyDown(VK_SPACE, false)
            end
        end
    end
end
Всё объединил
 
  • Нравится
Реакции: kiyoshii

вайега52

Налуашил состояние
Модератор
3,000
3,139
как из
local nick = "Ya_Nasral"
сделать "Y.Nasral"
шоб имя сокращало до 1 символа крч
 

moreveal

Известный
988
723
как из
local nick = "Ya_Nasral"
сделать "Y.Nasral"
шоб имя сокращало до 1 символа крч
Lua:
function shorten(nick)
  if (nick:find(".+_.+")) then
    return ("%s. %s"):format(nick:sub(1,1), nick:sub(nick:find("_") + 1, nick:len()))
  end
  return nick
end

print(shorten("Ya_Nasral")) -- Y. Nasral
 

danny228

Участник
61
9
крч нужно штуку которая будет кликать по текстдраву
типо когда видит 206 текстдрав, то жмает его 10 раз
если видит 199, то жмает 1
Screenshot_129.png
 

kiyoshii

Известный
26
18
можно ли сделать так чтоб, при нажатии клавиши, камера поворачивалась допустим на 90 градусов, или 180, или 360, только чтоб не резко поворачивалось, а плавно. возможно ли такое?
 

XRLM

Против ветра рождённый
Модератор
1,649
1,316
можно ли сделать так чтоб, при нажатии клавиши, камера поворачивалась допустим на 90 градусов, или 180, или 360, только чтоб не резко поворачивалось, а плавно. возможно ли такое?
возможно. https://www.blast.hk/threads/13380/page-17#post-702042

почему у меня блять вопросик вместо иконки?
1669820614836.png
?????????
все делал по гайду https://www.blast.hk/threads/111224/ fAwesome6 mimgui
Lua:
local faicons = require 'fAwesome6'

imgui.OnInitialize(function()
       imgui.GetIO().IniFilename = nil
    local config = imgui.ImFontConfig()
    config.MergeMode = true
    config.PixelSnapH = true
    iconRanges = imgui.new.ImWchar[3](faicons.min_range, faicons.max_range, 0)
    imgui.GetIO().Fonts:AddFontFromMemoryCompressedBase85TTF(faicons.get_font_data_base85('solid'), 14, config, iconRanges) -- solid - тип иконок, так же есть thin, regular, light и duotone
end)
--frame
imgui.Text(faicons('GEARS'))
 
Последнее редактирование:
  • Нравится
Реакции: kiyoshii