Вопросы по 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
 
Последнее редактирование:
  • Нравится
  • Клоун
  • Эм
Реакции: TheMostMercieful, Jennifer, knowfaq и 39 других
Нажмите для раскрытия...
chapo

chapo

tg/inst: @moujeek
Модератор
9,081
12,086
KashmekUrbekov написал(а):
Оно как-бы работает. но как-бы нет.
Нажмите для раскрытия...
Lua: 
local imgui = require('imgui')
local encoding = require 'encoding'
encoding.default = 'CP1251'
u8 = encoding.UTF8
local ffi = require "ffi"
local getBonePosition = ffi.cast("int (__thiscall*)(void*, float*, int, bool)", 0x5E4280)

local skeletal_wh = imgui.ImBool(false)
local window = imgui.ImBool(false)

local sl_thickness = imgui.ImInt(2)
local sl_dist = imgui.ImInt(25)

function main()
    while not isSampAvailable() do wait(200) end
    sampRegisterChatCommand('bonewh', function() window.v = not window.v end)
    imgui.Process = false
    window.v = true  --show window
    while true do
        wait(0)
        imgui.Process = window.v
        if skeletal_wh.v then bonewh() end
    end
end

function imgui.OnDrawFrame()
    if window.v then
        imgui.SetNextWindowPos(imgui.ImVec2(350.0, 250.0), imgui.Cond.FirstUseEver)
        imgui.SetNextWindowSize(imgui.ImVec2(280.0, 70.0), imgui.Cond.FirstUseEver)
        imgui.Begin('Window Title', window)

        imgui.Checkbox('wh', skeletal_wh)
        imgui.SliderInt(u8'Толщина костей', sl_thickness, 1, 10)
        imgui.SliderInt(u8'Дистанция', sl_dist, 1, 50)

        imgui.End()
    end
end

function join_argb(a, r, g, b)
    local argb = b  -- b
    argb = bit.bor(argb, bit.lshift(g, 8))  -- g
    argb = bit.bor(argb, bit.lshift(r, 16)) -- r
    argb = bit.bor(argb, bit.lshift(a, 24)) -- a
    return argb
  end
 
  function explode_argb(argb)
    local a = bit.band(bit.rshift(argb, 24), 0xFF)
    local r = bit.band(bit.rshift(argb, 16), 0xFF)
    local g = bit.band(bit.rshift(argb, 8), 0xFF)
    local b = bit.band(argb, 0xFF)
    return a, r, g, b
  end

