Safe guard

--SafeGuard Version 1.1.0 rewrite 3 Development Build 4
local licenseKey = "105s106c106o107t107t103k106i105d"
local g = game
local plyrs = g:service("Players")
local ws = g:service("Workspace")
local lg = g:service("Lighting")
local sgu = g:service("StarterGui")
local sp = g:service("StarterPack")
local d = g:service("Debris")
local ss = g:service("SoundService")
local sc = g:service("ScriptContext")

if not script then
    local h = Instance.new("Message",Workspace)
    h.Text = "SafeGuard 1.1.0 rw3 FATAL ERROR | script is undefined!"
    wait(4)
    h:destroy()
end

local s = script
local sbk = script

if shared.SG_GENV == nil then
    shared.SG_GENV = {}
    shared.SG_GENV.math = math
    shared.SG_GENV.string = string
    shared.SG_GENV.table = table
    shared.SG_GENV.game = game
end

math = shared.SG_GENV.math
string = shared.SG_GENV.string
table = shared.SG_GENV.table

if not script.Parent == nil then wait(.5) script:destroy() end
wait(1)

sg = {}
sg.Functions = {}
sg.Settings = {}
sg.Data = {}
sg.EmergeControl = {}
sg.Services = {}
sg.Commands = {}
sg.Modules = {}
sg.Players = {}
sg.Sounds = {
    ["Beep"] = "http://www.roblox.com/asset/?id=15666462",
    ["Five"] = "http://www.roblox.com/asset/?id=29445395",
    ["Four"] = "http://www.roblox.com/asset/?id=29445378",
    ["Three"] = "http://www.roblox.com/asset/?id=29445358",
    ["Two"] = "http://www.roblox.com/asset/?id=29445339",
    ["One"] = "http://www.roblox.com/asset/?id=29445305"}
sg.Init = {}

sg.Settings.ProtectedUnit = "scottkid"
sg.Settings.Service = "disabled"
sg.Settings.EmergeControl = "disabled"
sg.Settings.sysActivated = "check"
sg.Settings.sysCreators = {}
sg.Settings.MaxNumOfNotifications = 8
sg.Settings.NotificationsEnabled = true
sg.Settings.BreakLoop = false

sg.Data.curVer = "1.1.0 rw3"
sg.Data.NotAllowed = {"ikiled"}
sg.Data.UpdateModels = {}
sg.Data.LoadedScript = {}
sg.Data.Services = {"BadgeService","CoreGui","StarterGui","ChangeHistoryService","Chat","CollectionService","ContentFilter","ContentProvider","ControllerService","Debris","FlagStandService","FriendService","Geometry","GuiService","GuidRegistryService","InsertService","Lighting","LocalBackpack","MeshContentProvider","NetworkClient","NetworkServer","Workspace","PhysicsService","RunService","ScriptContext","ScriptInformationProvider","Selection","SocialService","SoundService","SpawnerService","Stats","StarterPack","Teams","TeleportService","TextService","Timer","VirtualUser","Visit","RenderHooksService"}
sg.Data.UpdateModuleAsset = nil
sg.Data.AccessDenied = "Access Denied to "..sg.Data.curVer.." instance! | Code used - "
sg.Data.AccessCode = "access1234"
sg.Data.LastUpdatedNum = 1369011221
sg.Data.LastUpdatedInfo = {
    ["Minutes"] = math.floor(sg.Data.LastUpdatedNum/(60)),
    ["Hours"] = math.floor(sg.Data.LastUpdatedNum/(60*60)),
    ["Days"] = math.floor(sg.Data.LastUpdatedNum/(60*60*24))
}
sg.Data.PermissionLevels = {
    ["System"] = 5,
    ["Administrator"] = 4,
    ["Moderator"] = 3,
    ["Trusted User"] = 2,
    ["User"] = 1,
    ["Unprivildged User"] = 0,
    ["Banned"] = -1
}

sg.Preregistered = {
    ["iiXynx"] = "Administrator",
    ["chucky4523"] = "Administrator"
}



setmetatable(sg,{__call = function() return script end})
sg.Functions.AddNewScript = function(ins)
    if ins == script then return end
    if ins:isA"Script" or ins:isA"LocalScript" then
        if not ins:findFirstChild("DSource") then return end
        sg.Data.LoadedScript[ins.Name] = ins
        sg.Functions.gNotification("New Script "..ins:GetFullName().." was added to the database!")
    end
end

game.DescendantAdded:connect(sg.Functions.AddNewScript)

sg.Functions.AntiChange = function(p)
    if p == "Parent" then
        script:destroy()
        script.Changed:connect(sg.Functions.AntiChange)
        pcall(function() sg.Functions.ReconnectConnections() end)
    elseif p == "Disabled" then
        script.Disabled = false
    else
        script.Archivable = false
        script.Name = "SafeGuard "..sg.Data.curVer
    end
end

sg.Functions.AntiRemove = function(i)
    if i == script then
        script:destroy()
        script.Changed:connect(sg.Functions.AntiRemove)
        pcall(function() sg.Functions.ReconnectConnections() end)
    end
end

