repeat task.wait() until game:IsLoaded()
local Players=game:GetService("Players")
local RunService=game:GetService("RunService")
local UIS=game:GetService("UserInputService")
local TweenService=game:GetService("TweenService")
local Lighting=game:GetService("Lighting")
local lp=Players.LocalPlayer
local ScreenGui=Instance.new("ScreenGui")
ScreenGui.Parent=game.CoreGui
ScreenGui.Name="CHMenu"
ScreenGui.ResetOnSpawn=false
ScreenGui.ZIndexBehavior=Enum.ZIndexBehavior.Sibling
local BLUE=Color3.fromRGB(30,100,200)
local DARKBLUE=Color3.fromRGB(15,60,130)
local DARKERBG=Color3.fromRGB(10,10,30)
local BTNBG=Color3.fromRGB(20,50,100)
local GREEN=Color3.fromRGB(0,160,0)
local settings={animations=true,closeSubsOnMenuClose=true}
local blurEffect=Instance.new("BlurEffect")
blurEffect.Size=0 blurEffect.Parent=Lighting
local StartupFrame=Instance.new("Frame")
StartupFrame.Parent=ScreenGui StartupFrame.Size=UDim2.new(1,0,1,0)
StartupFrame.BackgroundColor3=Color3.fromRGB(5,5,15) StartupFrame.BackgroundTransparency=0.3
StartupFrame.BorderSizePixel=0 StartupFrame.ZIndex=100
TweenService:Create(blurEffect,TweenInfo.new(0.5),{Size=24}):Play()
local loadingLbl=Instance.new("TextLabel")
loadingLbl.Parent=StartupFrame loadingLbl.BackgroundTransparency=1
loadingLbl.Position=UDim2.new(0.5,-200,0.5,-80) loadingLbl.Size=UDim2.new(0,400,0,60)
loadingLbl.Text="Cadens Hack Menu" loadingLbl.TextColor3=Color3.fromRGB(255,255,255)
loadingLbl.TextScaled=true loadingLbl.Font=Enum.Font.GothamBold loadingLbl.ZIndex=101
local loadingDots=Instance.new("TextLabel")
loadingDots.Parent=StartupFrame loadingDots.BackgroundTransparency=1
loadingDots.Position=UDim2.new(0.5,-200,0.5,-20) loadingDots.Size=UDim2.new(0,400,0,40)
loadingDots.Text="... loading" loadingDots.TextColor3=Color3.fromRGB(150,180,255)
loadingDots.TextScaled=true loadingDots.Font=Enum.Font.Gotham loadingDots.ZIndex=101
local CTGLabel=Instance.new("TextLabel")
CTGLabel.Parent=StartupFrame CTGLabel.BackgroundTransparency=1
CTGLabel.Position=UDim2.new(0.5,-100,0.5,40) CTGLabel.Size=UDim2.new(0,200,0,100)
CTGLabel.Text="CTG" CTGLabel.TextColor3=Color3.fromRGB(100,180,255)
CTGLabel.TextScaled=true CTGLabel.Font=Enum.Font.GothamBold CTGLabel.ZIndex=101
task.spawn(function()
    local rot=0
    while StartupFrame and StartupFrame.Parent do rot=rot+0.5 CTGLabel.Rotation=rot task.wait(0.03) end
end)
task.spawn(function()
    local dots={"",".","..",  "..."} local i=1
    while StartupFrame and StartupFrame.Parent do loadingDots.Text=dots[i].." loading" i=i%#dots+1 task.wait(0.4) end
end)
task.spawn(function()
    task.wait(7)
    TweenService:Create(blurEffect,TweenInfo.new(0.5),{Size=0}):Play()
    TweenService:Create(StartupFrame,TweenInfo.new(0.5),{BackgroundTransparency=1}):Play()
    TweenService:Create(loadingLbl,TweenInfo.new(0.3),{TextTransparency=1}):Play()
    TweenService:Create(loadingDots,TweenInfo.new(0.3),{TextTransparency=1}):Play()
    TweenService:Create(CTGLabel,TweenInfo.new(0.3),{TextTransparency=1}):Play()
    task.wait(0.5) StartupFrame:Destroy()
end)
local function hoverEffect(btn,baseColor)
    local origSize=btn.Size local origPos=btn.Position
    local hc=Color3.new(math.min(baseColor.R+0.08,1),math.min(baseColor.G+0.08,1),math.min(baseColor.B+0.08,1))
    btn.MouseEnter:Connect(function()
        if btn.BackgroundColor3~=GREEN then TweenService:Create(btn,TweenInfo.new(0.1),{BackgroundColor3=hc}):Play() end
        if not settings.animations then return end
        TweenService:Create(btn,TweenInfo.new(0.1),{Size=UDim2.new(origSize.X.Scale,origSize.X.Offset+4,origSize.Y.Scale,origSize.Y.Offset+4),Position=UDim2.new(origPos.X.Scale,origPos.X.Offset-2,origPos.Y.Scale,origPos.Y.Offset-2)}):Play()
    end)
    btn.MouseLeave:Connect(function()
        if btn.BackgroundColor3~=GREEN then TweenService:Create(btn,TweenInfo.new(0.1),{BackgroundColor3=baseColor}):Play() end
        if not settings.animations then return end
        TweenService:Create(btn,TweenInfo.new(0.1),{Size=origSize,Position=origPos}):Play()
    end)
    btn.MouseButton1Down:Connect(function()
        if not settings.animations then return end
        TweenService:Create(btn,TweenInfo.new(0.05),{Size=UDim2.new(origSize.X.Scale,origSize.X.Offset-2,origSize.Y.Scale,origSize.Y.Offset-2),Position=UDim2.new(origPos.X.Scale,origPos.X.Offset+1,origPos.Y.Scale,origPos.Y.Offset+1)}):Play()
    end)
    btn.MouseButton1Up:Connect(function()
        if not settings.animations then return end
        TweenService:Create(btn,TweenInfo.new(0.05),{Size=origSize,Position=origPos}):Play()
    end)
end
local function tweenMenu(frame,targetPos,onComplete)
    if settings.animations then
        local t=TweenService:Create(frame,TweenInfo.new(0.2,Enum.EasingStyle.Quad,Enum.EasingDirection.In),{Position=targetPos})
        t:Play() if onComplete then t.Completed:Connect(onComplete) end
    else frame.Position=targetPos if onComplete then onComplete() end end
end
local function tweenMenuOpen(frame,targetPos)
    if settings.animations then TweenService:Create(frame,TweenInfo.new(0.3,Enum.EasingStyle.Back,Enum.EasingDirection.Out),{Position=targetPos}):Play()
    else frame.Position=targetPos end
end
local ToggleBar=Instance.new("Frame")
ToggleBar.Parent=ScreenGui ToggleBar.BackgroundColor3=BLUE
ToggleBar.Position=UDim2.new(0,-40,0.45,0) ToggleBar.Size=UDim2.new(0,28,0,80)
ToggleBar.Active=true ToggleBar.Draggable=true ToggleBar.BorderSizePixel=0
Instance.new("UICorner",ToggleBar).CornerRadius=UDim.new(0,6)
local ToggleLbl=Instance.new("TextLabel")
ToggleLbl.Parent=ToggleBar ToggleLbl.Size=UDim2.new(1,0,1,0) ToggleLbl.BackgroundTransparency=1
ToggleLbl.Text="C\nH\nM" ToggleLbl.TextColor3=Color3.fromRGB(255,255,255)
ToggleLbl.TextScaled=true ToggleLbl.Font=Enum.Font.GothamBold
task.spawn(function() task.wait(7.2) tweenMenuOpen(ToggleBar,UDim2.new(0,5,0.45,0)) end)
local Frame=Instance.new("Frame")
Frame.Parent=ScreenGui Frame.BackgroundColor3=DARKERBG
Frame.Position=UDim2.new(0,-340,0,130) Frame.Size=UDim2.new(0,320,0,760)
Frame.Active=true Frame.Draggable=false Frame.BorderSizePixel=0 Frame.Visible=false Frame.ZIndex=2
Instance.new("UICorner",Frame).CornerRadius=UDim.new(0,10)
local mainStroke=Instance.new("UIStroke",Frame) mainStroke.Color=BLUE mainStroke.Thickness=2
local PlayerPanel=Instance.new("Frame")
PlayerPanel.Parent=ScreenGui PlayerPanel.BackgroundColor3=DARKERBG
PlayerPanel.Position=UDim2.new(0,368,0,130) PlayerPanel.Size=UDim2.new(0,240,0,350)
PlayerPanel.Visible=false PlayerPanel.ZIndex=2 PlayerPanel.Active=true PlayerPanel.BorderSizePixel=0
Instance.new("UICorner",PlayerPanel).CornerRadius=UDim.new(0,10)
Instance.new("UIStroke",PlayerPanel).Color=BLUE
local draggingFrame=false local dragStart=nil local startPos=nil
local menuOpen=false local playerPanelOpen=false
local allSubMenus={}
local function registerSubMenu(m) table.insert(allSubMenus,m) end
local function closePlayerPanel()
    if playerPanelOpen then
        playerPanelOpen=false
        tweenMenu(PlayerPanel,UDim2.new(0,Frame.Position.X.Offset+320,0,Frame.Position.Y.Offset-20),function() PlayerPanel.Visible=false end)
    end
end
local function closeAllSubMenus() for _,m in pairs(allSubMenus) do m.Visible=false end end
local function closeMenu()
    menuOpen=false closePlayerPanel()
    if settings.closeSubsOnMenuClose then closeAllSubMenus() end
    tweenMenu(Frame,UDim2.new(0,-340,0,130),function() if not menuOpen then Frame.Visible=false end end)
end
local function openMenu()
    menuOpen=true Frame.Visible=true Frame.Position=UDim2.new(0,-340,0,130)
    tweenMenuOpen(Frame,UDim2.new(0,40,0,130))