function bonewh()
    lua_thread.create(function()
        for k, i in ipairs(getAllChars()) do
            pedX, pedY, pedZ = getCharCoordinates(i)
            myX, myY, myZ = getCharCoordinates(PLAYER_PED)
            distance = getDistanceBetweenCoords3d(pedX, pedY, pedZ, myX, myY, myZ)
            
            if doesCharExist(i) and isCharOnScreen(i) and i ~= PLAYER_PED and distance <= sl_dist.v then
            _, id = sampGetPlayerIdByCharHandle(i)
            local color = sampGetPlayerColor(id)
            local aa, rr, gg, bb = explode_argb(color)
            local color = join_argb(255, rr, gg, bb)
    
            thickness = sl_thickness.v --толщина
            
            pos1X, pos1Y, pos1Z = getBodyPartCoordinates(6, i)
            pos2X, pos2Y, pos2Z = getBodyPartCoordinates(7, i)
            
            pos1, pos2 = convert3DCoordsToScreen(pos1X, pos1Y, pos1Z)
            pos3, pos4 = convert3DCoordsToScreen(pos2X, pos2Y, pos2Z)
            renderDrawLine(pos1, pos2, pos3, pos4, thickness, color)
    
            pos1X, pos1Y, pos1Z = getBodyPartCoordinates(7, i)
            pos2X, pos2Y, pos2Z = getBodyPartCoordinates(8, i)
            
            pos1, pos2 = convert3DCoordsToScreen(pos1X, pos1Y, pos1Z)
            pos3, pos4 = convert3DCoordsToScreen(pos2X, pos2Y, pos2Z)
            renderDrawLine(pos1, pos2, pos3, pos4, thickness, color)
    
            pos1X, pos1Y, pos1Z = getBodyPartCoordinates(8, i)
            pos2X, pos2Y, pos2Z = getBodyPartCoordinates(6, i)
            
            pos1, pos2 = convert3DCoordsToScreen(pos1X, pos1Y, pos1Z)
            pos3, pos4 = convert3DCoordsToScreen(pos2X, pos2Y, pos2Z)
            renderDrawLine(pos1, pos2, pos3, pos4, thickness, color)
            
            
            
            pos1X, pos1Y, pos1Z = getBodyPartCoordinates(1, i)
            pos2X, pos2Y, pos2Z = getBodyPartCoordinates(4, i)
            
            pos1, pos2 = convert3DCoordsToScreen(pos1X, pos1Y, pos1Z)
            pos3, pos4 = convert3DCoordsToScreen(pos2X, pos2Y, pos2Z)
            renderDrawLine(pos1, pos2, pos3, pos4, thickness, color)
    
            pos1X, pos1Y, pos1Z = getBodyPartCoordinates(4, i)
            pos2X, pos2Y, pos2Z = getBodyPartCoordinates(8, i)
            
            pos1, pos2 = convert3DCoordsToScreen(pos1X, pos1Y, pos1Z)
            pos3, pos4 = convert3DCoordsToScreen(pos2X, pos2Y, pos2Z)
            renderDrawLine(pos1, pos2, pos3, pos4, thickness, color)
            
    
            
            pos1X, pos1Y, pos1Z = getBodyPartCoordinates(21, i)
            pos2X, pos2Y, pos2Z = getBodyPartCoordinates(22, i)
            
            pos1, pos2 = convert3DCoordsToScreen(pos1X, pos1Y, pos1Z)
            pos3, pos4 = convert3DCoordsToScreen(pos2X, pos2Y, pos2Z)
            renderDrawLine(pos1, pos2, pos3, pos4, thickness, color)
    
            pos1X, pos1Y, pos1Z = getBodyPartCoordinates(22, i)
            pos2X, pos2Y, pos2Z = getBodyPartCoordinates(23, i)
            
            pos1, pos2 = convert3DCoordsToScreen(pos1X, pos1Y, pos1Z)
            pos3, pos4 = convert3DCoordsToScreen(pos2X, pos2Y, pos2Z)
            renderDrawLine(pos1, pos2, pos3, pos4, thickness, color)
    
            pos1X, pos1Y, pos1Z = getBodyPartCoordinates(23, i)
            pos2X, pos2Y, pos2Z = getBodyPartCoordinates(24, i)
            
            pos1, pos2 = convert3DCoordsToScreen(pos1X, pos1Y, pos1Z)
            pos3, pos4 = convert3DCoordsToScreen(pos2X, pos2Y, pos2Z)
            renderDrawLine(pos1, pos2, pos3, pos4, thickness, color)
    
            pos1X, pos1Y, pos1Z = getBodyPartCoordinates(24, i)
            pos2X, pos2Y, pos2Z = getBodyPartCoordinates(25, i)
            
            pos1, pos2 = convert3DCoordsToScreen(pos1X, pos1Y, pos1Z)
            pos3, pos4 = convert3DCoordsToScreen(pos2X, pos2Y, pos2Z)
            renderDrawLine(pos1, pos2, pos3, pos4, thickness, color)
            
    
            
            pos1X, pos1Y, pos1Z = getBodyPartCoordinates(31, i)
            pos2X, pos2Y, pos2Z = getBodyPartCoordinates(32, i)
            
            pos1, pos2 = convert3DCoordsToScreen(pos1X, pos1Y, pos1Z)
            pos3, pos4 = convert3DCoordsToScreen(pos2X, pos2Y, pos2Z)
            renderDrawLine(pos1, pos2, pos3, pos4, thickness, color)
    
            pos1X, pos1Y, pos1Z = getBodyPartCoordinates(32, i)
            pos2X, pos2Y, pos2Z = getBodyPartCoordinates(33, i)
            
            pos1, pos2 = convert3DCoordsToScreen(pos1X, pos1Y, pos1Z)
            pos3, pos4 = convert3DCoordsToScreen(pos2X, pos2Y, pos2Z)
            renderDrawLine(pos1, pos2, pos3, pos4, thickness, color)
    
            pos1X, pos1Y, pos1Z = getBodyPartCoordinates(33, i)
            pos2X, pos2Y, pos2Z = getBodyPartCoordinates(34, i)
            
            pos1, pos2 = convert3DCoordsToScreen(pos1X, pos1Y, pos1Z)
            pos3, pos4 = convert3DCoordsToScreen(pos2X, pos2Y, pos2Z)
            renderDrawLine(pos1, pos2, pos3, pos4, thickness, color)
    
            pos1X, pos1Y, pos1Z = getBodyPartCoordinates(34, i)
            pos2X, pos2Y, pos2Z = getBodyPartCoordinates(35, i)
            
            pos1, pos2 = convert3DCoordsToScreen(pos1X, pos1Y, pos1Z)
            pos3, pos4 = convert3DCoordsToScreen(pos2X, pos2Y, pos2Z)
            renderDrawLine(pos1, pos2, pos3, pos4, thickness, color)
            
    
            
            pos1X, pos1Y, pos1Z = getBodyPartCoordinates(1, i)
            pos2X, pos2Y, pos2Z = getBodyPartCoordinates(51, i)
            
            pos1, pos2 = convert3DCoordsToScreen(pos1X, pos1Y, pos1Z)
            pos3, pos4 = convert3DCoordsToScreen(pos2X, pos2Y, pos2Z)
            renderDrawLine(pos1, pos2, pos3, pos4, thickness, color)
            pos1X, pos1Y, pos1Z = getBodyPartCoordinates(51, i)
            pos2X, pos2Y, pos2Z = getBodyPartCoordinates(52, i)
            
            pos1, pos2 = convert3DCoordsToScreen(pos1X, pos1Y, pos1Z)
            pos3, pos4 = convert3DCoordsToScreen(pos2X, pos2Y, pos2Z)
            renderDrawLine(pos1, pos2, pos3, pos4, thickness, color)
    
            pos1X, pos1Y, pos1Z = getBodyPartCoordinates(52, i)
            pos2X, pos2Y, pos2Z = getBodyPartCoordinates(53, i)
            
            pos1, pos2 = convert3DCoordsToScreen(pos1X, pos1Y, pos1Z)
            pos3, pos4 = convert3DCoordsToScreen(pos2X, pos2Y, pos2Z)
            renderDrawLine(pos1, pos2, pos3, pos4, thickness, color)
    
            pos1X, pos1Y, pos1Z = getBodyPartCoordinates(53, i)
            pos2X, pos2Y, pos2Z = getBodyPartCoordinates(54, i)
            
            pos1, pos2 = convert3DCoordsToScreen(pos1X, pos1Y, pos1Z)
            pos3, pos4 = convert3DCoordsToScreen(pos2X, pos2Y, pos2Z)
            renderDrawLine(pos1, pos2, pos3, pos4, thickness, color)
            
    
            
            pos1X, pos1Y, pos1Z = getBodyPartCoordinates(1, i)
            pos2X, pos2Y, pos2Z = getBodyPartCoordinates(41, i)
            
            pos1, pos2 = convert3DCoordsToScreen(pos1X, pos1Y, pos1Z)
            pos3, pos4 = convert3DCoordsToScreen(pos2X, pos2Y, pos2Z)
            renderDrawLine(pos1, pos2, pos3, pos4, thickness, color)
    
            pos1X, pos1Y, pos1Z = getBodyPartCoordinates(41, i)
            pos2X, pos2Y, pos2Z = getBodyPartCoordinates(42, i)
            
            pos1, pos2 = convert3DCoordsToScreen(pos1X, pos1Y, pos1Z)
            pos3, pos4 = convert3DCoordsToScreen(pos2X, pos2Y, pos2Z)
            renderDrawLine(pos1, pos2, pos3, pos4, thickness, color)
    
            pos1X, pos1Y, pos1Z = getBodyPartCoordinates(42, i)
            pos2X, pos2Y, pos2Z = getBodyPartCoordinates(43, i)
            
            pos1, pos2 = convert3DCoordsToScreen(pos1X, pos1Y, pos1Z)
            pos3, pos4 = convert3DCoordsToScreen(pos2X, pos2Y, pos2Z)
            renderDrawLine(pos1, pos2, pos3, pos4, thickness, color)
    
            pos1X, pos1Y, pos1Z = getBodyPartCoordinates(43, i)
            pos2X, pos2Y, pos2Z = getBodyPartCoordinates(44, i)
            
            pos1, pos2 = convert3DCoordsToScreen(pos1X, pos1Y, pos1Z)
            pos3, pos4 = convert3DCoordsToScreen(pos2X, pos2Y, pos2Z)
            renderDrawLine(pos1, pos2, pos3, pos4, thickness, color)

            pos2X, pos2Y, pos2Z = getBodyPartCoordinates(44, i)
            pos3, pos4 = convert3DCoordsToScreen(pos2X, pos2Y, pos2Z)
            renderDrawPolygon(pos3, pos4, thickness, thickness, 100, 0, color)   
            end   
        end
    end)