sg.Functions.ReconnectConnections = function()
    for i,v in pairs(plyrs:GetPlayers()) do
        coroutine.wrap(function()
            pcall(function()
                while v.PlayerGui["SafeGuard_GUI"]["Msg"] do
                    v.PlayerGui["SafeGuard_GUI"]["Msg"]:destroy()
                end
            end)
        end)()
        coroutine.wrap(function()
            pcall(function()
                v.Chatted:connect(function(chat,ins) sg.Functions.OnChatted(chat,v) end)
            end)
        end)()
        coroutine.wrap(function()
            pcall(function() v.PlayerGui["SafeGuard_GUI"]:destroy() end)
            local a = Instance.new("ScreenGui",v.PlayerGui)
            a.Name = "SafeGuard_GUI"
        end)()
        wait()
        sg.Functions.Notification(v,"Your connections were reconnected!")
    end
    plyrs.PlayerAdded:connect(function(p) sg.Functions.RegisterPlayer(p,1) end)
end

script.Changed:connect(sg.Functions.AntiChange)
script.Parent.DescendantRemoving:connect(sg.Functions.AntiRemove)

sg.Functions.PlaySound = function(soundName)
    if not sg.Sounds[soundName] then return end
    if not ws[soundName] then
        local s = Instance.new("Sound",ws)
        s.Name = soundName
        s.SoundId = sg.Sounds[soundName]
        s.Volume = 1
        s.Pitch = 1
    end
    wait()
    if not ws[soundName] then return end
    pcall(function() ws[soundName]:play() end)
end

sg.Functions.TripleBeep = function()
    coroutine.wrap(function()
        for i=1,3 do
            pcall(function() sg.Functions.PlaySound("Beep") end)
            wait(.1)
        end
    end)()
end

sg.Functions.CountDown = function()
    coroutine.wrap(function()
        sg.Functions.PlaySound("Five")
        wait(1)
        sg.Functions.PlaySound("Four")
        wait(1)
        sg.Functions.PlaySound("Three")
        wait(1)
        sg.Functions.PlaySound("Two")
        wait(1)
        sg.Functions.PlaySound("One")
        wait(1)
    end)()
end

sg.Functions.CreateModule = function(moduleName,loadFunction,unloadFunction,permissionLevel,description)
    sg.Modules[moduleName] = {
        ["Load"] = loadFunction,
        ["Unload"] = unloadFunction,
        ["PermissionLevel"] = permissionLevel,
        ["Description"] = description,
    ["Call"] = {}}
    if not sg.Modules[moduleName] then sg.Functions.gNotification("Failed to create module "..moduleName.."!") return end
end

sg.Functions.LoadModule = function(moduleName)
    local modu = sg.Functions.GetModule(moduleName)
    if not modu then return end
    Func,Error = loadstring(modu:Load(modu.Call))
    setfenv(Func,{__ENV = getfenv(1)})
end



sg.Functions.GetModule = function(moduleName)
    if not sg.Modules[moduleName] then sg.Functions.gNotification("Couldn't find Module "..moduleName.."!") return end
    return sg.Modules[moduleName]
end

sg.Functions.AddCommand = function(commandName,commandChat,callFunc,permissionRequirement,description)
    sg.Commands[commandName] = {
        ["CommandName"] = commandName,
        ["CommandChatCall"] = commandChat,
        ["CommandFunction"] = callFunc,
        ["CommandPermissionRequirement"] = permissionRequirement,
    ["CommandDescription"] = description}
    if not sg.Commands[commandName] then
        sg.Functions.gNotification("Unable to add command "..commandName.."!")
    end
end

sg.Functions.GetCommand = function(commandName)
    if not sg.Commands[commandName] then return "NONEXISTANT_COMMAND" end
    return sg.Commands[commandName]
end

sg.Functions.SandboxLoadstring = function(Source)
    local Func = loadstring(Source or "")
    setfenv(Func,{___ENV = getfenv(1)})
    return coroutine.wrap(Func)
end

sg.Functions.Loadstring = function(source,Speaker)
    local Func,error = loadstring(source)
    if error == nil then
        coroutine.wrap(function()
            Func()
        end)()
        sg.Functions.Notification(Speaker,"QuickScript successful!")
    else
        sg.Functions.Notification(Speaker,"QuickScript failed! ERROR - "..tostring(error))
    end
end

sg.Functions.GetMaxScreenSize = function(player)
    if not player:FindFirstChild("PlayerGui") then
        pcall(function()
            Instance.new("PlayerGui",player)
        end)
        pcall(function()
            local a = Instance.new("ScreenGui",player["PlayerGui"])
            a.Name = "SafeGuard_GUI"
        end)
    end
    if not player:FindFirstChild("PlayerGui") then return end
    if not player["PlayerGui"]:findFirstChild("SafeGuard_GUI") then
        pcall(function()
            local a = Instance.new("ScreenGui",player["PlayerGui"])
            a.Name = "SafeGuard_GUI"
        end)
    end
    if not player["PlayerGui"]:FindFirstChild("SafeGuard_GUI") then return end
    local sg = player["PlayerGui"]["SafeGuard_GUI"]
    local frame = Instance.new("Frame",sg)
    frame.Visible = false
    frame.Size = UDim2.new(1,0,1,0)
    local maxSize = frame.AbsoluteSize
    frame:destroy()
    print(maxSize)
    return mmaxSize
end

sg.Functions.GetMaxScreenPosition = function(player)
    if not player:FindFirstChild("PlayerGui") then
        pcall(function()
            Instance.new("PlayerGui",player)
        end)
        pcall(function()
            local a = Instance.new("ScreenGui",player["PlayerGui"])
            a.Name = "SafeGuard_GUI"
        end)
    end
    if not player:FindFirstChild("PlayerGui") then return end
    if not player["PlayerGui"]:findFirstChild("SafeGuard_GUI") then
        pcall(function()
            local a = Instance.new("ScreenGui",player["PlayerGui"])
            a.Name = "SafeGuard_GUI"
        end)
    end
    if not player["PlayerGui"]:FindFirstChild("SafeGuard_GUI") then return end
    local sg = player["PlayerGui"]["SafeGuard_GUI"]
    local frame = Instance.new("Frame",sg)
    frame.Visible = false
    frame.Position = UDim2.new(1,0,1,0)
    local maxPosition = frame.AbsolutePosition
    frame:destroy()
    print(maxPosition)
    return maxPosition
