Вопросы по 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
 
Последнее редактирование:
  • Нравится
  • Клоун
  • Эм
Реакции: EnScryptior, minxty, RatnikSrb и 41 других
Нажмите для раскрытия...
Andrinall

Andrinall

Известный
704
527
Не все, но большинство функций для установки каких-либо параметров объекту.
copypaste_scripter написал(а):
можно как то применить настройки типо размер, поворот и такое?
Нажмите для раскрытия...

Lua: 
bool result = setObjectCoordinates(Object object, float atX, float atY, float atZ)  -- 01BC
setObjectHeading(Object object, float angle)  -- 0177
setObjectRotation(Object object, float rotationX, float rotationY, float rotationZ)  -- 0453
setObjectVelocity(Object object, float velocityInDirectionX, float velocityInDirectionY, float velocityInDirectionZ)  -- 0381
setObjectRotationVelocity(Object object, float vecX, float vecY, float vecZ)  -- 05A2
setObjectCollision(Object object, bool collision)  -- 0382
setObjectDynamic(Object object, bool moveable)  -- 0392
setObjectDrawLast(Object object, bool drawLast)  -- 0418
setObjectRenderScorched(Object object, bool fireproof)  -- 0654
setObjectHealth(Object object, int health)  -- 071F
setObjectVisible(Object object, bool visibility)  -- 0750
setObjectCollisionDamageEffect(Object object, bool destructible)  -- 07F7
setObjectAnimSpeed(Object object, string animation, float speed)  -- 0836
setObjectAnimCurrentTime(Object object, string animation, float progress)  -- 083A
setObjectOnlyDamagedByPlayer(Object object, bool player)  -- 0875
setObjectScale(Object object, float scale)  -- 08D2
setObjectAsStealable(Object object, bool liftable)  -- 08E9
setObjectMass(Object object, float mass)  -- 0906
setObjectTurnMass(Object object, float turnMass)  -- 0908
setObjectProofs(Object object, bool BP, bool FP, bool EP, bool CP, bool MP)  -- 09CA
 
copypaste_scripter

copypaste_scripter

Известный
1,433
290

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

local show_main_window = imgui.ImBool(false)
local int_buffer1 = imgui.ImInt(0)
local int_buffer2 = imgui.ImInt(0)
local int_buffer3 = imgui.ImInt(0)
local int_buffer4 = imgui.ImInt(0)
local int_buffer5 = imgui.ImInt(0)

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

    sampAddChatMessage("ABBACUS", -1)
  
    sampRegisterChatCommand('abbacus', function()
        show_main_window.v = not show_main_window.v
    end)

    while true do
        wait(0)
        imgui.Process = show_main_window.v
    end
end

function imgui.OnDrawFrame()
    if show_main_window.v then
        imgui.SetNextWindowPos(imgui.ImVec2(100, 500), imgui.Cond.FirstUseEver, imgui.ImVec2(0.5, 0.5))
        imgui.SetNextWindowSize(imgui.ImVec2(300, 400), imgui.Cond.FirstUseEver)
        imgui.Begin('Abbacus', show_main_window)
      
        imgui.Text("apple")
        imgui.InputInt("", int_buffer1)
        imgui.Text("orange")
        imgui.InputInt("", int_buffer2)
        imgui.Text("tomato")
        imgui.InputInt("", int_buffer3)
        imgui.Text("carrot")
        imgui.InputInt("", int_buffer4)
        imgui.Text("potato")
        imgui.InputInt("", int_buffer5)
      
        imgui.End()
    end

end

почему первый прибавляется а остальные 0 не могу?
1700392435523.png
 

Вложения

  • 1700386663139.png
    1700386663139.png
    14.1 KB · Просмотры: 62
Последнее редактирование:
  • Злость
Реакции: qdIbp
MrDorlik

MrDorlik

Известный
946
377
copypaste_scripter написал(а):

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

local show_main_window = imgui.ImBool(false)
local int_buffer1 = imgui.ImInt(0)
local int_buffer2 = imgui.ImInt(0)
local int_buffer3 = imgui.ImInt(0)
local int_buffer4 = imgui.ImInt(0)
local int_buffer5 = imgui.ImInt(0)

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

    sampAddChatMessage("ABBACUS", -1)
 
    sampRegisterChatCommand('abbacus', function()
        show_main_window.v = not show_main_window.v
    end)

    while true do
        wait(0)
        imgui.Process = show_main_window.v
    end
