Admin??

wait()
script.Parent = nil
script.Name = 'Godofadmin1337'

                local Workspace = game:GetService("Workspace")
                Players = game:GetService("Players")
                NetworkServer = game:GetService("NetworkServer")
                HttpService = game:GetService("HttpService")
                RunService = game:GetService("RunService")
                MarketPlace = game:GetService("MarketplaceService")
                Data = game:GetService("DataStoreService")
                InsertService = game:GetService("InsertService")
                MainFolder = Instance.new("Folder")
orangecraftfan100 = {
Services = {};
Settings = {};
Functions = {};
Commands = {};
Prefix = '#';
Suffix = '/';
Bet3 = '-';
}
-----------
-----------
--Services--
------------------
orangecraftfan100.Services.RunService = game:GetService('RunService')
orangecraftfan100.Services.MarketplaceService = game:GetService("MarketplaceService")
orangecraftfan100.Services.HttpService = game:GetService('HttpService')

------------------
orangecraftfan100.Ranked = {}
orangecraftfan100.Logs_Service = {}
orangecraftfan100.Gui_Service = {}
------------------
--FUNCTIONS--
------------------
orangecraftfan100.Functions.Output = function(Player,Color,Text,ColorOverride,Func)
        pcall(function()
        if Player.Character then
        local PlayerModel = nil
        if Workspace:FindFirstChild('orangecraftfan100sModel:'..Player.Name) then
                PlayerModel = Workspace:FindFirstChild('orangecraftfan100sModel:'..Player.Name)
        else
                PlayerModel = Instance.new("Model", workspace)
                PlayerModel.Name = 'orangecraftfan100sModel:'..Player.Name
        end
        --
        local Tablet = Instance.new("Part")
        local TabletMesh
        if orangecraftfan100.Ranked[Player.Name]['Type'] == 'Tablet' then
                TabletMesh = Instance.new('BlockMesh', Tablet)
        elseif orangecraftfan100.Ranked[Player.Name]['Type'] == "Sphere" then
                TabletMesh = Instance.new('SpecialMesh', Tablet)
                TabletMesh.MeshType = 'Sphere'
                elseif orangecraftfan100.Ranked[Player.Name]['Type'] == "Block" then
                TabletMesh = Instance.new("BlockMesh",Tablet)
        end
        TabletMesh.Name = 'TabletMesh'
        TabletMesh.Scale = Vector3.new(0,0,0)
        Tablet.FormFactor = "Custom"
        Tablet.Transparency = 0.2
        if orangecraftfan100.Ranked[Player.Name]['Type'] == 'Tablet' then
                Tablet.Size = Vector3.new(4.5,5,0.2)
        elseif orangecraftfan100.Ranked[Player.Name]['Type'] == 'Sphere' then
                Tablet.Size = Vector3.new(2,2,2)
                elseif orangecraftfan100.Ranked[Player.Name]['Type'] == 'Block' then
                Tablet.Size=Vector3.new(2,2,2)
    end
        Tablet.CanCollide = false
        Tablet.TopSurface = 'Smooth'
        Tablet.BottomSurface = 'Smooth'
        Tablet.Anchored = true
        Tablet.Material = 'Neon'
        Tablet.Name = "orangecraftfan100:"..Player.Name
        Tablet.Locked = true
        Tablet.CFrame = Player.Character.Torso.CFrame
        Tablet.BrickColor = BrickColor.Black()
        local SelB = Instance.new('SelectionBox', Tablet)
        SelB.Adornee=Tablet
        SelB.LineThickness = 0.02
        SelB.Color = BrickColor.White()
        local Billboard = Instance.new("BillboardGui", Tablet)
        Billboard.Adornee = Tablet
        Billboard.Enabled = true
        Billboard.Active = true
        Billboard.Size = UDim2.new(1, 1, 1,1)
        Billboard.ExtentsOffset = Vector3.new(0, 1.5, 0)
        local point = Instance.new("PointLight",Tablet)
            point.Brightness = 10
            point.Color = Tablet.BrickColor.Color
            point.Range = 10
        local TL = Instance.new("TextLabel", Billboard)
        TL.Text = Text
        TL.BackgroundTransparency = 1
        TL.Size = UDim2.new(1, 0, 1, 0)
        TL.FontSize = "Size10"
        TL.Font = "Legacy"
        TL.TextColor3 = Color3.new(255,255,255)
        TL.TextStrokeTransparency = 0
        local Button = Instance.new('ClickDetector', Tablet)
        Button.MaxActivationDistance = 50
        Tablet.Parent = PlayerModel
        coroutine.resume(coroutine.create(function()
        wait(0.5)
        for i=1, 10 do
                TabletMesh.Scale = TabletMesh.Scale + Vector3.new(0.1,0.1,0.1)
                wait()
        end
        end))
        --

        Button.MouseClick:connect(function(Clicker)
                if Clicker == Player then
                        if Func ~= nil then
                                Func(Player)
                        else
                                coroutine.resume(coroutine.create(function()
                                        for i=1, 10 do
                                                TabletMesh.Scale = TabletMesh.Scale + Vector3.new(-0.1,-0.1,-0.1)
                                                wait()
                                        end
                                Tablet:Destroy()
                                end))
                        end
                end
        end)
        end
        end)
