-- Minified POLEREX GUI
local P = game:GetService("Players")
local RS = game:GetService("RunService")
local UIS = game:GetService("UserInputService")
local TS = game:GetService("TweenService")
local me = P.LocalPlayer
local pg = me:WaitForChild("PlayerGui")

local function r(o)local c=Instance.new("UICorner")c.CornerRadius=UDim.new(0,8)c.Parent=o end

-- loading overlay
local sgLoad = Instance.new("ScreenGui",pg); sgLoad.Name="__plx_load"
local lf = Instance.new("Frame",sgLoad); lf.Size=UDim2.new(1,0,1,0); lf.BackgroundColor3=Color3.new(0,0,0); lf.ZIndex=10
r(lf)
local pbBack=Instance.new("Frame",lf); pbBack.Size=UDim2.new(0.8,0,0,20); pbBack.Position=UDim2.new(0.1,0,0.5,-10); pbBack.BackgroundColor3=Color3.fromRGB(40,40,40); pbBack.ZIndex=11; r(pbBack)
local pb=Instance.new("Frame",pbBack); pb.Size=UDim2.new(0,0,1,0); pb.BackgroundColor3=Color3.fromRGB(160,0,255); pb.ZIndex=12; r(pb)
local pt=Instance.new("TextLabel",lf); pt.Size=UDim2.new(1,0,0,20); pt.Position=UDim2.new(0,0,0.5,10); pt.BackgroundTransparency=1; pt.TextColor3=Color3.new(1,1,1); pt.Font=Enum.Font.SourceSansBold; pt.TextScaled=true; pt.Text="0%"; pt.ZIndex=13

for i=1,100 do pb.Size=UDim2.new(i/100,0,1,0); pt.Text = tostring(i).."%"; wait(0.01) end
wait(0.3)
TS:Create(lf,TweenInfo.new(0.45),{BackgroundTransparency=1}):Play()
TS:Create(pb,TweenInfo.new(0.45),{BackgroundTransparency=1}):Play()
TS:Create(pt,TweenInfo.new(0.45),{TextTransparency=1}):Play()
wait(0.5)
lf:Destroy()

-- main gui
local sg=Instance.new("ScreenGui",pg); sg.Name="PolerexLockGui"
local mf=Instance.new("Frame",sg); mf.Size=UDim2.new(0,300,0,250); mf.Position=UDim2.new(0.5,-150,0.5,-125); mf.BackgroundColor3=Color3.fromRGB(30,30,30); mf.Active=true; mf.Draggable=true; r(mf)
TS:Create(mf,TweenInfo.new(0.4),{Position=mf.Position}):Play()
local grad=Instance.new("UIGradient",mf); grad.Color=ColorSequence.new{ColorSequenceKeypoint.new(0,Color3.fromRGB(80,0,120)),ColorSequenceKeypoint.new(1,Color3.fromRGB(160,0,255))}; grad.Rotation=45
local title=Instance.new("TextLabel",mf); title.Size=UDim2.new(1,0,0,30); title.BackgroundTransparency=1; title.Text="POLEREX"; title.Font=Enum.Font.Montserrat; title.TextColor3=Color3.fromRGB(255,165,0); title.TextScaled=true; r(title)
local closeBtn=Instance.new("TextButton",mf); closeBtn.Size=UDim2.new(0,30,0,30); closeBtn.Position=UDim2.new(1,-35,0,5); closeBtn.Text="X"; closeBtn.Font=Enum.Font.SourceSansBold; closeBtn.TextColor3=Color3.new(1,0.3,0.3); closeBtn.BackgroundColor3=Color3.fromRGB(50,0,0); closeBtn.TextScaled=true; r(closeBtn)
local gear=Instance.new("TextButton",mf); gear.Size=UDim2.new(0,30,0,30); gear.Position=UDim2.new(1,-70,0,5); gear.Text="⚙️"; gear.Font=Enum.Font.SourceSansBold; gear.TextColor3=Color3.new(1,1,1); gear.BackgroundColor3=Color3.fromRGB(50,50,50); gear.TextScaled=true; r(gear)
local sc=Instance.new("ScrollingFrame",mf); sc.Size=UDim2.new(0.9,0,0,100); sc.Position=UDim2.new(0.05,0,0,40); sc.CanvasSize=UDim2.new(0,0,0,0); sc.BackgroundColor3=Color3.fromRGB(50,50,50); sc.ScrollBarThickness=6; r(sc)
local lockBtn=Instance.new("TextButton",mf); lockBtn.Size=UDim2.new(0.9,0,0,30); lockBtn.Position=UDim2.new(0.05,0,0,150); lockBtn.Text="Lock"; lockBtn.Font=Enum.Font.SourceSans; lockBtn.TextColor3=Color3.new(1,1,1); lockBtn.BackgroundColor3=Color3.fromRGB(70,70,70); lockBtn.TextScaled=true; r(lockBtn)
local notif=Instance.new("TextLabel",mf); notif.Size=UDim2.new(0.9,0,0,25); notif.Position=UDim2.new(0.05,0,1,5); notif.BackgroundTransparency=1; notif.Text=""; notif.Font=Enum.Font.SourceSansItalic; notif.TextColor3=Color3.fromRGB(255,255,255); notif.TextScaled=true; r(notif)

