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

_Nelit_

Потрачен
109
39
Обратите внимание, пользователь заблокирован на форуме. Не рекомендуется проводить сделки.
Каким образом можно обойти лицензию по серийному номеру жёсткого диска, если дата и жёсткий диск хранятся в май скьюл базе данных? Нужны способы, что бы можно было защитить скрипт

Сделал я автоматическую подгрузку библиотеки faIcons если это разрешит пользователь. Но скрипт даёт ошибку на этапе подключения скрипта faIcons.lua. Можно как то продолжить работу скрипта не обращая ошибку. Вот код

Lua:
local fa = require 'faIcons'
local fa_glyph_ranges = imgui.ImGlyphRanges({ fa.min_range, fa.max_range })

function imgui.BeforeDrawFrame()
    if fa_font == nil then
        local font_config = imgui.ImFontConfig()
        font_config.MergeMode = true
        fa_font = imgui.GetIO().Fonts:AddFontFromFileTTF('moonloader/resource/fonts/fontawesome-webfont.ttf', 15.0, font_config, fa_glyph_ranges)
    end
end

function main()
    if not isSampfuncsLoaded() or not isSampLoaded() then return end
    while not isSampAvailable() do wait(100) end
   
    downloadFaicons()
   
    while true do
        wait(0)
       
    end
end

function imgui.OnDrawFrame()
        if download_faicons_window.v then
        imgui.SetNextWindowSize(imgui.ImVec2(300, 120), imgui.Cond.Always)
        imgui.SetNextWindowPos(imgui.ImVec2(sw / 2, sh / 2), imgui.Cond.Always, imgui.ImVec2(0.5, 0.5))
        imgui.Begin(u8'State-Assistant | ' .. u8(licenseType), confirm_off_window, imgui.WindowFlags.NoCollapse + imgui.WindowFlags.NoResize + imgui.WindowFlags.NoScrollbar)

        imgui.CenterTextColoredRGB('У Вас отсутствует библиотека faIcons.lua')
        imgui.CenterTextColoredRGB('Скачать её прямо сейчас?')

        if imgui.Button(u8'Да', imgui.ImVec2(70, 25)) then
            downloadUrlToFile('https://license.s-studio.su/libs/faIcons.lua', getWorkingDirectory()..'/lib/faIcons.lua', function(id, status)
                if status == dlstatus.STATUS_ENDDOWNLOADDATA then
                    sampAddChatMessage(tag .. 'Установлено 1/2 файлов', mc)

                    if status == dlstatus.STATUS_ENDDOWNLOADDATA then
                        downloadUrlToFile('https://license.s-studio.su/libs/fontawesome-webfont.ttf', getWorkingDirectory()..'/resource/fontawesome-webfont.ttf', function(id, status)
                            sampAddChatMessage(tag .. 'Установка завершена!', mc)
                        end)
                    end
                end
            end)
        end
        imgui.SameLine(160)
        if imgui.Button(u8'Нет', imgui.ImVec2(70, 25)) then
            confirm_off_window.v = false
            main_window.v = not main_window.v
        end

        imgui.End()
    end
end

function downloadFaicons()
    print('[ Проверка на наличие faIcons.lua... ]')
    if doesFileExist(getWorkingDirectory()..'/lib/faIcons.lua') and doesFileExist(getWorkingDirectory()..'/resource/fonts/fontawesome-webfont.ttf') then
        print('[ faIcons.lua найдена... ]')
    else
        download_faicons_window.v = not download_faicons_window.v
    end
end
Ап
 

samuraiJT

Новичок
2
0
В чём проблема хотел написать скрипт на LUA но не получилось где ошибка
Lua:
require "lib.moonloader"
loca keys = require "vkeys"
function main () 
    if not isSampLoaded () or not isSampLoaded()
    then return
     end
  while not isSampAvailable ()
end
    sampAddChatMessage ('Скрипт успешно запущен запуск /helper', 0xF8F8FF) 
    while true
    wait true
    vait (0)
    and isKeyJustPressed (VK_9)
    then
    sampSendChat ("/ot")
end 
    ifKeyJustFressed (VK_M)
    then
    sampSendChat ("style")
     end
   end 
end
 
Последнее редактирование модератором:

_Nelit_