end
ToggleBar.InputBegan:Connect(function(i)
    if i.UserInputType==Enum.UserInputType.MouseButton1 then if menuOpen then closeMenu() else openMenu() end end
end)
local Title=Instance.new("TextLabel")
Title.Parent=Frame Title.BackgroundColor3=BLUE Title.Size=UDim2.new(1,0,0,40)
Title.Text="Cadens Hack Menu" Title.TextColor3=Color3.fromRGB(255,255,255)
Title.TextScaled=true Title.Font=Enum.Font.GothamBold Title.BorderSizePixel=0 Title.ZIndex=2 Title.Active=true
Instance.new("UICorner",Title).CornerRadius=UDim.new(0,10)
Title.InputBegan:Connect(function(i)
    if i.UserInputType==Enum.UserInputType.MouseButton1 then draggingFrame=true dragStart=i.Position startPos=Frame.Position end
end)
Title.InputEnded:Connect(function(i)
    if i.UserInputType==Enum.UserInputType.MouseButton1 then draggingFrame=false end
end)
UIS.InputChanged:Connect(function(i)
    if draggingFrame and i.UserInputType==Enum.UserInputType.MouseMovement then
        local delta=i.Position-dragStart
        Frame.Position=UDim2.new(startPos.X.Scale,startPos.X.Offset+delta.X,startPos.Y.Scale,startPos.Y.Offset+delta.Y)
        PlayerPanel.Position=UDim2.new(0,Frame.Position.X.Offset+328,0,Frame.Position.Y.Offset)
    end
end)
local CloseBtn=Instance.new("TextButton")
CloseBtn.Parent=Frame CloseBtn.BackgroundColor3=Color3.fromRGB(120,0,0)
CloseBtn.Position=UDim2.new(1,-36,0,4) CloseBtn.Size=UDim2.new(0,32,0,32)
CloseBtn.Text="X" CloseBtn.TextColor3=Color3.fromRGB(255,255,255)
CloseBtn.TextScaled=true CloseBtn.Font=Enum.Font.GothamBold CloseBtn.BorderSizePixel=0 CloseBtn.ZIndex=10
Instance.new("UICorner",CloseBtn).CornerRadius=UDim.new(0,6)
CloseBtn.MouseButton1Click:Connect(function() closeMenu() end)

-- PAGE SYSTEM
local currentPage=1 local totalPages=2
local page1Buttons={} local page2Buttons={}
local pageNavFrame=Instance.new("Frame")
pageNavFrame.Parent=Frame pageNavFrame.BackgroundTransparency=1
pageNavFrame.Position=UDim2.new(0.02,0,0,46) pageNavFrame.Size=UDim2.new(0.96,0,0,30) pageNavFrame.ZIndex=2
local prevPageBtn=Instance.new("TextButton")
prevPageBtn.Parent=pageNavFrame prevPageBtn.BackgroundColor3=DARKBLUE
prevPageBtn.Position=UDim2.new(0,0,0,0) prevPageBtn.Size=UDim2.new(0,40,1,0)
prevPageBtn.Text="◀" prevPageBtn.TextColor3=Color3.fromRGB(255,255,255)
prevPageBtn.TextScaled=true prevPageBtn.Font=Enum.Font.GothamBold prevPageBtn.BorderSizePixel=0 prevPageBtn.ZIndex=2
Instance.new("UICorner",prevPageBtn).CornerRadius=UDim.new(0,6)
local pageCountLbl=Instance.new("TextLabel")
pageCountLbl.Parent=pageNavFrame pageCountLbl.BackgroundTransparency=1
pageCountLbl.Position=UDim2.new(0,44,0,0) pageCountLbl.Size=UDim2.new(1,-88,1,0)
pageCountLbl.Text="Page 1 / 2" pageCountLbl.TextColor3=Color3.fromRGB(200,200,200)
pageCountLbl.TextScaled=true pageCountLbl.Font=Enum.Font.GothamBold pageCountLbl.ZIndex=2
local nextPageBtn=Instance.new("TextButton")
nextPageBtn.Parent=pageNavFrame nextPageBtn.BackgroundColor3=DARKBLUE
nextPageBtn.Position=UDim2.new(1,-40,0,0) nextPageBtn.Size=UDim2.new(0,40,1,0)
nextPageBtn.Text="▶" nextPageBtn.TextColor3=Color3.fromRGB(255,255,255)
nextPageBtn.TextScaled=true nextPageBtn.Font=Enum.Font.GothamBold nextPageBtn.BorderSizePixel=0 nextPageBtn.ZIndex=2
Instance.new("UICorner",nextPageBtn).CornerRadius=UDim.new(0,6)
local function showPage(page)
    currentPage=page pageCountLbl.Text="Page "..page.." / "..totalPages
    for _,b in pairs(page1Buttons) do b.Visible=(page==1) end
    for _,b in pairs(page2Buttons) do b.Visible=(page==2) end
end
prevPageBtn.MouseButton1Click:Connect(function() if currentPage>1 then showPage(currentPage-1) end end)
nextPageBtn.MouseButton1Click:Connect(function() if currentPage<totalPages then showPage(currentPage+1) end end)

-- PLAYER PANEL
local PPTitle=Instance.new("TextLabel")
PPTitle.Parent=PlayerPanel PPTitle.BackgroundColor3=BLUE PPTitle.Size=UDim2.new(1,0,0,36)
PPTitle.Text="Select Player" PPTitle.TextColor3=Color3.fromRGB(255,255,255)
PPTitle.TextScaled=true PPTitle.Font=Enum.Font.GothamBold PPTitle.BorderSizePixel=0 PPTitle.ZIndex=3
Instance.new("UICorner",PPTitle).CornerRadius=UDim.new(0,10)
local PPClose=Instance.new("TextButton")
PPClose.Parent=PlayerPanel PPClose.BackgroundColor3=Color3.fromRGB(120,0,0)
PPClose.Position=UDim2.new(1,-30,0,4) PPClose.Size=UDim2.new(0,26,0,26)
PPClose.Text="X" PPClose.TextColor3=Color3.fromRGB(255,255,255)
PPClose.TextScaled=true PPClose.Font=Enum.Font.GothamBold PPClose.BorderSizePixel=0 PPClose.ZIndex=10
Instance.new("UICorner",PPClose).CornerRadius=UDim.new(0,6)
PPClose.MouseButton1Click:Connect(function() closePlayerPanel() end)
local SearchBox=Instance.new("TextBox")
SearchBox.Parent=PlayerPanel SearchBox.BackgroundColor3=Color3.fromRGB(15,35,80)
SearchBox.Position=UDim2.new(0.02,0,0,42) SearchBox.Size=UDim2.new(0.96,0,0,28)
SearchBox.Text="" SearchBox.PlaceholderText="Search player..."
SearchBox.TextColor3=Color3.fromRGB(255,255,255) SearchBox.PlaceholderColor3=Color3.fromRGB(150,150,150)
SearchBox.TextScaled=true SearchBox.Font=Enum.Font.Gotham SearchBox.BorderSizePixel=0 SearchBox.ZIndex=3 SearchBox.Active=true
Instance.new("UICorner",SearchBox).CornerRadius=UDim.new(0,6) Instance.new("UIStroke",SearchBox).Color=BLUE
local PlayerScroll=Instance.new("ScrollingFrame")
PlayerScroll.Parent=PlayerPanel PlayerScroll.Position=UDim2.new(0.02,0,0,76)
PlayerScroll.Size=UDim2.new(0.96,0,1,-80) PlayerScroll.BackgroundColor3=Color3.fromRGB(8,8,25)
PlayerScroll.BorderSizePixel=0 PlayerScroll.ScrollBarThickness=4 PlayerScroll.ScrollBarImageColor3=BLUE PlayerScroll.ZIndex=3
Instance.new("UICorner",PlayerScroll).CornerRadius=UDim.new(0,6)
local PlayerListLayout=Instance.new("UIListLayout")
PlayerListLayout.Parent=PlayerScroll PlayerListLayout.Padding=UDim.new(0,3)
local selectedPlayer=nil
local function populatePlayers(filter)
    for _,c in pairs(PlayerScroll:GetChildren()) do if c:IsA("TextButton") then c:Destroy() end end
    filter=(filter or ""):lower()
    for _,p in pairs(Players:GetPlayers()) do
        if p~=lp and(filter==""or p.Name:lower():find(filter,1,true)or p.DisplayName:lower():find(filter,1,true))then
            local opt=Instance.new("TextButton") opt.Parent=PlayerScroll
            opt.BackgroundColor3=selectedPlayer==p and Color3.fromRGB(0,130,0)or BTNBG
            opt.Size=UDim2.new(1,0,0,40) opt.Text="" opt.BorderSizePixel=0 opt.ZIndex=4
            Instance.new("UICorner",opt).CornerRadius=UDim.new(0,5)
            local dn=Instance.new("TextLabel") dn.Parent=opt dn.BackgroundTransparency=1
            dn.Position=UDim2.new(0.02,0,0,2) dn.Size=UDim2.new(0.96,0,0,22) dn.Text=p.DisplayName
            dn.TextColor3=Color3.fromRGB(255,255,255) dn.TextScaled=true dn.Font=Enum.Font.GothamBold
            dn.TextXAlignment=Enum.TextXAlignment.Left dn.ZIndex=5
            local un=Instance.new("TextLabel") un.Parent=opt un.BackgroundTransparency=1
            un.Position=UDim2.new(0.02,0,0,24) un.Size=UDim2.new(0.96,0,0,14) un.Text="@"..p.Name
            un.TextColor3=Color3.fromRGB(120,120,120) un.TextScaled=true un.Font=Enum.Font.Gotham
            un.TextXAlignment=Enum.TextXAlignment.Left un.ZIndex=5
            opt.MouseButton1Click:Connect(function()
                selectedPlayer=p PlayerBtn.Text="Target: "..p.DisplayName
                PlayerBtn.BackgroundColor3=Color3.fromRGB(0,130,0)
                populatePlayers(SearchBox.Text) closePlayerPanel()
            end)
        end
    end
    PlayerScroll.CanvasSize=UDim2.new(0,0,0,PlayerListLayout.AbsoluteContentSize.Y+6)
end
SearchBox:GetPropertyChangedSignal("Text"):Connect(function() populatePlayers(SearchBox.Text) end)
local savedPositions={}
for i=1,10 do savedPositions[i]={name="Slot "..i,cframe=nil} end
local function getChar() return lp.Character end
local function getHRP() return getChar()and getChar():FindFirstChild("HumanoidRootPart") end
local function getHum() return getChar()and getChar():FindFirstChildOfClass("Humanoid") end
local function getT() return selectedPlayer and selectedPlayer.Character end
local function getTHRP() return getT()and getT():FindFirstChild("HumanoidRootPart") end
local function notify(msg) game:GetService("StarterGui"):SetCore("SendNotification",{Title="CHM",Text=msg,Duration=2}) end

local function makeBtn(text,ypos,color,page)
    local btn=Instance.new("TextButton") btn.Parent=Frame btn.BackgroundColor3=color or BTNBG
    btn.Position=UDim2.new(0.02,0,0,ypos) btn.Size=UDim2.new(0.96,0,0,38)
    btn.Text=text btn.TextColor3=Color3.fromRGB(255,255,255) btn.TextScaled=true btn.Font=Enum.Font.Gotham
    btn.BorderSizePixel=0 btn.ZIndex=2
    Instance.new("UICorner",btn).CornerRadius=UDim.new(0,6) hoverEffect(btn,color or BTNBG)
    if page==1 then table.insert(page1Buttons,btn)
    elseif page==2 then btn.Visible=false table.insert(page2Buttons,btn) end
    return btn