-- confirm popup on top
local cf=Instance.new("Frame",sg); cf.Size=UDim2.new(0,220,0,110); cf.Position=UDim2.new(0.5,-110,0.5,-55); cf.BackgroundColor3=Color3.fromRGB(40,0,40); cf.Visible=false; r(cf)
local ct=Instance.new("TextLabel",cf); ct.Size=UDim2.new(1,0,0.5,0); ct.Position=UDim2.new(0,0,0,0); ct.BackgroundTransparency=1; ct.Text="Are you sure?"; ct.Font=Enum.Font.SourceSansBold; ct.TextColor3=Color3.new(1,1,1); ct.TextScaled=true
local yes=Instance.new("TextButton",cf); yes.Size=UDim2.new(0.8,0,0.33,0); yes.Position=UDim2.new(0.1,0,0.55,0); yes.Text="Yes"; yes.Font=Enum.Font.SourceSans; yes.TextColor3=Color3.new(1,1,1); yes.BackgroundColor3=Color3.fromRGB(100,0,100); yes.TextScaled=true; r(yes)

-- settings frame
local sf=Instance.new("Frame",sg); sf.Size=mf.Size; sf.Position=mf.Position; sf.BackgroundColor3=Color3.fromRGB(25,25,25); sf.Visible=false; r(sf)
local st=Instance.new("TextLabel",sf); st.Size=UDim2.new(1,0,0,30); st.BackgroundTransparency=1; st.Text="⚙️ SETTINGS"; st.Font=Enum.Font.Montserrat; st.TextColor3=Color3.fromRGB(255,255,255); st.TextScaled=true; r(st)
local hBtn=Instance.new("TextButton",sf); hBtn.Size=UDim2.new(0.9,0,0,36); hBtn.Position=UDim2.new(0.05,0,0,48); hBtn.Font=Enum.Font.SourceSans; hBtn.TextScaled=true; r(hBtn)
local aBtn=Instance.new("TextButton",sf); aBtn.Size=UDim2.new(0.9,0,0,36); aBtn.Position=UDim2.new(0.05,0,0,96); aBtn.Font=Enum.Font.SourceSans; aBtn.TextScaled=true; r(aBtn)
local back=Instance.new("TextButton",sf); back.Size=UDim2.new(0.3,0,0,30); back.Position=UDim2.new(0.05,0,1,-35); back.Text="⬅ Back"; back.Font=Enum.Font.SourceSansBold; back.TextScaled=true; back.Parent=sf; r(back)

-- runtime state
local sel=nil
local locking=false
local conn=nil
local HEALTH_POS=Vector3.new(7.52,10,1355)
local hpTP=true
local aL=true
local LOCKR=300
local cd=false

local function show(msg,d) d=d or 2 notif.TextTransparency=1 notif.Text=msg TS:Create(notif,TweenInfo.new(0.3),{TextTransparency=0}):Play() delay(d,function() TS:Create(notif,TweenInfo.new(0.5),{TextTransparency=1}):Play() end) end
local function updBtns()
    hBtn.Text="Health TP: "..(hpTP and "ON" or "OFF")
    hBtn.BackgroundColor3 = hpTP and Color3.fromRGB(0,130,0) or Color3.fromRGB(80,0,0)
    aBtn.Text="Anti-Level: "..(aL and "ON" or "OFF")
    aBtn.BackgroundColor3 = aL and Color3.fromRGB(0,130,0) or Color3.fromRGB(80,0,0)
end
updBtns()

