-- GUI SavePos + Fly Infinite Yield Style (FINAL PASTEBIN)

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

-- GUI
local gui = Instance.new("ScreenGui")
gui.Name = "SavePosFlyGUI"
gui.IgnoreGuiInset = true
gui.ResetOnSpawn = false
gui.ZIndexBehavior = Enum.ZIndexBehavior.Global
gui.Parent = player:WaitForChild("PlayerGui")

-- Main Frame
local main = Instance.new("Frame", gui)
main.Size = UDim2.new(0,320,0,260)
main.Position = UDim2.new(0.5,-160,0.4,0)
main.BackgroundColor3 = Color3.fromRGB(30,30,30)
main.Active = true
main.Draggable = true
main.ZIndex = 10

-- Top bar
local top = Instance.new("Frame", main)
top.Size = UDim2.new(1,0,0,30)
top.BackgroundColor3 = Color3.fromRGB(20,20,20)
top.ZIndex = 11

-- Close
local close = Instance.new("TextButton", top)
close.Size = UDim2.new(0,30,0,30)
close.Position = UDim2.new(1,-30,0,0)
close.Text = "X"
close.ZIndex = 12

-- Minimize
local mini = Instance.new("TextButton", top)
mini.Size = UDim2.new(0,30,0,30)
mini.Position = UDim2.new(1,-60,0,0)
mini.Text = "-"
mini.ZIndex = 12

-- Floating Button
local float = Instance.new("TextButton", gui)
float.Size = UDim2.new(0,50,0,50)
float.Position = UDim2.new(0.1,0,0.5,0)
float.Text = "●"
float.Visible = false
float.Active = true
float.Draggable = true
float.ZIndex = 999

-- Save Positions
local saved = {}

for i = 1,3 do
    local save = Instance.new("TextButton", main)
    save.Size = UDim2.new(0,130,0,30)
    save.Position = UDim2.new(0,10,0,40+(i-1)*45)
    save.Text = "Guardar "..i
    save.ZIndex = 11

    local load = Instance.new("TextButton", main)
    load.Size = UDim2.new(0,130,0,30)
    load.Position = UDim2.new(0,180,0,40+(i-1)*45)
    load.Text = "Ir "..i
    load.ZIndex = 11

    save.MouseButton1Click:Connect(function()
        local hrp = player.Character and player.Character:FindFirstChild("HumanoidRootPart")
        if hrp then saved[i] = hrp.CFrame end
    end)

    load.MouseButton1Click:Connect(function()
        local hrp = player.Character and player.Character:FindFirstChild("HumanoidRootPart")
        if hrp and saved[i] then
            hrp.CFrame = saved[i]
        end
    end)
end

-- Fly Button
local flyBtn = Instance.new("TextButton", main)
flyBtn.Size = UDim2.new(0,300,0,30)
flyBtn.Position = UDim2.new(0,10,1,-40)
flyBtn.Text = "FLY: OFF"
flyBtn.ZIndex = 11

-- Fly Infinite Yield Style
local flying = false
local flyConn

local function startFly()
    local char = player.Character
    local hum = char and char:FindFirstChildOfClass("Humanoid")
    if not hum then return end

    hum:ChangeState(Enum.HumanoidStateType.Swimming)

    flyConn = RunService.Heartbeat:Connect(function()
        if not flying then return end
        hum:ChangeState(Enum.HumanoidStateType.Swimming)
        char:TranslateBy(hum.MoveDirection * 2)
    end)
end

local function stopFly()
    if flyConn then flyConn:Disconnect() end
end

flyBtn.MouseButton1Click:Connect(function()
    flying = not flying
    flyBtn.Text = flying and "FLY: ON" or "FLY: OFF"
    if flying then startFly() else stopFly() end
end)

-- Controls
mini.MouseButton1Click:Connect(function()
    main.Visible = false
    float.Visible = true
end)

float.MouseButton1Click:Connect(function()
    main.Visible = true
    float.Visible = false
end)

close.MouseButton1Click:Connect(function()
    gui:Destroy()
end)