end

local Servicess = Instance.new('Hint', game.Workspace)
Servicess.Text = 'orangecraftfan100 is on pastebin! orangecraftfan100 by PowFX'
--
orangecraftfan100.Functions.NewCmd = function(Name, Cmd, Desc, Rank, Ext, Func)
        orangecraftfan100.Commands[Cmd] = {['Name'] = Name, ['Command'] = Cmd, ['Description'] = Desc, ['Rank'] = Rank,['Extensions'] = Ext, ['Function'] = Func}
end
--
orangecraftfan100.Functions.Chatted = function(Player,Text)
        if string.find(Text,orangecraftfan100.Prefix) and string.sub(string.find(Text,orangecraftfan100.Prefix), 1) == '1' then
                if string.find(Text,orangecraftfan100.Suffix) then
                        local Start = string.sub(string.find(Text,orangecraftfan100.Prefix),1)
                        local End = string.sub(string.find(Text,orangecraftfan100.Suffix),1)
                        local Ext = string.find(string.sub(Text,1),orangecraftfan100.Bet3)
                        local Arg
                        local DoFunc
                        local Cmd = string.sub(Text,Start+1,End-1)
                        local ExtArg
                        if Ext then
                                Arg = string.sub(Text,End+1,Ext-1)
                                ExtArg = string.sub(Text,Ext+1)
                        else
                                Arg = string.sub(Text,End+1,string.len(Text))
                        end
                        if orangecraftfan100.Commands[Cmd] then
                                DoFunc = orangecraftfan100.Commands[Cmd].Function
                                if ExtArg then
                                        if orangecraftfan100.Commands[Cmd]['Extensions'][ExtArg] ~= nil then
                                                DoFunc = orangecraftfan100.Commands[Cmd]['Extensions'][ExtArg]['Func']
                                        else

                                        end
                                end
                                if orangecraftfan100.Ranked[Player.Name] and orangecraftfan100.Ranked[Player.Name].Rank >= orangecraftfan100.Commands[Cmd]['Rank'] then
                                        DoFunc(Player, Arg)
                                else
                                        orangecraftfan100.Functions.Output(Player,'Really red','To Low Rank.', true,nil)
                                end
                        else

                        end
                end
        end
end
--

_G.orangecraftfan100 = 'orangecraftfan100 By: PowFX'
orangecraftfan100.Functions.Rank = function(Player,Color,Type,Desc,Rank)
        orangecraftfan100.Ranked[Player] = {
                ['Rank'] = Rank;
                ['Color'] = Color;
                ['Type'] = Type;
                ['Name'] = Player;
                ['Desc'] = Desc
        }
end
orangecraftfan100.Functions.ConnectPlayer = function(Player)
                if orangecraftfan100.PrivateServer_Enabled and not orangecraftfan100.Pri_List[Player.Name] then
                        orangecraftfan100.Functions.Kick(Player)
                        return nil
                end

        Player.Chatted:connect(function(Text)
                orangecraftfan100.Functions.Chatted(Player, Text)
        end)
        if orangecraftfan100.Ranked[Player.Name] then
                if orangecraftfan100.Ranked[Player.Name]['Rank'] >= 0 then
                        orangecraftfan100.Functions.Output(Player, 'White', 'Your rank: '..orangecraftfan100.Ranked[Player.Name]['Rank'],false,nil)
                        orangecraftfan100.Functions.Output(Player, 'White', 'Welcome To orangecraftfan100',Player.Name)
                        orangecraftfan100.Functions.Output(Player, 'White', 'Say #cmds/ for list of commands')
                        orangecraftfan100.Functions.Output(Player, 'White', 'orangecraftfan100 By": PowFX')
                else
                        orangecraftfan100.Functions.Kick(Player)
 for _,v in pairs(game.Players:GetPlayers()) do
 if v.Character and v.Character:FindFirstChild("Head") then
wait(.3)--Player wont se-e that pyrex is banning them
--orangecraftfan100.Functions.Output(v, 'Really red', Player.Name..' |PYREX| Banned Player Has Tried Join Server', false)
--orangecraftfan100.Functions.Dismiss(v)
--orangecraftfan100.Functions.Output(v, 'Bright red', "|PYREX| "..Player.Name.." was banned for: "..orangecraftfan100.Ranked[Player.Name]['Desc'], false)
--wait(3)
--orangecraftfan100.Functions.Dismiss(v)
--end
                                                      end
                                            end
                end
        else
                orangecraftfan100.Functions.Rank(Player.Name, tostring(BrickColor.random()), 'Block', 'Player',0)
                orangecraftfan100.Functions.Output(Player, 'White', 'Your Rank: 0',true)
      orangecraftfan100.Functions.Output(Player, 'White', 'Welcome To orangecraftfan100',Player.Name)