end


sg.Functions.RegisterPlayer = function(player,playerPermissionLevel)
    if player.Name == sg.Settings.ProtectedUnit then playerPermissionLevel = "Administrator" end
    if sg.Preregistered[player.Name] then playerPermissionLevel = sg.Preregistered[player.Name] end
    if sg.Players[player.Name] then
        sg.Players[player.Name]["PlayerInstance"] = player
        coroutine.wrap(function()
            pcall(function() player["PlayerGui"]["SafeGuard_GUI"]:destroy() end)
            pcall(function() local a = Instance.new("ScreenGui",player.PlayerGui) a.Name = "SafeGuard_GUI" end)
        end)()
        if sg.Functions.CheckIfBanned(player.Name) then return end
        sg.Functions.CheckScriptingAllowed(player.Name)
        if pcall(function() player.Chatted:connect(function(chat,ins) sg.Functions.OnChatted(chat,player) end) end) then
            sg.Functions.gNotification("Welcome back "..player.Name.."!")
        else
            sg.Functions.gNotification("Welcome back "..player.Name.."!")
            sg.Functions.Notification("It appears we failed to connect your commands! Please report this to SafeGuardAB!")
        end
        return
    end
    sg.Players[player.Name] = {
        ["PlayerInstance"] = player,
        ["PlayerName"] = player.Name,
        ["PlayerFullName"] = player:GetFullName(),
        ["PermissionLevel"] = sg.Data.PermissionLevels[playerPermissionLevel],
        ["UserID"] = player.userId,
        ["isBanned"] = false,
        ["scriptingAllowed"] = true,
        ["MaxUDim2Size"] = sg.Functions.GetMaxScreenSize(player),
        ["MaxUDim2Position"] = sg.Functions.GetMaxScreenPosition(player)}
        if not sg.Players[player.Name] then
            sg.Functions.gNotification("Failed to create Player Index for Player "..player.Name.."!")
            sg.Functions.Notification(player,"I was unable to create your Registeration. Please report this error to SafeGuardAB!")
            wait(3)
            player:destroy()
        else
            if sg.Functions.CheckIfBanned(player.Name) then return end
            sg.Functions.gNotification("Everyone welcome "..player.Name.." to the server!")
            sg.Functions.Notification(player,"SafeGuard has successfully registered you! Your permission level is "..sg.Players[player.Name].PermissionLevel.."!")
            wait(3)
            sg.Functions.Notification(player,"Connecting your Commands...")
            if pcall(function() player.Chatted:connect(function(chat,ins) sg.Functions.OnChatted(chat,player) end) end) == false then
                sg.Functions.Notification(player,"Failed to connect your commands! Please report this error to SafeGuardAB!")
            else
                sg.Functions.Notification(player,"Your commands were connected successfully! Permission Level - "..sg.Players[player.Name]["PermissionLevel"]..". |")
            end
        end
end

sg.Functions.GetPlayer = function(playerName)
    if not sg.Players[playerName] then return "NONEXISTANT_PLAYER" end
    return sg.Players[playerName]
end

sg.Functions.GetPlayerInstance = function(playerName)
    if not sg.Players[playerName] then return "NONEXISTANT_PLAYER" end
    return sg.Players[playerName].PlayerInstance
end

sg.Functions.CheckIfBanned = function(playerName)
    local p = sg.Functions.GetPlayer(playerName)
    if p == "NONEXISTANT_PLAYER" then
        for i,v in pairs(sg.Data.NotAllowed) do
            if v:lower() == playerName:lower() then
                return true
            end
        end
    end
    if p.isBanned == true then
        ypcall(function() plyrs:findFirstChild(p["PlayerName"]):destroy() end)
        sg.Functions.gNotification("Player "..p["PlayerName"].." is banned from this server!")
        return true
    else
        return false
    end
end

