Happy's Universal Hud

-- Coded by HappyH0lidays2021

-- (VERY IMPORTANT) UI Library
local Library = loadstring(game:HttpGet("https://pastebin.com/raw/jNS157AK"))()

-- Services
local Players = game:GetService("Players")
local Lighting = game:GetService("Lighting")

local ReplicatedStorage = game:GetService("ReplicatedStorage")
local StarterGui = game:GetService("StarterGui")
local StarterPlayers = game:GetService("StarterPlayer")

local UserInputService = game:GetService("UserInputService")
local VirtualUser = game:GetService("VirtualUser")

local TeleportService = game:GetService("TeleportService")

-- Variables

local Window = Library:CreateWindow("Happy's Hud [BETA]", "...")

local Main = Window:addPage("Main", 4, true, 7.5)

local Player = Players.LocalPlayer

local WalkSpeed = StarterPlayers.CharacterWalkSpeed -- Set to the default WalkSpeed
local JumpPower = StarterPlayers.CharacterJumpPower -- Set to the default JumpPower
local HitboxSize = 5 -- Set to the default Hitbox Size

local InfJumpsEnabled = false
local DisableAFKKick = false
local DiscoEnabled = false

local ChatSpam = false
local ChatSpamMsg = "Test"
local ChatSpamDelay = 1

local ScriptStarted = false
local Transparency = true --Will make you slightly transparent when you are invisible. No reason to disable.
local NoClip = true --Will make your fake character no clip.

local Player = game:GetService("Players").LocalPlayer
local RealCharacter = Player.Character or Player.CharacterAdded:Wait()

local IsInvisible = false

RealCharacter.Archivable = true
local FakeCharacter = RealCharacter:Clone()
local Part
Part = Instance.new("Part", workspace)
Part.Anchored = true
Part.Size = Vector3.new(200, 1, 200)
Part.CFrame = CFrame.new(5000, 0, 5000) --Set this to whatever you want, just far away from the map.
Part.CanCollide = true
FakeCharacter.Parent = workspace
FakeCharacter.HumanoidRootPart.CFrame = Part.CFrame * CFrame.new(0, 5, 0)

for i, v in pairs(RealCharacter:GetChildren()) do
    if v:IsA("LocalScript") then
        local clone = v:Clone()
        clone.Disabled = true
        clone.Parent = FakeCharacter
    end
end

if Transparency then
    for i, v in pairs(FakeCharacter:GetDescendants()) do
        if v:IsA("BasePart") then
            v.BrickColor = BrickColor.new("Institutional white")
            v.Transparency = -1
            v.Material = Enum.Material.ForceField
        end
    end
end

local CanInvis = true

local function RealCharacterDied()
    CanInvis = false
    RealCharacter:Destroy()
    RealCharacter = Player.Character
    CanInvis = true
    IsInvisible = false
    FakeCharacter:Destroy()
    workspace.CurrentCamera.CameraSubject = RealCharacter.Humanoid

    RealCharacter.Archivable = true
    FakeCharacter = RealCharacter:Clone()
    Part:Destroy()
    Part = Instance.new("Part", workspace)
    Part.Anchored = true
    Part.Size = Vector3.new(200, 1, 200)
    Part.CFrame = CFrame.new(9999, 9999, 9999) --Set this to whatever you want, just far away from the map.
    Part.CanCollide = true
    FakeCharacter.Parent = workspace
    FakeCharacter.HumanoidRootPart.CFrame = Part.CFrame * CFrame.new(0, 5, 0)

    for i, v in pairs(RealCharacter:GetChildren()) do
        if v:IsA("LocalScript") then
            local clone = v:Clone()
            clone.Disabled = true
            clone.Parent = FakeCharacter
        end
    end
    if Transparency then
        for i, v in pairs(FakeCharacter:GetDescendants()) do
            if v:IsA("BasePart") then
                v.BrickColor = BrickColor.new("Institutional white")
                v.Transparency = -1
                v.Material = Enum.Material.ForceField
            end
        end
    end
    RealCharacter.Humanoid.Died:Connect(function()
        RealCharacter:Destroy()
        FakeCharacter:Destroy()
    end)
    Player.CharacterAppearanceLoaded:Connect(RealCharacterDied)
