local Players = game:GetService("Players")
local TweenService = game:GetService("TweenService")
local LocalPlayer = Players.LocalPlayer
local PlayerGui = LocalPlayer:WaitForChild("PlayerGui")

if PlayerGui:FindFirstChild("TeleportGUI") then
    PlayerGui.TeleportGUI:Destroy()
end

local ScreenGui = Instance.new("ScreenGui")
ScreenGui.Name = "TeleportGUI"
ScreenGui.ResetOnSpawn = false
ScreenGui.ZIndexBehavior = Enum.ZIndexBehavior.Sibling
ScreenGui.Parent = PlayerGui

local LoadingFrame = Instance.new("Frame")
LoadingFrame.Name = "LoadingFrame"
LoadingFrame.Size = UDim2.new(1, 0, 1, 0)
LoadingFrame.BackgroundColor3 = Color3.fromRGB(10, 10, 10)
LoadingFrame.BorderSizePixel = 0
LoadingFrame.ZIndex = 10
LoadingFrame.Parent = ScreenGui

local CreditText = Instance.new("TextLabel")
CreditText.Name = "CreditText"
CreditText.Size = UDim2.new(1, 0, 0, 40)
CreditText.Position = UDim2.new(0, 0, 0, 20)
CreditText.BackgroundTransparency = 1
CreditText.Text = "made by:@7w7laos (meow)"
CreditText.TextColor3 = Color3.fromRGB(255, 50, 50)
CreditText.TextStrokeColor3 = Color3.fromRGB(0, 0, 0)
CreditText.TextStrokeTransparency = 0.3
CreditText.Font = Enum.Font.GothamBold
CreditText.TextSize = 18
CreditText.ZIndex = 11
CreditText.Parent = LoadingFrame

local BarBackground = Instance.new("Frame")
BarBackground.Name = "BarBackground"
BarBackground.Size = UDim2.new(0.7, 0, 0, 18)
BarBackground.Position = UDim2.new(0.15, 0, 0.88, 0)
BarBackground.BackgroundColor3 = Color3.fromRGB(30, 30, 30)
BarBackground.BorderSizePixel = 0
BarBackground.ZIndex = 11
BarBackground.Parent = LoadingFrame

local BarCorner = Instance.new("UICorner")
BarCorner.CornerRadius = UDim.new(0, 8)
BarCorner.Parent = BarBackground

local ProgressBar = Instance.new("Frame")
ProgressBar.Name = "ProgressBar"
ProgressBar.Size = UDim2.new(0, 0, 1, 0)
ProgressBar.BackgroundColor3 = Color3.fromRGB(255, 0, 0)
ProgressBar.BorderSizePixel = 0
ProgressBar.ZIndex = 12
ProgressBar.Parent = BarBackground

local ProgressCorner = Instance.new("UICorner")
ProgressCorner.CornerRadius = UDim.new(0, 8)
ProgressCorner.Parent = ProgressBar

local RainbowGradient = Instance.new("UIGradient")
RainbowGradient.Color = ColorSequence.new({
    ColorSequenceKeypoint.new(0.00, Color3.fromRGB(255, 0, 0)),
    ColorSequenceKeypoint.new(0.20, Color3.fromRGB(255, 100, 0)),
    ColorSequenceKeypoint.new(0.40, Color3.fromRGB(255, 200, 0)),
    ColorSequenceKeypoint.new(0.60, Color3.fromRGB(0, 150, 255)),
    ColorSequenceKeypoint.new(0.80, Color3.fromRGB(100, 0, 255)),
    ColorSequenceKeypoint.new(1.00, Color3.fromRGB(255, 0, 150))
})
RainbowGradient.Parent = ProgressBar

local LoadingText = Instance.new("TextLabel")
LoadingText.Name = "LoadingText"
LoadingText.Size = UDim2.new(1, 0, 0, 30)
LoadingText.Position = UDim2.new(0, 0, 0.82, 0)
LoadingText.BackgroundTransparency = 1
LoadingText.Text = "Cargando..."
LoadingText.TextColor3 = Color3.fromRGB(255, 80, 80)
LoadingText.Font = Enum.Font.Gotham
LoadingText.TextSize = 16
LoadingText.ZIndex = 11
LoadingText.Parent = LoadingFrame