end
local function makeSubMenuDraggable(sub,titleBar)
    local d=false local ds=nil local sp=nil titleBar.Active=true
    titleBar.InputBegan:Connect(function(i) if i.UserInputType==Enum.UserInputType.MouseButton1 then d=true ds=i.Position sp=sub.Position end end)
    titleBar.InputEnded:Connect(function(i) if i.UserInputType==Enum.UserInputType.MouseButton1 then d=false end end)
    UIS.InputChanged:Connect(function(i)
        if d and i.UserInputType==Enum.UserInputType.MouseMovement then
            local delta=i.Position-ds sub.Position=UDim2.new(sp.X.Scale,sp.X.Offset+delta.X,sp.Y.Scale,sp.Y.Offset+delta.Y)
        end
    end)
end
local function makeSubBtn(parent,text,ypos,color)
    local btn=Instance.new("TextButton") btn.Parent=parent btn.BackgroundColor3=color or BTNBG
    btn.Position=UDim2.new(0.02,0,0,ypos) btn.Size=UDim2.new(0.96,0,0,36)
    btn.Text=text btn.TextColor3=Color3.fromRGB(255,255,255) btn.TextScaled=true btn.Font=Enum.Font.Gotham
    btn.BorderSizePixel=0 btn.ZIndex=21
    Instance.new("UICorner",btn).CornerRadius=UDim.new(0,6) hoverEffect(btn,color or BTNBG) return btn
end
local function makeSubTitle(parent,text)
    local lbl=Instance.new("TextLabel") lbl.Parent=parent lbl.BackgroundColor3=BLUE
    lbl.Size=UDim2.new(1,0,0,36) lbl.Text=text lbl.TextColor3=Color3.fromRGB(255,255,255)
    lbl.TextScaled=true lbl.Font=Enum.Font.GothamBold lbl.BorderSizePixel=0 lbl.ZIndex=21
    Instance.new("UICorner",lbl).CornerRadius=UDim.new(0,10) return lbl
end
local function makeSubFrame(w,h)
    local sub=Instance.new("Frame") sub.Parent=ScreenGui sub.BackgroundColor3=DARKERBG
    sub.Position=UDim2.new(0,370,0.1,0) sub.Size=UDim2.new(0,w,0,h)
    sub.Visible=false sub.ZIndex=20 sub.Active=true sub.BorderSizePixel=0
    Instance.new("UICorner",sub).CornerRadius=UDim.new(0,10)
    local stroke=Instance.new("UIStroke",sub) stroke.Color=BLUE stroke.Thickness=2
    registerSubMenu(sub) return sub
end

-- SELECT PLAYER PAGE 1
local PlayerBtn=Instance.new("TextButton")
PlayerBtn.Parent=Frame PlayerBtn.BackgroundColor3=BTNBG
PlayerBtn.Position=UDim2.new(0.02,0,0,82) PlayerBtn.Size=UDim2.new(0.96,0,0,34)
PlayerBtn.Text="Select Player" PlayerBtn.TextColor3=Color3.fromRGB(255,255,255)
PlayerBtn.TextScaled=true PlayerBtn.Font=Enum.Font.Gotham PlayerBtn.BorderSizePixel=0 PlayerBtn.ZIndex=2
Instance.new("UICorner",PlayerBtn).CornerRadius=UDim.new(0,6)
Instance.new("UIStroke",PlayerBtn).Color=BLUE hoverEffect(PlayerBtn,BTNBG)
table.insert(page1Buttons,PlayerBtn)
PlayerBtn.MouseButton1Click:Connect(function()
    if playerPanelOpen then closePlayerPanel()
    else
        populatePlayers("")
        PlayerPanel.Position=UDim2.new(0,Frame.Position.X.Offset+320,0,Frame.Position.Y.Offset-20)
        PlayerPanel.Visible=true playerPanelOpen=true
        tweenMenuOpen(PlayerPanel,UDim2.new(0,Frame.Position.X.Offset+328,0,Frame.Position.Y.Offset))
    end
end)

local tpBtn=makeBtn("TP To Player",122,BLUE,1)
tpBtn.MouseButton1Click:Connect(function()
    if not getTHRP() then return notify("Select a player first!") end
    getHRP().CFrame=getTHRP().CFrame+Vector3.new(3,0,0) notify("Teleported!")
end)

local savePosBtn=makeBtn("Save Position",166,DARKBLUE,1)
local SaveMenu=makeSubFrame(280,420) local saveMenuOpen=false
local SaveTitleBar=makeSubTitle(SaveMenu,"Save Position") makeSubMenuDraggable(SaveMenu,SaveTitleBar)
local SaveScroll=Instance.new("ScrollingFrame") SaveScroll.Parent=SaveMenu
SaveScroll.Position=UDim2.new(0,4,0,40) SaveScroll.Size=UDim2.new(1,-8,1,-44)
SaveScroll.BackgroundTransparency=1 SaveScroll.BorderSizePixel=0 SaveScroll.ScrollBarThickness=4
SaveScroll.ScrollBarImageColor3=BLUE SaveScroll.ZIndex=20 SaveScroll.CanvasSize=UDim2.new(0,0,0,10*84+10)
local function buildSaveMenu()
    for _,c in pairs(SaveScroll:GetChildren()) do if not c:IsA("UIListLayout") then c:Destroy() end end
    for i=1,10 do
        local slot=savedPositions[i]
        local sf=Instance.new("Frame") sf.Parent=SaveScroll sf.BackgroundColor3=Color3.fromRGB(15,25,55)
        sf.Position=UDim2.new(0,0,0,(i-1)*84+4) sf.Size=UDim2.new(1,0,0,80) sf.BorderSizePixel=0 sf.ZIndex=20
        Instance.new("UICorner",sf).CornerRadius=UDim.new(0,6)
        local nb=Instance.new("TextBox") nb.Parent=sf nb.BackgroundColor3=BTNBG
        nb.Position=UDim2.new(0.02,0,0,4) nb.Size=UDim2.new(0.96,0,0,30) nb.Text=slot.name
        nb.TextColor3=Color3.fromRGB(255,255,255) nb.TextScaled=true nb.Font=Enum.Font.Gotham nb.BorderSizePixel=0 nb.ZIndex=21
        Instance.new("UICorner",nb).CornerRadius=UDim.new(0,5)
        nb.FocusLost:Connect(function() savedPositions[i].name=nb.Text end)
        local sl=Instance.new("TextLabel") sl.Parent=sf sl.BackgroundTransparency=1
        sl.Position=UDim2.new(0.02,0,0,38) sl.Size=UDim2.new(0.96,0,0,16)
        sl.Text=slot.cframe and"Saved!"or"Empty"
        sl.TextColor3=slot.cframe and Color3.fromRGB(0,200,0)or Color3.fromRGB(150,150,150)
        sl.TextScaled=true sl.Font=Enum.Font.Gotham sl.ZIndex=21
        local ssb=Instance.new("TextButton") ssb.Parent=sf ssb.BackgroundColor3=BLUE
        ssb.Position=UDim2.new(0.02,0,0,56) ssb.Size=UDim2.new(0.96,0,0,20) ssb.Text="Save Here"
        ssb.TextColor3=Color3.fromRGB(255,255,255) ssb.TextScaled=true ssb.Font=Enum.Font.Gotham
        ssb.BorderSizePixel=0 ssb.ZIndex=21
        Instance.new("UICorner",ssb).CornerRadius=UDim.new(0,4) hoverEffect(ssb,BLUE)
        ssb.MouseButton1Click:Connect(function()
            if getHRP() then
                savedPositions[i].cframe=getHRP().CFrame savedPositions[i].name=nb.Text
                sl.Text="Saved!" sl.TextColor3=Color3.fromRGB(0,200,0) notify("Saved to: "..nb.Text)
            end
        end)
    end
end
savePosBtn.MouseButton1Click:Connect(function()
    saveMenuOpen=not saveMenuOpen if saveMenuOpen then buildSaveMenu() end
    SaveMenu.Visible=saveMenuOpen LoadMenu.Visible=false loadMenuOpen=false
end)

local loadPosBtn=makeBtn("Load Position",210,DARKBLUE,1)
local LoadMenu=makeSubFrame(280,380) local loadMenuOpen=false
local LoadTitleBar=makeSubTitle(LoadMenu,"Load Position") makeSubMenuDraggable(LoadMenu,LoadTitleBar)
local LoadScroll=Instance.new("ScrollingFrame") LoadScroll.Parent=LoadMenu
LoadScroll.Position=UDim2.new(0,4,0,40) LoadScroll.Size=UDim2.new(1,-8,1,-44)
LoadScroll.BackgroundTransparency=1 LoadScroll.BorderSizePixel=0 LoadScroll.ScrollBarThickness=4
LoadScroll.ScrollBarImageColor3=BLUE LoadScroll.ZIndex=20 LoadScroll.CanvasSize=UDim2.new(0,0,0,10*54+10)
local function buildLoadMenu()
    for _,c in pairs(LoadScroll:GetChildren()) do if not c:IsA("UIListLayout") then c:Destroy() end end
    for i=1,10 do
        local slot=savedPositions[i]
        local sf=Instance.new("Frame") sf.Parent=LoadScroll sf.BackgroundColor3=Color3.fromRGB(15,25,55)
        sf.Position=UDim2.new(0,0,0,(i-1)*54+4) sf.Size=UDim2.new(1,0,0,50) sf.BorderSizePixel=0 sf.ZIndex=20
        Instance.new("UICorner",sf).CornerRadius=UDim.new(0,6)
        local nl=Instance.new("TextLabel") nl.Parent=sf nl.BackgroundTransparency=1
        nl.Position=UDim2.new(0.02,0,0,4) nl.Size=UDim2.new(0.6,0,0,20) nl.Text=slot.name
        nl.TextColor3=Color3.fromRGB(255,255,255) nl.TextScaled=true nl.Font=Enum.Font.Gotham
        nl.TextXAlignment=Enum.TextXAlignment.Left nl.ZIndex=21
        local stl=Instance.new("TextLabel") stl.Parent=sf stl.BackgroundTransparency=1
        stl.Position=UDim2.new(0.02,0,0,24) stl.Size=UDim2.new(0.6,0,0,16)
        stl.Text=slot.cframe and"Ready"or"Empty"
        stl.TextColor3=slot.cframe and Color3.fromRGB(0,200,0)or Color3.fromRGB(150,150,150)
        stl.TextScaled=true stl.Font=Enum.Font.Gotham stl.TextXAlignment=Enum.TextXAlignment.Left stl.ZIndex=21
        local lsb=Instance.new("TextButton") lsb.Parent=sf
        lsb.BackgroundColor3=slot.cframe and BLUE or Color3.fromRGB(40,40,40)
        lsb.Position=UDim2.new(0.65,0,0.1,0) lsb.Size=UDim2.new(0.33,0,0.8,0) lsb.Text="Load"
        lsb.TextColor3=Color3.fromRGB(255,255,255) lsb.TextScaled=true lsb.Font=Enum.Font.GothamBold
        lsb.BorderSizePixel=0 lsb.ZIndex=21
        Instance.new("UICorner",lsb).CornerRadius=UDim.new(0,5) hoverEffect(lsb,slot.cframe and BLUE or Color3.fromRGB(40,40,40))
        lsb.MouseButton1Click:Connect(function()
            if slot.cframe and getHRP() then getHRP().CFrame=slot.cframe notify("Loaded: "..slot.name)
            else notify("Slot is empty!") end
        end)
    end