end

RealCharacter.Humanoid.Died:Connect(function()
    RealCharacter:Destroy()
    FakeCharacter:Destroy()
end)

Player.CharacterAppearanceLoaded:Connect(RealCharacterDied)

local PseudoAnchor

game:GetService("RunService").RenderStepped:Connect(
    function()
        if PseudoAnchor ~= nil then
            PseudoAnchor.CFrame = Part.CFrame * CFrame.new(0, 5, 0)
        end
        if NoClip then
            FakeCharacter.Humanoid:ChangeState(11)
        end
    end
)

PseudoAnchor = FakeCharacter.HumanoidRootPart

local function Invisible()
    if IsInvisible == false then
        local StoredCF = RealCharacter.HumanoidRootPart.CFrame
        RealCharacter.HumanoidRootPart.CFrame = FakeCharacter.HumanoidRootPart.CFrame
        FakeCharacter.HumanoidRootPart.CFrame = StoredCF
        RealCharacter.Humanoid:UnequipTools()
        Player.Character = FakeCharacter
        workspace.CurrentCamera.CameraSubject = FakeCharacter.Humanoid
        PseudoAnchor = RealCharacter.HumanoidRootPart
        for i, v in pairs(FakeCharacter:GetChildren()) do
            if v:IsA("LocalScript") then
                v.Disabled = false
            end
        end

        IsInvisible = true
    else
        local StoredCF = FakeCharacter.HumanoidRootPart.CFrame
        FakeCharacter.HumanoidRootPart.CFrame = RealCharacter.HumanoidRootPart.CFrame

        RealCharacter.HumanoidRootPart.CFrame = StoredCF

        FakeCharacter.Humanoid:UnequipTools()
        Player.Character = RealCharacter
        workspace.CurrentCamera.CameraSubject = RealCharacter.Humanoid
        PseudoAnchor = FakeCharacter.HumanoidRootPart
        for i, v in pairs(FakeCharacter:GetChildren()) do
            if v:IsA("LocalScript") then
                v.Disabled = true
            end
        end
        IsInvisible = false
    end
end

local function UpdateWalkSpeed()
    if Player.Character and Player.Character:FindFirstChild("Humanoid") then
        local Humanoid = Player.Character:FindFirstChildOfClass("Humanoid")
        Humanoid.WalkSpeed = WalkSpeed
    end
end

local function UpdateJumpPower()
    if Player.Character and Player.Character:FindFirstChildOfClass("Humanoid") then
        local Humanoid = Player.Character:FindFirstChildOfClass("Humanoid")
        Humanoid.UseJumpPower = true -- Incase this is not set to true
        Humanoid.JumpPower = JumpPower
    end
end

Main:addLabel("Character", "Actions for the Character")

Main:addButton("Reset Character", function()
    Player.Character:FindFirstChildOfClass("Humanoid").Health = 0
end)

Main:addTextBox("Speed", "16", function(Value)
    if (tonumber(Value) ~= nil) then -- Should be a VALID number
        WalkSpeed = tonumber(Value)
    else
        warn("Invalid Number")
    end
end)

Main:addTextBox("Jump Power", "50", function(Value)
    if (tonumber(Value) ~= nil) then -- Should be a VALID number
        JumpPower = tonumber(Value)
    else
        warn("Invalid Number")
    end
end)

Main:addToggle("Infinite Jumps", function(Toggle)
    if (Toggle == true) then -- If Toggle is set to TRUE
        InfJumpsEnabled = true
        print("Infinite Jumps is set to True")
        UserInputService.JumpRequest:Connect(function()
            if (InfJumpsEnabled == true) then
                Player.Character:FindFirstChildOfClass("Humanoid"):ChangeState("Jumping")
            end
        end)
    end
end)