end

function getBodyPartCoordinates(id, handle)
    if doesCharExist(handle) then
        local pedptr = getCharPointer(handle)
        local vec = ffi.new("float[3]")
        getBonePosition(ffi.cast("void*", pedptr), vec, id, true)
        return vec[0], vec[1], vec[2]
    end
end
 
Corrygаn

Corrygаn

Участник
225
6
Chapо написал(а):
Lua: 
local imgui = require('imgui')
local encoding = require 'encoding'
encoding.default = 'CP1251'
u8 = encoding.UTF8
local ffi = require "ffi"
local getBonePosition = ffi.cast("int (__thiscall*)(void*, float*, int, bool)", 0x5E4280)

local skeletal_wh = imgui.ImBool(false)
local window = imgui.ImBool(false)

local sl_thickness = imgui.ImInt(2)
local sl_dist = imgui.ImInt(25)

function main()
    while not isSampAvailable() do wait(200) end
    sampRegisterChatCommand('bonewh', function() window.v = not window.v end)
    imgui.Process = false
    window.v = true  --show window
    while true do
        wait(0)
        imgui.Process = window.v
        if skeletal_wh.v then bonewh() end
    end
end

function imgui.OnDrawFrame()
    if window.v then
        imgui.SetNextWindowPos(imgui.ImVec2(350.0, 250.0), imgui.Cond.FirstUseEver)
        imgui.SetNextWindowSize(imgui.ImVec2(280.0, 70.0), imgui.Cond.FirstUseEver)
        imgui.Begin('Window Title', window)

        imgui.Checkbox('wh', skeletal_wh)
        imgui.SliderInt(u8'Толщина костей', sl_thickness, 1, 10)
        imgui.SliderInt(u8'Дистанция', sl_dist, 1, 50)

        imgui.End()
    end
end

function join_argb(a, r, g, b)
    local argb = b  -- b
    argb = bit.bor(argb, bit.lshift(g, 8))  -- g
    argb = bit.bor(argb, bit.lshift(r, 16)) -- r
    argb = bit.bor(argb, bit.lshift(a, 24)) -- a
    return argb
  end

  function explode_argb(argb)
    local a = bit.band(bit.rshift(argb, 24), 0xFF)
    local r = bit.band(bit.rshift(argb, 16), 0xFF)
    local g = bit.band(bit.rshift(argb, 8), 0xFF)
    local b = bit.band(argb, 0xFF)
    return a, r, g, b
  end