Потрачен
109
39
Обратите внимание, пользователь заблокирован на форуме. Не рекомендуется проводить сделки.
В чём проблема хотел написать скрипт на LUA но не получилось где ошибка
Lua:
require "lib.moonloader"
loca keys = require "vkeys"
function main ()
    if not isSampLoaded () or not isSampLoaded()
    then return
     end
  while not isSampAvailable ()
end
    sampAddChatMessage ('Скрипт успешно запущен запуск /helper', 0xF8F8FF)
    while true
    wait true
    vait (0)
    and isKeyJustPressed (VK_9)
    then
    sampSendChat ("/ot")
end
    ifKeyJustFressed (VK_M)
    then
    sampSendChat ("style")
     end
   end
end
Lua:
require "lib.moonloader"

local keys = require "vkeys"

function main ()
    if not isSampfuncsLoaded() or not isSampLoaded() then return end
    while not isSampAvailable() do wait(100) end

    sampAddChatMessage ('Скрипт успешно запущен запуск /helper', 0xF8F8FF)

    while true do
        wait(0)

        if isKeyJustPressed (VK_9) then
            sampSendChat ("/ot")
        elseif isKeyJustPressed (VK_M) then
            sampSendChat ("style")
        end

    end
end

На луа наверное не твоё писать.
 

auf.exe

Участник
41
12
Вот код:
require 'lib.moonloader'

local rk = require 'rkeys'
local imgui = require 'imgui'
local sampev = require 'lib.samp.events'
local vk = require 'vkeys'
local imadd = require 'imgui_addons'
local inicfg = require 'inicfg'
local noctf = import 'imgui_notf.lua'
local directini = 'moonloader\\settings.ini'
imgui.HotKey = require('imgui_addons').HotKey


local mainini = inicfg.load(nil, directini)

if mainini.HotKey == nil then
    mainini.HotKey = {
        bind1 = "[18, 82]",
        bind2 = "[18, 83]"
    }
end

local tLastKeys = { }

local ActiveClockKeys = {
    v = decodeJson(mainini.HotKey.bind1)
}
local ActiveClockKeys2 = {
    v = decodeJson(mainini.HotKey.bind2)
}

local main_window = imgui.ImBool(false)
local textbuffer = imgui.ImBuffer(256)
local textbuffer2 = imgui.ImBuffer(256)

local sw, sr = getScreenResolution()

function main()
    while not isSampAvailable() do wait(0) end
    sampAddChatMessage('qq Binder tuta', -1)
    sampRegisterChatCommand('Lox', imgui1)

    bindClock = rk.registerHotKey(ActiveClockKeys, true, bind)
    bindClock1 = rk.registerHotKey(ActiveClockKeys2, true, bind2)

    while true do
        wait(0)
        if isKeyJustPressed(VK_M) then
            main_window.v = not main_window.v
            imgui.Process = main_window.v
        end
    end
end

function bind()
    sampSendChat(textbuffer.v)
    noctf.addNotifon("Задача выполнена!", 5, 3)
end
function bind2()
    sampSendChat(textbuffer2.v)
    noctf.addNotifon("Задача выполнена!", 5, 3)
end

function imgui.OnDrawFrame()

    imgui.SetNextWindowPos(imgui.ImVec2(sw / 2, sr / 2), imgui.Cond.FirstUseEver, imgui.ImVec2(0.5, 0.5))
    imgui.SetNextWindowSize(imgui.ImVec2(300, 250), imgui.Cond.FirstUseEver)

    if not main_window.v then
        imgui.Process = false
    end
    imgui.Begin("Binder by auf.exe", main_window)

   

    if imgui.HotKey('##2', ActiveClockKeys, tLastKeys, 100) then
        rk.changeHotKey(bindClock2, ActiveClockKeys.v)
        mainini.HotKey.bind1 = encodeJson(ActiveClockKeys.v)
        mainini.HotKey.bind2 = encodeJson(ActiveClockKeys.v)
        inicfg.save(mainini, directini)
    end
    imgui.SameLine()
    imgui.InputText('Some Text', textbuffer)
    imgui.Separator()
    if imgui.HotKey('##2', ActiveClockKeys2, tLastKeys, 100) then
        rk.changeHotKey(bindClock2, ActiveClockKeys.v)
        mainini.HotKey.bind1 = encodeJson(ActiveClockKeys.v)
        mainini.HotKey.bind2 = encodeJson(ActiveClockKeys2.v)
        inicfg.save(mainini, directini)
    end
    imgui.SameLine()
    imgui.InputText('Bind 2', textbuffer2)
   
    mainini.HotKey.bind1 = encodeJson(ActiveClockKeys.v)
    mainini.HotKey.bind2 = encodeJson(ActiveClockKeys2.v)
    inicfg.save(mainini, directini)
    imgui.End()