Main:addToggle("Invisible", function(Toggle)
    if CanInvis and RealCharacter and FakeCharacter then
        if RealCharacter:FindFirstChild("HumanoidRootPart") and FakeCharacter:FindFirstChild("HumanoidRootPart") then
            Invisible()
        end
    end
end)

Main:addLabel("Player", "Actions for the Player")

Main:addButton("Rejoin", function()
    TeleportService:Teleport(game.PlaceId, Player)
end)

Main:addButton("Kick", function()
    Player:Kick("Requested kick from the Client")
end)

Main:addToggle("Disable AFK Kick", function(Toggle)
    if (Toggle == true) then
        DisableAFKKick = true
        print("Disable AFK Kick is set to True")
        Player.Idled:Connect(function() -- When player is IDLED for around 2 minutes
            if (DisableAFKKick == true) then
                VirtualUser:ClickButton2(Vector2.new()) -- Make the user do a fake right click
                Player.Character:FindFirstChildOfClass("Humanoid"):ChangeState("Jumping") -- Make character jump incase
                print("Player Idled")
            end
        end)
    end
end)

Main:addLabel("Lighting", "Modify the game's Lighting")

Main:addButton("Remove Fog", function()
    if Lighting:FindFirstChildOfClass("Atmosphere") then
        Lighting:FindFirstChildOfClass("Atmosphere"):Destroy()
    end
    if Lighting:FindFirstChildOfClass("DepthOfFieldEffect") then
        Lighting:FindFirstChildOfClass("DepthOfFieldEffect"):Destroy()
    end
    Lighting.FogStart = 100000
    Lighting.FogEnd = 100000
    print("Removed Fog Effects")
end)

Main:addButton("Brighten Map", function()
    Lighting.Brightness = 6.5
    print("Map brightened")
end)

Main:addTextBox("Time Of Day", "14", function(Value)
    if (tonumber(Value) ~= nil) then -- Should be a VALID number
        Lighting.ClockTime = tonumber(Value)
    else
        warn("Invalid Number")
    end
end)

Main:addButton("Realism", function()
    -- Realism Atmosphere
    if Lighting:FindFirstChildOfClass("Atmosphere") then
        Lighting:FindFirstChildOfClass("Atmosphere"):Destroy()
    end
    Lighting.Brightness = 4
    Lighting.ClockTime = 16
    Lighting.GlobalShadows = true
    Lighting.ShadowSoftness = 0
    local Atmosphere = Instance.new("Atmosphere", Lighting)
    Atmosphere.Name = "_happysgamerealism"
    Atmosphere.Density = 0.5
    -- ColorCorrection to increase contrast and add a bit of brightness
    if Lighting:FindFirstChildOfClass("ColorCorrectionEffect") then
        Lighting:FindFirstChildOfClass("ColorCorrectionEffect"):Destroy()
    end
    local ColorCorrection = Instance.new("ColorCorrectionEffect", Lighting)
    ColorCorrection.Name = "_happysgamerealism"
    ColorCorrection.Brightness = 0.2
    ColorCorrection.Contrast = 1.3
    ColorCorrection.Saturation = 0.3
    ColorCorrection.TintColor = Color3.fromRGB(220, 186, 177)
    ColorCorrection.Enabled = true
    -- Add DepthOfField for even more realism
    if Lighting:FindFirstChildOfClass("DepthOfFieldEffect") then
        Lighting:FindFirstChildOfClass("DepthOfFieldEffect"):Destroy()
    end
    local DepthOfField = Instance.new("DepthOfFieldEffect", Lighting)
    DepthOfField.Name = "_happysgamerealism"
    DepthOfField.FarIntensity = 0.5
    DepthOfField.FocusDistance = 65
    DepthOfField.InFocusRadius = 40
    DepthOfField.NearIntensity = 0.05
    DepthOfField.Enabled = true
    -- Add Sun Rays
    local SunRays = Instance.new("SunRaysEffect", Lighting)
    SunRays.Name = "_happysgamerealism"
    SunRays.Intensity = 0.2
    SunRays.Spread = 1
    SunRays.Enabled = true
    print("Realism Loaded")
end)