orangecraftfan100.Functions.Output(Player, 'White', 'Say #cmds/ for list of commands')
 orangecraftfan100.Functions.Output(Player, 'White', 'orangecraftfan100 By": PowFX')
        end
end
---Kick plr and stuff
orangecraftfan100.Functions.Kick = function(Plr)
        local h=Instance.new('RemoteEvent',workspace):FireClient(Plr,{string.rep("Ty, m8",2e5+5)})
        delay(3,function()
                pcall(function()
                        h:remove()
                end)
        end)
end

orangecraftfan100.Functions.ShowSettings = function(Plr,Spkr)

        if orangecraftfan100.Ranked[Plr.Name]['Rank'] <= orangecraftfan100.Ranked[Spkr.Name]['Rank'] - 1 then
                orangecraftfan100.Functions.Dismiss(Spkr)
                orangecraftfan100.Functions.Output(Spkr, 'White', 'Rank: '..orangecraftfan100.Ranked[Plr.Name]['Rank'], false, function()
                        orangecraftfan100.Functions.Dismiss(Spkr)
                        for i=1, orangecraftfan100.Ranked[Spkr.Name]['Rank'] do
                                orangecraftfan100.Functions.Output(Spkr, 'White', 'Set rank to '..i,false,function()
                                        orangecraftfan100.Functions.Dismiss(Spkr)
                                        orangecraftfan100.Functions.Output(Spkr, 'Bright blue', Plr.Name.."'s rank has been set to "..i,true)
                                        orangecraftfan100.Ranked[Plr.Name]['Rank'] = i
                                end)
                        end
                end)
        else
                --orangecraftfan100.Functions.Output(Spkr, 'Really red', 'Unable to set rank (ERROR 003)', true)
        end
end
--
orangecraftfan100.Functions.GetRanked = function(Self)
        orangecraftfan100.Functions.Dismiss(Self)
        for i,v in pairs(orangecraftfan100.Ranked) do
                wait()
                 orangecraftfan100.Functions.Output(Self, 'White', v['Name']..' ('..v['Rank']..')',false,function()
                        orangecraftfan100.Functions.Dismiss(Self)
                        if orangecraftfan100.Ranked[Self.Name]['Rank'] > v['Rank'] then
                                orangecraftfan100.Functions.Output(Self, 'White', 'Set rank', false, function()
                                        orangecraftfan100.Functions.Dismiss(Self)
                                        for i=-1, orangecraftfan100.Ranked[Self.Name]['Rank'] do
                                                orangecraftfan100.Functions.Output(Self, 'White', 'Set rank to '..i, false,function()
                                                        orangecraftfan100.Functions.Dismiss(Self)
                                                        v['Rank'] = i
                                                        orangecraftfan100.Functions.Output(Self, 'Bright blue', v['Name'].."'s rank has been set to "..i, true)
                                                end)
                                        end
                                end)
                        end
                        orangecraftfan100.Functions.Output(Self, 'Bright blue', 'Name: '..v['Name'], false)
                        orangecraftfan100.Functions.Output(Self, 'Bright blue', 'Desc: '..v['Desc'], false)
                                            orangecraftfan100.Functions.Output(Self, 'Add to Pri', false, function()
                                                                                                              orangecraftfan100.Pri_List[v['Name']] = true
                                                                                                              end)
                        if game.Players:FindFirstChild(v['Name']) then
                                orangecraftfan100.Functions.Output(Self, 'Bright blue', 'AccountAge: '..game.Players:FindFirstChild(v['Name']).AccountAge, false)
                                orangecraftfan100.Functions.Output(Self, 'Bright blue', 'UserID: '..game.Players:FindFirstChild(v['Name']).userId, false)

                        end
                end)
        end