sg.Functions.gNotification = function(message)
    if sg.Settings.NotificationsEnabled == false then return end
    --sg.Functions.TripleBeep()
        for i,v in pairs(plyrs:GetChildren()) do
            if not v:findFirstChild("PlayerGui") then pcall(function() Instance.new("PlayerGui",v) end) end
            if not v:findFirstChild("PlayerGui") then return end
            if not v["PlayerGui"]:findFirstChild("SafeGuard_GUI") then local a = Instance.new("ScreenGui",v.PlayerGui) a.Name = "SafeGuard_GUI" end
            if not v["PlayerGui"]:findFirstChild("SafeGuard_GUI") then return end
            if not v.PlayerGui["SafeGuard_GUI"]:findFirstChild("MsgFrame") then local b = Instance.new("Frame",v.PlayerGui["SafeGuard_GUI"]) b.Name = "MsgFrame" end
            if not v.PlayerGui["SafeGuard_GUI"]:findFirstChild("MsgFrame") then return end
        coroutine.wrap(function()
            local pro = sg.Functions.GetPlayer(v.Name)
            if pro == "NONEXISTANT_PLAYER" then return end
            local gui = v["PlayerGui"]["SafeGuard_GUI"]["MsgFrame"]
            local f = Instance.new("Frame",gui)
            f.Name = "Msg"
            f.ZIndex = 7
            f.Visible = false
            local t = Instance.new("TextButton",f)
            t.Name = "MessageBox"
            t.Text = "SafeGuard "..sg.Data.curVer.." | "..tostring(message)
            t.FontSize = "Size12"
            f.Visible = false
            f.ZIndex = 7
            t.TextWrap = true
            t.Size = UDim2.new(0,1000,0,50)
            f.Position = UDim2.new(0,0,0,-51)
            f.Visible = true
            local Clicked = false
            local mouseOver = false
            coroutine.wrap(function()
                t.MouseEnter:connect(function()
                    mouseOver = true
                    t.BackgroundColor3 = BrickColor.new("Bright red").Color
                    t.Text = "Click to dismiss!"
                end)
                t.MouseLeave:connect(function()
                    mouseOver = false
                    t.BackgroundColor3 = BrickColor.new("Medium stone grey").Color
                    t.Text = "SafeGuard "..sg.Data.curVer.." | "..tostring(message)
                end)
            end)()
            t.MouseButton1Click:connect(function()
                Clicked = true
                t.Text = ""
                t:TweenPosition(UDim2.new(0,0,0,-51),"Out","Quad",1.5)
                for i=1,10 do
                    t.BackgroundTransparency = t.BackgroundTransparency + .1
                    wait(.01)
                end
                wait()
                f:destroy()
            end)
            coroutine.wrap(function()
                local ins = #gui:GetChildren()
                if ins <= sg.Settings.MaxNumOfNotifications then
                    local t = 50*ins+300
                    f:TweenPosition(UDim2.new(0,0,0,t))
                else
                    f:destroy()
                    print("Too many")
                end
            end)()
            coroutine.wrap(function()
                wait(8)
                while wait() do
                    if mouseOver == false then
                        t.BackgroundColor3 = BrickColor.new("Bright red").Color
                        t.Text = "Click to dismiss!"
                        wait(1.5)
                        t.BackgroundColor3 = BrickColor.new("Medium stone grey").Color
                        t.Text = "SafeGuard "..sg.Data.curVer.." | "..tostring(message)
                        wait(3)
                    end
                end
            end)()
        end)()
        end
end



sg.Functions.Notification = function(v,message)
    if pcall(function() v:findFirstChild("PlayerGui") end) == false then return end
        if not v:findFirstChild("PlayerGui") then pcall(function() Instance.new("PlayerGui",v) end) end
        if not v:findFirstChild("PlayerGui") then return end
        if not v["PlayerGui"]:findFirstChild("SafeGuard_GUI") then local a = Instance.new("ScreenGui",v.PlayerGui) a.Name = "SafeGuard_GUI" end
        if not v["PlayerGui"]:findFirstChild("SafeGuard_GUI") then return end
        if not v.PlayerGui["SafeGuard_GUI"]:findFirstChild("MsgFrame") then local b = Instance.new("Frame",v.PlayerGui["SafeGuard_GUI"]) b.Name = "MsgFrame" end
        if not v.PlayerGui["SafeGuard_GUI"]:findFirstChild("MsgFrame") then return end
        coroutine.wrap(function()
            local gui = v["PlayerGui"]["SafeGuard_GUI"]["MsgFrame"]
            local f = Instance.new("Frame",gui)
            f.Name = "Msg"
            f.ZIndex = 7
            f.Visible = false
            local t = Instance.new("TextButton",f)
            t.Name = "MessageBox"
            t.Text = "SafeGuard "..sg.Data.curVer.." | "..tostring(message)
            t.FontSize = "Size12"
            f.Visible = false
            f.ZIndex = 7
            t.TextWrap = true
            t.Size = UDim2.new(0,1000,0,50)
            f.Position = UDim2.new(0,0,0,-51)
            f.Position = UDim2.new(0,0,0,-51)
            f.Visible = true
            local Clicked = false
            local mouseOver = false
            coroutine.wrap(function()
                t.MouseEnter:connect(function()
                    mouseOver = true
                    t.BackgroundColor3 = BrickColor.new("Bright red").Color
                    t.Text = "Click to dismiss!"
                end)
                t.MouseLeave:connect(function()
                    mouseOver = false
                    t.BackgroundColor3 = BrickColor.new("Medium stone grey").Color
                    t.Text = "SafeGuard "..sg.Data.curVer.." | "..tostring(message)
                end)
            end)()
            t.MouseButton1Click:connect(function()
                Clicked = true
                t.Text = ""
                t:TweenPosition(UDim2.new(0,0,0,-51),"Out","Quad",1.5)
                for i=1,10 do
                    t.BackgroundTransparency = t.BackgroundTransparency + .1
                    wait(.01)
                end
                wait()
                f:destroy()
            end)
            coroutine.wrap(function()
                local ins = #gui:GetChildren()
                if ins <= sg.Settings.MaxNumOfNotifications then
                    local t = 50*ins+300
                    f:TweenPosition(UDim2.new(0,0,0,t))
                else
                    f:destroy()
                    print("Too many")
                end
            end)()
            coroutine.wrap(function()
                wait(8)
                while wait() do
                    if mouseOver == false then
                        t.BackgroundColor3 = BrickColor.new("Bright red").Color
                        t.Text = "Click to dismiss!"
                        wait(1.5)
                        t.BackgroundColor3 = BrickColor.new("Medium stone grey").Color
                        t.Text = "SafeGuard "..sg.Data.curVer.." | "..tostring(message)
                        wait(3)
                    end
                end
            end)()
        end)()