function bonewh()
    lua_thread.create(function()
        for k, i in ipairs(getAllChars()) do
            pedX, pedY, pedZ = getCharCoordinates(i)
            myX, myY, myZ = getCharCoordinates(PLAYER_PED)
            distance = getDistanceBetweenCoords3d(pedX, pedY, pedZ, myX, myY, myZ)
           
            if doesCharExist(i) and isCharOnScreen(i) and i ~= PLAYER_PED and distance <= sl_dist.v then
            _, id = sampGetPlayerIdByCharHandle(i)
            local color = sampGetPlayerColor(id)
            local aa, rr, gg, bb = explode_argb(color)
            local color = join_argb(255, rr, gg, bb)
   
            thickness = sl_thickness.v --толщина
           
            pos1X, pos1Y, pos1Z = getBodyPartCoordinates(6, i)
            pos2X, pos2Y, pos2Z = getBodyPartCoordinates(7, i)
           
            pos1, pos2 = convert3DCoordsToScreen(pos1X, pos1Y, pos1Z)
            pos3, pos4 = convert3DCoordsToScreen(pos2X, pos2Y, pos2Z)
            renderDrawLine(pos1, pos2, pos3, pos4, thickness, color)
   
            pos1X, pos1Y, pos1Z = getBodyPartCoordinates(7, i)
            pos2X, pos2Y, pos2Z = getBodyPartCoordinates(8, i)
           
            pos1, pos2 = convert3DCoordsToScreen(pos1X, pos1Y, pos1Z)
            pos3, pos4 = convert3DCoordsToScreen(pos2X, pos2Y, pos2Z)
            renderDrawLine(pos1, pos2, pos3, pos4, thickness, color)
   
            pos1X, pos1Y, pos1Z = getBodyPartCoordinates(8, i)
            pos2X, pos2Y, pos2Z = getBodyPartCoordinates(6, i)
           
            pos1, pos2 = convert3DCoordsToScreen(pos1X, pos1Y, pos1Z)
            pos3, pos4 = convert3DCoordsToScreen(pos2X, pos2Y, pos2Z)
            renderDrawLine(pos1, pos2, pos3, pos4, thickness, color)
           
           
           
            pos1X, pos1Y, pos1Z = getBodyPartCoordinates(1, i)
            pos2X, pos2Y, pos2Z = getBodyPartCoordinates(4, i)
           
            pos1, pos2 = convert3DCoordsToScreen(pos1X, pos1Y, pos1Z)
            pos3, pos4 = convert3DCoordsToScreen(pos2X, pos2Y, pos2Z)
            renderDrawLine(pos1, pos2, pos3, pos4, thickness, color)
   
            pos1X, pos1Y, pos1Z = getBodyPartCoordinates(4, i)
            pos2X, pos2Y, pos2Z = getBodyPartCoordinates(8, i)
           
            pos1, pos2 = convert3DCoordsToScreen(pos1X, pos1Y, pos1Z)
            pos3, pos4 = convert3DCoordsToScreen(pos2X, pos2Y, pos2Z)
            renderDrawLine(pos1, pos2, pos3, pos4, thickness, color)
           
   
           
            pos1X, pos1Y, pos1Z = getBodyPartCoordinates(21, i)
            pos2X, pos2Y, pos2Z = getBodyPartCoordinates(22, i)
           
            pos1, pos2 = convert3DCoordsToScreen(pos1X, pos1Y, pos1Z)
            pos3, pos4 = convert3DCoordsToScreen(pos2X, pos2Y, pos2Z)
            renderDrawLine(pos1, pos2, pos3, pos4, thickness, color)
   
            pos1X, pos1Y, pos1Z = getBodyPartCoordinates(22, i)
            pos2X, pos2Y, pos2Z = getBodyPartCoordinates(23, i)
           
            pos1, pos2 = convert3DCoordsToScreen(pos1X, pos1Y, pos1Z)
            pos3, pos4 = convert3DCoordsToScreen(pos2X, pos2Y, pos2Z)
            renderDrawLine(pos1, pos2, pos3, pos4, thickness, color)
   
            pos1X, pos1Y, pos1Z = getBodyPartCoordinates(23, i)
            pos2X, pos2Y, pos2Z = getBodyPartCoordinates(24, i)
           
            pos1, pos2 = convert3DCoordsToScreen(pos1X, pos1Y, pos1Z)
            pos3, pos4 = convert3DCoordsToScreen(pos2X, pos2Y, pos2Z)
            renderDrawLine(pos1, pos2, pos3, pos4, thickness, color)
   
            pos1X, pos1Y, pos1Z = getBodyPartCoordinates(24, i)
            pos2X, pos2Y, pos2Z = getBodyPartCoordinates(25, i)
           
            pos1, pos2 = convert3DCoordsToScreen(pos1X, pos1Y, pos1Z)
            pos3, pos4 = convert3DCoordsToScreen(pos2X, pos2Y, pos2Z)
            renderDrawLine(pos1, pos2, pos3, pos4, thickness, color)
           
   
           
            pos1X, pos1Y, pos1Z = getBodyPartCoordinates(31, i)
            pos2X, pos2Y, pos2Z = getBodyPartCoordinates(32, i)
           
            pos1, pos2 = convert3DCoordsToScreen(pos1X, pos1Y, pos1Z)
            pos3, pos4 = convert3DCoordsToScreen(pos2X, pos2Y, pos2Z)
            renderDrawLine(pos1, pos2, pos3, pos4, thickness, color)
   
            pos1X, pos1Y, pos1Z = getBodyPartCoordinates(32, i)
            pos2X, pos2Y, pos2Z = getBodyPartCoordinates(33, i)
           
            pos1, pos2 = convert3DCoordsToScreen(pos1X, pos1Y, pos1Z)
            pos3, pos4 = convert3DCoordsToScreen(pos2X, pos2Y, pos2Z)
            renderDrawLine(pos1, pos2, pos3, pos4, thickness, color)
   
            pos1X, pos1Y, pos1Z = getBodyPartCoordinates(33, i)
            pos2X, pos2Y, pos2Z = getBodyPartCoordinates(34, i)
           
            pos1, pos2 = convert3DCoordsToScreen(pos1X, pos1Y, pos1Z)
            pos3, pos4 = convert3DCoordsToScreen(pos2X, pos2Y, pos2Z)
            renderDrawLine(pos1, pos2, pos3, pos4, thickness, color)
   
            pos1X, pos1Y, pos1Z = getBodyPartCoordinates(34, i)
            pos2X, pos2Y, pos2Z = getBodyPartCoordinates(35, i)
           
            pos1, pos2 = convert3DCoordsToScreen(pos1X, pos1Y, pos1Z)
            pos3, pos4 = convert3DCoordsToScreen(pos2X, pos2Y, pos2Z)
            renderDrawLine(pos1, pos2, pos3, pos4, thickness, color)
           
   
           
            pos1X, pos1Y, pos1Z = getBodyPartCoordinates(1, i)
            pos2X, pos2Y, pos2Z = getBodyPartCoordinates(51, i)
           
            pos1, pos2 = convert3DCoordsToScreen(pos1X, pos1Y, pos1Z)
            pos3, pos4 = convert3DCoordsToScreen(pos2X, pos2Y, pos2Z)
            renderDrawLine(pos1, pos2, pos3, pos4, thickness, color)
            pos1X, pos1Y, pos1Z = getBodyPartCoordinates(51, i)
            pos2X, pos2Y, pos2Z = getBodyPartCoordinates(52, i)
           
            pos1, pos2 = convert3DCoordsToScreen(pos1X, pos1Y, pos1Z)
            pos3, pos4 = convert3DCoordsToScreen(pos2X, pos2Y, pos2Z)
            renderDrawLine(pos1, pos2, pos3, pos4, thickness, color)
   
            pos1X, pos1Y, pos1Z = getBodyPartCoordinates(52, i)
            pos2X, pos2Y, pos2Z = getBodyPartCoordinates(53, i)
           
            pos1, pos2 = convert3DCoordsToScreen(pos1X, pos1Y, pos1Z)
            pos3, pos4 = convert3DCoordsToScreen(pos2X, pos2Y, pos2Z)
            renderDrawLine(pos1, pos2, pos3, pos4, thickness, color)
   
            pos1X, pos1Y, pos1Z = getBodyPartCoordinates(53, i)
            pos2X, pos2Y, pos2Z = getBodyPartCoordinates(54, i)
           
            pos1, pos2 = convert3DCoordsToScreen(pos1X, pos1Y, pos1Z)
            pos3, pos4 = convert3DCoordsToScreen(pos2X, pos2Y, pos2Z)
            renderDrawLine(pos1, pos2, pos3, pos4, thickness, color)
           
   
           
            pos1X, pos1Y, pos1Z = getBodyPartCoordinates(1, i)
            pos2X, pos2Y, pos2Z = getBodyPartCoordinates(41, i)
           
            pos1, pos2 = convert3DCoordsToScreen(pos1X, pos1Y, pos1Z)
            pos3, pos4 = convert3DCoordsToScreen(pos2X, pos2Y, pos2Z)
            renderDrawLine(pos1, pos2, pos3, pos4, thickness, color)
   
            pos1X, pos1Y, pos1Z = getBodyPartCoordinates(41, i)
            pos2X, pos2Y, pos2Z = getBodyPartCoordinates(42, i)
           
            pos1, pos2 = convert3DCoordsToScreen(pos1X, pos1Y, pos1Z)
            pos3, pos4 = convert3DCoordsToScreen(pos2X, pos2Y, pos2Z)
            renderDrawLine(pos1, pos2, pos3, pos4, thickness, color)
   
            pos1X, pos1Y, pos1Z = getBodyPartCoordinates(42, i)
            pos2X, pos2Y, pos2Z = getBodyPartCoordinates(43, i)
           
            pos1, pos2 = convert3DCoordsToScreen(pos1X, pos1Y, pos1Z)
            pos3, pos4 = convert3DCoordsToScreen(pos2X, pos2Y, pos2Z)
            renderDrawLine(pos1, pos2, pos3, pos4, thickness, color)
   
            pos1X, pos1Y, pos1Z = getBodyPartCoordinates(43, i)
            pos2X, pos2Y, pos2Z = getBodyPartCoordinates(44, i)
           
            pos1, pos2 = convert3DCoordsToScreen(pos1X, pos1Y, pos1Z)
            pos3, pos4 = convert3DCoordsToScreen(pos2X, pos2Y, pos2Z)
            renderDrawLine(pos1, pos2, pos3, pos4, thickness, color)

            pos2X, pos2Y, pos2Z = getBodyPartCoordinates(44, i)
            pos3, pos4 = convert3DCoordsToScreen(pos2X, pos2Y, pos2Z)
            renderDrawPolygon(pos3, pos4, thickness, thickness, 100, 0, color)  
            end  
        end
    end)
