Pastebin

New Paste Add Image

--====================================================
--  HENEX ADMIN PANEL  (HACK STYLE ADMIN UI)
--====================================================

--// Services
local Players = game:GetService("Players")
local UIS = game:GetService("UserInputService")
local RunService = game:GetService("RunService")
local Workspace = game:GetService("Workspace")

local player = Players.LocalPlayer
local Camera = Workspace.CurrentCamera

--====================================================
--  SPEED LOCK
--====================================================
local DEFAULT_SPEED = 16
local MAX_SPEED = 300
local speedValue = DEFAULT_SPEED

local humanoid
local speedConn

local function lockSpeed()
	local char = player.Character or player.CharacterAdded:Wait()
	humanoid = char:WaitForChild("Humanoid")

if speedConn then speedConn:Disconnect() end
	humanoid.WalkSpeed = speedValue

speedConn = humanoid:GetPropertyChangedSignal("WalkSpeed"):Connect(function()
		if humanoid.WalkSpeed ~= speedValue then
			humanoid.WalkSpeed = speedValue
		end
	end)
end

player.CharacterAdded:Connect(function()
	task.wait(0.2)
	lockSpeed()
end)

--====================================================
--  GUI
--====================================================
local gui = Instance.new("ScreenGui")
gui.Name = "HenexAdminPanel"
gui.ResetOnSpawn = false
gui.Parent = player.PlayerGui

--================ Toggle Button ======================
local toggle = Instance.new("TextButton")
toggle.Parent = gui
toggle.Size = UDim2.fromOffset(52,52)
toggle.Position = UDim2.fromScale(0.015,0.85)
toggle.Text = "≡"
toggle.TextScaled = true
toggle.Font = Enum.Font.GothamBlack
toggle.BackgroundColor3 = Color3.fromRGB(0,170,255)
toggle.TextColor3 = Color3.new(1,1,1)
Instance.new("UICorner", toggle).CornerRadius = UDim.new(1,0)

--================ Main Frame =========================
local frame = Instance.new("Frame")
frame.Parent = gui
frame.Size = UDim2.fromScale(0.32,0.45)
frame.Position = UDim2.fromScale(0.34,0.27)
frame.BackgroundColor3 = Color3.fromRGB(15,15,15)
frame.Visible = true
frame.Active = true
Instance.new("UICorner", frame).CornerRadius = UDim.new(0,12)

local stroke = Instance.new("UIStroke", frame)
stroke.Color = Color3.fromRGB(0,170,255)
stroke.Thickness = 2

--================ Title ==============================
local title = Instance.new("TextLabel", frame)
title.Size = UDim2.fromScale(1,0.14)
title.BackgroundTransparency = 1
title.Text = "HENEX // ADMIN"
title.Font = Enum.Font.GothamBlack
title.TextScaled = true
title.TextColor3 = Color3.fromRGB(0,170,255)

--====================================================
--  DRAG / GRAB
--====================================================
local dragging, dragStart, startPos

frame.InputBegan:Connect(function(i)
	if i.UserInputType == Enum.UserInputType.MouseButton1
	or i.UserInputType == Enum.UserInputType.Touch then
		dragging = true
		dragStart = i.Position
		startPos = frame.Position
	end
end)

frame.InputEnded:Connect(function(i)
	if i.UserInputType == Enum.UserInputType.MouseButton1
	or i.UserInputType == Enum.UserInputType.Touch then
		dragging = false
	end
end)

UIS.InputChanged:Connect(function(i)
	if dragging and (i.UserInputType == Enum.UserInputType.MouseMovement
	or i.UserInputType == Enum.UserInputType.Touch) 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
		)
	end
end)

toggle.MouseButton1Click:Connect(function()
	frame.Visible = not frame.Visible
end)

--====================================================
--  SPEED
--====================================================
local speedLabel = Instance.new("TextLabel", frame)
speedLabel.Size = UDim2.fromScale(1,0.07)
speedLabel.Position = UDim2.fromScale(0,0.16)
speedLabel.BackgroundTransparency = 1
speedLabel.Text = "WALK SPEED"
speedLabel.Font = Enum.Font.GothamBold
speedLabel.TextScaled = true
speedLabel.TextColor3 = Color3.fromRGB(180,180,180)

local speedBox = Instance.new("TextBox", frame)
speedBox.Size = UDim2.fromScale(0.8,0.13)
speedBox.Position = UDim2.fromScale(0.1,0.22)
speedBox.Text = tostring(speedValue)
speedBox.TextScaled = true
speedBox.Font = Enum.Font.GothamBold
speedBox.BackgroundColor3 = Color3.fromRGB(25,25,25)
speedBox.TextColor3 = Color3.new(1,1,1)
speedBox.ClearTextOnFocus = false
Instance.new("UICorner", speedBox)

speedBox.FocusLost:Connect(function()
	local v = tonumber(speedBox.Text)
	if v then
		speedValue = math.clamp(v,1,MAX_SPEED)
		lockSpeed()
	end
	speedBox.Text = tostring(speedValue)
end)