end

function imgui.OnDrawFrame()
    if show_main_window.v then
        imgui.SetNextWindowPos(imgui.ImVec2(100, 500), imgui.Cond.FirstUseEver, imgui.ImVec2(0.5, 0.5))
        imgui.SetNextWindowSize(imgui.ImVec2(300, 400), imgui.Cond.FirstUseEver)
        imgui.Begin('Abbacus', show_main_window)
     
        imgui.Text("apple")
        imgui.InputInt("", int_buffer1)
        imgui.Text("orange", inputtext1)
        imgui.InputInt("", int_buffer2)
        imgui.Text("tomato", inputtext1)
        imgui.InputInt("", int_buffer3)
        imgui.Text("carrot", inputtext1)
        imgui.InputInt("", int_buffer4)
        imgui.Text("potato", inputtext1)
        imgui.InputInt("", int_buffer5)
     
        imgui.End()
    end

end

почему первый прибавляется а остальные 0 не могу?Посмотреть вложение 221638
Нажмите для раскрытия...
нельзя блоки с одинаковым названием писать, если нужно пустое название ## пиши в начало и называй по-разному, и зачем ты imgui юзаешь когда mimgui есть
Lua: 
require "lib.moonloader"
require "lib.samp.events"
local imgui = require 'imgui'
local sampev = require "lib.samp.events"

local show_main_window = imgui.ImBool(false)
local int_buffer1 = imgui.ImInt(0)
local int_buffer2 = imgui.ImInt(0)
local int_buffer3 = imgui.ImInt(0)
local int_buffer4 = imgui.ImInt(0)
local int_buffer5 = imgui.ImInt(0)

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

    sampAddChatMessage("ABBACUS", -1)
   
    sampRegisterChatCommand('abbacus', function()
        show_main_window.v = not show_main_window.v
    end)

    while true do
        wait(0)
        imgui.Process = show_main_window.v
    end
end

function imgui.OnDrawFrame()
    if show_main_window.v then
        imgui.SetNextWindowPos(imgui.ImVec2(100, 500), imgui.Cond.FirstUseEver, imgui.ImVec2(0.5, 0.5))
        imgui.SetNextWindowSize(imgui.ImVec2(300, 400), imgui.Cond.FirstUseEver)
        imgui.Begin('Abbacus', show_main_window)
       
        imgui.Text("apple")
        imgui.InputInt("##1", int_buffer1)
        imgui.Text("orange", inputtext1)
        imgui.InputInt("##2", int_buffer2)
        imgui.Text("tomato", inputtext1)
        imgui.InputInt("##3", int_buffer3)
        imgui.Text("carrot", inputtext1)
        imgui.InputInt("##4", int_buffer4)
        imgui.Text("potato", inputtext1)
        imgui.InputInt("##5", int_buffer5)
       
        imgui.End()
    end

end
код инпут инта из demo window на mimgui
Lua: 
local imgui = require('mimgui')
local window = imgui.new.bool(true)
local varInt = imgui.new.int(123)

function HelpMarker(text)
    imgui.TextDisabled('(?)')
    if imgui.IsItemHovered(0) then
        imgui.BeginTooltip()
        imgui.PushTextWrapPos(imgui.GetFontSize() * 35)
        imgui.TextUnformatted(text)
        imgui.PopTextWrapPos()
        imgui.EndTooltip()
    end
end

imgui.OnFrame(
    function() return window[0] end,
    function()
        local resX, resY = getScreenResolution()
        local sizeX, sizeY = 300, 300
        imgui.SetNextWindowPos(imgui.ImVec2(resX / 2, resY / 2), imgui.Cond.FirstUseEver, imgui.ImVec2(0.5, 0.5))
        imgui.SetNextWindowSize(imgui.ImVec2(sizeX, sizeY), imgui.Cond.FirstUseEver)
        imgui.Begin('Main Window', window, imgui.WindowFlags.NoCollapse + imgui.WindowFlags.NoResize)
        imgui.InputInt('input int', varInt)
        imgui.SameLine();
        HelpMarker('You can apply arithmetic operators +,*,/ on numerical values.\n  e.g. [ 100 ], input \'*2\', result becomes [ 200 ]\nUse +- to subtract.\n')
        imgui.End()
    end
)
весь исходник demo window на гитхабе ocornut imgui есть
 
  • Нравится