end

function getBodyPartCoordinates(id, handle)
    if doesCharExist(handle) then
        local pedptr = getCharPointer(handle)
        local vec = ffi.new("float[3]")
        getBonePosition(ffi.cast("void*", pedptr), vec, id, true)
        return vec[0], vec[1], vec[2]
    end
end
Нажмите для раскрытия...
Хотя есть небольшая проблемка, в коде, который ты мне скинул нигде кроме переменной и SliderInt не фигурирует дальность прорисовки костей.
 
chapo

chapo

tg/inst: @moujeek
Модератор
9,081
12,086
KashmekUrbekov написал(а):
Хотя есть небольшая проблемка, в коде, который ты мне скинул нигде кроме переменной и SliderInt не фигурирует дальность прорисовки костей.
Нажмите для раскрытия...
1619450087188.png
 
morti.

morti.

Участник
63
3
Pelmeska написал(а):
пробел после /autofind нужно поставить чтоб твой аргумент прописывался нормально, без пробела он слитно команду и аргумент пишет
Lua: 
 function cmd_afind(arg)
         if #arg == 0 then
             sampAddChatMessage(red .. '[mini commands] ' .. yellow .. 'Введите ' .. white .. '/afind ' .. green .. '[ID]', blue1)
         else
             sampSendChat('/autofind ' .. arg)
         end
     end
Нажмите для раскрытия...
я пробел пробоваЛ ставить, без толку, не помогло
 
TaoTan

TaoTan

Участник
62
3
Lua: 
local ev = require('lib.samp.events')
local state = false
local tpCount, timer = 0, 0
local server = -1
local join = 0
local x, y, z = 0, 0, 0

local vector = require 'vector3d'
local tp, sync = false, false

--local tpCount, timer = 0, 0

