Hax

-- Gui to Lua
-- Version: 3.2

-- Instances:

local DaGui = Instance.new("ScreenGui")
local MainFrame = Instance.new("Frame")
local title = Instance.new("TextLabel")
local noclipbtn = Instance.new("TextButton")
local noclip2btn = Instance.new("TextButton")
local debugcambtn = Instance.new("TextButton")
local jumpbtn = Instance.new("TextButton")
local speedbox = Instance.new("TextBox")

--Properties:

DaGui.Name = "DaGui"
DaGui.Parent = game.Players.LocalPlayer:WaitForChild("PlayerGui")
DaGui.ZIndexBehavior = Enum.ZIndexBehavior.Sibling

MainFrame.Name = "MainFrame"
MainFrame.Parent = DaGui
MainFrame.Active = true
MainFrame.BackgroundColor3 = Color3.fromRGB(0, 0, 255)
MainFrame.Position = UDim2.new(0.0789766461, 0, 0.431438148, 0)
MainFrame.Selectable = true
MainFrame.Size = UDim2.new(0, 382, 0, 217)
MainFrame.Draggable = true

title.Name = "title"
title.Parent = MainFrame
title.BackgroundColor3 = Color3.fromRGB(0, 0, 255)
title.Size = UDim2.new(0, 382, 0, 34)
title.Font = Enum.Font.SourceSans
title.Text = "Loomian Legacy Hax"
title.TextColor3 = Color3.fromRGB(255, 255, 255)
title.TextScaled = true
title.TextSize = 14.000
title.TextWrapped = true

noclipbtn.Name = "noclipbtn"
noclipbtn.Parent = MainFrame
noclipbtn.BackgroundColor3 = Color3.fromRGB(255, 255, 255)
noclipbtn.Position = UDim2.new(0.018324608, 0, 0.248847917, 0)
noclipbtn.Size = UDim2.new(0, 105, 0, 36)
noclipbtn.Font = Enum.Font.SourceSans
noclipbtn.Text = "NoClip [Off]"
noclipbtn.TextColor3 = Color3.fromRGB(0, 0, 0)
noclipbtn.TextScaled = true
noclipbtn.TextSize = 14.000
noclipbtn.TextWrapped = true

noclip2btn.Name = "noclip2btn"
noclip2btn.Parent = MainFrame
noclip2btn.BackgroundColor3 = Color3.fromRGB(255, 255, 255)
noclip2btn.Position = UDim2.new(0.36125654, 0, 0.248847917, 0)
noclip2btn.Size = UDim2.new(0, 105, 0, 36)
noclip2btn.Font = Enum.Font.SourceSans
noclip2btn.Text = "Fly NoClip [Off]"
noclip2btn.TextColor3 = Color3.fromRGB(0, 0, 0)
noclip2btn.TextScaled = true
noclip2btn.TextSize = 14.000
noclip2btn.TextWrapped = true

debugcambtn.Name = "debugcambtn"
debugcambtn.Parent = MainFrame
debugcambtn.BackgroundColor3 = Color3.fromRGB(255, 255, 255)
debugcambtn.Position = UDim2.new(0.70157069, 0, 0.248847917, 0)
debugcambtn.Size = UDim2.new(0, 105, 0, 36)
debugcambtn.Font = Enum.Font.SourceSans
debugcambtn.Text = "Debug Camera [Off]"
debugcambtn.TextColor3 = Color3.fromRGB(0, 0, 0)
debugcambtn.TextScaled = true
debugcambtn.TextSize = 14.000
debugcambtn.TextWrapped = true

jumpbtn.Name = "jumpbtn"
jumpbtn.Parent = MainFrame
jumpbtn.BackgroundColor3 = Color3.fromRGB(255, 255, 255)
jumpbtn.Position = UDim2.new(0.018324608, 0, 0.470046073, 0)
jumpbtn.Size = UDim2.new(0, 105, 0, 36)
jumpbtn.Font = Enum.Font.SourceSans
jumpbtn.Text = "Jump [Off]"
jumpbtn.TextColor3 = Color3.fromRGB(0, 0, 0)
jumpbtn.TextScaled = true
jumpbtn.TextSize = 14.000
jumpbtn.TextWrapped = true

speedbox.Name = "speedbox"
speedbox.Parent = MainFrame
speedbox.BackgroundColor3 = Color3.fromRGB(255, 255, 255)
speedbox.Position = UDim2.new(0.36125654, 0, 0.470046103, 0)
speedbox.Size = UDim2.new(0, 105, 0, 36)
speedbox.Font = Enum.Font.SourceSans
speedbox.PlaceholderText = "Imput Number"
speedbox.Text = "Imput Number"
speedbox.TextColor3 = Color3.fromRGB(0, 0, 0)
speedbox.TextScaled = true
speedbox.TextSize = 14.000
speedbox.TextWrapped = true

local p = game.Players.LocalPlayer
local char = game.Workspace:FindFirstChild(p.Name)
local c = workspace.CurrentCamera
local userInput = game:GetService("UserInputService")
local rs = game:GetService("RunService")
local starterPlayer = game:GetService("StarterPlayer")
local speed = 60

-- // Noclip \\--