end
Блять скрипт работает хоткеи меняются но НЕ выполняется задача.Пашет дальше не криашит, но хоткеи не выполняются
Помогити!!
 

eqzzz

Известный
125
21
Приветствую, помогите.
SMOOTH AIMBOT работает, но после того, как я сделал сохранение inicfg, он перестал работать. Никакие ошибки не выдает, просто доводит, остальные функции, которые также взаимодействованы с inicfg работают. Что это может быть вообще?
 

sep

Известный
714
79
каму не овер в падлу сделайте чтобы по умолчанию было вкл

код:
script_name("nameTag")
script_description("alt + F3 to turn on/off")
script_version_number(3)
script_version("v.003")
script_authors("hnnssy")
local mem = require "memory"


--- Main
function main()
    if not isSampfuncsLoaded() or not isSampLoaded() then return end
    while true do
        wait(0)
        if isKeyDown(18) and isKeyJustPressed(114) then -- ALT+F3
            nameTagOn()
            --sampAddChatMessage("on", 0xFFFF00)
            printStringNow("Wallhack ~g~ON", 1000)
            repeat
            wait(0)
            if isKeyDown(119) then
                nameTagOff()
                wait(1000)
                nameTagOn()
            end
            until isKeyDown(18) and isKeyJustPressed(114)
            while isKeyDown(18) or isKeyDown(114) do
            wait(10)
            end
            nameTagOff()
            --sampAddChatMessage("off", 0xFFFF00)
            printStringNow("Wallhack ~r~OFF", 1000)
        end
    end
end

function nameTagOn()
    local pStSet = sampGetServerSettingsPtr()
    NTdist = mem.getfloat(pStSet + 39) -- дальность
    NTwalls = mem.getint8(pStSet + 47) -- видимость через стены
    NTshow = mem.getint8(pStSet + 56) -- видимость тегов
    mem.setfloat(pStSet + 39, 1488.0)
    mem.setint8(pStSet + 47, 0)
    mem.setint8(pStSet + 56, 1)
end

function nameTagOff()
    local pStSet = sampGetServerSettingsPtr()
    mem.setfloat(pStSet + 39, NTdist)
    mem.setint8(pStSet + 47, NTwalls)
    mem.setint8(pStSet + 56, NTshow)
end


--- Events
function onExitScript()
    if NTdist then
        nameTagOff()
    end
end
 

Next..

Известный
342
136
каму не овер в падлу сделайте чтобы по умолчанию было вкл

код:
script_name("nameTag")
script_description("alt + F3 to turn on/off")
script_version_number(3)
script_version("v.003")
script_authors("hnnssy")
local mem = require "memory"


--- Main
function main()
    if not isSampfuncsLoaded() or not isSampLoaded() then return end
    while true do
        wait(0)
        if isKeyDown(18) and isKeyJustPressed(114) then -- ALT+F3
            nameTagOn()
            --sampAddChatMessage("on", 0xFFFF00)
            printStringNow("Wallhack ~g~ON", 1000)
            repeat
            wait(0)
            if isKeyDown(119) then
                nameTagOff()
                wait(1000)
                nameTagOn()
            end
            until isKeyDown(18) and isKeyJustPressed(114)
            while isKeyDown(18) or isKeyDown(114) do
            wait(10)
            end
            nameTagOff()
            --sampAddChatMessage("off", 0xFFFF00)
            printStringNow("Wallhack ~r~OFF", 1000)
        end
    end
end

function nameTagOn()
    local pStSet = sampGetServerSettingsPtr()
    NTdist = mem.getfloat(pStSet + 39) -- дальность
    NTwalls = mem.getint8(pStSet + 47) -- видимость через стены
    NTshow = mem.getint8(pStSet + 56) -- видимость тегов
    mem.setfloat(pStSet + 39, 1488.0)
    mem.setint8(pStSet + 47, 0)
    mem.setint8(pStSet + 56, 1)
end

function nameTagOff()
    local pStSet = sampGetServerSettingsPtr()
    mem.setfloat(pStSet + 39, NTdist)
    mem.setint8(pStSet + 47, NTwalls)
    mem.setint8(pStSet + 56, NTshow)
