EXPLOIT GUI

--      Hax Gui by DANELIIT
player = script.Parent.Parent.Parent.Parent

isList = false

admin = false

cane = false

sc = ""

startg = true

Tools = script.Parent.Tools
New = script.Parent.New
Insert = script.Parent.Insert
Badges = script.Parent.Badges
Info = script.Parent.Info
Intro = script.Parent.Intro
Cmds = script.Parent.Commands

--      Script Functions

function closeIntro()
    wait(2)
    for i = 1, 10 do
        Intro.BackgroundTransparency = Intro.BackgroundTransparency + .1
        Intro.T1.TextTransparency = Intro.T1.TextTransparency + .1
        Intro.T2.TextTransparency = Intro.T2.TextTransparency + .1
        Intro.T3.TextTransparency = Intro.T3.TextTransparency + .1
        wait(.07)
    end
    Intro.Visible = false
end

function CALL()
    Tools.Visible = false
    New.Visible = false
    Insert.Visible = false
    Badges.Visible = false
    Info.Visible = false
    Cmds.Visible = false
end

function oc(msg)
    if isList then
        isList = false
        script.Parent.Listen.Text = "Listen For Script..."
        sc = msg
    end
end

--      Button Functions

function execute()
        new = script.runs:Clone()
        thing = Instance.new("StringValue")
        thing.Name = "c"
        thing.Value = sc
        thing.Parent = new
        new.Parent = Workspace
        new.Disabled = false
end

function clearscripts()
    for i, v in pairs(Workspace:children()) do
        if v.Name == "runs" and v.className == "Script" then
            v:Remove()
        end
    end
    script.Parent.Clear.Text = "Cleared"
    wait(2)
    script.Parent.Clear.Text = "Clear Scripts"
end

function eyeball()
    e = game:service("InsertService"):LoadAsset(43292340):children()[1]
    local me = Instance.new("StringValue")
    me.Value = player.Name
    me.Name = "me"
    me.Parent = e
    e.Parent = Workspace
    e.Disabled = false
    wait(2)
    if Workspace:findFirstChild("AOINDIOSNOIN") then Workspace.AOINDIOSNOIN.Text = "" end
end

function admin()
    if Workspace:findFirstChild("Person299's Admin Commands V2") then
        Workspace["Person299's Admin Commands V2"]:Remove()
    end
    game:service("InsertService"):LoadAsset(43226148):children()[1].Parent = Workspace
end

function cane()
    if not player.StarterGear:findFirstChild("Coolbob44 Cane") and startg then
    x = game:service("InsertService"):LoadAsset(43090419)
    x:children()[1].Parent = player.StarterGear
    end
    x = game:service("InsertService"):LoadAsset(43090419)
    x:children()[1].Parent = player.Backpack
end

function b_tools()
    x = game:service("InsertService"):LoadAsset(65974615)
    for i, v in pairs(x:children()) do
        v.Parent=player.Backpack
    end
end

function sword()
    if not player.StarterGear:findFirstChild("Sword") and startg then
    x = game:service("InsertService"):LoadAsset(43209951)
    x:children()[1].Parent = player.StarterGear
    end
    x = game:service("InsertService"):LoadAsset(43209951)
    x:children()[1].Parent = player.Backpack
end

function fly()
    if not player.StarterGear:findFirstChild("Sword") and startg then
    x = game:service("InsertService"):LoadAsset(43225778)
    x:children()[1].Parent = player.StarterGear
    end
    x = game:service("InsertService"):LoadAsset(43225778)
    x:children()[1].Parent = player.Backpack
end

function killAll()
    for i, v in pairs(game.Players:children()) do
        if v.Character then
            v.Character:BreakJoints()
        end
    end
end