end
loadPosBtn.MouseButton1Click:Connect(function()
    loadMenuOpen=not loadMenuOpen if loadMenuOpen then buildLoadMenu() end
    LoadMenu.Visible=loadMenuOpen SaveMenu.Visible=false saveMenuOpen=false
end)

local flySpeed=40
local FlySpeedMenu=makeSubFrame(280,100) local flySpeedMenuOpen=false
local FlySpeedTitle=makeSubTitle(FlySpeedMenu,"Fly Speed") makeSubMenuDraggable(FlySpeedMenu,FlySpeedTitle)
local flySpeedLbl=Instance.new("TextLabel") flySpeedLbl.Parent=FlySpeedMenu flySpeedLbl.BackgroundTransparency=1
flySpeedLbl.Position=UDim2.new(0.02,0,0,40) flySpeedLbl.Size=UDim2.new(0.96,0,0,14) flySpeedLbl.Text="Speed: 40"
flySpeedLbl.TextColor3=Color3.fromRGB(200,200,200) flySpeedLbl.TextScaled=true flySpeedLbl.Font=Enum.Font.Gotham flySpeedLbl.ZIndex=21
local flySpeedTrack=Instance.new("Frame") flySpeedTrack.Parent=FlySpeedMenu flySpeedTrack.BackgroundColor3=Color3.fromRGB(20,30,60)
flySpeedTrack.Position=UDim2.new(0.02,0,0,56) flySpeedTrack.Size=UDim2.new(0.96,0,0,14)
flySpeedTrack.BorderSizePixel=0 flySpeedTrack.ZIndex=21 flySpeedTrack.Active=true
Instance.new("UICorner",flySpeedTrack).CornerRadius=UDim.new(0,7)
local flySpeedFill=Instance.new("Frame") flySpeedFill.Parent=flySpeedTrack flySpeedFill.BackgroundColor3=BLUE
flySpeedFill.Size=UDim2.new(0.2,0,1,0) flySpeedFill.BorderSizePixel=0 flySpeedFill.ZIndex=22
Instance.new("UICorner",flySpeedFill).CornerRadius=UDim.new(0,7)
local resetFlySpeedBtn=makeSubBtn(FlySpeedMenu,"Reset to 40",76,Color3.fromRGB(150,0,0))
resetFlySpeedBtn.MouseButton1Click:Connect(function()
    flySpeed=40 flySpeedFill.Size=UDim2.new(0.2,0,1,0) flySpeedLbl.Text="Speed: 40" notify("Fly speed reset!")
end)
local draggingFlySpeed=false
flySpeedTrack.InputBegan:Connect(function(i) if i.UserInputType==Enum.UserInputType.MouseButton1 then draggingFlySpeed=true end end)
UIS.InputEnded:Connect(function(i) if i.UserInputType==Enum.UserInputType.MouseButton1 then draggingFlySpeed=false end end)
UIS.InputChanged:Connect(function(i)
    if draggingFlySpeed and i.UserInputType==Enum.UserInputType.MouseMovement then
        local rel=math.clamp((i.Position.X-flySpeedTrack.AbsolutePosition.X)/flySpeedTrack.AbsoluteSize.X,0,1)
        flySpeed=math.floor((0.1+(200-0.1)*rel)*10)/10 flySpeedFill.Size=UDim2.new(rel,0,1,0) flySpeedLbl.Text="Speed: "..flySpeed
    end
end)

local flyBtn=Instance.new("TextButton") flyBtn.Parent=Frame flyBtn.BackgroundColor3=DARKBLUE
flyBtn.Position=UDim2.new(0.02,0,0,254) flyBtn.Size=UDim2.new(0.78,0,0,38)
flyBtn.Text="Fly" flyBtn.TextColor3=Color3.fromRGB(255,255,255) flyBtn.TextScaled=true flyBtn.Font=Enum.Font.Gotham
flyBtn.BorderSizePixel=0 flyBtn.ZIndex=2
Instance.new("UICorner",flyBtn).CornerRadius=UDim.new(0,6) hoverEffect(flyBtn,DARKBLUE)
table.insert(page1Buttons,flyBtn)
local flySpeedBtn=Instance.new("TextButton") flySpeedBtn.Parent=Frame flySpeedBtn.BackgroundColor3=DARKBLUE
flySpeedBtn.Position=UDim2.new(0.82,0,0,254) flySpeedBtn.Size=UDim2.new(0.16,0,0,38)
flySpeedBtn.Text="SPD" flySpeedBtn.TextColor3=Color3.fromRGB(255,255,255) flySpeedBtn.TextScaled=true
flySpeedBtn.Font=Enum.Font.GothamBold flySpeedBtn.BorderSizePixel=0 flySpeedBtn.ZIndex=2
Instance.new("UICorner",flySpeedBtn).CornerRadius=UDim.new(0,6)
Instance.new("UIStroke",flySpeedBtn).Color=BLUE hoverEffect(flySpeedBtn,DARKBLUE)
table.insert(page1Buttons,flySpeedBtn)
flySpeedBtn.MouseButton1Click:Connect(function() flySpeedMenuOpen=not flySpeedMenuOpen FlySpeedMenu.Visible=flySpeedMenuOpen end)

local flying=false local flyConn=nil
local function startFly()
    local hrp=getHRP() if not hrp then return end
    local bv=Instance.new("BodyVelocity") bv.Name="FlyVelocity" bv.Velocity=Vector3.new(0,0,0)
    bv.MaxForce=Vector3.new(math.huge,math.huge,math.huge) bv.Parent=hrp
    local bg=Instance.new("BodyGyro") bg.Name="FlyGyro"
    bg.MaxTorque=Vector3.new(math.huge,math.huge,math.huge) bg.P=1e4 bg.Parent=hrp
    local cam=workspace.CurrentCamera
    flyConn=RunService.Heartbeat:Connect(function()
        if not flying then bv:Destroy() bg:Destroy() flyConn:Disconnect() return end
        local dir=Vector3.new(0,0,0) local cf=cam.CFrame
        if UIS:IsKeyDown(Enum.KeyCode.W) then dir=dir+cf.LookVector end
        if UIS:IsKeyDown(Enum.KeyCode.S) then dir=dir-cf.LookVector end
        if UIS:IsKeyDown(Enum.KeyCode.A) then dir=dir-cf.RightVector end
        if UIS:IsKeyDown(Enum.KeyCode.D) then dir=dir+cf.RightVector end
        if UIS:IsKeyDown(Enum.KeyCode.Space) then dir=dir+Vector3.new(0,1,0) end
        if UIS:IsKeyDown(Enum.KeyCode.LeftShift) then dir=dir-Vector3.new(0,1,0) end
        bv.Velocity=dir*flySpeed bv.MaxForce=Vector3.new(math.huge,math.huge,math.huge) bg.CFrame=cf
    end)
end
local function stopFly()
    if flyConn then flyConn:Disconnect() flyConn=nil end
    local hrp=getHRP()
    if hrp then
        local bv=hrp:FindFirstChild("FlyVelocity") local bg=hrp:FindFirstChild("FlyGyro")
        if bv then bv:Destroy() end if bg then bg:Destroy() end
    end
end
flyBtn.MouseButton1Click:Connect(function()
    flying=not flying flyBtn.BackgroundColor3=flying and GREEN or DARKBLUE flyBtn.Text=flying and"Fly (ON)"or"Fly"
    if flying then startFly() else stopFly() end
end)

local noclip=false
local noclipBtn=makeBtn("NoClip",298,DARKBLUE,1)
noclipBtn.MouseButton1Click:Connect(function()
    noclip=not noclip noclipBtn.BackgroundColor3=noclip and GREEN or DARKBLUE noclipBtn.Text=noclip and"NoClip (ON)"or"NoClip"
end)
RunService.Stepped:Connect(function()
    if noclip and getChar() then for _,v in pairs(getChar():GetDescendants()) do if v:IsA("BasePart") then v.CanCollide=false end end end
end)

local godMode=false local godConn=nil
local godBtn=makeBtn("God Mode",342,DARKBLUE,1)
godBtn.MouseButton1Click:Connect(function()
    godMode=not godMode godBtn.BackgroundColor3=godMode and GREEN or DARKBLUE godBtn.Text=godMode and"God Mode (ON)"or"God Mode"
    if godMode then
        local char=getChar()
        if char then local ff=Instance.new("ForceField") ff.Visible=false ff.Parent=char end
        godConn=RunService.Heartbeat:Connect(function()
            if not godMode then godConn:Disconnect() return end
            local hum=getHum() local char=getChar()
            if hum then hum.Health=hum.MaxHealth end
            if char and not char:FindFirstChildOfClass("ForceField") then
                local ff=Instance.new("ForceField") ff.Visible=false ff.Parent=char
            end
        end)
        lp.CharacterAdded:Connect(function(newChar)
            if godMode then task.wait(0.1) local ff=Instance.new("ForceField") ff.Visible=false ff.Parent=newChar end
        end)
        notify("God Mode ON!")
    else
        if godConn then godConn:Disconnect() godConn=nil end
        local char=getChar()
        if char then local ff=char:FindFirstChildOfClass("ForceField") if ff then ff:Destroy() end end
        notify("God Mode OFF!")
    end
end)

local infJump=false local infJumpConn=nil
local infJumpBtn=makeBtn("Inf Jump",386,DARKBLUE,1)
infJumpBtn.MouseButton1Click:Connect(function()
    infJump=not infJump infJumpBtn.BackgroundColor3=infJump and GREEN or DARKBLUE infJumpBtn.Text=infJump and"Inf Jump (ON)"or"Inf Jump"
    if infJump then
        infJumpConn=UIS.JumpRequest:Connect(function() local hum=getHum() if hum and infJump then hum:ChangeState(Enum.HumanoidStateType.Jumping) end end)
    else if infJumpConn then infJumpConn:Disconnect() infJumpConn=nil end end
end)