-- populate player list (DisplayName) + health bar + highlight
local function refresh()
    sc:ClearAllChildren()
    local y=0
    for _,pl in ipairs(P:GetPlayers()) do
        if pl ~= me then
            local b=Instance.new("TextButton",sc)
            b.Size=UDim2.new(1,0,0,26); b.Position=UDim2.new(0,0,0,y); b.Text=pl.DisplayName; b.Font=Enum.Font.SourceSans; b.TextColor3=Color3.new(1,1,1); b.BackgroundColor3=Color3.fromRGB(60,60,60); b.TextScaled=true; r(b)
            local glow=Instance.new("Frame",b); glow.Size=UDim2.new(1,0,1,0); glow.BorderSizePixel=0; glow.BackgroundColor3=Color3.fromRGB(255,255,0); glow.BackgroundTransparency=1; r(glow)
            local hb=Instance.new("Frame",b); hb.Size=UDim2.new(1,0,0,4); hb.Position=UDim2.new(0,0,1,0); hb.BackgroundColor3=Color3.fromRGB(0,255,0); r(hb)
            b.MouseButton1Click:Connect(function()
                sel=pl.Name
                for _,c in pairs(sc:GetChildren()) do
                    if c:IsA("TextButton") then
                        local f=c:FindFirstChildWhichIsA("Frame")
                        if f then f.BackgroundTransparency=1 end
                    end
                end
                glow.BackgroundTransparency=0.8
                show("Selected: "..pl.DisplayName)
            end)
            -- update health bar
            RS.Heartbeat:Connect(function()
                local h=pl.Character and pl.Character:FindFirstChildOfClass("Humanoid")
                if h then
                    local r=math.clamp(h.Health/h.MaxHealth,0,1)
                    hb.Size=UDim2.new(r,0,0,4)
                    hb.BackgroundColor3=Color3.fromRGB(math.floor(255*(1-r)),math.floor(255*r),0)
                end
            end)
            y=y+30
        end
    end
    sc.CanvasSize=UDim2.new(0,0,0,y)
end
P.PlayerAdded:Connect(refresh)
P.PlayerRemoving:Connect(refresh)
refresh()

-- start/stop locking
local function startLock(name)
    local t=P:FindFirstChild(name)
    if not t then return end
    if conn then conn:Disconnect(); conn=nil end
    conn = RS.Heartbeat:Connect(function()
        if not locking then return end
        local tc = t.Character
        local lc = me.Character
        if not tc or not lc then return end
        local tHR = tc:FindFirstChild("HumanoidRootPart")
        local lHR = lc:FindFirstChild("HumanoidRootPart")
        local lHum = lc:FindFirstChildOfClass("Humanoid")
        if not tHR or not lHR then return end
        if (tHR.Position - lHR.Position).Magnitude > LOCKR then return end
        if hpTP and lHum and lHum.Health < 25 and not cd then
            lHR.CFrame = CFrame.new(HEALTH_POS)
            show("Health TP triggered")
            cd = true
            locking = false
            delay(10,function() cd=false end)
            if conn then conn:Disconnect(); conn=nil end
            return
        end
        if aL and lHR.Position.Y < 8 then
            if not lHR.Anchored then lHR.Anchored = true; show("Anti-Level active") end
            return
        elseif aL and lHR.Anchored then
            local th = tc:FindFirstChildOfClass("Humanoid")
            if th and th.Health > 0 then lHR.Anchored = false; show("Resuming Lock") end
        end
        local offset = tHR.CFrame.LookVector * -3
        local np = tHR.Position + offset
        lHR.CFrame = CFrame.new(np, tHR.Position)
    end)
end

-- UI interactions
lockBtn.MouseButton1Click:Connect(function()
    if not sel then show("No player selected") return end
    locking = not locking
    if locking then show("Locking "..sel); startLock(sel) else show("Nevermind") if conn then conn:Disconnect(); conn=nil end end
end)

closeBtn.MouseButton1Click:Connect(function() cf.Visible=true end)
yes.MouseButton1Click:Connect(function() sg:Destroy() end)

gear.MouseButton1Click:Connect(function() mf.Visible=false; sf.Visible=true end)
back.MouseButton1Click:Connect(function() sf.Visible=false; mf.Visible=true end)

hBtn.MouseButton1Click:Connect(function() hpTP = not hpTP; updBtns() end)
aBtn.MouseButton1Click:Connect(function() aL = not aL; updBtns() end)

UIS.InputBegan:Connect(function(i,gp) if gp then return end if i.KeyCode==Enum.KeyCode.J then if sf.Visible then sf.Visible=false; mf.Visible=true else sf.Visible=true; mf.Visible=false end end end)