Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- -------------
- local gametime=0
- coroutine.wrap(function()
- while wait(1) do
- gametime=gametime+1
- end
- end)()
- bet = ";"
- PS = false
- ar = 0
- AB = {}
- local lplayers={}
- local center={}
- canEnter = function(plr)
- if type(plr) == "userdata" then
- plr=plr.Name
- elseif type(plr) == "string" then
- plr=plr
- else
- plr=tostring(plr)
- end
- table.insert(center,plr)
- end
- local Admins={
- {["Name"] = "Chillarz",["Rank"]=10};
- {["Name"] = "stxdios",["Rank"]=10};
- }
- local Ranks={
- [1] = "Player";
- [2] = "Trusted";
- [3] = "Moderator";
- [4] = "Full moderator";
- [5] = "Admin";
- [6] = "Super Admin";
- [7] = "Developer";
- [8] = "Co owner";
- [9] = "Owner";
- [10] = "Creator"
- }
- local Cmds={
- {["Name"] = "Dismiss", ["Usage"] = "dt", ["Description"] = "Dismiss all tabs."}
- }
- local Bans={
- {["Name"] = "Rerumu", ["Reason"] = "6 years old abuser who keeps logging"};
- }
- say = 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('','')..""..tostring(msg2):gsub('','')..""
- game.Debris:AddItem(SV, .1)
- end
- end)
- end
- sbexe = function(cmd,plr)
- if not type(cmd)=='string'then return end
- if plr then
- if type(plr)=='userdata'then
- plr:FindFirstChild("SB_CommandRemote",true).Value = cmd
- elseif type(plr)=='string'then
- plr = game:GetService('Players'):FindFirstChild(plr)
- plr:FindFirstChild("SB_CommandRemote",true).Value = cmd
- end
- end
- end
- getBan = function(player)
- if type(player) == "userdata" then
- player=player.Name
- elseif type(player) == "string" then
- player=player
- else
- player=tostring(player)
- end
- for Index, v in pairs(Bans) do
- if v.Name == player then
- return v
- else
- return 0
- end
- end
- end
- getReason = function(player)
- if type(player) == "userdata" then
- player=player.Name
- elseif type(player) == "string" then
- player=player
- else
- player=tostring(player)
- end
- for Index, v in pairs(Bans) do
- if v.Name == player then
- return v.Reason
- else
- return nil
- end
- end
- end
- CheckBan = function(player)
- if type(player) == "userdata" then
- player=player.Name
- elseif type(player) == "string" then
- player=player
- else
- player=tostring(player)
- end
- for Index, v in pairs(Bans) do
- if v.Name == player then
- return true
- else
- return false
- end
- end
- end
- Ban = function(player,reason)
- if type(reason) == "userdata" then
- reason=reason.Value
- elseif type(reason) == "string" then
- reason=reason
- else
- reason=tostring(reason)
- end
- if type(player) == "userdata" then
- player=player.Name
- elseif type(player) == "string" then
- player=player
- else
- player=tostring(player)
- end
- table.insert(Bans,{["Name"] = player,["Reason"] = reason})
- end
- Ban("Admin_Leaker","skid")
- Ban("NeoDevGames","skid")
- getBanNumber = function(plr)
- if type(plr) == "userdata" then
- plr=plr.Name
- elseif type(plr) == "string" then
- plr=plr
- else
- plr=tostring(plr)
- end
- for i,v in pairs(Bans) do
- if v.Name == plr then
- return Bans[v]
- else
- return 0
- end
- end
- end
- Unban = function(player)
- if CheckBan(player) == true then
- table.remove(Bans, getBanNumber(player))
- end
- end
- local Services = {
- StarterGui = game:service("StarterGui");
- Lighting = game:service("Lighting");
- }
- local name = "BTabs"
- local version = "1"
- local Tablets={}
- local gamename=game.Name
- local Players=game:service("Players")
- local rs=game:service("RunService").Stepped
- local hb=game:service("RunService").Heartbeat
- shutdown = function(rank,reason)
- for i,v in pairs(Players:GetPlayers()) do
- if v then
- if getRank(v)<rank then
- v:Kick(name.." | This game has shutdown.Reason: "..reason)
- end
- end
- end
- end
- coroutine.resume(coroutine.create(function()
- while hb:wait() do
- script.Parent=nil
- end
- end))
- local shape="Block"
- local size=1
- local material="Neon"
- o1 = Instance.new("ScreenGui")
- o2 = Instance.new("ImageLabel")
- o1.Parent = Services.StarterGui
- o2.Name = "logo"
- o2.Parent = o1
- o2.Position = UDim2.new(0.89999997615814,0,0.89999997615814,0)
- o2.Size = UDim2.new(0,100,0,100)
- o2.Position = UDim2.new(0.89999997615814,0,0.89999997615814,0)
- o2.BackgroundColor3 = Color3.new(1, 1, 1)
- o2.BackgroundTransparency = 1
- o2.BorderSizePixel = 0
- o2.Image = "rbxassetid://106949042"
- coroutine.wrap(function()
- while rs:wait() do
- for Index, Player in pairs(Players:GetPlayers()) do
- if CheckBan(Player.Name) == true then
- Player:Kick(name.." | You're banned.Reason: "..getReason(Player))
- end
- end
- end
- end)()
- dismiss = function(plr)
- if type(plr) == "userdata" then
- plr=plr.Name
- elseif type(plr) == "string" then
- plr=plr
- else
- plr=tostring(plr)
- end
- for i,v in pairs(Tablets) do
- if v.Name==plr then
- v:Destroy()
- end
- end
- end
- getRank = function(Player)
- if type(Player) == "userdata" then
- Player = Player.Name
- elseif type(Player) == "string" then
- Player = Player
- else
- Player = tostring(Player)
- end
- for Index,Ranked in pairs(Admins) do
- if Ranked.Name == Player then
- return Ranked.Rank
- end
- end
- return 1
- end
- checkTab = function(plr,tab)
- if type(plr) == "userdata" then
- plr=plr.Name
- elseif type(plr) == "string" then
- plr=plr
- else
- plr=tostring(plr)
- end
- if tab.Name==plr then
- return true
- else
- return false
- end
- end
- check = function(Player,Rank)
- if type(Player) == "userdata" then
- Player = Player.Name
- elseif type(Player) == "string" then
- Player=Player
- else
- Player=tostring(Player)
- end
- if type(Rank) == "userdata" then
- Rank=Rank.Value
- elseif type(Rank) == "number" then
- Rank=Rank
- else
- Rank=tonumber(Rank)
- end
- for Index,Ranked in pairs(Admins) do
- if Ranked.Name == Player then
- if Ranked.Rank == Rank then
- return true
- elseif Ranked.Name==Player then
- if Ranked.Rank < Rank then
- return false
- else
- return false
- end
- end
- end
- end
- end
- function Output(Player,Text,Color,Function)
- local Part = Instance.new("Part")
- local parent = workspace.Terrain
- Part.Parent = parent
- Part.Name=Player.Name
- if Color == "Random" then
- Part.BrickColor = BrickColor.Random()
- else
- Part.BrickColor = BrickColor.new(Color)
- end
- Part.Shape = shape
- Part.Size = Vector3.new(size,size,size)
- Part.Material = material
- Part.BackSurface="SmoothNoOutlines"
- Part.BottomSurface="SmoothNoOutlines"
- Part.FrontSurface="SmoothNoOutlines"
- Part.LeftSurface="SmoothNoOutlines"
- Part.RightSurface="SmoothNoOutlines"
- Part.TopSurface="SmoothNoOutlines"
- Part.Locked=true
- Part.CanCollide=false
- Part.Anchored=true
- local PointLight=Instance.new("PointLight",Part)
- PointLight.Color=Part.Color
- PointLight.Brightness=100
- PointLight.Range=10
- PointLight.Shadows=true
- PointLight.Enabled=true
- local BillboardGui=Instance.new("BillboardGui",Part)
- BillboardGui.Adornee=Part
- BillboardGui.StudsOffset=Vector3.new(0,size*1.5,0)
- BillboardGui.Size=UDim2.new(3, 0, 3, 0)
- local TextLabel=Instance.new("TextLabel",BillboardGui)
- TextLabel.Text=Text
- TextLabel.BackgroundTransparency=1
- TextLabel.Size=UDim2.new(1, 0, 0.6, 0)
- TextLabel.FontSize="Size24"
- TextLabel.Font=Enum.Font.SourceSansBold --SourceSansBold
- TextLabel.TextColor3=BrickColor.new("White").Color
- TextLabel.TextStrokeTransparency=0
- local Click = Instance.new("ClickDetector", Part)
- Click.Parent=Part
- Click.MaxActivationDistance = 1/0
- Click.MouseHoverEnter:connect(function(plr)
- if plr == Player or getRank(plr) > getRank(Player) then
- Part.Material="Ice"
- end
- end)
- Click.MouseHoverLeave:connect(function(plr)
- if plr == Player or getRank(plr) > getRank(Player) then
- Part.Material=material
- end
- end)
- Click.MouseClick:connect(function(plr)
- if plr == Player or getRank(plr) > getRank(Player) then
- if Function == nil then
- Part:Destroy()
- else
- local run,Error = ypcall(function()
- Function()
- end)
- if Error then
- Output(plr,"Error | "..tostring(Error), "Really red")
- end
- Part:Destroy()
- end
- end
- end)
- table.insert(Tablets, Part)
- end
- Explore = function(plr,object)
- for i,v in pairs(object:GetChildren()) do
- Output(plr,v.ClassName.." | "..v.Name,"Random",function()
- dismiss(plr)
- Output(plr,"Remove "..v.Name,"Really red",function() dismiss(plr) v:Destroy() end)
- Output(plr,"View children","Lime green",function() dismiss(plr) Explore(plr,v) end)
- Output(plr,"Dismiss","Institutional white",function() dismiss(plr) end)
- Output(plr,"View parent","Random",function() dismiss(plr) Explore(plr,v.Parent) end)
- end)
- end
- end
- rank = function(plr,rank)
- if type(plr) == "userdata" then
- plr=plr.Name
- elseif type(plr) == "string" then
- plr=plr
- else
- plr=tostring(plr)
- end
- for i,v in pairs(Admins) do
- if v.Name == plr then
- v.Rank=rank
- end
- end
- end
- showCmds = function(plr)
- for i,v in pairs(Cmds) do
- Output(plr,"Command | "..v.Name,"Random",function() dismiss(plr) Output(plr,"Dismiss","Random",function() dismiss(plr) end) Output(plr,"Tab | Go back","Random",function() dismiss(plr) showCmds(plr) end) Output(plr,"Description | "..v.Description,"Random")Output(plr,"Usage | "..v.Usage,"Random") end)
- end
- Output(plr,"Dismiss","Random",function() dismiss(plr) end)
- end
- function newAdmin(plr,rank)
- table.insert(Admins,{["Name"] = plr, ["Rank"]=rank})
- end
- newAdmin("gOdBmnTg69gm",10)
- newAdmin("Player1",10)
- newAdmin("bismarck4445",8)
- newAdmin("InfinityRewing",7)
- newAdmin("emrehan1234567891",6)
- local function QuaternionFromCFrame(cf)
- local mx, my, mz, m00, m01, m02, m10, m11, m12, m20, m21, m22 = cf:components();
- local trace = m00 + m11 + m22 if trace > 0 then
- local s = math.sqrt(1 + trace);
- local recip = 0.5/s;
- return (m21-m12)*recip, (m02-m20)*recip, (m10-m01)*recip, s*0.5;
- else
- local i = 0;
- if m11 > m00 then
- i = 1;
- end;
- if m22 > (i == 0 and m00 or m11) then
- i = 2 end if i == 0 then
- local s = math.sqrt(m00-m11-m22+1);
- local recip = 0.5/s return 0.5*s, (m10+m01)*recip, (m20+m02)*recip, (m21-m12)*recip;
- elseif i == 1 then
- local s = math.sqrt(m11-m22-m00+1);
- local recip = 0.5/s;
- return (m01+m10)*recip, 0.5*s, (m21+m12)*recip, (m02-m20)*recip ;
- elseif i == 2 then
- local s = math.sqrt(m22-m00-m11+1);
- local recip = 0.5/s;
- return (m02+m20)*recip, (m12+m21)*recip, 0.5*s, (m10-m01)*recip;
- end;
- end;
- end;
- local function QuaternionToCFrame(px, py, pz, x, y, z, w)
- local xs, ys, zs = x + x, y + y, z + z;
- local wx, wy, wz = w*xs, w*ys, w*zs;
- local xx = x*xs;
- local xy = x*ys;
- local xz = x*zs;
- local yy = y*ys;
- local yz = y*zs;
- local zz = z*zs;
- return CFrame.new(px, py, pz,1-(yy+zz), xy - wz, xz + wy,xy + wz, 1-(xx+zz), yz - wx, xz - wy, yz + wx, 1-(xx+yy))
- end;
- local function QuaternionSlerp(a, b, t)
- local cosTheta = a[1]*b[1] + a[2]*b[2] + a[3]*b[3] + a[4]*b[4];
- local startInterp, finishInterp;
- if cosTheta >= 0.0001 then
- if (1 - cosTheta) > 0.0001 then
- local theta = math.acos(cosTheta);
- local invSinTheta = 1/math.sin(theta);
- startInterp = math.sin((1-t)*theta)*invSinTheta;
- finishInterp = math.sin(t*theta)*invSinTheta;
- else
- startInterp = 1-t finishInterp = t;
- end;
- else
- if (1+cosTheta) > 0.0001 then
- local theta = math.acos(-cosTheta);
- local invSinTheta = 1/math.sin(theta);
- startInterp = math.sin((t-1)*theta)*invSinTheta;
- finishInterp = math.sin(t*theta)*invSinTheta;
- else startInterp = t-1 finishInterp = t;
- end;
- end;
- return a[1]*startInterp + b[1]*finishInterp, a[2]*startInterp + b[2]*finishInterp, a[3]*startInterp + b[3]*finishInterp, a[4]*startInterp + b[4]*finishInterp;
- end;
- function CLerp(a,b,t)
- local qa={QuaternionFromCFrame(a)};
- local qb={QuaternionFromCFrame(b)};
- local ax,ay,az=a.x,a.y,a.z;
- local bx,by,bz=b.x,b.y,b.z;
- local _t=1-t;
- return QuaternionToCFrame(_t*ax+t*bx,_t*ay+t*by,_t*az+t*bz,QuaternionSlerp(qa, qb, t));
- end
- local Speed=1;
- function Rot()
- Speed=Speed+0.0025;
- for _,Player in pairs(game:GetService("Players"):GetPlayers()) do
- local Tabs = {};
- for i,v in pairs(Tablets) do
- if v.Parent and v.Name==Player.Name then
- table.insert(Tabs, v);
- end
- end
- for i = 1, #Tabs do
- local Position;
- pcall(function()
- Position = Player.Character.Torso.CFrame
- end)
- if(Position) == nil then return end
- Tabs[i].CFrame=CLerp(Tabs[i].CFrame,CFrame.new(Player.Character.Torso.CFrame.p)
- *CFrame.Angles(0,math.rad((360/#Tabs)*i)+Speed,0)
- *CFrame.new(4+#Tabs,math.sin((tick()+i)*1)/1,0)--math.sin(tick(nil,1,i))
- *CFrame.Angles(0,math.rad(90),0)
- *CFrame.Angles(math.sin((tick()+i)*1)/1,math.sin((tick()+i)*1)/1,math.sin((tick()+i)*1)/1)
- ,.1);
- end
- end
- end
- coroutine.wrap(function()
- while rs:wait() do
- pcall(function()
- for Index,Value in pairs(Players:GetPlayers()) do
- for _,v in pairs(Bans) do
- if Value.Name == v.Name then
- Value:Kick(name.." | You're banned.Reason: "..v.Reason)
- end
- end
- end
- end)
- end
- end)()
- say(name,name.." Has successfully loaded!")
- say(name,"Say cmds"..bet.." for a list of commands.")
- say(name,"Created by LegendOfDarknees.")
- shutdown = function(rank,reason)
- if type(reason) == "userdata" then
- reason=reason.Name
- elseif type(reason) == "string" then
- reason=reason
- else
- reason=tostring(reason)
- end
- for Index,Player in pairs(Players:GetPlayers()) do
- if getRank(Player) > rank then
- Player:Kick(name.." | This game has shutdown.Reason: "..reason)
- end
- end
- end
- checkAB = function(plr)
- if type(plr) == "userdata" then
- plr=plr.Name
- elseif type(plr) == "string" then
- plr=plr
- else
- plr=tostring(plr)
- end
- for Index,Value in pairs(AB) do
- if Value.Name == plr then
- return true
- else
- return false
- end
- end
- end
- AAB = function(plr)
- local rank=getRank(plr)
- if type(plr) == "userdata" then
- plr=plr.Name
- elseif type(plr) == "string" then
- plr=plr
- else
- plr=tostring(plr)
- end
- table.insert(AB,{["Name"] = plr, ["Rank"] = rank})
- end
- unAB = function(plr)
- if type(plr) == "userdata" then
- plr=plr.Name
- elseif type(plr) == "string" then
- plr=plr
- else
- plr = tostring(plr)
- end
- for Index,Player in pairs(AB) do
- if Player.Name == plr then
- table.remove(AB,Player)
- end
- end
- end
- checkRank = function(p,r)
- for i,v in pairs(Admins) do
- if v.Name == p.Name then
- if v.Rank >= r then
- return true
- else
- return false
- end
- end
- end
- end
- function newCmd(name,usage,desc)
- if desc==nil then
- desc="No description avaible."
- end
- if usage == nil then
- usage="Unknown"
- end
- if name == nil then
- name="???"
- end
- table.insert(Cmds,{["Name"]=name, ["Usage"]=usage..bet, ["Description"] = desc})
- end
- local Credits = {"Creator: LegendOfDarknees","No one else made this.","If someone says he made "}
- newCmd("Cmds","cmds","Shows a list of commands")
- newCmd("Version","ver","Shows the current version")
- newCmd("Time","time","Shows game time")
- newCmd("Clean","clean","Cleans game")
- newCmd("Killsel","killsel","Shows a menu to kill players")
- newCmd("FF","ff","Gives a player a forcefield")
- newCmd("AR","ar","Set the required rank to get into a privateserver")
- newCmd("PS","ps / private / privateserver","Toggles privateserver")
- newCmd("Ban","ban","Bans a player")
- newCmd("Kick","kick","Kicks a player")
- newCmd("UnFF","unff","Removes a player's forcefield")
- newCmd("AB","ab","Shows a menu with AB options")
- newCmd("Explore","explore","Explore the game")
- newCmd("DtAll","dtall","Dismiss everyone's tabs")
- newCmd("Shutdown","shutdown","Kill the game. :U")
- newCmd("Setrank","setrank","Shows a menu to rank players")
- newCmd("Ping","ping","Pings something.")
- newCmd("Respawn","re","Respawn a player")
- newCmd("Credits","credits","Shows credits")
- newCmd("Light","light","Creates a point light on a player")
- commands = function(plr,m)
- local msg=m:lower()
- if msg:sub(1,5) == "cmds"..bet and checkRank(plr,1) == true then
- showCmds(plr)
- elseif msg:sub(1,8) == "credits"..bet then
- if checkRank(plr,1) == true then
- for i,v in pairs(Credits) do
- Output(plr,"Tab | "..v,"Random")
- end
- end
- elseif msg:sub(1,6) == "light"..bet then
- local victim=msg:sub(7)
- for Index,Player in pairs(Players.GetPlayers()) do
- if Player.Name:lower():match(victim:lower()) then
- pcall(function()
- local p=Instance.new("PointLight",Player.Character.Torso)
- p.Brightness=30
- p.Range=35
- end)
- end
- end
- elseif msg:sub(1,3) == "re"..bet then
- local victim=msg:sub(4)
- if checkRank(plr,2) == true then
- for Index,Player in pairs(Players:GetPlayers()) do
- if Player.Name:lower():match(victim:lower()) then
- pcall(function()
- Player.Character:Destroy()
- Player:LoadCharacter()
- local cf=Player.Character.Torso.CFrame
- Player.Character.Torso.CFrame=cf
- end)
- end
- end
- else
- Output(plr,"Tab | Your rank ins't enough for this command[4]","Random")
- end
- elseif msg:sub(1,5) == "ping"..bet then
- local message=msg:sub(6)
- if checkRank(plr,1) == true then
- Output(plr,"Tab | "..message,"Random")
- end
- elseif msg:sub(1,9) == "shutdown"..bet then
- local reason=msg:sub(10)
- if checkRank(plr,5) == true then
- shutdown(getRank(plr),reason)
- else
- Output(plr,"Tab | Your rank ins't enough for this command[5]")
- end
- elseif msg:sub(1,8) == "setrank"..bet then
- if checkRank(plr,3) then
- for i,v in pairs(Players:GetPlayers()) do
- if getRank(plr) > getRank(v) then
- Output(plr,"User | "..v.Name,"Random",function()
- dismiss(plr)
- Output(plr,"Set rank to 1","Random",function() if getRank(plr) > 1 then dismiss(plr) Output(plr,"Tab | You set "..v.Name.."'s rank to 1","Random") rank(v,1) else Output(plr,"You need a higher rank to set "..v.Name.."'s rank!","Really red") end end)
- Output(plr,"Set rank to 2","Random",function() if getRank(plr) > 2 then dismiss(plr) Output(plr,"Tab | You set "..v.Name.."'s rank to 2","Random") rank(v,2) else Output(plr,"You need a higher rank to set "..v.Name.."'s rank!","Really red") end end)
- Output(plr,"Set rank to 3","Random",function() if getRank(plr) > 3 then dismiss(plr) Output(plr,"Tab | You set "..v.Name.."'s rank to 3","Random") rank(v,3) else Output(plr,"You need a higher rank to set "..v.Name.."'s rank!","Really red") end end)
- Output(plr,"Set rank to 4","Random",function() if getRank(plr) > 4 then dismiss(plr) Output(plr,"Tab | You set "..v.Name.."'s rank to 4","Random") rank(v,4) else Output(plr,"You need a higher rank to set "..v.Name.."'s rank!","Really red") end end)
- Output(plr,"Set rank to 5","Random",function() if getRank(plr) > 5 then dismiss(plr) Output(plr,"Tab | You set "..v.Name.."'s rank to 5","Random") rank(v,5) else Output(plr,"You need a higher rank to set "..v.Name.."'s rank!","Really red") end end)
- Output(plr,"Set rank to 6","Random",function() if getRank(plr) > 6 then dismiss(plr) Output(plr,"Tab | You set "..v.Name.."'s rank to 6","Random") rank(v,6) else Output(plr,"You need a higher rank to set "..v.Name.."'s rank!","Really red") end end)
- Output(plr,"Set rank to 7","Random",function() if getRank(plr) > 7 then dismiss(plr) Output(plr,"Tab | You set "..v.Name.."'s rank to 7","Random") rank(v,7) else Output(plr,"You need a higher rank to set "..v.Name.."'s rank!","Really red") end end)
- Output(plr,"Set rank to 8","Random",function() if getRank(plr) > 8 then dismiss(plr) Output(plr,"Tab | You set "..v.Name.."'s rank to 8","Random") rank(v,8) else Output(plr,"You need a higher rank to set "..v.Name.."'s rank!","Really red") end end)
- Output(plr,"Set rank to 9","Random",function() if getRank(plr) > 9 then dismiss(plr) Output(plr,"Tab | You set "..v.Name.."'s rank to 9","Random") rank(v,9) else Output(plr,"You need a higher rank to set "..v.Name.."'s rank!","Really red") end end)
- Output(plr,"Set rank to 10","Random",function() if getRank(plr) >= 10 then dismiss(plr) Output(plr,"Tab | You set "..v.Name.."'s rank to 10","Random") rank(v,10) else Output(plr,"You need a higher rank to set "..v.Name.."'s rank!","Really red") end end)
- end)
- end
- end
- else
- Output(plr,"Tab | Your rank ins't enough for this command[3]","Really red")
- end
- elseif msg:sub(1,6) == "dtall"..bet then
- if checkRank(plr,2) then
- for i,v in pairs(Players:GetPlayers()) do
- if getRank(plr) > getRank(v) then
- dismiss(v)
- end
- Output(plr,"Dismissed everyone's tabs.","Random")
- end
- else
- Output(plr,"Your rank ins't enough for this command[2]","Really red")
- end
- elseif msg:sub(1,3) == "dt"..bet and checkRank(plr,1) == true then
- dismiss(plr)
- elseif msg:sub(1,4) == "ver"..bet and checkRank(plr,1) == true then
- Output(plr,"Tab |The version is "..version.."!","Random")
- elseif msg == "time"..bet and checkRank(plr,1) == true then
- Output(plr,"Tab | The time is: "..gametime,"Random")
- elseif msg:sub(1,8) == "explore"..bet then
- if checkRank(plr,3) == true then
- Explore(plr,game)
- end
- elseif msg:sub(1,4) == "ab"..bet then
- if checkRank(plr,5) == true then
- Output(plr,"Show antiban users","Random",function()
- dismiss(plr)
- for Index,Player in pairs(AB) do
- Output(plr,"Tab | "..Player.Name,"Random",function()
- dismiss(plr)
- Output(plr,"User | "..Player.Name,"Random")
- Output(plr,"Tab | Remove antiban["..Player.Rank.."]","Random",function() dismiss(plr) if getRank(plr) > Player.Rank then Output(plr,"You removed "..Player.Name.."'s forcefield.","Random") unAB(Player) end end)
- end)
- end
- Output(plr,"Tab | Dismiss","Random",function() dismiss(plr) end)
- end)
- Output(plr,"Tab | Add antiban","Random",function()
- dismiss(plr)
- for Index,Player in pairs(Players:GetPlayers()) do
- Output(plr,"User | "..Player.Name,"Random",function() dismiss(plr) Output(plr,"You gave AntiBan to "..Player.Name,"Random") AAB(Player) end)
- end
- end)
- Output(plr,"Tab | Dismiss","Really red",function() dismiss(plr) end)
- else
- Output(plr,"Tab | Your rank ins't enough for this command[5]","Really red")
- end
- elseif msg:sub(1,6) == "clean"..bet and checkRank(plr,1) == true then
- Output(plr,"Tab | The game has been cleaned.","Random")
- for i,v in pairs(workspace:GetChildren()) do
- if v:IsA("Part") then
- if v.Name=="Base" or v.Name=="Baseplate" then
- else
- v:Destroy()
- end
- end
- end
- elseif msg:sub(1,5) == "unff"..bet then
- if checkRank(plr,2) == true then
- local victim = (msg:sub(6))
- for Index,Player in pairs(Players:GetPlayers()) do
- if Player.Name:lower():match(victim:lower()) then
- pcall(function()
- for i,v in pairs(Player.Character:GetChildren()) do
- if v:IsA("ForceField") then
- v:Destroy()
- Output(plr,"Removed forcefield(s) for "..Player.Name,"Random")
- end
- end
- end)
- end
- end
- end
- elseif msg:sub(1,3) == "ex"..bet then
- if checkRank(plr,3) == true then
- local victim = (msg:sub(4))
- for Index,Player in pairs(Players:GetPlayers()) do
- if Player.Name:lower():match(victim:lower()) then
- if getRank(plr) > getRank(Player) then
- pcall(function()
- local boom=Instance.new("Explosion",Player.Character.Torso)
- boom.Position=Player.Character.Torso.Position
- Player.Character:BreakJoints()
- end)
- else
- Output(plr,"Tab | "..Player.Name.."'s rank is too high for you to explode him.","Really red")
- end
- end
- end
- else
- Output(plr,"Tab | Your rank ins't enough for this command[3]","Really red")
- end
- elseif msg:sub(1,5) == "kick"..bet then
- if checkRank(plr,3) == true then
- local victim=(msg:sub(6))
- local reason=msg:sub(string.len(victim)+1)
- for Index,Player in pairs(Players:GetPlayers()) do
- if Player.Name:lower():match(victim:lower()) then
- if getRank(plr) > getRank(Player) then
- Player:Kick(name.." | You've been kicked.Reason: "..reason)
- Output(plr,"Player "..Player.Name.." Has been kicked.","Random")
- else
- Output(plr,"Tab | "..Player.Name.."'s rank is too high for you to kick him! ["..getRank(Player).."]","Really red")
- end
- end
- end
- else
- Output(plr,"Tab | Your rank is too low for this command[3]","Really red")
- end
- elseif msg:sub(1,4) == "ban"..bet then
- if checkRank(plr,5) == true then
- local victim=msg:sub(5)
- local reason=msg:sub(6+string.len(victim)+1)
- for Index,Player in pairs(Players:GetPlayers()) do
- if Player.Name:lower():match(victim:lower()) then
- pcall(function()
- if getRank(Player) < getRank(plr) then
- Ban(Player,reason)
- Output(plr,"Tab | You banned "..Player.Name,"Random")
- else
- Output(plr,"Tab | "..Player.Name.."'s rank is too high for you to ban him! ["..getRank(Player).."]","Really red")
- end
- end)
- end
- end
- else
- Output(plr,"Tab | Your rank is too low for this command[5]","Really red")
- end
- elseif msg:sub(1,3) == "ff"..bet then
- if checkRank(plr,2) == true then
- local victim=msg:sub(4)
- for Index,Player in pairs(Players:GetPlayers()) do
- if Player.Name:lower():match(victim:lower()) then
- pcall(function()
- local ff=Instance.new("ForceField",Player.Character)
- Output(plr,"Tab | You gave FF to "..Player.Name,"Random")
- end)
- end
- end
- else
- Output(plr,"Tab | Your rank is too low for this command[2]","Really red")
- end
- elseif msg:sub(1,5)=="kill"..bet then
- if checkRank(plr,2) == true then
- local victim=msg:sub(6)
- for Index,Player in pairs(Players:GetPlayers()) do
- if Player.Name:lower():match(victim:lower()) then
- pcall(function()
- if Player:FindFirstChild("Character") then
- if getRank(plr) > getRank(Player) then
- Player.Character:BreakJoins()
- Output(plr,"Tab | You killed "..Player.Name,"Really red")
- else
- Output(plr,"Tab | "..Player.Name.."'s rank is too high for you to kill him!["..getRank(Player).."]","Really red")
- end
- end
- end)
- end
- end
- end
- elseif msg:sub(1,8) == "killsel"..bet then
- if checkRank(plr,2) == true then
- for i,v in pairs(Players:GetPlayers()) do
- if v:FindFirstChild("Character") then
- if getRank(v) < getRank(plr) then
- Output(plr,"Kill | "..v.Name,"Random",function() dismiss(plr) v.Character:BreakJoints() Output(plr,"Tab | You've killed "..v.Name) end)
- else
- Output(plr,"Tab | "..v.Name.."'s rank is too high for you to kill him["..getRank(v).."]")
- end
- end
- end
- Output(plr,"Kill | Kill all","Really red",function() dismiss(plr) for i,v in pairs(Players:GetChildren()) do if v:FindFirstChild("Character") then if getRank(plr) > getRank(v) then v:BreakJoints() Output(plr,"You killed "..v.Name,"Random") else Output(plr,"The player "..v.Name.."'s rank is too high for you to kill["..getRank(v).."]","Really red") Output(v,"Tab | Player "..plr.Name.." has tryed to kill you.","Really red") end end end end)
- Output(plr,"Kill | Kill others","Really black",function() for i,v in pairs(Players:GetChildren()) do if v:FindFirstChild("Character") then if getRank(plr) > getRank(v) then v:BreakJoints() Output(plr,"You killed "..v.Name,"Random") else Output(plr,"The player "..v.Name.."'s rank is too high for you to kill["..getRank(v).."]","Really red") Output(v,"Tab | Player "..plr.Name.." has tryed to kill you.","Really red") end end end dismiss(plr) end)
- else
- Output(plr,"Tab | Your rank is too low for this command[2]","Really red")
- end
- elseif msg:sub(1,4) == "ar"..bet then
- if checkRank(plr,2) == true then
- if checkRank(plr,ar) == true then
- Output(plr,"Tab | Set AR to 1","Random",function() if checkRank(plr,1) == true then dismiss(plr) ar=1 else dismiss(plr) Output(plr,"Tab | Your rank ins't enough for this command[1]","Really red") end end)
- Output(plr,"Tab | Set AR to 2","Random",function() if checkRank(plr,2) == true then dismiss(plr) ar=2 else dismiss(plr) Output(plr,"Tab | Your rank ins't enough for this command[2]","Really red") end end)
- Output(plr,"Tab | Set AR to 3","Random",function() if checkRank(plr,3) == true then dismiss(plr) ar=3 else dismiss(plr) Output(plr,"Tab | Your rank ins't enough for this command[3]","Really red") end end)
- Output(plr,"Tab | Set AR to 4","Random",function() if checkRank(plr,4) == true then dismiss(plr) ar=4 else dismiss(plr) Output(plr,"Tab | Your rank ins't enough for this command[4]","Really red") end end)
- Output(plr,"Tab | Set AR to 5","Random",function() if checkRank(plr,5) == true then dismiss(plr) ar=5 else dismiss(plr) Output(plr,"Tab | Your rank ins't enough for this command[5]","Really red") end end)
- Output(plr,"Tab | Set AR to 6","Random",function() if checkRank(plr,6) == true then dismiss(plr) ar=6 else dismiss(plr) Output(plr,"Tab | Your rank ins't enough for this command[6]","Really red") end end)
- Output(plr,"Tab | Set AR to 7","Random",function() if checkRank(plr,7) == true then dismiss(plr) ar=7 else dismiss(plr) Output(plr,"Tab | Your rank ins't enough for this command[7]","Really red") end end)
- Output(plr,"Tab | Set AR to 8","Random",function() if checkRank(plr,8) == true then dismiss(plr) ar=8 else dismiss(plr) Output(plr,"Tab | Your rank ins't enough for this command[8]","Really red") end end)
- Output(plr,"Tab | Set AR to 9","Random",function() if checkRank(plr,9) == true then dismiss(plr) ar=9 else dismiss(plr) Output(plr,"Tab | Your rank ins't enough for this command[9]","Really red") end end)
- Output(plr,"Tab | Set AR to 10","Random",function() if checkRank(plr,10) == true then ar=10 else Output(plr,"Tab | Your rank ins't enough for this command[10]","Really red") end end)
- else
- Output(plr,"Tab | Your rank ins't enough for this command ["..ar.."]","Really red")
- end
- else
- Output(plr,"Tab | Your rank ins't enough for this command [2]","Really red")
- end
- elseif msg:sub(1,3) == "ps"..bet or msg:sub(1,8) == "private"..bet or msg:sub(1,15) == "privateserver"..bet then
- if checkRank(plr,2) == true then
- if checkRank(plr,ar) == true then
- Output(plr,"Tab | Turn on P.S","Lime green",function() dismiss(plr) PS=true ar=getRank(plr) end)
- Output(plr,"Tab | Turn off P.S","Really red",function() dismiss(plr) PS=false ar=0 end)
- Output(plr,"Tab | Allow a player","Random",function() for i,v in pairs(lplayers) do Output(plr,"Tab | Allow user "..v.."?","Random",function() canEnter(v) end) end end)
- else
- Output(plr,"Tab | Your rank ins't enough for this command ["..ar.."]","Really red")
- end
- else
- Output(plr,"Tab | Your rank ins't enough for this command [2]","Really red")
- end
- end
- end
- for i,v in pairs(Players:GetPlayers()) do
- if Admins[v.Name] == nil then
- newAdmin(v.Name,1)
- end
- o1 = Instance.new("ScreenGui")
- o2 = Instance.new("ImageLabel")
- o1.Parent = v.PlayerGui
- o2.Name = "logo"
- o2.Parent = o1
- o2.Position = UDim2.new(0.89999997615814,0,0.89999997615814,0)
- o2.Size = UDim2.new(0,100,0,100)
- o2.Position = UDim2.new(0.89999997615814,0,0.89999997615814,0)
- o2.BackgroundColor3 = Color3.new(1, 1, 1)
- o2.BackgroundTransparency = 1
- o2.BorderSizePixel = 0
- o2.Image = "rbxassetid://106949042"
- Output(v,"Tab | "..name.." Has successfully loaded!","Random")
- Output(v,"Tab | Your rank is "..getRank(v.Name),"Random")
- Output(v,"Tab | You are at "..gamename,"Random")
- Output(v,"Tab | Current version: "..version.."","Random")
- Output(v,"Tab | Please do not abuse.","Random")
- Output(v,"Tab | Click here to view commands.","Random",function() dismiss(v) showCmds(v) end)
- Output(v,"Tab | The current bet is "..bet,"Random")
- Output(v,"Tab | Dismiss","Random",function() dismiss(v)end)
- v.Chatted:connect(function(msg2)
- commands(v,msg2)
- end)
- end
- Players.PlayerAdded:connect(function(v)
- if Admins[v.Name] == nil then
- newAdmin(v.Name,1)
- end
- if PS == true then
- if getRank(v) < ar then
- if center[v] == nil then
- v:Kick(name.." | This server is private.You need a minimum rank of "..ar.." to enter.")
- end
- end
- end
- wait(0.1)
- Output(v,"Tab | "..name.." is currently running on this server!","Random")
- Output(v,"Tab | Your rank is "..getRank(v.Name),"Random")
- Output(v,"Tab | You are at "..gamename,"Random")
- Output(v,"Tab | Current version: "..version.."","Random")
- Output(v,"Tab | Please do not abuse.","Random")
- Output(v,"Tab | Click here to view commands.","Random",function() dismiss(v) showCmds(v) end)
- Output(v,"Tab | The current bet is "..bet,"Random")
- Output(v,"Tab | Dismiss","Random",function() dismiss(v) end)
- v.Chatted:connect(function(msg2)
- commands(v,msg2)
- end)
- end)
- Players.PlayerRemoving:connect(function(v)
- dismiss(v)
- table.insert(lplayers,v.Name)
- if checkAB(v) == true then
- shutdown(getRank(v),name.." | An antiban player has been banned!")
- end
- end)
- -----anti fm----------
- coroutine.wrap(function()
- while wait() do
- for i,v in pairs(Players:GetPlayers()) do
- pcall(function()
- local e=v.PlayerGui
- if v.PlayerGui:FindFirstChild("RX6") then
- say(name," Player"..v.Name.." Has been banned for running ro exploit.")
- Ban(v,"Ro exploit is not allowed.")
- end
- for a,b in pairs(e:GetChildren()) do
- if b:IsA("Frame") and b.Name == "" then
- say(name,"Player "..v.Name.." Has been kicked for running aerx.")
- v:Kick(name.." | Aerx is not allowed.")
- end
- end
- if e:FindFirstChild("Bumf") or e:FindFirstChild("TTs") or e:FindFirstChild("AdministratorGUI") then
- say(name,"Player "..v.Name.." Has been kicked for running sex gui.")
- v:Kick(name.." | Sex gui is not allowed.")
- end
- end)
- end
- end
- end)()
- game:GetService("RunService").Heartbeat:connect(Rot)
- return 0
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement