FE Menu Version 1.0

ProScripter29

Nov 17th, 2022 (edited)

Never

Add comment

Not a member of Pastebin yet? Sign Up, it unlocks many cool features!

text 12.91 KB | Gaming | 0 0

raw download clone embed print report

-- Important Variables
local LocalPlayer = game.Players:WaitForChild("realprohacx")
-- Services
local Players = game:GetService("Players")
local StarterPlayer = game:GetService("StarterPlayer")
-- GUI Functions --
local function CreateBorder(Parent, Thickness, Transparency)
local Int = Instance.new("UIStroke", Parent)
Int.Name = "_Border"
Int.ApplyStrokeMode = Enum.ApplyStrokeMode.Border
Int.LineJoinMode = Enum.LineJoinMode.Round
Int.Thickness = Thickness
Int.Transparency = Transparency
end
-- Creating the GUI --
local ScreenGui = Instance.new("ScreenGui", LocalPlayer.PlayerGui)
ScreenGui.Name = "HH2021's Hud"
ScreenGui.ResetOnSpawn = false
ScreenGui.IgnoreGuiInset = true
local Frame = Instance.new("Frame", ScreenGui)
Frame.Name = "Menu"
Frame.BackgroundColor3 = Color3.fromRGB(25,25,25)
Frame.BackgroundTransparency = 0.35
Frame.BorderSizePixel = 3
Frame.BorderColor3 = Color3.fromRGB(0,0,0)
Frame.Position = UDim2.new(0.41, 0, 0.312, 0)
Frame.Size = UDim2.new(0.179, 0,0.374, 0)
local Title = Instance.new("TextLabel", Frame)
Title.Name = "Title"
Title.BackgroundTransparency = 1
Title.Position = UDim2.new(0, 0,0.012, 0)
Title.Size = UDim2.new(1, 0,0.103, 0)
Title.Text = "FE Menu"
Title.Font = Enum.Font.FredokaOne
Title.TextColor3 = Color3.fromRGB(255,255,255)
Title.TextScaled = true
local SpeedText = Instance.new("TextLabel", Frame)
SpeedText.Name = "SpText"
SpeedText.BackgroundTransparency = 1
SpeedText.Position = UDim2.new(0.051, 0,0.152, 0)
SpeedText.Size = UDim2.new(0.383, 0,0.077, 0)
SpeedText.Text = "Speed"
SpeedText.Font = Enum.Font.FredokaOne
SpeedText.TextColor3 = Color3.fromRGB(255,255,255)
SpeedText.TextScaled = true
SpeedText.TextXAlignment = Enum.TextXAlignment.Left
local JumpText = Instance.new("TextLabel", Frame)
JumpText.Name = "JpText"
JumpText.BackgroundTransparency = 1
JumpText.Position = UDim2.new(0.051, 0,0.269, 0)
JumpText.Size = UDim2.new(0.383, 0,0.077, 0)
JumpText.Text = "Jump"
JumpText.Font = Enum.Font.FredokaOne
JumpText.TextColor3 = Color3.fromRGB(255,255,255)
JumpText.TextScaled = true
JumpText.TextXAlignment = Enum.TextXAlignment.Left
local SpeedBox = Instance.new("TextBox", Frame)
SpeedBox.Name = "SpeedBox"
SpeedBox.BackgroundColor3 = Color3.fromRGB(0,0,0)
SpeedBox.BackgroundTransparency = 0.65
SpeedBox.BorderSizePixel = 2
SpeedBox.BorderColor3 = Color3.fromRGB(0,0,0)
SpeedBox.Position = UDim2.new(0.611, 0,0.152, 0)
SpeedBox.Size = UDim2.new(0.331, 0,0.077, 0)
SpeedBox.Text = ""
SpeedBox.PlaceholderText = "..."
SpeedBox.Font = Enum.Font.FredokaOne
SpeedBox.TextColor3 = Color3.fromRGB(255,255,255)
SpeedBox.TextScaled = true
local JumpBox = Instance.new("TextBox", Frame)
JumpBox.Name = "SpeedBox"
JumpBox.BackgroundColor3 = Color3.fromRGB(0,0,0)
JumpBox.BackgroundTransparency = 0.65
JumpBox.BorderSizePixel = 2
JumpBox.BorderColor3 = Color3.fromRGB(0,0,0)
JumpBox.Position = UDim2.new(0.611, 0,0.269, 0)
JumpBox.Size = UDim2.new(0.331, 0,0.077, 0)
JumpBox.Text = ""
JumpBox.PlaceholderText = "..."
JumpBox.Font = Enum.Font.FredokaOne
JumpBox.TextColor3 = Color3.fromRGB(255,255,255)
JumpBox.TextScaled = true
local ViewPlayersText = Instance.new("TextLabel", Frame)
ViewPlayersText.Name = "ViewPlrsText"
ViewPlayersText.BackgroundTransparency = 1
ViewPlayersText.Position = UDim2.new(0.051, 0,0.459, 0)
ViewPlayersText.Size = UDim2.new(0.617, 0,0.077, 0)
ViewPlayersText.Text = "View Players"
ViewPlayersText.Font = Enum.Font.FredokaOne
ViewPlayersText.TextColor3 = Color3.fromRGB(255,255,255)
ViewPlayersText.TextScaled = true
ViewPlayersText.TextXAlignment = Enum.TextXAlignment.Left
local FlyText = Instance.new("TextLabel", Frame)
FlyText.Name = "FlyText"
FlyText.BackgroundTransparency = 1
FlyText.Position = UDim2.new(0.051, 0,0.582, 0)
FlyText.Size = UDim2.new(0.617, 0,0.077, 0)
FlyText.Text = "Fly"
FlyText.Font = Enum.Font.FredokaOne
FlyText.TextColor3 = Color3.fromRGB(255,255,255)
FlyText.TextScaled = true
FlyText.TextXAlignment = Enum.TextXAlignment.Left
local NoclipText = Instance.new("TextLabel", Frame)
NoclipText.Name = "NoClipText"
NoclipText.BackgroundTransparency = 1
NoclipText.Position = UDim2.new(0.051, 0,0.699, 0)
NoclipText.Size = UDim2.new(0.714, 0,0.077, 0)
NoclipText.Text = "Noclip"
NoclipText.Font = Enum.Font.FredokaOne
NoclipText.TextColor3 = Color3.fromRGB(255,255,255)
NoclipText.TextScaled = true
NoclipText.TextXAlignment = Enum.TextXAlignment.Left
local ViewPlayersButton = Instance.new("TextButton", Frame)
ViewPlayersButton.Name = "ToggleViewPlrs"
ViewPlayersButton.BackgroundColor3 = Color3.fromRGB(0,0,0)
ViewPlayersButton.BackgroundTransparency = 0.5
ViewPlayersButton.BorderSizePixel = 2
ViewPlayersButton.BorderColor3 = Color3.fromRGB(0,0,0)
ViewPlayersButton.Position = UDim2.new(0.85, 0,0.464, 0)
ViewPlayersButton.Size = UDim2.new(0.077, 0,0.077, 0)
ViewPlayersButton.Text = ""
local FlyButton = Instance.new("TextButton", Frame)
FlyButton.Name = "ToggleFly"
FlyButton.BackgroundColor3 = Color3.fromRGB(0,0,0)
FlyButton.BackgroundTransparency = 0.5
FlyButton.BorderSizePixel = 2
FlyButton.BorderColor3 = Color3.fromRGB(0,0,0)
FlyButton.Position = UDim2.new(0.85, 0,0.581, 0)
FlyButton.Size = UDim2.new(0.077, 0,0.077, 0)
FlyButton.Text = ""
local NoclipButton = Instance.new("TextButton", Frame)
NoclipButton.Name = "ToggleNoclip"
NoclipButton.BackgroundColor3 = Color3.fromRGB(0,0,0)
NoclipButton.BackgroundTransparency = 0.5
NoclipButton.BorderSizePixel = 2
NoclipButton.BorderColor3 = Color3.fromRGB(0,0,0)
NoclipButton.Position = UDim2.new(0.85, 0,0.697, 0)
NoclipButton.Size = UDim2.new(0.077, 0,0.077, 0)
NoclipButton.Text = ""
--local Border1 = CreateBorder(Frame, 3, 0.35)
--local Border2 = CreateBorder(SpeedBox, 2.5, 0.55)
--local Border3 = CreateBorder(JumpBox, 2.5, 0.55)
--local Border4 = CreateBorder(ViewPlayersButton, 2.5, 0.55)
--local Border5 = CreateBorder(FlyButton, 2.5, 0.55)
--local Border6 = CreateBorder(NoclipButton, 2.5, 0.55)
-- Main Function --
print("FE Menu Loaded! Enjoy ;)")
-- Speed
spawn(function()
while task.wait() do
spawn(function()
if (tonumber(SpeedBox.ContentText) ~= nil) then
local Character = LocalPlayer.Character
if Character then
local Humanoid = Character:FindFirstChild("Humanoid")
if Humanoid then
Humanoid.WalkSpeed = tonumber(SpeedBox.ContentText)
end
end
else
local Character = LocalPlayer.Character
if Character then
local Humanoid = Character:FindFirstChild("Humanoid")
if Humanoid then
Humanoid.WalkSpeed = game.StarterPlayer.CharacterWalkSpeed
end
end
end
end)
end
end)
-- Jump Power
spawn(function()
while task.wait() do
spawn(function()
if (tonumber(JumpBox.ContentText) ~= nil) then
local Character = LocalPlayer.Character
if Character then
local Humanoid = Character:FindFirstChild("Humanoid")
if Humanoid then
Humanoid.UseJumpPower = true
Humanoid.JumpPower = tonumber(JumpBox.ContentText)
end
end
else
local Character = LocalPlayer.Character
if Character then
local Humanoid = Character:FindFirstChild("Humanoid")
if Humanoid then
Humanoid.UseJumpPower = true
Humanoid.JumpPower = game.StarterPlayer.CharacterJumpPower
end
end
end
end)
end
end)
-- Toggling View Players
local ViewingPlayers = false
ViewPlayersButton.MouseButton1Click:Connect(function()
if not ViewingPlayers then
ViewingPlayers = true
ViewPlayersButton.BackgroundColor3 = Color3.fromRGB(0, 170, 255)
ViewPlayersButton.BorderColor3 = Color3.fromRGB(25,25,25)
ViewPlayersButton.BackgroundTransparency = 0.2
spawn(function()
while ViewingPlayers == true do
for _, Player in pairs(Players:GetPlayers()) do
local Character = Player.Character
if Character then
if not Character:FindFirstChild("_ClientHighlight") then
local NewHighlight = Instance.new("Highlight", Character)
NewHighlight.Name = "_ClientHighlight"
NewHighlight.FillTransparency = 0.65
NewHighlight.OutlineTransparency = 1
else
-- Ignore
end
end
end
task.wait()
end
end)
else
ViewingPlayers = false
ViewPlayersButton.BackgroundColor3 = Color3.fromRGB(0,0,0)
ViewPlayersButton.BorderColor3 = Color3.fromRGB(0,0,0)
ViewPlayersButton.BackgroundTransparency = 0.5
spawn(function()
for _, Player in pairs(Players:GetPlayers()) do
local Character = Player.Character
if Character then
if Character:FindFirstChild("_ClientHighlight") then
Character._ClientHighlight:Destroy()
else
-- Ignore
end
end
end
end)
end
end)
-- Toggle FLY
local Flying = false
FlyButton.MouseButton1Click:Connect(function()
if not Flying then
Flying = true
FlyButton.BackgroundColor3 = Color3.fromRGB(0, 170, 255)
FlyButton.BorderColor3 = Color3.fromRGB(25,25,25)
FlyButton.BackgroundTransparency = 0.2
spawn(function()
local Character = LocalPlayer.Character
if Character then
local Humanoid = Character.HumanoidRootPart
if Humanoid then
local FlyVelocity = Instance.new("BodyVelocity", Character.HumanoidRootPart)
FlyVelocity.Name = "_FlyVelocity"
FlyVelocity.MaxForce = Vector3.new(math.huge, math.huge, math.huge)
spawn(function()
local Mouse = LocalPlayer:GetMouse()
Mouse.Move:Connect(function()
if Flying then
FlyVelocity.Velocity = Mouse.Hit.LookVector * 50
Humanoid.CFrame = CFrame.lookAt(Humanoid.Position, Mouse.Hit.Position)
end
end)
end)
end
end
end)
else
Flying = false
FlyButton.BackgroundColor3 = Color3.fromRGB(0,0,0)
FlyButton.BorderColor3 = Color3.fromRGB(0,0,0)
FlyButton.BackgroundTransparency = 0.5
spawn(function()
local Character = LocalPlayer.Character
if Character then
local Humanoid = Character.HumanoidRootPart
if Humanoid then
if Humanoid:FindFirstChild("_FlyVelocity") then
Humanoid._FlyVelocity:Destroy()
end
end
end
end)
end
end)
-- Noclipper
local Noclipping = false
NoclipButton.MouseButton1Click:Connect(function()
if not Noclipping then
Noclipping = true
NoclipButton.BackgroundColor3 = Color3.fromRGB(0, 170, 255)
NoclipButton.BorderColor3 = Color3.fromRGB(25,25,25)
NoclipButton.BackgroundTransparency = 0.2
spawn(function()
local Character = LocalPlayer.Character
if Character then
local Humanoid
if Character.Humanoid and Character.Humanoid.RigType == Enum.HumanoidRigType.R15 then
Humanoid = Character:FindFirstChild("UpperTorso")
elseif Character.Humanoid and Character.Humanoid.RigType == Enum.HumanoidRigType.R6 then
Humanoid = Character:FindFirstChild("Torso")
end
if Humanoid then
Humanoid.Touched:Connect(function(Hit)
if Noclipping then
if not Hit:FindFirstChild("_OriginalCollisions") then
local New = Instance.new("BoolValue", Hit)
New.Name = "_OriginalCollisions"
New.Value = Hit.CanCollide
end
Hit.CanCollide = false
end
end)
end
end
end)
else
Noclipping = false
NoclipButton.BackgroundColor3 = Color3.fromRGB(0,0,0)
NoclipButton.BorderColor3 = Color3.fromRGB(0,0,0)
NoclipButton.BackgroundTransparency = 0.5
spawn(function()
for _, Object in pairs(workspace:GetDescendants()) do
if Object:IsA("BasePart") or Object:IsA("UnionOperation") then
if Object:FindFirstChild("_OriginalCollisions") then
Object.CanCollide = Object._OriginalCollisions.Value
Object._OriginalCollisions:Destroy()
end
end
end
end)
end
end)
-- EXTRA Functions & Services --
local UIS = game:GetService("UserInputService")
function Dragify(Frame)
dragToggle = nil
dragSpeed = 0.15
dragInput = nil
dragStart = nil
dragPos = nil
function updateInput(input)
Delta = input.Position - dragStart
Position = UDim2.new(startPos.X.Scale, startPos.X.Offset + Delta.X, startPos.Y.Scale, startPos.Y.Offset + Delta.Y)
game:GetService("TweenService"):Create(Frame, TweenInfo.new(0.035), {Position = Position}):Play()
end
Frame.InputBegan:Connect(function(input)
if (input.UserInputType == Enum.UserInputType.MouseButton1 or input.UserInputType == Enum.UserInputType.Touch) and UIS:GetFocusedTextBox() == nil then
dragToggle = true
dragStart = input.Position
startPos = Frame.Position
input.Changed:Connect(function()
if input.UserInputState == Enum.UserInputState.End then
dragToggle = false
end
end)
end
end)
Frame.InputChanged:Connect(function(input)
if input.UserInputType == Enum.UserInputType.MouseMovement or input.UserInputType == Enum.UserInputType.Touch then
dragInput = input
end
end)
game:GetService("UserInputService").InputChanged:Connect(function(input)
if input == dragInput and dragToggle then
updateInput(input)
end
end)
end
Dragify(Frame)

Add Comment

Please, Sign In to add comment