local coord = 40
function main()
    while not isSampAvailable() do wait(0) end
    sampRegisterChatCommand('ftp', function()
        lua_thread.create(function()
            if tp then return sampAddChatMessage('��� ���������������', -1) end
            blip, blipX, blipY, blipZ = getTargetBlipCoordinatesFixed()
            if blip then
                if isCharInAnyCar(playerPed) then
                    car = getCarCharIsUsing(playerPed)
                    sync = true
                    charPosX, charPosY, charPosZ = getCarCoordinates(car)
                    local distan = getDistanceBetweenCoords3d(blipX, blipY, charPosZ, charPosX, charPosY, charPosZ)
                    --if distan < 1 then return setCarCoordinates(car, blipX, blipY, blipZ) end
                    tp = true
                end
            end
        end)
    end)
        sampRegisterChatCommand('ftpc', teleport)
    lua_thread.create(function()
        if tp then return sampAddChatMessage('УДАЧИ ЧО', -1) end

            blip, blipX, blipY, blipZ = SearchMarker()
            if blip then
                sync = true
                charPosX, charPosY, charPosZ = getCarCoordinates(car)
                local distan = getDistanceBetweenCoords3d(blipX, blipY, charPosZ, charPosX, charPosY, charPosZ)
                --if distan < 1 then return setCarCoordinates(car, blipX, blipY, blipZ) end
                tp = true
            end
        end)
    end)
        while true do wait(0)
        if isCharInAnyCar(playerPed) then
                car = getCarCharIsUsing(playerPed)
                --possx, possy, possz = getCarCoordinates(car)
        end
            if tp then
                if getDistanceBetweenCoords3d(blipX, blipY, blipZ, charPosX, charPosY, charPosZ) > 90000 then
                    vectorX = blipX - charPosX
                    vectorY = blipY - charPosY
                    vectorZ = blipZ - charPosZ
                    local vec = vector(vectorX, vectorY, vectorZ)
                    vec:normalize()
                    charPosX = charPosX + vec.x * 25
                    charPosY = charPosY + vec.y * 25
                    charPosZ = charPosZ + vec.z * 25

                --     sendOnfootSync(charPosX, charPosY, charPosZ)
                    --sendSpectatorSync(charPosX, charPosY, charPosZ)
                    if tpCount == 20 then
                --      sendOnfootSync(charPosX, charPosY, charPosZ)
                     -- sendSpectatorSync(charPosX, charPosY, charPosZ)
                    end
                else
                              --sendOnfootSync(charPosX, charPosY, charPosZ)
                            --sendSpectatorSync(charPosX, charPosY, charPosZ)
                    setCarCoordinates(car, blipX, blipY, blipZ)
                    sendOnfootSyncc(charPosX, charPosY, charPosZ, car)
                    sampAddChatMessage('WAIT', -1)
                    for i = 1, 30 do
                        sampForceUnoccupiedSyncSeatId(param, 1)
                       wait(100)
                    end
                    warpCharIntoCar(PLAYER_PED, car)
                    sampAddChatMessage('SUCCESS', -1)
                    printStringNow('~g~teleported successfully.', 4000)
                  tp = false
                end
            end
        end
    wait(-1)
end

function sendSpectatorSync(x, y, z)
    local data = samp_create_sync_data('spectator')
    data.position = {x, y, z}
    data.send()
end


function sendOnfootSyncc(x, y, z, veh)
    local _, myId = sampGetPlayerIdByCharHandle(PLAYER_PED)
    local data = allocateMemory(68)
    sampStorePlayerOnfootData(myId, data)
    setStructElement(data, 37, 1, 3, false)
    setStructFloatElement(data, 6, x, false)
    setStructFloatElement(data, 10, y, false)
    setStructFloatElement(data, 14, z, false)
    setStructElement(data, 62, 2, veh, false)
    sampSendOnfootData(data)
    freeMemory(data)
end

function getTargetBlipCoordinatesFixed()
    local bool, x, y, z = getTargetBlipCoordinates(); if not bool then return false end
    requestCollision(x, y); loadScene(x, y, z)
    local bool, x, y, z = getTargetBlipCoordinates()
    return bool, x, y, z
end

function SearchMarker(posX, posY, posZ)
    local ret_posX = 0.0
    local ret_posY = 0.0
    local ret_posZ = 0.0
    local isFind = false
    for id = 0, 31 do
        local MarkerStruct = 0
        MarkerStruct = 0xC7F168 + id * 56
        local MarkerPosX = representIntAsFloat(readMemory(MarkerStruct + 0, 4, false))
        local MarkerPosY = representIntAsFloat(readMemory(MarkerStruct + 4, 4, false))
        local MarkerPosZ = representIntAsFloat(readMemory(MarkerStruct + 8, 4, false))
        if MarkerPosX ~= 0.0 or MarkerPosY ~= 0.0 or MarkerPosZ ~= 0.0 then
            ret_posX = MarkerPosX
            ret_posY = MarkerPosY
            ret_posZ = MarkerPosZ
            isFind = true
        end
    end
    return isFind, ret_posX, ret_posY, ret_posZ
end