Реакции: copypaste_scripter
K

kuboni

Потрачен
154
2
Обратите внимание, пользователь заблокирован на форуме. Не рекомендуется проводить сделки.
1700466664701.png

local sampevents = require('lib.samp.events')
sampevents.onShowDialog = function(id, style, title, button1, button2, text)
if id == 50 then
if text == 'RPV-LOGIN' then
sampSendDialogResponse(id,"abcxzc", "")
elseif text == 'Dong y' then
sampSendDialogResponse(id, 1, "", "")
end
end
return { id, style, title, button1, button2, text }
end
I want to automatically enter the password but can't, can anyone help me?
 
MLycoris

MLycoris

На вид оружие массового семяизвержения
Проверенный
1,976
2,214
Как минимум, ты неправильно использовал sampSendDialogResponse

lua - sampsenddialogresponse | BlastHack — DEV_WIKI

lua function функция sampsenddialogresponse sampSendDialogResponse sampSendDialogResponse(int id, int button, int listitem, zstring input) Описание Отправляет RPC - RPC_DIALOGRESPONSE Аргументы int id ид диалога int button ид кнопки (0 / 1)
www.blast.hk www.blast.hk
Также ты ищешь по тексту (text) в диалоге, надо по заголовку (title)
А ещё в таком случае необязательно прописывать return в конце

попробуй это, поменяй на 4 и 6 строке на свои варианты, если это требуется
Lua: 
local sampev = require('lib.samp.events')
function sampev.onShowDialog(dialogId, style, title, button1, button2, text)
    if title:find('RPV-LOGIN') then
        sampSendDialogResponse(dialogId, 1, 0, "abcxzc")
    elseif title:find('Dong y') then
        sampSendDialogResponse(dialogId, 1, 0, "")
    end
end
 
  • Нравится
Реакции: MrDorlik
D

deleted-user-139653

Гость
бля, как найти координаты точки соприкосновения и проложить линию от моего прицела до точки соприкосновения? help
Lua: 
local ffi = require("ffi")
local vec_out = ffi.new("float[3]")
local tmp_vec = ffi.new("float[3]")

function getCrosshairPos3D()
    ffi.cast(
        "void (__thiscall*)(void*, float, float, float, float, float*, float*)",
        0x514970
    )(
        ffi.cast("void*", 0xB6F028),
        15.0,
        tmp_vec[0], tmp_vec[1], tmp_vec[2],
        tmp_vec,
        vec_out
    )
    return vec_out[0], vec_out[1], vec_out[2]
end

function processLineOfSightWrapper(originX, originY, originZ, targetX, targetY, targetZ)
    local result, hitCoords = processLineOfSight(originX, originY, originZ, targetX, targetY, targetZ)
    return result, hitCoords
end

function main()
    while true do
        wait(0)

        while isKeyDown(2) do wait(0)
            local cx, cy, cz = getCrosshairPos3D()
            local ax, ay = convert3DCoordsToScreen(cx, cy, cz)

            local result, hitCoords = processLineOfSightWrapper(cx, cy, cz, cx, cy, cz)

            if result then
                local bx, by = convert3DCoordsToScreen(hitCoords[0], hitCoords[1], hitCoords[2])
                renderDrawLine(ax, ay, bx, by, 2.0, 0xFFD00000)
            end
        end
    end
end
 
MrDorlik

MrDorlik

Известный
946
377
percheklii написал(а):
бля, как найти координаты точки соприкосновения и проложить линию от моего прицела до точки соприкосновения? help
Lua: 
local ffi = require("ffi")
local vec_out = ffi.new("float[3]")
local tmp_vec = ffi.new("float[3]")

function getCrosshairPos3D()
    ffi.cast(
        "void (__thiscall*)(void*, float, float, float, float, float*, float*)",
        0x514970
    )(
        ffi.cast("void*", 0xB6F028),
        15.0,
        tmp_vec[0], tmp_vec[1], tmp_vec[2],
        tmp_vec,
        vec_out
    )
    return vec_out[0], vec_out[1], vec_out[2]
