Pastebin

New Paste Add Image

--====================================================
--  HENEX ADMIN PANEL (Hack Style 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

--====================================================
--  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)

-- Glow
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 (ALL DEVICES)
--====================================================
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 Logic
toggle.MouseButton1Click:Connect(function()
	frame.Visible = not frame.Visible
end)

--====================================================
--  SPEED BOX
--====================================================
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).CornerRadius = UDim.new(0,8)

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)

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)

--====================================================
--  ITEMS ESP (GLOBAL)
--====================================================
local espButton = Instance.new("TextButton", frame)
espButton.Size = UDim2.fromScale(0.8,0.13)
espButton.Position = UDim2.fromScale(0.1,0.42)
espButton.Text = "ITEMS ESP"
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).CornerRadius = UDim.new(0,8)

local targetItems = {
	"Flashlight","FlashlightObtain","Lighter","LighterObtain","Lockpick","LockpickObtain",
	"Vitamins","VitaminsObtain","Candle","CandleObtain","Crucifix","CrucifixObtain",
	"SkeletonKey","SkeletonKeyObtain","Shakelight","ShakelightObtain","NVCS3000","NVCS3000Obtain",
	"RoomKey","RoomKeyObtain","SolutionPaper","SolutionPaperObtain","LibraryBook","LibraryBookObtain",
	"PuzzlePainting","PuzzlePaintingObtain","Bandages","BandagesObtain","Batteries","BatteriesObtain",
	"ElectricalRoomKey","ElectricalRoomKeyObtain"
}

local espParts = {}
local espEnabled = false

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

if not espEnabled then
		for _,box in pairs(espParts) do
			box:Destroy()
		end
		espParts = {}
	end
end)

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

for _,obj in ipairs(Workspace:GetDescendants()) do
		if obj:IsA("Model") and table.find(targetItems, obj.Name) then
			for _,p in ipairs(obj:GetDescendants()) do
				if p:IsA("BasePart") and not espParts[p] then
					local box = Instance.new("BoxHandleAdornment")
					box.Adornee = p
					box.Size = p.Size
					box.AlwaysOnTop = true
					box.Transparency = 0.5
					box.Parent = p
					espParts[p] = box
				end
			end
		end
	end

local hue = tick()%1
	for _,box in pairs(espParts) do
		box.Color = BrickColor.new(Color3.fromHSV(hue,1,1))
	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