function samp_create_sync_data(sync_type, copy_from_player)
    local ffi = require 'ffi'
    local sampfuncs = require 'sampfuncs'
    -- from SAMP.Lua
    local raknet = require 'samp.raknet'
    --require 'samp.synchronization'

    copy_from_player = copy_from_player or true
    local sync_traits = {
        player = {'PlayerSyncData', raknet.PACKET.PLAYER_SYNC, sampStorePlayerOnfootData},
        vehicle = {'VehicleSyncData', raknet.PACKET.VEHICLE_SYNC, sampStorePlayerIncarData},
        passenger = {'PassengerSyncData', raknet.PACKET.PASSENGER_SYNC, sampStorePlayerPassengerData},
        aim = {'AimSyncData', raknet.PACKET.AIM_SYNC, sampStorePlayerAimData},
        trailer = {'TrailerSyncData', raknet.PACKET.TRAILER_SYNC, sampStorePlayerTrailerData},
        unoccupied = {'UnoccupiedSyncData', raknet.PACKET.UNOCCUPIED_SYNC, nil},
        bullet = {'BulletSyncData', raknet.PACKET.BULLET_SYNC, nil},
        spectator = {'SpectatorSyncData', raknet.PACKET.SPECTATOR_SYNC, nil}
    }
    local sync_info = sync_traits[sync_type]
    local data_type = 'struct ' .. sync_info[1]
    local data = ffi.new(data_type, {})
    local raw_data_ptr = tonumber(ffi.cast('uintptr_t', ffi.new(data_type .. '*', data)))
    -- copy player's sync data to the allocated memory
    if copy_from_player then
        local copy_func = sync_info[3]
        if copy_func then
            local _, player_id
            if copy_from_player == true then
                _, player_id = sampGetPlayerIdByCharHandle(PLAYER_PED)
            else
                player_id = tonumber(copy_from_player)
            end
            copy_func(player_id, raw_data_ptr)
        end
    end
    -- function to send packet
    local func_send = function()
        local bs = raknetNewBitStream()
        raknetBitStreamWriteInt8(bs, sync_info[2])
        raknetBitStreamWriteBuffer(bs, raw_data_ptr, ffi.sizeof(data))
        raknetSendBitStreamEx(bs, sampfuncs.HIGH_PRIORITY, sampfuncs.UNRELIABLE_SEQUENCED, 1)
        raknetDeleteBitStream(bs)
    end
    -- metatable to access sync data and 'send' function
    local mt = {
        __index = function(t, index)
            return data[index]
        end,
        __newindex = function(t, index, value)
            data[index] = value
        end
    }
    return setmetatable({send = func_send}, mt)
end

[18:13:46.267848] (error) 123 (1).lua: D:\123\GTA BOUNTY LOW PC (mb)\moonloader\123 (1).lua:45: unexpected symbol near ')'
[18:13:46.267848] (error) 123 (1).lua: Script died due to an error. (01ABB104)

Вот эта ошибка поивляется... хелпаните
 
Adrian G.

Adrian G.

Известный
Проверенный
519
459
GooD4nti написал(а):
Lua: 
local ev = require('lib.samp.events')
local state = false
local tpCount, timer = 0, 0
local server = -1
local join = 0
local x, y, z = 0, 0, 0

local vector = require 'vector3d'
local tp, sync = false, false

--local tpCount, timer = 0, 0

local coord = 40
function main()
    while not isSampAvailable() do wait(0) end
    sampRegisterChatCommand('ftp', function()
        lua_thread.create(function()
            if tp then return sampAddChatMessage('��� ���������������', -1) end
            blip, blipX, blipY, blipZ = getTargetBlipCoordinatesFixed()
            if blip then
                if isCharInAnyCar(playerPed) then
                    car = getCarCharIsUsing(playerPed)
                    sync = true
                    charPosX, charPosY, charPosZ = getCarCoordinates(car)
                    local distan = getDistanceBetweenCoords3d(blipX, blipY, charPosZ, charPosX, charPosY, charPosZ)
                    --if distan < 1 then return setCarCoordinates(car, blipX, blipY, blipZ) end
                    tp = true
                end
            end
        end)
    end)
        sampRegisterChatCommand('ftpc', teleport)
    lua_thread.create(function()
        if tp then return sampAddChatMessage('УДАЧИ ЧО', -1) end

            blip, blipX, blipY, blipZ = SearchMarker()
            if blip then
                sync = true
                charPosX, charPosY, charPosZ = getCarCoordinates(car)
                local distan = getDistanceBetweenCoords3d(blipX, blipY, charPosZ, charPosX, charPosY, charPosZ)
                --if distan < 1 then return setCarCoordinates(car, blipX, blipY, blipZ) end
                tp = true
            end
        end)
    end)
        while true do wait(0)
        if isCharInAnyCar(playerPed) then
                car = getCarCharIsUsing(playerPed)
                --possx, possy, possz = getCarCoordinates(car)
        end
            if tp then
                if getDistanceBetweenCoords3d(blipX, blipY, blipZ, charPosX, charPosY, charPosZ) > 90000 then
                    vectorX = blipX - charPosX
                    vectorY = blipY - charPosY
                    vectorZ = blipZ - charPosZ
                    local vec = vector(vectorX, vectorY, vectorZ)
                    vec:normalize()
                    charPosX = charPosX + vec.x * 25
                    charPosY = charPosY + vec.y * 25
                    charPosZ = charPosZ + vec.z * 25

                --     sendOnfootSync(charPosX, charPosY, charPosZ)
                    --sendSpectatorSync(charPosX, charPosY, charPosZ)
                    if tpCount == 20 then
                --      sendOnfootSync(charPosX, charPosY, charPosZ)
                     -- sendSpectatorSync(charPosX, charPosY, charPosZ)
                    end
                else
                              --sendOnfootSync(charPosX, charPosY, charPosZ)
                            --sendSpectatorSync(charPosX, charPosY, charPosZ)
                    setCarCoordinates(car, blipX, blipY, blipZ)
                    sendOnfootSyncc(charPosX, charPosY, charPosZ, car)
                    sampAddChatMessage('WAIT', -1)
                    for i = 1, 30 do
                        sampForceUnoccupiedSyncSeatId(param, 1)
                       wait(100)
                    end
                    warpCharIntoCar(PLAYER_PED, car)
                    sampAddChatMessage('SUCCESS', -1)
                    printStringNow('~g~teleported successfully.', 4000)
                  tp = false
                end
            end
        end
    wait(-1)
end

function sendSpectatorSync(x, y, z)
    local data = samp_create_sync_data('spectator')
    data.position = {x, y, z}
    data.send()
end


function sendOnfootSyncc(x, y, z, veh)
    local _, myId = sampGetPlayerIdByCharHandle(PLAYER_PED)
    local data = allocateMemory(68)
    sampStorePlayerOnfootData(myId, data)
    setStructElement(data, 37, 1, 3, false)
    setStructFloatElement(data, 6, x, false)
    setStructFloatElement(data, 10, y, false)
    setStructFloatElement(data, 14, z, false)
    setStructElement(data, 62, 2, veh, false)
    sampSendOnfootData(data)
    freeMemory(data)