end


--- Events
function onExitScript()
    if NTdist then
        nameTagOff()
    end
end
Код:
script_name("nameTag")
script_description("alt + F3 to turn on/off")
script_version_number(3)
script_version("v.003")
script_authors("hnnssy")
local mem = require "memory"


--- Main
function main()
    if not isSampfuncsLoaded() or not isSampLoaded() then return end
    nameTagOn()
    while true do
        wait(0)
        if isKeyDown(18) and isKeyJustPressed(114) then -- ALT+F3
            nameTagOn()
            --sampAddChatMessage("on", 0xFFFF00)
            printStringNow("Wallhack ~g~ON", 1000)
            repeat
            wait(0)
            if isKeyDown(119) then
                nameTagOff()
                wait(1000)
                nameTagOn()
            end
            until isKeyDown(18) and isKeyJustPressed(114)
            while isKeyDown(18) or isKeyDown(114) do
            wait(10)
            end
            nameTagOff()
            --sampAddChatMessage("off", 0xFFFF00)
            printStringNow("Wallhack ~r~OFF", 1000)
        end
    end
end

function nameTagOn()
    local pStSet = sampGetServerSettingsPtr()
    NTdist = mem.getfloat(pStSet + 39) -- дальность
    NTwalls = mem.getint8(pStSet + 47) -- видимость через стены
    NTshow = mem.getint8(pStSet + 56) -- видимость тегов
    mem.setfloat(pStSet + 39, 1488.0)
    mem.setint8(pStSet + 47, 0)
    mem.setint8(pStSet + 56, 1)
end

function nameTagOff()
    local pStSet = sampGetServerSettingsPtr()
    mem.setfloat(pStSet + 39, NTdist)
    mem.setint8(pStSet + 47, NTwalls)
    mem.setint8(pStSet + 56, NTshow)
end


--- Events
function onExitScript()
    if NTdist then
        nameTagOff()
    end
end
 

BARRY BRADLEY

Известный
709
177
Возможно ли заблокировать движение камеры (как будто камхак) именно от сервера. Надо запретить изменение координат положения камеры
 

chapo

tg/inst: @moujeek
Всефорумный модератор
9,238
12,672
Возможно ли заблокировать движение камеры (как будто камхак) именно от сервера. Надо запретить изменение координат положения камеры
Lua:
local sampev = require 'lib.samp.events'
function sampev.onSetCameraPosition(position)
    return false
end

function sampev.onSetCameraLookAt(lookAtPosition, cutType)
    return false
end
 
  • Нравится
Реакции: BARRY BRADLEY

sep

Известный
714
79
Код:
script_name("nameTag")
script_description("alt + F3 to turn on/off")
script_version_number(3)
script_version("v.003")
script_authors("hnnssy")
local mem = require "memory"


--- Main
function main()
    if not isSampfuncsLoaded() or not isSampLoaded() then return end
    nameTagOn()
    while true do
        wait(0)
        if isKeyDown(18) and isKeyJustPressed(114) then -- ALT+F3
            nameTagOn()
            --sampAddChatMessage("on", 0xFFFF00)
            printStringNow("Wallhack ~g~ON", 1000)
            repeat
            wait(0)
            if isKeyDown(119) then
                nameTagOff()
                wait(1000)
                nameTagOn()
            end
            until isKeyDown(18) and isKeyJustPressed(114)
            while isKeyDown(18) or isKeyDown(114) do
            wait(10)
            end
            nameTagOff()
            --sampAddChatMessage("off", 0xFFFF00)
            printStringNow("Wallhack ~r~OFF", 1000)
        end
    end
end

function nameTagOn()
    local pStSet = sampGetServerSettingsPtr()
    NTdist = mem.getfloat(pStSet + 39) -- дальность
    NTwalls = mem.getint8(pStSet + 47) -- видимость через стены
    NTshow = mem.getint8(pStSet + 56) -- видимость тегов
    mem.setfloat(pStSet + 39, 1488.0)
    mem.setint8(pStSet + 47, 0)
    mem.setint8(pStSet + 56, 1)
end

function nameTagOff()
    local pStSet = sampGetServerSettingsPtr()
    mem.setfloat(pStSet + 39, NTdist)
    mem.setint8(pStSet + 47, NTwalls)
    mem.setint8(pStSet + 56, NTshow)
