Past

loadstring([[
local Players = game:GetService("Players")
local RunService = game:GetService("RunService")
local SoundService = game:GetService("SoundService")
local LocalPlayer = Players.LocalPlayer

local gui = Instance.new("ScreenGui", LocalPlayer:WaitForChild("PlayerGui"))
gui.Name = "AdminBypassGUI"
gui.ResetOnSpawn = false

-- Bypass animation
local function playBypass()
    local frame = Instance.new("Frame", gui)
    frame.Size = UDim2.new(1,0,1,0)
    frame.BackgroundColor3 = Color3.new(0,0,0)
    frame.ZIndex = 10

    local label = Instance.new("TextLabel", frame)
    label.Size = UDim2.new(0.5,0,0.1,0)
    label.Position = UDim2.new(0.25,0,0.4,0)
    label.BackgroundTransparency = 1
    label.TextColor3 = Color3.new(1,1,1)
    label.Font = Enum.Font.GothamBold
    label.TextScaled = true
    label.Text = "Bypassing Gamepass... (0%)"

    local barBG = Instance.new("Frame", frame)
    barBG.Size = UDim2.new(0.5,0,0.04,0)
    barBG.Position = UDim2.new(0.25,0,0.5,0)
    barBG.BackgroundColor3 = Color3.fromRGB(60,60,60)

    local bar = Instance.new("Frame", barBG)
    bar.Size = UDim2.new(0,0,1,0)
    bar.BackgroundColor3 = Color3.fromRGB(0,170,255)

    for i = 1, 100 do
        label.Text = "Bypassing Gamepass... ("..i.."%)"
        bar.Size = UDim2.new(i/100,0,1,0)
        wait(0.02)
    end

    wait(0.3)
    frame:Destroy()
end

-- Sounds
local clickSound = Instance.new("Sound", SoundService)
clickSound.SoundId = "rbxassetid://12222216"
local doneSound = Instance.new("Sound", SoundService)
doneSound.SoundId = "rbxassetid://12223045"

-- GUI
local Main = Instance.new("Frame", gui)
Main.Size = UDim2.new(0,380,0,260)
Main.Position = UDim2.new(0.3,0,0.3,0)
Main.BackgroundColor3 = Color3.fromRGB(30,30,30)
Main.BorderSizePixel = 4
Main.Active = true
Main.Draggable = true
Main.Name = "Main"

local Title = Instance.new("TextLabel", Main)
Title.Size = UDim2.new(1,0,0,40)
Title.BackgroundTransparency = 1
Title.Text = "FREE ALL ADMIN"
Title.Font = Enum.Font.GothamBold
Title.TextColor3 = Color3.new(1,1,1)
Title.TextScaled = true

local CmdBox = Instance.new("TextBox", Main)
CmdBox.Size = UDim2.new(0.9,0,0,30)
CmdBox.Position = UDim2.new(0.05,0,0.2,0)
CmdBox.PlaceholderText = "Enter command (e.g. kick)"
CmdBox.BackgroundColor3 = Color3.fromRGB(40,40,40)
CmdBox.TextColor3 = Color3.new(1,1,1)
CmdBox.Font = Enum.Font.SourceSans
CmdBox.TextScaled = true

-- Dropdown button
local Drop = Instance.new("TextButton", Main)
Drop.Size = UDim2.new(0.9,0,0,30)
Drop.Position = UDim2.new(0.05,0,0.35,0)
Drop.BackgroundColor3 = Color3.fromRGB(50,50,50)
Drop.TextColor3 = Color3.new(1,1,1)
Drop.Font = Enum.Font.Gotham
Drop.TextScaled = true
Drop.Text = "Select Player"

-- Scrollable dropdown list
local DropFrame = Instance.new("Frame", Drop)
DropFrame.Size = UDim2.new(1,0,0,0)
DropFrame.Position = UDim2.new(0,0,1,0)
DropFrame.BackgroundColor3 = Color3.fromRGB(35,35,35)
DropFrame.ClipsDescendants = true
DropFrame.Visible = false

local Scroll = Instance.new("ScrollingFrame", DropFrame)
Scroll.Size = UDim2.new(1,0,1,0)
Scroll.CanvasSize = UDim2.new(0,0,0,0)
Scroll.ScrollBarThickness = 4
Scroll.BackgroundTransparency = 1
Scroll.BorderSizePixel = 0

local UIList = Instance.new("UIListLayout", Scroll)
UIList.SortOrder = Enum.SortOrder.LayoutOrder

local function refreshPlayers()
    for _,child in pairs(Scroll:GetChildren()) do
        if not child:IsA("UIListLayout") then
            child:Destroy()
        end
    end

    local function addButton(name)
        local btn = Instance.new("TextButton", Scroll)
        btn.Size = UDim2.new(1,0,0,25)
        btn.BackgroundColor3 = Color3.fromRGB(60,60,60)
        btn.Font = Enum.Font.Gotham
        btn.TextColor3 = Color3.new(1,1,1)
        btn.TextScaled = true
        btn.Text = name
        btn.MouseButton1Click:Connect(function()
            Drop.Text = name
            DropFrame.Visible = false
            DropFrame.Size = UDim2.new(1,0,0,0)
            clickSound:Play()
        end)
    end

    addButton("all")
    for _,p in ipairs(Players:GetPlayers()) do
        if p ~= LocalPlayer then
            addButton(p.Name)
        end
    end

    wait()
    Scroll.CanvasSize = UDim2.new(0,0,0, UIList.AbsoluteContentSize.Y)
end

Drop.MouseButton1Click:Connect(function()
    if DropFrame.Visible then
        DropFrame.Visible = false
        DropFrame.Size = UDim2.new(1,0,0,0)
    else
        refreshPlayers()
        DropFrame.Visible = true
        DropFrame.Size = UDim2.new(1,0,0,120)
    end
    clickSound:Play()
end)

-- Run button
local RunBtn = Instance.new("TextButton", Main)
RunBtn.Size = UDim2.new(0.9,0,0,30)
RunBtn.Position = UDim2.new(0.05,0,0.65,0)
RunBtn.Font = Enum.Font.GothamBold
RunBtn.BackgroundColor3 = Color3.fromRGB(60,60,60)
RunBtn.TextColor3 = Color3.new(1,1,1)
RunBtn.TextScaled = true
RunBtn.Text = "Run"

RunBtn.MouseButton1Click:Connect(function()
    clickSound:Play()
    local cmd = CmdBox.Text
    local tgt = Drop.Text
    if cmd ~= "" and tgt ~= "" then
        if tgt:lower() == "all" then
            for _,p in ipairs(Players:GetPlayers()) do
                if p ~= LocalPlayer then
                    Players:Chat(":"..cmd.." "..p.Name)
                    wait(0.2)
                end
            end
        else
            Players:Chat(":"..cmd.." "..tgt)
        end
    end
end)

-- Rainbow border
coroutine.wrap(function()
    local hue = 0
    while true do
        hue = (hue + 0.01) % 1
        Main.BorderColor3 = Color3.fromHSV(hue,1,1)
        RunService.RenderStepped:Wait()
    end
end)()

playBypass()
doneSound:Play()
]])()