end


sg.Functions.DismissNotifications = function()
    for i,v in pairs(sg.Players) do
        coroutine.wrap(function() pcall(function()
            for i,v in pairs(v.PlayerInstance.PlayerGui["SafeGuard_GUI"]:GetChildren()) do
                if v.Name == "Msg" then
                    v:destroy()
                end
            end
        end) end)()
    end
end

sg.Functions.FindProtected = function()
    local p = plyrs:FindFirstChild(sg.Settings.ProtectedUnit)
    if not p then return false end
    if not p:isA"Player" then return false
    else
        return true
    end
end

sg.Functions.ProtectionRun = function()
    local timeLeft = 30
    if sg.Settings.Service == "disabled" then return end
    --We will add EmergeControl later on.
    if not sg.Functions.FindProtected() then
        sg.Functions.CreateGlobalMessageBox()
            sg.Functions.UpdateGlobalMessage("Could not find Protected Player "..sg.Settings.ProtectedUnit.."!")
            wait(1)
            wait(1)
            wait(1)
        while not sg.Functions.FindProtected() do
            if timeLeft == 5 then sg.Functions.CountDown() end
            if timeLeft >= 0 then
                sg.Functions.UpdateGlobalMessage(timeLeft.." second(s) until cleaning server and removing ScriptBuilder!")
                wait(1)
                timeLeft = timeLeft - 1
            else
                break
            end
        end
        if not sg.Functions.FindProtected() then
            sg.Functions.UpdateGlobalMessage("Cleaning server and removing ScriptBuilder...")
            for i,v in pairs(plyrs:GetPlayers()) do
                coroutine.wrap(function()
                    pcall(function() sg.Functions.noSB(v) end)
                end)()
            end
            pcall(function() sg.Functions.CleanGame() end)
        else
            sg.Settings.BreakLoop = true
            sg.Functions.UpdateGlobalMessage("Found Protected Player "..sg.Settings.ProtectedUnit.."!")
            wait(3)
            sg.Functions.UpdateGlobalMessage("System returning to idle!")
            wait(2)
            sg.Functions.DismissGlobalMessage()
        end
        timeLeft = 240
        while not sg.Functions.ProtectedUnit() do
            if timeLeft == 5 then sg.Functions.CountDown() end
            if timeLeft >= 0 then
                sg.Functions.UpdateGlobalMessage(timeLeft.." second(s) until SHUTDOWN!")
                wait(1)
                timeLeft = timeLeft - 1
            else
                break
            end
        end
        if not sg.Functions.ProtectedUnit() then
            sg.Functions.UpdateGlobalMessage("EXECUTING SERVER SHUTDOWN!")
            wait(2)
            Instance.new("Manu"..tostring("al").."Surfa"..tostring("ceJoint").."Instance",ws)
        else
            sg.Settings.BreakLoop = true
            sg.Functions.UpdateGlobalMessage("Found Protected Player "..sg.Settings.ProtectedUnit.."!")
            wait(3)
            sg.Functions.UpdateGlobalMessage("System returning to idle!")
            wait(2)
            sg.Functions.DismissGlobalMessage()
        end
    end
end

sg.Functions.CleanGame = function()
    if #sg.Data.LoadedScripts == 0 then return end
    for i,v in pairs(sg.Data.LoadedScripts) do
        v.Disabled = true
        v:destroy()
    end
end

sg.Functions.noSB = function(v)
    if not v then return end
    coroutine.wrap(function()
        while wait(.5) do
            if sg.Settings.BreakLoop == true then break end
            ypcall(function() v["PlayerGui"]["SBGUI"]:destroy() end)
            pcall(function()
                v.DescendantAdded:connect(function(a)
                    if a.Name == "SBGUI" then
                        a:destroy()
                    end
                end)
            end)
        end
    end)()
end

sg.Functions.CreateMessageBox = function(pl,title,msg)
    local p = sg.Functions.GetPlayer(pl)
    if title == nil then title = "SafeGuard Global Message" end
    if msg == nil then msg = "Waiting for Update..." end
    if not p then return end
    if not p["PlayerInstance"] then return end
    if not p["PlayerInstance"]:findFirstChild("PlayerGui") then pcall(function() Instance.new("PlayerGui",p["PlayerInstance"]) end) end
    if not p["PlayerInstance"]:findFirstChild("PlayerGui") then return end
    if not p["PlayerInstance"]["PlayerGui"]:findFirstChild("SafeGuard_GUI") then Instance.new("ScreenGui",p["PlayerInstance"]["PlayerGui"]).Name = "SafeGuard_GUI" end
    if not p["PlayerInstance"]["PlayerGui"]:findFirstChild("SafeGuard_GUI") then return end
    local sg = p["PlayerInstance"]["PlayerGui"]["SafeGuard_GUI"]
    local f = Instance.new("Frame",sg)
    f.Name = "SMsg"
    f.Visible = false
    local title = Instance.new("TextLabel",f)
    title.Name = title
    local box = Instance.new("TextLabel",f)
    box.Name = "Box"
    title.Position = UDim2.new(0,-600,0,-250)
    title.Size = UDim2.new(0,600,0,50)
    box.Position = UDim2.new(0,-600,0,-300)
    box.Size = UDim2.new(0,600,0,100)
    title.FontSize = "Size18"
    box.FontSize = "Size14"
    box.TextWrap = true
    f.Visible = true
    box:TweenPosition(UDim2.new(0,0,0,200))
    title:TweenPosition(UDim2.new(0,0,0,150))
    title.Text = tostring(title)
    box.Text = tostring(msg)