end

function getTargetBlipCoordinatesFixed()
    local bool, x, y, z = getTargetBlipCoordinates(); if not bool then return false end
    requestCollision(x, y); loadScene(x, y, z)
    local bool, x, y, z = getTargetBlipCoordinates()
    return bool, x, y, z
end

function SearchMarker(posX, posY, posZ)
    local ret_posX = 0.0
    local ret_posY = 0.0
    local ret_posZ = 0.0
    local isFind = false
    for id = 0, 31 do
        local MarkerStruct = 0
        MarkerStruct = 0xC7F168 + id * 56
        local MarkerPosX = representIntAsFloat(readMemory(MarkerStruct + 0, 4, false))
        local MarkerPosY = representIntAsFloat(readMemory(MarkerStruct + 4, 4, false))
        local MarkerPosZ = representIntAsFloat(readMemory(MarkerStruct + 8, 4, false))
        if MarkerPosX ~= 0.0 or MarkerPosY ~= 0.0 or MarkerPosZ ~= 0.0 then
            ret_posX = MarkerPosX
            ret_posY = MarkerPosY
            ret_posZ = MarkerPosZ
            isFind = true
        end
    end
    return isFind, ret_posX, ret_posY, ret_posZ
end

function samp_create_sync_data(sync_type, copy_from_player)
    local ffi = require 'ffi'
    local sampfuncs = require 'sampfuncs'
    -- from SAMP.Lua
    local raknet = require 'samp.raknet'
    --require 'samp.synchronization'

    copy_from_player = copy_from_player or true
    local sync_traits = {
        player = {'PlayerSyncData', raknet.PACKET.PLAYER_SYNC, sampStorePlayerOnfootData},
        vehicle = {'VehicleSyncData', raknet.PACKET.VEHICLE_SYNC, sampStorePlayerIncarData},
        passenger = {'PassengerSyncData', raknet.PACKET.PASSENGER_SYNC, sampStorePlayerPassengerData},
        aim = {'AimSyncData', raknet.PACKET.AIM_SYNC, sampStorePlayerAimData},
        trailer = {'TrailerSyncData', raknet.PACKET.TRAILER_SYNC, sampStorePlayerTrailerData},
        unoccupied = {'UnoccupiedSyncData', raknet.PACKET.UNOCCUPIED_SYNC, nil},
        bullet = {'BulletSyncData', raknet.PACKET.BULLET_SYNC, nil},
        spectator = {'SpectatorSyncData', raknet.PACKET.SPECTATOR_SYNC, nil}
    }
    local sync_info = sync_traits[sync_type]
    local data_type = 'struct ' .. sync_info[1]
    local data = ffi.new(data_type, {})
    local raw_data_ptr = tonumber(ffi.cast('uintptr_t', ffi.new(data_type .. '*', data)))
    -- copy player's sync data to the allocated memory
    if copy_from_player then
        local copy_func = sync_info[3]
        if copy_func then
            local _, player_id
            if copy_from_player == true then
                _, player_id = sampGetPlayerIdByCharHandle(PLAYER_PED)
            else
                player_id = tonumber(copy_from_player)
            end
            copy_func(player_id, raw_data_ptr)
        end
    end
    -- function to send packet
    local func_send = function()
        local bs = raknetNewBitStream()
        raknetBitStreamWriteInt8(bs, sync_info[2])
        raknetBitStreamWriteBuffer(bs, raw_data_ptr, ffi.sizeof(data))
        raknetSendBitStreamEx(bs, sampfuncs.HIGH_PRIORITY, sampfuncs.UNRELIABLE_SEQUENCED, 1)
        raknetDeleteBitStream(bs)
    end
    -- metatable to access sync data and 'send' function
    local mt = {
        __index = function(t, index)
            return data[index]
        end,
        __newindex = function(t, index, value)
            data[index] = value
        end
    }
    return setmetatable({send = func_send}, mt)
end

[18:13:46.267848] (error) 123 (1).lua: D:\123\GTA BOUNTY LOW PC (mb)\moonloader\123 (1).lua:45: unexpected symbol near ')'
[18:13:46.267848] (error) 123 (1).lua: Script died due to an error. (01ABB104)

Вот эта ошибка поивляется... хелпаните
Нажмите для раскрытия...
На 45 строке лишний энд со скобкой, не?
 
S

saspepir

Участник
64
2
когда я пытаюсь поток завершить thread:terminate() то у меня варнинги вылазят в чате а потом игра крашит, что не так?
получаю статус и крашит: 
if thread.dead == false then
    thread:terminate()
end
 
Войдите или зарегистрируйтесь для ответа.

Похожие темы

  1. AnWu
    • Закреплено
    • Статья
    Информация Гайд Всё о Lua скриптинге для MoonLoader
      • Нравится
    Ответы
    51
    Просмотры
    180K
    Lua
    Davidasme
    Davidasme
  2. Frapsy
    • Опрос
    Исходник Полноценный исходник фракционного(МО) скрипта ARP
      • Нравится
    Ответы
    74
    Просмотры
    33K
    Lua
    Frapsy
    Frapsy
  3. PanSeek
    Интервью с Fomikus
      • Нравится
      • Влюблен
    Ответы
    3
    Просмотры
    2K
    Общение
    chromiusj
    C
  4. AnWu
    • Закреплено
    Информация Ответы на часто задаваемые вопросы [FAQ]
      • Нравится
      • Влюблен
    Ответы
    24
    Просмотры
    14K
    Lua
    Kusnrchik
    Kusnrchik
  5. PanSeek
    Интервью с chapo
      • Нравится
      • Клоун
    Ответы
    16
    Просмотры
    4K
    Общение
    Стэнфорд
    Стэнфорд
Сверху Снизу