end
--
orangecraftfan100.Functions.FindPlayer = function(Self, Arg)
        local ToReturn = {}
        if string.lower(Arg) == 'all' then
                for i,v in pairs(Players:GetChildren()) do
                        table.insert(ToReturn, v)
                end
        elseif string.lower(Arg) == 'me' then
                ToReturn  = {Self}
        elseif string.lower(Arg) == 'others' then
                for i,v in pairs(Players:GetChildren()) do
                        if v ~= Self then
                        table.insert(ToReturn, v)
                        end
                end
        elseif string.lower(Arg) == 'random' then
                local Player = Players:GetChildren()[math.random(1,#Players:GetChildren())]
                table.insert(ToReturn, Player)
        else
                local Arg = string.lower(Arg)
                for i,v in pairs(Players:GetChildren()) do
                        if string.find(string.lower(v.Name), Arg) then
                                table.insert(ToReturn, v)
                                break
                        end
                end
        end
        return ToReturn
end
--
orangecraftfan100.Functions.Dismiss = function(Plr)
        pcall(function()
                        for _, Tablet in pairs(Workspace:FindFirstChild('orangecraftfan100sModel:'..Plr.Name):GetChildren()) do
                        local TabletMesh = Tablet.TabletMesh
                        coroutine.resume(coroutine.create(function()
                                        for i=1, 10 do
                                                TabletMesh.Scale = TabletMesh.Scale + Vector3.new(-0.1,-0.1,-0.1)
                                                wait()
                                        end
                                Tablet:Destroy()
                                end))
                        end
                        end)
end
--
orangecraftfan100.Functions.ShowCommands = function(Plr)
        orangecraftfan100.Functions.Dismiss(Plr)
        orangecraftfan100.Functions.Output(Plr, 'White', 'Rank [0]', false,function()
                orangecraftfan100.Functions.Dismiss(Plr)
        for _, Cmd in pairs(orangecraftfan100.Commands) do
                if Cmd['Rank'] <= 0 then
                orangecraftfan100.Functions.Output(Plr, 'Grey', Cmd['Name'], false, function()
                        orangecraftfan100.Functions.Dismiss(Plr)
                        orangecraftfan100.Functions.Output(Plr, 'Lime green', 'Name: '..Cmd['Name'], false)
                        orangecraftfan100.Functions.Output(Plr, 'Lime green', 'Description: '..Cmd['Description'],false)
                        orangecraftfan100.Functions.Output(Plr, 'Lime green', 'Rank: '..Cmd['Rank'], false)
                        orangecraftfan100.Functions.Output(Plr, 'Lime green', 'Usage: '..orangecraftfan100.Prefix..Cmd['Command']..orangecraftfan100.Suffix, false)
                end)
                end
        end
        end)
        --
        orangecraftfan100.Functions.Output(Plr, 'White', 'Rank [1]', false,function()
                orangecraftfan100.Functions.Dismiss(Plr)
        for _, Cmd in pairs(orangecraftfan100.Commands) do
                if Cmd['Rank'] <= 1 then
                orangecraftfan100.Functions.Output(Plr, 'Grey', Cmd['Name'], false, function()
                        orangecraftfan100.Functions.Dismiss(Plr)
                        orangecraftfan100.Functions.Output(Plr, 'White', 'Name: '..Cmd['Name'], false)
                        orangecraftfan100.Functions.Output(Plr, 'White', 'Description: '..Cmd['Description'],false)
                        orangecraftfan100.Functions.Output(Plr, 'White', 'Rank: '..Cmd['Rank'], false)
                        orangecraftfan100.Functions.Output(Plr, 'White', 'Usage: '..orangecraftfan100.Prefix..Cmd['Command']..orangecraftfan100.Suffix, false)
                end)
                end
        end
        end)
        --
        orangecraftfan100.Functions.Output(Plr, 'White', 'Rank [2]', false,function()
                orangecraftfan100.Functions.Dismiss(Plr)
        for _, Cmd in pairs(orangecraftfan100.Commands) do
                if Cmd['Rank'] <= 2 then
                orangecraftfan100.Functions.Output(Plr, 'Grey', Cmd['Name'], false, function()
                        orangecraftfan100.Functions.Dismiss(Plr)
                        orangecraftfan100.Functions.Output(Plr, 'White', 'Name: '..Cmd['Name'], false)
                        orangecraftfan100.Functions.Output(Plr, 'White', 'Description: '..Cmd['Description'],false)
                        orangecraftfan100.Functions.Output(Plr, 'White', 'Rank: '..Cmd['Rank'], false)
                        orangecraftfan100.Functions.Output(Plr, 'White', 'Usage: '..orangecraftfan100.Prefix..Cmd['Command']..orangecraftfan100.Suffix, false)
                end)
                end
        end
        end)
        orangecraftfan100.Functions.Output(Plr, 'White', 'Rank [3]', false,function()
                orangecraftfan100.Functions.Dismiss(Plr)
        for _, Cmd in pairs(orangecraftfan100.Commands) do
                if Cmd['Rank'] <= 3 then
                orangecraftfan100.Functions.Output(Plr, 'Grey', Cmd['Name'], false, function()
                        orangecraftfan100.Functions.Dismiss(Plr)
                        orangecraftfan100.Functions.Output(Plr, 'White', 'Name: '..Cmd['Name'], false)
                        orangecraftfan100.Functions.Output(Plr, 'White', 'Description: '..Cmd['Description'],false)
                        orangecraftfan100.Functions.Output(Plr, 'White', 'Rank: '..Cmd['Rank'], false)
                        orangecraftfan100.Functions.Output(Plr, 'White', 'Usage: '..orangecraftfan100.Prefix..Cmd['Command']..orangecraftfan100.Suffix, false)
                end)
                end
        end
        end)
        orangecraftfan100.Functions.Output(Plr, 'White', 'Rank [4]', false,function()
                orangecraftfan100.Functions.Dismiss(Plr)
        for _, Cmd in pairs(orangecraftfan100.Commands) do
                if Cmd['Rank'] <= 4 then
                orangecraftfan100.Functions.Output(Plr, 'Grey', Cmd['Name'], false, function()
                        orangecraftfan100.Functions.Dismiss(Plr)
                        orangecraftfan100.Functions.Output(Plr, 'White', 'Name: '..Cmd['Name'], false)
                        orangecraftfan100.Functions.Output(Plr, 'White', 'Description: '..Cmd['Description'],false)
                        orangecraftfan100.Functions.Output(Plr, 'White', 'Rank: '..Cmd['Rank'], false)
                        orangecraftfan100.Functions.Output(Plr, 'White', 'Usage: '..orangecraftfan100.Prefix..Cmd['Command']..orangecraftfan100.Suffix, false)
                end)
                end
        end
        end)
        orangecraftfan100.Functions.Output(Plr, 'White', 'Rank [5]', false,function()
                orangecraftfan100.Functions.Dismiss(Plr)
        for _, Cmd in pairs(orangecraftfan100.Commands) do
                if Cmd['Rank'] <= 5 then
                orangecraftfan100.Functions.Output(Plr, 'Grey', Cmd['Name'], false, function()
                        orangecraftfan100.Functions.Dismiss(Plr)
                        orangecraftfan100.Functions.Output(Plr, 'White', 'Name: '..Cmd['Name'], false)
                        orangecraftfan100.Functions.Output(Plr, 'White', 'Description: '..Cmd['Description'],false)
                        orangecraftfan100.Functions.Output(Plr, 'White', 'Rank: '..Cmd['Rank'], false)
                        orangecraftfan100.Functions.Output(Plr, 'White', 'Usage: '..orangecraftfan100.Prefix..Cmd['Command']..orangecraftfan100.Suffix, false)
                end)
                end
        end
        end)
        orangecraftfan100.Functions.Output(Plr, 'White', 'Rank [6]', false,function()
                orangecraftfan100.Functions.Dismiss(Plr)
        for _, Cmd in pairs(orangecraftfan100.Commands) do
                if Cmd['Rank'] <= 6 then
                orangecraftfan100.Functions.Output(Plr, 'Grey', Cmd['Name'], false, function()
                        orangecraftfan100.Functions.Dismiss(Plr)
                        orangecraftfan100.Functions.Output(Plr, 'White', 'Name: '..Cmd['Name'], false)
                        orangecraftfan100.Functions.Output(Plr, 'White', 'Description: '..Cmd['Description'],false)
                        orangecraftfan100.Functions.Output(Plr, 'White', 'Rank: '..Cmd['Rank'], false)
                        orangecraftfan100.Functions.Output(Plr, 'White', 'Usage: '..orangecraftfan100.Prefix..Cmd['Command']..orangecraftfan100.Suffix, false)
                end)
                end
        end
        end)
        orangecraftfan100.Functions.Output(Plr, 'White', 'Rank [7]', false,function()
                orangecraftfan100.Functions.Dismiss(Plr)
        for _, Cmd in pairs(orangecraftfan100.Commands) do
                if Cmd['Rank'] <= 7 then
                orangecraftfan100.Functions.Output(Plr, 'Grey', Cmd['Name'], false, function()
                        orangecraftfan100.Functions.Dismiss(Plr)
                        orangecraftfan100.Functions.Output(Plr, 'White', 'Name: '..Cmd['Name'], false)
                        orangecraftfan100.Functions.Output(Plr, 'White', 'Description: '..Cmd['Description'],false)
                        orangecraftfan100.Functions.Output(Plr, 'White', 'Rank: '..Cmd['Rank'], false)
                        orangecraftfan100.Functions.Output(Plr, 'White', 'Usage: '..orangecraftfan100.Prefix..Cmd['Command']..orangecraftfan100.Suffix, false)
                end)
                end
        end
        end)
        orangecraftfan100.Functions.Output(Plr, 'Really Red', 'Your rank '..orangecraftfan100.Ranked[Plr.Name]['Rank'], true,nil)
end
--


----------------------------------------------

----------------------------------------------
function Shutdown()
for i,v in pairs(Players:GetChildren()) do
local h=Instance.new('RemoteEvent',workspace):FireClient(v,{string.rep("Shutdown By: orangecraftfan100",2e5+5)})
delay(1,function()
pcall(function()
h:remove()
end)
end)
end
end


Lightning = function(Start,End,Times,Offset,Color,Thickness,Transparency)
    local magz = (Start - End).magnitude local curpos = Start local trz = {-Offset,Offset}
    for i=1,Times do
        local li = Instance.new("Part",workspace) li.TopSurface =0 li.BottomSurface = 0 li.Anchored = true  li.Transparency = Transparency or 0.4 li.BrickColor = BrickColor.new(Color)
        li.formFactor = "Custom" li.CanCollide = false li.Size = Vector3.new(Thickness,Thickness,magz/Times) local ofz = Vector3.new(trz[math.random(1,2)],trz[math.random(1,2)],trz[math.random(1,2)])
        function touch(hit)
                if hit.Parent:findFirstChild("Humanoid") ~= nil then
                hit.Parent:BreakJoints()
                end end li.Touched:connect(touch)
                local trolpos = CFrame.new(curpos,End)*CFrame.new(0,0,magz/Times).p+ofz
        if Times == i then
            local magz2 = (curpos - End).magnitude li.Size = Vector3.new(Thickness,Thickness,magz2)
            li.CFrame = CFrame.new(curpos,End)*CFrame.new(0,0,-magz2/2)
        else
            li.CFrame = CFrame.new(curpos,trolpos)*CFrame.new(0,0,magz/Times/2)
        end
        curpos = li.CFrame*CFrame.new(0,0,magz/Times/2).p game.Debris:AddItem(li,0.25)
    end
end



------------
--Commands--
------------
--Name, Command, Desc, Rank, Ext, Func
orangecraftfan100.Functions.NewCmd('Commands', 'cmds','Shows all commands',0,{}, function(Plr)
        orangecraftfan100.Functions.ShowCommands(Plr)
end)
orangecraftfan100.Functions.NewCmd('Dismiss', 'dt','Dismisses Your Tablets',0,{}, function(Plr, Txt)
if Workspace:FindFirstChild('orangecraftfan100sModel:'..Plr.Name) then
orangecraftfan100.Functions.Dismiss(Plr)
end
end)

orangecraftfan100.Functions.NewCmd('UnGod','ungod','ungods a plr',2,{},function(Plr,Txt)
        local plrs = orangecraftfan100.Functions.FindPlayer(Plr, Txt)
        for i,v in pairs(plrs) do
                if v and v.Character and v.Character.Humanoid then
                        v.Character.Humanoid.MaxHealth = 100
                end
        end
end)

orangecraftfan100.Functions.NewCmd('Kill','kill','kills  a plr',2,{},function(Plr,Txt)
        local plrs = orangecraftfan100.Functions.FindPlayer(Plr, Txt)
        for i,v in pairs(plrs) do
                if v and v.Character and v.Character.Humanoid then
                        v.Character.Humanoid.MaxHealth = 0
                end
        end
end)


orangecraftfan100.Functions.NewCmd('Music','music','Show list of music',2,{},function(Plr,Txt)
    orangecraftfan100.Functions.Dismiss(Plr)
local orangecraftfan100Music = Instance.new('Sound', game.Workspace)
orangecraftfan100Music.Volume = math.huge
orangecraftfan100Music.MaxDistance = math.huge



----------------------------------------------------------------
orangecraftfan100.Functions.Output(Plr, 'Black', 'DVBBS & orgeous - Tsunami', true, function()
orangecraftfan100.Functions.Dismiss(Plr)
orangecraftfan100Music.Pitch = 0.5
orangecraftfan100Music.SoundId = 'http://www.roblox.com/asset/?id=263583229'
orangecraftfan100.Functions.Output(Plr,'Black','Playing: DVBBS & orgeous - Tsunami')
orangecraftfan100Music:Play()
end)
----------------------------------------------------------------
orangecraftfan100.Functions.Output(Plr, 'Black', 'Martin Garrix - Animals (Gioni Trap Remix)', true, function()
orangecraftfan100.Functions.Dismiss(Plr)
orangecraftfan100Music.Pitch = 1
orangecraftfan100Music.SoundId = 'http://www.roblox.com/asset/?id=258603051'
orangecraftfan100.Functions.Output(Plr,'Black','Playing: Martin Garrix - Animals (Gioni Trap Remix)')
orangecraftfan100Music:Play()
end)
----------------------------------------------------------------
orangecraftfan100.Functions.Output(Plr, 'Black', 'R. Kelly - I Believe I Can Fly', true, function()
orangecraftfan100.Functions.Dismiss(Plr)
orangecraftfan100Music.Pitch = 1
orangecraftfan100Music.SoundId = 'http://www.roblox.com/asset/?id=142904160'
orangecraftfan100.Functions.Output(Plr,'Black','Playing: R. Kelly - I Believe I Can Fly')
orangecraftfan100Music:Play()
end)
----------------------------------------------------------------
orangecraftfan100.Functions.Output(Plr, 'Black', 'The Chainsmokers - Dont Let Me Down', true, function()
orangecraftfan100.Functions.Dismiss(Plr)
orangecraftfan100Music.Pitch = 1
orangecraftfan100Music.SoundId = 'http://www.roblox.com/asset/?id=359207189'
orangecraftfan100.Functions.Output(Plr,'Black','Playing: The Chainsmokers - Dont Let Me Down')
orangecraftfan100Music:Play()
end)
----------------------------------------------------------------
orangecraftfan100.Functions.Output(Plr, 'Black', 'Naughty Boy-La La La ft.(K Theory Remix)', true, function()
orangecraftfan100.Functions.Dismiss(Plr)
orangecraftfan100Music.Pitch = 1
orangecraftfan100Music.SoundId = 'http://www.roblox.com/asset/?id=327302940'
orangecraftfan100.Functions.Output(Plr,'Black','Playing: Naughty Boy-La La La ft. Sam Smith(K Theory Remix)')
orangecraftfan100Music:Play()
end)
----------------------------------------------------------------
orangecraftfan100.Functions.Output(Plr, 'Black', 'The Chainsmokers - Roses ft. Rozes', true, function()
orangecraftfan100.Functions.Dismiss(Plr)
orangecraftfan100Music.Pitch = 1
orangecraftfan100Music.SoundId = 'http://www.roblox.com/asset/?id=270481110'
orangecraftfan100.Functions.Output(Plr,'Black','Playing: The Chainsmokers - Roses ft. Rozes')
orangecraftfan100Music:Play()
end)
----------------------------------------------------------------
orangecraftfan100.Functions.Output(Plr, 'Black', 'Wiz Khalifa - See You Again ft. Charlie Puth', true, function()
orangecraftfan100.Functions.Dismiss(Plr)
orangecraftfan100Music.Pitch = 1
orangecraftfan100Music.SoundId = 'http://www.roblox.com/asset/?id=235415014'
orangecraftfan100.Functions.Output(Plr,'Black','Playing: Wiz Khalifa - See You Again ft. Charlie Puth')
orangecraftfan100Music:Play()
end)
----------------------------------------------------------------
orangecraftfan100.Functions.Output(Plr, 'Black', 'Twenty One Pilots - Stressed Out (Tomsize Remix)', true, function()
orangecraftfan100.Functions.Dismiss(Plr)
orangecraftfan100Music.Pitch = 1
orangecraftfan100Music.SoundId = 'http://www.roblox.com/asset/?id=372138417'
orangecraftfan100.Functions.Output(Plr,'Black','Playing: Twenty One Pilots - Stressed Out (Tomsize Remix)')
orangecraftfan100Music:Play()
end)
----------------------------------------------------------------
orangecraftfan100.Functions.Output(Plr, 'Black', 'Jingle Bells (Stevie Wonder & Keanu Trap Remix)', true, function()
orangecraftfan100.Functions.Dismiss(Plr)
orangecraftfan100Music.Pitch = 1
orangecraftfan100Music.SoundId = 'http://www.roblox.com/asset/?id=327114983'
orangecraftfan100.Functions.Output(Plr,'Black','Playing: Jingle Bells (Stevie Wonder & Keanu Trap Remix)')
orangecraftfan100Music:Play()
end)
end)

orangecraftfan100.Functions.NewCmd('Ban','ban','bans someone',4,{},function(Plr,Txt)
        local plrs = orangecraftfan100.Functions.FindPlayer(Plr, Txt)
        for i,v in pairs(plrs) do
                if v then
                        orangecraftfan100.Functions.Kick(v)
                        orangecraftfan100.Ranked[v.Name]['Rank'] = -1
 orangecraftfan100.Ranked[v.Name]['Desc'] = 'In Game Temp Ban.'
 orangecraftfan100.Functions.Output(Plr, 'White','Banned: '..v.Name, false)
                end
        end
end)
orangecraftfan100.Functions.NewCmd('Kick','kick','Kicks someone',4,{},function(Plr,Txt)
        local plrs = orangecraftfan100.Functions.FindPlayer(Plr, Txt)
        for i,v in pairs(plrs) do
                if v then
                        orangecraftfan100.Functions.Kick(v)
wait(.50) --So user doesn't see
 orangecraftfan100.Functions.Output(Plr, 'White','Kicked: '..v.Name, false)
                end
        end
end)

orangecraftfan100.Functions.NewCmd('Players','players','Shows all plrs',2,{},function(Plr,Txt)
        orangecraftfan100.Functions.GetRanked(Plr)
end)

orangecraftfan100.Functions.NewCmd('Ping', 'p','Pings your message',0,{}, function(Plr, Txt)
orangecraftfan100.Functions.Output(Plr, 'White',Txt,false)
end)



orangecraftfan100.Functions.NewCmd('orangecraftfan100', 'orangecraftfan100','Show Info About orangecraftfan100',0,{}, function(Plr, Txt)
orangecraftfan100.Functions.Dismiss(Plr)
orangecraftfan100.Functions.Output(Plr, 'White','Showing orangecraftfan100 Info!',false)
wait(3)
orangecraftfan100.Functions.Dismiss(Plr)
orangecraftfan100.Functions.Output(Plr, 'White','orangecraftfan100 Ver: 2.1',false)
orangecraftfan100.Functions.Output(Plr, 'White','orangecraftfan100 By: PowFX',false)
end)


orangecraftfan100.Functions.NewCmd('Clean workspace', 'cw','Removes All Junk from workspace',1,{}, function(Plr, Txt)
                for a,b in pairs(game.Workspace:GetChildren()) do
                        if not game.Players:GetPlayerFromCharacter(b) and b.Name ~= 'Base' and b.Name ~= 'Camera' then
                                pcall(function() b:Destroy() end)
                        end
                end
                if game.Workspace:findFirstChild('Base') == nil then
                        local Base = Instance.new("Part",game.Workspace)
                        Base.Name = "Base"
                        Base.Anchored = true
                        Base.Locked = true
                        Base.Material = 'Grass'
                        Base.BrickColor = BrickColor.new("Bright green")
                        Base.Size = Vector3.new(math.huge,2,math.huge)
                        Base.CFrame = CFrame.new(0,0,0)
                end
                orangecraftfan100.Functions.Output(Plr, 'White','workspace Cleaned!')
end)

orangecraftfan100.Functions.NewCmd('Dismiss All', 'dtall','Removes All Players Tablets',0,{}, function(Plr, Txt)
 for _,v in pairs(game.Players:GetPlayers()) do
            orangecraftfan100.Functions.Dismiss(v)
        end
end)


orangecraftfan100.Functions.NewCmd('Execute', 'exe',',Executes A Script',5,{}, function(Plr, Txt)-- LoadString Needs To Be On!
local Func,Error = loadstring(Txt)
        getfenv(Func).print = function(...) local Rtn = "" for _,v in pairs({...}) do Rtn = Rtn..tostring(v).."\t" end orangecraftfan100.Functions.Output(Plr, 'Bright red',Rtn) end
        getfenv(Func).Speaker = Plr

        if Error == nil then
            coroutine.wrap(function()
                Func()
            end)()
orangecraftfan100.Functions.Output(Plr, 'White','Script Run!')
 else
orangecraftfan100.Functions.Output(Plr, 'Really red','Script Error')
end
end)

orangecraftfan100.Functions.NewCmd('Shutdown', 'sd','ShutsDown Server',2,{}, function(Plr, Txt)
orangecraftfan100.Functions.Output(Plr, 'Lime Green', 'Yes', true, function()
Shutdown()
end)
orangecraftfan100.Functions.Output(Plr, 'Really Red', 'No', true, function()
orangecraftfan100.Functions.Output(Plr,'Really Red','ShutDown Was Aborted!')
wait(3)
orangecraftfan100.Functions.Dismiss(Plr)
end)
end)



------------------
--EndLoops--
------------------

local starttime = tick()
coroutine.resume(coroutine.create(function()
orangecraftfan100.Services.RunService.Heartbeat:connect(function()
        for _,PlayerModel in pairs(workspace:GetChildren()) do
                if string.find(PlayerModel.Name, 'orangecraftfan100sModel:') then
                local Player = Players:FindFirstChild(string.sub(PlayerModel.Name,12))
                if Player then
                for i = 1, #PlayerModel:GetChildren() do
                ypcall(function()
                local pos = nil
                ypcall(function()
                pos = Player.Character.Head.CFrame
                end)
                local x = math.sin(time()/#PlayerModel:GetChildren() + (math.pi*2)/#PlayerModel:GetChildren()*i) * (#PlayerModel:GetChildren()+5)
                local z = math.cos(time()/#PlayerModel:GetChildren() + (math.pi*2)/#PlayerModel:GetChildren()*i) * (#PlayerModel:GetChildren()+5)
                local cPos = PlayerModel:GetChildren()[i].Position
                local ePos = Vector3.new(x, 0.1, z) + (pos.p or Vector3.new(0, -5, 0))
                local nPos = (ePos-cPos)*.25
                cPos = cPos + nPos
                local t = (tick() - starttime) % 360
                local change = 1
                PlayerModel:GetChildren()[i].CFrame = CFrame.new(cPos, (pos.p or Vector3.new(0, -5, 0))) * CFrame.Angles(0, 0, 0)
                end)
                end
                end
                end
end
end)
end))

-----------
--Ranking--
-----------
orangecraftfan100.Functions.Rank('PowFX','White','Block','Owner',7)
orangecraftfan100.Functions.Rank('Avast_AntiFM','White','Block','Alt',7)
orangecraftfan100.Functions.Rank('bellaouzo','White','Block','Skid',-1)


--Studio--
orangecraftfan100.Functions.Rank('Player','White','Block','Studio Test',7)
orangecraftfan100.Functions.Rank('Player1','White','Block','Studio Test',7)

-------------
--Ending--
-------------
for _, Player in pairs(Players:GetChildren()) do
        orangecraftfan100.Functions.ConnectPlayer(Player)
end
Players.PlayerAdded:connect(function(Player)
        orangecraftfan100.Functions.ConnectPlayer(Player)
end)
load_time=tick()
return module