local loadTime = 2.8
local tweenInfo = TweenInfo.new(loadTime, Enum.EasingStyle.Quad, Enum.EasingDirection.Out)
local progressTween = TweenService:Create(ProgressBar, tweenInfo, {
    Size = UDim2.new(1, 0, 1, 0)
})

task.spawn(function()
    local offset = 0
    while LoadingFrame.Parent do
        offset = (offset + 0.015) % 1
        RainbowGradient.Offset = Vector2.new(offset, 0)
        task.wait(0.03)
    end
end)

progressTween:Play()
progressTween.Completed:Wait()

LoadingFrame:Destroy()

local MainFrame = Instance.new("Frame")
MainFrame.Name = "MainFrame"
MainFrame.Size = UDim2.new(0, 220, 0, 60)
MainFrame.Position = UDim2.new(0.5, -110, 0.15, 0)
MainFrame.BackgroundColor3 = Color3.fromRGB(20, 20, 20)
MainFrame.BorderSizePixel = 0
MainFrame.Parent = ScreenGui

local MainCorner = Instance.new("UICorner")
MainCorner.CornerRadius = UDim.new(0, 10)
MainCorner.Parent = MainFrame

local MainStroke = Instance.new("UIStroke")
MainStroke.Color = Color3.fromRGB(180, 30, 30)
MainStroke.Thickness = 2
MainStroke.Parent = MainFrame

local TeleportButton = Instance.new("TextButton")
TeleportButton.Name = "TeleportButton"
TeleportButton.Size = UDim2.new(1, -20, 1, -16)
TeleportButton.Position = UDim2.new(0, 10, 0, 8)
TeleportButton.BackgroundColor3 = Color3.fromRGB(160, 25, 25)
TeleportButton.Text = "TELEPORT"
TeleportButton.TextColor3 = Color3.fromRGB(255, 255, 255)
TeleportButton.Font = Enum.Font.GothamBold
TeleportButton.TextSize = 18
TeleportButton.BorderSizePixel = 0
TeleportButton.Parent = MainFrame

local ButtonCorner = Instance.new("UICorner")
ButtonCorner.CornerRadius = UDim.new(0, 8)
ButtonCorner.Parent = TeleportButton

local PlayerListFrame = Instance.new("Frame")
PlayerListFrame.Name = "PlayerListFrame"
PlayerListFrame.Size = UDim2.new(0, 240, 0, 280)
PlayerListFrame.Position = UDim2.new(0.5, -120, 0.28, 0)
PlayerListFrame.BackgroundColor3 = Color3.fromRGB(15, 15, 15)
PlayerListFrame.BorderSizePixel = 0
PlayerListFrame.Visible = false
PlayerListFrame.Parent = ScreenGui

local ListCorner = Instance.new("UICorner")
ListCorner.CornerRadius = UDim.new(0, 10)
ListCorner.Parent = PlayerListFrame

local ListStroke = Instance.new("UIStroke")
ListStroke.Color = Color3.fromRGB(180, 30, 30)
ListStroke.Thickness = 2
ListStroke.Parent = PlayerListFrame

local ListTitle = Instance.new("TextLabel")
ListTitle.Size = UDim2.new(1, 0, 0, 35)
ListTitle.BackgroundColor3 = Color3.fromRGB(140, 20, 20)
ListTitle.Text = "Jugadores Online"
ListTitle.TextColor3 = Color3.fromRGB(255, 255, 255)
ListTitle.Font = Enum.Font.GothamBold
ListTitle.TextSize = 16
ListTitle.BorderSizePixel = 0
ListTitle.Parent = PlayerListFrame

local TitleCorner = Instance.new("UICorner")
TitleCorner.CornerRadius = UDim.new(0, 10)
TitleCorner.Parent = ListTitle