local blinkDistance=40 local blinkCooldownTime=3 local blinkCooldown=false
local BlinkMenu=makeSubFrame(280,130) local blinkMenuOpen=false
local BlinkTitle=makeSubTitle(BlinkMenu,"⚡ Blink Settings") makeSubMenuDraggable(BlinkMenu,BlinkTitle)
local blinkCDLbl=Instance.new("TextLabel") blinkCDLbl.Parent=BlinkMenu blinkCDLbl.BackgroundTransparency=1
blinkCDLbl.Position=UDim2.new(0.02,0,0,42) blinkCDLbl.Size=UDim2.new(0.96,0,0,14) blinkCDLbl.Text="Cooldown: 3s (0-30s)"
blinkCDLbl.TextColor3=Color3.fromRGB(200,200,200) blinkCDLbl.TextScaled=true blinkCDLbl.Font=Enum.Font.Gotham blinkCDLbl.ZIndex=21
local blinkCDTrack=Instance.new("Frame") blinkCDTrack.Parent=BlinkMenu blinkCDTrack.BackgroundColor3=Color3.fromRGB(20,30,60)
blinkCDTrack.Position=UDim2.new(0.02,0,0,58) blinkCDTrack.Size=UDim2.new(0.96,0,0,14)
blinkCDTrack.BorderSizePixel=0 blinkCDTrack.ZIndex=21 blinkCDTrack.Active=true
Instance.new("UICorner",blinkCDTrack).CornerRadius=UDim.new(0,7)
local blinkCDFill=Instance.new("Frame") blinkCDFill.Parent=blinkCDTrack blinkCDFill.BackgroundColor3=Color3.fromRGB(140,0,255)
blinkCDFill.Size=UDim2.new(0.1,0,1,0) blinkCDFill.BorderSizePixel=0 blinkCDFill.ZIndex=22
Instance.new("UICorner",blinkCDFill).CornerRadius=UDim.new(0,7)
local blinkDistLbl=Instance.new("TextLabel") blinkDistLbl.Parent=BlinkMenu blinkDistLbl.BackgroundTransparency=1
blinkDistLbl.Position=UDim2.new(0.02,0,0,78) blinkDistLbl.Size=UDim2.new(0.96,0,0,14) blinkDistLbl.Text="Distance: 40"
blinkDistLbl.TextColor3=Color3.fromRGB(200,200,200) blinkDistLbl.TextScaled=true blinkDistLbl.Font=Enum.Font.Gotham blinkDistLbl.ZIndex=21
local blinkDistTrack=Instance.new("Frame") blinkDistTrack.Parent=BlinkMenu blinkDistTrack.BackgroundColor3=Color3.fromRGB(20,30,60)
blinkDistTrack.Position=UDim2.new(0.02,0,0,94) blinkDistTrack.Size=UDim2.new(0.96,0,0,14)
blinkDistTrack.BorderSizePixel=0 blinkDistTrack.ZIndex=21 blinkDistTrack.Active=true
Instance.new("UICorner",blinkDistTrack).CornerRadius=UDim.new(0,7)
local blinkDistFill=Instance.new("Frame") blinkDistFill.Parent=blinkDistTrack blinkDistFill.BackgroundColor3=Color3.fromRGB(140,0,255)
blinkDistFill.Size=UDim2.new(0.2,0,1,0) blinkDistFill.BorderSizePixel=0 blinkDistFill.ZIndex=22
Instance.new("UICorner",blinkDistFill).CornerRadius=UDim.new(0,7)
local draggingBlinkCD=false
blinkCDTrack.InputBegan:Connect(function(i) if i.UserInputType==Enum.UserInputType.MouseButton1 then draggingBlinkCD=true end end)
UIS.InputEnded:Connect(function(i) if i.UserInputType==Enum.UserInputType.MouseButton1 then draggingBlinkCD=false end end)
UIS.InputChanged:Connect(function(i)
    if draggingBlinkCD and i.UserInputType==Enum.UserInputType.MouseMovement then
        local rel=math.clamp((i.Position.X-blinkCDTrack.AbsolutePosition.X)/blinkCDTrack.AbsoluteSize.X,0,1)
        blinkCooldownTime=math.floor(rel*30) blinkCDFill.Size=UDim2.new(rel,0,1,0) blinkCDLbl.Text="Cooldown: "..blinkCooldownTime.."s (0-30s)"
    end
end)
local draggingBlinkDist=false
blinkDistTrack.InputBegan:Connect(function(i) if i.UserInputType==Enum.UserInputType.MouseButton1 then draggingBlinkDist=true end end)
UIS.InputEnded:Connect(function(i) if i.UserInputType==Enum.UserInputType.MouseButton1 then draggingBlinkDist=false end end)
UIS.InputChanged:Connect(function(i)
    if draggingBlinkDist and i.UserInputType==Enum.UserInputType.MouseMovement then
        local rel=math.clamp((i.Position.X-blinkDistTrack.AbsolutePosition.X)/blinkDistTrack.AbsoluteSize.X,0,1)
        blinkDistance=math.floor(1+(200-1)*rel) blinkDistFill.Size=UDim2.new(rel,0,1,0) blinkDistLbl.Text="Distance: "..blinkDistance
    end
end)

local blinkBtn=Instance.new("TextButton") blinkBtn.Parent=Frame blinkBtn.BackgroundColor3=Color3.fromRGB(80,0,160)
blinkBtn.Position=UDim2.new(0.02,0,0,430) blinkBtn.Size=UDim2.new(0.78,0,0,38)
blinkBtn.Text="⚡ Blink" blinkBtn.TextColor3=Color3.fromRGB(255,255,255) blinkBtn.TextScaled=true
blinkBtn.Font=Enum.Font.GothamBold blinkBtn.BorderSizePixel=0 blinkBtn.ZIndex=2
Instance.new("UICorner",blinkBtn).CornerRadius=UDim.new(0,6) hoverEffect(blinkBtn,Color3.fromRGB(80,0,160))
table.insert(page1Buttons,blinkBtn)
local blinkSettBtn=Instance.new("TextButton") blinkSettBtn.Parent=Frame blinkSettBtn.BackgroundColor3=Color3.fromRGB(60,0,120)
blinkSettBtn.Position=UDim2.new(0.82,0,0,430) blinkSettBtn.Size=UDim2.new(0.16,0,0,38)
blinkSettBtn.Text="⚙️" blinkSettBtn.TextColor3=Color3.fromRGB(255,255,255) blinkSettBtn.TextScaled=true
blinkSettBtn.Font=Enum.Font.GothamBold blinkSettBtn.BorderSizePixel=0 blinkSettBtn.ZIndex=2
Instance.new("UICorner",blinkSettBtn).CornerRadius=UDim.new(0,6) hoverEffect(blinkSettBtn,Color3.fromRGB(60,0,120))
table.insert(page1Buttons,blinkSettBtn)
blinkSettBtn.MouseButton1Click:Connect(function() blinkMenuOpen=not blinkMenuOpen BlinkMenu.Visible=blinkMenuOpen end)

local function doBlink()
    if blinkCooldown then notify("Blink cooling down!") return end
    local hrp=getHRP() if not hrp then return end
    blinkCooldown=true
    local lookVec=workspace.CurrentCamera.CFrame.LookVector
    local flatLook=Vector3.new(lookVec.X,0,lookVec.Z).Unit
    local startCF=hrp.CFrame local targetCF=startCF+flatLook*blinkDistance
    local trail={}
    for i=1,5 do
        local ghost=Instance.new("Part") ghost.Size=hrp.Size ghost.CFrame=startCF
        ghost.Anchored=true ghost.CanCollide=false ghost.Material=Enum.Material.Neon
        ghost.Color=Color3.fromRGB(140,0,255) ghost.Transparency=0.3+(i*0.1) ghost.Parent=workspace
        table.insert(trail,ghost)
    end
    task.spawn(function()
        local steps=12
        for s=1,steps do hrp.CFrame=startCF:Lerp(targetCF,s/steps) task.wait(0.01) end
        hrp.CFrame=targetCF
        for i=1,10 do for _,g in pairs(trail) do g.Transparency=g.Transparency+0.08 end task.wait(0.03) end
        for _,g in pairs(trail) do g:Destroy() end
    end)
    task.spawn(function()
        if blinkCooldownTime==0 then blinkCooldown=false return end
        for i=blinkCooldownTime,1,-1 do blinkBtn.Text="⚡ Blink ("..i.."s)" task.wait(1) end
        blinkCooldown=false blinkBtn.BackgroundColor3=Color3.fromRGB(80,0,160) blinkBtn.Text="⚡ Blink"
    end)
end
blinkBtn.MouseButton1Click:Connect(doBlink)