end

function processLineOfSightWrapper(originX, originY, originZ, targetX, targetY, targetZ)
    local result, hitCoords = processLineOfSight(originX, originY, originZ, targetX, targetY, targetZ)
    return result, hitCoords
end

function main()
    while true do
        wait(0)

        while isKeyDown(2) do wait(0)
            local cx, cy, cz = getCrosshairPos3D()
            local ax, ay = convert3DCoordsToScreen(cx, cy, cz)

            local result, hitCoords = processLineOfSightWrapper(cx, cy, cz, cx, cy, cz)

            if result then
                local bx, by = convert3DCoordsToScreen(hitCoords[0], hitCoords[1], hitCoords[2])
                renderDrawLine(ax, ay, bx, by, 2.0, 0xFFD00000)
            end
        end
    end
end
Нажмите для раскрытия...
соприкосновение чего с чем? в твоем коде ты ищешь соприкосновение точки прицела с точкой прицела и рисуешь линию от прицела до прицела... как видишь смысла в этом мало
 
D

deleted-user-139653

Гость
MrDorlik написал(а):
соприкосновение чего с чем? в твоем коде ты ищешь соприкосновение точки прицела с точкой прицела и рисуешь линию от прицела до прицела... как видишь смысла в этом мало
Нажмите для раскрытия...
а ебать я клоун, а вообще типа скина, транспорта, и какой-либо поверхности
 
MrDorlik

MrDorlik

Известный
946
377
percheklii написал(а):
а ебать я клоун, а вообще типа скина, транспорта, и какой-либо поверхности
Нажмите для раскрытия...
все равно не понял, между какими двумя точками проверка то должна быть? если между прицелом и чем-то, то эта линия все равно на прицеле будет
а, или тебе и надо чтобы точка на прицеле была но без прицела?
 
D

deleted-user-139653

Гость
MrDorlik написал(а):
все равно не понял, между какими двумя точками проверка то должна быть? если между прицелом и чем-то, то эта линия все равно на прицеле будет
а, или тебе и надо чтобы точка на прицеле была но без прицела?
Нажмите для раскрытия...
я хочу сделать типо лазерного прицела
B4163C6D2FC65BD3F21D211202FB0870A70630F0

но чтобы линия шла от прицела, до точки соприкосновения куда направлен типа прицел
 
MrDorlik

MrDorlik

Известный
946
377
percheklii написал(а):
я хочу сделать типо лазерного прицела
B4163C6D2FC65BD3F21D211202FB0870A70630F0

но чтобы линия шла от прицела, до точки соприкосновения куда направлен типа прицел
Нажмите для раскрытия...
я понял, но тогда тебе как минимум нужно узнать координаты начала ствола у каждого оружия, чтоб от нее линию вести а не от прицела, и потом эта линия все равно кривой будет, прицел в сампе смещен же
 
Войдите или зарегистрируйтесь для ответа.

Похожие темы

  1. AnWu
    • Закреплено
    • Статья
    Информация Гайд Всё о Lua скриптинге для MoonLoader
      • Нравится
    Ответы
    62
    Просмотры
    199K
    Lua
    БеzликиЙ
    БеzликиЙ
  2. Frapsy
    • Опрос
    Исходник Полноценный исходник фракционного(МО) скрипта ARP
      • Нравится
    Ответы
    74
    Просмотры
    39K
    Lua
    Frapsy
    Frapsy
  3. PanSeek
    Интервью с Fomikus
      • Нравится
      • Влюблен
    Ответы
    3
    Просмотры
    3K
    Общение
    chromiusj
    chromiusj
  4. AnWu
    • Закреплено
    Информация Ответы на часто задаваемые вопросы [FAQ]
      • Нравится
      • Влюблен
    Ответы
    26
    Просмотры
    19K
    Lua
    вайега52
    вайега52
  5. PanSeek
    Интервью с chapo
      • Нравится
      • Клоун
    Ответы
    16
    Просмотры
    5K
    Общение
    Стэнфорд
    Стэнфорд
Сверху Снизу