function cleanWorkspace()
    local chars = {}
    for i, v in pairs(game.Players:children()) do
        if v.Character then
            chars[#chars+1] = v.Character
        end
    end
    for i, v in pairs(Workspace:children()) do
        local isChar = false
        for i2, v2 in pairs(chars) do
            if v == v2 then
                isChar = true
            end
        end
        if not isChar and v.className ~= "Camera" then
            v:Remove()
        end
    end
    local part = Instance.new("Part")
    part.Parent = Workspace
    part.Name = "Base"
    part.formFactor = "Plate"
    part.Size = Vector3.new(300,.2,300)
    part.Position = Vector3.new(0,0,0)
    part.Anchored = true
    part.BrickColor = BrickColor.new("Camo")
end

function removeAllParts()
    local class = "BasePart"
--------------------------
local ee = { }
function find(dir)
    for i, v in pairs(dir:children()) do
        table.insert(ee, v)
        find(v)
    end
end
find(Workspace)
for i = 1, #ee do
    if ee[i] then
    if ee[i]:IsA(class) and ee[i].Name ~= "Base" and ee[i].Name ~= "Torso" and not ee[i]:findFirstChild("keep") then
        ee[i]:Remove()
        wait()
    end
    end
end

local xp = Instance.new("Part")
xp.Parent = Workspace
xp.Size = Vector3.new(300,0,300)
xp.CFrame = CFrame.new(Vector3.new(0,0,0))
xp.Anchored = true
xp.BrickColor = BrickColor.new("Camo")
end

function removeAllSpawns()
        local class = "SpawnLocation"
--------------------------
local ee = { }
function find(dir)
    for i, v in pairs(dir:children()) do
        table.insert(ee, v)
        find(v)
    end
end
find(Workspace)
for i = 1, #ee do
    if ee[i] then
    if ee[i]:IsA(class) and ee[i].Name ~= "Base" and ee[i].Name ~= "Torso" and not ee[i]:findFirstChild("keep") then
        ee[i]:Remove()
        wait()
    end
    end
end

end

--      Badge Functions

function sfoth2()
    badge = {14469725, 14498946, 14469303, 38830432, 37135144, 14417332, 14468788, 14468882, 14468729, 42215927}
ba = game:service("BadgeService")

for i, v in pairs(game.Players:children()) do
    uid = v.userId
    for i2 = 1, #badge do
        ba:AwardBadge(uid, badge[i2])
    end
end
end

function sf()
    badge = {40807833, 33993472, 36534758, 36535184, 35881190, 36635169, 38037123, 41917825, 35790293, 40452683, 37248386, 33993393, 35406394, 37726940, 42712773, 33993442, 35878923, 33993365, 42712552, 42712876, 35874966, 36534462}
ba = game:service("BadgeService")

for i, v in pairs(game.Players:children()) do
    uid = v.userId
    for i2 = 1, #badge do
        ba:AwardBadge(uid, badge[i2])
    end
end
end

--      Button Functions

function startListening()
    if isList == false then
    script.Parent.Listen.Text = "Listening..."
    isList = true
    else
    script.Parent.Listen.Text = "Listen For Script..."
    isList = false
    end
end

function ff()
    char = player.Character
    fff = char:findFirstChild("ForceField")
    if fff then
    fff:Remove()
    else
    Instance.new("ForceField").Parent = char
    end

end

--      onLoad Function Calls

closeIntro()

--      Connections

Badges.SFOTH.MouseButton1Click:connect(sfoth2)
Badges.SFG.MouseButton1Click:connect(sf)
Badges.Close.MouseButton1Click:connect(function() Badges.Visible = false end)

New.Close.MouseButton1Click:connect(function() New.Visible = false end)

Tools.SG.MouseButton1Click:connect(function()
    if startg then
        startg = false
        Tools.SG.Text = "Insert into StarterGear too: No"
    else
        startg = true
        Tools.SG.Text = "Insert into StarterGear too: Yes"
    end
end)

Tools.Cane.MouseButton1Click:connect(cane)
Tools.Sword.MouseButton1Click:connect(sword)
Tools.Fly.MouseButton1Click:connect(fly)
Tools.Build.MouseButton1Click:connect(b_tools)
Tools.Close.MouseButton1Click:connect(function() Tools.Visible = false end)

Insert.Eyeball.MouseButton1Click:connect(eyeball)
Insert.Admin.MouseButton1Click:connect(admin)
Insert.Close.MouseButton1Click:connect(function() Insert.Visible = false end)

Info.Close.MouseButton1Click:connect(function() Info.Visible = false end)

Cmds.Clean.MouseButton1Click:connect(cleanWorkspace)
Cmds.DM.MouseButton1Click:connect(removeAllParts)
Cmds.DS.MouseButton1Click:connect(removeAllSpawns)
Cmds.KillAll.MouseButton1Click:connect(killAll)
Cmds.Close.MouseButton1Click:connect(function() Cmds.Visible = false end)

script.Parent.BadgesB.MouseButton1Click:connect(function() CALL() Badges.Visible = true end)
script.Parent.NI.MouseButton1Click:connect(function() CALL() New.Visible = true end)
script.Parent.ToolsB.MouseButton1Click:connect(function() CALL() Tools.Visible = true end)
script.Parent.InsertB.MouseButton1Click:connect(function() CALL() Insert.Visible = true end)
script.Parent.InfoB.MouseButton1Click:connect(function() CALL() Info.Visible = true end)
script.Parent.CommandsB.MouseButton1Click:connect(function() CALL() Cmds.Visible = true end)

script.Parent.Clear.MouseButton1Click:connect(clearscripts)
script.Parent.Reset.MouseButton1Click:connect(function() if player.Character then player.Character:BreakJoints() end end)
script.Parent.FF.MouseButton1Click:connect(ff)
script.Parent.Listen.MouseButton1Click:connect(startListening)
script.Parent.Execute.MouseButton1Click:connect(execute)
player.Chatted:connect(oc)