local defaultSpeed=nil
local SpeedMenu=makeSubFrame(280,80) local speedMenuOpen=false
local SpeedTitle=makeSubTitle(SpeedMenu,"Walk Speed") makeSubMenuDraggable(SpeedMenu,SpeedTitle)
local speedLbl=Instance.new("TextLabel") speedLbl.Parent=SpeedMenu speedLbl.BackgroundTransparency=1
speedLbl.Position=UDim2.new(0.02,0,0,40) speedLbl.Size=UDim2.new(0.96,0,0,14) speedLbl.Text="Speed: 16"
speedLbl.TextColor3=Color3.fromRGB(200,200,200) speedLbl.TextScaled=true speedLbl.Font=Enum.Font.Gotham speedLbl.ZIndex=21
local speedTrack=Instance.new("Frame") speedTrack.Parent=SpeedMenu speedTrack.BackgroundColor3=Color3.fromRGB(20,30,60)
speedTrack.Position=UDim2.new(0.02,0,0,56) speedTrack.Size=UDim2.new(0.96,0,0,14)
speedTrack.BorderSizePixel=0 speedTrack.ZIndex=21 speedTrack.Active=true
Instance.new("UICorner",speedTrack).CornerRadius=UDim.new(0,7)
local speedFill=Instance.new("Frame") speedFill.Parent=speedTrack speedFill.BackgroundColor3=BLUE
speedFill.Size=UDim2.new(0.03,0,1,0) speedFill.BorderSizePixel=0 speedFill.ZIndex=22
Instance.new("UICorner",speedFill).CornerRadius=UDim.new(0,7)
local draggingSpeed=false
speedTrack.InputBegan:Connect(function(i) if i.UserInputType==Enum.UserInputType.MouseButton1 then draggingSpeed=true end end)
UIS.InputEnded:Connect(function(i) if i.UserInputType==Enum.UserInputType.MouseButton1 then draggingSpeed=false end end)
UIS.InputChanged:Connect(function(i)
    if draggingSpeed and i.UserInputType==Enum.UserInputType.MouseMovement then
        local rel=math.clamp((i.Position.X-speedTrack.AbsolutePosition.X)/speedTrack.AbsoluteSize.X,0,1)
        local newSpeed=math.floor(1+(500-1)*rel) speedFill.Size=UDim2.new(rel,0,1,0) speedLbl.Text="Speed: "..newSpeed
        if getHum() then if not defaultSpeed then defaultSpeed=getHum().WalkSpeed end getHum().WalkSpeed=newSpeed end
    end
end)
local speedBtn=Instance.new("TextButton") speedBtn.Parent=Frame speedBtn.BackgroundColor3=DARKBLUE
speedBtn.Position=UDim2.new(0.02,0,0,474) speedBtn.Size=UDim2.new(0.78,0,0,38)
speedBtn.Text="Speed" speedBtn.TextColor3=Color3.fromRGB(255,255,255) speedBtn.TextScaled=true speedBtn.Font=Enum.Font.Gotham
speedBtn.BorderSizePixel=0 speedBtn.ZIndex=2
Instance.new("UICorner",speedBtn).CornerRadius=UDim.new(0,6) hoverEffect(speedBtn,DARKBLUE)
table.insert(page1Buttons,speedBtn)
speedBtn.MouseButton1Click:Connect(function()
    speedMenuOpen=not speedMenuOpen SpeedMenu.Visible=speedMenuOpen
    if speedMenuOpen and getHum() and not defaultSpeed then
        defaultSpeed=getHum().WalkSpeed local rel=(defaultSpeed-1)/(500-1)
        speedFill.Size=UDim2.new(rel,0,1,0) speedLbl.Text="Speed: "..defaultSpeed
    end
end)
local resetSpeedBtn=Instance.new("TextButton") resetSpeedBtn.Parent=Frame resetSpeedBtn.BackgroundColor3=Color3.fromRGB(150,0,0)
resetSpeedBtn.Position=UDim2.new(0.82,0,0,474) resetSpeedBtn.Size=UDim2.new(0.16,0,0,38)
resetSpeedBtn.Text="RST" resetSpeedBtn.TextColor3=Color3.fromRGB(255,255,255) resetSpeedBtn.TextScaled=true
resetSpeedBtn.Font=Enum.Font.GothamBold resetSpeedBtn.BorderSizePixel=0 resetSpeedBtn.ZIndex=2
Instance.new("UICorner",resetSpeedBtn).CornerRadius=UDim.new(0,6)
Instance.new("UIStroke",resetSpeedBtn).Color=BLUE hoverEffect(resetSpeedBtn,Color3.fromRGB(150,0,0))
table.insert(page1Buttons,resetSpeedBtn)
resetSpeedBtn.MouseButton1Click:Connect(function()
    if getHum()and defaultSpeed then
        getHum().WalkSpeed=defaultSpeed local rel=(defaultSpeed-1)/(500-1)
        speedFill.Size=UDim2.new(rel,0,1,0) speedLbl.Text="Speed: "..defaultSpeed notify("Speed reset!")
    else notify("No default speed yet!") end
end)

local spamTP=false local spamTPConn=nil
local spamTPBtn=makeBtn("Spam TP To Player",518,BLUE,1)
spamTPBtn.MouseButton1Click:Connect(function()
    spamTP=not spamTP spamTPBtn.BackgroundColor3=spamTP and GREEN or BLUE spamTPBtn.Text=spamTP and"Spam TP (ON)"or"Spam TP To Player"
    if spamTP then
        spamTPConn=RunService.Heartbeat:Connect(function()
            if not spamTP then spamTPConn:Disconnect() return end
            if getTHRP()and getHRP() then getHRP().CFrame=getTHRP().CFrame+Vector3.new(3,0,0) end
        end)
    else if spamTPConn then spamTPConn:Disconnect() spamTPConn=nil end end
end)

local spamChat=false local spamChatDelay=3 local spamChatCount=3 local spamChatAlt=false
local SpamChatMenu=makeSubFrame(300,390) local spamChatMenuOpen=false
local SpamChatTitleBar=makeSubTitle(SpamChatMenu,"Spam Chat") makeSubMenuDraggable(SpamChatMenu,SpamChatTitleBar)
local msg1Label=Instance.new("TextLabel") msg1Label.Parent=SpamChatMenu msg1Label.BackgroundTransparency=1
msg1Label.Position=UDim2.new(0.02,0,0,42) msg1Label.Size=UDim2.new(0.96,0,0,14) msg1Label.Text="Message 1:"
msg1Label.TextColor3=Color3.fromRGB(180,180,180) msg1Label.TextScaled=true msg1Label.Font=Enum.Font.Gotham
msg1Label.TextXAlignment=Enum.TextXAlignment.Left msg1Label.ZIndex=21
local chatMsgBox=Instance.new("TextBox") chatMsgBox.Parent=SpamChatMenu chatMsgBox.BackgroundColor3=BTNBG
chatMsgBox.Position=UDim2.new(0.02,0,0,58) chatMsgBox.Size=UDim2.new(0.96,0,0,30)
chatMsgBox.Text="Type message 1" chatMsgBox.TextColor3=Color3.fromRGB(255,255,255) chatMsgBox.TextScaled=true
chatMsgBox.Font=Enum.Font.Gotham chatMsgBox.BorderSizePixel=0 chatMsgBox.ZIndex=21 chatMsgBox.Active=true
Instance.new("UICorner",chatMsgBox).CornerRadius=UDim.new(0,6)
local msg2Label=Instance.new("TextLabel") msg2Label.Parent=SpamChatMenu msg2Label.BackgroundTransparency=1
msg2Label.Position=UDim2.new(0.02,0,0,94) msg2Label.Size=UDim2.new(0.96,0,0,14) msg2Label.Text="Message 2 (alternate):"
msg2Label.TextColor3=Color3.fromRGB(180,180,180) msg2Label.TextScaled=true msg2Label.Font=Enum.Font.Gotham
msg2Label.TextXAlignment=Enum.TextXAlignment.Left msg2Label.ZIndex=21
local chatMsgBox2=Instance.new("TextBox") chatMsgBox2.Parent=SpamChatMenu chatMsgBox2.BackgroundColor3=Color3.fromRGB(15,30,60)
chatMsgBox2.Position=UDim2.new(0.02,0,0,110) chatMsgBox2.Size=UDim2.new(0.96,0,0,30)
chatMsgBox2.Text="Type message 2" chatMsgBox2.TextColor3=Color3.fromRGB(180,180,180) chatMsgBox2.TextScaled=true
chatMsgBox2.Font=Enum.Font.Gotham chatMsgBox2.BorderSizePixel=0 chatMsgBox2.ZIndex=21 chatMsgBox2.Active=true
Instance.new("UICorner",chatMsgBox2).CornerRadius=UDim.new(0,6)
local altToggleBtn=Instance.new("TextButton") altToggleBtn.Parent=SpamChatMenu altToggleBtn.BackgroundColor3=DARKBLUE
altToggleBtn.Position=UDim2.new(0.02,0,0,146) altToggleBtn.Size=UDim2.new(0.96,0,0,28) altToggleBtn.Text="Alternate: OFF"
altToggleBtn.TextColor3=Color3.fromRGB(255,255,255) altToggleBtn.TextScaled=true altToggleBtn.Font=Enum.Font.Gotham
altToggleBtn.BorderSizePixel=0 altToggleBtn.ZIndex=21
Instance.new("UICorner",altToggleBtn).CornerRadius=UDim.new(0,6) hoverEffect(altToggleBtn,DARKBLUE)
altToggleBtn.MouseButton1Click:Connect(function()
    spamChatAlt=not spamChatAlt altToggleBtn.BackgroundColor3=spamChatAlt and GREEN or DARKBLUE
    altToggleBtn.Text=spamChatAlt and"Alternate: ON"or"Alternate: OFF"
    chatMsgBox2.BackgroundColor3=spamChatAlt and BTNBG or Color3.fromRGB(15,30,60)
    chatMsgBox2.TextColor3=spamChatAlt and Color3.fromRGB(255,255,255)or Color3.fromRGB(180,180,180)
end)
local countLbl=Instance.new("TextLabel") countLbl.Parent=SpamChatMenu countLbl.BackgroundTransparency=1
countLbl.Position=UDim2.new(0.02,0,0,182) countLbl.Size=UDim2.new(0.96,0,0,14) countLbl.Text="Times each: 3"
countLbl.TextColor3=Color3.fromRGB(200,200,200) countLbl.TextScaled=true countLbl.Font=Enum.Font.Gotham countLbl.ZIndex=21
local countTrack=Instance.new("Frame") countTrack.Parent=SpamChatMenu countTrack.BackgroundColor3=Color3.fromRGB(20,30,60)
countTrack.Position=UDim2.new(0.02,0,0,198) countTrack.Size=UDim2.new(0.96,0,0,14)
countTrack.BorderSizePixel=0 countTrack.ZIndex=21 countTrack.Active=true
Instance.new("UICorner",countTrack).CornerRadius=UDim.new(0,7)
local countFill=Instance.new("Frame") countFill.Parent=countTrack countFill.BackgroundColor3=BLUE
countFill.Size=UDim2.new(0.22,0,1,0) countFill.BorderSizePixel=0 countFill.ZIndex=22
Instance.new("UICorner",countFill).CornerRadius=UDim.new(0,7)
local draggingCount=false
countTrack.InputBegan:Connect(function(i) if i.UserInputType==Enum.UserInputType.MouseButton1 then draggingCount=true end end)
UIS.InputEnded:Connect(function(i) if i.UserInputType==Enum.UserInputType.MouseButton1 then draggingCount=false end end)
UIS.InputChanged:Connect(function(i)
    if draggingCount and i.UserInputType==Enum.UserInputType.MouseMovement then
        local rel=math.clamp((i.Position.X-countTrack.AbsolutePosition.X)/countTrack.AbsoluteSize.X,0,1)
        spamChatCount=math.max(1,math.floor(rel*10+0.5)) countFill.Size=UDim2.new(rel,0,1,0) countLbl.Text="Times each: "..spamChatCount
    end
end)
local chatDelayLbl=Instance.new("TextLabel") chatDelayLbl.Parent=SpamChatMenu chatDelayLbl.BackgroundTransparency=1
chatDelayLbl.Position=UDim2.new(0.02,0,0,218) chatDelayLbl.Size=UDim2.new(0.96,0,0,14) chatDelayLbl.Text="Delay: 3s"
chatDelayLbl.TextColor3=Color3.fromRGB(200,200,200) chatDelayLbl.TextScaled=true chatDelayLbl.Font=Enum.Font.Gotham chatDelayLbl.ZIndex=21
local chatDelayTrack=Instance.new("Frame") chatDelayTrack.Parent=SpamChatMenu chatDelayTrack.BackgroundColor3=Color3.fromRGB(20,30,60)
chatDelayTrack.Position=UDim2.new(0.02,0,0,234) chatDelayTrack.Size=UDim2.new(0.96,0,0,14)
chatDelayTrack.BorderSizePixel=0 chatDelayTrack.ZIndex=21 chatDelayTrack.Active=true
Instance.new("UICorner",chatDelayTrack).CornerRadius=UDim.new(0,7)
local chatDelayFill=Instance.new("Frame") chatDelayFill.Parent=chatDelayTrack chatDelayFill.BackgroundColor3=BLUE
chatDelayFill.Size=UDim2.new(0.034,0,1,0) chatDelayFill.BorderSizePixel=0 chatDelayFill.ZIndex=22
Instance.new("UICorner",chatDelayFill).CornerRadius=UDim.new(0,7)
local draggingChat=false
chatDelayTrack.InputBegan:Connect(function(i) if i.UserInputType==Enum.UserInputType.MouseButton1 then draggingChat=true end end)
UIS.InputEnded:Connect(function(i) if i.UserInputType==Enum.UserInputType.MouseButton1 then draggingChat=false end end)
UIS.InputChanged:Connect(function(i)
    if draggingChat and i.UserInputType==Enum.UserInputType.MouseMovement then
        local rel=math.clamp((i.Position.X-chatDelayTrack.AbsolutePosition.X)/chatDelayTrack.AbsoluteSize.X,0,1)
        spamChatDelay=math.floor((1+(60-1)*rel)*10)/10 chatDelayFill.Size=UDim2.new(rel,0,1,0) chatDelayLbl.Text="Delay: "..spamChatDelay.."s"
    end
end)
local startChatBtn=makeSubBtn(SpamChatMenu,"Start Spam Chat",256,Color3.fromRGB(0,130,0))
local stopChatBtn=makeSubBtn(SpamChatMenu,"Stop Spam Chat",298,Color3.fromRGB(150,0,0))
local chatConn=nil
local function sendMsg(msg)
    local sent=pcall(function() game:GetService("TextChatService").TextChannels.RBXGeneral:SendAsync(msg) end)
    if not sent then pcall(function() game:GetService("ReplicatedStorage").DefaultChatSystemChatEvents.SayMessageRequest:FireServer(msg,"All") end) end
