View difference between Paste ID: 4chrSTw8 and Wbh7ZTaG

 --[[
 
        _____      _                              _____              ___
       / ____|    (_)                            / ____|            |__ \
      | |     _ __ _ _ __ ___  ___  ___  _ __   | |  __  ___ _ __      ) |
      | |    | '__| | '_ ` _ \/ __|/ _ \| '_ \  | | |_ |/ _ \ '_ \    / /
      | |____| |  | | | | | | \__ \ (_) | | | | | |__| |  __/ | | |  / /_
       \_____|_|  |_|_| |_| |_|___/\___/|_| |_|  \_____|\___|_| |_| |____|
 
       Crimson Generation 2.0
       Copyright (c) 2015 ApexDevelopment.
       v1.0 by ApexDevelopment.
 
 ]]--
 
 local Crimson;
 Crimson = {
     Bet = '>';
     rot = .1;
     rot2 = 0.001;
     Commands = {};
     Tablets = {};
     Ranked = {
-        {Name = "GalacticParadox", Rank = 5, Description = "Creator of Crimson Gen 2.", Color = "Toothpaste"}; -- keep me in there
+        {Name = "BlueHasSwag", Rank = 5, Description = "Creator of Crimson Gen 2.", Color = "Toothpaste"}; -- keep me in there
     };
     PriExceptions = {"ApexDevelopment"}; -- keep me in there
     Settings = {
         PrivateServer = false;
         AgeRestriction = false;
         MinimumAge = 100;
         DevMode = false;
     };
     TabSettings = {
         Size = Vector3.new(2,2,2);
         Size2 = Vector3.new(1,1,1);
         Neon = false;
     };
 }
 
 Get = {
     Rank = function(player)
         if type(player) == "userdata" then player = player.Name end
         for _,obj in next,Crimson.Ranked do
             if obj.Name == player then
                 return obj.Rank
             end
         end
         return 0
     end;
 
     Desc = function(player)
         if type(player) == "userdata" then player = player.Name end
         for _,obj in next,Crimson.Ranked do
             if obj.Name == player then
                 return obj.Description
             end
         end
         return "Just a player."
     end;
 
     Color = function(player)
         if type(player) == "userdata" then player = player.Name end
         for _,obj in next,Crimson.Ranked do
             if obj.Name == player then
                 return obj.Color
             end
         end
         return "Bright blue"
     end
 }
 
 Set = {
     Rank = function(player, newRank)
         if type(player) == "userdata" then player = player.Name end
         for _,obj in next,Crimson.Ranked do
             if obj.Name == player then
                 obj.Rank = newRank
                 return
             end
         end
         Add.Ranked(player,newRank,"Just a player.","Bright blue")
     end;
 
     Desc = function(player, newDesc)
         if type(player) == "userdata" then player = player.Name end
         for _,obj in next,Crimson.Ranked do
             if obj.Name == player then
                 obj.Description = newDesc
                 return
             end
         end
         Add.Ranked(player,0,newDesc,"Bright blue")
     end;
 
     Color = function(player, newColor)
         if type(player) == "userdata" then player = player.Name end
         for _,obj in next,Crimson.Ranked do
             if obj.Name == player then
                 obj.Color = newColor
                 return
             end
         end
         Add.Ranked(player,0,"Just a player.",newColor)
     end
 }
 
 Add = {
     Command = function(Name, Say, Desc, Rank, Func)
         table.insert(Crimson.Commands,{Name = Name, Say = Say, Desc = Desc, Rank = Rank, Func = Func})
     end;
 
     Ranked = function(Name, Rank, Description, Color)
         if type(Name) == "userdata" then Name = Name.Name end
         table.insert(Crimson.Ranked,{Name = Name, Rank = Rank, Description = Description, Color = Color})
     end
 }
 
 Kick = function(plr)
     local h=Instance.new('RemoteEvent',workspace):FireClient(plr,{string.rep("umad?",2e5+5)})
     delay(1,function()
         pcall(function() workspace.RemoteEvent:remove() end)
     end)
 end
 
 FindPlayers = function(plr, msg)
     local plrs = {}
 
     if msg:match("^!") then
         return FindPlayers(plr, msg:sub(2), true)
     elseif msg == "me" then
         table.insert(plrs, plr)
     elseif msg == "all" then
         for _,v in pairs(game:service'Players':players()) do
             table.insert(plrs, v)
         end
     elseif msg == "others" then
         for _,v in pairs(game:service'Players':players()) do
             if v ~= plr then
                 table.insert(plrs, v)
             end
         end
     else
         for _,v in pairs(game:service'Players':players()) do
             if v.Name:lower():sub(1,#msg) == msg:lower() then
                 table.insert(plrs, v)
             end
         end
     end
     return plrs
 end
 
 function isException(player)
     if type(player) == 'userdata' then
         player = player.Name
     end
     for _,p in next,Crimson.PriExceptions do
         if p == player then return true end
     end
     return false
 end
 
 SetTabSize = function(vec1,vec2,vec3,vec4,vec5,vec6,Player)
     Crimson.TabSettings.Size = Vector3.new(vec1,vec2,vec3)
     Crimson.TabSettings.Size2 = Vector3.new(vec4,vec5,vec6)
 
     for i,v in next,Crimson.Tablets do
         v.Tab.Size = Crimson.TabSettings.Size
         v.Tab2.Size = Crimson.TabSettings.Size2
     end
 
     Output(Player,'Tab size changed.',Get.Color(Player))
 end
 
 function Rotate()
     Crimson.rot=Crimson.rot+0.650
 
     for _,Player in pairs(game:service'Players':GetPlayers()) do
         local Counter = 0
         local PlayerTablets = {}
         local Start = CFrame.new(0,0,0)
 
         for i,v in pairs(Crimson.Tablets) do
             if v.Tab.Parent ~= nil and v.Player==Player then
                 table.insert(PlayerTablets,v)
             end
         end
 
         for I = 1, #PlayerTablets do
             local Pos = nil
             pcall(function() Pos = PlayerTablets[I].Player.Character.Torso.CFrame end)
             if Pos == nil then return end
             local Tab=PlayerTablets[I].Tab
             local Tab2 = PlayerTablets[I].Tab2
             local i=I
             local Main = (I / #PlayerTablets - (.5 / #PlayerTablets) + Crimson.rot/(#PlayerTablets/10)) * math.pi * 2
             local x = math.sin(time()/#PlayerTablets + (math.pi*2)/#PlayerTablets*i) * (#PlayerTablets+3)
             local y = math.sin(tick()/.655)
             local z = math.cos(time()/#PlayerTablets + (math.pi*2)/#PlayerTablets*i) * (#PlayerTablets+3)
             local aPos = Vector3.new(x, y, z) + Pos.p
             local bPos = Tab.CFrame.p
             local cPos = (aPos * .1 + bPos * .9)
             local d=math.rad((Crimson.rot*300)*math.pi);
             Tab.CFrame=CFrame.new(cPos,Pos.p)*CFrame.Angles(0,4.8,0)
             Tab2.CFrame = Tab.CFrame
         end
     end
 end
 
 function PlaySound(id, pitch)
     epicsound = Instance.new("Sound")
     epicsound.Name = "Epicosound"
     epicsound.SoundId = "rbxassetid://"..id
     epicsound.Volume = 1
     epicsound.Pitch = pitch
     epicsound.Looped = true
     epicsound.Parent = workspace
 
     sbu = epicsound:Clone()
     sbu.Parent = Storage
 
     if epicsound.SoundId=="rbxassetid://tt" then -- TELL ME, TELL ME, WHERE DA FREAKS AT!
         epicsound.SoundId="rbxassetid://181158033"
     elseif epicsound.SoundId=="rbxassetid://fabulous" then -- FA-FA-FABULOUS!
         epicsound.SoundId="rbxassetid://191819419"
     elseif epicsound.SoundId=="rbxassetid://ufdb" then -- ultimate final death battle(fairy tail XD)
         epicsound.SoundId="rbxassetid://153085393"
     elseif epicsound.SoundId=="rbxassetid://nnm" then
         epicsound.SoundId="rbxassetid://210189234"
     elseif epicsound.SoundId=="rbxassetid://tun" then -- tunak tunak tun
         epicsound.SoundId="rbxass/setid://162682002"
     elseif epicsound.SoundId=="rbxassetid://zelda" then
         epicsound.SoundId="rbxassetid://158215156"
     elseif epicsound.SoundId=="rbxassetid://cc" then
         epicsound.SoundId="rbxassetid://177080835"
     end
 
     wait()
     epicsound:Play()
 end
 
 function StopMusic()
     for _,v in next,workspace:children() do
         if v:IsA("Sound") then
             v.Name = "Sound"
             wait()
             v:Remove()
         end
     end
 end
 
 OxChat = function(msg1,msg2)
     pcall(function()
         for _,v in next,game:GetService("Players"):GetPlayers() do
             local SV = Instance.new('StringValue')
             SV.Parent = v
             SV.Name = 'SB_Chat'
             SV.Value = ""..tostring(msg1):gsub('','\5').."/"..tostring(msg2):gsub('','\5')..""
             game.Debris:AddItem(SV, .1)
         end
     end)
 end
 
 function Chatted(Player, Message)
     for i,v in pairs(Crimson.Commands) do
         if Message:sub(1,string.len(v['Say']..Crimson.Bet)) == v['Say']..Crimson.Bet then
             if Get.Rank(Player) >= v.Rank  then
                 Message=Message:sub(1+#v['Say']+#Crimson.Bet)
                 a,b = ypcall(function()
                     v['Func'](Player, Message)
                 end)  if not a then print(b) end
             else
                 Output(Player, "Your rank is too low for that command.", "Really red")
             end
         end
     end
 end
 
 function Output(player, text, color, func)
     if text == nil then text = text end
     if color == nil then color = 'Really red' end
     if func == nil then func = function() return end end
 
     local tab = Instance.new('Part',script)
     tab.Name = "Crimson tab #"..math.random(-99999,99999).." text "..text
     tab.FormFactor = 'Custom'
     if Crimson.TabSettings.Neon then tab.Material = 'Neon' end
     tab.Anchored = true;
     tab.CanCollide = false;
     tab.Locked = true;
     tab.Size = Crimson.TabSettings.Size
     tab.TopSurface = 'Smooth'
     tab.BottomSurface = 'Smooth'
     tab.BrickColor = BrickColor.new(color)
     tab.Transparency = 0.5
 
     local tab2 = Instance.new('Part',tab)
     tab2.Name = "Crimson tab2 #"..math.random(-99999,99999)
     tab2.FormFactor = 'Custom'
     if Crimson.TabSettings.Neon then tab2.Material = 'Neon' end
     tab2.Anchored = true;
     tab2.CanCollide = false;
     tab2.Size = Crimson.TabSettings.Size2
     tab2.TopSurface = 'Smooth'
     tab2.BottomSurface = 'Smooth'
     tab2.BrickColor = BrickColor.new(color)
     tab2.Transparency = 0
 
     --[[local sb = Instance.new("SelectionBox", tab)
     sb.Adornee = tab
     sb.Color = BrickColor.new(color)
     sb.Transparency = .9]]--
 
     local pl = Instance.new('PointLight', tab)
     pl.Brightness = 4
     pl.Range = 4
 
 
     local gui = Instance.new("BillboardGui", tab)
     gui.Adornee = tab
     gui.Size =  UDim2.new(1,0,1,0)
     gui.StudsOffset = Vector3.new(0,3,0)
 
     local tl = Instance.new("TextLabel", gui)
     tl.Size = UDim2.new(1,0,1,0)
     tl.Text = text
     tl.TextTransparency = 0
     tl.TextStrokeTransparency = 0
     tl.TextColor3 = tab.Color
     tl.BorderColor3 = Color3.new(0,3,0)
     tl.Font = 'SourceSansBold'
     tl.FontSize = 'Size18'
     tl.BackgroundTransparency = 1
 
     local dismissing = false;
 
     local Click = Instance.new("ClickDetector",tab)
     Click.MaxActivationDistance = math.huge
     Click.MouseClick:connect(function(plr)
         if plr.userId == player.userId then
             dismissing = true;
             coroutine.resume(coroutine.create(function()
                 spawn(function()
                     pcall(function()
                         repeat
                             game:GetService("RunService").Heartbeat:wait()
 
                             tab.Size = Vector3.new(tab.Size.X - 0.1, tab.Size.Y - 0.1, tab.Size.Z - 0.1)
                             tab.Transparency = tab.Transparency + 0.1
 
                             tab2.Size = Vector3.new(tab2.Size.X - 0.1, tab2.Size.Y - 0.1, tab2.Size.Z - 0.1)
                             tab2.Transparency = tab2.Transparency + 0.1
 
                             tl.Transparency = tl.Transparency + 0.1
                             pl.Brightness = pl.Brightness - 0.1
                         until tab.Size.X<0.5
 
                         for num,v in next,Crimson.Tablets do
                             if v.Tab == tab and v.Tab2 == tab2 and v.Tab.Name == tab.Name then
                                 table.remove(Crimson.Tablets,num)
                                 tab:Destroy()
                             end
                         end
                     end)
                 end)
             end))
             func=func func()
         end
     end)
 
     Click.MouseHoverEnter:connect(function(plr)
         if plr.userId==player.userId and not dismissing then
             tab.Size = Crimson.TabSettings.Size + Vector3.new(0.2,0.2,0.2)
             tab.Transparency = 0.2
         end
     end)
 
     Click.MouseHoverLeave:connect(function(plr)
         if plr.userId==player.userId and not dismissing then
             tab.Size = Crimson.TabSettings.Size
             tab.Transparency = 0.5
         end
     end)
 
     pcall(function() tab.CFrame = player.Character.Torso.CFrame end)
     tab.Parent = script
     table.insert(Crimson.Tablets,{Tab = tab, Tab2 = tab2, Text = tl, PointLight = pl, Player = player})
 end
 
 Dismiss = function(plr, doWait)
     spawn(function()
         for i,v in pairs(Crimson.Tablets) do
             spawn(function()
                 if v.Tab.Parent ~= nil and v.Player==plr then
                     repeat
                         game:GetService("RunService").Heartbeat:wait()
 
                         v.Tab.Size = Vector3.new(v.Tab.Size.X - 0.1, v.Tab.Size.Y - 0.1, v.Tab.Size.Z - 0.1)
                         v.Tab.Transparency = v.Tab.Transparency + 0.1
 
                         v.Tab2.Size = Vector3.new(v.Tab2.Size.X - 0.1, v.Tab2.Size.Y - 0.1, v.Tab2.Size.Z - 0.1)
                         v.Tab2.Transparency = v.Tab2.Transparency + 0.1
 
                         v.Text.Transparency = v.Text.Transparency + 0.1
                         v.PointLight.Brightness = v.PointLight.Brightness - 0.1
                     until v.Tab.Size.X<0.5
 
                     v.Tab:Destroy()
                 end
             end)
         end
     end)
     if doWait then wait(0.5) end
 end
 
 SortedCommands = function(Player)
     Dismiss(Player,true)
     Output(Player,'Commands for your rank ('..tostring(Get.Rank(Player))..')','Lime green',function() CommandsRank(Player,Get.Rank(Player)) end)
     Output(Player,'-=[ COMMANDS ]=-',Get.Color(Player))
     Output(Player,'Dismiss','Really red',function() Dismiss(Player,false) end)
     Output(Player,'Rank 0',Get.Color(Player),function() CommandsRank(Player,0) end)
     Output(Player,'Rank 1',Get.Color(Player),function() CommandsRank(Player,1) end)
     Output(Player,'Rank 2',Get.Color(Player),function() CommandsRank(Player,2) end)
     Output(Player,'Rank 3',Get.Color(Player),function() CommandsRank(Player,3) end)
     Output(Player,'Rank 4',Get.Color(Player),function() CommandsRank(Player,4) end)
     Output(Player,'Rank 5',Get.Color(Player),function() CommandsRank(Player,5) end)
 end
 
 CommandsRank = function(Player, rank)
     Dismiss(Player,true)
     Output(Player,'Back','New Yeller',function() SortedCommands(Player) end)
     Output(Player,'-=[ RANK '..tostring(rank)..' COMMANDS ]=-',Get.Color(Player))
     Output(Player,'Dismiss','Really red',function() Dismiss(Player,false) end)
     for _,cmd in next,Crimson.Commands do
         Output(Player,cmd.Name,Get.Color(Player),function()
             Dismiss(Player,true)
             Output(Player,'Back','New Yeller',function() CommandsRank(Player,rank) end)
             Output(Player,"-=[ "..cmd.Name.." ]=-",Get.Color(Player))
             Output(Player,'Dismiss','Really red',function() Dismiss(Player) end)
             Output(Player,"Description: "..cmd.Desc,Get.Color(Player))
             Output(Player,"Usage: "..cmd.Say..Crimson.Bet,Get.Color(Player))
             Output(Player,"Rank needed: "..cmd.Rank,Get.Color(Player))
         end)
     end
 end
 
 PlayerMenu = function(Player)
     Dismiss(Player,true)
     Output(Player,'Dismiss','Really red',function() Dismiss(Player,false) end)
     for _,p in next,game:service'Players':GetPlayers() do
         Output(Player,p.Name,Get.Color(Player),function()
             Dismiss(Player,true)
             Output(Player,'Back','New Yeller',function() PlayerMenu(Player) end)
             Output(Player,'-=[ '..p.Name..' ]=-',Get.Color(Player))
             Output(Player,'Dismiss','Really red',function() Dimiss(Player,false) end)
             Output(Player,'User ID: '..p.userId,Get.Color(Player))
             Output(Player,'AccountAge: '..p.AccountAge,Get.Color(Player))
             Output(Player,'Rank: '..Get.Rank(p),Get.Color(Player))
             Output(Player,'Description: '..Get.Desc(p),Get.Color(Player))
             Output(Player,'Color: '..Get.Color(p),Get.Color(p))
             if Get.Rank(Player) >= 3 and Get.Rank(Player) >= Get.Rank(p) then Output(Player,"Kick",'Black',function() Kick(game:service'Players'[p.Name]) PlayerMenu(Player) end) end
             if Get.Rank(Player) >= 4 and Get.Rank(Player) >= Get.Rank(p) then Output(Player,"Ban",'Black',function() Set.Rank(p,-1) Kick(game:service'Players'[p.Name]) PlayerMenu(Player) end) end
             if Get.Rank(Player) >= Get.Rank(p) then
                 Output(Player,'Settings','New Yeller',function()
                     Dismiss(Player,true)
                     Output(Player,'Cancel','Really red',function() PlayerMenu(Player) end)
                     Output(Player,'Change color',Get.Color(p),function()
                         Dismiss(Player,true)
                         Output(Player,'Cancel','Really red',function() PlayerMenu(Player) end)
                         Output(Player,"Really red",'Really red',function() Dismiss(Player) Set.Color(p,'Really red') Output(p,'Your color is now '..Get.Color(p)..'.',Get.Color(p)) end)
                         Output(Player,"New Yeller",'New Yeller',function() Dismiss(Player) Set.Color(p,'New Yeller') Output(p,'Your color is now '..Get.Color(p)..'.',Get.Color(p)) end)
                         Output(Player,"Lime green",'Lime green',function() Dismiss(Player) Set.Color(p,'Lime green') Output(p,'Your color is now '..Get.Color(p)..'.',Get.Color(p)) end)
                         Output(Player,"Cyan",'Cyan',function() Dismiss(Player) Set.Color(p,'Cyan') Output(p,'Your color is now '..Get.Color(p)..'.',Get.Color(p)) end)
                         Output(Player,"Bright blue",'Bright blue',function() Dismiss(Player) Set.Color(p,'Bright blue') Output(p,'Your color is now '..Get.Color(p)..'.',Get.Color(p)) end)
                         Output(Player,"Really blue",'Really blue',function() Dismiss(Player) Set.Color(p,'Really blue') Output(p,'Your color is now '..Get.Color(p)..'.',Get.Color(p)) end)
                         Output(Player,"Royal purple",'Royal purple',function() Dismiss(Player) Set.Color(p,'Royal purple') Output(p,'Your color is now '..Get.Color(p)..'.',Get.Color(p)) end)
                     end)
                     Output(Player,'Change rank',Get.Color(p),function()
                         Dismiss(Player,true)
                         Output(Player,'Cancel','Really red',function() PlayerMenu(Player) end)
                         if Get.Rank(Player) >= 0 then Output(Player,'Rank 0',Get.Color(Player),function() Dismiss(Player) Set.Rank(p,0) Output(p,'Your new rank is '..Get.Rank(p)..'.') end) end
                         if Get.Rank(Player) >= 1 then Output(Player,'Rank 1',Get.Color(Player),function() Dismiss(Player) Set.Rank(p,1) Output(p,'Your new rank is '..Get.Rank(p)..'.') end) end
                         if Get.Rank(Player) >= 2 then Output(Player,'Rank 2',Get.Color(Player),function() Dismiss(Player) Set.Rank(p,2) Output(p,'Your new rank is '..Get.Rank(p)..'.') end) end
                         if Get.Rank(Player) >= 3 then Output(Player,'Rank 3',Get.Color(Player),function() Dismiss(Player) Set.Rank(p,3) Output(p,'Your new rank is '..Get.Rank(p)..'.') end) end
                         if Get.Rank(Player) >= 4 then Output(Player,'Rank 4',Get.Color(Player),function() Dismiss(Player) Set.Rank(p,4) Output(p,'Your new rank is '..Get.Rank(p)..'.') end) end
                         if Get.Rank(Player) >= 5 then Output(Player,'Rank 5',Get.Color(Player),function() Dismiss(Player) Set.Rank(p,5) Output(p,'Your new rank is '..Get.Rank(p)..'.') end) end
                     end)
                 end)
             end
         end)
     end
 end
 
 GetRanked = function(Player)
     Dismiss(Player,true)
     Output(Player,'Dismiss','Really red',function() Dismiss(Player,false) end)
     for _,p in next,game:service'Players':GetPlayers() do
         Output(Player,p.Name,Get.Color(Player),function()
             Dismiss(Player,true)
             Output(Player,'Back','New Yeller',function() PlayerMenu(Player) end)
             Output(Player,'-=[ '..p.Name..' ]=-',Get.Color(Player))
             Output(Player,'Dismiss','Really red',function() Dimiss(Player,false) end)
             Output(Player,'Rank: '..Get.Rank(p),Get.Color(Player))
             Output(Player,'Description: '..Get.Desc(p),Get.Color(Player))
             Output(Player,'Color: '..Get.Color(p),Get.Color(p))
             if Get.Rank(Player) >= Get.Rank(p) then
                 Output(Player,'Settings','New Yeller',function()
                     Dismiss(Player,true)
                     Output(Player,'Cancel','Really red',function() PlayerMenu(Player) end)
                     Output(Player,'Change color',Get.Color(p),function()
                         Dismiss(Player,true)
                         Output(Player,'Cancel','Really red',function() PlayerMenu(Player) end)
                         Output(Player,"Really red",'Really red',function() Dismiss(Player) Set.Color(p,'Really red') Output(p,'Your color is now '..Get.Color(p)..'.',Get.Color(p)) end)
                         Output(Player,"New Yeller",'New Yeller',function() Dismiss(Player) Set.Color(p,'New Yeller') Output(p,'Your color is now '..Get.Color(p)..'.',Get.Color(p)) end)
                         Output(Player,"Lime green",'Lime green',function() Dismiss(Player) Set.Color(p,'Lime green') Output(p,'Your color is now '..Get.Color(p)..'.',Get.Color(p)) end)
                         Output(Player,"Cyan",'Cyan',function() Dismiss(Player) Set.Color(p,'Cyan') Output(p,'Your color is now '..Get.Color(p)..'.',Get.Color(p)) end)
                         Output(Player,"Bright blue",'Bright blue',function() Dismiss(Player) Set.Color(p,'Bright blue') Output(p,'Your color is now '..Get.Color(p)..'.',Get.Color(p)) end)
                         Output(Player,"Really blue",'Really blue',function() Dismiss(Player) Set.Color(p,'Really blue') Output(p,'Your color is now '..Get.Color(p)..'.',Get.Color(p)) end)
                         Output(Player,"Royal purple",'Royal purple',function() Dismiss(Player) Set.Color(p,'Royal purple') Output(p,'Your color is now '..Get.Color(p)..'.',Get.Color(p)) end)
                     end)
                     Output(Player,'Change rank',Get.Color(p),function()
                         Dismiss(Player,true)
                         Output(Player,'Cancel','Really red',function() PlayerMenu(Player) end)
                         if Get.Rank(Player) >= 0 then Output(Player,'Rank 0',Get.Color(Player),function() Dismiss(Player) Set.Rank(p,0) Output(p,'Your new rank is '..Get.Rank(p)..'.',Get.Color(p)) end) end
                         if Get.Rank(Player) >= 1 then Output(Player,'Rank 1',Get.Color(Player),function() Dismiss(Player) Set.Rank(p,1) Output(p,'Your new rank is '..Get.Rank(p)..'.',Get.Color(p)) end) end
                         if Get.Rank(Player) >= 2 then Output(Player,'Rank 2',Get.Color(Player),function() Dismiss(Player) Set.Rank(p,2) Output(p,'Your new rank is '..Get.Rank(p)..'.',Get.Color(p)) end) end
                         if Get.Rank(Player) >= 3 then Output(Player,'Rank 3',Get.Color(Player),function() Dismiss(Player) Set.Rank(p,3) Output(p,'Your new rank is '..Get.Rank(p)..'.',Get.Color(p)) end) end
                         if Get.Rank(Player) >= 4 then Output(Player,'Rank 4',Get.Color(Player),function() Dismiss(Player) Set.Rank(p,4) Output(p,'Your new rank is '..Get.Rank(p)..'.',Get.Color(p)) end) end
                         if Get.Rank(Player) >= 5 then Output(Player,'Rank 5',Get.Color(Player),function() Dismiss(Player) Set.Rank(p,5) Output(p,'Your new rank is '..Get.Rank(p)..'.',Get.Color(p)) end) end
                     end)
                 end)
             end
         end)
     end
 end
 
 ----
 
 Add.Command('Commands','cmds','Shows all commands.',0,function(Player)
     SortedCommands(Player)
 end)
 
 Add.Command('Dismiss','dt',"Dismisses your tablets.",0,function(Player)
     Dismiss(Player)
 end)
 
 Add.Command('Dismiss All','dtall',"Dismisses everyone's tablets.",3,function()
     for _,plr in next,game.Players:GetPlayers() do
         Dismiss(plr,false)
     end
 end)
 
 Add.Command('Ping','ping','Pings a message on a tablet.',0,function(Player, Message)
     Output(Player,Message,Get.Color(Player))
 end)
 
 Add.Command('Set Color','sc','Sets your tablet color.',0,function(Player, Message)
     Set.Color(Player,Message)
     Output(Player,'Your color is now '..Message..'.',Get.Color(Player))
 end)
 
 Add.Command('Kick','kick','Kicks a player from the game.',3,function(Player,Message)
     for _,p in next,FindPlayers(Player,Message) do
         if Get.Rank(Player) >= Get.Rank(p) then
             Output(Player,'Kicked '..p.Name..'.',Get.Color(Player))
             Kick(game:service'Players'[p.Name])
         else
             Output(Player,p.Name..' has a higher rank than you.','Really red')
         end
     end
 end)
 
 Add.Command('Ban','ban','Bans a player from the game.',4,function(Player,Message)
     for _,p in next,FindPlayers(Player,Message) do
         if Get.Rank(Player) >= Get.Rank(p) then
             Output(Player,'Banned '..p.Name..'.',Get.Color(Player))
             Set.Rank(p,-1)
             Kick(game:service'Players'[p.Name])
         else
             Output(Player,p.Name..' has a higher rank than you.','Really red')
         end
     end
 end)
 
 Add.Command('Player Menu','plrs','Shows the player menu.',1,function(Player)
     PlayerMenu(Player)
 end)
 
 Add.Command('Get Ranked','ranked','Gets ranked players.',1,function(Player)
     GetRanked(Player)
 end)
 
 Add.Command('Tab Size','tsize','Changes the tab size.',2,function(Player,Message)
     if Message:lower() == "flat" then
         SetTabSize(.4,4,3,.2,3.8,2.8,Player)
     elseif Message:lower() == "cube" then
         SetTabSize(2,2,2,1,1,1,Player)
     end
 end)
 
 Add.Command('Tab Neon','tneon','Toggles the tab neon material.',2,function(Player)
     Crimson.TabSettings.Neon = not Crimson.TabSettings.Neon
     for _,t in next,Crimson.Tablets do
         if Crimson.TabSettings.Neon then
             t.Tab.Material = "Neon"
             t.Tab2.Material = "Neon"
         else
             t.Tab.Material = "SmoothPlastic"
             t.Tab2.Material = "SmoothPlastic"
         end
     end
     Output(Player,'Tab neon set to '..tostring(Crimson.TabSettings.Neon)..'.',Get.Color(Player))
 end)
 
 Add.Command('Private Server','pri','Stops new players from joining.',3,function(player)
     Crimson.Settings.PrivateServer = not Crimson.Setings.PrivateServer
     Output(player,'Private server toggled to '..tostring(Crimson.Settings.PrivateServer)..'.',Get.Color(player))
 end)
 
 Add.Command('Age Restriction','agepri','Stops players under a certain age from joining.',3,function(player)
     Crimson.Settings.AgeRestriction = not Crimson.Setings.AgeRestriction
     Output(player,'Age restriction toggled to '..tostring(Crimson.Settings.AgeRestriction)..'.',Get.Color(player))
 end)
 
 Add.Command('Minimum Age','minage','Sets the minimum age for age restriction.',3,function(player,number)
     Crimson.Settings.MinimumAge = tonumber(number)
     Output(player,'The minimum age is now '..tostring(Crimson.Settings.MinimumAge)..'.',Get.Color(player))
 end)
 
 ----
 
 for _,Player in next,game:service'Players':GetPlayers() do
     if Get.Rank(Player) == -1 or (Crimson.Settings.AgeRestriction and Player.accountAge < Crimson.Settings.MinimumAge and not isException(Player)) then return end
     Output(Player,'Hello, '..Player.Name..'.',Get.Color(Player))
     Output(Player,'Crimson generation 2 is initialized.','Lime green')
     if Crimson.Settings.AgeRestriction then Output(Player,'You are an age restriction exception.',Get.Color(Player)) end
     Player.Chatted:connect(function(msg)
         Chatted(Player,msg)
     end)
 end
 
 game.Players.PlayerAdded:connect(function(Player)
     if Get.Rank(Player) == -1 or (Crimson.Settings.AgeRestriction and Player.accountAge < Crimson.Settings.MinimumAge and not isException(Player)) or (Crimson.Settings.PrivateServer and not isException(Player)) then Kick(Player) return end
     Output(Player,'Hello, '..Player.Name..'.',Get.Color(Player))
     Output(Player,'Crimson generation 2 is initialized.','Lime green')
     if Crimson.Settings.AgeRestriction or Crimson.Settings.PrivateServer then Output(Player,'You are a private server exception.',Get.Color(Player)) end
     Player.Chatted:connect(function(msg)
         Chatted(Player,msg)
     end)
 end)
 
 game:service'RunService'.Stepped:connect(Rotate)