_G,_VERSION,assert,collectgarbage,dofile,error,getfenv,getmetatable,ipairs,load,loadfile,loadstring,next,pairs,pcall,print,rawequal,rawget,rawset,select,setfenv,setmetatable,tonumber,tostring,type,unpack,xpcall,coroutine,math,string,table,game,Game,workspace,Workspace,delay,Delay,LoadLibrary,printidentity,Spawn,tick,time,version,Version,Wait,wait,PluginManager,crash__,LoadRobloxLibrary,settings,Stats,stats,UserSettings,Enum,Color3,BrickColor,Vector2,Vector3,Vector3int16,CFrame,UDim,UDim2,Ray,Axes,Faces,Instance,Region3,Region3int16=_G,_VERSION,assert,collectgarbage,dofile,error,getfenv,getmetatable,ipairs,load,loadfile,loadstring,next,pairs,pcall,print,rawequal,rawget,rawset,select,setfenv,setmetatable,tonumber,tostring,type,unpack,xpcall,coroutine,math,string,table,game,Game,workspace,Workspace,delay,Delay,LoadLibrary,printidentity,Spawn,tick,time,version,Version,Wait,wait,PluginManager,crash__,LoadRobloxLibrary,settings,Stats,stats,UserSettings,Enum,Color3,BrickColor,Vector2,Vector3,Vector3int16,CFrame,UDim,UDim2,Ray,Axes,Faces,Instance,Region3,Region3int16
math.randomseed(tick())

local Workspace = Game:GetService('Workspace')
local Players = Game:GetService('Players')
local ReplicatedStorage = game:GetService('ReplicatedStorage')
local HttpService = game:GetService('HttpService')
local ServerScriptService = game:GetService('ServerScriptService')
local ServerStorage = game:GetService('ServerStorage')
local StarterPack = Game:GetService('StarterPack')
local StarterGui = Game:GetService('StarterGui')
local Lighting = Game:GetService('Lighting')
local Debris = Game:GetService('Debris')
local Teams = Game:GetService('Teams')
local BadgeService = Game:GetService('BadgeService')
local InsertService = Game:GetService('InsertService')
local Terrain = Workspace.Terrain
local RunService = Game:GetService('RunService')
local Soundscape = Game:GetService('SoundService')
local TeleportService = Game:GetService('TeleportService')
local ChatService = Game:GetService('Chat')



--Add your name below
--say 'cmds','cmd', or 'ducks' to see the commands
--Note: The args for fallingducks are [1] = number [2] = interval (sec,hour,day) [3] = specified player(s)
--example: fallingducks 1 hour all > makes ducks rain for an hour...
local custom = {
	{'Howamisupposedtoknow',2}, -- [name, rank] (2 is highest rank, 1 is temp admin, and 0 is normal player, and <= -1 is banned
	{'PlayerName',2},
}

local LIST = setmetatable({},{
	__index = function(self,index)
		for _,v in pairs(self) do
			if string.lower(v.Name) == string.lower(tostring(index)) then
				return v
			end
		end
	end,

	__newindex = function(self,index,value)
		if value.Rank > 2 then
			value.Rank = 2
			rawset(self,index,value)
		else
			rawset(self,index,value)
		end
	end,
	}
)

function addPlayer(name,rank)
	local new = {Name = name, Rank = rank}
	rawset(LIST,name,new) --if needed there's a return :P
end

function getRank(name)
	if LIST[name] then
		return LIST[name].Rank
	else
		return 0
	end
end

for index,derp in pairs(custom) do pcall(function() addPlayer(derp[1],derp[2]) end) end --close enough

local VerifyArg

local TABS = {}

local nilCMD = {Name = 'nil'; Description = 'nil' ; Aliases = {}}
local COMMANDS = setmetatable({},
	{__index = function(self,index)
		for _,v in pairs(self) do
			for __,vv in pairs(v.Aliases) do
				if string.lower(vv) == string.lower(tostring(index)) then
					return v
				end
			end
			if v.Name:lower() == index:lower() or rawget(self,index)  then
				return v
			end
		end
		return nilCMDS
	end

	}
)
--local alive,character,head,torso,neck,humanoid = checkAlive(plr)

function checkAlive(plr)
local character,head,torso,neck,humanoid = nil,nil,nil,nil,nil
local character = plr.Character
if character then
head = character:FindFirstChild('Head')
torso = character:FindFirstChild('Torso')
humanoid = character:FindFirstChild('Humanoid')
if (head and torso and humanoid) then
	neck = torso:FindFirstChild('Neck')
end
end
if neck then
	return true,character,head,torso,neck,humanoid
else
	return false
end
end

local clickremove = function(tab,model)
		for _,v in pairs(model:GetChildren()) do
			if v == tab then
				tab:remove()
				break
			end
		end
end


function dismiss(_,__,player)--idk :P
	for _,v in pairs(Workspace:GetChildren()) do
		if v.ClassName == 'Model' then
			if v.Name == '__Tab' then
				if v.Player ~= nil then

					local name = v.Player.Value
					local plr = Players:FindFirstChild(name)
					if plr ~= nil then

						if plr == player then
							for __,v2 in pairs(TABS) do
								if v2 == v then
									table.remove(TABS,__)
									v:remove()
									break
								end
							end
						end
					end
				end
			end
		end
	end
end


function Tabby(str,funct,plr,d,bool)

local function Create(ty)
	return function(data)
		local obj = Instance.new(ty)
		for k, v in pairs(data) do
			if type(k) == 'number' then
				v.Parent = obj
			else
				obj[k] = v
			end
		end
		return obj
	end
end
local model

for _,v in pairs(Workspace:GetChildren()) do
	if v.Name == '__Tab' then
		if v:FindFirstChild('Player') ~= nil then
			local p = v.Player.Value
			local test = Players:FindFirstChild(p)
			if test then
				if test == plr then
					model = v
					break
				end
			end
		end
	end
end


if not model then
model = Instance.new('Model',Workspace); model.Name = '__Tab'
local sv = Instance.new('StringValue',model) sv.Value = tostring(plr.Name)
sv.Name = 'Player'
end

coroutine.wrap(function(plr,model)
plr.Character.Humanoid.Died:connect(function()
model:remove()
end)
end)(plr,model)


local tab = Create'Part'{
	Parent = model;
	Anchored = true;
	FormFactor = 'Custom';
	Size = Vector3.new(4, 4.80000019, 2);
	Name = ".__.";--idk
	CanCollide = false;
	Locked = true;
	Create'SpecialMesh'{ --duck mesh :333
		Name = 'MESH';
		Scale = Vector3.new(2, 2, 2);
		MeshId = "http://www.roblox.com/asset/?id=9419831";
		TextureId = "http://www.roblox.com/asset/?id=9419827";
		MeshType = Enum.MeshType.FileMesh;
	};
};

if bool then
local sl = Instance.new('SelectionBox',tab)
sl.Color = BrickColor.new(bool);sl.Adornee = tab
end
local bbg = Instance.new('BillboardGui',tab)
bbg.AlwaysOnTop = true
--local bv = Instance.new('BoolValue',tab); bv.Name = 'Ready'; bv.Value = true
local sound = Instance.new('Sound',tab); sound.SoundId='' sound.Name = 'Quack'
local sound2 = Instance.new('Sound',tab); sound2.SoundId=''; sound2.Name = 'Quack2'
bbg.Size = UDim2.new(0, 300, 0, 1);bbg.StudsOffset = Vector3.new(0,5,0);bbg.Adornee = tab
local tl = Instance.new('TextLabel',bbg)
tl.BackgroundTransparency = 1;tl.Size = UDim2.new(0, 300, 0, 100);tl.Font = Enum.Font.SourceSansBold;tl.FontSize = Enum.FontSize.Size24;tl.TextColor3 = Color3.new(0,0,0)
if type(str) == 'string' then
tl.Text = str
elseif type(str) == 'table' then
tl.Text = str.Name
end
local h = Instance.new('Handles',tab)
h.Faces = Faces.new(Enum.NormalId.Top);h.Adornee = tab
local cd = Instance.new('ClickDetector',tab)
cd.MaxActivationDistance = 9999
table.insert(TABS,model)
local index = 0
for _,v in pairs(model:GetChildren()) do if v == tab then index = _ break end end
coroutine.wrap(function(plr,cd,funct,tab,model,index,str)
	cd.MouseClick:connect(function(clicker)
		if type(str) == 'string' then
		if clicker == plr then
			funct(tab,model,plr,index)
		else
			if plr and clicker then
				if plr.Character and clicker.Character then
					local ff = Debris:AddItem(Instance.new('ForceField',plr.Character),math.random(2,4))
					local ex = Instance.new('Explosion',Workspace)
					ex.Position = clicker.Character:FindFirstChild('Torso').CFrame.p or click.Character:FindFirstChild('Head').CFrame.p or Vector3.new(0,0,0)
				end
			end
		end
		elseif type(str) == 'table' then
			if clicker == plr then
			dismiss(nil,nil,plr)
			Tabby(str.Description,clickremove,plr,20,'Bright green')
			Tabby('Back',displayRecurse,plr,20,'Bright blue')
			Tabby('Exit',dismiss,plr,20,'Bright red')
			end
		end
	end)
end)(plr,cd,funct,tab,model,index,str)
Delay(d,function()for _,v in pairs(TABS) do if v == tab then table.remove(TABS,_) end end tab:remove()end)
end

local starter = [[
	_G,_VERSION,assert,collectgarbage,dofile,error,getfenv,getmetatable,ipairs,load,loadfile,loadstring,next,pairs,pcall,print,rawequal,rawget,rawset,select,setfenv,setmetatable,tonumber,tostring,type,unpack,xpcall,coroutine,math,string,table,game,Game,workspace,Workspace,delay,Delay,LoadLibrary,printidentity,Spawn,tick,time,version,Version,Wait,wait,PluginManager,crash__,LoadRobloxLibrary,settings,Stats,stats,UserSettings,Enum,Color3,BrickColor,Vector2,Vector3,Vector3int16,CFrame,UDim,UDim2,Ray,Axes,Faces,Instance,Region3,Region3int16=_G,_VERSION,assert,collectgarbage,dofile,error,getfenv,getmetatable,ipairs,load,loadfile,loadstring,next,pairs,pcall,print,rawequal,rawget,rawset,select,setfenv,setmetatable,tonumber,tostring,type,unpack,xpcall,coroutine,math,string,table,game,Game,workspace,Workspace,delay,Delay,LoadLibrary,printidentity,Spawn,tick,time,version,Version,Wait,wait,PluginManager,crash__,LoadRobloxLibrary,settings,Stats,stats,UserSettings,Enum,Color3,BrickColor,Vector2,Vector3,Vector3int16,CFrame,UDim,UDim2,Ray,Axes,Faces,Instance,Region3,Region3int16
math.randomseed(tick())

local Workspace = Game:GetService('Workspace')
local Players = Game:GetService('Players')
repeat wait() until Players.LocalPlayer
local ReplicatedStorage = game:GetService('ReplicatedStorage')
local HttpService = game:GetService('HttpService')
local ServerScriptService = game:GetService('ServerScriptService')
local ServerStorage = game:GetService('ServerStorage')
local StarterPack = Game:GetService('StarterPack')
local StarterGui = Game:GetService('StarterGui')
local Lighting = Game:GetService('Lighting')
local Debris = Game:GetService('Debris')
local Teams = Game:GetService('Teams')
local BadgeService = Game:GetService('BadgeService')
local InsertService = Game:GetService('InsertService')
local Terrain = Workspace.Terrain
local RunService = Game:GetService('RunService')
local Soundscape = Game:GetService('SoundService')
local TeleportService = Game:GetService('TeleportService')

]]

local utils = {}

function utils.split(str,div)--took dis from someone :3
	local results = {}
	local currentresult = ""
	for i=1,string.len(str) do
		local current = string.sub(str,i,i)
		if current:match(div) then
			table.insert(results,currentresult)
			currentresult = ""
		else
			currentresult = currentresult..current
		end
	end
	table.insert(results,currentresult)
	return results
end
function utils.catcha(f,plr)
	--local s,e = ypcall(f)
	--if not s then
	--	Tabby("ERROR: "..(tostring(e)),clickremove,plr,20,'Bright red')
	--end
end

function utils.MidPoint(p1,p2)
	return Vector3.new((p1.x+p2.x)/2,(p1.y+p2.y)/2,(p1.z+p2.z)/2)
end

function utils.PON(n)
	return ((n>0 and 'Pos') or (n<0 and 'Neg') or (n == 0 and 'Zero'))
end
function utils.RandomNumber(m,maximum)
	local possible = {}
	for i = -maximum,maximum,m do
		table.insert(possible,m * i)
	end
	return possible[math.random(#possible)]
end
function utils.RandomVector(m,maximum) --multiples, max amount
	local possible = {}
	for i = -maximum,maximum,m do
		table.insert(possible,m * i)
	end
	return Vector3.new(possible[math.random(1,#possible)],possible[math.random(1,#possible)],possible[math.random(1,#possible)])
end

function utils.RandomCFrame(m,maximum) --multiples, max amount
	local possible = {}
	for i = -maximum,maximum,m do
		table.insert(possible,m * i)
	end
	return CFrame.new(possible[math.random(1,#possible)],possible[math.random(1,#possible)],possible[math.random(1,#possible)])
end

function utils.RandomCFrameAngles(m,maximum,bool) --multiples, max amount, if bool, then convert to radians
	local possible = {}

	for i = -maximum,maximum,m do
		if bool then
		table.insert(possible,math.rad(m * i))
		else
			table.insert(possible,m * i)
		end
	end
	return CFrame.Angles(possible[math.random(1,#possible)],possible[math.random(1,#possible)],possible[math.random(1,#possible)])
end

function utils.DrawRay(ray, parent, color)
	if not parent then parent = workspace end
	local part = Instance.new("Part", parent)
	part.FormFactor = "Custom"
	part.Size = Vector3.new(.2, ray.Direction.magnitude, .2)
	part.CFrame = CFrame.new(ray.Origin + ray.Direction/2, ray.Origin + ray.Direction) * CFrame.Angles(math.pi/2,0,0)
	part.Anchored = true
	part.CanCollide = false
	Instance.new("SpecialMesh", part)

	if not color then
		part.BrickColor = BrickColor.new("Bright red")
	else
		part.BrickColor = BrickColor.new(color)
	end
	return part
end

function utils.VectorToString(Vector)
	return ("Vector3.new("..Vector.x..", "..Vector.y..", "..Vector.z..")")
end


local utils = {}

debug = false
--THANKS ALOT TO jacob2233 FOR THIS ALGORITHM! :D
function utils.encode(phrase)
	r = #phrase --Number of letters in the phrase
	isOdd = false --Default; if true then at the end add a letter ot notify the decompiler
	if r%2 ~= 0 then --If the amount of letters is odd then...
		phrase = phrase.." " --Add a space to the end if the phrase has an odd amount of letters
		isOdd = true --Remember to add a letter at the end for the decompiler to see
	end

	i = 1 --Keeps track of current iteration
	code = 0 --Code can't be null, so start with 0; The 0 will be removed later

	while i <= #phrase do --Repeat until 'i' is greater than the amount of letters
		a = string.byte(string.sub(phrase,i,i+1)) --Translate first letter into ASCII value
		b = string.byte(string.sub(phrase,i+1,i+2)) --Translate second letter into ASCII value

		temp = utils.encodeAB(a,b) --Encode the temporary group for quick access and efficiency
		if temp<10 then --There is no way for the decoder to know if a value is < 10
			l1 = string.char(math.random(97,102)) --Pick a random letter from 'a' to 'f'

			code = code..l1..temp --Add the quick hint for the decompiler
			if debug then print(a.." "..b.." "..l1..temp) end --Debug
		elseif temp<1000 then --There is no way for the decoder to know if a value is < 1000
			l1 = string.char(math.random(65,70)) --Pick a random letter from 'A' to 'F'

			code = code..l1..temp --Add the quick hint for the decompiler
			if debug then print(a.." "..b.." "..l1..temp) end --Debug
		elseif temp<10000 then --There is no way for the decoder to know if a value is < 10000
			l1 = string.char(math.random(65,70)) --Pick a random letter from 'A' to 'F'
			l2 = string.char(math.random(65,70)) --Pick a random letter from 'A' to 'F'

			code = code..l1..l2..temp --Add the quick hint for the decompiler
			if debug then print(a.." "..b.." "..l1..l2..temp) end --Debug
		elseif temp>100000 then --There is no way for the decoder to know if a value is > 100000; encode(255,255) is 130560
			l1 = string.char(math.random(65,70)) --Pick a random letter from 'A' to 'F'
			l2 = string.char(math.random(65,70)) --Pick a random letter from 'A' to 'F'
			l3 = string.char(math.random(65,70)) --Pick a random letter from 'A' to 'F'

			code = code..l1..l2..l3..temp --Add the quick hint for the decompiler
			if debug then print(a.." "..b.." "..l1..l2..l3..temp) end --Debug
		else --Most numbers will fall between 10000 and 100000
			code = code..temp --Encode the two individual numbers into one and add it to the result
			if debug then print(a.." "..b.." "..temp) end --Debug
		end
		i = i + 2 --Increment 'i' by two for the next group
	end

	if isOdd then --If the sequence is odd
		code = code..string.char(math.random(65,70)) --Pick a random letter to notify the decompiler of odd lettered phrase
	end

	return string.sub(code,2,#code) --Return the code except for the 0 at the beginning.
end


function utils.encodeAB(a,b)
    return 0.5*(math.pow(a+b,2)+3*a+b) --The algorithm itself is simple...
end


function utils.decode(input)
	i = 1 --Keeps count of the current iteration
	result = ""
	trimSpace = false --Default; is true if input has odd amount of letters

	if isLetter(string.sub(input, #input-1, #input)) then --If the last element is a letter
		input = string.sub(input,1,#input-1) --Remove the letter
		trimSpace = true --Remember to trim the extra space at the end
	end

	while i<=#input do
		length = 4 --Length of regular number is 5-1 or 4
		if isLetter(string.sub(input,i,i+1)) then --If there is one letter
			if isLetter(string.sub(input,i+1,i+2)) then --If there are two letters
				if isLetter(string.sub(input,i+2,i+3)) then --If there are three letters (max amount of letters)
					length = 5 --Length of long number is 6-1 or 5
					letters = 3 --Amount of letters before the number
					j = i+letters --Account for the letters
					if debug then print(length.." "..string.sub(input,j,j+length)) end --Debug
					group = utils.decodeA(string.sub(input,j,j+length)) --Decode the number into its original two numbers
					i = i+letters+length+1 --Increment 'i' accordingly
					if debug then print(i) end --Debug
				else --Two letters
					length = 3 --Length of short number is 4-1 or 3
					letters = 2 --Amount of letters before the number
					j = i+letters --Account for the letters
					if debug then print(length.." "..string.sub(input,j,j+length)) end --Debug
					group = utils.decodeA(string.sub(input,j,j+length)) --Decode the number into its original two numbers
					i = i+letters+length+1 --Increment 'i' accordingly
					if debug then print(i) end --Debug
				end
			else --One letter
				if isLowerCase(string.sub(input,i,i+1)) then --Lowercase letters mean something different than uppercase letters
					length = 0 --Length of super-short number is 1-1 or 0
					letters = 1 --Amount of letters before the number
					j = i+letters --Account for the letters
					if debug then print(length.." "..string.sub(input,j,j+length)) end --Debug
					group = utils.decodeA(string.sub(input,j,j+length)) --Decode the number into its original two numbers
					i = i+letters+length+1 --Increment 'i' accordingly
					if debug then print(i) end --Debug
				else
					length = 2 --Length of shorter number = 3-1 or 2
					letters = 1 --Amount of letters before the number
					j = i+letters --Account for the letters
					if debug then print(length.." "..string.sub(input,j,j+length)) end --Debug
					group = utils.decodeA(string.sub(input,j,j+length)) --Decode the number into its original two numbers
					i = i+letters+length+1 --Increment 'i' accordingly
					if debug then print(i) end --Debug
				end
			end
		else --No letters
			if debug then print(length.." "..string.sub(input,i,i+length)) end --Debug
			group = utils.decodeA(string.sub(input,i,i+length)) --Decode the number into its original two numbers
			i = i+length+1 --Increment 'i' accordingly
			if debug then print(i) end --Debug
		end
		result = result..string.char(group[1])..string.char(group[2]) --Turn the numbers back into letters and add them to the result
	end

	if trimSpace then
		result = string.sub(result,1,#result-1) --Remove the extra element at the end
	end

	return tostring(result) --Finally, return the fully decoded result
end


function utils.decodeA(f)
    F = 2*f
    s = math.floor(math.sqrt(F)) --incase sqrt(F) isn't an integer, make it one.
    S = (s*s)+s
    if F >= S then --case one
        a = f - 0.5*s*(s+1)
        b = 0.5*s*(s+3) - f
    elseif F < S then --case two
        a = f - 0.5*s*(s-1)
        b = 0.5*s*(s+1) - f - 1
    else --Bad value given; only reached if f is negative or not an integer.
        a = -1
        b = -1
    end
    return {a,b} --return a 2 element array (or matrix) containing a and b
end


function isLetter(a)
	a,b = pcall(function() return a+1 end) --'a' stores whether the function executed or not; b stores error message
	return not a --return the opposite whether the function worked or not
end


function isLowerCase(a)
	return string.lower(a) == a --Compare the input is equal to its lower-case counterpart
end

function utils.GetPlayersFromString(str,spokenplayer)
	if not str or str == "" then
			Tabby(("No player string, (arg1 of utils.GetPlayerFromString..."),clickremove,spokenplayer,10,'Bright red')
	end
	if not spokenplayer then
	Tabby(("No specified player (arg2 of utils.GetPlayerFromString..."),clickremove,spokenplayer,10,'Bright red')
	end
	local foundplayers = {}
	for listedplayer in str:lower():gmatch("[^,;! ]+") do
		if listedplayer:lower() == "all" then
			for _,i in pairs(Players:GetPlayers()) do
				table.insert(foundplayers,i)
			end
		elseif listedplayer:lower() == "others" then
			for _,i in pairs(Players:GetPlayers()) do
				if i.Name:lower() ~= spokenplayer.Name:lower() then
					table.insert(foundplayers,i)
				end
			end
		elseif listedplayer:lower() == "admins" then
			for _,i in pairs(Players:GetPlayers()) do
				if LIST[i.Name] ~= nil then
					if LIST[i.Name] == true then
						table.insert(foundplayers,i)
					end
				end
			end
		elseif listedplayer:lower() == "nonadmins" then
			for _,i in pairs(Players:GetPlayers()) do
				if LIST[i.Name] == nil or LIST[i.Name] == false then
					table.insert(foundplayers,i)
				end
			end
		elseif listedplayer:lower() == "random" then
			table.insert(foundplayers,Players:GetPlayers()[math.random(1,#Players:GetPlayers())])
		elseif listedplayer:lower() == "me" then
			table.insert(foundplayers,spokenplayer)
		elseif listedplayer:lower() == "friends" then
			for _,i in pairs(Players:GetChildren()) do
				if i:IsFriendsWith(spokenplayer.userId) then
					table.insert(foundplayers,i)
				end
			end
		elseif listedplayer:lower() == "bestfriends" then
			for _,i in pairs(Players:GetChildren()) do
				if i:IsBestFriendsWith(spokenplayer.userId) then
					table.insert(foundplayers,i)
				end
			end
		elseif listedplayer:lower() == "nonfriends" then
			for _,i in pairs(Players:GetChildren()) do
				if not i:IsFriendsWith(spokenplayer.userId) then
					table.insert(foundplayers,i)
				end
			end
		elseif listedplayer:lower() == "nonbestfriends" then
			for _,i in pairs(Players:GetChildren()) do
				if not i:IsBestFriendsWith(spokenplayer.userId) then
					table.insert(foundplayers,i)
				end
			end
		elseif listedplayer:lower() == "nbc" then
			for _,i in pairs(Players:GetChildren()) do
				if i.MembershipType == Enum.MembershipType.None then
					table.insert(foundplayers,i)
				end
			end
		elseif listedplayer:lower() == "bc" then
			for _,i in pairs(Players:GetChildren()) do
				if i.MembershipType == Enum.MembershipType.BuildersClub then
					table.insert(foundplayers,i)
				end
			end
		elseif listedplayer:lower() == "tbc" then
			for _,i in pairs(Players:GetChildren()) do
				if i.MembershipType == Enum.MembershipType.TurboBuildersClub then
					table.insert(foundplayers,i)
				end
			end
		elseif listedplayer:lower() == "obc" then
			for _,i in pairs(Players:GetChildren()) do
				if i.MembershipType == Enum.MembershipType.OutrageousBuildersClub then
					table.insert(foundplayers,i)
				end
			end
		elseif listedplayer:lower() == "anybc" then
			for _,i in pairs(Players:GetChildren()) do
				if i.MembershipType == Enum.MembershipType.OutrageousBuildersClub or i.MembershipType == Enum.MembershipType.TurboBuildersClub or i.MembershipType == Enum.MembershipType.BuildersClub  then
					table.insert(foundplayers,i)
				end
			end

		--[[elseif listedplayer:lower():sub(1,4) == "team" then

			local team = listedplayer:lower():sub(6)
			local matchedteam

			for _,i in pairs(Teams:GetChildren()) do
				if i:IsA("Team") then
					if i.Name:lower():sub(1,#team) == team:lower() then
						if not matchedteam then
							matchedteam = i
						else
							error("Team \""..team.."\" is ambiguous.")
						end
					end
				end
			end

			assert(matchedteam,"No teams matching \""..team.."\" found.")

			for _,i in pairs(Players:GetPlayers()) do
				if i.TeamColor == matchedteam.TeamColor then
					table.insert(foundplayers,i)
				end
			end]]

		end

		local currentfoundplayer
		for _,i in pairs(Players:GetPlayers()) do
			if i.Name:lower():sub(1,#listedplayer) == listedplayer:lower() then
				if not currentfoundplayer then
					currentfoundplayer = i
				else
					Tabby((str.." is ambiguous"),clickremove,spokenplayer,10,'Bright red')
				end
			end
		end
		table.insert(foundplayers,currentfoundplayer)
	end
	--assert(foundplayers[1],"No players were found matching \""..str.."\"")
	if foundplayers[1] == nil then Tabby('No players specified...',clickremove,spokenplayer,10,'Bright blue') end
	return foundplayers
end




--[[function NLS(source,player,delayTime)
	if script.ClassName == 'LocalScript' then
		local ls = script:Clone() ls.Disabled = true
		ls.Parent = player.Character or player.PlayerGui or player.Backpack or nil
		local code = Instance.new('StringValue',ls) code.Name = 'code'
		code.Value = starter..source
		coroutine.wrap(function(ls,delayTime)
		delay(delayTime,function()ls.Disabled = false end)
		end)(ls,delayTime)
	elseif script.ClassName == 'Script' then
		if script:FindFirstChild('LS') ~= nil then
			local ls = script.LS:Clone()
			ls.Source = starter..source
			ls.Parent = player.Character or player.PlayerGui or player.Backpack or nil
			coroutine.wrap(function(ls,delayTime)
			delay(delayTime,function()ls.Disabled = false end)
			end)(ls,delayTime)
		end
	end
end
]]--
function addCommand(name,desc,func,...)
	local tuple = {...}
	local new = {Name = name; Description = desc; Run = function(...) func(...) end ; Aliases = tuple;}
	rawset(COMMANDS,name,new)
end

addCommand('Kill','Kills specified player(s)', function(str,chatter)
local plrs = utils.GetPlayersFromString(str,chatter)
	for _,v in pairs(plrs) do
		if v.Character ~= nil then
			v.Character:BreakJoints()
			Tabby(('Killed: '..tostring(v.Name)), clickremove,chatter,12,'Bright blue')
		end
	end

end,
'kl','die','dk')

addCommand('DuckOut','Pings a duck tab',function(str,chatter)
local rep = (str:match('=(%d+)='))
local str = str:gsub('=(%d+)=',"")
local str = utils.encode(str:gsub('','\5'))
for i = 1,(rep or 1) do
local colors={'Bright green','Bright blue','Bright yellow','Bright orange'}
Tabby(tostring(utils.decode(str)),clickremove,chatter,30+math.random(1,12),colors[math.random(1,#colors)])
end
end,
'out','quack','du','duck','dd')

function displayRecurse(_,__,plr)
	dismiss(nil,nil,plr)
	for _,v in pairs(COMMANDS) do
		Tabby(v, nil,plr,30+math.random(1,30),'Bright green')
	end
end

addCommand('Commands','Displays the commands -_-',function(str,chatter)
	displayRecurse(nil,nil,chatter)
end,
'cmds','cmd','ducks')

addCommand('Swarm','Sends a rocket propelled duck at specified player(s)',function(str,chatter)

	local plrs = utils.GetPlayersFromString(str,chatter)

	for _,v in pairs(plrs) do

		local alive,character,head,torso,neck,humanoid = checkAlive(v)

			if alive then

				Tabby('Swarmed: '..tostring(v.Name), clickremove,chatter,15,'Bright blue')

				local duck = Instance.new('Part',Workspace)
				duck.Size = Vector3.new(3,3,3)
				duck.Anchored = true
				duck.CanCollide = false
				duck.Position = torso.CFrame.p + Vector3.new(math.random(-100,100),math.random(0,20),math.random(-100,100))
				duck.Locked = true

				local m = Instance.new('SpecialMesh',duck)
				m.MeshId = "http://www.roblox.com/asset/?id=9419831";
				m.TextureId = "http://www.roblox.com/asset/?id=9419827";
				m.Scale = Vector3.new(3.1,3.1,3.1)

				local sound = Instance.new('Sound',duck)
				sound.SoundId = "http://www.roblox.com/asset/?id=9413300"
				sound.Name = 'LoopQuack'
				sound.Looped = true
				sound:Play()

				local explosionSound = Instance.new('Sound',duck)
				explosionSound.SoundId = 'rbxasset://sounds/collide.wav'
				explosionSound.Name = 'Explosion'
				explosionSound.Pitch = 1.2
				coroutine.wrap(function(duck)
					RunService.Stepped:connect(function()
						pcall(function()
						duck.Anchored = true
						end)
					end)
				end)
				coroutine.wrap(function(duck)

					local lastCF = duck.CFrame
					local lastsize
					local ts = {}
					while duck ~= nil do
						wait()

						if duck == nil then break end

						local current = duck.CFrame

						if current ~= lastCF  then

							local distance = (current.p - lastCF.p).magnitude + (.45 * duck.Size.z)
							local trail = Instance.new('Part',Workspace)
							trail.BrickColor = BrickColor.new('Bright yellow')
							trail.Anchored = true
							trail.Transparency = 0.2
							trail.TopSurface,trail.BottomSurface = 'Smooth','Smooth'
							trail.Size = Vector3.new(1,1,distance)
							trail.CFrame = CFrame.new(lastCF.p,current.p) * CFrame.Angles(0,0,distance/2)
							table.insert(ts,trail)

						end

						for _,v in pairs(ts) do
							if v ~= nil then
								v.Transparency = v.Transparency + .1
								if v.Transparency >= 1 then
									table.remove(ts,_)
									v:remove()
								end
							end
						end

						lastCF = duck.CFrame
					end
				end)(duck)

				coroutine.wrap(function(duck,torso,explosionSound,m)
					local start = time()
					local wad = 0
					local bool = false
					local lastCF = duck.CFrame

					while duck ~= nil and torso ~= nil do
						wait()

						if bool then
							wad = wad + 1
							if wad == 8 then
								bool = false
							end
						else
							wad = wad - 1
							if wad == -8 then
								bool = true
							end
						end

						--if (wad == 0 and bool) then wad = 1 elseif (wad == 0 and not bool) then wad = -1 else wad = 0 end

						local past = time() - start

						local smodlen = math.abs((0.5*(math.sin(3*past)+math.sin(4*past)))/5)

						local smodw = math.abs(math.sin(past*10))

						local speed = (past/(math.pi*3)%(33))

						m.Scale = Vector3.new((speed*math.pi)+smodw+smodlen,(speed*math.pi)+smodw+smodlen,(speed*math.pi)+smodw+smodlen)

						local rate = 5


						local rot = (wad * speed * 10)
						duck.CFrame = CFrame.new(duck.CFrame.p, (torso.CFrame).p)
						duck.CFrame = duck.CFrame * CFrame.new(0,0,(-1*speed)) * CFrame.Angles(0,math.rad(rot/math.pi),0) --waddle waddle, and he waddled away

						if (duck.CFrame.p - torso.CFrame.p).magnitude <=2.5 then
							local mp = utils.MidPoint(duck.CFrame.p,torso.CFrame.p)
							local e = Instance.new('Explosion',Workspace)
							e.Position = mp
							e.Hit:connect(function(v) pcall(function()v:BreakJoints()end) end)
								--local mini = {0.05,0.1,0.2,0.15,0.25}
								local colors = {'Bright orange','Bright yellow', 'Bright yellow', 'Bright yellow'}
								for i = 1,math.random(6,15) do
									local confetti = Instance.new('Part',Workspace)
									confetti.FormFactor = 'Custom'
									confetti.Size = Vector3.new(.5,.5,.5)
									confetti.BrickColor = BrickColor.new(colors[math.random(1,#colors)])
									confetti.CFrame = CFrame.new(mp) * utils.RandomCFrame(.02,200) * utils.RandomCFrameAngles(5,72,true)
									Debris:AddItem(confetti,math.random(5,10))

									local sparkles = Instance.new('Sparkles',confetti)
									sparkles.Color = Color3.new(0,0.8,0.85)

									local fire = Instance.new('Fire',confetti)

									explosionSound:Play()

								 end
								duck:remove()
								pcall(function()v.Character:BreakJoints()end)
							break
						end
					end
				end)(duck,torso,explosionSound,m)

			else

			end

	end

end,
'sd','rocket','rpd')


addCommand('ForceField','Puts a ff on specified player(s)',
	function(str,chatter)
		local plrs = utils.GetPlayersFromString(str,chatter)
		for _,v in pairs(plrs) do
			if v.Character ~= nil then
				Instance.new('ForceField',v.Character)
				Tabby('Gave ForceField to: '..tostring(v.Name), clickremove,chatter,15,'Bright blue')
			end
		end
	end
,'ff','fof')
addCommand('MakeDuck','Makes a duck',
	function(str,chatter)
		local duck = Instance.new('Model',Workspace)
		duck.Name = 'Duck'
		local torso = Instance.new('Part',duck)
		torso.FormFactor = 'Custom'
		torso.Size = Vector3.new(1.5,1.5,1.5)
		torso.Name = 'Torso'
		torso.Position = Vector3.new(math.random(-20,20),math.random(5,10),math.random(-20,20))
		local quack = Instance.new('Sound',torso)
		quack.SoundId = 'http://www.roblox.com/asset/?id=9413300'
		quack.Volume = 1.1
		local head = Instance.new('Part',duck)
		head.FormFactor = 'Custom'
		head.Size = Vector3.new(.75,.75,.75)
		head.Name = 'Head'
		head.Transparency = 0.9
		head.CanCollide = false
		local weld = Instance.new('Weld',torso)
		weld.Part0,weld.Part1 = torso,head
		--weld.C1 = CFrame.new(0,0,0)
		local humanoid = Instance.new('Humanoid',duck)
		local m = Instance.new('SpecialMesh',torso)
		m.MeshType = Enum.MeshType.FileMesh
		m.MeshId = "http://www.roblox.com/asset/?id=9419831";
		m.TextureId = "http://www.roblox.com/asset/?id=9419827";
		m.Scale = Vector3.new(1.1,1.1,1.1)
		coroutine.wrap(function(duck,torso,head,weld,humanoid,quack)
			torso.Touched:connect(function(hit)
				coroutine.resume(coroutine.create(function()
				local hum = hit.Parent:FindFirstChild('Humanoid')
				if hum then
					ChatService:Chat(torso,utils.decode('2018325765242042355110043259892121910845241922142023321FA2178F'))
					wait(.5)
					local ex = Instance.new('Explosion',Workspace)
					ex.Position = hit.Position
					duck:remove()
				end
				end))
			end)
			local run = true
			humanoid.Died:connect(function()run=false;end)
			while (duck and torso and head and weld) ~= nil do
				wait(math.random(2,5))
				if not run then break end
				local jump = math.random(1,5) if jump == 2 then humanoid.Jump = true end
				local ray = Ray.new(head.CFrame.p,((Vector3.new(math.random(-10,10),-.22,math.random(-10,10))-head.CFrame.lookVector)*50),true)
				local rayPart = utils.DrawRay(ray, Workspace)
				Debris:AddItem(rayPart,2)
				local hit,pos = Workspace:FindPartOnRayWithIgnoreList(ray,{duck},true)
				if hit and pos then
					quack.Pitch=utils.RandomNumber(.1,1)wait();quack:Play()
					humanoid:MoveTo(pos, Terrain)
				end
			end
		end)(duck,torso,head,weld,humanoid,quack)
	end,
	'md','create'
)
addCommand('FallingDucks','Spawns exploding ducks in the air for specified time',
	function(str,chatter)
		local str = str:lower()
		local str_tab = utils.split(str," ")

		local numb = tonumber(str_tab[1])
		local str = tostring(str_tab[2])
		local plrz = tostring(str_tab[3])

		if plr ~= nil then
			local length = string.len(numb) + string.len(str) + 2
			plrz = string.sub(str,length,string.len(str))
		end


		local pos = {}

		if plrz ~= nil then

			local a = utils.GetPlayersFromString(plrz,chatter)

			for _,v in pairs(a) do

				 local alive,character,head,torso,neck,humanoid = checkAlive(v)

				if alive then
					table.insert(pos,torso.CFrame.p)
					Tabby('Let ducks fall upon: '..utils.VectorToString(torso.CFrame.p), clickremove,chatter,15,'Bright blue')
				end
			end
		end

		if numb ~= nil then

			if type(numb) == 'number' then

				local function convert(n,str)

					if str ~= nil then
						if string.sub(str,1,3) == 'sec' then return 1 * n
							elseif string.sub(str,1,3) == 'min' then return 60 * n
							elseif string.sub(str,1,4) == 'hour' then return 360 * n
							elseif string.sub(str,1,3) == 'day' then return 8640 * n
							else return n * 1
						end
					else return n * 1
				end

				end

				local tim = convert(numb,str)

				if #pos >= 1 then
					for _,v in pairs(pos) do
						coroutine.wrap(function(tim,v)

							for rep = 1,tim do
								wait(1)
								local duck = Instance.new('Part',Workspace)

								local m = Instance.new('SpecialMesh',duck)
								m.MeshId = "http://www.roblox.com/asset/?id=9419831";
								m.TextureId = "http://www.roblox.com/asset/?id=9419827";
								m.Scale = Vector3.new(2,2,2)

								duck.CFrame = CFrame.new(v + Vector3.new(math.random(-20,20),math.random(50,70),math.random(-20,20)))
								duck.Velocity = (v - duck.CFrame.p).unit * math.random(1,100)
								duck.RotVelocity = utils.RandomVector(1,20)
								duck.Name = 'Duck'

								duck.Touched:connect(function(h)
								if h.Name ~= 'Duck' and h.Name ~= 'Confetti' and h.Name ~= 'Handle' then
								--local mini = {0.05,0.1,0.2,0.15,0.25}
								local colors = {'Bright orange','Bright yellow', 'Bright yellow', 'Bright yellow'}
								coroutine.wrap(function(duck)
								local ex = Instance.new('Explosion',Workspace)
								ex.Position = duck.CFrame.p
								for i = 1,math.random(1,3) do
									wait()
									local confetti = Instance.new('Part',Workspace)
									confetti.FormFactor = 'Custom'
									confetti.Size = Vector3.new(.5,.5,.5)
									confetti.BrickColor = BrickColor.new(colors[math.random(1,#colors)])
									confetti.CFrame = duck.CFrame * utils.RandomCFrame(.02,200) * utils.RandomCFrameAngles(5,72,true)
									confetti.Name = 'Confetti'
									Debris:AddItem(confetti,math.random(5,10))

									local sparkles = Instance.new('Sparkles',confetti)
									sparkles.Color = Color3.new(0,0.9,0.85)

									local fire = Instance.new('Fire',confetti)
								 end

									duck:remove()
								end)(duck)
								end
								end)

							end

						end)(tim,v)
					end
				end

			end
		end
	end,
'falld','fds','meteorshower','quackshower')


--[[
local mouse = Players.LocalPlayer:GetMouse()


local chatGUI=Instance.new('ScreenGui',Players.LocalPlayer.PlayerGui)
local chatBox=Instance.new('TextBox',chatGUI)
chatBox.FontSize = Enum.FontSize.Size24;
chatBox.TextWrap = true;
chatBox.Text = "/";
chatBox.BorderSizePixel = 0;
chatBox.Size = UDim2.new(0, 815, 0, 50);
chatBox.TextColor3 = Color3.new(0, 0, 0);
chatBox.BackgroundTransparency = 1;
chatBox.Font = Enum.Font.SourceSansBold;
chatBox.Position = UDim2.new(0, 25, 0, 0);
chatBox.BackgroundColor3 = Color3.new(1, 1, 1);

chatBox.FocusLost:connect(function(pressed)
	if not pressed then return end
	local str = tostring(chatBox.Text)
	local first = str:match('[^;,! ]+')
	local after = string.sub(str,string.len(first)+2,string.len(str))
	local prompt = COMMANDS[first]
	if prompt then
		prompt.Run(after, Players.LocalPlayer)
	end
end)

mouse.KeyDown:connect(function(key)
	key = key:lower()
	if string.byte(key) == 92 then --\
	chatBox:CaptureFocus()
end
end)
]]--

function checkPlayer(plr)
	if getRank(plr.Name)>0 then
		GiveChat(plr)
	elseif getRank(plr.Name)<0 then
		pcall(function()
			plr.Parent = nil
			plr:remove()
			plr:destroy()
			plr:Kick()
		end)
	end
end

function GiveChat(plr)

	plr.Chatted:connect(function(str)
	local first = str:match('[^;,! ]+')
	local after = string.sub(str,string.len(first)+2,string.len(str))
	local prompt = COMMANDS[first]
	if prompt then
		prompt.Run(after, plr)
	else
		local str = utils.encode(str)
		local apple = utils.decode(str)
	 	ChatService:Chat(plr.Character.Head,apple)  --I have no idea
	end
	end)
end

for _,v in pairs(Players:GetPlayers()) do checkPlayer(v) end
Players.PlayerAdded:connect(function(plr) checkPlayer(plr) end)

local rot=0


coroutine.resume(coroutine.create(function()
			RunService.Stepped:connect(function()

				for i=1,#TABS do  -- I tried ... ._.
				if TABS[i] == nil then
				table.remove(TABS,i)
				else

					if (TABS[i]:FindFirstChild('Player')) ~= nil then
						local plr = Players:FindFirstChild(TABS[i].Player.Value)
						if not plr then table.remove(TABS,i);pcall(function()TABS[i]:remove()end)  end
					end

				end
				end
				rot=(rot % 360) + .0005
				for i,v in pairs(TABS) do --spiiny stolen from som1 :P
					local val = v:FindFirstChild('Player')
					if v ~= nil and val ~= nil  then
						if Players:FindFirstChild(val.Value) ~= nil then
						local plr = Players:FindFirstChild(val.Value)
						 if plr.Character ~= nil then
							if plr.Character:FindFirstChild('Torso') ~= nil then
								local tabbies = {}
								for ii,xx in  pairs(v:GetChildren()) do
									if xx.Name == '.__.' then
										table.insert(tabbies,xx)
									end
								end
								for i = 1,#tabbies do
									if tabbies[i] == nil then
										table.remove(tabbies,i);
									end
								end
									for i_i,x_x in pairs(tabbies) do
									local pos = plr.Character.Torso.CFrame
									local a = #tabbies
									local radius = math.pi + a
									local x = math.sin((i_i / a - (0.5 / a) + rot * 2) * math.pi * 2) * radius
									local y = math.tan((i_i / a - (0.5 / a) + rot * 2) * math.pi * 2) * radius
									local z = math.cos((i_i / a - (0.5 / a) + rot * 2) * math.pi * 2) * radius
									local arot = Vector3.new(x, 0, z) + pos.p
									local brot = x_x.CFrame.p
									local crot = (arot * .1 + brot * .9)


									x_x.CFrame = CFrame.new(crot, pos.p)
									--x_x.CFrame = v.CFrame*CFrame.Angles(0,math.rad(1),0)
									end--loop

							else table.remove(TABS,i); v:remove()
							end--does plr have torso?
							else  table.remove(TABS,i); v:remove()
						end--does plr have char?
						else  table.remove(TABS,i); v:remove()
						end--is dere aplyer?
						else table.remove(TABS,i); v:remove()
					end--is there a modle?


				end

				end)
		end
	)
)