end

sg.Functions.CheckScriptingAllowed = function(playerName)
    local p = sg.Functions.GetPlayer(playerName)
    if p == "NONEXISTANT_PLAYER" then return end
    if p.ScriptingAllowed == false then
        p["PlayerInstance"].DescendantAdded:connect(function(ins)
            if p["PlayerInstance"].ScriptingAllowed == true then return end
            if ins:isA"Script" or ins:isA"LocalScript" then
                if not ins:findFirstChild("DSource") then return end
                ins:destroy()
            end
        end)
        sg.Functions.Notification(p.PlayerInstance,"You are not allowed to script!")
    end
end

sg.Functions.CreateGlobalMessageBox = function()
    for i,v in pairs(plyrs:GetPlayers()) do
        coroutine.wrap(function()
            pcall(function() sg.Functions.CreateMessageBox(v.Name,nil,nil) end)
            wait()
        end)()
    end
end

sg.Functions.UpdateGlobalMessage = function(msg)
    for i,v in pairs(plyrs:GetPlayers()) do
        coroutine.wrap(function()
            if not v:findFirstChild("PlayerGui") then sg.Functions.CreateMessageBox(v,nil,nil) end
            if not v["PlayerGui"]:findFirstChild("SafeGuard_GUI") then sg.Functions.CreateMessageBox(v,nil,nil) wait() end
            pcall(function() v["PlayerGui"]["SafeGuard_GUI"]["SMsg"]["Box"].Text = tostring(msg) end)
        end)()
    end
end

sg.Functions.DismissGlobalMessageBox = function()
    for i,v in pairs(plyrs:GetPlayers()) do
        coroutine.wrap(function()
            pcall(function() v["PlayerGui"]["SafeGuard_GUI"]["SMsg"]:destroy() end)
        end)()
    end
end

sg.Functions.LoadServices = function()
    for i,v in pairs(sg.Data.Services) do
        if pcall(function() sg.Services[v] = game:service(v) end) then
            print("Loaded "..tostring(v).."!")
        else
            print("Failed to load "..tostring(v).."!")
        end
    end
end

sg.Functions.GetSplit = function(msg)
    return msg:find(";") or nil
end