end
startChatBtn.MouseButton1Click:Connect(function()
    if chatMsgBox.Text==""or chatMsgBox.Text=="Type message 1" then return notify("Type message 1 first!") end
    spamChat=true if chatConn then chatConn:Disconnect() end
    local last=tick() local sentCount=0 local onMsg1=true
    chatConn=RunService.Heartbeat:Connect(function()
        if not spamChat then chatConn:Disconnect() return end
        if tick()-last>=spamChatDelay then
            last=tick()
            if spamChatAlt then
                local msg=onMsg1 and chatMsgBox.Text or chatMsgBox2.Text sendMsg(msg)
                sentCount=sentCount+1 if sentCount>=spamChatCount then sentCount=0 onMsg1=not onMsg1 end
            else sendMsg(chatMsgBox.Text) end
        end
    end) notify("Spam chat started!")
end)
stopChatBtn.MouseButton1Click:Connect(function()
    spamChat=false if chatConn then chatConn:Disconnect() chatConn=nil end notify("Spam chat stopped!")
end)
local spamChatBtnMain=makeBtn("Spam Chat",562,DARKBLUE,1)
spamChatBtnMain.MouseButton1Click:Connect(function() spamChatMenuOpen=not spamChatMenuOpen SpamChatMenu.Visible=spamChatMenuOpen end)

local keybinds={fly=nil,noclip=nil,spamtp=nil,tp=nil,spamchat=nil,blink=nil,infjump=nil}
local listeningFor=nil
local KeybindMenu=makeSubFrame(300,430) local keybindMenuOpen=false
local KeybindTitle=makeSubTitle(KeybindMenu,"Keybinds") makeSubMenuDraggable(KeybindMenu,KeybindTitle)
local keybindRows={}
local function makeKeybindRow(name,label,ypos)
    local rf=Instance.new("Frame") rf.Parent=KeybindMenu rf.BackgroundColor3=Color3.fromRGB(15,25,55)
    rf.Position=UDim2.new(0.02,0,0,ypos) rf.Size=UDim2.new(0.96,0,0,44) rf.BorderSizePixel=0 rf.ZIndex=21
    Instance.new("UICorner",rf).CornerRadius=UDim.new(0,6)
    local nl=Instance.new("TextLabel") nl.Parent=rf nl.BackgroundTransparency=1
    nl.Position=UDim2.new(0.02,0,0,4) nl.Size=UDim2.new(0.5,0,0,18) nl.Text=label
    nl.TextColor3=Color3.fromRGB(255,255,255) nl.TextScaled=true nl.Font=Enum.Font.Gotham
    nl.TextXAlignment=Enum.TextXAlignment.Left nl.ZIndex=22
    local bb=Instance.new("TextButton") bb.Parent=rf bb.BackgroundColor3=DARKBLUE
    bb.Position=UDim2.new(0.02,0,0,24) bb.Size=UDim2.new(0.6,0,0,16) bb.Text="None"
    bb.TextColor3=Color3.fromRGB(255,255,255) bb.TextScaled=true bb.Font=Enum.Font.Gotham bb.BorderSizePixel=0 bb.ZIndex=22
    Instance.new("UICorner",bb).CornerRadius=UDim.new(0,4) hoverEffect(bb,DARKBLUE)
    local cb=Instance.new("TextButton") cb.Parent=rf cb.BackgroundColor3=Color3.fromRGB(150,0,0)
    cb.Position=UDim2.new(0.66,0,0,24) cb.Size=UDim2.new(0.32,0,0,16) cb.Text="Clear"
    cb.TextColor3=Color3.fromRGB(255,255,255) cb.TextScaled=true cb.Font=Enum.Font.Gotham cb.BorderSizePixel=0 cb.ZIndex=22
    Instance.new("UICorner",cb).CornerRadius=UDim.new(0,4) hoverEffect(cb,Color3.fromRGB(150,0,0))
    bb.MouseButton1Click:Connect(function() listeningFor=name bb.Text="Press a key..." bb.BackgroundColor3=GREEN end)
    cb.MouseButton1Click:Connect(function() keybinds[name]=nil bb.Text="None" bb.BackgroundColor3=DARKBLUE notify(label.." cleared!") end)
    keybindRows[name]=bb
end
makeKeybindRow("fly","Fly",42) makeKeybindRow("noclip","NoClip",92) makeKeybindRow("spamtp","Spam TP",142)
makeKeybindRow("tp","TP To Player",192) makeKeybindRow("spamchat","Spam Chat",242)
makeKeybindRow("blink","⚡ Blink",292) makeKeybindRow("infjump","Inf Jump",342)
UIS.InputBegan:Connect(function(i,gp)
    if gp then return end
    if i.UserInputType==Enum.UserInputType.Keyboard then
        if listeningFor then
            keybinds[listeningFor]=i.KeyCode
            if keybindRows[listeningFor] then keybindRows[listeningFor].Text=i.KeyCode.Name keybindRows[listeningFor].BackgroundColor3=DARKBLUE end
            notify(listeningFor.." → "..i.KeyCode.Name) listeningFor=nil return
        end
        if keybinds.fly and i.KeyCode==keybinds.fly then
            flying=not flying flyBtn.BackgroundColor3=flying and GREEN or DARKBLUE flyBtn.Text=flying and"Fly (ON)"or"Fly"
            if flying then startFly() else stopFly() end
        end
        if keybinds.noclip and i.KeyCode==keybinds.noclip then
            noclip=not noclip noclipBtn.BackgroundColor3=noclip and GREEN or DARKBLUE noclipBtn.Text=noclip and"NoClip (ON)"or"NoClip"
        end
        if keybinds.spamtp and i.KeyCode==keybinds.spamtp then
            spamTP=not spamTP spamTPBtn.BackgroundColor3=spamTP and GREEN or BLUE spamTPBtn.Text=spamTP and"Spam TP (ON)"or"Spam TP To Player"
            if spamTP then
                spamTPConn=RunService.Heartbeat:Connect(function()
                    if not spamTP then spamTPConn:Disconnect() return end
                    if getTHRP()and getHRP() then getHRP().CFrame=getTHRP().CFrame+Vector3.new(3,0,0) end
                end)
            else if spamTPConn then spamTPConn:Disconnect() spamTPConn=nil end end
        end
        if keybinds.tp and i.KeyCode==keybinds.tp then
            if getTHRP()and getHRP() then getHRP().CFrame=getTHRP().CFrame+Vector3.new(3,0,0) notify("Teleported!")
            else notify("Select a player first!") end
        end
        if keybinds.spamchat and i.KeyCode==keybinds.spamchat then spamChatMenuOpen=not spamChatMenuOpen SpamChatMenu.Visible=spamChatMenuOpen end
        if keybinds.blink and i.KeyCode==keybinds.blink then doBlink() end
        if keybinds.infjump and i.KeyCode==keybinds.infjump then
            infJump=not infJump infJumpBtn.BackgroundColor3=infJump and GREEN or DARKBLUE infJumpBtn.Text=infJump and"Inf Jump (ON)"or"Inf Jump"
            if infJump then
                infJumpConn=UIS.JumpRequest:Connect(function() local hum=getHum() if hum and infJump then hum:ChangeState(Enum.HumanoidStateType.Jumping) end end)
            else if infJumpConn then infJumpConn:Disconnect() infJumpConn=nil end end
        end
    end
end)
local keybindBtnMain=makeBtn("Keybinds",606,DARKBLUE,1)
keybindBtnMain.MouseButton1Click:Connect(function() keybindMenuOpen=not keybindMenuOpen KeybindMenu.Visible=keybindMenuOpen end)