noclipbtn.MouseButton1Click:Connect(function()

noclip = false
game:GetService('RunService').Stepped:connect(function()
if noclip then
for _, Part in pairs(char:GetDescendants())do
if Part:IsA("Humanoid") then
Part:ChangeState(11)
end
end
end
end)


if noclipbtn.Text == "NoClip [Off]" then
noclipbtn.Text = "NoClip [On]"
noclip = true
else
noclipbtn.Text = "NoClip [Off]"
noclip = false
    end
end)
--// Fly Noclip \\--

local selected = false
local lastUpdate = 0

function getNextMovement(deltaTime)
    local nextMove = Vector3.new()
    -- Left/Right
    if userInput:IsKeyDown("A") or userInput:IsKeyDown("Left") then
        nextMove = Vector3.new(-1,0,0)
    elseif userInput:IsKeyDown("D") or userInput:IsKeyDown("Right") then
        nextMove = Vector3.new(1,0,0)
    end
    -- Forward/Back
    if userInput:IsKeyDown("W") or userInput:IsKeyDown("Up") then
        nextMove = nextMove + Vector3.new(0,0,-1)
    elseif userInput:IsKeyDown("S") or userInput:IsKeyDown("Down") then
        nextMove = nextMove + Vector3.new(0,0,1)
    end
    -- Up/Down
    if userInput:IsKeyDown("Space") then
        nextMove = nextMove + Vector3.new(0,1,0)
    elseif userInput:IsKeyDown("LeftControl") then
        nextMove = nextMove + Vector3.new(0,-1,0)
    end
    return CFrame.new( nextMove * (speed * deltaTime) )
end

function onSelected()
    if selected == false then
    if char then
        local root = char:WaitForChild("HumanoidRootPart")
        currentPos = root.Position
        selected = true
        noclip2btn.Text = "Fly NoClip [On]"
        root.Anchored = true
        lastUpdate = tick()
        for _, Part in pairs(char:GetDescendants())do
        if Part:IsA("Humanoid") then
        Part.PlatformStand = true
        end
        end

        while selected do
            wait()
            local delta = tick()-lastUpdate
            local look = (c.Focus.p-c.CoordinateFrame.p).unit
            local move = getNextMovement(delta)
            local pos = root.Position
            root.CFrame = CFrame.new(pos,pos+look) * move
            lastUpdate = tick()
        end
        root.Anchored = false
        root.Velocity = Vector3.new()
        for _, Part in pairs(char:GetDescendants())do
        if Part:IsA("Humanoid") then
        Part.PlatformStand = false
    end
    end
    end
    else
        selected = false
        noclip2btn.Text = "Fly NoClip [Off]"
    end

end

noclip2btn.MouseButton1Click:Connect(onSelected)

local selected2 = false
local lastUpdate2 = 0

function DebugCam(p)
if char.Head.Anchored == false then
for _, Part in pairs(char:GetDescendants())do
if Part:IsA("BasePart") or Part:IsA("MeshPart") then
Part.Anchored = true
end
end
else
for _, Part in pairs(char:GetDescendants())do
if Part:IsA("BasePart") or Part:IsA("MeshPart") then
Part.Anchored = false
end
end
end
end

function onSelected2()
    if selected2 == false then
    if char then
        local root = char:WaitForChild("HumanoidRootPart")
        currentPos = root.Position
        selected2 = true
        debugcambtn.Text = "Debug Camera [On]"
        root.Anchored = true
        lastUpdate = tick()
        DebugCam(p.Name)
        for _, Part in pairs(char:GetDescendants())do
        if Part:IsA("Humanoid") then
        Part.PlatformStand = true
        end
        end

        while selected2 do
            wait()
            local delta = tick()-lastUpdate
            local look = (c.Focus.p-c.CoordinateFrame.p).unit
            local move = getNextMovement(delta)
            local pos = root.Position
            root.CFrame = CFrame.new(pos,pos+look) * move
            lastUpdate = tick()
        end
        root.Anchored = false
        root.Velocity = Vector3.new()
        for _, Part in pairs(char:GetDescendants())do
        if Part:IsA("Humanoid") then
        Part.PlatformStand = false
    end
    end
    end
    else
        DebugCam(p.Name)
        selected2 = false
        debugcambtn.Text = "Debug Camera [Off]"
    end

end

debugcambtn.MouseButton1Click:Connect(onSelected2)

--// Noclip / Debug Cam Speed \\--

speedbox.FocusLost:Connect(function()
speed = speedbox.Text
end)

--// Allow Jumping \\--



local CanJump = false

jumpbtn.MouseButton1Click:Connect(function()
    CanJump = not CanJump
    if CanJump == true then
        char.Humanoid.JumpPower = 50
        jumpbtn.Text = "Jump [On]"
    else
        jumpbtn.Text = "Jump [Off]"
    end
end)


userInput.InputBegan:Connect(function(input, processed)
if processed then return end
    if input.KeyCode == Enum.KeyCode.Space then
        if CanJump then
            if char.Humanoid.FloorMaterial ~= Enum.Material.Air then
                char.Humanoid:ChangeState(Enum.HumanoidStateType.Jumping)
            end
        end
    end
end)