local CloseButton = Instance.new("TextButton")
CloseButton.Size = UDim2.new(0, 30, 0, 30)
CloseButton.Position = UDim2.new(1, -35, 0, 2)
CloseButton.BackgroundColor3 = Color3.fromRGB(200, 40, 40)
CloseButton.Text = "X"
CloseButton.TextColor3 = Color3.fromRGB(255, 255, 255)
CloseButton.Font = Enum.Font.GothamBold
CloseButton.TextSize = 16
CloseButton.BorderSizePixel = 0
CloseButton.Parent = ListTitle

local CloseCorner = Instance.new("UICorner")
CloseCorner.CornerRadius = UDim.new(0, 6)
CloseCorner.Parent = CloseButton

local ScrollingFrame = Instance.new("ScrollingFrame")
ScrollingFrame.Size = UDim2.new(1, -10, 1, -45)
ScrollingFrame.Position = UDim2.new(0, 5, 0, 40)
ScrollingFrame.BackgroundTransparency = 1
ScrollingFrame.BorderSizePixel = 0
ScrollingFrame.ScrollBarThickness = 6
ScrollingFrame.ScrollBarImageColor3 = Color3.fromRGB(180, 40, 40)
ScrollingFrame.CanvasSize = UDim2.new(0, 0, 0, 0)
ScrollingFrame.Parent = PlayerListFrame

local UIListLayout = Instance.new("UIListLayout")
UIListLayout.SortOrder = Enum.SortOrder.Name
UIListLayout.Padding = UDim.new(0, 6)
UIListLayout.Parent = ScrollingFrame

local function clearPlayerList()
    for _, child in ipairs(ScrollingFrame:GetChildren()) do
        if child:IsA("TextButton") then
            child:Destroy()
        end
    end
end

local function createPlayerButton(player)
    if player == LocalPlayer then return end

    local btn = Instance.new("TextButton")
    btn.Name = player.Name
    btn.Size = UDim2.new(1, -10, 0, 36)
    btn.BackgroundColor3 = Color3.fromRGB(40, 15, 15)
    btn.Text = player.DisplayName .. " (@" .. player.Name .. ")"
    btn.TextColor3 = Color3.fromRGB(255, 220, 220)
    btn.Font = Enum.Font.Gotham
    btn.TextSize = 14
    btn.BorderSizePixel = 0
    btn.AutoButtonColor = true
    btn.Parent = ScrollingFrame

    local btnCorner = Instance.new("UICorner")
    btnCorner.CornerRadius = UDim.new(0, 6)
    btnCorner.Parent = btn

    btn.MouseButton1Click:Connect(function()
        local character = LocalPlayer.Character
        local targetChar = player.Character

        if character and character:FindFirstChild("HumanoidRootPart") and
           targetChar and targetChar:FindFirstChild("HumanoidRootPart") then
            character.HumanoidRootPart.CFrame = targetChar.HumanoidRootPart.CFrame * CFrame.new(0, 0, 3)
        end
    end)
end

local function refreshPlayerList()
    clearPlayerList()
    for _, player in ipairs(Players:GetPlayers()) do
        createPlayerButton(player)
    end
    ScrollingFrame.CanvasSize = UDim2.new(0, 0, 0, UIListLayout.AbsoluteContentSize.Y + 10)
end

TeleportButton.MouseButton1Click:Connect(function()
    PlayerListFrame.Visible = not PlayerListFrame.Visible
    if PlayerListFrame.Visible then
        refreshPlayerList()
    end
end)

CloseButton.MouseButton1Click:Connect(function()
    PlayerListFrame.Visible = false
end)

Players.PlayerAdded:Connect(function()
    if PlayerListFrame.Visible then
        refreshPlayerList()
    end
end)

Players.PlayerRemoving:Connect(function()
    if PlayerListFrame.Visible then
        refreshPlayerList()
    end
end)

UIListLayout:GetPropertyChangedSignal("AbsoluteContentSize"):Connect(function()
    ScrollingFrame.CanvasSize = UDim2.new(0, 0, 0, UIListLayout.AbsoluteContentSize.Y + 10)
end)