end


--- Events
function onExitScript()
    if NTdist then
        nameTagOff()
    end
end
невыклюяается
 

auf.exe

Участник
41
12
Вот код:
require 'lib.moonloader'

local rk = require 'rkeys'
local imgui = require 'imgui'
local sampev = require 'lib.samp.events'
local vk = require 'vkeys'
local imadd = require 'imgui_addons'
local inicfg = require 'inicfg'
local noctf = import 'imgui_notf.lua'
local directini = 'moonloader\\settings.ini'
imgui.HotKey = require('imgui_addons').HotKey


local mainini = inicfg.load(nil, directini)

if mainini.HotKey == nil then
    mainini.HotKey = {
        bind1 = "[18, 82]",
        bind2 = "[18, 83]"
    }
end

local tLastKeys = { }

local ActiveClockKeys = {
    v = decodeJson(mainini.HotKey.bind1)
}
local ActiveClockKeys2 = {
    v = decodeJson(mainini.HotKey.bind2)
}

local main_window = imgui.ImBool(false)
local textbuffer = imgui.ImBuffer(256)
local textbuffer2 = imgui.ImBuffer(256)

local sw, sr = getScreenResolution()

function main()
    while not isSampAvailable() do wait(0) end
    sampAddChatMessage('qq Binder tuta', -1)
    sampRegisterChatCommand('Lox', imgui1)

    bindClock = rk.registerHotKey(ActiveClockKeys, true, bind)
    bindClock1 = rk.registerHotKey(ActiveClockKeys2, true, bind2)

    while true do
        wait(0)
        if isKeyJustPressed(VK_M) then
            main_window.v = not main_window.v
            imgui.Process = main_window.v
        end
    end
end

function bind()
    sampSendChat(textbuffer.v)
    noctf.addNotifon("Задача выполнена!", 5, 3)
end
function bind2()
    sampSendChat(textbuffer2.v)
    noctf.addNotifon("Задача выполнена!", 5, 3)
end

function imgui.OnDrawFrame()

    imgui.SetNextWindowPos(imgui.ImVec2(sw / 2, sr / 2), imgui.Cond.FirstUseEver, imgui.ImVec2(0.5, 0.5))
    imgui.SetNextWindowSize(imgui.ImVec2(300, 250), imgui.Cond.FirstUseEver)

    if not main_window.v then
        imgui.Process = false
    end
    imgui.Begin("Binder by auf.exe", main_window)

   

    if imgui.HotKey('##2', ActiveClockKeys, tLastKeys, 100) then
        rk.changeHotKey(bindClock2, ActiveClockKeys.v)
        mainini.HotKey.bind1 = encodeJson(ActiveClockKeys.v)
        mainini.HotKey.bind2 = encodeJson(ActiveClockKeys.v)
        inicfg.save(mainini, directini)
    end
    imgui.SameLine()
    imgui.InputText('Some Text', textbuffer)
    imgui.Separator()
    if imgui.HotKey('##2', ActiveClockKeys2, tLastKeys, 100) then
        rk.changeHotKey(bindClock2, ActiveClockKeys.v)
        mainini.HotKey.bind1 = encodeJson(ActiveClockKeys.v)
        mainini.HotKey.bind2 = encodeJson(ActiveClockKeys2.v)
        inicfg.save(mainini, directini)
    end
    imgui.SameLine()
    imgui.InputText('Bind 2', textbuffer2)
   
    mainini.HotKey.bind1 = encodeJson(ActiveClockKeys.v)
    mainini.HotKey.bind2 = encodeJson(ActiveClockKeys2.v)
    inicfg.save(mainini, directini)
    imgui.End()
end
Блять скрипт работает хоткеи меняются но НЕ выполняется задача.Пашет дальше не криашит, но хоткеи не выполняются
Да блять кто поможет или никто не ебет?
 

Versaces

Активный
302
32
Нужно чтобы метка ставилась не на месте серверного пикапа, а на 10 метров дальше, но чтобы направление в какую сторону дальше было относительно моего местонахождения, т.е. если я слева от пикапа, то метка будет ставиться правее от пикапа на 20 метров, и так же если я правее то будет ставиться на 20 метров левее
Тык-скрипт
 

tsunamiqq

Участник
433
17
Как сделать такую кнопку
1637007534561.png