local SettingsMenu=makeSubFrame(300,200) local settingsMenuOpen=false
local SettingsTitle=makeSubTitle(SettingsMenu,"⚙️ Settings") makeSubMenuDraggable(SettingsMenu,SettingsTitle)
local animBtn=Instance.new("TextButton") animBtn.Parent=SettingsMenu animBtn.BackgroundColor3=GREEN
animBtn.Position=UDim2.new(0.02,0,0,42) animBtn.Size=UDim2.new(0.96,0,0,36) animBtn.Text="Animations: ON"
animBtn.TextColor3=Color3.fromRGB(255,255,255) animBtn.TextScaled=true animBtn.Font=Enum.Font.Gotham animBtn.BorderSizePixel=0 animBtn.ZIndex=21
Instance.new("UICorner",animBtn).CornerRadius=UDim.new(0,6)
animBtn.MouseButton1Click:Connect(function()
    settings.animations=not settings.animations animBtn.BackgroundColor3=settings.animations and GREEN or DARKBLUE
    animBtn.Text=settings.animations and"Animations: ON"or"Animations: OFF" notify("Animations "..(settings.animations and"ON"or"OFF"))
end)
local closeSubsBtn=Instance.new("TextButton") closeSubsBtn.Parent=SettingsMenu closeSubsBtn.BackgroundColor3=GREEN
closeSubsBtn.Position=UDim2.new(0.02,0,0,84) closeSubsBtn.Size=UDim2.new(0.96,0,0,36) closeSubsBtn.Text="Close Subs On Hide: ON"
closeSubsBtn.TextColor3=Color3.fromRGB(255,255,255) closeSubsBtn.TextScaled=true closeSubsBtn.Font=Enum.Font.Gotham
closeSubsBtn.BorderSizePixel=0 closeSubsBtn.ZIndex=21
Instance.new("UICorner",closeSubsBtn).CornerRadius=UDim.new(0,6)
closeSubsBtn.MouseButton1Click:Connect(function()
    settings.closeSubsOnMenuClose=not settings.closeSubsOnMenuClose
    closeSubsBtn.BackgroundColor3=settings.closeSubsOnMenuClose and GREEN or DARKBLUE
    closeSubsBtn.Text=settings.closeSubsOnMenuClose and"Close Subs On Hide: ON"or"Close Subs On Hide: OFF"
    notify("Close subs "..(settings.closeSubsOnMenuClose and"ON"or"OFF"))
end)
local versionLbl=Instance.new("TextLabel") versionLbl.Parent=SettingsMenu versionLbl.BackgroundTransparency=1
versionLbl.Position=UDim2.new(0.02,0,0,130) versionLbl.Size=UDim2.new(0.96,0,0,20) versionLbl.Text="CHM v3.4"
versionLbl.TextColor3=Color3.fromRGB(100,100,150) versionLbl.TextScaled=true versionLbl.Font=Enum.Font.Gotham versionLbl.ZIndex=21
local settingsBtnMain=makeBtn("⚙️ Settings",650,DARKBLUE,1)
settingsBtnMain.MouseButton1Click:Connect(function() settingsMenuOpen=not settingsMenuOpen SettingsMenu.Visible=settingsMenuOpen end)

-- PAGE 2 - ANNOY PLAYER SETTINGS WINDOW
local AnnoySettingsWindow=makeSubFrame(280,340)
local annoySettingsOpen=false
local AnnoySettTitle=makeSubTitle(AnnoySettingsWindow,"😈 Annoy Settings")
makeSubMenuDraggable(AnnoySettingsWindow,AnnoySettTitle)

local annoyActiveTime=5 local annoyPauseTime=3 local annoyRotSpeed=10 local annoyRadius=8 local annoyLoop=true

local function addAnnoySlider(labelText,ypos,minVal,maxVal,defaultVal,callback)
    local lbl=Instance.new("TextLabel") lbl.Parent=AnnoySettingsWindow lbl.BackgroundTransparency=1
    lbl.Position=UDim2.new(0.02,0,0,ypos) lbl.Size=UDim2.new(0.96,0,0,14)
    lbl.Text=labelText..": "..defaultVal lbl.TextColor3=Color3.fromRGB(200,200,200)
    lbl.TextScaled=true lbl.Font=Enum.Font.Gotham lbl.ZIndex=21
    local track=Instance.new("Frame") track.Parent=AnnoySettingsWindow track.BackgroundColor3=Color3.fromRGB(20,30,60)
    track.Position=UDim2.new(0.02,0,0,ypos+16) track.Size=UDim2.new(0.96,0,0,14)
    track.BorderSizePixel=0 track.ZIndex=21 track.Active=true
    Instance.new("UICorner",track).CornerRadius=UDim.new(0,7)
    local fill=Instance.new("Frame") fill.Parent=track fill.BackgroundColor3=Color3.fromRGB(150,0,0)
    local startRel=(defaultVal-minVal)/(maxVal-minVal)
    fill.Size=UDim2.new(startRel,0,1,0) fill.BorderSizePixel=0 fill.ZIndex=22
    Instance.new("UICorner",fill).CornerRadius=UDim.new(0,7)
    local dragging=false
    track.InputBegan:Connect(function(i) if i.UserInputType==Enum.UserInputType.MouseButton1 then dragging=true end end)
    UIS.InputEnded:Connect(function(i) if i.UserInputType==Enum.UserInputType.MouseButton1 then dragging=false end end)
    UIS.InputChanged:Connect(function(i)
        if dragging and i.UserInputType==Enum.UserInputType.MouseMovement then
            local rel=math.clamp((i.Position.X-track.AbsolutePosition.X)/track.AbsoluteSize.X,0,1)
            local val=math.floor(minVal+(maxVal-minVal)*rel)
            fill.Size=UDim2.new(rel,0,1,0) lbl.Text=labelText..": "..val callback(val)
        end
    end)
end

addAnnoySlider("Active Time",42,1,30,5,function(v) annoyActiveTime=v end)
addAnnoySlider("Pause Time",76,0,30,3,function(v) annoyPauseTime=v end)
addAnnoySlider("Rotation Speed",110,1,50,10,function(v) annoyRotSpeed=v end)
addAnnoySlider("Radius",144,2,30,8,function(v) annoyRadius=v end)

local annoyLoopBtn=makeSubBtn(AnnoySettingsWindow,"Loop: ON",184,GREEN)
annoyLoopBtn.MouseButton1Click:Connect(function()
    annoyLoop=not annoyLoop annoyLoopBtn.BackgroundColor3=annoyLoop and GREEN or DARKBLUE
    annoyLoopBtn.Text=annoyLoop and"Loop: ON"or"Loop: OFF"
end)

local annoyActive=false local annoyConn=nil

local function stopAnnoy(annoyBtn)
    annoyActive=false if annoyConn then annoyConn:Disconnect() annoyConn=nil end
    if annoyBtn then annoyBtn.BackgroundColor3=Color3.fromRGB(150,0,0) annoyBtn.Text="😈 Annoy Player" end
    notify("Annoy stopped!")
end

-- PAGE 2 BUTTON - Annoy Player toggle button
local annoyMainBtn=Instance.new("TextButton") annoyMainBtn.Parent=Frame annoyMainBtn.BackgroundColor3=Color3.fromRGB(150,0,0)
annoyMainBtn.Position=UDim2.new(0.02,0,0,82) annoyMainBtn.Size=UDim2.new(0.78,0,0,38)
annoyMainBtn.Text="😈 Annoy Player" annoyMainBtn.TextColor3=Color3.fromRGB(255,255,255) annoyMainBtn.TextScaled=true
annoyMainBtn.Font=Enum.Font.GothamBold annoyMainBtn.BorderSizePixel=0 annoyMainBtn.ZIndex=2 annoyMainBtn.Visible=false
Instance.new("UICorner",annoyMainBtn).CornerRadius=UDim.new(0,6) hoverEffect(annoyMainBtn,Color3.fromRGB(150,0,0))
table.insert(page2Buttons,annoyMainBtn)

local annoySettBtn=Instance.new("TextButton") annoySettBtn.Parent=Frame annoySettBtn.BackgroundColor3=Color3.fromRGB(100,0,0)
annoySettBtn.Position=UDim2.new(0.82,0,0,82) annoySettBtn.Size=UDim2.new(0.16,0,0,38)
annoySettBtn.Text="⚙️" annoySettBtn.TextColor3=Color3.fromRGB(255,255,255) annoySettBtn.TextScaled=true
annoySettBtn.Font=Enum.Font.GothamBold annoySettBtn.BorderSizePixel=0 annoySettBtn.ZIndex=2 annoySettBtn.Visible=false
Instance.new("UICorner",annoySettBtn).CornerRadius=UDim.new(0,6) hoverEffect(annoySettBtn,Color3.fromRGB(100,0,0))
table.insert(page2Buttons,annoySettBtn)
annoySettBtn.MouseButton1Click:Connect(function()
    annoySettingsOpen=not annoySettingsOpen AnnoySettingsWindow.Visible=annoySettingsOpen
end)

local annoyStatusLbl=Instance.new("TextLabel") annoyStatusLbl.Parent=Frame annoyStatusLbl.BackgroundTransparency=1
annoyStatusLbl.Position=UDim2.new(0.02,0,0,126) annoyStatusLbl.Size=UDim2.new(0.96,0,0,20)
annoyStatusLbl.Text="Target: None selected" annoyStatusLbl.TextColor3=Color3.fromRGB(150,150,200)
annoyStatusLbl.TextScaled=true annoyStatusLbl.Font=Enum.Font.Gotham annoyStatusLbl.ZIndex=2 annoyStatusLbl.Visible=false
table.insert(page2Buttons,annoyStatusLbl)

annoyMainBtn.MouseButton1Click:Connect(function()
    if not selectedPlayer then notify("Select a player on Page 1 first!") return end
    annoyActive=not annoyActive
    if annoyActive then
        annoyMainBtn.BackgroundColor3=GREEN annoyMainBtn.Text="😈 Stop Annoy"
        notify("Annoying "..selectedPlayer.Name.."!")
        annoyConn=task.spawn(function()
            local angle=0 local activeTimer=0 local pausing=false local pauseTimer=0
            while annoyActive do
                local tHRP=getTHRP() local hrp=getHRP()
                if tHRP and hrp then
                    if not pausing then
                        angle=angle+annoyRotSpeed*0.05
                        local offset=Vector3.new(math.cos(angle)*annoyRadius,0,math.sin(angle)*annoyRadius)
                        hrp.CFrame=CFrame.new(tHRP.Position+offset)
                        activeTimer=activeTimer+0.05
                        if activeTimer>=annoyActiveTime then
                            activeTimer=0
                            if annoyPauseTime>0 then pausing=true pauseTimer=0 end
                            if not annoyLoop then stopAnnoy(annoyMainBtn) return end
                        end
                    else
                        pauseTimer=pauseTimer+0.05 if pauseTimer>=annoyPauseTime then pausing=false end
                    end
                end
                task.wait(0.05)
            end
        end)
    else
        stopAnnoy(annoyMainBtn)
    end
end)

-- update status label
RunService.Heartbeat:Connect(function()
    if currentPage==2 then
        annoyStatusLbl.Text="Target: "..(selectedPlayer and selectedPlayer.Name or"None selected")
    end
end)

local removeBtn=makeBtn("🗑️ Remove GUI",694,Color3.fromRGB(80,0,0),1)
removeBtn.MouseButton1Click:Connect(function() blurEffect:Destroy() ScreenGui:Destroy() end)

showPage(1)
notify("CHM v3.4 loaded!")