-- Limpeza de GUIs antigas
local oldGui = game:GetService("CoreGui"):FindFirstChild("VFlyVertical")
if oldGui then oldGui:Destroy() end

local player = game.Players.LocalPlayer
local runService = game:GetService("RunService")
local UIS = game:GetService("UserInputService")

-- 1. Interface no CoreGui (Delta)
local screenGui = Instance.new("ScreenGui")
screenGui.Name = "VFlyVertical"
screenGui.Parent = game:GetService("CoreGui")

local frame = Instance.new("Frame")
frame.Size = UDim2.new(0, 130, 0, 80)
frame.Position = UDim2.new(0.5, -65, 0.1, 0)
frame.BackgroundColor3 = Color3.fromRGB(10, 0, 20)
frame.Active = true
frame.Parent = screenGui

local corner = Instance.new("UICorner")
corner.CornerRadius = UDim.new(0, 12)
corner.Parent = frame

local button = Instance.new("TextButton")
button.Size = UDim2.new(0.9, 0, 0.8, 0)
button.Position = UDim2.new(0.05, 0, 0.1, 0)
button.BackgroundColor3 = Color3.fromRGB(255, 50, 50)
button.Text = "UP: OFF"
button.TextColor3 = Color3.new(1, 1, 1)
button.TextScaled = true
button.Font = Enum.Font.GothamBold
button.Parent = frame

local btnCorner = Instance.new("UICorner")
btnCorner.Parent = button

-- Configurações
local flySpeed = 3550
local active = false

-- 2. Lógica de Voo Vertical (Sobe em linha reta)
runService.RenderStepped:Connect(function()
    if not active then return end
    
    local char = player.Character
    local humanoid = char and char:FindFirstChild("Humanoid")
    local seat = humanoid and humanoid.SeatPart
    
    if seat and seat:IsA("VehicleSeat") then
        -- Força a velocidade EXATAMENTE para cima no eixo Y
        seat.AssemblyLinearVelocity = Vector3.new(0, flySpeed, 0)
        
        -- Trava o bico do carro apontado para o céu (90 graus)
        seat.CFrame = CFrame.lookAt(seat.Position, seat.Position + Vector3.new(0, 1, 0))
        
        -- Zera rotações para não girar feito louco
        seat.AssemblyAngularVelocity = Vector3.new(0, 0, 0)
    end
end)

-- 3. Botão ON/OFF
button.MouseButton1Click:Connect(function()
    active = not active
    button.Text = active and "UP: ON" or "UP: OFF"
    button.BackgroundColor3 = active and Color3.fromRGB(150, 50, 255) or Color3.fromRGB(255, 50, 50)
end)

-- 4. Sistema de Arrastar GUI (Mobile)
local dragging, dragStart, startPos
frame.InputBegan:Connect(function(input)
    if input.UserInputType == Enum.UserInputType.Touch or input.UserInputType == Enum.UserInputType.MouseButton1 then
        dragging = true
        dragStart = input.Position
        startPos = frame.Position
    end
end)
UIS.InputChanged:Connect(function(input)
    if dragging and (input.UserInputType == Enum.UserInputType.Touch or input.UserInputType == Enum.UserInputType.MouseMovement) then
        local delta = input.Position - dragStart
        frame.Position = UDim2.new(startPos.X.Scale, startPos.X.Offset + delta.X, startPos.Y.Scale, startPos.Y.Offset + delta.Y)
    end
end)
UIS.InputEnded:Connect(function(input)
    if input.UserInputType == Enum.UserInputType.Touch or input.UserInputType == Enum.UserInputType.MouseButton1 then
        dragging = false
    end
end)