--====================================================
--  ADVANCED ITEM ESP
--====================================================
local espButton = Instance.new("TextButton", frame)
espButton.Size = UDim2.fromScale(0.8,0.13)
espButton.Position = UDim2.fromScale(0.1,0.42)
espButton.Text = "ITEM ESP : OFF"
espButton.TextScaled = true
espButton.Font = Enum.Font.GothamBlack
espButton.BackgroundColor3 = Color3.fromRGB(0,120,200)
espButton.TextColor3 = Color3.new(1,1,1)
Instance.new("UICorner", espButton)

-- تصنيف
local itemColors = {
	Key = Color3.fromRGB(255,60,60),
	Tool = Color3.fromRGB(0,170,255),
	Heal = Color3.fromRGB(60,255,120),
	Default = Color3.fromRGB(255,255,255)
}

local targetItems = {
	Flashlight="Tool",FlashlightObtain="Tool",
	Lighter="Tool",LighterObtain="Tool",
	Lockpick="Key",LockpickObtain="Key",
	SkeletonKey="Key",SkeletonKeyObtain="Key",
	RoomKey="Key",RoomKeyObtain="Key",
	ElectricalRoomKey="Key",ElectricalRoomKeyObtain="Key",
	Bandages="Heal",BandagesObtain="Heal",
	Vitamins="Heal",VitaminsObtain="Heal",
	Batteries="Tool",BatteriesObtain="Tool"
}

local espEnabled = false
local espData = {}

local function createESP(model)
	if espData[model] or not model.PrimaryPart then return end

-- Billboard
	local gui = Instance.new("BillboardGui")
	gui.Adornee = model.PrimaryPart
	gui.Size = UDim2.fromOffset(260,80)
	gui.AlwaysOnTop = true
	gui.Parent = model.PrimaryPart

local label = Instance.new("TextLabel", gui)
	label.Size = UDim2.fromScale(1,1)
	label.BackgroundTransparency = 1
	label.Font = Enum.Font.GothamBlack
	label.TextScaled = true
	label.TextStrokeTransparency = 0

-- Tracer
	local line = Instance.new("Frame")
	line.BorderSizePixel = 0
	line.AnchorPoint = Vector2.new(0,0.5)
	line.BackgroundColor3 = Color3.new(1,1,1)
	line.Parent = gui

-- Boxes
	local boxes = {}
	for _,p in ipairs(model:GetDescendants()) do
		if p:IsA("BasePart") then
			local box = Instance.new("BoxHandleAdornment")
			box.Adornee = p
			box.Size = p.Size
			box.Transparency = 0.6
			box.AlwaysOnTop = true
			box.Parent = p
			table.insert(boxes, box)
		end
	end

espData[model] = {
		Label = label,
		Boxes = boxes,
		Line = line,
		Model = model
	}
end

local function clearESP()
	for _,data in pairs(espData) do
		if data.Label then
			data.Label.Parent:Destroy()
		end
		for _,b in ipairs(data.Boxes) do
			b:Destroy()
		end
	end
	espData = {}
end

espButton.MouseButton1Click:Connect(function()
	espEnabled = not espEnabled
	espButton.Text = espEnabled and "ITEM ESP : ON" or "ITEM ESP : OFF"

if not espEnabled then
		clearESP()
	end
end)

RunService.RenderStepped:Connect(function()
	if not espEnabled then return end

-- create
	for _,obj in ipairs(Workspace:GetDescendants()) do
		if obj:IsA("Model") and targetItems[obj.Name] then
			createESP(obj)
		end
	end

local rainbow = Color3.fromHSV(tick()%1,1,1)

for model,data in pairs(espData) do
		if not model.PrimaryPart then continue end

local root = player.Character and player.Character:FindFirstChild("HumanoidRootPart")
		if not root then continue end

local dist = math.floor((root.Position - model.PrimaryPart.Position).Magnitude)

local colorType = itemColors[targetItems[model.Name]] or itemColors.Default
		local finalColor = rainbow

-- Text
		data.Label.Text = model.Name.."  ["..dist.."m]"
		data.Label.TextColor3 = finalColor

-- Boxes
		for _,b in ipairs(data.Boxes) do
			b.Color = BrickColor.new(finalColor)
		end

-- Tracer
		local screenPos, onScreen = Camera:WorldToViewportPoint(model.PrimaryPart.Position)
		if onScreen then
			local x = screenPos.X
			local y = screenPos.Y

data.Line.Visible = true
			data.Line.Position = UDim2.fromOffset(130,40)
			data.Line.Size = UDim2.fromOffset(math.abs(x-130),2)
			data.Line.BackgroundColor3 = finalColor
		else
			data.Line.Visible = false
		end
	end
end)

--====================================================
-- INIT
--====================================================
lockSpeed()

Settings

Title : [Optional]

Paste Folder : [Optional]

Syntax : [Optional]

Expiration : [Optional]

Status : [Optional]

Password : [Optional]

Description: [Optional]

Tags: [Optional]

Encrypt Paste (?)

You are currently not logged in, this means you can not edit or delete anything you paste. Sign Up or Login

Settings

Site Languages