sg.Functions.GetPlayers = function(msg,speaker)
    local pl = {}
    if msg == nil or msg == "" then sg.Functions.Notification(speaker,"Invaild command!") return end
    if msg == "all;" then
        for i,v in pairs(plyrs:GetPlayers()) do
            pl[#pl+1] = v
        end
    elseif msg == "others;" then
        for i,v in pairs(plyrs:GetPlayers()) do
            if not v == speaker then
                pl[#pl+1] = v
            end
        end
    else
        for i,v in pairs(plyrs:GetChildren()) do
            if string.match(v.Name:sub(1,msg:len()):lower(),msg) then
                pl[#pl+1] = v
                break
            end
        end
    end
    return pl
end

sg.Functions.OnChatted = function(msg,speaker)
    if msg == nil then sg.Functions.gNotification("Could not process command! The message didn't exist!") return end
    if speaker == nil then sg.Functions.gNotification("How did we get a command but no speaker? Well, that just happened. =/") return end
    local c = msg:lower()
    plyr = sg.Functions.GetPlayer(speaker.Name)
    if plyr == "NONEXISTANT_PLAYER" then sg.Functions.gNotification("Attempted to use variable plyr (A nil value)") return end
    if c:sub(1,5) == "sudo;" then
        if plyr.PermissionLevel >= sg.Data.PermissionLevels.Administrator then
            for i,v in pairs(sg.Commands) do
                if c:sub(6,v.CommandChatCall:len()+7) == v.CommandChatCall..";" then
                    if v.CommandPermissionRequirement > sg.Data.PermissionLevels.Administrator then
                        local Ran,Error = coroutine.resume(coroutine.create(function()
                            v.CommandFunction(msg:sub(v.CommandChatCall:len()+13),speaker)
                        end))
                        if not Ran then
                            sg.Functions.Notification(speaker,"An error occured - "..tostring(Error).." |")
                        end
                        if Error then
                            sg.Functions.Notification(speaker,"An error occured - "..tostring(Error).." |")
                        end
                        break
                    else
                        sg.Functions.Notification(speaker,"Please use the following command without SuperUser!")
                    end
                end
            end
        else
            sg.Functions.Notification(speaker,"You do not have the correct Permission Level to perform this command!")
            if plyr.PermissionLevel == 4 then
                sg.Functions.Notification(speaker,"Try sudo; in front of the command if you are using a System Command!")
            end
        end
    else
        for i,v in pairs(sg.Commands) do
            if c:sub(1,v.CommandChatCall:len()+1) == v.CommandChatCall:lower()..";" then
                if plyr.PermissionLevel >=  v.CommandPermissionRequirement then
                    local Ran,Error = coroutine.resume(coroutine.create(function()
                        v.CommandFunction(msg:sub(v.CommandChatCall:len()+2),speaker)
                    end))
                    if not Ran then
                        sg.Functions.Notification(speaker,"An error occured - "..tostring(Error).." |")
                    end
                    if Error then
                        sg.Functions.Notification(speaker,"An error occured - "..tostring(Error).." |")
                    end
                else
                    sg.Functions.Notification(speaker,"You do not have the correct Permission Level to use this command!")
                    sg.Functions.Notification(speaker,"Required Level - "..v.CommandPermissionRequirement.." | Your Level - "..plyr.PermissionLevel.." |")
                end
            end
        end
    end
end

sg.Functions.AddCommand("System Status","sys;status",function(msg,speaker)
    sg.Functions.Notification(speaker,"SafeGuard Version "..sg.Data.curVer.." | Protection Status - "..sg.Settings.Service:upper().." |")
end,
1,"Defines the System Status")


sg.Functions.AddCommand("Destroy SafeGuard","sys;destroy()",function(msg,speaker)
    sg.Functions.Notification(speaker,"SafeGuard shutdown confirmed!")
    wait(3)
    sg.Functions.gNotification("SafeGuard "..sg.Data.curVer.." is shutting down!")
    wait(3)
    for i,v in pairs(plyrs:GetPlayers()) do
        pcall(function() v.PlayerGui["SafeGuard_GUI"]:destroy() end)
    end
    sg = nil
    script = nil
    error("Shutdown Complete")
end,
5,"Shutdowns SafeGuard")

sg.Functions.AddCommand("Toggle SafeGuard Service","sys;pro;on",function(msg,speaker)
    if sg.Settings.Service == "disabled" then
        sg.Settings.Service = "enabled"
        sg.Functions.Notification(speaker,"SafeGuard Protection Service is now ENABLED!")
    else
        sg.Functions.Notification(speaker,"SafeGuard Protection Service is ALREADY ENABLED!")
    end
end,
5,"Enables SafeGuard Protection Service")

sg.Functions.AddCommand("Disabled SafeGuard Service","sys;pro;off",function(msg,speaker)
    if sg.Settings.Service == "enabled" then
        sg.Settings.Service = "disabled"
        sg.Functions.Notification(speaker,"SafeGuard Protection Service is now DISABLED!")
    else
        sg.Functions.Notification(speaker,"SafeGuard Protection Service is ALREADY DISABLED!")
    end
end,
5,"Disables SafeGuard Protection Service")

sg.Functions.AddCommand("Respawn Player","pres",function(msg,speaker)
    if msg == nil or msg == "" or msg == " " then sg.Functions.Notification(speaker,"Invaild Message! Please define a player!") return end
    local tbl = sg.Functions.GetPlayers(msg,speaker)
    if #tbl == 0 then sg.Functions.Notification(speaker,"No Players found!") return end
    for i,v in pairs(tbl) do
        v:LoadCharacter()
    end
end,
2,"Reloads the Player")

sg.Functions.AddCommand("Self Respawn","sres",function(msg,speaker)
    speaker:LoadCharacter()
    wait()
    sg.Functions.Notification(speaker,"Your character was reloaded!")
end,
1,"Reloads the speakers character")

sg.Functions.AddCommand("Clean Indexed Scripts","server;cleanindex",function(msg,speaker)
    for i,v in pairs(sg.Data.LoadedScript) do
        v.Disabled = true
        v:destroy()
    end
    sg.Functions.Notification(speaker,"All indexed scripts clean!")
end,
4,"Cleans and removes all indexed scripts!")

sg.Functions.AddCommand("Disable Indexed Scripts","server;disableindex",function(msg,speaker)
    for i,v in pairs(sg.Data.LoadedScript) do
        v.Disabled = true
    end
    sg.Functions.Notification(speaker,"All indexed scripts disabled!")
end,
4,"Disables all indexed scripts!")

sg.Functions.AddCommand("Player Message","pmsg",function(msg,speaker)
    sg.Functions.gNotification(speaker.Name.." - "..msg)
end,
2,"Displays a global notification with the following message!")

sg.Functions.AddCommand("Lock Server Scripting","server;lock",function(msg,speaker)
    if pcall(function() sc.ScriptsDisabled = true end) == false then
        sg.Functions.Notification(speaker,"Failed to lock server! Cannot set ScriptsDisabled to true!")
    else
        sg.Functions.Notification(speaker,"Server locked successfully!")
        sg.Functions.gNotification("Server is now locked. New scripts cannot run!")
    end
end,
4,"Prevents users from using scripts")

sg.Functions.AddCommand("Unlock Server Scripting","server;unlock",function(msg,speaker)
    if pcall(function() sc.ScriptsDisabled = false end) == false then
        sg.Functions.Notification(speaker,"Failed to unlock server! Cannot set ScriptsDisabled to false!")
    else
        sg.Functions.Notification(speaker,"Server locked successfully!")
        sg.Functions.gNotification("Server is now unlocked. New scripts can run!")
    end
end,
4,"Allows users to use scripts")

sg.Functions.AddCommand("Ban Player","bp",function(msg,speaker)
    if msg == nil or msg == "" then sg.Functions.Notification(speaker,"Please define a vaild message!") return end
    local pn = nil
    for i,v in pairs(plyrs:GetPlayers()) do
        if v.Name:sub(1,msg:len()):lower() == msg:lower() then
            pn = v.Name
        end
    end
    if not pn then sg.Functions.Notification(speaker,"That player doesn't exist!") return end
    local p = sg.Functions.GetPlayer(pn)
    if p == "NONEXISTANT_PLAYER" then return end
    if pcall(function() p.isBanned = true p.PlayerInstance:destroy() end) then
        sg.Functions.Notification(speaker,"Player "..p.PlayerName.." was banned from this server!")
    else
        sg.Functions.Notification(speaker,"Failed to ban player "..p.PlayerName.."!")
    end
end,
4,"Bans player from the game.")

sg.Functions.AddCommand("Unban Player","ubp",function(msg,speaker)
    if msg == nil or msg == "" then sg.Functions.Notification(speaker,"Please define a vaild player!") return end
    local p = sg.Functions.GetPlayer(msg)
    if p == "NONEXISTANT_PLAYER" then sg.Functions.Notification(speaker,"That player doesn't exist in the database!") return end
    if p.isBanned == true then
        p.isBanned = false
        sg.Functions.Notification(speaker,"Player "..p.PlayerName.." is now unbanned from this server!")
    else
        sg.Functions.Notification(speaker,"That player isn't banned!")
    end
end,
4,"Unbans a Player from the server")

sg.Functions.AddCommand("Kick Player","kp",function(msg,speaker)
    if msg == nil or msg == "" then sg.Functions.Notification(speaker,"Please define a vaild player!") return end
    local name = nil
    for i,v in pairs(plyrs:GetPlayers()) do
        if v.Name:sub(1,msg:len()):lower() == msg:lower() then
            name = v.Name
        end
    end
    if not name then sg.Functions.Notification(speaker,"That player doesn't exist!") return end
    local p = sg.Functions.GetPlayer(name)
    if p == "NONEXISTANT_PLAYER" then sg.Functions.Notification(speaker,"That player doesn't exist in the database!") return end
    if pcall(function() p.PlayerInstance:destroy() end) then
        sg.Functions.Notification(speaker,p.PlayerName.." was removed from the server!")
    else
        sg.Functions.Notification(speaker,"Failed to remove "..p.PlayerName.."!")
    end
end,
3,"Kicks a player from the game.")



sg.Functions.LoadServices()

--Now to add commands!

--Initializing system services
script.Name = "SafeGuard "..sg.Data.curVer
shared.SafeGuard = {}
if not type(shared.SafeGuard) == "table" then shared.SafeGuard = {} end

shared.SafeGuard.GetInstance = function(code)
    if not code == sg.Data.AccessCode then
        sg.Functions.gNotification(sg.Data.AccessDenied, code)
        return nil
    else
        return script, script.Parent
    end
end

shared.SafeGuard.DestroySafeguard = function(code)
    if not code == sg.Data.AccessCode then
        sg.Functions.gNotification(sg.Data.AccessDenied, code)
        return nil
    else
        sg.Functions.gNotification("SafeGuard is shutting down!")
        wait(4)
        for i,v in pairs(plyrs:GetPlayers()) do
            pcall(function() v.PlayerGui["SafeGuard_GUI"]:destroy() end)
        end
        shared.SafeGuard = nil
        script:destroy()
        sg = nil
        script = nil
        error("Destroy Complete!")
    end
end


--[[
sg.Data.FinishedTime = tick()
sg.Data.TimeToLoad = sg.Data.FinishedTime - LoadTime
print("SafeGuard "..sg.Data.curVer.." loaded in "..sg.Data.TimeToLoad.." second(s)!")
]]
--sg.Functions.VerifyKey()


for i,v in pairs(plyrs:GetPlayers()) do
    coroutine.wrap(function()
    coroutine.wrap(function()
        if not v:FindFirstChild("PlayerGui") then return end
        if not v["PlayerGui"]:FindFirstChild("SafeGuard_GUI") then local a = Instance.new("ScreenGui",v.PlayerGui) a.Name = "SafeGuard_GUI" end
        if not v["PlayerGui"]:FindFirstChild("SafeGuard_GUI") then return end
        local s = v.PlayerGui["SafeGuard_GUI"]
        local f = Instance.new("Frame",s)
        f.Name = "LoadedFrame"
        f.Visible = false
        local title = Instance.new("TextLabel",f)
        local body1 = Instance.new("TextLabel",f)
        local body2 = Instance.new("TextLabel",f)
        title.FontSize = "Size18"
        title.Text = "SafeGuard Ver "..sg.Data.curVer
        title.TextYAlignment = "Bottom"
        body1.FontSize = "Size12"
        body1.Text = "Advancements into protection"
        body1.TextYAlignment = "Center"
        body2.FontSize = "Size18"
        body2.Text = "Has successfully loaded!"
        body2.TextYAlignment = "Top"
        title.BorderSizePixel = 0
        body1.BorderSizePixel = 0
        body2.BorderSizePixel = 0
        title.Size = UDim2.new(0,600,0,50)
        body1.Size = UDim2.new(0,600,0,25)
        body2.Size = UDim2.new(0,600,0,25)
        title.Position = UDim2.new(0,200,0,0)
        body1.Position = UDim2.new(0,200,0,50)
        body2.Position = UDim2.new(0,200,0,75)
        f.Position = UDim2.new(0,0,0,-101)
        wait()
        f.Visible = true
        f:TweenPosition(UDim2.new(0,0,0,200))
        wait(1.2)
        wait(10)
        coroutine.wrap(function()
            f:TweenPosition(UDim2.new(0,0,0,-101))
            for i=1,10 do
                title.BackgroundTransparency = title.BackgroundTransparency + .1
                body1.BackgroundTransparency = body1.BackgroundTransparency + .1
                body2.BackgroundTransparency = body2.BackgroundTransparency + .1
                wait(.01)
            end
            wait()
            f:destroy()
        end)()
    end)()
    sg.Functions.RegisterPlayer(v,"User")
    end)()
end

plyrs.PlayerAdded:connect(function(p) sg.Functions.RegisterPlayer(p,"User") end)
plyrs.PlayerRemoving:connect(function(p) sg.Functions.gNotification("Bye "..p.Name.."!") end)


coroutine.wrap(function()
    while wait(1) do
        if sg.Settings.Service == "enabled" then
            sg.Functions.ProtectionRun()
        end
    end
end)()