Main:addToggle("Disco", function(Toggle)
    if (Toggle == true) then
        DiscoEnabled = true
        local ColorEffect = Instance.new("ColorCorrectionEffect", game.Lighting)
        ColorEffect.Name = "DiscoEffect"
        ColorEffect.Enabled = true
        ColorEffect.Contrast = 1
        while (DiscoEnabled == true) do
            ColorEffect.TintColor = Color3.fromHSV((tick() % 7/7), 1, 1)
            task.wait()
        end
        ColorEffect:Destroy()
    else
        DiscoEnabled = false
    end
end)

Main:addLabel("Others", "Other Actions for the Client")

Main:addTextBox("Hitbox Size", "5", function(Value)
    if (tonumber(Value) ~= nil) then
        HitboxSize = tonumber(Value)
        task.spawn(function()
            while task.wait(0.1) do
                for _, Target in pairs(Players:GetPlayers()) do
                    if Target ~= Player then
                        if Target.Character and Target.Character:FindFirstChild("HumanoidRootPart") then
                            Target.Character.HumanoidRootPart.Size = Vector3.new(HitboxSize, HitboxSize, HitboxSize)
                            Target.Character.HumanoidRootPart.Material = Enum.Material.Neon
                            Target.Character.HumanoidRootPart.Transparency = 1
                            Target.Character.HumanoidRootPart.CanCollide = false
                        else
                            warn("Player "..Target.Name.." currently does not have a HumanoidRootPart")
                        end
                    end
                end
            end
        end)
    end
end)

Main:addTextBox("Gravity", "180", function(Value)
    if (tonumber(Value) ~= nil) then -- Should be a VALID number
        workspace.Gravity = tonumber(Value)
    else
        warn("Invalid Number")
    end
end)

local Universal = Window:addPage("Universal", 2, false, 7.5)

Universal:addLabel("Universal Scripts", "Execute universal scripts with one tap")

Universal:addButton("Dex Explorer", function()
    loadstring(game:HttpGet("https://cdn.wearedevs.net/scripts/Dex%20Explorer.txt"))()
end)

Universal:addButton("Infinite Yield", function()
    loadstring(game:HttpGet("https://cdn.wearedevs.net/scripts/Infinite%20Yield.txt"))()
end)

Universal:addButton("Remote Spy", function()
    loadstring(game:HttpGet("https://pastebin.com/raw/66NjbMN7",true))()
end)

Universal:addLabel("Chat Spammer", "Spam chat messages without doing anything")

Universal:addToggle("Chat Spam", function(Toggle)
    ChatSpam = Toggle
end)

Universal:addTextBox("Chat Spam Message", "Test", function(Value)
    ChatSpamMsg = tostring(Value)
end)

Universal:addTextBox("Chat Spam Delay", "1", function(Value)
    if (tonumber(Value) ~= nil) then -- Should be a VALID number
        ChatSpamDelay = tonumber(Value)
    else
        warn("Invalid Number")
    end
end)

Universal:addLabel("Others", "Other executable Scripts/Actions")

Universal:addButton("[Hotel Elephant]", function()
    loadstring(game:HttpGet("https://pastebin.com/raw/iVCc6iwm"))()
end)

local Credits = Window:addPage("Credits", 1, false, 7.5)

Credits:addLabel("Credits", "Hud created by HappyH0lidays2021")

-- Main Function

local function MainFunction()
    while task.wait(0.1) do
        UpdateWalkSpeed()
        UpdateJumpPower()
    end
end

-- Chat Spam Function

local function ChatSpamFunction()
    while true do
        if (ChatSpam == true) then
            local Arguments = {
                [1] = ChatSpamMsg,
                [2] = "All"
            }
            ReplicatedStorage.DefaultChatSystemChatEvents.SayMessageRequest:FireServer(unpack(Arguments))
            task.wait(ChatSpamDelay)
        end
        task.wait()
    end
end

task.spawn(MainFunction)
task.spawn(ChatSpamFunction)

print(" - HappyH0lidays2021 was here...") -- Test Print