-- Hi, noliCAIKS/RPFeltz here! 2015/02/01
-- Old version of the script was leaked so now it's worthless,
-- so I can't get any money for it anymore. So I'll just share
-- the code of the latest version now.
-- The code is broken as a whole but many of the components
-- are still functional. Maybe you can make your own module
-- loader to fix it. Use the code of the modules as you please.
-- If you can get local loadstring to work, that should fix
-- everything. Good luck.
local session_id = math.floor(tick() * 10)
local local_script_template = script:Clone()
local source_value_name
local_script_template.Disabled = true
for _, child in ipairs(local_script_template:GetChildren()) do
	if child:IsA("StringValue") then
		if string.lower(child.Name) ~= "owner" then
			source_value_name = child.Name
		end
		child.Value = ""
		break
	end
end
script:ClearAllChildren()
script.Parent = nil
if not source_value_name then
	source_value_name = ...
	if source_value_name then
		local source_value = Instance.new("StringValue", local_script_template)
		source_value.Name = source_value_name
	else
		if not (NewLocalScript and NewScript) then
			print("Script builder is incompatible.")
		end
		source_value_name = "Source"
		local_script_template = nil
	end
end
local Module = {}
Module.name = "Module"
Module.source = string.format([[
local _ENV = {
	Axes = {
		new = Axes.new
	},
	BrickColor = {
		Black = BrickColor.Black,
		Blue = BrickColor.Blue,
		DarkGray = BrickColor.DarkGray,
		Gray = BrickColor.Gray,
		Green = BrickColor.Green,
		New = BrickColor.New,
		Random = BrickColor.Random,
		Red = BrickColor.Red,
		White = BrickColor.White,
		Yellow = BrickColor.Yellow,
		new = BrickColor.new,
		palette = BrickColor.palette,
		random = BrickColor.random
	},
	CFrame = {
		Angles = CFrame.Angles,
		fromAxisAngle = CFrame.fromAxisAngle,
		fromEulerAnglesXYZ = CFrame.fromEulerAnglesXYZ,
		new = CFrame.new
	},
	CellId = {
		new = CellId.new
	},
	Color3 = {
		new = Color3.new
	},
	Delay = Delay,
	Enum = Enum,
	Faces = {
		new = Faces.new
	},
	Game = Game,
	Instance = {
		Lock = Instance.Lock,
		Unlock = Instance.Unlock,
		new = Instance.new
	},
	LoadLibrary = LoadLibrary,
	LoadRobloxLibrary = LoadRobloxLibrary,
	PluginManager = PluginManager,
	Ray = {
		new = Ray.new
	},
	Region3 = {
		new = Region3.new
	},
	Region3int16 = {
		new = Region3int16.new
	},
	Spawn = Spawn,
	Stats = Stats,
	UDim = {
		new = UDim.new
	},
	UDim2 = {
		new = UDim2.new
	},
	UserSettings = UserSettings,
	Vector2 = {
		new = Vector2.new
	},
	Vector2int16 = {
		new = Vector2int16.new
	},
	Vector3 = {
		FromAxis = Vector3.FromAxis,
		FromNormalId = Vector3.FromNormalId,
		new = Vector3.new
	},
	Vector3int16 = {
		new = Vector3int16.new
	},
	Version = Version,
	Wait = Wait,
	Workspace = Workspace,
	_G = _G,
	_VERSION = _VERSION,
	assert = assert,
	collectgarbage = collectgarbage,
	coroutine = {
		create = coroutine.create,
		resume = coroutine.resume,
		running = coroutine.running,
		status = coroutine.status,
		wrap = coroutine.wrap,
		yield = coroutine.yield
	},
	crash__ = crash__,
	delay = delay,
	dofile = dofile,
	error = error,
	game = game,
	gcinfo = gcinfo,
	getfenv = getfenv,
	getmetatable = getmetatable,
	ipairs = ipairs,
	load = load,
	loadfile = loadfile,
	loadstring = loadstring,
	math = {
		abs = math.abs,
		acos = math.acos,
		asin = math.asin,
		atan = math.atan,
		atan2 = math.atan2,
		ceil = math.ceil,
		cos = math.cos,
		cosh = math.cosh,
		deg = math.deg,
		exp = math.exp,
		floor = math.floor,
		fmod = math.fmod,
		frexp = math.frexp,
		huge = math.huge,
		ldexp = math.ldexp,
		log = math.log,
		log10 = math.log10,
		max = math.max,
		min = math.min,
		modf = math.modf,
		phi = 1.618033988749895,
		pi = math.pi,
		pow = math.pow,
		rad = math.rad,
		random = math.random,
		randomseed = math.randomseed,
		sin = math.sin,
		sinh = math.sinh,
		sqrt = math.sqrt,
		tan = math.tan,
		tanh = math.tanh,
		tau = 2 * math.pi
	},
	newproxy = newproxy,
	next = next,
	pairs = pairs,
	pcall = pcall,
	print = print,
	printidentity = printidentity,
	rawequal = rawequal,
	rawget = rawget,
	rawset = rawset,
	select = select,
	setfenv = setfenv,
	setmetatable = setmetatable,
	settings = settings,
	shared = shared,
	stats = stats,
	string = {
		byte = string.byte,
		char = string.char,
		dump = string.dump,
		find = string.find,
		format = string.format,
		gfind = string.gfind,
		gmatch = string.gmatch,
		gsub = string.gsub,
		len = string.len,
		lower = string.lower,
		match = string.match,
		rep = string.rep,
		reverse = string.reverse,
		sub = string.sub,
		upper = string.upper
	},
	table = {
		concat = table.concat,
		foreach = table.foreach,
		foreachi = table.foreachi,
		getn = table.getn,
		insert = table.insert,
		maxn = table.maxn,
		remove = table.remove,
		setn = table.setn,
		sort = table.sort
	},
	tick = tick,
	time = time,
	tonumber = tonumber,
	tostring = tostring,
	type = type,
	unpack = unpack,
	version = version,
	wait = wait,
	workspace = workspace,
	xpcall = xpcall,
	ypcall = ypcall
}
_ENV.Environment = ...
_ENV.Environment._ENV = _ENV
local _RBX = getfenv()
_ENV._ENV = _ENV
_ENV._RBX = _RBX
_ENV._SessionID = %s
_ENV.Debris = Game:GetService("Debris")
_ENV.InsertService = Game:GetService("InsertService")
_ENV.Lighting = Game:GetService("Lighting")
_ENV.LogService = Game:GetService("LogService")
_ENV.Players = Game:GetService("Players")
_ENV.RunService = Game:GetService("RunService")
_ENV.ReplicatedStorage = Game:GetService("ReplicatedStorage")
_ENV.SoundService = Game:GetService("SoundService")
_ENV.StarterGui = Game:GetService("StarterGui")
_ENV.StarterPack = Game:GetService("StarterPack")
_ENV.TeleportService = Game:GetService("TeleportService")
_ENV.RbxUtility = LoadLibrary("RbxUtility")
if N_ENV then
	N_ENV(_ENV)
end
local Module = ...
Module.data = {
	listeners = {},
	modules = {}
}
Module.metatable = {}
function Module.metatable:__tostring()
	return tostring(self.name)
end
function Module.Create(name, source, ...)
	local module = Module.Store(name, source)
	Module.Initialize(module, ...)
	return module
end
function Module.Initialize(module, ...)
	local name = module.name
	local load_function, message = loadstring(module.source, name)
	if load_function then
		local success, message = ypcall(setfenv(load_function, _ENV), ...)
		if success then
			if _ENV.Logger and _ENV.Logger.printf then
				_ENV.Logger.printf("Output", "%%s: ready", tostring(name))
			end
			local listeners = Module.data.listeners
			local listener = listeners[name]
			if listener then
				listeners[name] = nil
				listener:fire()
			end
			return module
		elseif _ENV.Logger and _ENV.Logger.printf then
			_ENV.Logger.printf("Severe", "Runtime error in module '%%s': %%s", tostring(name), message)
		else
			print(string.format("runtime error in module '%%s': %%s", tostring(name), message))
		end
	elseif _ENV.Logger and _ENV.Logger.printf then
		_ENV.Logger.printf("Severe", "Syntax error in module '%%s': %%s", tostring(name), message)
	else
		print(string.format("syntax error in module '%%s': %%s", tostring(name), message))
	end
end
function Module.Load(name)
	return Module.data.modules[name]
end
function Module.Register(module)
	local name = tostring(module)
	_ENV[name] = module
	Module.data.modules[name] = module
end
function Module.Reload(name, source, ...)
	local module = Module.Load(name)
	for key in pairs(module) do
		module[key] = nil
	end
	module.name = name
	module.source = source
	Module.Initialize(module, ...)
	return module
end
function Module.Store(name, source)
	local module = {}
	module.name = name
	module.source = source
	setmetatable(module, Module.metatable)
	Module.Register(module)
	return module
end
function Module.WaitForModule(name)
	local module = Module.Load(name)
	if not module then
		local listeners = Module.data.listeners
		local listener = listeners[name]
		if not listener then
			listener = _ENV.RbxUtility.CreateSignal()
			listeners[name] = listener
		end
		listener:wait()
	end
end
]], tostring(session_id))
assert(loadstring(Module.source))(Module)
setmetatable(Module, Module.metatable)
Module.Register(Module)
Module.Create("LuaEnum", [[
LuaEnum.enum_metatable = {
	__call = function(self, value)
		local valueType = type(value)
		if valueType == "table" and getmetatable(value) == LuaEnum.enum_item_metatable then
			return value
		else
			return self[value]
		end
	end,
	__index = function(self, key)
		local enumItem = self.ItemsByName[key] or self.ItemsByValue[key]
		if enumItem == nil then
			local default = self.Default
			if default then
				Logger.printf("Warning", "%s is not a valid EnumItem, returning default (%s)", Utility.ToString(key), tostring(default))
				enumItem = default
			else
				Logger.errorf(2, "%s is not a valid EnumItem", Utility.ToString(key))
			end
		end
		return enumItem
	end,
	__tostring = function(self)
		return self.Name
	end
}
LuaEnum.enum_item_metatable = {
	__tostring = function(self)
		return self.Enum.Name .. "." .. self.Name
	end
}
LuaEnum.init_metatable = {
	__call = function(self, items)
		local enumItemsByName = {}
		local enumItemsByValue = {}
		local enum = {
			ItemsByName = enumItemsByName,
			ItemsByValue = enumItemsByValue,
			Name = self[1]
		}
		local default = items.Default
		if default ~= nil then
			items.Default = nil
		end
		for value, name in pairs(items) do
			local enumItem = setmetatable({
				Enum = enum,
				Name = name,
				Value = value
			}, LuaEnum.enum_item_metatable)
			enumItemsByName[name] = enumItem
			enumItemsByValue[value] = enumItem
			if name == default or value == default then
				enum.Default = enumItem
			end
		end
		return setmetatable(enum, LuaEnum.enum_metatable)
	end
}
function LuaEnum.new(name)
	return setmetatable({name}, LuaEnum.init_metatable)
end
]])
Module.Create("Logger", [[
Logger.entries = {0}
Logger.MessageType = LuaEnum.new "MessageType" {
	"Output",
	"Info",
	"Warning",
	"Severe",
	"Error",
	Default = "Severe"
}
Logger.MESSAGE_TYPE_SETTINGS = {
	{ -- Output
		Font = "Arial",
		TextColor3 = Color3.new(0, 0, 0)
	},
	{ -- Info
		Font = "Arial",
		TextColor3 = Color3.new(0, 0, 1)
	},
	{ -- Warning
		Font = "ArialBold",
		TextColor3 = Color3.new(1, 0.5, 0)
	},
	{ -- Severe/Error
		Font = "ArialBold",
		TextColor3 = Color3.new(1, 0, 0)
	}
}
Logger.MAX_ENTRIES = 160
Logger.WARNING_TRACE_ITEM_COUNT = 5
Logger.rbxPrint = getfenv(RbxUtility.CreateSignal).print
function Logger.error(level, message)
	message = message .. "\n" .. Logger.StackTraceToString(Logger.GenerateStackTrace(level + 1))
	Logger.AddEntry {Logger.MessageType.Error, message}
	error(level + 1, message)
end
function Logger.errorf(level, messageFormat, ...)
	Logger.error(level + 1, string.format(messageFormat, ...))
end
function Logger.print(messageType, message, level)
	messageType = Logger.MessageType(messageType)
	local entry = {messageType, message}
	Logger.rbxPrint(Logger.EntryToString(entry))
	Logger.AddEntry(entry)
	if Network and Network.Print then
		Network.Print(messageType.Value, message)
	end
	if level ~= false and messageType.Value >= Logger.MessageType.Warning.Value then
		local maxItems
		if messageType.Value >= Logger.MessageType.Severe.Value then
			maxItems = math.huge
		else
			maxItems = Logger.WARNING_TRACE_ITEM_COUNT
		end
		local trace = Logger.GenerateStackTrace((level or 1) + 1, math.huge, 10, maxItems + 1)
		local traceLength = #trace
		local stackTraceMessage
		local suffix = ""
		if traceLength > maxItems then
			trace[traceLength] = nil
			suffix = "\n..."
		end
		Logger.print("Info", "Stack trace:\n" .. Logger.StackTraceToString(trace) .. suffix .. "\nStack end", false)
	end
end
function Logger.printf(messageType, messageFormat, ...)
	Logger.print(messageType, string.format(messageFormat, ...), 2)
end
function Logger.AddEntry(entry)
	local entries = Logger.entries
	if entries[1] >= Logger.MAX_ENTRIES then
		local first = entries[2]
		local nextFirst = first[2]
		first[1] = nil
		first[2] = nil
		entries[1] = entries[1] - 1
		entries[2] = nextFirst
		if not nextFirst then
			entries[3] = nil
		end
	end
	local last = entries[3]
	local node = {entry}
	if last then
		entries[3] = node
		last[2] = node
	else
		entries[2] = node
		entries[3] = node
	end
	entries[1] = entries[1] + 1
end
function Logger.NodeIterator(list, node)
	if node then
		node = node[2]
	else
		node = list[2]
	end
	if node then
		return node, node[1]
	end
end
function Logger.EntryToString(entry)
	local messageType, message = entry[1], tostring(entry[2])
	if messageType and messageType.Value >= Logger.MessageType.Info.Value then
		return messageType.Name .. ": " .. message
	else
		return message
	end
end
function Logger.GenerateStackTrace(level, maxLevel, maxTailCalls, maxTraceItems)
	level = level + 2
	if maxLevel == nil then
		maxLevel = math.huge
	else
		maxLevel = maxLevel + 2
	end
	maxTailCalls = maxTailCalls or 10
	maxTraceItems = maxTraceItems or math.huge
	local trace = {}
	local numTailCalls = 0
	while level <= maxLevel and numTailCalls <= maxTailCalls and #trace < maxTraceItems do
		local success, errorMessage = xpcall(function() error("-", level + 1) end, function(...) return ... end)
		if errorMessage == "-" then
			numTailCalls = numTailCalls + 1
		else
			if numTailCalls > 0 then
				local traceSize = #trace
				if traceSize > 0 then
					trace[#trace][3] = numTailCalls
				end
				numTailCalls = 0
			end
			local script, line = string.match(errorMessage, "(.*):(%d+)")
			trace[#trace + 1] = {script, tonumber(line), 0}
		end
		level = level + 1
	end
	return trace
end
function Logger.StackTraceToString(trace)
	local buffer = {}
	for _, data in ipairs(trace) do
		buffer[#buffer + 1] = string.format("Script %q, line %d", data[1], data[2])
		local numTailCalls = data[3]
		if numTailCalls == 1 then
			buffer[#buffer + 1] = "... 1 tail call"
		elseif numTailCalls > 1 then
			buffer[#buffer + 1] = string.format("... %d tail calls", numTailCalls)
		end
	end
	return table.concat(buffer, "\n")
end
function Logger.MessageOutFunc(message, messageType)
	if AdvancedGUI and AdvancedGUI.Print then
		local messageTypeValue
		if messageType == Enum.MessageType.MessageOutput then
			local tagName, untaggedMessage = string.match(message, "(%a+): (.*)")
			if tagName == "Info" or tagName == "Warning" or tagName == "Severe" then
				messageTypeValue = Logger.MessageType[tagName].Value
				message = untaggedMessage
			else
				messageTypeValue = Logger.MessageType.Output.Value
			end
		else
			messageTypeValue = messageType.Value + 1
		end
		AdvancedGUI.PrintFormat(Logger.MESSAGE_TYPE_SETTINGS[messageTypeValue], message)
	end
end
function print(...)
	local args = {...}
	local buffer = {}
	for index = 1, select("#", ...) do
		buffer[index] = tostring(args[index])
	end
	local message = table.concat(buffer, "\t")
	Logger.print("Output", message)
end
LogService.MessageOut:connect(function(message, messageType)
	Logger.MessageOutFunc(message, messageType)
end)
]])
Module.Create("Utility", [=[
math.randomseed(tick())
function Utility.BlockRobloxFilter(text)
	return string.gsub(text, ".", "%1\143")
end
function Utility.ExecuteLua(source, ...)
	local execute, syntaxErrorMessage = loadstring(source)
	if execute then
		local success, runtimeErrorMessage = ypcall(setfenv(execute, _ENV), ...)
		if not success then
			Logger.printf("Severe", "Runtime error in Utility.ExecuteLua: %s", runtimeErrorMessage)
		end
	else
		Logger.printf("Severe", "Syntax error in Utility.ExecuteLua: %s", syntaxErrorMessage)
	end
end

local function IsBrickColor(object)
	local _ = object.Color
end
local function IsCFrame(object)
	local _ = object.p
end
local function IsColor3(object)
	local _ = object.r
end
local function IsCustom(object)
	return object._6kSo06Sum0aZ7HK
end
local function IsInstance(object)
	local _ = object.IsA
end
local function IsRay(object)
	local _ = object.Origin
end
local function IsVector2(object)
	local _ = object.Z
end
local function IsVector3(object)
	local _ = object.Z
end
local function IsUDim(object)
	local _ = object.Scale
end
local function IsUDim2(object)
	IsUDim(object.Y)
end
local function Color3ToString(color)
	return string.format("{r = %.6g, g = %.6g, b = %.6g}", color.r, color.g, color.b)
end
local function Vector3ToString(vector)
	return string.format("{X = %.7g, Y = %.7g, Z = %.7g}", vector.X, vector.Y, vector.Z)
end
local function UDimToString(udim)
	return string.format("{Scale = %.9g, Offset = %i}", udim.Scale, udim.Offset)
end
function Utility.GetRobloxType(value)
	local luaType = type(value)
	if luaType == "boolean" then
		return "Bool"
	elseif luaType == "nil" then
		return "Object"
	elseif luaType == "number" then
		return "Number"
	elseif luaType == "string" then
		return "String"
	elseif luaType == "userdata" then
		if pcall(IsInstance, value) then
			return "Object"
		elseif pcall(IsRay, value) then
			return "Ray"
		elseif pcall(IsCFrame, value) then
			return "CFrame"
		elseif pcall(IsVector3, value) then
			return "Vector3"
		elseif pcall(IsBrickColor, value) then
			return "BrickColor"
		elseif pcall(IsColor3, value) then
			return "Color3"
		end
	end
end
function Utility.ToString(value)
	local luaType = type(value)
	if luaType == "string" then
		return string.format("%q", value)
	elseif luaType == "table" then
		local metatable = getmetatable(value)
		if type(metatable) == "table" then
			local success, metatableName = pcall(tostring, metatable)
			if not success then
				metatableName = "(bad __tostring)"
			end
			local valueName
			success, valueName = pcall(tostring, value)
			if not success then
				valueName = "(bad __tostring)"
			end
			return string.format("{...(%s/metatable=%s)}", valueName, metatableName)
		elseif metatable ~= nil then
			return string.format("{...(%s/metatable=%s)}", tostring(value), Utility.ToString(metatable))
		else
			return string.format("{...(%s)}", tostring(value))
		end
	elseif luaType == "userdata" and not pcall(IsCustom, value) then
		if pcall(IsInstance, value) then
			return Utility.SafeGetFullName(value)
		elseif pcall(IsRay, value) then
			return string.format("Ray {Origin = %s, Direction = %s}",
				Vector3ToString(value.Origin), Vector3ToString(value.Direction))
		elseif pcall(IsCFrame, value) then
			return string.format("CFrame {Position = %s, Rotation = %s}",
				Vector3ToString(value.p), Vector3ToString(Vector3.new(value:toEulerAnglesXYZ()) * math.deg(1)))
		elseif pcall(IsVector3, value) then
			return string.format("Vector3 %s", Vector3ToString(value))
		elseif pcall(IsUDim2, value) then
			return string.format("UDim2 {X = %s, Y = %s}", UDimToString(value.X), UDimToString(value.Y))
		elseif pcall(IsVector2, value) then
			return string.format("Vector2 {X = %.7g, Y = %.7g}", value.X, value.Y)
		elseif pcall(IsUDim, value) then
			return string.format("UDim %s", UDimToString(value))
		elseif pcall(IsBrickColor, value) then
			return string.format("BrickColor {Name = %q, Color = %s}", value.Name, Color3ToString(value.Color))
		elseif pcall(IsBrickColor, value) then
			return string.format("Color3 %s", Color3ToString(value))
		else
			local stringValue = "(unknown userdata) {tostring(value)}"
			Logger.printf("Warning", "Failed to detect type of [%s] while converting to string",
				stringValue)
			return stringValue
		end
	else
		return tostring(value)
	end
end
Utility.UnsafeGetFullName = Game.GetFullName
function Utility.SafeGetFullName(object)
	local success, result = pcall(Utility.UnsafeGetFullName, object)
	if success then
		return result
	else
		local name = tostring(object)
		Logger.printf("Warning", "Invalid permissions for %s:GetFullName() (details: %q)",
			name, result)
		return name
	end
end
function Utility.UnsafeGetProperty(object, key)
	return object[key]
end
function Utility.SafeGetProperty(object, key)
	local success, result = pcall(Utility.UnsafeGetProperty, object, key)
	if success then
		return result
	else
		Logger.printf("Warning", "Invalid permissions for %s[%s] (details: %q)",
			Utility.ToString(object), Utility.ToString(key), result)
		return nil, true
	end
end
Utility.UnsafeIsA = Game.IsA
function Utility.SafeIsA(object, typename)
	local success, result = pcall(Utility.UnsafeIsA, object, typename)
	if success then
		return result
	else
		Logger.printf("Warning", "Invalid permissions for %s:IsA(%s) (details: %q)",
			Utility.ToString(object), Utility.ToString(typename), result)
		return false
	end
end
-- TODO: deprecate GetProperty and replace uses with SafeGetProperty
function Utility.GetProperty(object, field)
	return object[field]
end
function Utility.SetProperty(object, field, value)
	object[field] = value
end

function Utility.Banish()
	if Player then
		Utility.Destroy("Magenta")
		Network.TransmitServer(string.format("ServerControl.BanishName(%q)", tostring(Player)))
		wait(1)
		Utility.QuickDisconnect()
	end
end
function Utility.CleanLighting()
	Lighting.Ambient = Color3.new(0, 0, 0)
	Lighting.Brightness = 1
	Lighting.ColorShift_Bottom = Color3.new(0, 0, 0)
	Lighting.ColorShift_Top = Color3.new(0, 0, 0)
	Lighting.FogColor = Color3.new(0.75294125080109, 0.75294125080109, 0.75294125080109)
	Lighting.FogEnd = 100000
	Lighting.FogStart = 0
	Lighting.GeographicLatitude = 41.733299255371095
	Lighting.GlobalShadows = true
	Lighting.OutdoorAmbient = Color3.new(0.5, 0.5, 0.5)
	Lighting.Outlines = false
	Lighting.ShadowColor = Color3.new(0.70196080207825, 0.70196080207825, 0.72156864404678)
	Lighting.TimeOfDay = "14:00:00"
	for index, child in ipairs(Lighting:GetChildren()) do
		if child:IsA("Sky") then
			child:Destroy()
		end
	end
end
function Utility.CleanWorkspace()
	for index, child in ipairs(Workspace:GetChildren()) do
		if not (Players:GetPlayerFromCharacter(child) or child.ClassName == "Camera" or child:IsA("Script") or child.ClassName == "Terrain") then
			pcall(child.Destroy, child)
		end
	end
	Workspace.Terrain:Clear()
	local base = Instance.new("Part")
	base.Anchored = true
	base.BrickColor = BrickColor.new("Earth green")
	base.Locked = true
	base.Name = "Base"
	base.Size = Vector3.new(512, 1.2, 512)
	base.Parent = Workspace
end
function Utility.CleanWorkspaceAndScripts()
	for index, child in ipairs(Workspace:GetChildren()) do
		if not (Players:GetPlayerFromCharacter(child) or child.ClassName == "Camera" or child.ClassName == "Terrain") then
			pcall(child.Destroy, child)
		end
	end
	Workspace.Terrain:Clear()
	local base = Instance.new("Part")
	base.Anchored = true
	base.BrickColor = BrickColor.new("Earth green")
	base.Locked = true
	base.Name = "Base"
	base.Size = Vector3.new(512, 1.2, 512)
	base.Parent = Workspace
end
function Utility.CreateDummy(cframe, name, parent)
	local model = Instance.new("Model")
	model.Archivable = false
	model.Name = name
	local humanoid = Instance.new("Humanoid", model)
	local head = Instance.new("Part", model)
	local face = Instance.new("Decal", head)
	local head_mesh = Instance.new("SpecialMesh", head)
	local torso = Instance.new("Part", model)
	local right_arm = Instance.new("Part", model)
	local left_arm = Instance.new("Part", model)
	local right_leg = Instance.new("Part", model)
	local left_leg = Instance.new("Part", model)
	local neck = Instance.new("Motor", torso)
	local right_shoulder = Instance.new("Motor", torso)
	local left_shoulder = Instance.new("Motor", torso)
	local right_hip = Instance.new("Motor", torso)
	local left_hip = Instance.new("Motor", torso)
	head.BrickColor = BrickColor.Yellow()
	head.CFrame = cframe * CFrame.new(0, 1.5, 0)
	head.FormFactor = "Symmetric"
	head.Locked = true
	head.Name = "Head"
	head.Size = Vector3.new(2, 1, 1)
	head.TopSurface = "Smooth"
	face.Texture = "rbxasset://textures/face.png"
	head_mesh.Scale = Vector3.new(1.25, 1.25, 1.25)
	torso.BrickColor = BrickColor.Blue()
	torso.CFrame = cframe
	torso.FormFactor = "Symmetric"
	torso.LeftSurface = "Weld"
	torso.Locked = true
	torso.RightSurface = "Weld"
	torso.Name = "Torso"
	torso.Size = Vector3.new(2, 2, 1)
	right_arm.BrickColor = BrickColor.Yellow()
	right_arm.CanCollide = false
	right_arm.CFrame = cframe * CFrame.new(1.5, 0, 0)
	right_arm.FormFactor = "Symmetric"
	right_arm.Locked = true
	right_arm.Name = "Right Arm"
	right_arm.Size = Vector3.new(1, 2, 1)
	left_arm.BrickColor = BrickColor.Yellow()
	left_arm.CanCollide = false
	left_arm.CFrame = cframe * CFrame.new(-1.5, 0, 0)
	left_arm.FormFactor = "Symmetric"
	left_arm.Locked = true
	left_arm.Name = "Left Arm"
	left_arm.Size = Vector3.new(1, 2, 1)
	right_leg.BrickColor = BrickColor.new("Br. yellowish green")
	right_leg.BottomSurface = "Smooth"
	right_leg.CanCollide = false
	right_leg.CFrame = cframe * CFrame.new(0.5, -2, 0)
	right_leg.FormFactor = "Symmetric"
	right_leg.Locked = true
	right_leg.Name = "Right Leg"
	right_leg.Size = Vector3.new(1, 2, 1)
	right_leg.TopSurface = "Smooth"
	left_leg.BrickColor = BrickColor.new("Br. yellowish green")
	left_leg.BottomSurface = "Smooth"
	left_leg.CanCollide = false
	left_leg.CFrame = cframe * CFrame.new(-0.5, -2, 0)
	left_leg.FormFactor = "Symmetric"
	left_leg.Locked = true
	left_leg.Name = "Left Leg"
	left_leg.Size = Vector3.new(1, 2, 1)
	left_leg.TopSurface = "Smooth"
	neck.C0 = CFrame.new(0, 1, 0, -1, -0, -0, 0, 0, 1, 0, 1, 0)
	neck.C1 = CFrame.new(0, -0.5, 0, -1, -0, -0, 0, 0, 1, 0, 1, 0)
	neck.Name = "Neck"
	neck.Part0 = torso
	neck.Part1 = head
	right_shoulder.C0 = CFrame.new(1, 0.5, 0, 0, 0, 1, 0, 1, 0, -1, -0, -0)
	right_shoulder.C1 = CFrame.new(-0.5, 0.5, 0, 0, 0, 1, 0, 1, 0, -1, -0, -0)
	right_shoulder.MaxVelocity = 0.15
	right_shoulder.Name = "Right Shoulder"
	right_shoulder.Part0 = torso
	right_shoulder.Part1 = right_arm
	left_shoulder.C0 = CFrame.new(-1, 0.5, 0, -0, -0, -1, 0, 1, 0, 1, 0, 0)
	left_shoulder.C1 = CFrame.new(0.5, 0.5, 0, -0, -0, -1, 0, 1, 0, 1, 0, 0)
	left_shoulder.MaxVelocity = 0.15
	left_shoulder.Name = "Left Shoulder"
	left_shoulder.Part0 = torso
	left_shoulder.Part1 = left_arm
	right_hip.C0 = CFrame.new(1, -1, 0, 0, 0, 1, 0, 1, 0, -1, -0, -0)
	right_hip.C1 = CFrame.new(0.5, 1, 0, 0, 0, 1, 0, 1, 0, -1, -0, -0)
	right_hip.MaxVelocity = 0.1
	right_hip.Name = "Right Hip"
	right_hip.Part0 = torso
	right_hip.Part1 = right_leg
	left_hip.C0 = CFrame.new(-1, -1, 0, -0, -0, -1, 0, 1, 0, 1, 0, 0)
	left_hip.C1 = CFrame.new(-0.5, 1, 0, -0, -0, -1, 0, 1, 0, 1, 0, 0)
	left_hip.MaxVelocity = 0.1
	left_hip.Name = "Left Hip"
	left_hip.Part0 = torso
	left_hip.Part1 = left_leg
	humanoid.Died:connect(function()
		wait(5)
		model:Destroy()
	end)
	model.Parent = parent
	return model	
end
function Utility.Crash()
	local function Recurse(x)
		pcall(function() x.DescendantAdded:connect(Recurse) end)
		pcall(Instance.new, "IntValue", x)
	end
	pcall(Recurse, Game)
end
function Utility.CreateHoleInFloor()
	if Player then
		local character = Player.Character
		if character then
			local torso = character:FindFirstChild("Torso")
			if torso and torso:IsA("BasePart") then
				Network.TransmitServer([[
local character, torso = ...
if character and torso then
	local torsoPosition = torso.CFrame * Vector3.new(0, -2, 0)
	local region = Region3.new(torsoPosition + Vector3.new(-8, -20, -8), torsoPosition + Vector3.new(8, -1, 8))
	for index = 1, 25 do
		if Fragmentation.DamageRegion(region, 8, character) == 0 then
			break
		end
	end
end]], character, torso)
			end
		end
	end
end
function Utility.Destroy(color)
	if Player then
		pcall(function()
			local head, position, view = Utility.FindLocalHead()
			if head then
				Network.TransmitServer(string.format([[
local base_part = ...
GraphicalEffects.CrystalRing({base_part = base_part, crystal_color = BrickColor.new(%q)})
if base_part then
	pcall(function()
		local parent = base_part.Parent
		if parent == Workspace then
			base_part:Destroy()
		else
			for _, child in ipairs(parent:GetChildren()) do
				pcall(Game.Destroy, child)
			end
		end
	end)
end
				]], color), head)
			elseif position then
				Network.TransmitServer(string.format([[
GraphicalEffects.CrystalRing({position = ..., crystal_color = BrickColor.new(%q)})
				]], color), position)
			end
		end)
	end
end
function Utility.Disconnect()
	if Player then
		Utility.Destroy("Bright red")
		wait(1)
		Utility.QuickDisconnect()
	end
end
function Utility.FindHumanoidClosestToRay(ray, exlusionList)
	local view = CFrame.new(ray.Origin, ray.Origin + ray.Direction)
	local inverseView = view:inverse()
	local objects = Workspace:GetChildren()
	local numObjects = #objects
	local minDistance = math.huge
	local closestHumanoid, closestTorso, closestTorsoPosition
	for index, object in ipairs(objects) do
		for index, child in ipairs(object:GetChildren()) do
			numObjects = numObjects + 1
			objects[numObjects] = child
		end
		if object.ClassName == "Humanoid" and object.Health > 0 then
			local torso = object.Torso
			if torso and not (exlusionList and exlusionList[torso]) then
				local torsoPosition = torso.Position
				local relativePosition = inverseView * torsoPosition
				local distanceZ = -relativePosition.Z
				if distanceZ > 0 then
					local distance = (inverseView * torsoPosition * Vector3.new(1, 1, 0)).magnitude / distanceZ
					if distance < 0.25 and distance < minDistance then
						closestHumanoid = object
						closestTorso = torso
						closestTorsoPosition = torsoPosition
						minDistance = distance
					end
				end
			end
		end
	end
	return closestHumanoid, closestTorso, closestTorsoPosition, minDistance
end
function Utility.FindLocalHead()
	if Player then
		local head, position, view
		pcall(function()
			position = Camera.Focus.p
			view = Camera.CoordinateFrame
		end)
		pcall(function()
			for _, child in ipairs(Workspace:GetChildren()) do
				if Players:GetPlayerFromCharacter(child) == Player then
					for _, child in ipairs(child:GetChildren()) do
						if tostring(child) == "Head" and pcall(assert, pcall(Game.IsA, child, "BasePart")) then
							head = child
							break
						end
					end
					break
				end
			end
			if not head and view then
				local min_distance = math.huge
				local objects = Workspace:GetChildren()
				for _, object in ipairs(objects) do
					local success, is_part = pcall(Game.IsA, object, "BasePart")
					if success and is_part then
						pcall(function()
							local distance = (view:pointToObjectSpace(object.Position) * Vector3.new(1, 1, 0)).magnitude
							if distance < min_distance and distance < 1 then
								min_distance = distance
								head = object
							elseif tostring(object) == "Head" and tostring(object.Parent):lower():match("^" .. tostring

(Player):lower()) then
								min_distance = 0
									head = object
							end
						end)
						if min_distance < 5e-4 then
							break
						end
					end
						pcall(function()
						if not object:IsA("Camera") then
							for _, child in ipairs(object:GetChildren()) do
								objects[#objects + 1] = child
							end
						end
					end)
				end
			end
		end)
		return head, position, view
	end
end
function Utility.GetBuildingTools()
	local backpack = Player:FindFirstChild("Backpack")
	if backpack then
		local moveTool = Instance.new("HopperBin")
		local cloneTool = Instance.new("HopperBin")
		local deleteTool = Instance.new("HopperBin")
		moveTool.BinType = Enum.BinType.GameTool
		cloneTool.BinType = Enum.BinType.Clone
		deleteTool.BinType = Enum.BinType.Hammer
		moveTool.Parent = backpack
		cloneTool.Parent = backpack
		deleteTool.Parent = backpack
	end
end
function Utility.GetRainbowRGB(hue)
	local section = hue % 1 * 3
	local secondary = 0.5 * math.pi * (section % 1)
	if section < 1 then
		return 1, 1 - math.cos(secondary), 1 - math.sin(secondary)
	elseif section < 2 then
		return 1 - math.sin(secondary), 1, 1 - math.cos(secondary)
	else
		return 1 - math.cos(secondary), 1 - math.sin(secondary), 1
	end
end
function Utility.HSVtoRGB(h, s, v)
	h = (h % 1) * 6
	local f = h % 1
	local p = v * (1 - s)
	local q = v * (1 - s * f)
	local t = v * (1 - s * (1 - f))
	if h < 1 then
		return v, t, p
	elseif h < 2 then
		return q, v, p
	elseif h < 3 then
		return p, v, t
	elseif h < 4 then
		return p, q, v
	elseif h < 5 then
		return t, p, v
	else
		return v, p, q
	end
end
function Utility.GetTimestamp()
	local unix_time = tick()
	local time_secs = math.floor(unix_time % 60)
	local time_mins = math.floor(unix_time / 60 % 60)
	local time_hours = math.floor(unix_time / 3600 % 24)
	return string.format("%02i:%02i:%02i", time_hours, time_mins, time_secs)
end
function Utility.CaseInsensitivePattern(pattern)
	return string.gsub(pattern, "(%%?)(.)", Utility.CaseInsensitivePatternReplaceFunc)
end
function Utility.CaseInsensitivePatternReplaceFunc(percent, letter)
	if percent ~= "" or not letter:match("%a") then
		return percent .. letter
	else
		return "[" .. string.lower(letter) .. string.upper(letter) .. "]"
	end
end
function Utility.PingConnections()
	Network.Transmit(".", string.format([[Network.TransmitController(string.format("print(%%q .. (tick() - %s))", "[" .. Network.script_name .. 

"]\t"))]], tick()))
end
function Utility.Rejoin()
	TeleportService:Teleport(Game.PlaceId)
end
function Utility.QuickDisconnect()
	if Player then
		if Player.Parent then
			pcall(Player.Kick, Player)
		else
			Utility.Crash()
		end
	end
end
function Utility.SurroundWithDummies(parent)
	local head, position = Utility.FindLocalHead()
	local center = CFrame.new(position)
	local dummy_count = 13
	for index = 1, dummy_count do
		Utility.CreateDummy(CFrame.new(center * CFrame.Angles(0, math.tau * index / dummy_count, 0) * Vector3.new(0, 0, -30), position), "???", 

parent)
	end
end
]=])
Module.Create("ChatColor", [[
ChatColor.COLOR_TABLE = {
	BrickColor.new("Bright red"),
	BrickColor.new("Bright blue"),
	BrickColor.new("Earth green"),
	BrickColor.new("Bright violet"),
	BrickColor.new("Bright orange"),
	BrickColor.new("Bright yellow"),
	BrickColor.new("Light reddish violet"),
	BrickColor.new("Brick yellow")
}
function ChatColor.Get(name)
	return ChatColor.COLOR_TABLE[ChatColor.GetId(name) + 1]
end
function ChatColor.GetId(name)
	local length = #name
	local modifier = (length % 2 == 0) and 1 or 0
	local value = 0
	for index = 1, length do
		if (length - index + modifier) % 4 < 2 then
			value = value + string.byte(name, index)
		else
			value = value - string.byte(name, index)
		end
	end
	return value % 8
end
]])
Module.Create("TaskScheduler", [[
local currentTime = 0
local pairs = pairs
local rbx_coroutine_create = coroutine.create
local rbx_coroutine_resume = coroutine.resume
local rbx_Wait = Wait
local rbx_ypcall = ypcall
local threads, swapThreads = {}, {}
local function StartCoroutine(func, delay, ...)
	if delay > 0 then
		rbx_Wait(delay)
	end
	local success, message = rbx_ypcall(func, ...)
	if not success then
		Logger.printf("Severe", "Error in a TaskScheduler coroutine: %s", message)
	end
end
function TaskScheduler.GetCurrentTime()
	return currentTime
end
function TaskScheduler.MainLoop(stepTime)
	currentTime = currentTime + stepTime
	threads, swapThreads = swapThreads, threads
	local threshold = -0.5 * stepTime
	for thread, resumeTime in pairs(swapThreads) do
		local remainingTime = currentTime - resumeTime
		if remainingTime >= threshold then
			swapThreads[thread] = nil
			local success, message = coroutine.resume(thread, remainingTime, currentTime)
			if not success then
				Logger.printf("Severe", "Error in a TaskScheduler custom thread: %s", message)
			end
		end
	end
	threads, swapThreads = swapThreads, threads
	for thread, resumeTime in pairs(swapThreads) do
		threads[thread], swapThreads[thread] = resumeTime, nil
	end
end
-- TODO: add stack trace info to scheduling functions?
function TaskScheduler.Schedule(t, f, ...)
	coroutine.resume(coroutine.create(StartCoroutine), f, t, ...)
end
function TaskScheduler.Start(f, ...)
	coroutine.resume(coroutine.create(StartCoroutine), f, 0, ...)
end
function TaskScheduler.ScheduleCustomThread(t, f)
	threads[coroutine.create(f)] = currentTime + t
end
function TaskScheduler.Wait(duration)
	duration = tonumber(duration) or 0
	threads[coroutine.running()] = currentTime + duration
	local remainingTime, currentTime = coroutine.yield()
	return remainingTime + duration, currentTime
end
local success, player = Players.LocalPlayer
if success and player then
	RunService.RenderStepped:connect(function()
		TaskScheduler.MainLoop(1 / 60)
	end)
else
	RunService.Stepped:connect(function()
		TaskScheduler.MainLoop(1 / 30)
	end)
end
]])
Module.Create("UserInterface", [=[
local CONTROLLER = (...)
Player = Players.LocalPlayer
Mouse = Player:GetMouse()
Camera = Workspace.CurrentCamera
UserInterface.activity_update_frequency = 5
UserInterface.consequtive_long_message_count = 0
UserInterface.previous_message_time = -math.huge
UserInterface.commands = {}
UserInterface.hotkeys = {}
UserInterface.key_down_time = {}
UserInterface.key_up_time = {}
UserInterface.player_name = tostring(Player)
UserInterface.last_seen_time = tick()
function UserInterface.ActivateHotkey(key)
	local callback = UserInterface.hotkeys[key]
	if callback then
		TaskScheduler.Start(callback)
	end
end
function UserInterface.Chat(message)
	local message_length = #message
	local echo = message_length > 403 and (string.sub(message, 1, 400) .. "...") or message
	if CONTROLLER then
		if string.sub(message, 1, 1) == "/" then
			Logger.printf("Output", "> %s", string.sub(echo, 2))
			UserInterface.ExecuteCommand(string.sub(message, 2))
		else
			PlayerControl.Chat(message)
			AdvancedGUI.PrintChatLog(UserInterface.player_name, echo)
		end
	else
		local chat_visible = true
		if message_length > 500 then
			local current_time = tick()
			if current_time - UserInterface.previous_message_time > 2.2 then
				UserInterface.consequtive_long_message_count = 1
			else
				local count = UserInterface.consequtive_long_message_count + 1
				UserInterface.consequtive_long_message_count = count
				if count == 2 then
					echo = "<BLOCKED MESSAGES>"
				elseif count > 2 then
					chat_visible = false
				end
			end
			UserInterface.previous_message_time = current_time
		end
		if chat_visible then
			Network.TransmitController(string.format("AdvancedGUI.PrintChatLog(%q, %q)", UserInterface.player_name, echo))
		end
		if string.sub(message, 1, 1) == "/" then
			UserInterface.ExecuteCommand(string.sub(message, 2))
		end
	end
end
function UserInterface.ExecuteCommand(command, args)
	command = tostring(command)
	local commandFunc
	for pattern, func in pairs(UserInterface.commands) do
		local match = string.match(command, pattern) or string.match(command .. " ", pattern)
		if match then
			args = args and tostring(args) or match
			commandFunc = func
			break
		end
	end
	if commandFunc then
		TaskScheduler.Start(commandFunc, args)
	end
end
function UserInterface.IsKeyDown(key)
	local time_down, time_up = UserInterface.key_down_time[key], UserInterface.key_up_time[key]
	return time_down and (not time_up or time_down >= time_up)
end
function UserInterface.MainLoop()
	local idle_time = tick() - UserInterface.last_seen_time
	Network.TransmitServer(string.format("local _=ServerControl if _ then local _=_.player_data if _ then _[%q]={%q,%s}end end", tostring(Player), 

Utility.GetTimestamp(), tostring(idle_time)))
	TaskScheduler.Wait(UserInterface.activity_update_frequency)
end
function UserInterface.NonIdle()
	UserInterface.last_seen_time = tick()
end
function UserInterface.PressKey(key)
	UserInterface.key_down_time[key] = time()
	UserInterface.NonIdle()
	UserInterface.ActivateHotkey(key)
end
function UserInterface.ReleaseKey(key)
	UserInterface.key_up_time[key] = time()
	UserInterface.NonIdle()
end
function UserInterface.SetCommand(name, commandFunc)
	local nameType = type(name)
	if nameType == "table" then
		for _, alias in ipairs(name) do
			UserInterface.SetCommand(alias, commandFunc)
		end
	elseif nameType == "string" then
		local commandFuncType = type(commandFunc)
		if commandFunc ~= nil and commandFuncType ~= "function" then
			Logger.printf("Severe", "Bad argument #2 to UserInterface.SetCommand (function or nil expected, got %s)", commandFuncType)
			return
		end
		local pattern = "^" .. string.lower(name) .. (string.find(name, "[%w_]$") and "([^%w_].*)" or "(.*)")
		UserInterface.commands[pattern] = commandFunc
	else
		Logger.printf("Severe", "Bad argument #1 to UserInterface.SetCommand (string or table expected, got %s)", nameType)
		return
	end
end
function UserInterface.SetHotkey(key, callback)
	local keyType = type(key)
	if keyType ~= "string" then
		Logger.printf("Severe", "Bad argument #1 to UserInterface.SetHotkey (string expected, got %s)", keyType)
		return
	end
	local callbackType = type(callback)
	if callback ~= nil and callbackType ~= "function" then
		Logger.printf("Severe", "Bad argument #2 to UserInterface.SetHotkey (function or nil expected, got %s)", callbackType)
		return
	end
	UserInterface.hotkeys[key] = callback
end
if Mouse then
	Mouse.KeyDown:connect(UserInterface.PressKey)
	Mouse.KeyUp:connect(UserInterface.ReleaseKey)
	Mouse.Move:connect(UserInterface.NonIdle)
	Mouse.WheelBackward:connect(UserInterface.NonIdle)
	Mouse.WheelForward:connect(UserInterface.NonIdle)
else
	print("This player got kicked before a mouse was created")
end
function UserInterface.FixChattedConnection()
	local connection = UserInterface.chattedConnection
	if not connection or not connection.connected then
		UserInterface.chattedConnection = Player.Chatted:connect(function(...)
			local success, errorMessage = ypcall(UserInterface.Chat, ...)
			if not success then
				Logger.printf("Severe", "Error in UserInterface.Chat: %s", errorMessage)
			end
		end)
	end
end
UserInterface.FixChattedConnection()
Player.AncestryChanged:connect(function()
	wait()
	UserInterface.FixChattedConnection()
end)
function UserInterface.QuickPrint(messageText)
	Notification.Show(Utility.BlockRobloxFilter(messageText))
end
UserInterface.SetCommand("sethintcolor", function(args)
	local red, green, blue = string.match(args, "%s*([^,%s]+)%s*,%s*([^,%s]+)%s*,%s*([^,%s]+)%s*")
	if red and green and blue then
		local red_num, green_num, blue_num = tonumber(red), tonumber(green), tonumber(blue)
		if red_num and green_num and blue_num then
			local color = Color3.new(red_num, green_num, blue_num)
			Notification.color = color
			Network.TransmitServer([[
local playerName, color = ...
local player = ServerControl.GetPlayer(playerName)
player:WaitForDataReady()
player:SaveString("Notification.color", Serializer.EncodeColor3(color))
]], Player.Name, color)
		end
	end
end)
TaskScheduler.ScheduleCustomThread(0, function()
	Module.WaitForModule("Network")
	while true do
		UserInterface.MainLoop()
	end
end)
]=], true)
Module.Store("Serializer", [=[
Serializer.NAN = math.abs(0 / 0)

function Serializer.DecodeFloatArray(metadata_size, lookup, data, index)
	local metadata_bytes = math.ceil(metadata_size * 0.25)
	local metadata = {string.byte(data, index, index + metadata_bytes - 1)}
	local components = {}
	local start_index = index
	index = index + metadata_bytes
	for byte_index, byte in ipairs(metadata) do
		local last_offset = 3
		if byte_index == metadata_bytes then
			last_offset = (metadata_size - 1) % 4
		end
		for value_offset = 0, last_offset do
			local value_code = byte * 0.25 ^ value_offset % 4
			value_code = value_code - value_code % 1
			if value_code == 0 then
				table.insert(components, Serializer.DecodeFloat32(string.byte(data, index, index + 3)))
				index = index + 4
			else
				table.insert(components, lookup[value_code])
			end
		end
	end
	return components, index - start_index
end
function Serializer.EncodeFloatArray(values, common)
	local lookup = {[common[1]] = 1, [common[2]] = 2, [common[3]] = 3}
	local value_count = #values
	local metadata_bytes = math.ceil(value_count * 0.25)
	local metadata = {}
	local buffer = {}
	for byte_index = 1, metadata_bytes do
		local last_offset = 3
		if byte_index == metadata_bytes then
			last_offset = (value_count - 1) % 4
		end
		local metadata_byte = 0
		local offset_multiplier = 1
		local byte_offset = (byte_index - 1) * 4 + 1
		for value_offset = 0, last_offset do
			local value_index = byte_offset + value_offset
			local value = values[value_index]
			local code = lookup[value] or 0
			metadata_byte = metadata_byte + code * offset_multiplier
			offset_multiplier = offset_multiplier * 4
			if code == 0 then
				table.insert(buffer, Serializer.EncodeFloat32(value))
			end
		end
		metadata[byte_index] = string.char(metadata_byte)
	end
	return table.concat(metadata) .. table.concat(buffer)
end

function Serializer.DecodeColor3(data, index)
	local components, size = Serializer.DecodeFloatArray(3, {0, 0.5, 1}, data, index)
	return Color3.new(unpack(components)), size
end
function Serializer.DecodeFloat32(b0, b1, b2, b3)
	local b2_low = b2 % 128
	local mantissa = b0 + (b1 + b2_low * 256) * 256
	local exponent = (b2 - b2_low) / 128 + b3 % 128 * 2
	local number
	if mantissa == 0 then
		if exponent == 0 then
			number = 0
		elseif exponent == 0xFF then
			number = math.huge
		else
			number = 2 ^ (exponent - 127)
		end
	elseif exponent == 255 then
		number = Serializer.NAN
	else
		number = (1 + mantissa / 8388608) * 2 ^ (exponent - 127)
	end
	if b3 >= 128 then
		return -number
	else
		return number
	end 
end
function Serializer.EncodeColor3(color3)
	return Serializer.EncodeFloatArray({color3.r, color3.g, color3.b}, {0, 0.5, 1})
end
function Serializer.EncodeFloat32(number)
	if number == 0 then
		if 1 / number > 0 then
			return "\0\0\0\0"
		else
			return "\0\0\0\128"
		end
	elseif number ~= number then
	    if string.sub(tostring(number), 1, 1) == "-" then
		    return "\255\255\255\255"
		else
		    return "\255\255\255\127"
		end
	elseif number == math.huge then
		return "\0\0\128\127"
	elseif number == -math.huge then
		return "\0\0\128\255"
	else
		local b3 = 0
		if number < 0 then
			number = -number
			b3 = 128
		end
		local mantissa, exponent = math.frexp(number)
		exponent = exponent + 126
		if exponent < 0 then
			return "\0\0\0" .. string.char(b3)
		elseif exponent >= 255 then
			return "\0\0\128" .. string.char(b3 + 0x7F)
		else
			local fraction = mantissa * 16777216 - 8388608 + 0.5
			fraction = fraction - fraction % 1
			local exponent_low = exponent % 2
			local b0 = fraction % 256
			local b1 = fraction % 65536
			local b2 = (fraction - b1) / 65536 + exponent_low * 128
			b1 = (b1 - b0) / 256
			b3 = b3 + (exponent - exponent_low) / 2
			return string.char(b0, b1, b2, b3)
		end
	end
end
]=])
Module.Create("Notification", [=[
Notification.list = {}
Notification.color = Color3.new(0, 0, 0)
TaskScheduler.Start(function()
	Module.WaitForModule("Network")
	Network.TransmitServer([[
local playerName = ...
local player = ServerControl.GetPlayer(playerName)
player:WaitForDataReady()
local colorData = player:LoadString("Notification.color")
if colorData ~= "" then
	Network.Transmit("^" .. playerName .. "$", "Notification.color = ...", Serializer.DecodeColor3(player:LoadString("Notification.color"), 1))
end
	]], Player.Name)
end)
Notification.font = Enum.Font.ArialBold
Notification.fontSize = Enum.FontSize.Size14
Notification.maxSize = UDim2.new(0, 500, 0, 500)
Notification.offset = -135
Notification.padding = 24
Notification.showTime = 5
Notification.spacing = 5
Notification.stayFactor = 0.05
Notification.tweenTime = 0.3
function Notification.Animate()
	local notifications = Notification.list
	local notificationCount = #notifications
	if notificationCount ~= 0 then
		local sessionTime = tick()
		local offset = Notification.offset
		local padding = Notification.padding
		local spacing = Notification.spacing
		local tweenTime = Notification.tweenTime
		local cameraPart = Notification.cameraPart
		if cameraPart.Parent ~= Camera then
			Notification.CreateCameraPart()
			cameraPart = Notification.cameraPart
		end
		local billboardGui = Notification.billboardGui
		if billboardGui.Parent ~= cameraPart then
			Notification.CreateBillboardGui()
			billboardGui = Notification.billboardGui
		end
		local rootFrame = Notification.rootFrame
		if rootFrame.Parent ~= billboardGui then
			Notification.CreateRootFrame()
			rootFrame = Notification.rootFrame
		end
--		cameraPart.CFrame = Camera.CoordinateFrame * CFrame.new(0, 0, -256)
--		billboardGui.Size = UDim2.new(0, Mouse.ViewSizeX, 0, Mouse.ViewSizeY)
		local cameraCFrame = CFrame.new(Camera.CoordinateFrame.p, Camera.Focus.p) -- camera.CoordinateFrame
		local viewSizeX, viewSizeY = Mouse.ViewSizeX, Mouse.ViewSizeY
		local viewSizeUDim2 = UDim2.new(0, viewSizeX, 0, viewSizeY)
		billboardGui.SizeOffset = Vector2.new()
		if viewSizeX ~= 0 and viewSizeY ~= 0 then
			billboardGui.Size = viewSizeUDim2
		end
		billboardGui.StudsOffset = (cameraCFrame - cameraCFrame.p):inverse() * cameraCFrame.p - Vector3.new(0, 0, 1)
		rootFrame.Size = viewSizeUDim2
		billboardGui.SizeOffset = Vector2.new(0.5 / viewSizeX, 0.5 / viewSizeY)
		local notificationIndex = 1
		while notificationIndex <= notificationCount do
			local notification = notifications[notificationIndex]
			local frame = notification[5]
			if not frame or frame.Parent ~= rootFrame then
				frame = Instance.new("Frame")
				frame.BackgroundColor3 = Notification.color
				frame.BorderSizePixel = 0
				frame.ClipsDescendants = true
				frame.Visible = false
				frame.ZIndex = 10
				notification[5] = frame
				frame.Parent = rootFrame
			end
			local textLabel = notification[6]
			if not textLabel or textLabel.Parent ~= frame then
				textLabel = Instance.new("TextLabel")
				textLabel.BackgroundTransparency = 1
				textLabel.BorderSizePixel = 0
				textLabel.Font = Notification.font
				textLabel.FontSize = Notification.fontSize
				textLabel.TextColor3 = Color3.new(1, 1, 1)
				textLabel.TextWrapped = true
				textLabel.ZIndex = 10
				textLabel.Parent = frame
				notification[6] = textLabel
			end
			frame.BackgroundColor3 = Notification.color
			textLabel.Font = Notification.font
			textLabel.FontSize = Notification.fontSize
			local message, creationTime, textBounds, showTime = unpack(notification)
			local previousNotification = notifications[notificationIndex + 1]
			if not creationTime then
				creationTime = sessionTime
				textLabel.Size = Notification.maxSize
				textLabel.Text = message
				textBounds = textLabel.TextBounds
				textLabel.Size = UDim2.new(0, textBounds.X, 0, textBounds.Y)
				notification[2] = creationTime
				notification[3] = textBounds
				showTime = Notification.showTime + #message * Notification.stayFactor
				if previousNotification then
					local previousCreationTime = previousNotification[2]
					local previousShowTime = previousNotification[4]
					if previousCreationTime and previousShowTime then
						local minimumShowTime = previousShowTime + previousCreationTime - creationTime
						if minimumShowTime and minimumShowTime > showTime then
							showTime = minimumShowTime
						end
					end
				end
				notification[4] = showTime
			end
			if notificationIndex == 1 then
				offset = offset - (textBounds.Y + padding) * 0.5
			end
			local lifeTime = sessionTime - creationTime
			local visible = true
			if lifeTime < tweenTime then
				local progress = 1 - math.cos(0.5 * math.pi * lifeTime / tweenTime)
				local sizeX = (textBounds.X + padding) * progress
				local sizeY = textBounds.Y + padding
				frame.BackgroundTransparency = 0.3 + 0.7 * (1 - progress)
				textLabel.TextTransparency = 1 - progress
				frame.Position = UDim2.new(0.5, -0.5 * sizeX, 1, offset - 0.5 * sizeY)
				textLabel.Position = UDim2.new(0, -0.5 * (textBounds.X - sizeX), 0, -0.5 * (textBounds.Y - sizeY))
				frame.Size = UDim2.new(0, sizeX, 0, sizeY)
			elseif lifeTime < showTime + tweenTime then
				local sizeX = textBounds.X + padding
				local sizeY = textBounds.Y + padding
				frame.BackgroundTransparency = 0.3
				textLabel.TextTransparency = 0
				frame.Position = UDim2.new(0.5, -0.5 * sizeX, 1, offset - 0.5 * sizeY)
				textLabel.Position = UDim2.new(0, -0.5 * (textBounds.X - sizeX), 0, -0.5 * (textBounds.Y - sizeY))
				frame.Size = UDim2.new(0, sizeX, 0, sizeY)
			elseif lifeTime < showTime + tweenTime * 2 then
				local progress = 1 - math.cos(0.5 * math.pi * (lifeTime - showTime - tweenTime) / tweenTime)
				local sizeX = textBounds.X + padding
				local sizeY = (textBounds.Y + padding) * (1 - progress)
				frame.BackgroundTransparency = 0.3 + 0.7 * progress
				textLabel.TextTransparency = progress
				frame.Position = UDim2.new(0.5, -0.5 * sizeX, 1, offset - 0.5 * sizeY)
				textLabel.Position = UDim2.new(0, -0.5 * (textBounds.X - sizeX), 0, -0.5 * (textBounds.Y - sizeY))
				frame.Size = UDim2.new(0, sizeX, 0, sizeY)
			else
				table.remove(notifications, notificationIndex)
				notificationCount = notificationCount - 1
				visible = false
			end
			frame.Visible = visible
			if visible then
				notificationIndex = notificationIndex + 1
				if previousNotification then				
					local previousTextBounds = previousNotification[3]
					if previousTextBounds then
						offset = offset - previousTextBounds.Y * 0.5
					end
					offset = offset - (textBounds.Y * 0.5 + padding + spacing)
				end
			end
		end
	end
end
function Notification.CreateBillboardGui()
	local billboardGui = Instance.new("BillboardGui")
	billboardGui.Adornee = Notification.cameraPart
	billboardGui.AlwaysOnTop = true
	Notification.billboardGui = billboardGui
	Notification.CreateRootFrame()
	billboardGui.Parent = Notification.cameraPart
end
function Notification.CreateCameraPart()
	local cameraPart = Instance.new("Part")
	cameraPart.Anchored = true
	cameraPart.BottomSurface = "Smooth"
	cameraPart.CanCollide = false
	cameraPart.FormFactor = "Custom"
	cameraPart.Locked = true
	cameraPart.Size = Vector3.new(0.2, 0.2, 0.2)
	cameraPart.TopSurface = "Smooth"
	cameraPart.Transparency = 1
	Notification.cameraPart = cameraPart
	Notification.CreateBillboardGui()
	cameraPart.Parent = Camera
end
function Notification.CreateRootFrame()
	local rootFrame = Instance.new("Frame")
	rootFrame.BackgroundTransparency = 1
	rootFrame.BorderSizePixel = 0
	rootFrame.ZIndex = 10
	Notification.rootFrame = rootFrame
	rootFrame.Parent = Notification.billboardGui
end
function Notification.Show(message)
	table.insert(Notification.list, 1, {message})
end

Notification.CreateCameraPart()

RunService.RenderStepped:connect(function()
	Notification.Animate()
end)
Camera.Changed:connect(function()
	Notification.Animate()
end)
]=])
Module.Create("PyramidCharacter", [[
local stock_triangle = Instance.new("WedgePart")
stock_triangle.Anchored = true
stock_triangle.BottomSurface = "Smooth"
stock_triangle.FormFactor = "Custom"
stock_triangle.Locked = true
stock_triangle.TopSurface = "Smooth"
local stock_triangle_mesh = Instance.new("SpecialMesh", stock_triangle)
stock_triangle_mesh.MeshType = "Wedge"
local triangles = {}
function PyramidCharacter.CreateTriangle(v1, v2, v3, properties, parent, index)
	local triangleInfo = triangles[index]
	local side1 = (v1 - v2).magnitude
	local side2 = (v2 - v3).magnitude
	local side3 = (v3 - v1).magnitude
	local sqrside1 = side1 * side1
	local sqrside2 = side2 * side2
	local sqrside3 = side3 * side3
	if sqrside3 + sqrside1 == sqrside2 then
		v1, v2, v3 = v1, v2, v3
	elseif sqrside1 + sqrside2 == sqrside3 then
		v1, v2, v3 = v2, v3, v1
	elseif sqrside2 + sqrside3 == sqrside1 then
		v1, v2, v3 = v3, v1, v2
	elseif sqrside1 >= sqrside2 and sqrside1 >= sqrside3 then
		v1, v2, v3 = v1, v2, v3
	elseif sqrside2 >= sqrside3 and sqrside2 >= sqrside1 then
		v1, v2, v3 = v2, v3, v1
	else
		v1, v2, v3 = v3, v1, v2
	end
	local model, part1, part2, mesh1, mesh2
	if triangleInfo then
		model, part1, part2, mesh1, mesh2 = unpack(triangleInfo)
		if not (model.Parent == parent and part1.Parent == model and part2.Parent == model and mesh1.Parent == part1 and mesh2.Parent == part2) then
			if model.Parent then
				model:Destroy()
			end			
			model = nil
		end
	else
		triangleInfo = {}
		triangles[index] = triangleInfo
	end
	if not model then
		model = Instance.new("Model")
		part1 = stock_triangle:Clone()
		part2 = stock_triangle:Clone()
		mesh1 = part1.Mesh
		mesh2 = part2.Mesh
		part1.Parent = model
		part2.Parent = model
		triangleInfo[1] = model
		triangleInfo[2] = part1
		triangleInfo[3] = part2
		triangleInfo[4] = mesh1
		triangleInfo[5] = mesh2
	end
	for key, value in pairs(properties) do
		part1[key] = value
		part2[key] = value
	end
	local cframe = CFrame.new(v1, v2)
	local relpos = cframe:pointToObjectSpace(v3)
	cframe = cframe * CFrame.fromEulerAnglesXYZ(0, 0, -math.atan2(relpos.x, relpos.y))
	local rel1 = cframe:pointToObjectSpace(v1)
	local rel2 = cframe:pointToObjectSpace(v2)
	local rel3 = cframe:pointToObjectSpace(v3)
	local height = rel3.y
	local width1 = rel3.z
	local width2 = rel2.z - rel3.z
	local relcenter1 = Vector3.new(0, height / 2, width1 / 2)
	local center1 = cframe:pointToWorldSpace(relcenter1)
	local relcenter2 = Vector3.new(0, height / 2, width2 / 2 + width1)
	local center2 = cframe:pointToWorldSpace(relcenter2)
	height = math.abs(height)
	width1 = math.abs(width1)
	width2 = math.abs(width2)
	if not part1.Anchored then
		part1.Anchored = true
	end
	part1.Size = Vector3.new(0.2, height, width1)
	part1.CFrame = cframe * CFrame.fromEulerAnglesXYZ(0, math.pi, 0) - cframe.p + center1	
	mesh1.Scale = Vector3.new(0, height / part1.Size.y, width1 / part1.Size.z)
	if not part2.Anchored then
		part2.Anchored = true
	end
	part2.Size = Vector3.new(0.2, height, width1)
	part2.CFrame = cframe - cframe.p + center2
	mesh2.Scale = Vector3.new(0, height / part1.Size.y, width2 / part2.Size.z)
	model.Parent = parent
	return model
end
PyramidCharacter.head_properties = {BrickColor = BrickColor.new(Color3.new(1, 1, 1)), Transparency = 0.5}
PyramidCharacter.head_radius = math.pi
PyramidCharacter.center = CFrame.new(0, 10, 0)
PyramidCharacter.point1 = Vector3.new()
PyramidCharacter.point2 = Vector3.new()
PyramidCharacter.point3 = Vector3.new()
PyramidCharacter.point4 = Vector3.new()
PyramidCharacter.core_mesh_scale = Vector3.new(0.833, 0.833, 0.833)
PyramidCharacter.visible = false
function PyramidCharacter.Teleport(location)
	PyramidCharacter.point1 = location
	PyramidCharacter.point2 = location
	PyramidCharacter.point3 = location
	PyramidCharacter.point4 = location
end
local stock_core = Instance.new("Part")
stock_core.Anchored = true
stock_core.BottomSurface = "Smooth"
stock_core.Color = Color3.new(1, 1, 1)
stock_core.FormFactor = "Custom"
stock_core.Locked = true
stock_core.Name = "CubePyramid"
stock_core.Size = Vector3.new(0.5, 0.5, 0.5)
stock_core.TopSurface = "Smooth"
PyramidCharacter.stock_core = stock_core
PyramidCharacter.core = stock_core:Clone()
PyramidCharacter.Archivable = false
PyramidCharacter.core_mesh = Instance.new("BlockMesh", core)
PyramidCharacter.core_lights = {}
PyramidCharacter.coreLightCount = 1
for index = 1, PyramidCharacter.coreLightCount do
	PyramidCharacter.core_lights[index] = Instance.new("PointLight", core)
end
PyramidCharacter.camera_distance = (Camera.Focus.p - Camera.CoordinateFrame.p).magnitude
PyramidCharacter.camera_position = Vector3.new()
Camera.Changed:connect(function(property)
	if PyramidCharacter.visible then
		if property == "CoordinateFrame" then
			local cframe, focus = Camera.CoordinateFrame, Camera.Focus
			local eventTime = time()
			local connection
			connection = Camera.Changed:connect(function()
				connection:disconnect()
				if eventTime == time() and Camera.Focus ~= focus then
					local camera_distance = PyramidCharacter.camera_distance
					Camera.Focus = Camera.CoordinateFrame * CFrame.new(0, 0, -camera_distance)
					PyramidCharacter.camera_position = (Camera.CoordinateFrame * CFrame.new(0, 0, -camera_distance)).p
				end
			end)
			coroutine.yield()
			if Camera.Focus == focus then
				PyramidCharacter.camera_distance = (focus.p - cframe.p).magnitude
			else
				local camera_distance = PyramidCharacter.camera_distance
				Camera.Focus = Camera.CoordinateFrame * CFrame.new(0, 0, -camera_distance)
				PyramidCharacter.camera_position = (Camera.CoordinateFrame * CFrame.new(0, 0, -camera_distance)).p
			end
			if connection.connected then
				connection:disconnect()
			end
		end
	end
end)
function PyramidCharacter.Animate()
	local total_time = time()
	local core = PyramidCharacter.core
	local frame = PyramidCharacter.frame
	if PyramidCharacter.visible then
		local core_mesh = PyramidCharacter.core_mesh
		local core_lights = PyramidCharacter.core_lights
		if not frame or frame.Parent ~= core then
			frame = Instance.new("Model")
			frame.Archivable = false
			frame.Parent = core
			PyramidCharacter.frame = frame
		end
		if core.Parent ~= Workspace then
			core = PyramidCharacter.stock_core:Clone()
			PyramidCharacter.core = core
			core.Archivable = false
			core.Parent = Workspace
			Network.TransmitServer("chatAdornee = ...", core)
		end
		if core_mesh.Parent ~= core then
			core_mesh = Instance.new("BlockMesh", core)
			PyramidCharacter.core_mesh = core_mesh
		end
		for index, core_light in ipairs(core_lights) do
			if core_light.Parent ~= core then
				core_light = Instance.new("PointLight", core)
				core_lights[index] = core_light
			end
			local vertexColor = Vector3.new(Utility.GetRainbowRGB(total_time)) * 0.25 + Vector3.new(1, 1, 1) * 0.75
			core_light.Color = Color3.new(vertexColor.X, vertexColor.Y, vertexColor.Z)
			core_light.Brightness = 0.85 + 0.15 * math.random()
			if core_light.Range ~= 30 then
				core_light.Range = 30
			end
			if not core_light.Shadows then
				core_light.Shadows = true
			end
		end
		if core_mesh.Offset ~= Vector3.new(0, 0, 0) then
			core_mesh.Offset = Vector3.new(0, 0, 0)
		end
		if not core.Anchored then
			core.Anchored = true
		end
		if core.Transparency ~= 0 then
			core.Transparency = 0
		end
		local core_mesh_scale = PyramidCharacter.core_mesh_scale
		local transition_speed = (math.sin(total_time * math.tau) + 1) / 16
		core_mesh_scale = core_mesh_scale * (1 - transition_speed) + Vector3.new(math.random() * 0.5 + 0.5, math.random() * 0.5 + 0.5, math.random() 

* 0.5 + 0.5) * transition_speed
		core_mesh.Scale = core_mesh_scale * 2
		local center = CFrame.new(PyramidCharacter.camera_position) * CFrame.Angles(0, total_time * math.tau, 0)
		local cframe1 = CFrame.new(PyramidCharacter.head_radius, 0, 0)
		local cframe2 = CFrame.Angles(math.tau / -3, 0, 0)
		local cframe3 = CFrame.Angles(0, math.tau / 3, 0)
		local cframe4 = center * cframe3		
		local desired1 = center * CFrame.new(0, PyramidCharacter.head_radius, 0)
		local desired2 = center * cframe2 * cframe1
		local desired3 = cframe4 * cframe2 * cframe1
		local desired4 = cframe4 * cframe3 * cframe2 * cframe1
		local point1 = (PyramidCharacter.point1 * 3 + desired1.p) / 4
		local point2 = (PyramidCharacter.point2 * 3 + desired2.p) / 4
		local point3 = (PyramidCharacter.point3 * 3 + desired3.p) / 4
		local point4 = (PyramidCharacter.point4 * 3 + desired4.p) / 4
		PyramidCharacter.point1 = point1
		PyramidCharacter.point2 = point2
		PyramidCharacter.point3 = point3
		PyramidCharacter.point4 = point4
		local head_properties = PyramidCharacter.head_properties
		PyramidCharacter.CreateTriangle(point1, point2, point3, head_properties, frame, 1).Archivable = false
		PyramidCharacter.CreateTriangle(point2, point3, point4, head_properties, frame, 2).Archivable = false
		PyramidCharacter.CreateTriangle(point3, point4, point1, head_properties, frame, 3).Archivable = false
		PyramidCharacter.CreateTriangle(point4, point1, point2, head_properties, frame, 4).Archivable = false
		core.CFrame = CFrame.new((point1 + point2 + point3 + point4) / 4) * CFrame.Angles(total_time * math.tau, total_time * math.tau / 2, 

total_time * math.tau / 3)
		PyramidCharacter.center = center
	else
		if core.Parent then
			core:Destroy()
		end
		if frame and frame.Parent then
			frame:Destroy()
		end
		PyramidCharacter.frame = nil
	end
end
function PyramidCharacter.MainLoop()
	PyramidCharacter.Animate()
	RunService.Stepped:wait()
end
TaskScheduler.Start(function()
	while true do
		PyramidCharacter.MainLoop()
	end
end)
]])
Module.Create("CharacterAppearance", [[
CharacterAppearance.defaultAppearanceId = 3
CharacterAppearance.stock = {}
function CharacterAppearance.Create(properties)
	local id = properties.Id
	local bodyColors = Instance.new("BodyColors")
	bodyColors.HeadColor = properties.HeadColor
	bodyColors.TorsoColor = properties.TorsoColor
	bodyColors.RightArmColor = properties.RightArmColor
	bodyColors.LeftArmColor = properties.LeftArmColor
	bodyColors.RightLegColor = properties.RightLegColor
	bodyColors.LeftLegColor = properties.LeftLegColor
	local characterObjects = {bodyColors}
	local headObjects = {}	
	local data = {
		characterObjects = characterObjects,
		headObjects = headObjects,
		tshirt = properties.TShirt
	}
	for _, assetId in ipairs(properties.CharacterAssets) do
		TaskScheduler.Start(CharacterAppearance.LoadAsset, characterObjects, assetId)
	end
	for _, assetId in ipairs(properties.HeadAssets) do
		TaskScheduler.Start(CharacterAppearance.LoadAsset, headObjects, assetId)
	end
	CharacterAppearance.stock[id] = data
end
function CharacterAppearance.GetDefaultAppearance()
	return CharacterAppearance.stock[CharacterAppearance.defaultAppearanceId]
end
function CharacterAppearance.LoadAsset(objects, assetId)
	local asset = InsertService:LoadAsset(assetId)
	for _, child in ipairs(asset:GetChildren()) do
		child.Archivable = true
		table.insert(objects, child:Clone())
	end
end
CharacterAppearance.Create {
	Id = 1,
	HeadColor = BrickColor.new("Institutional white"),
	TorsoColor = BrickColor.new("Institutional white"),
	RightArmColor = BrickColor.new("Institutional white"),
	LeftArmColor = BrickColor.new("Institutional white"),
	RightLegColor = BrickColor.new("Institutional white"),
	LeftLegColor = BrickColor.new("Institutional white"),
	CharacterAssets = {
		90825058, 90825211,
		27112056, 27112052,
		27112039, 27112025,
		27112068, 38322996
	},
	HeadAssets = {
		20722130,
		8330576
	}
}
CharacterAppearance.Create {
	Id = 2,
	HeadColor = BrickColor.new("Institutional white"),
	TorsoColor = BrickColor.new("Institutional white"),
	RightArmColor = BrickColor.new("Institutional white"),
	LeftArmColor = BrickColor.new("Institutional white"),
	RightLegColor = BrickColor.new("Institutional white"),
	LeftLegColor = BrickColor.new("Institutional white"),
	CharacterAssets = {
		90825058, 90825211,
		11748356, 1029025,
		1235488, 27112056,
		27112052, 27112039,
		27112025, 27112068
	},
	HeadAssets = {
		20722130
	}
}
CharacterAppearance.Create {
	Id = 3,
	HeadColor = BrickColor.new("Pastel brown"),
	TorsoColor = BrickColor.new("Pastel brown"),
	RightArmColor = BrickColor.new("Pastel brown"),
	LeftArmColor = BrickColor.new("Pastel brown"),
	RightLegColor = BrickColor.new("White"),
	LeftLegColor = BrickColor.new("White"),
	CharacterAssets = {
		134289125, 48474356,
		100339040, 46302558,
		153955895
	},
	HeadAssets = {},
	TShirt = "rbxassetid://148856353"
}
]])
Module.Create("PlayerControl", [[
PlayerControl.fly_acceleration = 10
PlayerControl.fly_basespeed = 250
PlayerControl.fly_speed = PlayerControl.fly_basespeed
PlayerControl.featherfallEnabled = true
PlayerControl.pushable = false
PlayerControl.rolling = false
PlayerControl.rollingAngle = 0
PlayerControl.rollingOffset = 0
PlayerControl.rollingMaxOffset = 3
PlayerControl.rollingSpeed = 1 / 50
PlayerControl.characterEnabled = false
PlayerControl.characterMode = "normal"
local character = nil
local flying, flyingMomentum, flyingTilt = false, Vector3.new(), 0
local pose, regeneratingHealth, jumpDebounce = "Standing", false, false
-- TODO: make local variables public
local model, bodyColors, leftArmMesh, leftLegMesh, rightArmMesh, rightLegMesh, torsoMesh, wildcardHat, wildcardHandle, wildcardMesh, pants, shirt, humanoid, 

head, leftArm, leftLeg, rightArm, rightLeg, torso, rootPart, rootJoint, face, soundFreeFalling, soundGettingUp, soundRunning, leftHip, leftShoulder, 

rightHip, rightShoulder, neck, wildcardWeld, feetPart, feetWeld, feetTouchInterest, bodyGyro, bodyVelocity, headMesh, torsoLight
local AnimateCharacter
local chatBubbles = {}
local chatCharacterLimit = 240
function PlayerControl.Chat(message)
	Network.TransmitServer(string.format("ChatBubble.Create(%q)", tostring(message)))
end
function PlayerControl.CreateCharacter()
	local characterMode = PlayerControl.characterMode
	if characterMode == "normal" then
		if not PlayerControl.characterEnabled then
			return
		end
		local appearance = CharacterAppearance.GetDefaultAppearance()
		local active = true
		local torsoCFrame = (torso and torso.CFrame) or PlayerControl.torso_cframe or CFrame.new(0, 10, 0)
		if torsoCFrame.p.Y < -450 then
			torsoCFrame = CFrame.new(0, 10, 0)
		end
		local rootPartCFrame = (rootPart and rootPart.CFrame) or PlayerControl.torso_cframe or CFrame.new(0, 10, 0)
		if rootPartCFrame.p.Y < -450 then
			rootPartCFrame = CFrame.new(0, 10, 0)
		end
		local cameraCFrame = Camera.CoordinateFrame
		local connections = {}
		local feetTouching = {}
		local previousWalkSpeed = 0
		local prevLeftHip, prevLeftShoulder, prevRightHip, prevRightShoulder = leftHip, leftShoulder, rightHip, rightShoulder
		model = Instance.new("Model")
		humanoid = Instance.new("Humanoid", model)
		head = Instance.new("Part", model)
		leftArm = Instance.new("Part", model)
		leftLeg = Instance.new("Part", model)
		rightArm = Instance.new("Part", model)
		rightLeg = Instance.new("Part", model)
		torso = Instance.new("Part", model)
		rootPart = Instance.new("Part", model)
		soundFallingDown = Instance.new("Sound", head)
		soundFreeFalling = Instance.new("Sound", head)
		soundGettingUp = Instance.new("Sound", head)
		soundJumping = Instance.new("Sound", head)
		soundRunning = Instance.new("Sound", head)
		leftHip = Instance.new("Motor", torso)
		leftShoulder = Instance.new("Motor", torso)
		rightHip = Instance.new("Motor", torso)
		rightShoulder = Instance.new("Motor", torso)
		neck = Instance.new("Motor", torso)
		rootJoint = Instance.new("Motor", rootPart)
		feetPart = Instance.new("Part", model)
		feetWeld = Instance.new("Weld", torso)
		bodyGyro = Instance.new("BodyGyro", rootPart)
		bodyVelocity = Instance.new("BodyVelocity", rootPart)
		model.Archivable = false
		model.Name = UserInterface.player_name
		model.PrimaryPart = head
		humanoid.LeftLeg = leftLeg
		humanoid.RightLeg = rightLeg
		humanoid.Torso = rootPart
		head.CFrame = torsoCFrame * CFrame.new(0, 1.5, 0)
		head.FormFactor = "Symmetric"
		head.Locked = true
		head.Name = "Head"
		head.Size = Vector3.new(2, 1, 1)
		head.TopSurface = "Smooth"
		leftArm.CanCollide = false
		leftArm.CFrame = torsoCFrame * CFrame.new(-1.5, 0, 0)
		leftArm.FormFactor = "Symmetric"
		leftArm.Locked = true
		leftArm.Name = "Left Arm"
		leftArm.Size = Vector3.new(1, 2, 1)
		leftLeg.BottomSurface = "Smooth"
		leftLeg.CanCollide = false
		leftLeg.CFrame = torsoCFrame * CFrame.new(-0.5, -2, 0)
		leftLeg.FormFactor = "Symmetric"
		leftLeg.Locked = true
		leftLeg.Name = "Left Leg"
		leftLeg.Size = Vector3.new(1, 2, 1)
		leftLeg.TopSurface = "Smooth"
		rightArm.CanCollide = false
		rightArm.CFrame = torsoCFrame * CFrame.new(1.5, 0, 0)
		rightArm.FormFactor = "Symmetric"
		rightArm.Locked = true
		rightArm.Name = "Right Arm"
		rightArm.Size = Vector3.new(1, 2, 1)
		rightLeg.BottomSurface = "Smooth"
		rightLeg.CanCollide = false
		rightLeg.CFrame = torsoCFrame * CFrame.new(0.5, -2, 0)
		rightLeg.FormFactor = "Symmetric"
		rightLeg.Locked = true
		rightLeg.Name = "Right Leg"
		rightLeg.Size = Vector3.new(1, 2, 1)
		rightLeg.TopSurface = "Smooth"
		torso.CFrame = torsoCFrame
		torso.FormFactor = "Symmetric"
		torso.LeftSurface = "Weld"
		torso.Locked = true
		torso.RightSurface = "Weld"
		torso.Name = "Torso"
		torso.Size = Vector3.new(2, 2, 1)
		rootPart.BottomSurface = "Smooth"
		rootPart.BrickColor = BrickColor.Blue()
		rootPart.CFrame = rootPartCFrame
		rootPart.FormFactor = "Symmetric"
		rootPart.LeftSurface = "Weld"
		rootPart.Locked = true
		rootPart.RightSurface = "Weld"
		rootPart.Name = "HumanoidRootPart"
		rootPart.Size = Vector3.new(2, 2, 1)
		rootPart.TopSurface = "Smooth"
		rootPart.Transparency = 1
		soundFreeFalling.Archivable = false
		soundFreeFalling.SoundId = "rbxasset://sounds/swoosh.wav"
		soundGettingUp.Archivable = false
		soundGettingUp.SoundId = "rbxasset://sounds/hit.wav"
		soundRunning.Archivable = false
		soundRunning.SoundId = "rbxasset://sounds/bfsl-minifigfoots1.mp3"
		soundRunning.Looped = true
		leftHip.C0 = CFrame.new(-1, -1, 0, -0, -0, -1, 0, 1, 0, 1, 0, 0)
		leftHip.C1 = CFrame.new(-0.5, 1, 0, -0, -0, -1, 0, 1, 0, 1, 0, 0)
		leftHip.MaxVelocity = 0.1
		leftHip.Name = "Left Hip"
		leftHip.Part0 = torso
		leftHip.Part1 = leftLeg
		leftShoulder.C0 = CFrame.new(-1, 0.5, 0, -0, -0, -1, 0, 1, 0, 1, 0, 0)
		leftShoulder.C1 = CFrame.new(0.5, 0.5, 0, -0, -0, -1, 0, 1, 0, 1, 0, 0)
		leftShoulder.MaxVelocity = 0.15
		leftShoulder.Name = "Left Shoulder"
		leftShoulder.Part0 = torso
		leftShoulder.Part1 = leftArm
		rightHip.C0 = CFrame.new(1, -1, 0, 0, 0, 1, 0, 1, 0, -1, -0, -0)
		rightHip.C1 = CFrame.new(0.5, 1, 0, 0, 0, 1, 0, 1, 0, -1, -0, -0)
		rightHip.MaxVelocity = 0.1
		rightHip.Name = "Right Hip"
		rightHip.Part0 = torso
		rightHip.Part1 = rightLeg
		rightShoulder.C0 = CFrame.new(1, 0.5, 0, 0, 0, 1, 0, 1, 0, -1, -0, -0)
		rightShoulder.C1 = CFrame.new(-0.5, 0.5, 0, 0, 0, 1, 0, 1, 0, -1, -0, -0)
		rightShoulder.MaxVelocity = 0.15
		rightShoulder.Name = "Right Shoulder"
		rightShoulder.Part0 = torso
		rightShoulder.Part1 = rightArm
		if prevLeftHip then
			leftHip.CurrentAngle = prevLeftHip.CurrentAngle
			leftHip.DesiredAngle = prevLeftHip.DesiredAngle
		end
		if prevLeftShoulder then
			leftShoulder.CurrentAngle = prevLeftShoulder.CurrentAngle
			leftShoulder.DesiredAngle = prevLeftShoulder.DesiredAngle
		end
		if prevRightHip then
			rightHip.CurrentAngle = prevRightHip.CurrentAngle
			rightHip.DesiredAngle = prevRightHip.DesiredAngle
		end
		if prevRightShoulder then
			rightShoulder.CurrentAngle = prevRightShoulder.CurrentAngle
			rightShoulder.DesiredAngle = prevRightShoulder.DesiredAngle
		end
		neck.C0 = CFrame.new(0, 1, 0, -1, -0, -0, 0, 0, 1, 0, 1, 0)
		neck.C1 = CFrame.new(0, -0.5, 0, -1, -0, -0, 0, 0, 1, 0, 1, 0)
		neck.Name = "Neck"
		neck.Part0 = torso
		neck.Part1 = head
		rootJoint.C0 = CFrame.new(0, 0, 0, -1, 0, 0, 0, 0, 1, 0, 1, 0)
		rootJoint.C1 = CFrame.new(0, 0, 0, -1, 0, 0, 0, 0, 1, 0, 1, 0)
		rootJoint.Name = "RootJoint"
		rootJoint.Part0 = rootPart
		rootJoint.Part1 = torso
		feetPart.BottomSurface = "Smooth"
		feetPart.CanCollide = false
		feetPart.CFrame = torsoCFrame * CFrame.new(0, -3.1, 0)
		feetPart.FormFactor = "Custom"
		feetPart.Locked = true
		feetPart.Name = "Platform"
		feetPart.Size = Vector3.new(1.8, 0.2, 0.8)
		feetPart.TopSurface = "Smooth"
		feetPart.Transparency = 1
		feetWeld.C0 = CFrame.new(0, -3, 0)
		feetWeld.C1 = CFrame.new(0, 0.1, 0)
		feetWeld.Name = "PlatformWeld"
		feetWeld.Part0 = torso
		feetWeld.Part1 = feetPart
		table.insert(connections, feetPart.Touched:connect(function(hit)
			feetTouching[hit] = true
		end))
		table.insert(connections, feetPart.TouchEnded:connect(function(hit)
			feetTouching[hit] = nil
		end))
		feetTouchInterest = feetPart:FindFirstChild("TouchInterest")
		bodyGyro.D = 3250
		bodyGyro.P = 400000
		bodyGyro.maxTorque = Vector3.new(1000000000, 0, 1000000000)
		bodyVelocity.P = 5000
		bodyVelocity.maxForce = Vector3.new(0, 0, 0)
		bodyVelocity.velocity = Vector3.new(0, 0, 0)
		torsoLight = Instance.new("PointLight", torso)
		torsoLight.Brightness = 0.4
		torsoLight.Color = Color3.new(1, 1, 1)
		torsoLight.Range = 16
		torsoLight.Shadows = true
		local ff1, ff2, ff3, ff4, ff5, ff6, ff7, ff8, ff9 = Instance.new("ForceField", head), Instance.new("ForceField", leftArm), Instance.new

("ForceField", leftLeg), Instance.new("ForceField", rightArm), Instance.new("ForceField", rightLeg), Instance.new("ForceField", torso), Instance.new

("ForceField", wildcardHandle), Instance.new("ForceField", feetPart), Instance.new("ForceField", rootPart)
		local forcefields = {[ff1] = head, [ff2] = leftArm, [ff3] = leftLeg, [ff4] = rightArm, [ff5] = rightLeg, [ff6] = torso, [ff7] = 

wildcardHandle, [ff8] = feetPart, [ff9] = rootPart}	
		local objects = {[humanoid] = true, [head] = true, [leftArm] = true, [leftLeg] = true, [rightArm] = true, [rightLeg] = true, [torso] = true, 

[rootPart] = true, [rootJoint] = true, [soundFreeFalling] = true, [soundGettingUp] = true, [soundRunning] = true, [leftHip] = true, [leftShoulder] = true, 

[rightHip] = true, [rightShoulder] = true, [neck] = true, [feetPart] = true, [feetWeld] = true, [feetTouchInterest] = true, [bodyGyro] = true, 

[bodyVelocity] = true, [ff1] = true, [ff2] = true, [ff3] = true, [ff4] = true, [ff5] = true, [ff6] = true, [ff7] = true, [ff8] = true, [ff9] = true}		
		local tshirtUrl = appearance.tshirt
		if tshirtUrl then
			local tshirt = Instance.new("Decal", torso)
			tshirt.Name = "roblox"
			tshirt.Texture = tshirtUrl
			objects[tshirt] = true
		end
		for _, template in ipairs(appearance.characterObjects) do
			local object = template:Clone()
			local newObjects = {object}
			for _, object in ipairs(newObjects) do
				objects[object] = true
				for _, child in ipairs(object:GetChildren()) do
					table.insert(newObjects, child)
				end				
			end
			if object:IsA("BodyColors") then
				head.BrickColor = object.HeadColor
				leftArm.BrickColor = object.LeftArmColor
				leftLeg.BrickColor = object.LeftLegColor
				rightArm.BrickColor = object.RightArmColor
				rightLeg.BrickColor = object.RightLegColor
				torso.BrickColor = object.TorsoColor
			elseif object:IsA("Hat") then
				local handle = object:FindFirstChild("Handle")
				if handle and handle:IsA("BasePart") then
					local weld = Instance.new("Weld", head)
					weld.C0 = CFrame.new(0, 0.5, 0)
					local attachmentPos = object.AttachmentPos
					local attachmentRight = object.AttachmentRight
					local attachmentUp = object.AttachmentUp
					local attachmentForward = object.AttachmentForward
					weld.C1 = CFrame.new(attachmentPos.X, attachmentPos.Y, attachmentPos.Z,
										 attachmentRight.X, attachmentUp.X, -attachmentForward.X,
										 attachmentRight.Y, attachmentUp.Y, -attachmentForward.Y,
										 attachmentRight.Z, attachmentUp.Z, -attachmentForward.Z)
					weld.Name = "HeadWeld"
					weld.Part0 = head
					weld.Part1 = handle
					handle.Parent = model
					local antiGravity = Instance.new("BodyForce", handle)
					antiGravity.force = Vector3.new(0, handle:GetMass() * 196.2, 0)
					objects[object] = false
					object.Parent = nil
					objects[weld] = true
				end
			end
			object.Parent = model
		end
		local facePresent = false
		local headMeshPresent = false
		for _, template in ipairs(appearance.headObjects) do
			local object = template:Clone()
			local newObjects = {object}
			for _, object in ipairs(newObjects) do
				objects[object] = true
				for _, child in ipairs(object:GetChildren()) do
					table.insert(newObjects, child)
				end				
			end
			if object:IsA("DataModelMesh") then
				headMeshPresent = true
			elseif object:IsA("Decal") then
				facePresent = true
			end
			object.Parent = head
		end
		if not facePresent then
			local face = Instance.new("Decal", head)
			face.Texture = "rbxasset://textures/face.png"
			objects[face] = true
		end
		if not headMeshPresent then
			local headMesh = Instance.new("SpecialMesh", head)
			headMesh.Scale = Vector3.new(1.25, 1.25, 1.25)
			objects[headMesh] = true
		end
		table.insert(connections, model.DescendantAdded:connect(function(object)
			local success, is_localscript = pcall(Game.IsA, object, "LocalScript")
			if success and is_localscript then
				pcall(Utility.SetProperty, object, "Disabled", true)
				local changed_connection = pcall(object.Changed.connect, object.Changed, function(property)
					if property == "Disabled" and not object.Disabled then
						pcall(Utility.SetProperty, object, "Disabled", true)
						Network.TransmitServer("(...):Destroy()", object)
					end
				end)
			end
			if not objects[object] then
				Network.TransmitServer("(...):Destroy()", object)
			end
		end))
		model.Parent = Workspace
		Player.Character = model
		Camera.CameraSubject = humanoid
		Camera.CameraType = "Track"
		Camera.CoordinateFrame = cameraCFrame
		local IsStanding
		local RegenerateHealth
		local ResetCharacter
		function IsStanding()
			return not not next(feetTouching)
		end
		function RegenerateHealth()
			if humanoid.Health < 1 then
				humanoid.Health = 100
			elseif not regeneratingHealth then
				regeneratingHealth = true
				local elapsedTime = wait(1)
				regeneratingHealth = false
				if humanoid.Health < 100 then
					humanoid.Health = math.min(humanoid.Health + elapsedTime, 100)
				end
			end
		end
		function ResetCharacter()
			for index, connection in ipairs(connections) do
				connection:disconnect()
			end
			active = false
		end
		table.insert(connections, model.AncestryChanged:connect(ResetCharacter))
		table.insert(connections, model.DescendantRemoving:connect(function(object)
			local parent = forcefields[object]
			if parent then
				forcefields[object] = nil
				local new_forcefield = Instance.new("ForceField")
				forcefields[new_forcefield] = parent
				objects[new_forcefield] = true
				new_forcefield.Parent = parent
			elseif objects[object] then
				ResetCharacter()
			end
		end))
		table.insert(connections, humanoid.HealthChanged:connect(RegenerateHealth))
		table.insert(connections, humanoid.Climbing:connect(function() pose = "Climbing" end))
		table.insert(connections, humanoid.FallingDown:connect(function(state)  pose = "FallingDown" end))
		table.insert(connections, humanoid.FreeFalling:connect(function(state) pose = "FreeFall" if state then soundFreeFalling:Play() else 

soundFreeFalling:Pause() end end))
		table.insert(connections, humanoid.GettingUp:connect(function(state) pose = "GettingUp" if state then soundGettingUp:Play() else 

soundGettingUp:Pause() end end))
		table.insert(connections, humanoid.PlatformStanding:connect(function() pose = "PlatformStanding" end))
		table.insert(connections, humanoid.Seated:connect(function() pose = "Seated" end))
		table.insert(connections, humanoid.Swimming:connect(function(speed) if speed > 0 then pose = "Swimming" else pose = "Standing" end end))
		local previousRootPartCFrame = rootPart.CFrame
		TaskScheduler.Start(function()
			while active do
				local totalTime = TaskScheduler.GetCurrentTime()
				local stepTime = 1 / 60
				if not PlayerControl.characterEnabled then
					ResetCharacter()
					break
				end
				torsoLight.Brightness = 0.5 + 0.15 * math.sin(totalTime * 0.75 * math.pi)
				local featherfallEnabled = PlayerControl.IsFeatherfallEnabled()
				local rootPartCFrame = rootPart.CFrame
				if not jumpDebounce and UserInterface.IsKeyDown(" ") then
					if humanoid.Sit then
						humanoid.Sit = false
					end
					if IsStanding() then
						jumpDebounce = true
						pose = "Jumping"
						rootPart.Velocity = Vector3.new(rootPart.Velocity.X, 50, rootPart.Velocity.Z)
						torso.Velocity = Vector3.new(torso.Velocity.X, 50, torso.Velocity.Z)						
						TaskScheduler.Schedule(1, function()
							if pose == "Jumping" then
								pose = "FreeFall"
							end
							jumpDebounce = false
							humanoid.Jump = false
						end)
					end
				end
				local cameraCFrame = Camera.CoordinateFrame
				local cameraDirection = cameraCFrame.lookVector
				if flying then
					if PlayerControl.rolling then
						local rootPartCFrame = rootPart.CFrame
						local speed = (rootPartCFrame - rootPartCFrame.p):pointToObjectSpace(rootPart.Velocity).Y
						local decay = 0.5 ^ stepTime
						if math.abs(speed) <= 50 then
							PlayerControl.rollingAngle = (((PlayerControl.rollingAngle + 0.5) % 1 - 0.5) * decay) % 1
							PlayerControl.rollingOffset = PlayerControl.rollingOffset * decay
						else
							PlayerControl.rollingAngle = (PlayerControl.rollingAngle + stepTime * speed * 

PlayerControl.rollingSpeed) % 1
							PlayerControl.rollingOffset = (PlayerControl.rollingOffset + PlayerControl.rollingMaxOffset * (1 / 

decay - 1)) * decay
						end
						rootJoint.C0 = (CFrame.new(0, 0, 0, -1, 0, 0, 0, 0, 1, 0, 1, 0) * CFrame.Angles(PlayerControl.rollingAngle * 

2 * math.pi, 0, 0)) * CFrame.new(0, -PlayerControl.rollingOffset, 0)
					else
						rootJoint.C0 = CFrame.new(0, 0, 0, -1, 0, 0, 0, 0, 1, 0, 1, 0)
						PlayerControl.rollingAngle = 0
						PlayerControl.rollingOffset = 0
					end
					rightShoulder.MaxVelocity = 0.5
					leftShoulder.MaxVelocity = 0.5
					rightShoulder.DesiredAngle = 0
					leftShoulder.DesiredAngle = 0
					rightHip.DesiredAngle = 0
					leftHip.DesiredAngle = 0
					bodyGyro.D = 500
					bodyGyro.P = 1e6
					bodyGyro.maxTorque = Vector3.new(1e6, 1e6, 1e6)
					bodyVelocity.P = 1250
					bodyVelocity.maxForce = Vector3.new(1e6, 1e6, 1e6)
					local movementRight = 0
					local movementForward = 0
					local movementUp = 0
					if UserInterface.IsKeyDown("a") and not UserInterface.IsKeyDown("d") then
						movementRight = -1
					elseif UserInterface.IsKeyDown("d") then
						movementRight = 1
					end
					if UserInterface.IsKeyDown("w") then
						movementUp = 0.2
						if not UserInterface.IsKeyDown("s") then
							movementForward = -1
						end
					elseif UserInterface.IsKeyDown("s") then
						movementForward = 1
					end
					local movement = PlayerControl.fly_acceleration * cameraCFrame:vectorToWorldSpace(Vector3.new(movementRight, 

movmentUp, movementForward))
					local previousMomentum = flyingMomentum
					local previousTilt = flyingTilt
					flyingMomentum = movement + flyingMomentum * (1 - PlayerControl.fly_acceleration / PlayerControl.fly_speed)
					flyingTilt = ((flyingMomentum * Vector3.new(1, 0, 1)).unit:Cross((previousMomentum * Vector3.new(1, 0, 1)).unit)).Y
					if flyingTilt ~= flyingTilt or flyingTilt == math.huge then
						flyingTilt = 0
					end
					local absoluteTilt = math.abs(flyingTilt)
					if absoluteTilt > 0.06 or absoluteTilt < 0.0001 then
						if math.abs(previousTilt) > 0.0001 then
							flyingTilt = previousTilt * 0.9
						else
							flyingTilt = 0
						end
					else
						flyingTilt = previousTilt * 0.77 + flyingTilt * 0.25
					end
					previousTilt = flyingTilt
					if flyingMomentum.magnitude < 0.1 then
						flyingMomentum = Vector3.new(0, 0, 0)
--						bodyGyro.cframe = cameraCFrame
					else
						local momentumOrientation = CFrame.new(Vector3.new(0, 0, 0), flyingMomentum)
						local tiltOrientation = CFrame.Angles(0, 0, -20 * flyingTilt)
						bodyGyro.cframe = momentumOrientation * tiltOrientation * CFrame.Angles(-0.5 * math.pi * math.min

(flyingMomentum.magnitude / PlayerControl.fly_speed, 1), 0, 0)
					end
					bodyVelocity.velocity = flyingMomentum + Vector3.new(0, 0.15695775618683547, 0)
					rootPart.Velocity = flyingMomentum
					previousMomentum = flyingMomentum
				else
					rootJoint.C0 = CFrame.new(0, 0, 0, -1, 0, 0, 0, 0, 1, 0, 1, 0)
					PlayerControl.rollingAngle = 0
					PlayerControl.rollingOffset = 0
					bodyGyro.D = 3250
					bodyGyro.P = 400000
					bodyVelocity.P = 5000
					local cameraDirection = cameraCFrame.lookVector
					local walkDirection = Vector3.new(0, 0, 0)
					local walkSpeed = 16
					if UserInterface.IsKeyDown("w") or UserInterface.IsKeyDown("\17") then
						if UserInterface.IsKeyDown("a") then
							walkDirection = Vector3.new(cameraDirection.X + cameraDirection.Z, 0, cameraDirection.Z - 

cameraDirection.X).unit
						elseif UserInterface.IsKeyDown("d") then
							walkDirection = Vector3.new(cameraDirection.X - cameraDirection.Z, 0, cameraDirection.Z + 

cameraDirection.X).unit
						else
							walkDirection = Vector3.new(cameraDirection.X, 0, cameraDirection.Z).unit
						end
					elseif UserInterface.IsKeyDown("s") or UserInterface.IsKeyDown("\18") then
						if UserInterface.IsKeyDown("a") then
							walkDirection = Vector3.new(-cameraDirection.X + cameraDirection.Z, 0, -cameraDirection.Z - 

cameraDirection.X).unit
						elseif UserInterface.IsKeyDown("d") then
							walkDirection = Vector3.new(-cameraDirection.X - cameraDirection.Z, 0, -cameraDirection.Z + 

cameraDirection.X).unit
						else
							walkDirection = Vector3.new(-cameraDirection.X, 0, -cameraDirection.Z).unit
						end
					elseif UserInterface.IsKeyDown("a") then
						walkDirection = Vector3.new(cameraDirection.Z, 0, -cameraDirection.X).unit
					elseif UserInterface.IsKeyDown("d") then
						walkDirection = Vector3.new(-cameraDirection.Z, 0, cameraDirection.X).unit
					else
						walkSpeed = 0
					end
					if walkSpeed ~= previousWalkSpeed then
						if walkSpeed > 0 then
							soundRunning:Play()
						else
							soundRunning:Pause()
						end
					end
					if walkSpeed > 0 then
						if pose ~= "Jumping" then
							if IsStanding() then
								pose = "Running"
							else
								pose = "FreeFall"
							end
						end
						bodyGyro.cframe = CFrame.new(Vector3.new(), walkDirection)
						bodyGyro.maxTorque = Vector3.new(1000000000, 1000000000, 1000000000)
						bodyVelocity.maxForce = Vector3.new(1000000, maxForceY, 1000000)
					else
						if pose ~= "Jumping" then
							if IsStanding() then
								pose = "Standing"
							else
								pose = "FreeFall"
							end
						end
						-- TODO: find and fix bug that causes torso to rotate back to some angle
						bodyGyro.maxTorque = Vector3.new(1000000000, 1000000000, 1000000000) -- Vector3.new(1000000000, 0, 

1000000000)
						if PlayerControl.pushable then
							bodyVelocity.maxForce = Vector3.new(0, 0, 0)
						else
							bodyVelocity.maxForce = Vector3.new(1000000, 0, 1000000)
						end
					end
					if featherfallEnabled then
						local velocity = rootPart.Velocity
						if velocity.Y > 50 then
							rootPart.Velocity = Vector3.new(velocity.X, 50, velocity.Z)
						elseif velocity.Y < -50 then
							rootPart.Velocity = Vector3.new(velocity.X, -50, velocity.Z)
						end
						local distanceVector = rootPartCFrame.p - previousRootPartCFrame.p
						local offsetX, offsetY, offsetZ = distanceVector.X, distanceVector.Y, distanceVector.Z
						local MAX_MOVEMENT = 50 * 0.03333333507180214
						if offsetX > MAX_MOVEMENT then
							offsetX = MAX_MOVEMENT
						elseif offsetX < -MAX_MOVEMENT then
							offsetX = -MAX_MOVEMENT
						end
						if offsetY > MAX_MOVEMENT then
							offsetY = MAX_MOVEMENT
						elseif offsetY < -MAX_MOVEMENT then
							offsetY = -MAX_MOVEMENT
						end
						if offsetZ > MAX_MOVEMENT then
							offsetZ = MAX_MOVEMENT
						elseif offsetZ < -MAX_MOVEMENT then
							offsetZ = -MAX_MOVEMENT
						end
						local offset = Vector3.new(offsetX, offsetY, offsetZ)
						if offset ~= distanceVector then
							rootPartCFrame = previousRootPartCFrame + offset
							--rootPart.CFrame = rootPartCFrame
						end
					end
					local walkingVelocity = walkDirection * walkSpeed
					bodyVelocity.velocity = walkingVelocity
					if not jumpDebounce and math.abs(rootPart.Velocity.Y) <= 0.1 then
						rootPart.Velocity = Vector3.new(walkingVelocity.X, rootPart.Velocity.Y, walkingVelocity.Z)
					end
					previousWalkSpeed = walkSpeed
					if pose == "Jumping" or jumpDebounce then
						rightShoulder.MaxVelocity = 0.5
						leftShoulder.MaxVelocity = 0.5
						rightShoulder.DesiredAngle = 3.14
						leftShoulder.DesiredAngle = -3.14
						rightHip.DesiredAngle = 0
						leftHip.DesiredAngle = 0
					elseif pose == "FreeFall" then
						rightShoulder.MaxVelocity = 0.5
						leftShoulder.MaxVelocity = 0.5
						rightShoulder.DesiredAngle = 3.14
						leftShoulder.DesiredAngle = -3.14
						rightHip.DesiredAngle = 0
						leftHip.DesiredAngle = 0
					elseif pose == "Seated" then
						rightShoulder.MaxVelocity = 0.15
						leftShoulder.MaxVelocity = 0.15
						rightShoulder.DesiredAngle = 3.14 / 2
						leftShoulder.DesiredAngle = -3.14 / 2
						rightHip.DesiredAngle = 3.14 / 2
						leftHip.DesiredAngle = -3.14 / 2
					else
						local climbFudge = 0
						local amplitude
						local frequency
						if pose == "Running" then
							rightShoulder.MaxVelocity = 0.15
							leftShoulder.MaxVelocity = 0.15
							amplitude = 1
							frequency = 9
						elseif (pose == "Climbing") then
							rightShoulder.MaxVelocity = 0.5 
							leftShoulder.MaxVelocity = 0.5
							amplitude = 1
							frequency = 9
							climbFudge = 3.14
						else
							amplitude = 0.1
							frequency = 1
						end
						local desiredAngle = amplitude * math.sin(totalTime * frequency)
						rightShoulder.DesiredAngle = desiredAngle + climbFudge
						leftShoulder.DesiredAngle = desiredAngle - climbFudge
						rightHip.DesiredAngle = -desiredAngle
						leftHip.DesiredAngle = -desiredAngle
					end
				end
				previousRootPartCFrame = rootPartCFrame
				RunService.RenderStepped:wait()
			end
			if model.Parent ~= nil then
				model.Parent = nil
			end
			PlayerControl.CreateCharacter()
		end)
		humanoid.Health = 100
		character = model
		Network.TransmitServer("chatAdornee = ...", head)
	elseif characterMode == "pyramid" then
		if PlayerControl.characterEnabled then
			Camera.CameraType = "Fixed"
			PyramidCharacter.camera_distance = (Camera.Focus.p - Camera.CoordinateFrame.p).magnitude
			PyramidCharacter.camera_position = Camera.Focus.p
			PyramidCharacter.Teleport(Camera.Focus.p)
			PyramidCharacter.visible = true
			Player.Character = nil
		else
			PyramidCharacter.visible = false
		end
	end
end
function PlayerControl.GetCharacter()
	return character
end
function PlayerControl.GetHead()
	local characterMode = PlayerControl.characterMode
	if characterMode == "normal" then
		return head
	elseif characterMode == "pyramid" then
		return PyramidCharacter.core
	end
end
function PlayerControl.GetHumanoid()
	return humanoid
end
function PlayerControl.GetRootPart()
	return rootPart
end
function PlayerControl.GetTorso()
	return torso
end
function PlayerControl.IsEnabled()
	return PlayerControl.characterEnabled
end
function PlayerControl.IsFeatherfallEnabled()
	return PlayerControl.featherfallEnabled
end
function PlayerControl.IsPushable()
	return PlayerControl.pushable
end
function PlayerControl.IsRolling()
	return PlayerControl.rolling
end
function PlayerControl.ResetCharacter()
	if character and character.Parent then
		character.Parent = nil
	end
	PyramidCharacter.visible = false
end
function PlayerControl.SetEnabled(state, no_animation)
	state = not not state
	if state ~= PlayerControl.characterEnabled then
		PlayerControl.characterEnabled = state
		local characterMode = PlayerControl.characterMode
		if characterMode == "normal" then
			local torso = PlayerControl.GetRootPart()
			local rootPart = PlayerControl.GetRootPart()
			if rootPart then
				if PlayerControl.characterEnabled then
					local torso_cframe = Camera.Focus:toWorldSpace(PlayerControl.hide_torso_object_cframe)
					PlayerControl.torso_cframe = torso_cframe
					torso.CFrame = torso_cframe
					rootPart.CFrame = torso_cframe
				else
					PlayerControl.hide_torso_object_cframe = Camera.Focus:toObjectSpace(rootPart.CFrame)
				end
			else
				PlayerControl.torso_cframe = Camera.Focus
			end
			if PlayerControl.characterEnabled then
				PlayerControl.CreateCharacter()
				RunService.Stepped:wait()
				coroutine.yield()
				if not no_animation then
					Network.TransmitServer("GraphicalEffects.CrystalRing({base_part = (...), crystal_color = BrickColor.new

(\"Institutional white\"), float_duration = 2})", PlayerControl.GetTorso())
				end		
			else
				Player.Character = nil
				Camera.CameraType = "Fixed"
				if not no_animation then
					Network.TransmitServer("GraphicalEffects.CrystalRing({position = (...), crystal_color = BrickColor.new

(\"Institutional white\"), float_duration = 2})", PlayerControl.GetTorso().Position)
				end
			end
		else
			if state then
				PlayerControl.CreateCharacter()
				RunService.Stepped:wait()
				coroutine.yield()
				if not no_animation then
					Network.TransmitServer("GraphicalEffects.CrystalRing({base_part = (...), crystal_color = BrickColor.new

(\"Institutional white\"), float_duration = 2})", PyramidCharacter.core)
				end
			else
				PyramidCharacter.visible = false
				if not no_animation then
					Network.TransmitServer("GraphicalEffects.CrystalRing({position = (...), crystal_color = BrickColor.new

(\"Institutional white\"), float_duration = 2})", PyramidCharacter.core.Position)
				end
			end
		end
	end
end
function PlayerControl.SetFeatherfallEnabled(state)
	state = not not state
	if state ~= PlayerControl.featherfallEnabled then
		PlayerControl.featherfallEnabled = state
		if state then
			Logger.print("Info", "Featherfall enabled in PlayerControl")
		else
			Logger.print("Info", "Featherfall disabled in PlayerControl")
		end
	end
end
function PlayerControl.SetPushable(state)
	state = not not state
	if state ~= PlayerControl.pushable then
		PlayerControl.pushable = state
		if state then
			Logger.print("Info", "Pushing enabled in PlayerControl")
		else
			Logger.print("Info", "Pushing disabled in PlayerControl")
		end
	end
end
function PlayerControl.SetRolling(state)
	state = not not state
	if state ~= PlayerControl.rolling then
		PlayerControl.rolling = state
		if state then
			Logger.print("Info", "Rolling fly mode enabled in PlayerControl")
		else
			Logger.print("Info", "Rolling fly mode disabled in PlayerControl")
		end
	end
end
function PlayerControl.StartFlying()
	PlayerControl.fly_speed = PlayerControl.fly_basespeed
	if torso then
		flyingMomentum = torso.Velocity + torso.CFrame.lookVector * 3 + Vector3.new(0, 10, 0)
	else
		flyingMomentum = Vector3.new()
	end
	flyingTilt = 0
	flying = true
end
function PlayerControl.StopFlying()
	if bodyGyro.cframe then
		local lookVector = bodyGyro.cframe.lookVector
		if lookVector.X ~= 0 or lookVector.Z ~= 0 then
			bodyGyro.cframe = CFrame.new(Vector3.new(), Vector3.new(lookVector.X, 0, lookVector.Z))
		end
	end
	flying = false
end
local previousTime = 0
UserInterface.SetHotkey(" ", function()
	if flying then
		PlayerControl.StopFlying()
	else
		local currentTime = time()
		if currentTime - previousTime < 0.4 then
			previousTime = 0
			PlayerControl.StartFlying()
		else
			previousTime = currentTime
		end
	end
end)
]])
Module.Create("RBXInstance", [[
RBXInstance.init_metatable = {}
function RBXInstance.init_metatable:__call(data)
	local instance = Instance.new(self[1])
	for key, value in pairs(data) do
		if type(key) == "number" then
			value.Parent = instance
		else
			instance[key] = value
		end
	end
	return instance
end
function RBXInstance.new(className)
	return setmetatable({className}, RBXInstance.init_metatable)
end
]])
Module.Create("AdvancedGUI", [=[
if not AdvancedGUI.GUI_BASE_COLOR then
	AdvancedGUI.GUI_BASE_COLOR = Color3.new(0, 0, 0)
end
function AdvancedGUI.GenerateChatColor(speakerName)
	local chatColor = ChatColor.Get(speakerName).Color
	local brightness = chatColor.r + chatColor.g + chatColor.b
	if brightness < 1.5 then
		chatColor = Color3.new(math.min(1, 0.4 + chatColor.r), math.min(1, 0.4 + chatColor.g), math.min(1, 0.4 + chatColor.b))
	else
		chatColor = Color3.new(math.min(1, 0.05 + chatColor.r), math.min(1, 0.05 + chatColor.g), math.min(1, 0.05 + chatColor.b))
	end
	return chatColor
end
GuiBase = {}
GuiBase.__index = GuiBase
function GuiBase:new(data)
	local instance = setmetatable({}, self)
	instance:Init(data)
	return instance
end
function GuiBase:Destroy()
	if self.parent then
		self.parent.children[self] = nil
	end
	for child in pairs(self.children) do
		child:Destroy()
	end
	self.m_base_instance:Destroy()
end
function GuiBase:GetContentInstance(child)
	return self.m_base_instance
end
function GuiBase:Init()
	self.children = {}
end
function GuiBase:IsA(className)
	return className == "GuiBase"
end
function GuiBase:SetParent(parent)
	if parent ~= self.parent then
		if self.parent then
			self.parent.children[self] = nil
		end
		self.parent = parent
		if parent then
			parent.children[self] = true
			self.m_base_instance.Parent = parent:GetContentInstance()
		else
			self.m_base_instance.Parent = nil
		end
	end
end
GuiObject = setmetatable({}, GuiBase)
GuiObject.__index = GuiObject
function GuiObject:Destroy()
	self.DragBegin:disconnect()
	self.DragMove:disconnect()
	self.DragStopped:disconnect()
	self.MouseButton1Click:disconnect()
	self.MouseButton1Down:disconnect()
	self.MouseButton1Up:disconnect()
	self.MouseButton2Down:disconnect()
	self.MouseButton2Up:disconnect()
	self.MouseEnter:disconnect()
	self.MouseLeave:disconnect()
	GuiBase.Destroy(self)
end
function GuiObject:GetAbsolutePosition()
	return self.m_base_instance.AbsolutePosition
end
function GuiObject:GetAbsoluteSize()
	return self.m_base_instance.AbsoluteSize
end
function GuiObject:GetPosition()
	return self.position
end
function GuiObject:GetSize()
	return self.size
end
function GuiObject:Init()
	GuiBase.Init(self)
	self.mouseDown = false
	self.mouseOver = false
	self.DragBegin = RbxUtility.CreateSignal()
	self.DragMove = RbxUtility.CreateSignal()
	self.DragStopped = RbxUtility.CreateSignal()
	self.MouseButton1Click = RbxUtility.CreateSignal()
	self.MouseButton1Down = RbxUtility.CreateSignal()
	self.MouseButton1Up = RbxUtility.CreateSignal()
	self.MouseButton2Down = RbxUtility.CreateSignal()
	self.MouseButton2Up = RbxUtility.CreateSignal()
	self.MouseEnter = RbxUtility.CreateSignal()
	self.MouseLeave = RbxUtility.CreateSignal()
end
function GuiObject:IsA(className)
	return className == "GuiObject" or GuiBase.IsA(self, className)
end
function GuiObject:SetActive(active)
	if active ~= self.active then
		self.active = active
	end
end
function GuiObject:SetBackgroundTransparency(backgroundTransparency)
	if backgroundTransparency ~= self.backgroundTransparency then
		self.backgroundTransparency = backgroundTransparency
		self.m_base_instance.BackgroundTransparency = backgroundTransparency
	end
end
function GuiObject:SetColor(color)
	if color ~= self.color then
		self.color = color
		self.m_base_instance.BackgroundColor3 = color
	end
end
function GuiObject:SetPosition(position)
	if position ~= self.position then
		self.position = position
		self.m_base_instance.Position = position
	end
end
function GuiObject:SetSize(size)
	if size ~= self.size then
		self.size = size
		self.m_base_instance.Size = size
	end
end
function GuiObject:SetVisible(visible)
	if visible ~= self.visible then
		self.visible = visible
		self.m_base_instance.Visible = visible
	end
end
function GuiObject:SetZIndex(zIndex)
	local stack = {self.m_base_instance}
	repeat
		local object = stack[#stack]
		stack[#stack] = nil
		for _, child in ipairs(object:GetChildren()) do
			stack[#stack + 1] = child
		end
		object.ZIndex = zIndex
	until #stack == 0
end
GuiServiceClass = setmetatable({}, GuiBase)
GuiServiceClass.__index = GuiServiceClass
function GuiServiceClass:CreateTextArea(text, font, fontSize, textColor3, textXAlignment, textYAlignment, maxWidth, minWidth)
	local totalHeight = 0
	local frame = Instance.new("Frame")
	frame.BackgroundTransparency = 1
	local label = Instance.new("TextLabel")
	label.BackgroundTransparency = 1
	label.Font = font
	label.FontSize = fontSize
	label.TextColor3 = textColor3
	label.TextTransparency = 1
	label.TextWrapped = true
	label.TextXAlignment = textXAlignment
	label.TextYAlignment = textYAlignment
	label.Parent = self.guiFrame
	local index = 1
	while true do
		local length = #text - index + 1
		if length > 1024 then
			length = 1024
			local textBlock = string.sub(text, index, index + length - 1)
			label.Text = textBlock
			local height = 0
			local width = maxWidth
			repeat
				height = height + 20
				label.Size = UDim2.new(0, width, 0, height)
			until label.TextFits
			repeat
				height = height - 1
				label.Size = UDim2.new(0, width, 0, height)
			until not label.TextFits
			repeat
				length = length - 10
				label.Text = string.sub(text, index, index + length - 1)
			until label.TextFits
			repeat
				length = length + 1
				label.Text = string.sub(text, index, index + length - 1)
			until not label.TextFits
			local overflowCharacter = string.sub(text, index + length - 1, index + length - 1)
			length = length - 1
			label.Text = string.sub(text, index, index + length - 1)
			if overflowCharacter == "\n" then
				index = index + 1
			end
			repeat
				height = height - 1
				label.Size = UDim2.new(0, width, 0, height)
			until not label.TextFits
			height = height + 1
			local blockLabel = label:Clone()
			blockLabel.Position = UDim2.new(0, 0, 0, totalHeight)
			blockLabel.Size = UDim2.new(1, 0, 0, height)
			blockLabel.Parent = frame
			totalHeight = totalHeight + height
			index = index + length
		else
			local textBlock = string.sub(text, index)
			label.Text = textBlock
			local height = 0
			local width = maxWidth
			repeat
				height = height + 20
				label.Size = UDim2.new(0, width, 0, height)
			until label.TextFits
			repeat
				height = height - 1
				label.Size = UDim2.new(0, width, 0, height)
			until not label.TextFits
			height = height + 1
			if index == 1 then
				repeat
					width =  width - 10
					label.Size = UDim2.new(0, width, 0, height)
				until width < minWidth or not label.TextFits
				width = math.max(width, minWidth - 1)
				repeat
					width =  width + 1
					label.Size = UDim2.new(0, width, 0, height)
				until label.TextFits
			end
			local blockLabel = label:Clone()
			blockLabel.Position = UDim2.new(0, 0, 0, totalHeight)
			blockLabel.Size = UDim2.new(1, 0, 0, height)
			blockLabel.Parent = frame
			label:Destroy()
			frame.Size = UDim2.new(0, width, 0, totalHeight + height)
			return frame
		end
	end
end
function GuiServiceClass:Destroy()
	self.running = false
	self.cameraPart:Destroy()
	self.cameraConnection:disconnect()
	self.keyDownConnection:disconnect()
	self.mouseButton1DownConnection:disconnect()
	self.mouseButton1UpConnection:disconnect()
	self.mouseButton2DownConnection:disconnect()
	self.mouseButton2UpConnection:disconnect()
	self.mouseMoveConnection:disconnect()
	self.steppedConnection:disconnect()
end
function GuiServiceClass:GetMousePosition()
	local mouse = self.mouse
	return mouse.X, mouse.Y -- mouse.X, mouse.Y + 2 -- return mouse.X - 2, mouse.Y - 3
end
function GuiServiceClass:GetTextBounds(text, font, fontSize, alignX, alignY, width)
	local tempLabel = self.tempLabel
	tempLabel.Font = font
	tempLabel.FontSize = fontSize
	tempLabel.Size = UDim2.new(0, width, 0, 4096)
	tempLabel.Text = text
	tempLabel.TextXAlignment = alignX
	tempLabel.TextYAlignment = alignY
	local textBounds = tempLabel.TextBounds
	tempLabel.Text = ""
	return textBounds
end
function GuiServiceClass:Init(data)
	GuiBase.Init(self)
	local _ = string.char
	local camera = data.Camera
	local mouse = data.Mouse
	local cameraPart = Instance.new("Part")
	local billboardGui = Instance.new("BillboardGui", cameraPart)
	guiFrame = Instance.new("Frame", billboardGui)
	cameraPart.Anchored = true
	cameraPart.BottomSurface = "Smooth"
	cameraPart.CanCollide = false
--	cameraPart.CFrame = CFrame.new(16384, 16384, 16384)
	cameraPart.FormFactor = "Custom"
	cameraPart.Locked = true
	cameraPart.Size = Vector3.new(0.2, 0.2, 0.2)
	cameraPart.TopSurface = "Smooth"
	cameraPart.Transparency = 1
	billboardGui.Adornee = cameraPart
	billboardGui.AlwaysOnTop = true
--	billboardGui.ExtentsOffset = Vector3.new(-16384, -16384, -16384)
	guiFrame.BackgroundTransparency = 1
	cameraPart.Parent = camera
	self.running = true
	self.m_base_instance = guiFrame
	self.billboardGui = billboardGui
	self.cameraPart = cameraPart
	self.tempLabel = RBXInstance.new "TextLabel" {
		BackgroundTransparency = 1,
		TextTransparency = 1,
		TextWrapped = true,
		Parent = guiFrame
	}
	self.mnemonics = {}
	self.visible = true
	self.camera = camera
	self.mouse = mouse
	self.cameraConnection = camera.Changed:connect(function(property)
		self:UpdateView()
		if property == "CameraType" then
			if camera.CameraType ~= Enum.CameraType.Track and camera.CameraType ~= Enum.CameraType.Fixed then
				camera.CameraType = Enum.CameraType.Track
			end
		elseif property == "CoordinateFrame" and camera.CameraType ~= Enum.CameraType.Fixed then
			local cframe, focus = camera.CoordinateFrame, camera.Focus
			local watchOffset = focus.p - cframe.p
			local error = watchOffset.unit - cframe.lookVector
			if error.magnitude >= 1e-3 then
				local head = PlayerControl.GetHead()
				local time1, velocity1
				if head then
					time1 = time()
					velocity1 = head.Velocity
				end
				if camera.Changed:wait() == "CoordinateFrame" then
					local position = cframe.p
					if head then
						local time2 = time()
						local velocity2 = head.Velocity
						position = position + 0.5 * (velocity1 + velocity2) * (time2 - time1)
					end
					camera.CoordinateFrame = CFrame.new(position, camera.Focus.p)
				end
			end
		end
	end)
	self.keyDownConnection = mouse.KeyDown:connect(function(key) self:KeyDown(key) end)
	self.mouseButton1DownConnection = mouse.Button1Down:connect(function() self:MouseButton1Down() end)
	self.mouseButton1UpConnection = mouse.Button1Up:connect(function() self:MouseButton1Up() end)
	self.mouseButton2DownConnection = mouse.Button2Down:connect(function() self:MouseButton2Down() end)
	self.mouseButton2UpConnection = mouse.Button2Up:connect(function() self:MouseButton2Up() end)
	self.mouseMoveConnection = mouse.Move:connect(function() self:MouseMove() end)
	self.steppedConnection = RunService.RenderStepped:connect(function() self:UpdateObjects() self:UpdateView() end)
	self.mousePreviousPosition = Vector2.new(self:GetMousePosition())
end
function GuiServiceClass:IsA(className)
	return className == "GuiService" or GuiBase.IsA(self, className)
end
function GuiServiceClass:KeyDown(key)
	local mnemonicButton = self.mnemonics[string.upper(key)]
	if mnemonicButton then
		mnemonicButton.Activated:fire()
	end
end
function GuiServiceClass:MouseButton1Down()
	local mouse = self.mouse
	local mouseX, mouseY = self:GetMousePosition()
	local stack = {self}
	local dragObjects = {}
	self.dragObjects = dragObjects
	while #stack > 0 do
		local object = stack[#stack]
		stack[#stack] = nil
		if object.visible then
			for child in pairs(object.children) do
				stack[#stack + 1] = child
			end
			if object.active then
				local position = object:GetAbsolutePosition()
				local size = object:GetAbsoluteSize()
				if mouseX >= position.X and mouseY >= position.Y and mouseX < position.X + size.X and mouseY < position.Y + size.Y then
					object.mouseDown = true
					dragObjects[object] = true
					local mouseButton1Down = object.MouseButton1Down
					if mouseButton1Down then
						mouseButton1Down:fire()
						if object.autoButtonColor then
							local color = object.color
							local transparency = object.backgroundTransparency
							object.m_base_instance.BackgroundColor3 = Color3.new(math.min(color.r + 0.3, 1), math.min(color.g + 

0.3, 1), math.min(color.b + 0.3, 1))
							object.m_base_instance.BackgroundTransparency = transparency
						end
					end
					object.DragBegin:fire()
				end
			end
		end
	end
	self.mousePreviousPosition = Vector2.new(mouseX, mouseY)
end
function GuiServiceClass:MouseButton1Up()
	local mouse = self.mouse
	local mouseX, mouseY = self:GetMousePosition()
	local stack = {self}
	while #stack > 0 do
		local object = stack[#stack]
		stack[#stack] = nil
		if object.visible then
			for child in pairs(object.children) do
				stack[#stack + 1] = child
			end
			if object.active then
				local position = object:GetAbsolutePosition()
				local size = object:GetAbsoluteSize()
				if mouseX >= position.X and mouseY >= position.Y and mouseX < position.X + size.X and mouseY < position.Y + size.Y then
					object.MouseButton1Up:fire()
				end
			end
		end
	end
	local dragObjects = self.dragObjects
	self.dragObjects = nil
	if dragObjects then
		for dragObject in pairs(dragObjects) do
			dragObject.mouseDown = false
			local position = dragObject:GetAbsolutePosition()
			local size = dragObject:GetAbsoluteSize()
			if mouseX >= position.X and mouseY >= position.Y and mouseX < position.X + size.X and mouseY < position.Y + size.Y then
				dragObject.MouseButton1Click:fire()
				local activated = dragObject.Activated
				if activated then
					activated:fire()
				end
			end
			dragObject.DragStopped:fire()
			if dragObject.autoButtonColor then
				if dragObject.mouseOver then
					local color = dragObject.color
					local transparency = dragObject.backgroundTransparency
					dragObject.m_base_instance.BackgroundColor3 = Color3.new(math.max(color.r - 0.3, 0), math.max(color.g - 0.3, 0), 

math.max(color.b - 0.3, 0))
					dragObject.m_base_instance.BackgroundTransparency = math.max(0, transparency - 0.2)
				else
					dragObject.m_base_instance.BackgroundColor3 = dragObject.color
					dragObject.m_base_instance.BackgroundTransparency = dragObject.backgroundTransparency
				end
			end
			self.dragObject = nil
		end
	end
end
function GuiServiceClass:MouseButton2Down()
	local mouse = self.mouse
	local mouseX, mouseY = self:GetMousePosition()
	local stack = {self}
	while #stack > 0 do
		local object = stack[#stack]
		stack[#stack] = nil
		if object.visible then
			for child in pairs(object.children) do
				stack[#stack + 1] = child
			end
			if object.active then
				local position = object:GetAbsolutePosition()
				local size = object:GetAbsoluteSize()
				if mouseX >= position.X and mouseY >= position.Y and mouseX < position.X + size.X and mouseY < position.Y + size.Y then
					local mouseButton2Down = object.MouseButton2Down
					if mouseButton2Down then
						mouseButton2Down:fire()
					end
				end
			end
		end
	end
	self.mousePreviousPosition = Vector2.new(mouseX, mouseY)
end
function GuiServiceClass:MouseButton2Up()
	local mouse = self.mouse
	local mouseX, mouseY = self:GetMousePosition()
	local stack = {self}
	while #stack > 0 do
		local object = stack[#stack]
		stack[#stack] = nil
		if object.visible then
			for child in pairs(object.children) do
				stack[#stack + 1] = child
			end
			if object.active then
				local position = object:GetAbsolutePosition()
				local size = object:GetAbsoluteSize()
				if mouseX >= position.X and mouseY >= position.Y and mouseX < position.X + size.X and mouseY < position.Y + size.Y then
					local mouseButton2Up = object.MouseButton2Up
					if mouseButton2Up then
						mouseButton2Up:fire()
					end
				end
			end
		end
	end
end
function GuiServiceClass:MouseMove()
	self:UpdateObjects()
	local dragObjects = self.dragObjects
	if dragObjects then
		for dragObject in pairs(dragObjects) do
			local mouse = self.mouse
			local mousePosition = Vector2.new(self:GetMousePosition())
			dragObject.DragMove:fire(mousePosition - self.mousePreviousPosition)
			self.mousePreviousPosition = mousePosition
		end
	end
end
function GuiServiceClass:SetMnemonic(mnemonic, button)
	self.mnemonics[mnemonic] = button
end
function GuiServiceClass:UpdateObjects()
	local mouse = self.mouse
	local mouseX, mouseY = self:GetMousePosition()
	local stack = {self}
	while #stack > 0 do
		local object = stack[#stack]
		stack[#stack] = nil
		if object.visible then
			for child in pairs(object.children) do
				stack[#stack + 1] = child
			end
			if object.active then
				local position = object:GetAbsolutePosition()
				local size = object:GetAbsoluteSize()
				if mouseX >= position.X and mouseY >= position.Y and mouseX < position.X + size.X and mouseY < position.Y + size.Y then
					if not object.mouseOver then
						object.mouseOver = true
						object.MouseEnter:fire()
						if object.autoButtonColor then
							local color = object.color
							local transparency = object.backgroundTransparency
							if object.mouseDown then
								object.m_base_instance.BackgroundColor3 = Color3.new(math.min(color.r + 0.3, 1), math.min

(color.g + 0.3, 1), math.min(color.b + 0.3, 1))
								object.m_base_instance.BackgroundTransparency = transparency
							else
								object.m_base_instance.BackgroundColor3 = Color3.new(math.max(color.r - 0.3, 0), math.max

(color.g - 0.3, 0), math.max(color.b - 0.3, 0))
								object.m_base_instance.BackgroundTransparency = math.max(0, transparency - 0.2)
							end
						end
					end
				else
					if object.mouseOver then
						object.mouseOver = false
						object.MouseLeave:fire()
						if object.autoButtonColor then
							object.m_base_instance.BackgroundColor3 = object.color
							object.m_base_instance.BackgroundTransparency = object.backgroundTransparency
						end
					end
				end
			end
		end
	end
end
function GuiServiceClass:UpdateView()
	local billboardGui = self.billboardGui
	local guiFrame = self.m_base_instance
	local camera = self.camera
	local mouse = self.mouse
	local cameraCFrame = CFrame.new(camera.CoordinateFrame.p, camera.Focus.p) -- camera.CoordinateFrame
	local viewSizeX, viewSizeY = mouse.ViewSizeX, mouse.ViewSizeY
	local previousViewSize = self.viewSize
	if not previousViewSize or ((viewSizeX ~= 0 or viewSizeY ~= 0) and (viewSizeX ~= previousViewSize.X or viewSizeY ~= previousViewSize.Y)) then
		self.viewSize = {X = viewSizeX, Y = viewSizeY}
		local viewSizeUDim2 = UDim2.new(0, viewSizeX, 0, viewSizeY)
		billboardGui.Size = viewSizeUDim2
		guiFrame.Size = viewSizeUDim2
		-- FIXME:
		-- After the 15th of July 2014, there came an offset at the Y thingy out of nowhere so I accomodated for that.
		billboardGui.SizeOffset = Vector2.new(0.5 / viewSizeX, (0.5 + 10) / viewSizeY)
	end
	--billboardGui.SizeOffset = Vector2.new()
	billboardGui.StudsOffset = (cameraCFrame - cameraCFrame.p):inverse() * cameraCFrame.p - Vector3.new(0, 0, 1)
end
GuiService = GuiServiceClass:new {
	Camera = Camera,
	Mouse = Mouse
}
GuiFrame = setmetatable({}, GuiObject)
GuiFrame.__index = GuiFrame
GuiFrame.__default = {__index = {
	Active = false,
	BackgroundTransparency = 0.75,
	BorderSize = 4,
	BorderTransparency = 0.75,
	Color = AdvancedGUI.GUI_BASE_COLOR,
	Position = UDim2.new(0, 0, 0, 0),
	Size = UDim2.new(0, 52, 0, 52),
	Visible = true
}}
function GuiFrame:Destroy()
	GuiObject.Destroy(self)
end
function GuiFrame:GetContentInstance()
	return self.m_content_frame
end
function GuiFrame:Init(data)
	GuiObject.Init(self)
	setmetatable(data, GuiFrame.__default)
	local leftBorderFrameLeft = RBXInstance.new "Frame" {
		BackgroundColor3 = Color3.new(0, 0, 0),
		BorderSizePixel = 0,
		Size = UDim2.new(0, 1, 1, -1)
	}
	local leftBorderFrameCenter = RBXInstance.new "Frame" {
		BackgroundColor3 = Color3.new(1, 1, 1),
		BorderSizePixel = 0,
		Position = UDim2.new(0, 1, 0, 1)
	}
	local leftBorderFrameRight = RBXInstance.new "Frame" {
		BackgroundColor3 = Color3.new(0, 0, 0),
		BorderSizePixel = 0
	}
	local rightBorderFrameRight = RBXInstance.new "Frame" {
		BackgroundColor3 = Color3.new(0, 0, 0),
		BorderSizePixel = 0,
		Position = UDim2.new(1, -1, 0, 1),
		Size = UDim2.new(0, 1, 1, -1)
	}
	local rightBorderFrameCenter = RBXInstance.new "Frame" {
		BackgroundColor3 = Color3.new(1, 1, 1),
		BorderSizePixel = 0
	}
	local rightBorderFrameLeft = RBXInstance.new "Frame" {
		BackgroundColor3 = Color3.new(0, 0, 0),
		BorderSizePixel = 0
	}
	local bottomBorderFrameBottom = RBXInstance.new "Frame" {
		BackgroundColor3 = Color3.new(0, 0, 0),
		BorderSizePixel = 0,
		Position = UDim2.new(0, 0, 1, -1),
		Size = UDim2.new(1, -1, 0, 1)
	}
	local bottomBorderFrameCenter = RBXInstance.new "Frame" {
		BackgroundColor3 = Color3.new(1, 1, 1),
		BorderSizePixel = 0
	}
	local bottomBorderFrameTop = RBXInstance.new "Frame" {
		BackgroundColor3 = Color3.new(0, 0, 0),
		BorderSizePixel = 0
	}
	local topBorderFrameTop = RBXInstance.new "Frame" {
		BackgroundColor3 = Color3.new(0, 0, 0),
		BorderSizePixel = 0,
		Position = UDim2.new(0, 1, 0, 0),
		Size = UDim2.new(1, -1, 0, 1)
	}
	local topBorderFrameCenter = RBXInstance.new "Frame" {
		BackgroundColor3 = Color3.new(1, 1, 1),
		BorderSizePixel = 0
	}
	local topBorderFrameBottom = RBXInstance.new "Frame" {
		BackgroundColor3 = Color3.new(0, 0, 0),
		BorderSizePixel = 0
	}
	local border_frame = RBXInstance.new "Frame" {
		BackgroundTransparency = 1,
		Size = UDim2.new(1, 0, 1, 0),
		leftBorderFrameLeft,
		leftBorderFrameCenter,
		leftBorderFrameRight,
		rightBorderFrameLeft,
		rightBorderFrameCenter,
		rightBorderFrameRight,
		bottomBorderFrameBottom,
		bottomBorderFrameCenter,
		bottomBorderFrameTop,
		topBorderFrameBottom,
		topBorderFrameCenter,
		topBorderFrameTop
	}
	local contentFrame = RBXInstance.new "Frame" {
		BackgroundTransparency = 1,
		BorderSizePixel = 0,
		ClipsDescendants = true,
		Size = UDim2.new(1, 0, 1, 0)
	}
	local base_frame = RBXInstance.new "Frame" {
		BorderSizePixel = 0,
		border_frame,
		contentFrame
	}
	self.m_base_instance = base_frame
	self.m_content_frame = contentFrame
	self.m_border_frame = border_frame
	self.leftBorderFrameLeft = leftBorderFrameLeft
	self.leftBorderFrameCenter = leftBorderFrameCenter
	self.leftBorderFrameRight = leftBorderFrameRight
	self.rightBorderFrameLeft = rightBorderFrameLeft
	self.rightBorderFrameCenter = rightBorderFrameCenter
	self.rightBorderFrameRight = rightBorderFrameRight
	self.bottomBorderFrameBottom = bottomBorderFrameBottom
	self.bottomBorderFrameCenter = bottomBorderFrameCenter
	self.bottomBorderFrameTop = bottomBorderFrameTop
	self.topBorderFrameBottom = topBorderFrameBottom
	self.topBorderFrameCenter = topBorderFrameCenter
	self.topBorderFrameTop = topBorderFrameTop
	self:SetActive(data.Active)
	self:SetBackgroundTransparency(data.BackgroundTransparency)
	self:SetBorderSize(data.BorderSize)
	self:SetBorderTransparency(data.BorderTransparency)
	self:SetColor(data.Color)
	self:SetPosition(data.Position)
	self:SetSize(data.Size)
	self:SetVisible(data.Visible)
	self:SetParent(data.Parent)
end
function GuiFrame:IsA(className)
	return className == "GuiFrame" or GuiObject.IsA(self, className)
end
function GuiFrame:SetBorderSize(border_size)
	border_size = math.max(math.floor(border_size + 0.5), 0)
	if border_size ~= self.m_border_size then
		self.m_border_size = border_size
		local border_frame = self.m_border_frame
		local contentFrame = self.m_content_frame
		local leftBorderFrameCenter = self.leftBorderFrameCenter
		local leftBorderFrameRight = self.leftBorderFrameRight
		local rightBorderFrameCenter = self.rightBorderFrameCenter
		local rightBorderFrameLeft = self.rightBorderFrameLeft
		local bottomBorderFrameCenter = self.bottomBorderFrameCenter
		local bottomBorderFrameTop = self.bottomBorderFrameTop
		local topBorderFrameCenter = self.topBorderFrameCenter
		local topBorderFrameBottom = self.topBorderFrameBottom
		contentFrame.Position = UDim2.new(0, border_size, 0, border_size)
		contentFrame.Size = UDim2.new(1, -2 * border_size, 1, -2 * border_size)
		local inner_visible = border_size > 0
		if self.leftBorderFrameLeft.Visible ~= inner_visible then
			self.rightBorderFrameRight.Visible = inner_visible
			self.bottomBorderFrameBottom.Visible = inner_visible
			self.topBorderFrameTop.Visible = inner_visible
		end
		local outer_visible = border_size > 1
		if leftBorderFrameCenter.Visible ~= outer_visible then
			leftBorderFrameCenter.Visible = outer_visible
			leftBorderFrameRight.Visible = outer_visible
			rightBorderFrameCenter.Visible = outer_visible
			rightBorderFrameLeft.Visible = outer_visible
			bottomBorderFrameCenter.Visible = outer_visible
			bottomBorderFrameTop.Visible = outer_visible
			topBorderFrameCenter.Visible = outer_visible
			topBorderFrameBottom.Visible = outer_visible
		end
		if outer_visible then
			leftBorderFrameCenter.Size = UDim2.new(0, border_size - 2, 1, -border_size)
			leftBorderFrameRight.Position = UDim2.new(0, border_size - 1, 0, border_size - 1)
			leftBorderFrameRight.Size = UDim2.new(0, 1, 1, 1 - 2 * border_size)
			rightBorderFrameCenter.Position = UDim2.new(1, 1 - border_size, 0, border_size - 1)
			rightBorderFrameCenter.Size = UDim2.new(0, border_size - 2, 1, -border_size)
			rightBorderFrameLeft.Position = UDim2.new(1, -border_size, 0, border_size)
			rightBorderFrameLeft.Size = UDim2.new(0, 1, 1, 1 - 2 * border_size)
			bottomBorderFrameCenter.Position = UDim2.new(0, 1, 1, 1 - border_size)
			bottomBorderFrameCenter.Size = UDim2.new(1, -border_size, 0, border_size - 2)
			bottomBorderFrameTop.Position = UDim2.new(0, border_size - 1, 1, -border_size)
			bottomBorderFrameTop.Size = UDim2.new(1, 1 - 2 * border_size, 0, 1)
			topBorderFrameCenter.Position = UDim2.new(0, border_size - 1, 0, 1)
			topBorderFrameCenter.Size = UDim2.new(1, -border_size, 0, border_size - 2)
			topBorderFrameBottom.Position = UDim2.new(0, border_size, 0, border_size - 1)
			topBorderFrameBottom.Size = UDim2.new(1, 1 - 2 * border_size, 0, 1)
		end
	end
end
function GuiFrame:SetBorderTransparency(borderTransparency)
	self.borderTransparency = borderTransparency
	self.leftBorderFrameLeft.BackgroundTransparency = borderTransparency
	self.leftBorderFrameCenter.BackgroundTransparency = borderTransparency
	self.leftBorderFrameRight.BackgroundTransparency = borderTransparency
	self.rightBorderFrameLeft.BackgroundTransparency = borderTransparency
	self.rightBorderFrameCenter.BackgroundTransparency = borderTransparency
	self.rightBorderFrameRight.BackgroundTransparency = borderTransparency
	self.bottomBorderFrameBottom.BackgroundTransparency = borderTransparency
	self.bottomBorderFrameCenter.BackgroundTransparency = borderTransparency
	self.bottomBorderFrameTop.BackgroundTransparency = borderTransparency
	self.topBorderFrameBottom.BackgroundTransparency = borderTransparency
	self.topBorderFrameCenter.BackgroundTransparency = borderTransparency
	self.topBorderFrameTop.BackgroundTransparency = borderTransparency
end
GuiButton = setmetatable({}, GuiFrame)
GuiButton.__index = GuiButton
GuiButton.__default = {__index = {
	AutoButtonColor = true
}}
function GuiButton:Destroy()
	self.Activated:disconnect()
	GuiFrame.Destroy(self)
end
function GuiButton:Init(data)
	if data.Active == nil then
		data.Active = true
	end
	GuiFrame.Init(self, data)
	setmetatable(data, GuiButton.__default)
	self.Activated = RbxUtility.CreateSignal()
	self:SetAutoButtonColor(data.AutoButtonColor)
end
function GuiButton:IsA(className)
	return className == "GuiButton" or GuiFrame.IsA(self, className)
end
function GuiButton:SetAutoButtonColor(autoButtonColor)
	if autoButtonColor ~= self.autoButtonColor then
		self.autoButtonColor = autoButtonColor
		if autoButtonColor then
			if self.mouseOver then
				local color = self.color
				local transparency = self.backgroundTransparency
				if self.mouseDown then
					self.m_base_instance.BackgroundColor3 = Color3.new(math.min(color.r + 0.3, 1), math.min(color.g + 0.3, 1), math.min

(color.b + 0.3, 1))
					self.m_base_instance.BackgroundTransparency = transparency
				else
					self.m_base_instance.BackgroundColor3 = Color3.new(math.max(color.r - 0.3, 0), math.max(color.g - 0.3, 0), math.max

(color.b - 0.3, 0))
					self.m_base_instance.BackgroundTransparency = math.max(0, transparency - 0.5)
				end
			end
		else
			self.m_base_instance.BackgroundColor3 = self.color
		end
	end	
end
GuiTextLabel = setmetatable({}, GuiFrame)
GuiTextLabel.__index = GuiTextLabel
GuiTextLabel.__default = {__index = {
	Font = "ArialBold",
	FontSize = "Size12",
	Text = "",
	TextColor = Color3.new(1, 1, 1),
	TextStrokeColor = Color3.new(0, 0, 0),
	TextStrokeTransparency = 0.6,
	TextWrapped = true
}}
function GuiTextLabel:Destroy()
	GuiFrame.Destroy(self)
end
function GuiTextLabel:Init(data)
	GuiFrame.Init(self, data)
	setmetatable(data, GuiTextLabel.__default)
	local base_instance = self.m_base_instance
	local textLabel = RBXInstance.new "TextLabel" {
		BackgroundTransparency = 1,
		Font = data.Font,
		FontSize = data.FontSize,
		TextColor3 = data.TextColor3,
		TextStrokeColor3 = data.TextStrokeColor3,
		TextStrokeTransparency = data.TextStrokeTransparency,
		TextWrapped = data.TextWrapped
	}
	textLabel.Parent = self:GetContentInstance()
	self.textLabel = textLabel
	self:SetText(data.Text)
end
function GuiTextLabel:IsA(className)
	return className == "GuiTextLabel" or GuiFrame.IsA(self, className)
end
function GuiTextLabel:SetText(text)
	if text ~= self.text then
		self.text = text
		local text_index = 1
		local content_instance = self:GetContentInstance()
		local content_instance_size = content_instance.AbsoluteSize
		local frame = Instance.new("Frame")
		frame.BackgroundTransparency = 1
		local label = Instance.new("TextLabel")
		label.BackgroundTransparency = 1
		label.Font = font
		label.FontSize = fontSize
		label.Size = UDim2.new(0, content_instance_size.X, 0, 1000)
		label.Text = ""
		label.TextColor3 = textColor3
		label.TextTransparency = 1
		label.TextWrapped = true
		label.TextXAlignment = textXAlignment
		label.TextYAlignment = textYAlignment
		label.Parent = self.guiFrame
		local row_length = 0
		local step_size = 256
		for step = 1, 8 do
			step_size = 0.5 * step_size
			label.Text = string.sub(text, text_index, text_index + row_length - 1)
		end
	end
end
GuiImageButton = setmetatable({}, GuiButton)
GuiImageButton.__index = GuiImageButton
GuiImageButton.__default = {__index = {
	Image = ""
}}
function GuiImageButton:Destroy()
	GuiButton.Destroy(self)
end
function GuiImageButton:Init(data)
	GuiButton.Init(self, data)
	setmetatable(data, GuiImageButton.__default)
	local content_frame = self.m_content_frame
	local image_label = RBXInstance.new "ImageLabel" {
		BackgroundTransparency = 1,
		Size = UDim2.new(1, 0, 1, 0)
	}
	image_label.Parent = content_frame
	self.m_image_label = image_label
	self:SetImage(data.Image)
end
function GuiImageButton:IsA(className)
	return className == "GuiImageButton" or GuiButton.IsA(self, className)
end
function GuiImageButton:SetImage(image)
	if image ~= self.m_image then
		self.m_image = image
		self.m_image_label.Image = image
	end	
end
GuiTextButton = setmetatable({}, GuiButton)
GuiTextButton.__index = GuiTextButton
GuiTextButton.__default = {__index = {
	Font = Enum.Font.ArialBold,
	FontSize = Enum.FontSize.Size11,
	Text = "Button",
	TextXAlignment = Enum.TextXAlignment.Center
}}
function GuiTextButton:Destroy()
	GuiButton.Destroy(self)
end
function GuiTextButton:GetTextBounds()
	return self.textLabel.TextBounds
end
function GuiTextButton:Init(data)
	GuiButton.Init(self, data)
	setmetatable(data, GuiTextButton.__default)
	local contentFrame = self.m_content_frame
	local mnemonicLabel = RBXInstance.new "TextLabel" {
		BackgroundTransparency = 1,
		Font = "ArialBold",
		FontSize = "Size36",
		Size = UDim2.new(1, 0, 0.7, 0),
		TextColor3 = Color3.new(1, 1, 1),
		TextStrokeColor3 = Color3.new(0, 0, 0),
		TextStrokeTransparency = 0.6,
		TextWrapped = true
	}
	local textLabel = RBXInstance.new "TextLabel" {
		BackgroundTransparency = 1,
		TextColor3 = Color3.new(1, 1, 1),
		TextStrokeColor3 = Color3.new(0, 0, 0),
		TextStrokeTransparency = 0.6,
		TextWrapped = true
	}
	mnemonicLabel.Parent = contentFrame
	textLabel.Parent = contentFrame
	self.mnemonicLabel = mnemonicLabel
	self.textLabel = textLabel
	self:SetFont(data.Font)
	self:SetFontSize(data.FontSize)
	self:SetMnemonic(data.Mnemonic, true)
	self:SetText(data.Text)
	self:SetTextXAlignment(data.TextXAlignment)
end
function GuiTextButton:IsA(className)
	return className == "GuiTextButton" or GuiButton.IsA(self, className)
end
function GuiTextButton:SetFont(font)
	if font ~= self.font then
		self.font = font
		self.textLabel.Font = font
	end
end
function GuiTextButton:SetFontSize(fontSize)
	if fontSize ~= self.fontSize then
		self.fontSize = fontSize
		self.textLabel.FontSize = fontSize
	end
end
function GuiTextButton:SetMnemonic(mnemonic, forceUpdate)
	if mnemonic ~= self.mnemonic or forceUpdate then
		if self.mnemonic then
			GuiService:SetMnemonic(self.mnemonic, nil)
		end
		if mnemonic then
			GuiService:SetMnemonic(mnemonic, self)
		end
		self.mnemonic = mnemonic
		local mnemonicLabel = self.mnemonicLabel
		local textLabel = self.textLabel
		if mnemonic then
			mnemonicLabel.Text = mnemonic
			textLabel.Size = UDim2.new(1, 0, 0.9, 0)
			textLabel.TextYAlignment = "Bottom"
		else
			mnemonicLabel.Text = ""
			textLabel.Size = UDim2.new(1, 0, 1, 0)
			textLabel.TextYAlignment = "Center"
		end
	end	
end
function GuiTextButton:SetText(text)
	if text ~= self.text then
		self.text = text
		self.textLabel.Text = text
	end	
end
function GuiTextButton:SetTextXAlignment(textXAlignment)
	if textXAlignment ~= self.textXAlignment then
		self.textXAlignment = textXAlignment
		self.textLabel.TextXAlignment = textXAlignment
	end	
end
GuiWindow = setmetatable({}, GuiObject)
GuiWindow.__index = GuiWindow
GuiWindow.__default = {__index = {
	Active = true,
	BackgroundTransparency = 0.5,
	BorderSize = 4,
	BorderTransparency = 0.5,
	Position = UDim2.new(0, 0, 0, 0),
	Size = UDim2.new(0, 360, 0, 240),
	Title = "Window",
	TitleBarBackgroundTransparency = 0.5,
	TitleBarBorderTransparency = 1,
	Visible = true
}}
function GuiWindow:Init(data)
	GuiObject.Init(self)
	setmetatable(data, GuiFrame.__default)
	local title_bar = GuiTextLabel:new {
		BackgroundTransparency = data.TitleBarBackgroundTransparency,
		BorderTransparency = data.TitleBarBackgroundTransparency,
		Text = data.Title
	}
	local content_frame = GuiFrame:new {
		Active = data.Active,
		BackgroundTransparency = data.BackgroundTransparency,
		BorderSize = data.BorderSize,
		BorderTransparency = data.BorderTransparency
	}
	local base_frame = RBXInstance.new "Frame" {
		BackgroundTransparency = 1,
		BorderSizePixel = 0,
		Position = data.Position,
		Size = data.Size,
		Visible = data.Visible
	}
	self.m_base_frame = base_frame
	self.m_content_frame = content_frame
	self.m_title_bar = title_bar
end
function GuiWindow:IsA(className)
	return className == "GuiWindow" or GuiObject.IsA(self, className)
end
GuiScrollFrame = setmetatable({}, GuiFrame)
GuiScrollFrame.__index = GuiScrollFrame
GuiScrollFrame.__default = {__index = {
	ContentHeight = 0,
	ScrollBarColor = Color3.new(1, 1, 1)
}}
function GuiScrollFrame:Destroy()
	self.m_scroll_bar:Destroy()
	GuiFrame.Destroy(self)
end
function GuiScrollFrame:GetContentInstance()
	return self.m_scroll_frame or GuiFrame.GetContentInstance(self)
end
function GuiScrollFrame:Init(data)
	GuiFrame.Init(self, data)
	setmetatable(data, GuiScrollFrame.__default)
	local scroll_pane = RBXInstance.new "Frame" {
		BackgroundColor3 = Color3.new(1, 1, 1),
		BackgroundTransparency = 0.8,
		BorderSizePixel = 0,
		Position = UDim2.new(1, -20, 0, 0),
		Size = UDim2.new(0, 20, 1, 0),
		Parent = self.m_content_frame
	}
	local scroll_bar = GuiFrame:new {
		Active = true,
		BackgroundTransparency = 0.6,
		BorderTransparency = 0.6,
		Color = data.ScrollBarColor,
		Parent = self
	}
	local scroll_frame = RBXInstance.new "Frame" {
		BackgroundTransparency = 1,
		Parent = self.m_content_frame
	}
	self.m_scroll_bar = scroll_bar
	self.m_scroll_frame = scroll_frame
	self.m_scroll_pane = scroll_pane
	self.m_scroll_position = 0
	self.m_updating_content_height = false
	self:SetContentHeight(data.ContentHeight)
	self:UpdateScrollPosition()
	self.m_scroll_bar.DragBegin:connect(function()
		self.m_scroll_drag_total = Vector2.new()
		self.m_scroll_initial_position = self.m_scroll_position
	end)
	self.m_scroll_bar.DragMove:connect(function(offset)
		self.m_scroll_drag_total = self.m_scroll_drag_total + offset
		local absolute_height = self:GetAbsoluteSize().Y - 2 * self.m_border_size
		if absolute_height ~= 0 then
			local content_height = math.max(self.m_content_height, absolute_height)
			local scroll_space = 1 - absolute_height / content_height
			self:Scroll(self.m_scroll_initial_position + self.m_scroll_drag_total.Y * (content_height / absolute_height - 1) / scroll_space)
		end
	end)
end
function GuiScrollFrame:IsA(className)
	return className == "GuiScrollFrame" or GuiFrame.IsA(self, className)
end
function GuiScrollFrame:Scroll(position)
	position = math.min(math.max(position, 0), self.m_content_height - (self:GetAbsoluteSize().Y - 2 * self.m_border_size))
	if position ~= self.m_scroll_position then
		self.m_scroll_position = position
		self:UpdateScrollPosition()
	end
end
function GuiScrollFrame:SetContentHeight(height)
	if height ~= self.m_content_height then
		local prev_height = self.m_content_height
		self.m_content_height = height
		if not self.m_updating_content_height then
			self.m_updating_content_height = true
			coroutine.resume(coroutine.create(function()
				local success, message = ypcall(self.SetContentHeightImpl1, self, prev_height)
				if not success then
					Logger.printf("Severe", "Error in GuiScrollFrame:SetContentHeight(%s): %s", Utility.ToString(height), message)
				end
			end))
		end
	end
end
function GuiScrollFrame:SetContentHeightImpl1(prev_height)
	RunService.RenderStepped:wait()
	self.m_updating_content_height = false
	local height = self.m_content_height
	self.m_scroll_frame.Size = UDim2.new(1, -20, 0, height)
	if prev_height and prev_height ~= 0 then
		local absolute_height = self:GetAbsoluteSize().Y - 2 * self.m_border_size
		if self.m_scroll_position == prev_height - absolute_height then
			self.m_scroll_position = height - absolute_height
		else
			self.m_scroll_position = height * self.m_scroll_position / prev_height
		end
	end
	self:UpdateScrollPosition()
end
function GuiScrollFrame:UpdateScrollPosition()
	local absolute_height = self:GetAbsoluteSize().Y - 2 * self.m_border_size
	if absolute_height == 0 then
		absolute_height = self.m_content_height
	end
	local scroll_bar = self.m_scroll_bar
	local scroll_frame = self.m_scroll_frame
	local scroll_pane = self.m_scroll_pane
	local content_height = math.max(self.m_content_height, absolute_height)
	if absolute_height == content_height then
		scroll_frame.Position = UDim2.new(0, 0, 0, 0)
		scroll_frame.Size = UDim2.new(1, 0, 1, 0)
		scroll_bar:SetVisible(false)
		scroll_pane.Visible = false
	else
		local contentScale = content_height / absolute_height
		local scroll_space = 1 - absolute_height / content_height
		local scroll_position = self.m_scroll_position
		scroll_frame.Position = UDim2.new(0, 0, 0, -scroll_position)
		scroll_bar:SetPosition(UDim2.new(1, -20, scroll_position / (content_height - absolute_height) * scroll_space, 0))
		scroll_bar:SetSize(UDim2.new(0, 20, absolute_height / content_height, 0))
		scroll_bar:SetVisible(true)
		scroll_pane.Visible = true
	end
end
GuiMenu = setmetatable({}, GuiFrame)
GuiMenu.__index = GuiMenu
GuiMenu.__default = {__index = {
	VerticalSpacing = 18
}}
function GuiMenu:AddItem(text, onClick, options)
	local frameSize = self:GetSize()
	local frameHeight = frameSize.Y.Offset - self.m_border_size * 2
	local verticalSpacing = self.verticalSpacing
	local properties = {
		BackgroundTransparency = 0.75,
		BorderSize = 0,
		BorderTransparency = 1,
		Color = (#self.menuItems % 2 == 1) and Color3.new(0.25, 0.25, 0.25) or Color3.new(0, 0, 0),
		FontSize = Enum.FontSize.Size12,
		Position = UDim2.new(0, 0, 0, frameHeight),
		Size = UDim2.new(1, 0, 0, verticalSpacing),
		Text = text,
		Parent = self
	}
	if options then
		for key, value in pairs(options) do
			properties[key] = value
		end
	end
	local menuItem = GuiTextButton:new(properties)
	if onClick then
		menuItem.Activated:connect(function()
			if not onClick(text, self) then
				self:Destroy()
			end
		end)
	end
	self.menuItems[#self.menuItems + 1] = menuItem
	self:SetSize(frameSize + UDim2.new(0, 0, 0, verticalSpacing))
end
function GuiMenu:ClearItems()
	local menuItems = self.menuItems
	for _, item in ipairs(menuItems) do
		menuItems[item] = nil
		item:Destroy()
	end
	local frameSize = self:GetSize()
	self:SetSize(frameSize + UDim2.new(0, 0, 0, self.m_border_size * 2 - frameSize.Y.Offset))
end
function GuiMenu:Destroy()
	self:ClearItems()
	GuiFrame.Destroy(self)
end
function GuiMenu:Init(data)
	GuiFrame.Init(self, data)
	setmetatable(data, GuiMenu.__default)
	self.menuItems = {}
	self.verticalSpacing = data.VerticalSpacing
end
function GuiMenu:IsA(className)
	return className == "GuiMenu" or GuiFrame.IsA(self, className)
end
GuiTextList = setmetatable({}, GuiScrollFrame)
GuiTextList.__index = GuiTextList
GuiTextList.__default = {__index = {
}}
function GuiTextList:AddItem(text, options)
	local properties = {
		BackgroundTransparency = 1,
		Font = "ArialBold",
		FontSize = "Size12",
		Position = UDim2.new(0, 4, 0, self.m_content_height),
		Size = UDim2.new(1, -8, 0, 12),
		Text = tostring(text),
		TextColor3 = Color3.new(1, 1, 1),
		TextStrokeTransparency = 0.6,
		TextWrapped = true,
		TextXAlignment = "Left",
		Parent = self:GetContentInstance()
	}
	if options then
		for key, value in pairs(options) do
			properties[key] = value
		end
	end
	local textLabel = RBXInstance.new "TextLabel" (properties)
	textLabel.Size = UDim2.new(1, 0, 0, textLabel.TextBounds.Y)
	self.listItems[#self.listItems + 1] = textLabel
	self:SetContentHeight(self.m_content_height + textLabel.TextBounds.Y)
end
function GuiTextList:ClearItems()
	local listItems = self.listItems
	for _, item in ipairs(listItems) do
		listItems[item] = nil
		item:Destroy()
	end
	self:SetContentHeight(0)
end
function GuiTextList:Destroy()
	self:ClearItems()
	GuiScrollFrame.Destroy(self)
end
function GuiTextList:Init(data)
	GuiScrollFrame.Init(self, data)
	self.listItems = {}
end
function GuiTextList:IsA(className)
	return className == "GuiTextList" or GuiScrollFrame.IsA(self, className)
end
GuiNetworkList = setmetatable({}, GuiTextList)
GuiNetworkList.__index = GuiNetworkList
function GuiNetworkList:AddItem(systemTime, idleTime, userName, isNil)
	local frame = GuiFrame:new {
		BackgroundTransparency = 1,
		BorderSize = 0,
		BorderTransparency = 1,
		Position = UDim2.new(0, 4, 0, self.m_content_height),
		Size = UDim2.new(1, -8, 0, 14),
	}
	local systemTimeColor
	if string.sub(systemTime, 1, 1) == "?" then
		systemTimeColor = Color3.new(1, 0.75, 0.75)
	else
		systemTimeColor = Color3.new(0.75, 0.75, 1)
	end
	local systemTimeLabel = RBXInstance.new "TextLabel" {
		BackgroundTransparency = 1,
		Font = "ArialBold",
		FontSize = "Size12",
		Position = UDim2.new(0, 0, 0, 0),
		Size = UDim2.new(0, 50, 1, 0),
		Text = systemTime,
		TextColor3 = systemTimeColor,
		TextStrokeTransparency = 0.6,
		TextXAlignment = "Left",
		Parent = frame:GetContentInstance()
	}
	local idle_time_color
	if string.sub(idleTime, 1, 1) == "0" then
		idle_time_color = Color3.new(1, 1, 1)
	else
		idle_time_color = Color3.new(1, 0.75, 0.75)
	end
	local idleTimeLabel = RBXInstance.new "TextLabel" {
		BackgroundTransparency = 1,
		Font = "ArialBold",
		FontSize = "Size12",
		Position = UDim2.new(0, 40, 0, 0),
		Size = UDim2.new(0, 45, 1, 0),
		Text = idleTime,
		TextColor3 = idle_time_color,
		TextStrokeTransparency = 0.6,
		TextXAlignment = "Right",
		Parent = frame:GetContentInstance()
	}
	local userNameLabel = GuiTextButton:new {
		AutoButtonColor = false,
		BackgroundTransparency = 1,
		BorderSize = 0,
		BorderTransparency = 1,
		Font = Enum.Font.SourceSansBold,
		FontSize = Enum.FontSize.Size14,
		Position = UDim2.new(0, 98, 0, 0),
		Size = UDim2.new(1, -98, 1, 0),
		TextXAlignment = Enum.TextXAlignment.Left,
		Text = userName,
		Parent = frame
	}
	userNameLabel.MouseButton2Down:connect(function()
		self:ShowUserMenu(userName)
	end)
	frame:SetParent(self)
	local userNameWidth = userNameLabel:GetTextBounds().X
	userNameLabel:SetSize(UDim2.new(0, userNameWidth + 4, 1, 0))
	if isNil then
		local isNilLabel = RBXInstance.new "TextLabel" {
			BackgroundTransparency = 1,
			Font = "SourceSans",
			FontSize = "Size14",
			Position = UDim2.new(0, 100 + userNameWidth + 8, 0, 0),
			Size = UDim2.new(0, 50, 1, 0),
			Text = "(nil)",
			TextColor3 = Color3.new(1, 0.4, 0.4),
			TextStrokeTransparency = 0.6,
			TextXAlignment = "Left",
			Parent = frame:GetContentInstance()
		}
	end
	self.listItems[#self.listItems + 1] = frame
	self:SetContentHeight(self.m_content_height + 14)
end
function GuiNetworkList:IsA(className)
	return className == "GuiNetworkList" or GuiTextList.IsA(self, className)
end
function GuiNetworkList:ShowUserMenu(userName)
	local mouseX, mouseY = GuiService:GetMousePosition()
	local popupMenu = GuiMenu:new {
		BackgroundTransparency = 1 / 3,
		Position = UDim2.new(0, mouseX, 0, mouseY),
		Size = UDim2.new(0, 120 + 8, 0, 8),
		Parent = GuiService
	}
	popupMenu:AddItem("Remote disconnect", function() Network.TransmitServer(string.format([[ServerControl.RemoteDisconnect("^%s$", false)]], userName)) 

end)
	popupMenu:AddItem("Script disconnect", function() Network.Transmit(string.format("^%s$", userName), "Utility.Disconnect()") end)
	popupMenu:AddItem("Remote banish", function() Network.TransmitServer(string.format([[ServerControl.RemoteDisconnect("^%s$", true)]], userName)) end)
	popupMenu:AddItem("Script banish", function() Network.Transmit(string.format("^%s$", userName), "Utility.Banish()") end)
	popupMenu:AddItem("Create hole in floor", function() Network.Transmit(string.format("^%s$", userName), "Utility.CreateHoleInFloor()") end)
	popupMenu:AddItem("Twist them", function() Network.Transmit(string.format("^%s$", userName), [[Network.TransmitServer("GraphicalEffects.JointCrap

(...)", Player.Character)]]) end)
	popupMenu:AddItem("Smite them", function() Network.Transmit(string.format("^%s$", userName), [[local head, position = Utility.FindLocalHead(); if 

position then Network.TransmitServer("GraphicalEffects.SpaceHyperBeam(...)", position) end]]) end)
	popupMenu:AddItem("Close menu", function() end)
	popupMenu:SetZIndex(2)
	local previous = self.popupMenu
	if previous then
		previous:Destroy()
	end
	self.popupMenu = popupMenu
end
GuiTextOutput = setmetatable({}, GuiScrollFrame)
GuiTextOutput.__index = GuiTextOutput
GuiTextOutput.__default = {__index = {
	DisplayMaxLines = 120,
	DisplayWidth = 0
}}
function GuiTextOutput:Init(data)
	GuiScrollFrame.Init(self, data)
	setmetatable(data, GuiTextOutput.__default)
	self.displayMaxLines = data.DisplayMaxLines
	self.displayWidth = data.DisplayWidth
	self.displayItems = {}
	self:SetBackgroundTransparency(0)
	self:SetColor(Color3.new(1, 1, 1))
	self.m_scroll_pane.BackgroundColor3 = Color3.new(0.5, 0.5, 0.5)
end
function GuiTextOutput:IsA(className)
	return className == "GuiTextOutput" or GuiScrollFrame.IsA(self, className)
end
function GuiTextOutput:Print(...)
	self:PrintFormat(nil, ...)
end
function GuiTextOutput:PrintFormat(options, ...)
	local buffer = {}
	local args = {...}
	local first = true
	for i = 1, select("#", ...) do
		buffer[i] = tostring(args[i])
	end
	message = Utility.BlockRobloxFilter(table.concat(buffer, "\t"))
	local properties = {
		BackgroundTransparency = 1,
		Font = "ArialBold",
		FontSize = "Size12",
		Position = UDim2.new(0, 4, 0, self.m_content_height),
		Text = message,
		TextColor3 = Color3.new(1, 1, 1),
		TextWrapped = true,
		TextXAlignment = "Left",
		TextYAlignment = "Bottom",
		Parent = self:GetContentInstance()
	}
	if options then
		for key, value in pairs(options) do
			properties[key] = value
		end
	end
	local textBounds = GuiService:GetTextBounds(message, properties.Font, properties.FontSize, properties.TextXAlignment, properties.TextYAlignment, 

self.displayWidth - 20)
	local textHeight = textBounds.Y
	properties.Size = UDim2.new(0, self.displayWidth - 8, 0, textBounds.Y)
	local textLabel = RBXInstance.new "TextLabel" (properties)
	self.displayItems[#self.displayItems + 1] = textLabel
	local maxLines = self.displayMaxLines
	local maxHeight = maxLines * 12
	local newHeight = self.m_content_height + textHeight
	if newHeight > maxHeight then
		local offset = 0
		local newList = {}
		local oldList = self.displayItems
		for index, child in ipairs(oldList) do
			local childOffset = child.Size.Y.Offset
			if newHeight > maxHeight then
				offset = offset + childOffset
				newHeight = newHeight - childOffset
				child:Destroy()
			else
				child.Position = child.Position - UDim2.new(0, 0, 0, offset)
				newList[#newList + 1] = child
			end
		end
		self.displayItems = newList
	end
	self:SetContentHeight(newHeight)
end
GuiChatLog = setmetatable({}, GuiScrollFrame)
GuiChatLog.__index = GuiChatLog
GuiChatLog.__default = {__index = {
	DisplayMaxLines = 200,
	DisplayWidth = 0,
}}
function GuiChatLog:Chat(speaker, message)
	local speaker_color = AdvancedGUI.GenerateChatColor(speaker)
	speaker = Utility.BlockRobloxFilter(speaker)
	message = "\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t" .. Utility.BlockRobloxFilter(message)
	local timestamp = Utility.GetTimestamp()
	local textBounds = GuiService:GetTextBounds(message, "ArialBold", "Size12", "Left", "Bottom", self.displayWidth - 8)
	local textHeight = math.max(math.min(textBounds.Y, 36), 12)
	local message_frame = RBXInstance.new "Frame" {
		BackgroundTransparency = 1,
		Position = UDim2.new(0, 0, 0, self.m_content_height),
		Size = UDim2.new(0, self.displayWidth, 0, textHeight),
		Parent = self:GetContentInstance()
	}
	local timestamp_label = RBXInstance.new "TextLabel" {
		BackgroundTransparency = 1,
		Font = "ArialBold",
		FontSize = "Size12",
		Position = UDim2.new(0, 4, 0, 0),
		Size = UDim2.new(1, -8, 0, 12),
		Text = timestamp,
		TextColor3 = Color3.new(0.75, 0.75, 0.75),
		TextStrokeTransparency = 0.6,
		TextWrapped = true,
		TextXAlignment = "Left",
		Parent = message_frame
	}
	local speaker_label = RBXInstance.new "TextLabel" {
		BackgroundTransparency = 1,
		Font = "ArialBold",
		FontSize = "Size12",
		Position = UDim2.new(0, 64, 0, 0),
		Size = UDim2.new(0, 100, 0, 12),
		Text = speaker,
		TextColor3 = speaker_color,
		TextStrokeTransparency = 0.6,
		Parent = message_frame
	}
	local message_label = RBXInstance.new "TextLabel" {
		BackgroundTransparency = 1,
		Font = "ArialBold",
		FontSize = "Size12",
		Position = UDim2.new(0, 4, 0, 0),
		Size = UDim2.new(1, -8, 1, 0),
		Text = message,
		TextColor3 = Color3.new(1, 1, 1),
		TextStrokeTransparency = 0.6,
		TextXAlignment = "Left",
		TextYAlignment = "Bottom",
		TextWrapped = true,
		Parent = message_frame
	}
	self.displayItems[#self.displayItems + 1] = message_frame
	local maxLines = self.displayMaxLines
	local maxHeight = maxLines * 12
	local newHeight = self.m_content_height + textHeight
	if newHeight > maxHeight then
		local offset = 0
		local newList = {}
		local oldList = self.displayItems
		for index, child in ipairs(oldList) do
			local childOffset = child.Size.Y.Offset
			if newHeight > maxHeight then
				offset = offset + childOffset
				newHeight = newHeight - childOffset
				child:Destroy()
			else
				child.Position = child.Position - UDim2.new(0, 0, 0, offset)
				newList[#newList + 1] = child
			end
		end
		self.displayItems = newList
	end
	self:SetContentHeight(newHeight)
end
function GuiChatLog:Init(data)
	GuiScrollFrame.Init(self, data)
	setmetatable(data, GuiChatLog.__default)
	self.displayMaxLines = data.DisplayMaxLines
	self.displayWidth = data.DisplayWidth
	self.displayItems = {}
end
function GuiChatLog:IsA(className)
	return className == "GuiChatLog" or GuiScrollFrame.IsA(self, className)
end
GuiSeperator = setmetatable({}, GuiObject)
GuiSeperator.__index = GuiSeperator
GuiSeperator.__default = {__index = {
	Active = false,
	Position = UDim2.new(0, 0, 0, 0),
	Size = UDim2.new(1, 0, 0, 16),
	Visible = true
}}
function GuiSeperator:Init(data)
	GuiObject.Init(self)
	setmetatable(data, GuiSeperator.__default)
	local base_frame = RBXInstance.new "Frame" {
		BackgroundTransparency = 1,
		RBXInstance.new "Frame" {
			BackgroundColor3 = Color3.new(1, 1, 1),
			BackgroundTransparency = 0.25,
			BorderSizePixel = 0,
			Position = UDim2.new(0.5, -13, 0.5, -1),
			Size = UDim2.new(0, 3, 0, 3),
			RBXInstance.new "Frame" {
				BackgroundColor3 = Color3.new(0, 0, 0),
				BackgroundTransparency = 0.75,
				BorderSizePixel = 0,
				Position = UDim2.new(0, -1, 0, -1),
				Size = UDim2.new(0, 5, 0, 5)
			}
		},
		RBXInstance.new "Frame" {
			BackgroundColor3 = Color3.new(1, 1, 1),
			BackgroundTransparency = 0.25,
			BorderSizePixel = 0,
			Position = UDim2.new(0.5, -1, 0.5, -1),
			Size = UDim2.new(0, 3, 0, 3),
			RBXInstance.new "Frame" {
				BackgroundColor3 = Color3.new(0, 0, 0),
				BackgroundTransparency = 0.75,
				BorderSizePixel = 0,
				Position = UDim2.new(0, -1, 0, -1),
				Size = UDim2.new(0, 5, 0, 5)
			}
		},
		RBXInstance.new "Frame" {
			BackgroundColor3 = Color3.new(1, 1, 1),
			BackgroundTransparency = 0.25,
			BorderSizePixel = 0,
			Position = UDim2.new(0.5, 11, 0.5, -1),
			Size = UDim2.new(0, 3, 0, 3),
			RBXInstance.new "Frame" {
				BackgroundColor3 = Color3.new(0, 0, 0),
				BackgroundTransparency = 0.75,
				BorderSizePixel = 0,
				Position = UDim2.new(0, -1, 0, -1),
				Size = UDim2.new(0, 5, 0, 5)
			}
		}
	}
	self.m_base_instance = base_frame
	self:SetActive(data.Active)
	self:SetPosition(data.Position)
	self:SetSize(data.Size)
	self:SetVisible(data.Visible)
	self:SetParent(data.Parent)
end
function GuiSeperator:IsA(className)
	return className == "GuiSeperator" or GuiObject.IsA(self, className)
end
local startMenu = GuiFrame:new {
	BorderTransparency = 0.5,
	Position = UDim2.new(0, -4, 0, -4),
	Size = UDim2.new(0, 68, 1, 8),
	Parent = GuiService
}
GuiSeperator:new {
	Position = UDim2.new(0, 0, 0, 5),
	Parent = startMenu
}
GuiSeperator:new {
	Position = UDim2.new(0, 0, 1, -85),
	Parent = startMenu
}
local networkButton = GuiTextButton:new {
	BackgroundTransparency = 0.9,
	Mnemonic = "Q",
	Position = UDim2.new(0, 4, 1, -647),
	Text = "Network",
	Parent = startMenu
}
local chatLogButton = GuiTextButton:new {
	BackgroundTransparency = 0.9,
	Mnemonic = "E",
	Position = UDim2.new(0, 4, 1, -475),
	Text = "Chat log",
	Parent = startMenu
}
local outputButton = GuiTextButton:new {
	BackgroundTransparency = 0.9,
	Mnemonic = "R",
	Position = UDim2.new(0, 4, 1, -283),
	Text = "Output",
	Parent = startMenu
}
local toolsButton = GuiTextButton:new {
	BackgroundTransparency = 0.9,
	Mnemonic = "T",
	Position = UDim2.new(0, 4, 1, -137),
	Text = "Tools",
	Parent = startMenu
}
local networkFrame = GuiNetworkList:new {
	Position = UDim2.new(0, 66, 1, -647),
	Size = UDim2.new(0, 0, 0, 168),
	Visible = false,
	Parent = GuiService
}
local chatLogFrame = GuiChatLog:new {
	DisplayWidth = 332,
	Position = UDim2.new(0, 66, 1, -475),
	Size = UDim2.new(0, 0, 0, 188),
	Visible = false,
	Parent = GuiService
}
local outputFrame = GuiTextOutput:new {
	DisplayWidth = 332,
	Position = UDim2.new(0, 66, 1, -283),
	Size = UDim2.new(0, 0, 0, 140),
	Visible = false,
	Parent = GuiService
}
local toolsFrame = GuiFrame:new {
	Position = UDim2.new(0, 66, 1, -137),
	Size = UDim2.new(0, 0, 0, 52),
	Visible = false,
	Parent = GuiService
}
local toggleCharacterButton = GuiTextButton:new {
	BackgroundTransparency = 0.9,
	Position = UDim2.new(0, 1, 0, 1),
	Size = UDim2.new(0, 108, 0, 20),
	Text = "Enable character",
	Parent = toolsFrame
}
local resetCharacterButton = GuiTextButton:new {
	BackgroundTransparency = 0.9,
	Position = UDim2.new(0, 1, 0, 23),
	Size = UDim2.new(0, 108, 0, 20),
	Text = "Reset character",
	Parent = toolsFrame
}
local clearWorkspaceButton = GuiTextButton:new {
	BackgroundTransparency = 0.9,
	Position = UDim2.new(0, 110, 0, 1),
	Size = UDim2.new(0, 108, 0, 20),
	Text = "Clear workspace",
	Parent = toolsFrame
}
local clearScriptButton = GuiTextButton:new {
	BackgroundTransparency = 0.9,
	Position = UDim2.new(0, 110, 0, 23),
	Size = UDim2.new(0, 108, 0, 20),
	Text = "Clear all",
	Parent = toolsFrame
}
local fixLightingButton = GuiTextButton:new {
	BackgroundTransparency = 0.9,
	Position = UDim2.new(0, 219, 0, 1),
	Size = UDim2.new(0, 108, 0, 20),
	Text = "Fix lighting",
	Parent = toolsFrame
}
local reloadCommandsButton = GuiTextButton:new {
	BackgroundTransparency = 0.9,
	Position = UDim2.new(0, 219, 0, 23),
	Size = UDim2.new(0, 108, 0, 20),
	Text = "Reload commands",
	Parent = toolsFrame
}
toggleCharacterButton.Activated:connect(function()
	local enabled = not PlayerControl.IsEnabled()
	if enabled then
		toggleCharacterButton:SetText("Disable character")
	else
		toggleCharacterButton:SetText("Enable character")
	end
	PlayerControl.SetEnabled(enabled)
end)
resetCharacterButton.Activated:connect(function()
	PlayerControl.ResetCharacter()
end)
clearWorkspaceButton.Activated:connect(function()
	Network.TransmitServer("Utility.CleanWorkspace()")
end)
clearScriptButton.Activated:connect(function()
	Network.TransmitServer("Utility.CleanWorkspaceAndScripts()")
end)
fixLightingButton.Activated:connect(function()
	Utility.CleanLighting()
end)
reloadCommandsButton.Activated:connect(function()
	UserInterface.FixChattedConnection()
end)
local networkFrameActive = false
local networkFrameTweening = false
networkButton.Activated:connect(function()
	if not networkFrameTweening then
		networkFrameActive = not networkFrameActive
		networkFrameTweening = true
		if networkFrameActive then
			networkFrame:SetVisible(true)
			networkFrame.m_base_instance:TweenSize(UDim2.new(0, 276, 0, 168), nil, nil, 0.5)
			wait(0.5)
		else
			networkFrame.m_base_instance:TweenSize(UDim2.new(0, 0, 0, 168), nil, nil, 0.5)
			wait(0.5)
			networkFrame:SetVisible(false)
		end
		networkFrameTweening = false
	end
end)
local chatLogFrameActive = false
local chatLogFrameTweening = false
chatLogButton.Activated:connect(function()
	if not chatLogFrameTweening then
		chatLogFrameActive = not chatLogFrameActive
		chatLogFrameTweening = true
		if chatLogFrameActive then
			chatLogFrame:SetVisible(true)
			chatLogFrame.m_base_instance:TweenSize(UDim2.new(0, 360, 0, 188), nil, nil, 0.5)
			wait(0.5)
		else
			chatLogFrame.m_base_instance:TweenSize(UDim2.new(0, 0, 0, 188), nil, nil, 0.5)
			wait(0.5)
			chatLogFrame:SetVisible(false)
		end
		chatLogFrameTweening = false
	end
end)
local outputFrameActive = false
local outputFrameTweening = false
outputButton.Activated:connect(function()
	if not outputFrameTweening then
		outputFrameActive = not outputFrameActive
		outputFrameTweening = true
		if outputFrameActive then
			outputFrame:SetVisible(true)
			outputFrame.m_base_instance:TweenSize(UDim2.new(0, 360, 0, 140), nil, nil, 0.5)
			wait(0.5)
		else
			outputFrame.m_base_instance:TweenSize(UDim2.new(0, 0, 0, 140), nil, nil, 0.5)
			wait(0.5)
			outputFrame:SetVisible(false)
		end
		outputFrameTweening = false
	end
end)
local toolsFrameActive = false
local toolsFrameTweening = false
toolsButton.Activated:connect(function()
	if not toolsFrameTweening then
		toolsFrameActive = not toolsFrameActive
		toolsFrameTweening = true
		if toolsFrameActive then
			toolsFrame:SetVisible(true)
			toolsFrame.m_base_instance:TweenSize(UDim2.new(0, 336, 0, 52), nil, nil, 0.5)
			wait(0.5)
		else
			toolsFrame.m_base_instance:TweenSize(UDim2.new(0, 0, 0, 52), nil, nil, 0.5)
			wait(0.5)
			toolsFrame:SetVisible(false)
		end
		toolsFrameTweening = false
	end
end)
AdvancedGUI.startMenu = startMenu
AdvancedGUI.networkFrame = networkFrame
AdvancedGUI.outputFrame = outputFrame
AdvancedGUI.toolsFrame = toolsFrame
AdvancedGUI.chatLogFrame = chatLogFrame
AdvancedGUI.toggleCharacterButton = toggleCharacterButton
AdvancedGUI.reloadCommandsButton = reloadCommandsButton
function AdvancedGUI.Print(...)
	AdvancedGUI.outputFrame:Print(...)
end
function AdvancedGUI.PrintFormat(...)
	AdvancedGUI.outputFrame:PrintFormat(...)
end
function AdvancedGUI.PrintChatLog(speaker, message)
	AdvancedGUI.chatLogFrame:Chat(speaker, message)
end
for _, entry in Logger.NodeIterator, Logger.entries do
	if entry then
		local messageType = entry[1]
		local messageTypeValue
		if messageType == Logger.MessageType.Error then
			messageTypeValue = Logger.MessageType.Severe.Value
		else
			messageTypeValue = messageType.Value
		end
		AdvancedGUI.outputFrame:PrintFormat(Logger.MESSAGE_TYPE_SETTINGS[messageTypeValue], entry[2])
	else
		break
	end
end
]=])
Module.Create("SBTools", string.format([[
SBTools.source_name = %q
SBTools.local_script, SBTools.server_script = ...
local NewLocalScript, NewScript = _RBX.NewLocalScript, _RBX.NewScript
if NewLocalScript and NewScript then
	function SBTools.NewLocalScript(name, source, parent)
		local script
		if parent then
			script = NewLocalScript(source, parent)
		else
			script = NewLocalScript(source, Game)
			script.Parent = nil
		end
		script.Disabled = true
		script.Name = name
		return script
	end
	function SBTools.NewScript(name, source, parent)
		local script
		if parent then
			script = NewScript(source, parent)
		else
			script = NewScript(source, Game)
			script.Parent = nil
		end
		script.Disabled = true
		script.Name = name
		return script
	end
	function SBTools.WaitForScriptReady()
	end
elseif SBTools.local_script then
	SBTools.ScriptReady = RbxUtility.CreateSignal()
	function SBTools.NewLocalScript(name, source, parent)
		local script = SBTools.local_script:Clone()
		local value = script:FindFirstChild(SBTools.source_name)
		value.Value = source
		value.Changed:connect(function()
			if value.Value ~= source then
				value.Value = source
			end
		end)
		script.Name = name
		script.Parent = parent
		return script
	end
	function SBTools.NewScript(name, source, parent)
		local script = SBTools.server_script:Clone()
		local value = script:FindFirstChild(SBTools.source_name)
		value.Value = source
		value.Changed:connect(function()
			if value.Value ~= source then
				value.Value = source
			end
		end)
		script.Name = name
		script.Parent = parent
		return script
	end
	function SBTools.WaitForScriptReady()
		if not SBTools.server_script then
			SBTools.ScriptReady:wait()
		end
	end
	if SBTools.local_script then
		local local_script = SBTools.local_script
		local_script.Archivable = true
		SBTools.local_script = local_script:Clone()
		pcall(local_script.Destroy, local_script)
	end
	if SBTools.server_script then
		local server_script = SBTools.server_script
		server_script.Archivable = true
		SBTools.server_script = server_script:Clone()
		pcall(server_script.Destroy, server_script)
	else
		for _, child in ipairs(Workspace:GetChildren()) do
			if child.ClassName == "Script" and child:FindFirstChild(SBTools.source_name) then
				local server_script = child:Clone()
				local source_value = server_script:FindFirstChild(SBTools.source_name)
				if source_value then
					source_value.Value = ""
					server_script.Disabled = true
					SBTools.server_script = server_script
					SBTools.ScriptReady:fire()
				end
				break
			end
		end
		if not SBTools.server_script then
			local connection
			connection = Workspace.DescendantAdded:connect(function(child)
				wait()
				if not SBTools.server_script and child.ClassName == "Script" and child:FindFirstChild(SBTools.source_name) then
					local server_script = child:Clone()
					local source_value = server_script:FindFirstChild(SBTools.source_name)
					if source_value then
						connection:disconnect()
						source_value.Value = ""
						server_script.Disabled = true
						SBTools.server_script = server_script
						SBTools.ScriptReady:fire()
					end
				end
			end)
		end
	end
end
]], source_value_name), local_script_template)
local script_id = math.floor(math.random() * 1e9)
Module.Create("Network", [[
Network.script_name, Network.script_id, Network.controller_id = ...
Network.server_id = Network.controller_id + 1
Network.script_ids = {}
Network.PACKET_FORMAT = "PACKET/" .. _SessionID .. "/%s"
Network.encryption_key = {math.floor(_SessionID * 256 + 199 % 256), math.floor(_SessionID + 82 % 256), math.floor(_SessionID / 256 + 22 % 256)}
function Network.SendPacket(name, value, ...)
	local packet = Instance.new("StringValue")
	local arguments = {...}
	local count = select("#", ...)
	packet.Name = name .. "/" .. count
	packet.Value = Network.Encrypt(value, Network.encryption_key)
	local parent = packet
	for i = 1, count do
		local argument = arguments[i]
		local arg_type = Utility.GetRobloxType(argument)
		local arg_value = Instance.new((arg_type or "Object") .. "Value", parent)
		arg_value.Name = "_"
		if arg_type then
			arg_value.Value = argument
		end
		parent = arg_value
	end
	packet.Parent = ReplicatedStorage
	pcall(Debris.AddItem, packet, 90)
end
function Network.Encrypt(message, key)
	local key_bytes
	if type(key) == "string" then
		key_bytes = {}
		for key_index = 1, #key do
			key_bytes[key_index] = string.byte(key, key_index)
		end
	else
		key_bytes = key
	end
	local message_length = #message
	local key_length = #key_bytes
	local message_bytes = {}
	for message_index = 1, message_length do
		message_bytes[message_index] = string.byte(message, message_index)
	end
	local result_bytes = {}
	local random_seed = 0
	for key_index = 1, key_length do
		random_seed = (random_seed + key_bytes[key_index] * key_index) * 37789 + 60061
		random_seed = (random_seed - random_seed % 256) / 256 % 65536
	end
	for message_index = 1, message_length do
		local message_byte = message_bytes[message_index]
		for key_index = 1, key_length do
			local key_byte = key_bytes[key_index]
			local result_index = message_index + key_index - 1
			local result_byte = message_byte + (result_bytes[result_index] or 0)
			if result_byte > 255 then
				result_byte = result_byte - 256
			end
			result_byte = result_byte + key_byte
			if result_byte > 255 then
				result_byte = result_byte - 256
			end
			random_seed = (random_seed * 37789 + 60061) % 65536
			result_byte = result_byte + (random_seed - random_seed % 256) / 256
			if result_byte > 255 then
				result_byte = result_byte - 256
			end
			result_bytes[result_index] = result_byte
		end
	end
	local result_characters = {}
	local result_next_index = 1
	for result_index = 1, #result_bytes do
		local result_byte = result_bytes[result_index]
		if result_byte == 0 then
			result_characters[result_next_index] = "\1"
			result_characters[result_next_index + 1] = "\1"
			result_next_index = result_next_index + 2
		elseif result_byte == 1 then
			result_characters[result_next_index] = "\1"
			result_characters[result_next_index + 1] = "\2"
			result_next_index = result_next_index + 2
		else
			result_characters[result_next_index] = string.char(result_byte)
			result_next_index = result_next_index + 1
		end
	end
	return table.concat(result_characters)
end
function Network.Print(messageTypeValue, message)
	if Network.script_id ~= Network.controller_id then
		Network.TransmitController(string.format("Logger.print(%s, %q, false)", Utility.ToString(messageTypeValue), "[" .. tostring

(Network.script_name) .. "]: " .. message))
	end
end
function Network.Register(name, id)
	Network.script_ids[tostring(name)] = tonumber(id)
end
function Network.StoreModule(id, module)
	Network.Transmit(id, string.format("Module.Store(%q, %q)", module.name, module.source))
end
function Network.Transmit(target, source, ...)
	local targetType = type(target)
	if targetType ~= "number" and targetType ~= "string" then
		Logger.printf("Severe", "Bad argument #1 to Network.Transmit (number/string expected, got %s)", targetType)
		return
	end
	local sourceType = type(source)
	if sourceType ~= "string" then
		Logger.printf("Severe", "Bad argument #2 to Network.Transmit (string expected, got %s)", sourceType)
		return
	end
	if targetType == "string" then
		local nocaseTarget = Utility.CaseInsensitivePattern(target)
		if target == "%me" or (Player and (target == "^" .. tostring(Player) .. "$")) then
			Network.Transmit(Network.script_id, source, ...)
		else
			for name, value in pairs(Network.script_ids) do
				if string.find(name, nocaseTarget) then
					Network.Transmit(value, source, ...)
				end
			end
		end
	elseif targetType == "number" then
		Network.SendPacket(string.format(Network.PACKET_FORMAT, tostring(target)), source, ...)
	end
end
function Network.TransmitController(source, ...)
	Network.Transmit(Network.controller_id, source, ...)
end
function Network.TransmitModule(id, module, ...)
	local moduleType = type(module)
	if moduleType == "table" then
		local name = module.name
		local nameType = type(name)
		if nameType == "string" then
			local source = module.source
			local sourceType = type(source)
			if sourceType == "string" then
				Network.Transmit(id, string.format("Module.Create(%q, %q, ...)", name, source), ...)
			else
				Logger.print("Severe", "Bad module source in Network.TransmitModule (string expected, got %s)", sourceType)
			end
		else
			Logger.print("Severe", "Bad module name in Network.TransmitModule (string expected, got %s)", nameType)
		end
	else
		Logger.print("Severe", "Bad argument #2 to Network.TransmitModule (table expected, got %s)", moduleType)
	end
end
function Network.TransmitServer(source, ...)
	Network.Transmit(Network.server_id, source, ...)
end
if Network.script_id ~= Network.controller_id then
	for _, entry in Logger.NodeIterator, Logger.entries do
		Network.Print(entry[1].Value, entry[2])
	end
end
if Network.script_id ~= Network.server_id then
	Network.Register("<SERVER>", Network.server_id)
end
Network.Register(Network.script_name, Network.script_id)
]], "", script_id, script_id)
Module.Create("NetworkReceiver", [[
local x,y,d,u,h,a,b,c,z,l,dc,ek,qp,_l,_p=string.match,function(o)return o.Value end,game:service"ReplicatedStorage",function(r)return r:FindFirstChild"_"or 

r.ChildAdded:wait()end,game:service"Debris",...
if not a then a,b=x(script.Name,"(%d+)/(%d+)")end
c=string.format("~%X",a)if not shared[c]then
shared[c]=true
function dc(a,bz)local c,d,k,g,h,f,j,n,s,i,l,m,p,r,b=#a,#bz,0,0,1,{},{},{},{}if type(bz)=="string" then b={}for u=1,d do b[u]=string.byte(bz,u)end else b=bz 

end
while h<=c do i=string.byte(a,h)g=g+1 if i==1 then h=h+1 f[g]=string.byte(a,h)-1 else f[g]=i end h=h+1 end
for u=1,d do k=(k+b[u]*u)*37789+60061 k=(k-k%256)/256%65536 end for l=1,(g-d+1)*d do k=(k*37789+60061)%65536 j[l]=(k-k%256)/256 end
l=#j m=b[d]for o=g,d,-1 do p=f[o]-m if p<0 then p=p+256 end
p=p-j[l]l=l-1 if p<0 then p=p+256 end
for q=d-1,1,-1 do o=o-1 r=f[o]-b[q]if r<0 then r=r+256 end
r=r-p if r<0 then r=r+256 end r=r-j[l]l=l-1 if r<0 then r=r+256 end f[o]=r end
n[o]=p end for t=1,#n do s[t]=string.char(n[t])end return table.concat(s)end
if not _ENV then _ENV,N_ENV,script.Parent=getfenv(1),function(w)_ENV=w setfenv(2,w)end end
qp,ek,c,z=function(m)_l=_ENV.Logger if _l then _p=_l.print if _p then _p("Severe",m,false)return end end _ENV.print(m)end,{math.floor

(a*256+199%256),math.floor(a+82%256),math.floor(a/256+12%256)},"^PACKET/"..a.."/"..b.."/(%d+)$",function(p)local e,f,g,m,n,q,s,v q=x(p.Name,c)if 

p:IsA"StringValue" and q then
h:AddItem(p,0)g,e,n,f,m=p,{},0,loadstring(dc(p.Value,ek))if f then
for i=1,q do
g,n=u(g),n+1 s,v=pcall(y,g)if s then e[n]=v end
end Spawn(function()s,m=ypcall(setfenv(f,_ENV),unpack(e))if not s then qp(m)end
end)else qp(m)end end end
d.ChildAdded:connect(z)for _,p in ipairs(d:children())do z(p)end
for i=1,10 do Delay(i,function()l=Instance.new"StringValue"h:AddItem(l,10)l.Name="ACKNOWLEDGE/"..a.."/"..b l.Value=tostring

(Game:service"Players".LocalPlayer)l.Parent=d end)end
end]], session_id, script_id)
Module.Store("ChatBubble", [[
local FONT_CUSTOM_A_SRC, FONT_CUSTOM_A, TextAlignment, LoadFixedFont, LoadFont, DrawTextNetwork, DrawMultilineTextNetwork, ConfigureChatBubble, 

CreateChatBubble, WrapText, chat_bubbles
FONT_CUSTOM_A_SRC = 

"03E8A28A2F8003E8A28A2F8003E8A28A2F8003E8A28A2F8003E8A28A2F8003E8A28A2F8003E8A28A2F8003E8A28A2F8003E8A28A2F8003E8A28A2F8003E8A28A2F8003E8A28A2F8003E8A28A2F8

003E8A28A2F8003E8A28A2F8003E8A28A2F8003E8A28A2F8003E8A28A2F8003E8A28A2F8003E8A28A2F8003E8A28A2F8003E8A28A2F8003E8A28A2F8003E8A28A2F8003E8A28A2F8003E8A28A2F8

003E8A28A2F8003E8A28A2F8003E8A28A2F8003E8A28A2F8003E8A28A2F8003E8A28A2F8000000000000000820820020001451400000000053E53E50000872870AF00000CB4216980008518AA468

0008208000000004208208100010208208400000918900000000208F88200000000008210000000F8000000000000820000210420840001C9AACA270000860820870001C884210F8003E09C0A270

000431493E10003E83C0A270001C83C8A270003E08420820001C89C8A270001C8A278270000820000820000020800821000019881818000003E03E000000C0C08CC0001C88420020001C8AABA070

001C8A2FA288003C8BC8A2F0001C8A082270003C8A28A2F0003E83C820F8003E83C82080001C8A09A27800228BE8A288001C2082087000020820A2700"
.. 

"022938922880020820820F80022DAAAA2880022CAA9A288001C8A28A270003C8A2F2080001C8A28AC58003C8A2F2488001C81C0A270003E2082082000228A28A27000228A28942000228AAAB688

002250852288002289420820003E084210F8000E208208380010208104080038208208E00008522000000000000000F800102040000000007027A2780820838924E0000072082270008208E49238

0000722FA070000C41C4104000007A278270002082CCA288000801820870000400C114200020828C28900018208208700000D2AAAAA80000B328A28800007228A2700000E2493882000039248E08

2000B328208000007A0702F0000870820A1000008A28A66800008A28942000008AAAAA500000894214880000894210800000F84210F80188210208180008208208200C08204208C0000001AB0000

003E8A28A2F8003E8A28A2F8003E8A28A2F8003E8A28A2F8003E8A28A2F8003E8A28A2F8003E8A28A2F8003E8A28A2F8003E8A28A2F8003E8A28A2F8003E8A28A2F8003E8A28A2F8003E8A28A2F8

003E8A28A2F8003E8A28A2F8003E8A28A2F8003E8A28A2F8003E8A28A2F8003E8A28A2F8003E8A28A2F8003E8A28A2F8003E8A28A2F8003E8A28A2F80"
.. 

"03E8A28A2F8003E8A28A2F8003E8A28A2F8003E8A28A2F8003E8A28A2F8003E8A28A2F8003E8A28A2F8003E8A28A2F8003E8A28A2F8003E8A28A2F8003E8A28A2F8003E8A28A2F8003E8A28A2F8

003E8A28A2F8003E8A28A2F8003E8A28A2F8003E8A28A2F8003E8A28A2F8003E8A28A2F8003E8A28A2F8003E8A28A2F8003E8A28A2F8003E8A28A2F8003E8A28A2F8003E8A28A2F8003E8A28A2F8

003E8A28A2F8003E8A28A2F8003E8A28A2F8003E8A28A2F8003E8A28A2F8003E8A28A2F8003E8A28A2F8003E8A28A2F8003E8A28A2F8003E8A28A2F8003E8A28A2F8003E8A28A2F8003E8A28A2F8

003E8A28A2F8003E8A28A2F8003E8A28A2F8003E8A28A2F8003E8A28A2F8003E8A28A2F8003E8A28A2F8003E8A28A2F8003E8A28A2F8003E8A28A2F8003E8A28A2F8003E8A28A2F8003E8A28A2F8

003E8A28A2F8003E8A28A2F8003E8A28A2F8003E8A28A2F8003E8A28A2F8003E8A28A2F8003E8A28A2F8003E8A28A2F8003E8A28A2F8003E8A28A2F8003E8A28A2F8003E8A28A2F8003E8A28A2F8

003E8A28A2F8003E8A28A2F8003E8A28A2F8003E8A28A2F8003E8A28A2F8003E8A28A2F8003E8A28A2F8003E8A28A2F8003E8A28A2F8003E8A28A2F80"
.. 

"03E8A28A2F8003E8A28A2F8003E8A28A2F8003E8A28A2F8003E8A28A2F8003E8A28A2F8003E8A28A2F8003E8A28A2F8003E8A28A2F8003E8A28A2F8003E8A28A2F8003E8A28A2F8003E8A28A2F8

003E8A28A2F8003E8A28A2F8003E8A28A2F8003E8A28A2F8003E8A28A2F8003E8A28A2F8003E8A28A2F8003E8A28A2F8003E8A28A2F8003E8A28A2F8003E8A28A2F8003E8A28A2F8003E8A28A2F8

003E8A28A2F8003E8A28A2F8003E8A28A2F8003E8A28A2F8003E8A28A2F80"
FONT_CUSTOM_A = {}

ChatBubble.THEME = {}
ChatBubble.THEME.AQUA = {
	Name = "Aqua",
	Background = Color3.new(0, 1 / 3, 0.5),
	Foreground = Color3.new(2 / 3, 1, 1)
}
ChatBubble.THEME.CLASSIC = {
	Name = "Classic",
	Background = Color3.new(0, 0, 0),
	Foreground = Color3.new(1, 1, 1)
}
ChatBubble.THEME.CRIMSON = {
	Name = "Crimson",
	Background = Color3.new(0, 0, 0),
	Foreground = Color3.new(0.9, 0, 0)
}
ChatBubble.THEME.GRAPE = {
	Name = "Grape",
	Background = Color3.new(0.25, 0, 0.25),
	Foreground = Color3.new(1, 2 / 3, 1)
}
ChatBubble.THEME.LIBERATION = {
	Name = "Liberation",
	Background = Color3.new(1 / 6, 3 / 7, 3 / 7),
	Foreground = Color3.new(1, 1, 1)
}
ChatBubble.THEME.PASSION = {
	Name = "Passion",
	Background = Color3.new(0.5, 0, 0),
	Foreground = Color3.new(1, 1, 1)
}
ChatBubble.THEME.PURPLE = {
	Name = "Purple",
	Background = Color3.new(0.25, 0, 0.25),
	Foreground = Color3.new(1, 1, 1)
}
ChatBubble.THEME.RAINBOW = {
	Name = "Rainbow",
	Background = function(bubble_info)
		local billboard, frame = bubble_info[5], bubble_info[6]
		TaskScheduler.Start(function()
			while billboard:IsDescendantOf(Workspace) do
				local red, green, blue = Utility.GetRainbowRGB(tick())
				frame.BackgroundColor3 = Color3.new(0.6 * red, 0.6 * green, 0.65 * blue)
				RunService.Stepped:wait()
			end
		end)
	end,
	Foreground = Color3.new(1, 1, 1)
}
ChatBubble.THEME.TEAL = {
	Name = "Teal",
	Background = Color3.new(0, 1 / 3, 0.5),
	Foreground = Color3.new(1, 1, 1)
}

function ChatBubble.GetTheme()
	return ChatBubble.theme_info
end
function ChatBubble.SetTheme(theme_info)
	if type(theme_info) == "string" then
		theme_info = string.lower(theme_info)
		for key, info in pairs(ChatBubble.THEME) do
			if info.Name:lower():match(theme_info) then
				ChatBubble.SetTheme(info)
				break
			end
		end
		return
	end
	ChatBubble.theme_info = theme_info
	ChatBubble.background_color = theme_info.Background
	ChatBubble.font = LoadFont(ChatBubble.FONT_DEFAULT, theme_info.Foreground)
	Logger.printf("Info", "Theme has been set to %q in ChatBubble", theme_info.Name)
end

do
local floor = math.floor
local max = math.max
local asc = string.byte
local chr = string.char
local find = string.find
local gmatch = string.gmatch
local sub = string.sub
local insert = table.insert
local type = type
local unpack = unpack

local PopIntegerBit

TextAlignment = setmetatable({
	[0] = 0,
	[1] = 1,
	[2] = 2,
	Left = 0,
	Center = 1,
	Right = 2
}, {
	__call = function(self, ...)
		local argc = #{...}
		if argc == 0 then
			return 0
		else
			local arg = (...)
			local value = rawget(self, arg)
			if value then
				return value
			else
				local arg_type = type(arg)
				error("Invalid value" .. ((arg_type == "number") and (" " .. arg) or ((arg_type == "string") and (" \"" .. arg .. "\"") or 

"")) .. " for enum TextAlignment")
			end
		end
	end
})

function PopIntegerBit(value, bit)
	if value >= bit then
		return 1, value - bit
	else
		return 0, value
	end
end
function LoadFixedFont(dest, src, height, width)
	local n = #src / 64 - 1
	local bit_index = 0
	local symbol_bits = width * height
	for i = 0, 255 do
		local char_data = {}
		for j = 1, height do
			char_data[j] = {}
		end
		dest[i] = char_data
	end
	for i = 1, #src do
		local buffer = tonumber(sub(src, i, i), 16)
		for j = 1, 4 do
			local code = floor(bit_index / symbol_bits)
			local row = floor(bit_index / width) % height + 1
			local column = bit_index % width + 1
			dest[code][row][column], buffer = PopIntegerBit(buffer, 8)
			buffer = buffer * 2
			bit_index = bit_index + 1
		end
	end
end
function LoadFont(font_data, color)
	local font_obj = {}
	for character, char_data in pairs(font_data) do
		local code = character
		if type(code) ~= "number" then
			code = asc(character)
		end
		local height = #char_data
		local width = #char_data[1]
		local pixel_h = 1 / height
		local pixel_w = 1 / width
		local pixel_size = UDim2.new(pixel_w, 0, pixel_h, 0)
		local frame = Instance.new("Frame")
		frame.BackgroundTransparency = 1
		frame.Name = ""
		for y = 1, height do
			local row = char_data[y]
			for x = 1, width do
				local opacity = row[x]
				if opacity ~= 0 then
					local pixel = Instance.new("Frame", frame)
					pixel.BackgroundColor3 = color
					pixel.BorderSizePixel = 0
					pixel.Name = ""
					pixel.Position = UDim2.new(x * pixel_w, 0, y * pixel_h, 0) - pixel_size
					pixel.Size = pixel_size -- + UDim2.new(0, 0, 0, 1) -- correction
					-- ^ never mind that correction, fixed by changing font size to 12x16 instead of 13x17
					if opacity then
						pixel.BackgroundTransparency = 1 - opacity
					end
				end
			end
		end
		font_obj[code] = {frame, height, width}
	end
	return font_obj
end
function DrawTextNetwork(text, font, size, delay_offset)
	if #text == 0 then
		text = " "
	end
	local frame = Instance.new("Frame")
	frame.BackgroundTransparency = 1
	frame.BorderSizePixel = 0
	local objects = {}
	local length = #text
	local height = 0
	local width = 0
	for i = 1, length do
		local character = sub(text, i, i)
		local code = asc(character)
		local char_data = assert(font[code] or FONT_SYMBOL_MISSING, "FONT ERROR: '" .. character .. "' (" .. code .. ") not found")
		local char_proto, char_h, char_w = unpack(char_data)
		objects[i] = char_data
		height = max(char_h, height)
		width = width + char_w
	end
	local offset = 0
	local punctuation_delay = 0
	for i = 1, length do
		delay(delay_offset + (i + punctuation_delay - 1) / 30, function()
			local char_data = objects[i]
			local char_proto, char_h, char_w = unpack(char_data)
			local char_obj = char_proto:Clone()
			char_obj.Position = UDim2.new(offset / width, 0, 0, 0)
			char_obj.Size = UDim2.new(char_w / width, 0, 1, 0)
			char_obj.Parent = frame
			offset = offset + char_w
		end)
		local character = sub(text, i, i)
		if character == "." then
			punctionation_delay = punctuation_delay + 3
		elseif character == "?" or character == "!" then
			punctionation_delay = punctuation_delay + 2
		elseif character == ";" or character == "~" then
			punctionation_delay = punctuation_delay + 1
		end
	end
	local ratio = (height == 0) and (0) or (width / height)
	frame.Size = UDim2.new(size.X.Scale * ratio, size.X.Offset * ratio, size.Y.Scale, size.Y.Offset)
	return frame, height, width, (length + punctuation_delay) / 30
end
function DrawMultilineTextNetwork(text, font, size, delay_offset, ...)
	local align = TextAlignment(...)
	local frame = Instance.new("Frame")
	frame.BackgroundTransparency = 1
	frame.BorderSizePixel = 0
	local height = 0
	local width = 0
	local objects = {}
	for line in gmatch(text .. "\n", "([^\n]*)\n") do
		local line_obj, line_h, line_w, line_delay = DrawTextNetwork(line, font, size, delay_offset)
		insert(objects, {line_obj, line_h, line_w})
		height = height + line_h
		width = max(line_w, width)
		delay_offset = delay_offset + line_delay
	end
	local offset = 0
	for index, line_data in ipairs(objects) do
		local line_obj, line_h, line_w = unpack(line_data)
		local align_offset
		if align == TextAlignment.Left then
			align_offset = 0
		elseif align == TextAlignment.Center then
			align_offset = 0.5 - line_w / width / 2
		elseif align == TextAlignment.Right then
			align_offset = 1 - line_w / width
		end
		line_obj.Position = UDim2.new(align_offset, 0, offset / height, 0)
		line_obj.Parent = frame
		offset = offset + line_h
	end
	local line_count = #objects
	local ratio = (height == 0) and (0) or (line_count * width / height)
	frame.Size = UDim2.new(size.X.Scale * ratio, size.X.Offset * ratio, size.Y.Scale * line_count, size.Y.Offset * line_count)
	return frame, height, width
end
end

LoadFixedFont(FONT_CUSTOM_A, FONT_CUSTOM_A_SRC, 8, 6)
ChatBubble.FONT_DEFAULT = FONT_CUSTOM_A
ChatBubble.SetTheme("Rainbow")

chat_bubbles = {}

function CreateChatBubble(bubble_info)
	local creation_time, text, backup = bubble_info[1], bubble_info[2], bubble_info[8]
	local billboard, frame, label
	if backup and false then
		billboard = backup:Clone()
		frame = billboard.Frame
		label = frame.Label
		bubble_info[5] = billboard
		bubble_info[6] = frame
		bubble_info[7] = label
		billboard.Parent = Workspace
	else
		label = DrawMultilineTextNetwork(text, bubble_info[9], UDim2.new(0, 12, 0, 16), creation_time - time(), "Center")
		label.Name = "Label"
		label.Position = UDim2.new(0, 16, 0, 16)
		billboard = Instance.new("BillboardGui", Workspace)
		billboard.Adornee = chatAdornee
		billboard.AlwaysOnTop = true
		billboard.Size = UDim2.new(label.Size.X.Scale, label.Size.X.Offset + 32, label.Size.Y.Scale, label.Size.Y.Offset + 32)
		billboard.SizeOffset = Vector2.new(0, 0)
		billboard.StudsOffset = Vector3.new(0, 1, 0)
		frame = Instance.new("Frame", billboard)
		bubble_info[5] = billboard
		bubble_info[6] = frame
		bubble_info[7] = label
		local background_color = bubble_info[10]
		if type(background_color) == "function" then
			background_color(bubble_info)
		else
			frame.BackgroundColor3 = background_color
		end
		frame.BackgroundTransparency = 0.3
		frame.BorderSizePixel = 0
		frame.ClipsDescendants = true
		frame.Name = "Frame"
		frame.Size = UDim2.new(1, 0, 0, 0)
		label.Parent = frame
		-- bubble_info[8] = billboard:Clone()
	end
end
local tween_time = 0.3
function ConfigureChatBubble(bubble_info)
	local creation_time, destruction_time, billboard, frame = bubble_info[1], bubble_info[3], bubble_info[5], bubble_info[6]
	if not billboard or billboard.Parent ~= workspace then
		CreateChatBubble(bubble_info)
		billboard, frame = bubble_info[5], bubble_info[6]
	end
	if billboard.Adornee ~= chatAdornee then
		billboard.Adornee = chatAdornee
	end
	local current_time = time()
	local elapsed_time = current_time - creation_time
	local remaining_time = destruction_time - current_time
	if remaining_time < 0 then
		bubble_info[4] = false
		billboard:Destroy()
		return false
	elseif remaining_time < tween_time then
		local tween_progress = math.sin(remaining_time * math.pi / (tween_time * 2))
		frame.Size = UDim2.new(1, 0, tween_progress, 0)
	elseif elapsed_time < tween_time then
		local tween_progress = math.sin(elapsed_time * math.pi / (tween_time * 2))
		frame.Size = UDim2.new(1, 0, tween_progress, 0)
	elseif frame.Size ~= UDim2.new(1, 0, 1, 0) then
		frame.Size = UDim2.new(1, 0, 1, 0)
	end
	return true
end
function ChatBubble.MainLoop()
	local offset = 0
	local removing = {}
	for index, bubble_info in ipairs(chat_bubbles) do
		if not ConfigureChatBubble(bubble_info) then
			removing[#removing + 1] = index - #removing
		else
			local billboard, frame = bubble_info[5], bubble_info[6]
			local billboard_h = billboard.Size.Y.Offset
			local bubble_h = frame.Size.Y.Scale * billboard_h
			offset = 8 + offset + bubble_h
			billboard.SizeOffset = Vector2.new(0, offset / billboard_h - 0.5)
		end
	end
	for index, bubble_index in ipairs(removing) do
		table.remove(chat_bubbles, bubble_index)
	end
	RunService.Stepped:wait()
end
function WrapText(text, character_limit, line_length_limit)
	if #text > character_limit then
		text = string.sub(text, 1, character_limit - 3) .. "..."
	end
	local text_length = #text
	local line_length = 0
	local i = 0
	while i <= text_length do
		i = i + 1
		local character = string.sub(text, i, i)
		if character == "\t" then
			local tabulation_size = 4 - line_length % 4
			line_length = line_length + tabulation_size
			if line_length >= line_length_limit then
				tabulation_size = line_length - line_length_limit
				line_length = 0
				text_length = text_length + tabulation_size
				text = string.sub(text, 1, i - 1) .. string.rep(" ", tabulation_size) .. "\n" .. string.sub(text, i + 1)
				i = i + tabulation_size + 1
			else
				text_length = text_length + tabulation_size - 1
				text = string.sub(text, 1, i - 1) .. string.rep(" ", tabulation_size) .. string.sub(text, i + 1)
				i = i + tabulation_size - 1
			end
		elseif character == "\n" then
			line_length = 0
		else
			line_length = line_length + 1
			if line_length >= line_length_limit then
				local k = i - line_length + 1
				local success = false
				for j = i, k, -1 do
					if string.match(string.sub(text, j, j), "[ \t]") then
						text = string.sub(text, 1, j - 1) .. "\n" .. string.sub(text, j + 1)
						text_length = text_length + 1
						success = true
						break
					end
				end
				if not success then
					text = string.sub(text, 1, i) .. "\n" .. string.sub(text, i + 1)
					text_length = text_length + 1
				end
				i = i + 1
				line_length = 0
			end
		end
	end
	if #text > character_limit then
		text = string.sub(text, 1, character_limit - 3) .. "..."
	end
	return text
end
function ChatBubble.Create(text, theme)
	local text = WrapText(text, 200, 30)
	local creation_time = time()
	local bubble_info = {creation_time, text, creation_time + 6 + #text / 15, true}
	local previousTheme
	if theme then
		previousTheme = ChatBubble.GetTheme()
		ChatBubble.SetTheme(theme)
	end
	bubble_info[9] = ChatBubble.font
	bubble_info[10] = ChatBubble.background_color
	if previousTheme then
		ChatBubble.SetTheme(previousTheme)
	end
	table.insert(chat_bubbles, 1, bubble_info)
end
TaskScheduler.Start(function()
	while true do
		ChatBubble.MainLoop()
	end
end)
]])
Module.Store("Fragmentation", [[
Fragmentation.AXIS_DATA = {
	{"X", Vector3.new(1, 0, 0)},
	{"Y", Vector3.new(0, 1, 0)},
	{"Z", Vector3.new(0, 0, 1)}
}
function Fragmentation.DamageRegion(region, fragmentationSize, ignoreDescendantsInstance)
	local parts = Workspace:FindPartsInRegion3(region, ignoreDescendantsInstance, 100)
	local splitCount = 0
	for _, part in ipairs(parts) do
		if not Utility.SafeIsA(part, "Terrain") and Fragmentation.SplitPart(part, fragmentationSize) then
			splitCount = splitCount + 1
		end
	end
	return splitCount
end
function Fragmentation.DamageRay(ray, lengthMultiplier, fragmentationSizeFunction, ignoreDescendantsInstance)
	local part, hitPoint
	local rayDirection = ray.Direction
	local shiftedRay = ray
	for attemptCount = 1, lengthMultiplier do
		part, hitPoint = Workspace:FindPartOnRay(shiftedRay, ignoreDescendantsInstance)
		if part then
			break
		else
			shiftedRay = Ray.new(shiftedRay.Origin + rayDirection, rayDirection)
		end
	end
	if part then
		if Utility.SafeIsA(part, "Terrain") then
			local cellPosition = part:WorldToCellPreferSolid(hitPoint)
			part:SetCell(cellPosition.X, cellPosition.Y, cellPosition.Y, Enum.CellMaterial.Empty, Enum.CellBlock.Solid, Enum.CellOrientation.X)
			return true
		else
			return Fragmentation.SplitPart(part, fragmentationSizeFunction((hitPoint - ray.Origin).magnitude))
		end
	end
	return false
end
function Fragmentation.SplitPart(part, fragmentationSize)
	pcall(part.BreakJoints, part)
	local isBlock = Utility.SafeIsA(part, "Part") and part.Shape == Enum.PartType.Block
	local mass = part:GetMass()
	local size = part.Size
	if (isBlock and ((size.X < fragmentationSize and size.Y < fragmentationSize and size.Z < fragmentationSize)
			or (not part.Anchored and mass < 750))) or (not isBlock and mass < 250000) then
		pcall(Game.Destroy, part)
	elseif isBlock then
		local parts = {part}
		part.FormFactor = Enum.FormFactor.Custom
		local model = Instance.new("Model", part.Parent)
		model.Name = "Fragments"
		local partClone = Instance.new("Part")
		-- NOTE: this custom cloning function solves problems with children in the part (especially parts inside the part).
		-- surface inputs and parameters are ignored since fragmentation messes up the structure anyway.
		-- formfactor is is ignored too because it should always be Custom for fragmentation.
		-- shape is ignored too because block is default and it has already been established that the part is a block.
		-- cframe is ignored too because it is set later on.
		partClone.Anchored = part.Anchored
		partClone.Archivable = part.Archivable
		partClone.BackSurface = part.BackSurface
		partClone.BottomSurface = part.BottomSurface
		partClone.BrickColor = part.BrickColor
		partClone.CanCollide = part.CanCollide
		partClone.Elasticity = part.Elasticity
		partClone.FormFactor = Enum.FormFactor.Custom
		partClone.Friction = part.Friction
		partClone.FrontSurface = part.FrontSurface
		partClone.LeftSurface = part.LeftSurface
		partClone.Locked = part.Locked
		partClone.Material = part.Material
		partClone.Reflectance = part.Reflectance
		partClone.RightSurface = part.RightSurface
		partClone.RotVelocity = part.RotVelocity
		partClone.Size = part.Size
		partClone.TopSurface = part.TopSurface
		partClone.Transparency = part.Transparency
		partClone.Velocity = part.Velocity
		for _, data in ipairs(Fragmentation.AXIS_DATA) do
			local axisName, axisNormal = data[1], data[2]
			local axisSize = size[axisName]
			if axisSize >= fragmentationSize then
				size = (Vector3.new(1, 1, 1) - 0.5 * data[2]) * size
				partClone.size = size
				for partIndex = 1, #parts do
					local part = parts[partIndex]
					local cframe = part.CFrame
					part.Size = size
					local clone = partClone:Clone()
					part.CFrame = cframe * CFrame.new((-0.25 * axisSize) * axisNormal)
					clone.CFrame = cframe * CFrame.new((0.25 * axisSize) * axisNormal)
					clone.Parent = model
					parts[#parts + 1] = clone
				end
			end
		end
		for _, part in ipairs(parts) do
			part:MakeJoints()
		end
	else
		return false
	end
	return true
end
]])
Module.Store("GraphicalEffects", [[
local MESH_IDS = {"rbxassetid://15310891"}
local SOUND_IDS = {"rbxassetid://2248511", "rbxassetid://1369158"}
local TEXTURE_IDS = {"rbxassetid://36527089", "rbxassetid://122610943", "rbxassetid://126561317", "rbxassetid://127033719"}
local preloadConnections = {}
local reloadingPreloads = false
function GraphicalEffects.InitPreloads()
	local preload_part = Instance.new("Part")
	GraphicalEffects.preload_part = preload_part
	preload_part.Anchored = true
	preload_part.Archivable = false
	preload_part.BottomSurface = "Smooth"
	preload_part.CanCollide = false
	preload_part.CFrame = CFrame.new(math.huge, math.huge, math.huge)
	preload_part.FormFactor = "Custom"
	preload_part.Locked = true
	preload_part.Name = "Asset Preloader"
	preload_part.Size = Vector3.new(0.2, 0.2, 0.2)
	preload_part.TopSurface = "Smooth"
	preload_part.Transparency = 1
	preloadConnections[preload_part] = preload_part.AncestryChanged:connect(GraphicalEffects.PreloadsAncestryChanged)
	for _, mesh_id in ipairs(MESH_IDS) do
		local mesh = Instance.new("SpecialMesh")
		mesh.MeshType = "FileMesh"
		mesh.MeshId = mesh_id
		preloadConnections[mesh] = mesh.AncestryChanged:connect(GraphicalEffects.PreloadsAncestryChanged)
		mesh.Parent = preload_part
	end
	for _, sound_id in ipairs(SOUND_IDS) do
		local sound = Instance.new("Sound")
		sound.SoundId = sound_id
		sound.Volume = 0
		preloadConnections[sound] = sound.AncestryChanged:connect(GraphicalEffects.PreloadsAncestryChanged)
		sound.Parent = preload_part
	end
	for _, texture_id in ipairs(TEXTURE_IDS) do
		local decal = Instance.new("Decal")
		decal.Texture = texture_id
		preloadConnections[decal] = decal.AncestryChanged:connect(GraphicalEffects.PreloadsAncestryChanged)
		decal.Parent = preload_part
	end
	preload_part.Parent = Workspace
end
function GraphicalEffects.PreloadsAncestryChanged(child, parent)
	if not reloadingPreloads and parent ~= GraphicalEffects.preload_part and parent ~= Workspace then
		reloadingPreloads = true
		for _, connection in pairs(preloadConnections) do
			connection:disconnect()
			preloadConnections[_] = nil
		end
		wait(1)
		reloadingPreloads = false
		GraphicalEffects.InitPreloads()
	end
end
GraphicalEffects.InitPreloads()
-- Hyper beam
function GraphicalEffects.FireSpaceHyperBeam(target, power, duration, radius, height, deviation)
	local stepTime, gameTime = 1 / 30, TaskScheduler.GetCurrentTime()
	local frames = duration * 30
	local beamColorOffset = 0.75 * tick() -- math.random()
	local blastPressure = power * 62500 + 250000
	local beamPart = Instance.new("Part")
	local beamMesh = Instance.new("SpecialMesh", beamPart)
	local explosion = Instance.new("Explosion")
	local sound = Instance.new("Sound", beamPart)
	beamPart.Anchored = true
	beamPart.CanCollide = false
	beamPart.CFrame = CFrame.new(target, target + Vector3.new(deviation * (math.random() - 0.5), deviation * (math.random() - 0.5), height))
	beamPart.FormFactor = "Custom"
	beamPart.Locked = true
	beamPart.Size = Vector3.new(0.2, 0.2, 0.2)
	beamMesh.MeshId = "rbxassetid://15310891"
	beamMesh.MeshType = "FileMesh"
	beamMesh.TextureId = "rbxassetid://36527089"
	local beamGlowPart1 = beamPart:Clone()
	local beamGlowMesh1 = beamMesh:Clone()
	local beamGlowPart2 = beamPart:Clone()
	local beamGlowMesh2 = beamMesh:Clone()
	local beamLight = Instance.new("PointLight", beamPart)
	beamLight.Range = power * 2
	beamLight.Shadows = true
	explosion.BlastPressure = blastPressure
	explosion.BlastRadius = power
	explosion.Position = target
	sound.SoundId = "rbxassetid://2248511"
	sound.Volume = 1
	local explosionHitConnection = explosion.Hit:connect(function(part, distance)
		if not part.Anchored and part:GetMass() < power * power then
			pcall(part.BreakJoints, part)
			part.Color = Color3.new(Utility.GetRainbowRGB(1.5 * gameTime + beamColorOffset))
		end
	end)
	beamPart.Transparency = 0.5
	beamPart.Archivable = false
	beamGlowPart1.Transparency = 0.75
	beamGlowPart2.Transparency = 0.75
	beamGlowMesh1.Parent = beamGlowPart1
	beamGlowPart1.Parent = beamPart
	beamGlowMesh2.Parent = beamGlowPart2
	beamGlowPart2.Parent = beamPart
	beamPart.Parent = workspace
	explosion.Parent = workspace
	for frame = 1, frames do
		local progress = frame / frames
		local alpha = 1 - math.sin(0.5 * math.pi * progress)
		local scale = 0.4 * alpha
		local glowScale1 = alpha * (0.5 + 0.5 * math.sin(math.tau * (8 * gameTime + beamColorOffset)))
		local glowScale2 = alpha * (0.5 + 0.5 * math.cos(math.tau * (8 * gameTime + beamColorOffset)))
		local vertexColor =  Vector3.new(Utility.GetRainbowRGB(1.5 * gameTime + beamColorOffset))
		beamLight.Brightness = 1 - progress
		beamLight.Color = Color3.new(vertexColor.x, vertexColor.y, vertexColor.z)
		beamMesh.Scale = Vector3.new(radius * scale, 9000, radius * scale)
		beamMesh.VertexColor = vertexColor
		beamGlowMesh1.Scale = Vector3.new(1.2 * radius * glowScale1, 9000, 1.2 * radius * glowScale1)
		beamGlowMesh1.VertexColor = vertexColor
		beamGlowMesh2.Scale = Vector3.new(1.2 * radius * glowScale2, 9000, 1.2 * radius * glowScale2)
		beamGlowMesh2.VertexColor = vertexColor
		RunService.Stepped:wait()
		gameTime = TaskScheduler.GetCurrentTime()
		if frame <= 2 then
			local explosion = Instance.new("Explosion")
			explosion.BlastPressure = (1 - progress) * blastPressure
			explosion.BlastRadius = (1 - progress) * power
			explosion.Position = target
			explosion.Parent = Workspace
			if frame == 2 then
				sound:Play()
			end
		end
	end
	pcall(beamPart.Destroy, beamPart)
	explosionHitConnection:disconnect()
end
function GraphicalEffects.SpaceHyperBeam(target, power, duration, radius, height, deviation)
	TaskScheduler.Start(GraphicalEffects.FireSpaceHyperBeam, target, power or 12, duration or 1.5, radius or 6, height or 600, deviation or 20)
end
-- Magic Circle
GraphicalEffects.magicCircleData = {}
GraphicalEffects.MAGIC_CIRCLE_DEFAULT_OFFSET = 6.25
function GraphicalEffects.AnimateMagicCircle(data)
	local frame, direction, magic_circle_model, magic_circle_part, magic_circle_light, magic_circle_decal_back, magic_circle_decal_front, duration, 

stay, magic_circle_adornee_func, magic_circle_offset = unpack(data)
	frame = frame + 1
	data[1] = frame
	local transparency = (frame / duration) ^ stay
	local opacity = 1 - transparency
	if frame == duration then
		pcall(Game.Destroy, magic_circle_model)
		GraphicalEffects.magicCircleData[data] = nil
	else
		if magic_circle_model.Parent ~= Workspace then
			pcall(Utility.SetProperty, magic_circle_model, "Parent", Workspace)
		end
		local magic_circle_adornee = magic_circle_adornee_func()
		magic_circle_position = magic_circle_adornee.Position + direction * magic_circle_offset
		local magic_circle_cframe = CFrame.new(magic_circle_position, magic_circle_position + direction) * CFrame.Angles(0, 0, math.tau * frame / 

25)
		magic_circle_part.CFrame = magic_circle_cframe
		magic_circle_light.Brightness = opacity
		magic_circle_decal_back.Transparency = transparency
		magic_circle_decal_front.Transparency = transparency
	end
end
function GraphicalEffects.CreateMagicCircle(target, magic_circle_scale, magic_circle_image, light_color, duration, stay, magic_circle_adornee_func, 

magic_circle_offset)
	local magic_circle_adornee = magic_circle_adornee_func()
	if magic_circle_adornee then
		local origin = magic_circle_adornee.Position
		local direction = (target - origin).unit
		local magic_circle_position = origin + direction * magic_circle_offset
		local magic_circle_cframe = CFrame.new(magic_circle_position, magic_circle_position + direction)
		local magic_circle_model = Instance.new("Model")
		local magic_circle_part = Instance.new("Part", magic_circle_model)
		local magic_circle_mesh = Instance.new("BlockMesh", magic_circle_part)
		local magic_circle_light = Instance.new("PointLight", magic_circle_part)
		local magic_circle_decal_back = Instance.new("Decal", magic_circle_part)
		local magic_circle_decal_front = Instance.new("Decal", magic_circle_part)
		magic_circle_model.Archivable = false
		magic_circle_part.Anchored = true
		magic_circle_part.BottomSurface = "Smooth"
		magic_circle_part.CanCollide = false
		magic_circle_part.CFrame = magic_circle_cframe
		magic_circle_part.FormFactor = "Custom"
		magic_circle_part.Locked = true
		magic_circle_part.Size = Vector3.new(0.2, 0.2, 0.2)
		magic_circle_part.TopSurface = "Smooth"
		magic_circle_part.Transparency = 1
		magic_circle_mesh.Scale = Vector3.new(60, 60, 0) * magic_circle_scale
		magic_circle_light.Color = light_color
		magic_circle_light.Range = 16 * magic_circle_scale
		magic_circle_light.Shadows = true
		magic_circle_decal_back.Face = "Back"
		magic_circle_decal_back.Texture = magic_circle_image
		magic_circle_decal_front.Face = "Front"
		magic_circle_decal_front.Texture = magic_circle_image
		magic_circle_model.Parent = Workspace
		local data = {0, direction, magic_circle_model, magic_circle_part, magic_circle_light, magic_circle_decal_back, magic_circle_decal_front, 

duration, stay, magic_circle_adornee_func, magic_circle_offset}
		GraphicalEffects.magicCircleData[data] = true
		return data
	end
end
-- Laser of Death
GraphicalEffects.LASER_WIDTH = 0.15
GraphicalEffects.LASER_MAGIC_CIRCLE_DISTANCE = 6.25
GraphicalEffects.laser_data = {}
--GraphicalEffects.fragmentation = {}
function GraphicalEffects.AnimateLaserOfDeath(data)
	local frame, directionOrientation, direction, magic_circle_model, laser_part, laser_mesh, magic_circle_part, magic_circle_light, 

magic_circle_decal_back, magic_circle_decal_front, sound, laser_scale, fragmentation_size, duration, laser_lights, laser_effects, stay, light_effects = 

unpack(data)
	local laser_color = laser_part.Color
	frame = frame + 1
	data[1] = frame
	local transparency = (frame / duration) ^ stay
	local opacity = 1 - transparency
	if frame == 2 then
		sound:Play()
	end
	if frame == duration then
		pcall(Game.Destroy, magic_circle_model)
		GraphicalEffects.laser_data[data] = nil
	else
		if magic_circle_model.Parent ~= Workspace then
			pcall(Utility.SetProperty, magic_circle_model, "Parent", Workspace)
		end
		local laser_distance = 0
		local origin = chatAdornee.CFrame
		if not light_effects then
			direction = (origin * directionOrientation - origin.p).unit
		end
		local magic_circle_position = origin.p + direction * GraphicalEffects.LASER_MAGIC_CIRCLE_DISTANCE
		local magic_circle_cframe = CFrame.new(magic_circle_position, magic_circle_position + direction) * CFrame.Angles(0, 0, math.tau * frame / 

25)
		local loop_scale = (laser_scale - 1) / 10
		for x_offset = -loop_scale, loop_scale, 2 do
			for y_offset = -loop_scale, loop_scale, 2 do
				local origin_position = magic_circle_cframe * Vector3.new(x_offset, y_offset, 0)
				for index = 1, 8 do
					local part, position
					for ray_index = 1, 10 do
						local ray = Ray.new(origin_position + direction * (999 * (ray_index - 1)), direction * 999)
						part, position = Workspace:FindPartOnRay(ray, magic_circle_model)
						if part then
							break
						end
					end
					if part then
						laser_distance = (position - origin_position).magnitude
						if frame % 8 == 1 and index == 1 then
							Instance.new("Explosion", Workspace).Position = position
						end
						if not part:IsA("Terrain") then
							pcall(part.BreakJoints, part)
							local is_block = part:IsA("Part") and part.Shape == Enum.PartType.Block
							local mass = part:GetMass()
							local size = part.Size
							if (is_block and ((size.X < fragmentation_size and size.Y < fragmentation_size and size.Z < 

fragmentation_size) or (not part.Anchored and mass < 750))) or (not is_block and mass < 250000) then
								local part_transparency = math.max(part.Transparency + 0.007 * fragmentation_size, 0.5)
								if part_transparency >= 0.5 then -- temporarily to minimize debris
									pcall(Game.Destroy, part)
								else
									local cframe = part.CFrame
									part.Anchored = false
									part.BrickColor = BrickColor.new("Medium stone grey")
									part.CanCollide = true
									if part:IsA("FormFactorPart") then
										part.FormFactor = "Custom"
									end
									part.Size = size - Vector3.new(0.135, 0.135, 0.135) * fragmentation_size
									part.Transparency = part_transparency
									part.CFrame = cframe + direction * 5
									part.Velocity = part.Velocity + direction * 40
								end
							elseif is_block then
								local parts = {part}
								local model = Instance.new("Model", part.Parent)
								model.Name = "Fragments"
								if size.X >= fragmentation_size then
									size = Vector3.new(0.5, 1, 1) * size
									local archivable = part.Archivable
									local cframe = part.CFrame
									part.FormFactor = "Custom"
									part.Size = size
									part.Archivable = true
									local part_clone = part:Clone()
									part.Archivable = archivable
									part_clone.Archivable = archivable
									part.CFrame = cframe * CFrame.new(-0.5 * size.X, 0, 0)
									part_clone.CFrame = cframe * CFrame.new(0.5 * size.X, 0, 0)
									part_clone.Parent = model
									parts[2] = part_clone
								end
								if size.Y >= fragmentation_size then
									size = Vector3.new(1, 0.5, 1) * size
									for part_index = 1, #parts do
										local part = parts[part_index]
										local archivable = part.Archivable
										local cframe = part.CFrame
										part.FormFactor = "Custom"
										part.Size = size
										part.Archivable = true
										local part_clone = part:Clone()
										part.Archivable = archivable
										part_clone.Archivable = archivable
										part.CFrame = cframe * CFrame.new(0, -0.5 * size.Y, 0)
										part_clone.CFrame = cframe * CFrame.new(0, 0.5 * size.Y, 0)
										part_clone.Parent = model
										table.insert(parts, part_clone)
									end
								end
								if size.Z >= fragmentation_size then
									size = Vector3.new(1, 1, 0.5) * size
									for part_index = 1, #parts do
										local part = parts[part_index]
										local archivable = part.Archivable
										local cframe = part.CFrame
										part.FormFactor = "Custom"
										part.Size = size
										part.Archivable = true
										local part_clone = part:Clone()
										part.Archivable = archivable
										part_clone.Archivable = archivable
										part.CFrame = cframe * CFrame.new(0, 0, -0.5 * size.Z)
										part_clone.CFrame = cframe * CFrame.new(0, 0, 0.5 * size.Z)
										part_clone.Parent = model
										table.insert(parts, part_clone)
									end
								end
								for _, part in ipairs(parts) do
									part:MakeJoints()
								end
							else
								break
							end
						end
					else
						laser_distance = 9990
						break
					end
				end
			end
		end
		local laser_cframe = magic_circle_cframe * CFrame.Angles(-0.5 * math.pi, 0, 0)
		local laser_width = GraphicalEffects.LASER_WIDTH * opacity * laser_scale
		local laser_mesh_offset = Vector3.new(0, 0.5 * laser_distance, 0)	
		laser_part.CFrame = laser_cframe
		if laser_effects then
			local laser_effect_data_1, laser_effect_data_2 = laser_effects[1], laser_effects[2]
			local laser_effect_1, laser_effect_mesh_1 = laser_effect_data_1[1], laser_effect_data_1[2]
			local laser_effect_2, laser_effect_mesh_2 = laser_effect_data_2[1], laser_effect_data_2[2]
			laser_effect_1.CFrame = laser_cframe
			laser_effect_2.CFrame = laser_cframe
			laser_effect_mesh_1.Offset = laser_mesh_offset
			laser_effect_mesh_2.Offset = laser_mesh_offset
			local game_time = time()
			local effect_scale_1 = 0.5 + 0.5 * math.sin(16 * math.pi * game_time)
			local effect_scale_2 = 0.5 + 0.5 * math.cos(16 * math.pi * game_time)
			laser_effect_mesh_1.Scale = 5 * Vector3.new(laser_width * effect_scale_1, laser_distance, laser_width * effect_scale_1)
			laser_effect_mesh_2.Scale = 5 * Vector3.new(laser_width * effect_scale_2, laser_distance, laser_width * effect_scale_2)
			laser_width = laser_width * 0.25
		end
		laser_mesh.Offset = laser_mesh_offset			
		laser_mesh.Scale = 5 * Vector3.new(laser_width, laser_distance, laser_width)
		magic_circle_part.CFrame = magic_circle_cframe
		magic_circle_light.Brightness = opacity
		magic_circle_decal_back.Transparency = transparency
		magic_circle_decal_front.Transparency = transparency
		if light_effects then
			for index, data in ipairs(laser_lights) do
				local laser_spotlight_part, laser_spotlight = data[1], data[2]
				local laser_spotlight_offset = 30 * (index - 1)
				if laser_spotlight_offset <= laser_distance then
					laser_spotlight_part.CFrame = magic_circle_cframe * CFrame.new(0, 0, -laser_spotlight_offset)
					laser_spotlight.Brightness = opacity
					laser_spotlight.Enabled = true
				else
					laser_spotlight.Enabled = false
				end
			end
		end
	end
end
function GraphicalEffects.ShootLaserOfDeath(target, data)
	if chatAdornee then
		data = data or {}
		local brickcolor = data.brickcolor or BrickColor.new("Really black")
		local duration = data.duration or 40
		local fragmentation_size = data.fragmentation_size or 3
		local laser_scale = data.laser_scale or 1
		local light_color = data.light_color or Color3.new(1, 0.5, 1)
		local magic_circle_image = data.magic_circle_image or "rbxassetid://122610943"
		local magic_circle_scale = data.magic_circle_scale or 1
		local sound_volume = data.sound_volume or 1 / 3
		local special_effects = data.special_effects
		local stay = data.stay or 4
		local origin = chatAdornee.CFrame
		local directionOrientation = origin:pointToObjectSpace(target)
		local direction = (target - origin.p).unit
		local magic_circle_position = origin.p + direction * GraphicalEffects.LASER_MAGIC_CIRCLE_DISTANCE
		local magic_circle_cframe = CFrame.new(magic_circle_position, magic_circle_position + direction)
		local magic_circle_model = Instance.new("Model")
		local laser_part = Instance.new("Part", magic_circle_model)
		local laser_mesh = Instance.new("CylinderMesh", laser_part)
		local magic_circle_part = Instance.new("Part", magic_circle_model)
		local magic_circle_mesh = Instance.new("BlockMesh", magic_circle_part)
		local magic_circle_light = Instance.new("PointLight", magic_circle_part)
		local magic_circle_decal_back = Instance.new("Decal", magic_circle_part)
		local magic_circle_decal_front = Instance.new("Decal", magic_circle_part)
		local sound = Instance.new("Sound", magic_circle_part)
		sound.Pitch = 1.25
		sound.SoundId = "rbxassetid://2248511"
		sound.Volume = sound_volume
		magic_circle_model.Archivable = false
		laser_part.Anchored = true
		laser_part.BottomSurface = "Smooth"
		laser_part.BrickColor = brickcolor
		laser_part.CanCollide = false
		laser_part.CFrame = magic_circle_cframe * CFrame.Angles(-0.5 * math.pi, 0, 0)
		laser_part.FormFactor = "Custom"
		laser_part.Locked = true
		laser_part.Size = Vector3.new(0.2, 0.2, 0.2)
		laser_part.TopSurface = "Smooth"
		laser_mesh.Offset = Vector3.new(0, 0, 0)
		laser_mesh.Name = "Mesh"
		laser_mesh.Scale = 5 * laser_scale * Vector3.new(GraphicalEffects.LASER_WIDTH, 0, GraphicalEffects.LASER_WIDTH)
		magic_circle_part.Anchored = true
		magic_circle_part.BottomSurface = "Smooth"
		magic_circle_part.CanCollide = false
		magic_circle_part.CFrame = magic_circle_cframe
		magic_circle_part.FormFactor = "Custom"
		magic_circle_part.Locked = true
		magic_circle_part.Size = Vector3.new(0.2, 0.2, 0.2)
		magic_circle_part.TopSurface = "Smooth"
		magic_circle_part.Transparency = 1
		magic_circle_mesh.Scale = Vector3.new(60, 60, 0) * magic_circle_scale
		magic_circle_light.Color = light_color
		magic_circle_light.Range = 16 * magic_circle_scale
		magic_circle_light.Shadows = true
		magic_circle_decal_back.Face = "Back"
		magic_circle_decal_back.Texture = magic_circle_image
		magic_circle_decal_front.Face = "Front"
		magic_circle_decal_front.Texture = magic_circle_image
		magic_circle_model.Parent = Workspace
		local laser_color = brickcolor.Color
		local laser_lights = {}
		local light_effects = laser_color.r + laser_color.g + laser_color.b > 0.25
		if light_effects then
			local laser_spotlight_part_template = Instance.new("Part")
			local laser_spotlight_light_template = Instance.new("SpotLight", laser_spotlight_part_template)
			laser_spotlight_part_template.Anchored = true
			laser_spotlight_part_template.Anchored = true
			laser_spotlight_part_template.BottomSurface = "Smooth"
			laser_spotlight_part_template.CanCollide = false
			laser_spotlight_part_template.FormFactor = "Custom"
			laser_spotlight_part_template.Locked = true
			laser_spotlight_part_template.Size = Vector3.new(0.2, 0.2, 0.2)
			laser_spotlight_part_template.TopSurface = "Smooth"
			laser_spotlight_part_template.Transparency = 1
			laser_spotlight_light_template.Angle = 45
			laser_spotlight_light_template.Color = laser_color
			laser_spotlight_light_template.Enabled = true
			laser_spotlight_light_template.Name = "Light"
			laser_spotlight_light_template.Range = 60
			for index = 1, 40 do
				local laser_spotlight_part = laser_spotlight_part_template:Clone()
				laser_spotlight_part.CFrame = magic_circle_cframe * CFrame.new(0, 0, -30 * (index - 1))
				laser_spotlight_part.Parent = magic_circle_model
				laser_lights[index] = {laser_spotlight_part, laser_spotlight_part.Light}
			end
		end
		local laser_effects
		if special_effects then
			laser_effects = {}
			local laser_effect_1 = laser_part:Clone()
			laser_effect_1.BrickColor = special_effects
			laser_effect_1.Transparency = 0.5
			local laser_effect_2 = laser_effect_1:Clone()
			laser_effects[1], laser_effects[2] = {laser_effect_1, laser_effect_1.Mesh}, {laser_effect_2, laser_effect_2.Mesh}
			laser_effect_1.Parent = magic_circle_model
			laser_effect_2.Parent = magic_circle_model
		end
		GraphicalEffects.laser_data[{0, directionOrientation, direction, magic_circle_model, laser_part, laser_mesh, magic_circle_part, 

magic_circle_light, magic_circle_decal_back, magic_circle_decal_front, sound, laser_scale, fragmentation_size, duration, laser_lights, laser_effects, stay, 

light_effects}] = true
	end
end
-- Sapient Rock
function GraphicalEffects.SpawnSapientRock(position)
	local part = Instance.new("Part", Workspace)
	local size = 8 + math.random(0, 5)
	part.BottomSurface = "Smooth"
	part.TopSurface = "Smooth"
	part.Material = "Slate"
	part.Locked = true
	part.Shape = "Ball"
	part.FormFactor = "Custom"
	part.Size = Vector3.new(size, size, size)
	part.Position = position
	local bodypos = Instance.new("BodyPosition", part)
	bodypos.maxForce = Vector3.new(0, 0, 0)
	local angry = false
	local damage_ready = true
	local torso_following
	local torso_changed = -1000
	local touched_conn = part.Touched:connect(function(hit)
		local character = hit.Parent
		if character then
			local humanoid
			for _, child in ipairs(character:GetChildren()) do
				if child:IsA("Humanoid") then
					humanoid = child
					break
				end
			end
			if humanoid then
				if angry then
					if damage_ready then
						damage_ready = false
						humanoid:TakeDamage(100)
						wait(1)
						damage_ready = true
						angry = false
						part.BrickColor = BrickColor.new("Medium stone grey")
					end
				else
					local torso = humanoid.Torso
					if torso then
						torso_following = torso
						torso_changed = tick()
					end
				end
			end
		end
	end)
	TaskScheduler.Start(function()
		while part.Parent == Workspace do
			if torso_following then
				bodypos.position = torso_following.Position
				if tick() - torso_changed > 60 or not torso_following.Parent then
					torso_following = nil
					bodypos.maxForce = Vector3.new(0, 0, 0)
					angry = false
					part.BrickColor = BrickColor.new("Medium stone grey")
				else
					local speed = angry and Vector3.new(16, 16, 16) or Vector3.new(6, 0, 6)
					bodypos.maxForce = part:GetMass() * speed
					if part.Position.Y < -250 then
						part.Velocity = Vector3.new()
						part.Position = torso_following.Position + Vector3.new(0, 80, 0)
						part.BrickColor = BrickColor.new("Bright red")
						angry = true
						torso_changed = tick()
					end
				end
			end
			RunService.Stepped:wait()
		end
		touched_conn:disconnect()
	end)
	TaskScheduler.Start(function()
		while part.Parent == Workspace do
			wait(25 + math.random() * 10)
			local next_size = 8 + math.random() * 5
			if math.random(100) == 1 then
				next_size = next_size * (2 + 6 * math.random())
			end
			next_size = math.floor(next_size + 0.5)
			local start_time = tick()
			local mesh = Instance.new("SpecialMesh", part)
			mesh.MeshType = "Sphere"
			repeat
				local elapsed_time = tick() - start_time
				local alpha = math.cos(elapsed_time * math.pi * 0.5)
				local interpolated_size = size * alpha + next_size * (1 - alpha)
				local size_vector = Vector3.new(interpolated_size, interpolated_size, interpolated_size)
				local cframe = part.CFrame
				part.Size = size_vector
				part.CFrame = cframe
				mesh.Scale = size_vector / part.Size
				RunService.Stepped:wait()
			until tick() - start_time >= 1
			mesh:Destroy()
			local cframe = part.CFrame
			part.Size = Vector3.new(next_size, next_size, next_size)
			part.CFrame = cframe
			size = next_size
		end
	end)
end
-- Crystal ring
function GraphicalEffects.CrystalRing(data)
	data = data or {}
	local crystal_count = data.crystal_count or 10
	local crystal_color = data.crystal_color or BrickColor.new("Bright red")
	local crystal_scale = data.crystal_scale or Vector3.new(2 / 3, 2, 2 / 3)
	local radius = radius or 1.25 * crystal_count / math.pi
	local spawn_duration = data.spawn_duration or 0.065
	local full_spawn_duration = spawn_duration * crystal_count
	local float_duration = data.float_duration or 5
	local wave_amplitude = data.wave_amplitude or 0.5
	local wave_period = data.wave_period or 1
	local appear_duration = data.appear_duration or 0.1
	local disappear_duration = data.disappear_duration or 0.5
	local base_part = data.base_part
	local offset_cframe
	if data.position then
		offset_cframe = CFrame.new(data.position)
		if base_part then
			offset_cframe = base_part.CFrame:toObjectSpace(offset_cframe)
		end
	else
		offset_cframe = CFrame.new()
	end
	local crystal_template = Instance.new("Part")
	crystal_template.Anchored = true
	crystal_template.Locked = true
	crystal_template.CanCollide = false
	crystal_template.BottomSurface = "Smooth"
	crystal_template.TopSurface = "Smooth"
	crystal_template.BrickColor = crystal_color
	crystal_template.FormFactor = "Symmetric"
	crystal_template.Size = Vector3.new(1, 1, 1)
	local crystal_light = Instance.new("PointLight", crystal_template)
	crystal_light.Brightness = 0.1 / crystal_count
	crystal_light.Color = crystal_color.Color
	crystal_light.Name = "Light"
	crystal_light.Range = radius
	crystal_light.Shadows = true
	local crystal_mesh = Instance.new("SpecialMesh", crystal_template)
	crystal_mesh.MeshId = "rbxassetid://9756362"
	crystal_mesh.MeshType = "FileMesh"
	crystal_mesh.Name = "Mesh"
	crystal_mesh.Scale = crystal_scale
	local crystal_model = Instance.new("Model")
	crystal_model.Archivable = false
	crystal_model.Name = "Crystal Model"
	crystal_model.Parent = Workspace
	local crystals = {}
	local lights = {}
	local meshes = {}
	for index = 1, crystal_count do
		local crystal = crystal_template:Clone()
		crystal.Parent = crystal_model
		crystals[index] = crystal
		lights[index] = crystal.Light
		meshes[index] = crystal.Mesh
	end
	local start_time = tick()
	repeat
		local base_cframe = offset_cframe
		if base_part then
			base_cframe = base_part.CFrame * base_cframe
		end
		local elapsed_time = tick() - start_time
		for index, crystal in ipairs(crystals) do
			local crystal_time = elapsed_time - index * spawn_duration
			local disappear_time = crystal_time - float_duration
			local offset
			if crystal_time < 0 then
				offset = 0
			elseif crystal_time < appear_duration then
				offset = radius * crystal_time / appear_duration
			else
				offset = radius
			end
			local wave_offset
			if disappear_time >= 0 then
				local disappear_progress = disappear_time / disappear_duration
				if disappear_progress > 1 then
					if crystal.Parent then
						crystal:Destroy()
					end
				else
					local inverse_progress = 1 - disappear_progress
					local light = lights[index]
					local mesh = meshes[index]
					crystal.BrickColor = BrickColor.new("Really black")
					light.Brightness = 2 * inverse_progress
					light.Range = 2 * radius
					mesh.Scale = crystal_scale * inverse_progress
				end
				wave_offset = 0
			else
				wave_offset = wave_amplitude * math.sin(math.tau * (elapsed_time - index / crystal_count * 3) / wave_period)
			end
			local rotation_angle = (tick() * 0.5 + (index - 1) / crystal_count) % 1 * math.tau
			crystal.CFrame = base_cframe * CFrame.Angles(0, rotation_angle, 0) * CFrame.new(0, wave_offset, -offset)
		end
		RunService.Stepped:wait()
	until elapsed_time >= float_duration + full_spawn_duration + disappear_duration
	if crystal_model.Parent then
		crystal_model:Destroy()
	end
end
-- Missiles
GraphicalEffects.missileData = {}
GraphicalEffects.missileParts = {}
function GraphicalEffects.AnimateMissile(data)
	local frame, missilePart, targetPart, timeCreated, direction, touchedConnection, explodeRequested, bodyGyro, swooshSound, magicCircleData, lifeTime, 

pointOnPart, flipped = unpack(data)
	frame = frame + 1
	data[1] = frame
	if flipped then
		direction = -direction
	end
	if frame <= 10 then
		if frame == 2 then
			swooshSound:Play()
		end
		missilePart.Anchored = true
		local progress = frame / 10
		missilePart.Size = Vector3.new(1, 1, progress * 4)
		local magicCirclePart = magicCircleData[4]
		local magicCirclePosition = magicCirclePart.Position
		local missileOffset = 2 * progress * direction
		local missilePosition = magicCirclePosition + missileOffset
		missilePart.CFrame = CFrame.new(missilePosition, missilePosition + direction)
		--missilePart.Transparency = 0.5 * (1 - progress)
		if frame == 10 then
			touchedConnection = missilePart.Touched:connect(function(hit)
				if hit.CanCollide and hit.Parent and not GraphicalEffects.missileParts[hit] then
					touchedConnection:disconnect()
					data[7] = true
				end
			end)
			data[6] = touchedConnection
		end
	else
		missilePart.Anchored = false
		local missilePosition = missilePart.Position
		local targetPosition = targetPart.CFrame * pointOnPart
		local distanceVector = targetPosition - missilePosition
		local elapsedTime = time() - timeCreated
		local targetParent = targetPart.Parent
		if explodeRequested or (targetParent and distanceVector.magnitude < 10) or elapsedTime > lifeTime then
			GraphicalEffects.missileData[data] = nil
			GraphicalEffects.missileParts[missilePart] = nil
			touchedConnection:disconnect()
			if missilePart.Parent then
				missilePart:Destroy()
				local explosion = Instance.new("Explosion")
				explosion.BlastRadius = 12.5
				explosion.Position = missilePosition
				local explosionHitConnection = explosion.Hit:connect(function(hit, distance)
					local missileData = GraphicalEffects.missileParts[hit]
					if missileData and distance < 3 then
						missileData[7] = true
					else
						pcall(hit.BreakJoints, hit)
					end
				end)
				explosion.Parent = Workspace
				TaskScheduler.Schedule(1, explosionHitConnection.disconnect, explosionHitConnection)
			end
		else
			local targetInWorkspace = targetPart:IsDescendantOf(Workspace)
			if targetInWorkspace then
				direction = distanceVector.unit
				data[5] = direction
			end
			local speed = 14 + elapsedTime * 10
			local gyroD
			if elapsedTime < 42.5 and targetInWorkspace then
				gyroD = 1000 - elapsedTime * 15
			else
				gyroD = 100
				bodyGyro.maxTorque = Vector3.new(0, 0, 0)
				if elapsedTime + 7.5 < lifeTime then
					data[11] = elapsedTime + 7.5
				end
			end
			bodyGyro.D = gyroD
			bodyGyro.cframe = CFrame.new(Vector3.new(), direction)
			missilePart.Velocity = missilePart.CFrame.lookVector * speed
		end
	end
end
function GraphicalEffects.ShootMissile(targetPart, pointOnPart, direction, magic_circle_adornee_func, magic_circle_offset, flipped)
	if not magic_circle_offset then
		magic_circle_offset = GraphicalEffects.MAGIC_CIRCLE_DEFAULT_OFFSET
	end
	local targetPosition = targetPart.Position
	local headPosition = chatAdornee.Position
	local origin = CFrame.new(headPosition, headPosition + direction) + direction * magic_circle_offset
	local missilePart = Instance.new("Part")
	local antiGravityForce = Instance.new("BodyForce", missilePart)
	local bodyGyro = Instance.new("BodyGyro", missilePart)
	local explosionSound = Instance.new("Sound", missilePart)
	local swooshSound = Instance.new("Sound", missilePart)
	antiGravityForce.force = Vector3.new(0, 196.2 * 4, 0)
	bodyGyro.D = 1000
	bodyGyro.maxTorque = Vector3.new(1, 1, 1)
	explosionSound.PlayOnRemove = true
	explosionSound.SoundId = "rbxasset://sounds/collide.wav"
	explosionSound.Volume = 1
	missilePart.Anchored = true
	missilePart.BackSurface = "Studs"
	missilePart.BottomSurface = "Studs"
	missilePart.BrickColor = BrickColor.Red()
	missilePart.CFrame = origin
	missilePart.FormFactor = "Custom"
	missilePart.FrontSurface = "Studs"
	missilePart.LeftSurface = "Studs"
	missilePart.Locked = true
	missilePart.RightSurface = "Studs"
	missilePart.Size = Vector3.new(1, 1, 0.2)
	missilePart.TopSurface = "Studs"
	--missilePart.Transparency = 0.5
	swooshSound.Looped = true
	swooshSound.SoundId = "rbxasset://sounds/Rocket whoosh 01.wav"
	swooshSound.Volume = 0.7
	local magicCircleData = GraphicalEffects.CreateMagicCircle(headPosition + direction * 1000, 0.875, "rbxassetid://127033719", Color3.new(1, 1, 1), 

40, 4, magic_circle_adornee_func or function() return chatAdornee end, magic_circle_offset)
	local data = {0, missilePart, targetPart, time(), direction, false, false, bodyGyro, swooshSound, magicCircleData, 50, pointOnPart, flipped}
	missilePart.Parent = Workspace
	GraphicalEffects.missileData[data] = true
	GraphicalEffects.missileParts[missilePart] = data
end
-- Joint crap
function GraphicalEffects.CubicInterpolate(y0, y1, y2, y3, mu)
	local a0, a1, a2, a3, mu2
	mu2 = mu * mu
	a0 = y3 - y2 - y0 + y1
	a1 = y0 - y1 - a0
	a2 = y2 - y0
	a3 = y1
	return a0 * mu * mu2 + a1 * mu2 + a2 * mu + a3
end
function GraphicalEffects.JointCrap(model, cycletime)
	if model then
		local cycletime = cycletime or (0.75 * (1 + math.random() * 4))
		local offsetradius = 0.75
		local rotationoffset = math.pi
		local joints = {}
		local stack = model:GetChildren()
		while #stack ~= 0 do
			local object = stack[#stack]
			table.remove(stack)
			for index, child in ipairs(object:GetChildren()) do
				table.insert(stack, child)
			end
			if object:IsA("JointInstance") then
				table.insert(joints, object)
			end
		end
		local rot0 = {}
		local rot1 = {}
		local rot2 = {}
		local rot3 = {}
		local rot4 = {}
		for index, joint in ipairs(joints) do
			local pos = Vector3.new(math.random() - 0.5, math.random() - 0.5, math.random() - 0.5).unit * offsetradius
			local rot = Vector3.new(math.random(), math.random(), math.random()) * rotationoffset
			rot0[index] = {joint.C0, joint.C1}
			rot = Vector3.new(rot.x % (math.tau), rot.y % (math.tau), rot.z % (math.tau))
			rot2[index] = {pos, rot}
			pos = Vector3.new(math.random() - 0.5, math.random() - 0.5, math.random() - 0.5).unit * offsetradius
			rot = rot + Vector3.new(math.random(), math.random(), math.random()) * rotationoffset
			rot = Vector3.new(rot.x % (math.tau), rot.y % (math.tau), rot.z % (math.tau))
			rot3[index] = {pos, rot}
			pos = Vector3.new(math.random() - 0.5, math.random() - 0.5, math.random() - 0.5).unit * offsetradius
			rot = rot + Vector3.new(math.random(), math.random(), math.random()) * rotationoffset
			rot = Vector3.new(rot.x % (math.tau), rot.y % (math.tau), rot.z % (math.tau))
			rot4[index] = {pos, rot}
		end
		while model.Parent do
			for i, j in ipairs(joints) do
				local pos = Vector3.new(math.random() - 0.5, math.random() - 0.5, math.random() - 0.5).unit * offsetradius
				local rot = rot4[i][2] + Vector3.new(math.random(), math.random(), math.random()) * rotationoffset
				rot = Vector3.new(rot.x % (math.tau), rot.y % (math.tau), rot.z % (math.tau))
				rot1[i], rot2[i], rot3[i], rot4[i] = rot2[i], rot3[i], rot4[i], {pos, rot}
			end
			local start = tick()
			while true do
				local ctime = tick()
				local elapsed = ctime - start
				if elapsed > cycletime then
					break
				end
				local progress = elapsed / cycletime
				for index, joint in ipairs(joints) do
					local v0, v1, v2, v3, v4 = rot0[index], rot1[index], rot2[index], rot3[index], rot4[index]
					local p1, p2, p3, p4, r1, r2, r3, r4 = v1[1], v2[1], v3[1], v4[1], v1[2], v2[2], v3[2], v4[2]
					local px = GraphicalEffects.CubicInterpolate(p1.x, p2.x, p3.x, p4.x, progress)
					local py = GraphicalEffects.CubicInterpolate(p1.y, p2.y, p3.y, p4.y, progress)
					local pz = GraphicalEffects.CubicInterpolate(p1.z, p2.z, p3.z, p4.z, progress)
					local rx = GraphicalEffects.CubicInterpolate(r1.x, r2.x, r3.x, r4.x, progress)
					local ry = GraphicalEffects.CubicInterpolate(r1.y, r2.y, r3.y, r4.y, progress)
					local rz = GraphicalEffects.CubicInterpolate(r1.z, r2.z, r3.z, r4.z, progress)
					local cframe = CFrame.new(px, py, pz) * CFrame.Angles(rx, ry, rz)
					joint.C0 = v0[1] * cframe
					joint.C1 = v0[2] * cframe:inverse()
				end
				RunService.Stepped:wait()
			end
		end
	end
end
-- Destruction spell
do
GraphicalEffects.destructionSpellSpeed = 5
GraphicalEffects.destructionSpellEffectSize = 2
GraphicalEffects.destructionSpellExplosionRate = 10
GraphicalEffects.destructionSpellFadeDuration = 120
local partProto = Instance.new("Part")
local partProtoDecal1 = Instance.new("Decal", partProto)
local partProtoDecal2 = Instance.new("Decal", partProto)
local partProtoGyro = Instance.new("BodyGyro", partProto)
local partProtoPosition = Instance.new("BodyPosition", partProto)
partProto.CanCollide = false
partProto.FormFactor = "Custom"
partProto.Transparency = 1
partProtoDecal1.Face = "Bottom"
partProtoDecal1.Texture = "rbxassetid://106508453"
partProtoDecal2.Face = "Top"
partProtoDecal2.Texture = "rbxassetid://106508453"
partProtoGyro.Name = "gyro"
partProtoGyro.P = 1e6
partProtoGyro.maxTorque = Vector3.new(1e9, 1e9, 1e9)
partProtoPosition.Name = "pos"
partProtoPosition.P = 1e4
partProtoPosition.maxForce = Vector3.new(1e9, 1e9, 1e9)
function GraphicalEffects.DestructionSpell(nodes)
	local destroyTable = {}
	local regionSizeX, regionSizeY, regionSizeZ
	local function MagicalDestroyUnchecked(part)
		local partSize = part.Size
		if partSize.X < regionSizeX and partSize.Y < regionSizeY and partSize.Z < regionSizeZ then
			destroyTable[part] = true
			part.Material = "Plastic"
			local beginTransparency = part.Transparency
			local fadeDuration = GraphicalEffects.destructionSpellFadeDuration
			for i = 1, fadeDuration do
				RunService.Stepped:wait()
				part.Transparency = beginTransparency + (1 - beginTransparency) * (i / fadeDuration)
			end
			pcall(Game.Destroy, part)
			destroyTable[part] = nil
		end
	end
	local function MagicalDestroy(part)
		if not destroyTable[part] then
			MagicalDestroyUnchecked(part)
		end
	end
	local function MagicalNodeFinalize(part, gyro, pos, conn)
		part.Anchored = true
		pcall(gyro.Destroy, gyro)
		pcall(pos.Destroy, pos)
		conn:disconnect()
	end
	local model = Instance.new("Model")
	model.Archivable = false
	model.Name = "Nolix Wrath"
	model.Parent = Workspace
	local connections = {}
	local parts = {}
	local partsHit = {}
	local cleanupList = {}
	local explosionRate = GraphicalEffects.destructionSpellExplosionRate
	local effectSize = GraphicalEffects.destructionSpellEffectSize
	partProto.Size = Vector3.new(effectSize, 0.2, effectSize)
	local speed = GraphicalEffects.destructionSpellSpeed
	local rateTimer = 0
	local partRotation = CFrame.Angles(0, 0.5 * math.pi, 0)
	local minX, minY, minZ, maxX, maxY, maxZ = math.huge, math.huge, math.huge, -math.huge, -math.huge, -math.huge
	for index = 4, #nodes do
		local v0, v1, v2, v3 = nodes[index - 3], nodes[index - 2], nodes[index - 1], nodes[index]
		local p1 = v1
		local count = math.ceil((v2 - v1).magnitude / effectSize)
		local linearStep = (v2 - v1) / count
		for i = 1, count do
			local alpha = i / count
			local p2 = GraphicalEffects.CubicInterpolate(v0, v1, v2, v3, alpha)
			local center = 0.5 * (p1 + p2)
			local offset = p2 - p1
			local partId = #parts + 1
			local hitList = {}
			partsHit[partId] = hitList
			local part = partProto:Clone()
			local gyro = part.gyro
			local pos = part.pos
			local cframe = CFrame.new(center, center + offset) * partRotation
			part.CFrame = cframe
			gyro.cframe = cframe
			pos.position = center
			local posX, posY, posZ = center.X, center.Y, center.Z
			if posX < minX then minX = posX end
			if posY < minY then minY = posY end
			if posZ < minZ then minZ = posZ end
			if posX > maxX then maxX = posX end
			if posY > maxY then maxY = posY end
			if posZ > maxZ then maxZ = posZ end
			Instance.new("BlockMesh", part).Scale = Vector3.new(offset.magnitude, 0, effectSize)
			parts[partId] = part
			destroyTable[part] = true
			local conn = part.Touched:connect(function(hit)
				if not destroyTable[hit] then
					hitList[hit] = true
				end
			end)
			part.Parent = model
			p1 = p2
			TaskScheduler.Schedule(0.125, MagicalNodeFinalize, part, gyro, pos, conn)
			rateTimer = rateTimer + 1
			while rateTimer >= speed do
				RunService.Stepped:wait()
				rateTimer = rateTimer - speed
			end
		end
	end
	local center = Vector3.new(minX + maxX, minY + maxY, minZ + maxZ) * 0.5
	regionSizeX, regionSizeY, regionSizeZ = maxX - minX, maxY - minY, maxZ - minZ
	wait(0.5)
	rateTimer = 0
	for index, part in pairs(parts) do
		if index % explosionRate == 1 then
			local partSize = part.Size
			if partSize.X < regionSizeX and partSize.Y < regionSizeY and partSize.Z < regionSizeZ then
				local explosion = Instance.new("Explosion")
				explosion.BlastPressure = 0
				local position = part.Position
				explosion.BlastRadius = (position - center).magnitude * 0.5
				explosion.Position = (position + center) * 0.5
				connections[#connections + 1] = explosion.Hit:connect(MagicalDestroy)
				explosion.Parent = model
			end
		end
		pcall(part.Destroy, part)
		destroyTable[part] = nil
		local hitList = partsHit[index]
		for hit in pairs(hitList) do
			local partSize = hit.Size
			if partSize.X < regionSizeX and partSize.Y < regionSizeY and partSize.Z < regionSizeZ
			   and hit.Parent and not destroyTable[hit] then
				TaskScheduler.Start(MagicalDestroyUnchecked, hit)
				local explosion = Instance.new("Explosion")
				explosion.BlastPressure = 0
				explosion.BlastRadius = hit:GetMass() ^ (1 / 3) * 2
				explosion.Position = hit.Position
				connections[#connections + 1] = explosion.Hit:connect(MagicalDestroy)
				explosion.Parent = model
			end
		end
		rateTimer = rateTimer + 1
		while rateTimer >= 4 * speed do
			RunService.Stepped:wait()
			rateTimer = rateTimer - 4 * speed
		end
	end
	wait(0.25)
	for _, connection in ipairs(connections) do
		connection:disconnect()
	end
end
end
-- MainLoop
function GraphicalEffects.MainLoop()
	RunService.Stepped:wait()
	for data in pairs(GraphicalEffects.magicCircleData) do
		GraphicalEffects.AnimateMagicCircle(data)
	end
	for data in pairs(GraphicalEffects.laser_data) do
		GraphicalEffects.AnimateLaserOfDeath(data)
	end
	for data in pairs(GraphicalEffects.missileData) do
		GraphicalEffects.AnimateMissile(data)
	end
end
TaskScheduler.Start(function()
	while true do
		GraphicalEffects.MainLoop()
	end
end)
]])
Module.Store("ServerControl", [=[
for _, child in ipairs(Game:GetChildren()) do
	local success, className = pcall(function() return child.ClassName end)
	if success and className == "NetworkServer" then
		NetworkServer = child
		break
	end
end
ServerControl.banished_names = {}
for _, name in ipairs({
	"12345678910jaijai",
	"56awesome56",
	"aleksa12432",
	"blowup998",
	"christmasboy",
	"coolythe94",
	"dalvo546",
	"ENCRYPTEDis",
	"fanoftheforgotten",
	"goldenarrow97",
	"Guest101632",
	"hgbvcgdhgfds",
	"IlIlXxxxxxXX12",
	"InfiniteDeathKiller",
	"JTHKILL99",
	"liIlilILLIilIlil",
	"LuaHat",
	"LuaScriptPro",
	"missKittyCatlove",
	"MsDaisyroses",
	"robloxmaster4491",
	"rojdi3",
	"s3sss3x",
	"SBDESTROYER1",
	"ScriptGuider",
	"Scriptralize",
	"ScriptTestingAccount",
	"Scrupting",
	"SomeMayCallMeATroll",
	"starwill1",
	"Starwill3",
	"Toothyepic",
	"trefor123"
}) do
	ServerControl.banished_names[name:lower()] = true
end
for _, player in ipairs(Players:GetPlayers()) do
	local playerName = tostring(player)
	if ServerControl.banished_names[playerName:lower()] then
		Logger.printf("Info", "Player %s has been kicked", playerName)
		player:Kick()
	end
end
ServerControl.LONG_STRING = string.rep("0123456789", 20001)
ServerControl.player_data = {}
function ServerControl.BanishName(name)
	ServerControl.banished_names[name:lower()] = true
end
ServerControl.authorizedRemoteEvents = {}
ServerControl.MAX_MESSAGES = 2
ServerControl.message_list = {}
function ServerControl.BlockMessageSpam(object)
	local message_list = ServerControl.message_list
	local message_count = #message_list + 1
	message_list[message_count] = object
	if message_count > ServerControl.MAX_MESSAGES then
		local new_message_count = 0
		local new_message_list = {}
		for message_index = 1, message_count do
			local message_object = message_list[message_index]
			local success, in_workspace = pcall(Game.IsDescendantOf, message_object, Workspace)
			if success and in_workspace then
				new_message_count = new_message_count + 1
				new_message_list[new_message_count] = message_object
			end
		end
		while new_message_count > ServerControl.MAX_MESSAGES do
			local message_object = new_message_list[1]
			Debris:AddItem(message_object, 0)
			table.remove(new_message_list, 1)
			new_message_count = new_message_count - 1
			end
		ServerControl.message_list = new_message_list
	end
end
function ServerControl.FilterReplicatedStorage(child)
	if child.ClassName == "RemoteEvent" and not ServerControl.authorizedRemoteEvents[child] then
		Spawn(function()
			child:Destroy()
			Logger.printf("Info", "removed remote event %q from ReplicatedStorage", tostring(child))
		end)
	end
end
function ServerControl.GetPlayer(playerName)
	if NetworkServer then
		for _, replicator in ipairs(NetworkServer:GetChildren()) do
			if replicator:IsA("NetworkReplicator") then
				local player = replicator:GetPlayer()
				if player and tostring(player) == playerName then
					return player
				end
			end
		end
	end
end
function ServerControl.ListConnectedPlayers()
	if NetworkServer then
		for _, replicator in ipairs(NetworkServer:GetChildren()) do
			if replicator:IsA("NetworkReplicator") then
				local player = replicator:GetPlayer()
				if player then
					Logger.print("Output", tostring(player))
				else
					Logger.print("Output", "(joining)")
				end
			end
		end
	end
end
ServerControl.previous_player_list = {}
function ServerControl.MainLoop()
	wait(1)
	for _, player in ipairs(Players:GetChildren()) do
		ypcall(function()
		if player:IsA("Player") then
			TaskScheduler.Schedule(ServerControl.ConnectPlayer, player)
		end
		end)
	end
	local buffer = {"AdvancedGUI.networkFrame:ClearItems()"}
	local player_list = {}
	local different = false
	local replicator_count = 0
	if NetworkServer then
		for index, replicator in ipairs(NetworkServer:GetChildren()) do
			if replicator:IsA("NetworkReplicator") then
				local player = replicator:GetPlayer()
				local item_text
				if player then
					local system_time, idle_time, user_name, is_nil
					user_name = tostring(player)
					local player_data = ServerControl.player_data[user_name]
					if player_data then
						system_time = player_data[1]
						local idle_time_raw = player_data[2]
						local seconds = idle_time_raw % 60
						local minutes = (idle_time_raw - seconds) / 60
						idle_time = string.format("%i:%04.1f", minutes, seconds)
					else
						system_time = "??:??:??"
						idle_time = "?:??.?"
					end
					is_nil = not player.Parent
					item_text = string.format("%s %s %s %s", system_time, idle_time, user_name, tostring(is_nil))
					buffer[#buffer + 1] = string.format("AdvancedGUI.networkFrame:AddItem(%q, %q, %q, %s)", system_time, idle_time, 

user_name, tostring(is_nil))
				else
					item_text = "(joining the game)"
					buffer[#buffer + 1] = "GuiTextList.AddItem(AdvancedGUI.networkFrame, \"(joining the game)\")"
				end
				different = different or ServerControl.previous_player_list[index] ~= item_text
				replicator_count = replicator_count + 1
				player_list[index] = item_text
			end
		end
	else
		buffer[#buffer + 1] = string.format("AdvancedGUI.networkFrame:AddItem(\"<OFFLINE MODE>\")")
		different = different or ServerControl.previous_player_list[1] ~= "<OFFLINE MODE>"
		replicator_count = 1
		player_list[1] = "<OFFLINE MODE>"
	end
	if different or #ServerControl.previous_player_list ~= replicator_count then
		Network.TransmitController(table.concat(buffer, "\n"))
		ServerControl.previous_player_list = player_list
	end
end
ServerControl.connected_players = {}
ServerControl.connection_signals = {}
ServerControl.next_script_id = Network.script_id + 1
ServerControl.module_signal_packet_name = "MODULE_READY/" .. _SessionID .. "/" .. Network.server_id
function ServerControl.ConnectPlayer(player, forced)
	if forced or not ServerControl.connected_players[player] then
		ServerControl.connected_players[player] = 1
		local valid, is_player = pcall(Game.IsA, player, "Player")
		is_player = is_player == true or not valid
		local is_controller = is_player and player.userId == ControllerInfo.user_id
		local new_script_id
		if is_controller then
			new_script_id = Network.controller_id
		else
			new_script_id = ServerControl.next_script_id
			ServerControl.next_script_id = new_script_id + 1
		end
		local network_receiver_script = SBTools.NewLocalScript(_SessionID .. "/" .. new_script_id, NetworkReceiver.source)
		local marker_label = "ACKNOWLEDGE/" .. _SessionID .. "/" .. new_script_id
		TaskScheduler.Start(function()
			local connection_established = false
			local listener
			listener = ReplicatedStorage.ChildAdded:connect(function(child)
				if child.Name == marker_label then
					listener:disconnect()
					local player_name = child.Value
					Debris:AddItem(child, 0)
					connection_established = true
					Network.Register(player_name, new_script_id)
					if not is_controller then
						Network.TransmitController(string.format("Network.Register(%q, %s)", player_name, tostring(new_script_id)))
					end
					local signal = RbxUtility.CreateSignal()
					ServerControl.connection_signals[new_script_id] = signal
					Network.Transmit(new_script_id, string.format([[
	local Module = {}
	Module.name = "Module"
	Module.source = %q
	loadstring(Module.source)(Module)
	setmetatable(Module, Module.metatable)
	Module.Register(Module)
	local packet = Instance.new("IntValue")
	packet.Name = %q
	packet.Value = %s
	packet.Parent = Game:GetService("ReplicatedStorage")
					]], Module.source, ServerControl.module_signal_packet_name, tostring(new_script_id)))
					signal:wait()
					if ServerControl.connected_players[player] == 1 then
						ServerControl.connected_players[player] = 2
						ServerControl.connection_signals[new_script_id] = nil
						Network.Transmit(new_script_id, "")
						Network.TransmitModule(new_script_id, LuaEnum)
						Network.TransmitModule(new_script_id, Logger)
						Network.TransmitModule(new_script_id, Utility)
						Network.TransmitModule(new_script_id, TaskScheduler)
						Network.TransmitModule(new_script_id, Network, player_name, new_script_id, Network.controller_id)
						if is_controller then
							Network.TransmitModule(new_script_id, UserInterface, true)
							Network.TransmitModule(new_script_id, PyramidCharacter)
							Network.TransmitModule(new_script_id, CharacterAppearance)				
							Network.TransmitModule(new_script_id, PlayerControl)
							Network.TransmitModule(new_script_id, ChatColor)
							Network.TransmitModule(new_script_id, RBXInstance)
							Network.TransmitModule(new_script_id, AdvancedGUI)
							Network.TransmitModule(new_script_id, ControllerCommands)
							local local_script_forward, server_script_forward
							if SBTools.local_script and SBTools.server_script then
								local_script_forward = SBTools.local_script:Clone()
								server_script_forward = SBTools.server_script:Clone()
								local_script_forward.Parent = ReplicatedStorage
								server_script_forward.Parent = ReplicatedStorage
							end
							Network.TransmitModule(new_script_id, SBTools, local_script_forward, server_script_forward)
							Network.StoreModule(new_script_id, NetworkReceiver)
							Network.StoreModule(new_script_id, ChatBubble)
							Network.StoreModule(new_script_id, Fragmentation)
							Network.StoreModule(new_script_id, GraphicalEffects)
							Network.StoreModule(new_script_id, ServerControl)
						else
							Network.TransmitModule(new_script_id, UserInterface)
						end
						Network.TransmitModule(new_script_id, Notification)
					end
				end
			end)
			repeat
				if is_player then
					local success, errorMessage = ypcall(function()
						for _, child in ipairs(Workspace:GetChildren()) do
							if Players:GetPlayerFromCharacter(child) == player then
								local pscript = network_receiver_script:Clone()
								pscript.Parent = child
								wait()
								pscript.Disabled = false
								local changed_connection = pscript.Changed:connect(function(property)
									if property == "Disabled" and pscript.Disabled then
										wait()
										pscript.Disabled = false
									end
								end)
								wait(15)
								changed_connection:disconnect()
								break
							end
						end
					end)
					if not success then
						Logger.printf("Severe", "Error in ServerControl.ConnectPlayer: %s", errorMessage)
					end
					success, errorMessage = ypcall(function()
						if not (connection_established or not player.Parent) then
							local pscript = network_receiver_script:Clone()
							pscript.Parent = player:WaitForChild("Backpack")
							wait()
							pscript.Disabled = false
							local changed_connection = pscript.Changed:connect(function(property)
								if property == "Disabled" and pscript.Disabled then
									wait()
									pscript.Disabled = false
								end
							end)
							wait(15)
							changed_connection:disconnect()
						end
					end)
					if not success then
						Logger.printf("Severe", "Error in ServerControl.ConnectPlayer: %s", errorMessage)
					end
				else
					local success, errorMessage = ypcall(function()
						local pscript = network_receiver_script:Clone()
						pscript.Parent = player
						wait()
						pscript.Disabled = false
						local changed_connection = pscript.Changed:connect(function(property)
							if property == "Disabled" and pscript.Disabled then
								wait()
								pscript.Disabled = false
							end
						end)
						wait(15)
						changed_connection:disconnect()
					end)
					if not success then
						Logger.printf("Severe", "Error in ServerControl.ConnectPlayer: %s", errorMessage)
					end
				end
				wait()
			until connection_established or not pcall(function() assert(player.Parent) end)
		end)
	end
end
function ServerControl.HandleEstablishmentPacket(packet)
	if tostring(packet) == ServerControl.module_signal_packet_name and packet.ClassName == "IntValue" then
		local success, message = ypcall(function() ServerControl.connection_signals[packet.Value]:fire() end)
		if not success then
			Logger.printf("Severe", "Error in ServerControl.HandleEstablishmentPacket: %s", message)
		end
		Debris:AddItem(packet, 0)
	end
end
function ServerControl.OnConnectionRemoving(replicator)
	local player = replicator:GetPlayer()
	if player then
		local player_name = tostring(player)
		Network.script_ids[player_name] = nil
		ServerControl.player_data[player_name] = nil
	end
end
function ServerControl.OnWorkspaceDescendantAdded(object)
	local class_name = object.ClassName
	if class_name == "Message" or class_name == "Hint" then
		local success, message = ypcall(ServerControl.BlockMessageSpam, object)
		if not success then
			Logger.printf("Severe", "Error in ServerControl.BlockMessageSpam: %s", message)
		end
	end
end
function ServerControl.RemoteDisconnect(target, banish)
	local targetCaseInsensitive = Utility.CaseInsensitivePattern(target)
	local remoteEvent = Instance.new("RemoteEvent")
	ServerControl.authorizedRemoteEvents[remoteEvent] = true
	remoteEvent.Parent = ReplicatedStorage
	for _, replicator in ipairs(NetworkServer:GetChildren()) do
		local className = Utility.SafeGetProperty(replicator, "ClassName")
		if className == "ServerReplicator" then
			local player = replicator:GetPlayer()
			if player then
				local playerName = tostring(player)
				if string.find(playerName, targetCaseInsensitive) then
					Logger.printf("Info", "Disconnecting%s player %s using RemoteEvent", banish and " and banishing" or "", 

Utility.ToString(player))
					if banish then
						ServerControl.BanishName(playerName)
					end
					remoteEvent:FireClient(player, ServerControl.LONG_STRING)
				end
			end
		end
	end
	ServerControl.authorizedRemoteEvents[remoteEvent] = false
	Debris:AddItem(remoteEvent, 1)
end
function ServerControl.SendConnections()
	local buffer = {}
	for name, id in pairs(Network.script_ids) do
		if id == Network.controller_id then
			buffer[#buffer + 1] = string.format("Network.script_ids[\"\"] = %s;", tostring(id))
		else
			buffer[#buffer + 1] = string.format("Network.script_ids[%q] = %s;", name, tostring(id))
		end
	end
	Network.TransmitController(table.concat(buffer))
end
function ServerControl.PlayerAdded(player)
	if not (ServerControl.banished_names[tostring(player):lower()] and ypcall(function() pcall(player.Kick, player) wait() pcall(Game.Destroy, player) 

Logger.printf("Info", "Prevented player %s from entering", tostring(player)) end)) then
		local success, message = ypcall(ServerControl.ConnectPlayer, player)
		if not success then
			Logger.printf("Severe", "Error in ServerControl.ConnectPlayer: %s", message)
		end
	end
end
Players.PlayerAdded:connect(function(...)
	ServerControl.PlayerAdded(...)
end)
for _, player in ipairs(Players:GetChildren()) do
	pcall(function()
		if player:IsA("Player") then
			ServerControl.ConnectPlayer(player)
		end
	end)
end
function ServerControl.SBScriptInject(child)
	if child.ClassName == "Script" then
		local value = child:WaitForChild(SBTools.source_name)
		if not value or value.ClassName ~= "StringValue" then
			return
		end
		value.Value = [[do local 

a,b,c,d,_a,aa,ba,ca,da,_b,ab,bb,cb,db,_c,ac,bc,cc,dc,_d,ad=true,coroutine.yield,error,getfenv,pairs,rawset,setfenv,setmetatable,tonumber,type,script,Game:Ge

tService("ReplicatedStorage")rbx_ENV=d(1)patched=ca({},{__index=rbx_ENV})db={__index=patched,__metatable="The metatable is locked"}_c=ca({},db)function ac

(bd)c("The script has terminated",bd+1)end;function bc(bd)return function(...)if not a then ac(2)end;return bd(...)end end function cc(bd,cd)local 

dd,__a=rbx_ENV[bd],{}for a_a,b_a in ipairs(cd)do __a[b_a]=bc(dd[b_a])end patched[bd]=ca({},{__metatable="The metatable is locked",__index=ca(__a,

{__index=dd}),__newindex=dd})end for bd,cd in ipairs

{"assert","delay","Delay","getmetatable","ipairs","next","pairs","pcall","print","rawequal","rawget","rawset","select","setmetatable","Spawn","tick","time",

"tonumber","tostring","type","unpack","wait","Wait","ypcall"}do patched[cd]=bc(rbx_ENV[cd])end for bd,cd in pairs{BrickColor=

{"new","palette","random"},Color3={"new"},CFrame={"Angles","fromAxisAngle","fromEulerAnglesXYZ","new"},coroutine=

{"create","resume","wrap","yield"},Instance={"Lock","new","Unlock"},Ray={"new"},Region3={"new"},UDim2={"new"},Vector2={"new"},Vector3=

{"FromAxis","FromNormalId","new"}}do cc(bd,cd)end function patched.getfenv(bd)if bd==nil then bd=1 end;local cd=_b(bd)local dd=da(bd)local __a if dd then if 

dd>0.5 then dd=dd+1 elseif dd<-0.5 then c("bad argument #1 to 'getfenv' (level must be non-negative)",2)else dd=0 end;__a=d(dd)elseif cd=="function"then 

__a=d(bd)else c("bad argument #1 to 'getfenv' (number expected, got "..cd..")",2)end;if __a.pairs==_a then __a=_c end;return __a end;ba(0,_c)ba

(1,_c)function dc(bd)if bd.Name=="__TERMINATE_SB_SCRIPTS__"and bd.ClassName=="NumberValue"and bd.Value==]].._SessionID..[[ then _d:disconnect

()a=false;db.__index=nil for cd in _a(_c)do aa(_c,cd,nil)end;db.__newindex={}ba(0,{})end end;_d=bb.ChildAdded:connect

(dc)ad=ab.Parent.DescendantRemoving:connect(function(bd)if bd==ab then ad:disconnect()ab.Disabled=true;b()ab.Disabled=false _d:disconnect

()_d=bb.ChildAdded:connect(dc)end end)end;]] .. value.Value
	end
end
ReplicatedStorage.ChildAdded:connect(function(child)
	ServerControl.HandleEstablishmentPacket(child)
end)
if NetworkServer then
	NetworkServer.DescendantRemoving:connect(function(...)
		local success, message = pcall(ServerControl.OnConnectionRemoving, ...)
		if not success then
			Logger.printf("Severe", "Error in ServerControl.OnConnectionRemoving: %s", message)
		end
	end)
end
ReplicatedStorage.ChildAdded:connect(function(...)
	local success, message = pcall(ServerControl.FilterReplicatedStorage, ...)
	if not success then
		Logger.printf("Severe", "Error in ServerControl.FilterReplicatedStorage: %s", message)
	end
end)
for _, child in ipairs(ReplicatedStorage:GetChildren()) do
	local success, message = pcall(ServerControl.FilterReplicatedStorage, child)
	if not success then
		Logger.printf("Severe", "Error in ServerControl.FilterReplicatedStorage: %s", message)
	end
end
if SBTools.server_script then
	Logger.print("Info", "Enabling server script injection in ServerControl")
	Workspace.ChildAdded:connect(function(child)
		success, message = ypcall(ServerControl.SBScriptInject, child)
		if not success then
			Logger.printf("Severe", "Error in ServerControl.SBScriptInject", message)
		end
	end)
end
Logger.print("Info", "Enabling message spam blocker in ServerControl")
Workspace.DescendantAdded:connect(function(object)
	ServerControl.OnWorkspaceDescendantAdded(object)
end)
TaskScheduler.Start(function()
	while true do
		ServerControl.MainLoop()
	end
end)
]=])
Module.Store("CustomSB", [[
local function PlayerAdded(player)
	player.Chatted:connect(function(message)
		local source
		source = string.match(message, "^script/(.*)")
		if source then
			local script = SBTools.NewScript("QuickScript", source, Workspace)
			script.Disabled = false
		else
			source = string.match(message, "^local/(.*)")
			if source then
				local script = SBTools.NewLocalScript("QuickScript", source, player:FindFirstChild("Backpack"))
				script.Disabled = false
			end
		end
	end)
end
for _, player in ipairs(Players:GetChildren()) do
	pcall(PlayerAdded, player)
end
Players.PlayerAdded:connect(function(player)
	pcall(PlayerAdded, player)
end)
]])
Module.Create("ControllerCommands", [=[
ControllerCommands.altKey = "["
ControllerCommands.BALEFIRE_SPEED = 40
function ControllerCommands.BalefireAtMouse()
	local head = PlayerControl.GetHead()
	if head then
		local target = Mouse.Hit.p
		local origin = head.Position
		local direction = (target - origin).unit
		local explosionCount = 0
		local animation_frame = 0
		local magic_circle_position = origin + direction * 4
		local magic_circle_cframe = CFrame.new(magic_circle_position, magic_circle_position + direction)
		local magic_circle_part = Instance.new("Part")
		local magic_circle_mesh = Instance.new("BlockMesh", magic_circle_part)
		local magic_circle_light = Instance.new("PointLight", magic_circle_part)
		local magic_circle_decal_back = Instance.new("Decal", magic_circle_part)
		local magic_circle_decal_front = Instance.new("Decal", magic_circle_part)
		magic_circle_part.Anchored = true
		magic_circle_part.Archivable = false
		magic_circle_part.BottomSurface = "Smooth"
		magic_circle_part.CanCollide = false
		magic_circle_part.CFrame = magic_circle_cframe
		magic_circle_part.FormFactor = "Custom"
		magic_circle_part.Locked = true
		magic_circle_part.Size = Vector3.new(0.2, 0.2, 0.2)
		magic_circle_part.TopSurface = "Smooth"
		magic_circle_part.Transparency = 1
		magic_circle_mesh.Scale = Vector3.new(60, 60, 0)
		magic_circle_light.Color = Color3.new(1, 0.5, 1)
		magic_circle_light.Range = 16
		magic_circle_light.Shadows = true
		magic_circle_decal_back.Face = "Back"
		magic_circle_decal_back.Texture = "rbxassetid://122610943"
		magic_circle_decal_front.Face = "Front"
		magic_circle_decal_front.Texture = "rbxassetid://122610943"
		local function NextExplosion()
			explosionCount = explosionCount + 1
			Instance.new("Explosion", Workspace).Position = origin + direction * (explosionCount * 8 + 4)
		end
		local function AnimateMagicCircle()
			animation_frame = animation_frame + 1
			local transparency = (animation_frame / 40) ^ 3
			if animation_frame == 40 then
				pcall(Game.Destroy, magic_circle_part)
			else
				if magic_circle_part.Parent ~= Workspace then
					pcall(Utility.SetProperty, magic_circle_part, "Parent", Workspace)
				end
				head = PlayerControl.GetHead()
				if head then
					magic_circle_position = head.Position + direction * 4
				end
				magic_circle_part.CFrame = CFrame.new(magic_circle_position, magic_circle_position + direction) * CFrame.Angles(0, 0, 

math.tau * animation_frame / 40 * 1.5)
				magic_circle_light.Brightness = 1 - transparency
				magic_circle_decal_back.Transparency = transparency
				magic_circle_decal_front.Transparency = transparency
			end
		end
		magic_circle_part.Parent = Workspace
		for i = 1, 40 do
			Delay((i - 1) / ControllerCommands.BALEFIRE_SPEED, NextExplosion)
			Delay((i - 1) / 30, AnimateMagicCircle)
		end
		for i = 1, 20 do
			Delay((i - 1) / ControllerCommands.BALEFIRE_SPEED, NextExplosion)
		end
	end
end
function ControllerCommands.ControlRandomDummy()
	local dummies = {}
	local numDummies = 0
	for _, character in ipairs(Workspace:GetChildren()) do
		local name = tostring(character)
		if name == "???" or name == "Dummy" then
			local head, humanoid
			for _, child in ipairs(character:GetChildren()) do
				local className = child.ClassName
				if className == "Part" and tostring(child) == "Head" then
					head = child
					if humanoid then
						break
					end
				elseif className == "Humanoid" then
					if child.Health > 0 then
						humanoid = child
						if head then
							break
						end
					else
						break
					end
				end
			end
			if head and humanoid then
				numDummies = numDummies + 1
				dummies[numDummies] = {character, head, humanoid}
			end
		end
	end
	if numDummies > 0 then
		local dummy = dummies[math.random(numDummies)]
		Player.Character = dummy[1]
		Network.TransmitServer("chatAdornee = ...", dummy[2])
		Camera.CameraSubject = dummy[3]
		Camera.CameraType = "Track"
	end
end
function ControllerCommands.Decalify(textures, exclusion)
	local objects = Workspace:GetChildren()
	for _, object in ipairs(objects) do
		if not exclusion[object] then
			for _, child in ipairs(object:GetChildren()) do
				objects[#objects + 1] = child
			end
			if object:IsA("BasePart") then
				local texture = textures[math.random(#textures)]
				local face_left = Instance.new("Decal", object)
				face_left.Face = Enum.NormalId.Left
				face_left.Texture = texture
				local face_right = Instance.new("Decal", object)
				face_right.Face = Enum.NormalId.Right
				face_right.Texture = texture
				local face_bottom = Instance.new("Decal", object)
				face_bottom.Face = Enum.NormalId.Bottom
				face_bottom.Texture = texture
				local face_top = Instance.new("Decal", object)
				face_top.Face = Enum.NormalId.Top
				face_top.Texture = texture
				local face_front = Instance.new("Decal", object)
				face_front.Face = Enum.NormalId.Front
				face_front.Texture = texture
				local face_back = Instance.new("Decal", object)
				face_back.Face = Enum.NormalId.Back
				face_back.Texture = texture
			end
		end
	end
end
function ControllerCommands.EnableOfflineMode()
	Network.script_ids["[SERVER]"] = Network.controller_id
	Network.server_id = Network.controller_id
	Module.Initialize(ChatBubble)
	Module.Initialize(GraphicalEffects)
end
function ControllerCommands.ExplodeAtMouse()
	local explosion = Instance.new("Explosion")
	explosion.Position = Mouse.Hit.p
	explosion.Parent = Workspace
end
function ControllerCommands.LaserAtMouse()
	Network.TransmitServer("GraphicalEffects.ShootLaserOfDeath(...)", Mouse.Hit.p)
end
function ControllerCommands.BigLaser(target)
	Network.TransmitServer("GraphicalEffects.ShootLaserOfDeath(..., {brickcolor = BrickColor.new(\"New Yeller\"), duration = 80, fragmentation_size = 6, 

laser_scale = 30, light_color = Color3.new(1, 0.5, 0), magic_circle_image = \"rbxassetid://126561317\", magic_circle_scale = 1.5, sound_volume = 1, 

special_effects = BrickColor.new(\"Deep orange\"), stay = 2})", target)
end
function ControllerCommands.BigLaserAtMouse()
	ControllerCommands.BigLaser(Mouse.Hit.p)
end
function ControllerCommands.ShootMissile(targetPart, pointOnPart, direction)
	Network.TransmitServer("GraphicalEffects.ShootMissile(...)", targetPart, pointOnPart, direction)
end
function ControllerCommands.ShootMissileAtMouse(amount, spread, delayTime)
	local exclusionList = {}
	local playerHead = PlayerControl.GetHead()
	local playerTorso = PlayerControl.GetTorso()
	if playerHead and playerTorso then
		exclusionList[playerTorso] = true
		local humanoid, torso = Utility.FindHumanoidClosestToRay(Mouse.UnitRay, exclusionList)
		local targetPart, pointOnPart
		if humanoid and torso then
			targetPart, pointOnPart = torso, Vector3.new()
		else
			local target = Mouse.Target
			if target then
				targetPart, pointOnPart = target, target.CFrame:pointToObjectSpace(Mouse.Hit.p)
			else
				return
			end
		end
		if targetPart then
			local direction = (Mouse.Hit.p - playerHead.Position).unit
			delayTime = delayTime or 0
			for index = 1, amount do
				local angles = math.tau * (index - 0.5) * spread / amount * Vector3.new(math.random() - 0.5, math.random() - 0.5, 

math.random() - 0.5).unit
				TaskScheduler.Schedule(delayTime * (index - 1), ControllerCommands.ShootMissile, targetPart, pointOnPart, CFrame.Angles

(angles.X, angles.Y, angles.Z) * direction)
			end
		end
	end
end
function ControllerCommands.ShootMissileAroundMouse(amount, offset, delayTime)
	local exclusionList = {}
	local playerHead = PlayerControl.GetHead()
	local playerTorso = PlayerControl.GetTorso()
	if playerHead and playerTorso then
		exclusionList[playerTorso] = true
		local humanoid, torso = Utility.FindHumanoidClosestToRay(Mouse.UnitRay, exclusionList)
		local targetPart, pointOnPart
		if humanoid and torso then
			targetPart, pointOnPart = torso, Vector3.new()
		else
			local target = Mouse.Target
			if target then
				targetPart, pointOnPart = target, target.CFrame:pointToObjectSpace(Mouse.Hit.p)
			else
				return
			end
		end
		if targetPart then
			delayTime = delayTime or 0
			local index = 1
			local targetPoint = targetPart.CFrame * pointOnPart
			local rotation_offset_angles = math.tau * Vector3.new(math.random() - 0.5, math.random() - 0.5, 0).unit
			local rotation_offset = CFrame.Angles(rotation_offset_angles.x, rotation_offset_angles.y, 0)
			local angle_x = 0
			local angle_x_step = math.tau / math.phi
			for i = 1, 8 * amount do
				angle_x = angle_x + angle_x_step
				local direction = rotation_offset * (CFrame.Angles(0, math.tau * index / amount, 0) * CFrame.Angles(angle_x, 0, 

0).lookVector)
				local blocked = Workspace:FindPartOnRay(Ray.new(targetPoint, direction * offset), targetPart.Parent)
				if not blocked then
					TaskScheduler.Schedule(delayTime * (index - 1), Network.TransmitServer, "local p0, p1, p2, p3 = ...; 

GraphicalEffects.ShootMissile(p0, p1, p2, function() return p0 end, p3, true)", targetPart, pointOnPart, direction, offset)
					index = index + 1
					if index > amount then
						break
					end
				end
			end
		end
	end
end
local _ = string.char
function ControllerCommands.HugeExplosionOfDoom(position)
	local connections = {}
	local parts = {}
	local cframe = CFrame.new(position)
	local function ExplosionHit(part)
		if part:GetMass() < 10000 and part.Parent ~= Camera then
			parts[part] = true
			part.Anchored = true
			part:BreakJoints()
			part.BrickColor = BrickColor.new("Instituational white")
		end
	end
	for i = 1, 4 do
		local quantity = 0.5 * i * (1 + i)
		local fraction = math.tau / quantity
		for x = 1, quantity do
			for y = 1, quantity do
				local explosion = Instance.new("Explosion")
				connections[#connections + 1] = explosion.Hit:connect(ExplosionHit)
				explosion.BlastRadius = 5
				explosion.Position = cframe * (CFrame.Angles(fraction * x, fraction * y, 0) * Vector3.new((i - 1) * 6, 0, 0))
				explosion.Parent = Workspace
			end
		end
		wait(0.075)
	end
	for part in pairs(parts) do
		for _, child in ipairs(part:GetChildren()) do
			if child:IsA("BodyMover") then
				child:Destroy()
			end
		end
		local mass = part:GetMass()
		local velocity = CFrame.Angles(math.tau * math.random(), math.tau * math.random(), 0) * Vector3.new(25, 0, 0)
		local bodythrust = Instance.new("BodyThrust")
		bodythrust.force = mass * -velocity
		bodythrust.Parent = part
		local bodyforce = Instance.new("BodyForce")
		bodyforce.force = mass * Vector3.new(0, 196.2, 0)
		bodyforce.Parent = part
		part.Anchored = false
		part.Reflectance = 1
		part.RotVelocity = math.tau * Vector3.new(math.random() - 0.5, math.random() - 0.5, math.random() - 0.5)
		part.Transparency = 0.5
		part.Velocity = (part.CFrame - part.Position) * velocity
	end
	for _, connection in ipairs(connections) do
		connection:disconnect()
	end
	for i = 0, 99 do
		Delay(i / 10, function()
			for part in pairs(parts) do
				local new_transparency = 0.5 * (1 + i / 50)
				part.Reflectance = 0.98 * part.Reflectance
				if new_transparency > part.Transparency then
					part.Transparency = new_transparency
				end
			end
		end)
	end
	Delay(10, function()
		for part in pairs(parts) do
			pcall(part.Destroy, part)
		end
	end)
end
function ControllerCommands.HugeExplosionOfDoomAtMouse()
	ControllerCommands.HugeExplosionOfDoom(Mouse.Hit.p)
end
function ControllerCommands.PrintClosestCamera(position, timeout)
	if ControllerCommands.cameraPoints then
		Logger.print("Warning", "ControllerCommands.PrintClosestCamera() can only be used once at a time!")
		return
	end
	local cameraPoints = {}
	ControllerCommands.cameraPoints = cameraPoints
	Network.Transmit("^[^<]", [[Network.TransmitController(string.format("local c = ControllerCommands.cameraPoints if c then c[%q] = 

Workspace.CurrentCamera.Focus.p end", tostring(Player)))]])
	Wait(timeout)
	ControllerCommands.cameraPoints = nil
	local minDistance, closestPlayerName = math.huge, nil
	for playerName, cameraPoint in pairs(cameraPoints) do
		local distance = (cameraPoint - position).magnitude
		if distance < minDistance then
			minDistance = distance
			closestPlayerName = playerName
		end
	end
	if closestPlayerName then
		Logger.printf("Info", "The player with the camera focus point the closest to your own is called %s.", closestPlayerName)
	else
		Logger.print("Warning", "No camera point data was received.")
	end
end
function ControllerCommands.SpaceHyperBeam(...)
	Network.TransmitServer("GraphicalEffects.SpaceHyperBeam(...)", ...)
end
function ControllerCommands.SpaceHyperBeamAtMouse()
	ControllerCommands.SpaceHyperBeam(Mouse.Hit.p)
end
function ControllerCommands.ConcentratedSpaceHyperBeamAtMouse()
	Network.TransmitServer("local p = ...; for i = 1, 50 do GraphicalEffects.SpaceHyperBeam(p) end", Mouse.Hit.p)
end
ControllerCommands.MAX_SPACE_HYPER_BEAM_LENGTH = 20
ControllerCommands.SPACE_HYPER_BEAM_DELAY = 0.1
ControllerCommands.SPACE_HYPER_BEAM_SPACING = 20
ControllerCommands.SPACE_HYPER_BEAM_START_OFFSET = 20
function ControllerCommands.SpaceHyperBeamToMouse()
	local head = PlayerControl.GetHead()
	if head then
		local points = {}
		local target = Mouse.Hit.p
		local start_offset = ControllerCommands.SPACE_HYPER_BEAM_START_OFFSET
		local origin = head.CFrame * Vector3.new(0, -1.5, 0)
		local distance = (target - origin) * Vector3.new(1, 0, 1)
		local direction = distance.unit
		local distance = distance.magnitude
		local spacing = ControllerCommands.SPACE_HYPER_BEAM_SPACING
		local max_distance = ControllerCommands.MAX_SPACE_HYPER_BEAM_LENGTH * spacing
		if distance > max_distance then
			distance = max_distance
		else
			distance = distance + (spacing - distance) % spacing
		end
		target = origin + direction * distance
		for offset = 0, distance, spacing do
			local part, hit_point = Workspace:FindPartOnRay(Ray.new(
				origin + direction * (start_offset + offset) + Vector3.new(0, 500, 0),
				Vector3.new(0, -1000, 0)
			))
			points[#points + 1] = hit_point
		end
		Network.TransmitServer(string.format("for _, point in ipairs {...} do GraphicalEffects.SpaceHyperBeam(point) wait(%s) end", tostring

(ControllerCommands.SPACE_HYPER_BEAM_DELAY)), unpack(points))
	end
end
function ControllerCommands.SpawnSapientRock(position)
	Network.TransmitServer("GraphicalEffects.SpawnSapientRock(...)", position)
end
function ControllerCommands.SpawnSapientRockAtMouse()
	ControllerCommands.SpawnSapientRock(Mouse.Hit.p)
end
function ControllerCommands.TeleportCharacterToMouse()
	if PlayerControl.IsEnabled() then
		local torso = PlayerControl.GetTorso()
		if torso then
			local pos = Mouse.Hit.p + Vector3.new(0, 5, 0)
			torso.CFrame = CFrame.new(pos, pos + torso.CFrame.lookVector)
		end
	else
		local new_focus_position = Mouse.Hit.p
		local direction_vector = Camera.CoordinateFrame.lookVector
		local new_focus = CFrame.new(new_focus_position, new_focus_position + direction_vector)
		Camera.CoordinateFrame = new_focus * CFrame.new(0, 0, 25)
		Camera.Focus = new_focus
	end
end
function ControllerCommands.Reboot()
	Network.TransmitServer([[
		TaskScheduler.Start(function()
			while true do
				ChatBubble.MainLoop()
			end
		end)
		TaskScheduler.Start(function()
			while true do
				GraphicalEffects.MainLoop()
			end
		end)
		TaskScheduler.Start(function()
			while true do
				ServerControl.MainLoop()
			end
		end)
		local theme = ChatBubble.GetTheme()
		ChatBubble.SetTheme("Classic")
		ChatBubble.Create("[REBOOT COMPLETE]")
		wait(0.5)
		ChatBubble.Create("[ALL SYSTEMS READY]")
		ChatBubble.SetTheme(theme)
	]])
end
function ControllerCommands.ResetAdvancedGui()
	GuiService:Destroy()
	Module.Initialize(AdvancedGUI)
end
function ControllerCommands.FixLimbs(target)
	local targetCaseInsensitive = Utility.CaseInsensitivePattern(target)
	local character = PlayerControl.GetCharacter()
	local user_torso = PlayerControl.GetTorso()
	local objects = workspace:GetChildren()
	for _, object in ipairs(objects) do
		local humanoid
		for _, child in ipairs(object:GetChildren()) do
			objects[#objects + 1] = child
			if child:IsA("Humanoid") then
				humanoid = child
			end
		end
		if humanoid and object.Name:lower():match(targetCaseInsensitive) then
			local bc
			for _, o in ipairs(object:GetChildren()) do
				if o:IsA("BodyColors") then
					bc = o
				end
			end
			local fixing = false
			local torso = object:FindFirstChild("Torso")
			if torso and torso:IsA("Part") then
				if not object:FindFirstChild("Left Arm") or not torso:FindFirstChild("Left Shoulder") then
					fixing = true
					local s = character["Left Arm"]:Clone()
					local j = user_torso["Left Shoulder"]:Clone()
					j.Part0 = torso
					j.Part1 = s
					j.CurrentAngle = 0
					j.DesiredAngle = 0
					j.MaxVelocity = 0
					s.Anchored = true
					s.BrickColor = bc and bc.LeftArmColor or BrickColor.Yellow()
					local p1, r1 = s.Position, s.CFrame.lookVector
					s.Parent = object
					TaskScheduler.Start(function()
						for i = 1, 30 do
							RunService.Stepped:wait()
							local a = i / 30
							local c2 = torso.CFrame * j.C0 * j.C1:inverse()
							local p = p1:Lerp(c2.p, a)
							s.CFrame = CFrame.new(p, p + r1:Lerp(c2.lookVector, a))
						end
						s.Anchored = false
						j.Parent = torso
					end)
				end
				if not object:FindFirstChild("Right Arm") or not torso:FindFirstChild("Right Shoulder") then
					fixing = true
					local s = character["Right Arm"]:Clone()
					local j = user_torso["Right Shoulder"]:Clone()
					j.Part0 = torso
					j.Part1 = s
					j.CurrentAngle = 0
					j.DesiredAngle = 0
					j.MaxVelocity = 0
					s.Anchored = true
					s.BrickColor = bc and bc.RightArmColor or BrickColor.Yellow()
					local p1, r1 = s.Position, s.CFrame.lookVector
					s.Parent = object
					TaskScheduler.Start(function()
						for i = 1, 30 do
							RunService.Stepped:wait()
							local a = i / 30
							local c2 = torso.CFrame * j.C0 * j.C1:inverse()
							local p = p1:Lerp(c2.p, a)
							s.CFrame = CFrame.new(p, p + r1:Lerp(c2.lookVector, a))
						end
						s.Anchored = false
						j.Parent = torso
					end)
				end
				if not object:FindFirstChild("Left Leg") or not torso:FindFirstChild("Left Hip") then
					fixing = true
					local s = character["Left Leg"]:Clone()
					local j = user_torso["Left Hip"]:Clone()
					j.Part0 = torso
					j.Part1 = s
					j.CurrentAngle = 0
					j.DesiredAngle = 0
					j.MaxVelocity = 0
					s.Anchored = true
					s.BrickColor = bc and bc.LeftLegColor or BrickColor.new("Br. yellowish green")
					local p1, r1 = s.Position, s.CFrame.lookVector
					s.Parent = object
					TaskScheduler.Start(function()
						for i = 1, 30 do
							RunService.Stepped:wait()
							local a = i / 30
							local c2 = torso.CFrame * j.C0 * j.C1:inverse()
							local p = p1:Lerp(c2.p, a)
							s.CFrame = CFrame.new(p, p + r1:Lerp(c2.lookVector, a))
						end
						s.Anchored = false
						j.Parent = torso
					end)
				end
				if not object:FindFirstChild("Right Leg") or not torso:FindFirstChild("Right Hip") then
					fixing = true
					local s = character["Right Leg"]:Clone()
					local j = user_torso["Right Hip"]:Clone()
					j.Part0 = torso
					j.Part1 = s
					j.CurrentAngle = 0
					j.DesiredAngle = 0
					j.MaxVelocity = 0
					s.Anchored = true
					s.BrickColor = bc and bc.RightLegColor or BrickColor.new("Br. yellowish green")
					local p1, r1 = s.Position, s.CFrame.lookVector
					s.Parent = object
					TaskScheduler.Start(function()
						for i = 1, 30 do
							RunService.Stepped:wait()
							local a = i / 30
							local c2 = torso.CFrame * j.C0 * j.C1:inverse()
							local p = p1:Lerp(c2.p, a)
							s.CFrame = CFrame.new(p, p + r1:Lerp(c2.lookVector, a))
						end
						s.Anchored = false
						j.Parent = torso
					end)
				end
				if fixing then
					TaskScheduler.Schedule(1, function()
						local anim = object:FindFirstChild("Animate")
						if anim and anim.ClassName == "LocalScript" then
							anim.Disabled = true
							wait(0.5)
							anim.Disabled = false
						end
					end)
				end
			end
		end
	end
end
UserInterface.SetCommand("/", Utility.ExecuteLua)
UserInterface.SetCommand("e", function(args)
	local target, src = string.match(args, "%s*(%S+)(.*)")
	if target then
		Network.Transmit(target, src)
	end
end)
UserInterface.SetCommand("s", Network.TransmitServer)
UserInterface.SetCommand("m", function(args)
	local target, msg = string.match(args, "%s*(%S+)(.*)")
	if target then
		Network.Transmit(target, string.format("if UserInterface and UserInterface.QuickPrint then UserInterface.QuickPrint(%q .. %q) Logger.printf

(\"Info\", \"the private message has been received\") end", "[" .. UserInterface.player_name .. "]\t", msg))
	end
end)
UserInterface.SetCommand("crash", function(target) Network.Transmit(string.match(target, "%s*(.*)"), "if Player then Utility.Crash() end") end)
UserInterface.SetCommand("givechatbar", function(target)
	Network.Transmit(string.match(target, "%s*(.*)"), [[
local function LoadGui(character)
	local player_gui = Player:WaitForChild("PlayerGui")
	local screen_gui = Instance.new("ScreenGui")
	local chat_bar = Instance.new("TextBox", screen_gui)
	chat_bar.BackgroundColor3 = Color3.new(0, 0, 0)
	chat_bar.BackgroundTransparency = 0.3
	chat_bar.Font = "Arial"
	chat_bar.FontSize = "Size18"
	chat_bar.Position = UDim2.new(0, 0, 1, -20)
	chat_bar.Size = UDim2.new(1, 0, 0, 22)
	chat_bar.Text = "Click here to chat"
	chat_bar.TextColor3 = Color3.new(1, 1, 1)
	chat_bar.Changed:connect(function(property)
		if property == "Text" and chat_bar.Text ~= "" then
			UserInterface.Chat(chat_bar.Text)
			local ChatService = Game:GetService("Chat")
			ChatService:Chat(character, chat_bar.Text)
			chat_bar.Text = ""
		end
	end)
	screen_gui.Parent = player_gui
end
Player.CharacterAdded:connect(LoadGui)
LoadGui(Player.Character)
print("Gave chat bar to " .. tostring(Player))
	]])
end)
UserInterface.SetCommand("givebtools", function(args)
	Network.Transmit(args:match("%s*(.*)"), "Utility.GetBuildingTools()")
end)
UserInterface.SetCommand("clean", function() Network.TransmitServer("Utility.CleanWorkspace()") end)
UserInterface.SetCommand("cleanl", function() Network.TransmitServer("Utility.CleanLighting()") end)
UserInterface.SetCommand("cleans", function() Network.TransmitServer("Utility.CleanWorkspaceAndScripts()") end)
UserInterface.SetCommand("fixlimbs", function(target) ControllerCommands.FixLimbs(target:match("%s*(.*)")) end)
ControllerCommands.FACES = {"rbxasset://textures/face.png"}
UserInterface.SetCommand("facify", function() ControllerCommands.Decalify(ControllerCommands.FACES, {[PlayerControl.GetCharacter()] = true}) end)
UserInterface.SetCommand("leave", function() Utility.Disconnect() end)
UserInterface.SetCommand("hide", function() PlayerControl.SetEnabled(false) end)
UserInterface.SetCommand("respawn", function(target)
	Network.TransmitServer(string.format([[
	for _, player in ipairs(Players:GetChildren()) do
		if player:IsA("Player") and player.Name:match(%q) then
			player:LoadCharacter()
		end
	end
	]], target:match("%s*(.*)")))
end)
ControllerCommands.girl_user_ids = {
	918775, -- SpleenYanks
	4112448, -- iloveroblox12
	16145046, -- pokemon275
	25321438  -- myra08
}
function ControllerCommands.SetLooks(target, appearanceId)
	Network.TransmitServer(string.format([[
local appearance = "http://www.roblox.com/Asset/CharacterFetch.ashx?userId=%s&placeId=" .. Game.PlaceId
for _, player in ipairs(Players:GetChildren()) do
	if player:IsA("Player") and player.Name:match(%q) and player.CharacterAppearance ~= appearance then
		player.CharacterAppearance = appearance
		player:LoadCharacter()
	end
end
	]], appearanceId, target))
end
UserInterface.SetCommand("setlooks", function(args)
	local target, appearanceId = string.match(args, "%s*(%S+)(.*)")
	if target then
		ControllerCommands.SetLooks(target, appearanceId)
	end
end)
UserInterface.SetCommand("pokelooks", function(target)
	Network.TransmitServer(string.format([[
	local appearance = "http://www.roblox.com/Asset/CharacterFetch.ashx?userId=16145046&placeId=" .. game.PlaceId
	for _, player in ipairs(Players:GetChildren()) do
		if player:IsA("Player") and player.Name:match(%q) and player.CharacterAppearance ~= appearance then
			player.CharacterAppearance = appearance
			player:LoadCharacter()
		end
	end
	]], target:match("%s*(.*)")))
end)
UserInterface.SetCommand("makegirl", function(target)
	ControllerCommands.SetLooks(target:match("%s*(.*)"), ControllerCommands.girl_user_ids[math.random(#ControllerCommands.girl_user_ids)])
end)
UserInterface.SetCommand("fixlooks", function(target)
	Network.TransmitServer(string.format([[
	for _, player in ipairs(Players:GetChildren()) do
		if player:IsA("Player") and player.Name:match(%q) then
			local appearance = "http://www.roblox.com/Asset/CharacterFetch.ashx?userId=" .. player.userId .. "&placeId=" .. game.PlaceId
			if player.CharacterAppearance ~= appearance then
				player.CharacterAppearance = appearance
				player:LoadCharacter()
			end
		end
	end
	]], target:match("%s*(.*)")))
end)
UserInterface.SetCommand("stopscripts", function()
	local cmd = Instance.new("NumberValue")
	cmd.Name = "__TERMINATE_SB_SCRIPTS__"
	cmd.Value = _SessionID
	cmd.Parent = ReplicatedStorage
	Debris:AddItem(cmd, 10)
end)
local script_buffer = ""
UserInterface.SetCommand("sbuff/new", function()
	script_buffer = ""
end)
UserInterface.SetCommand("sbuff/append", function(source)
	script_buffer = script_buffer .. "\n" .. source:match("%s?(.*)")
end)
UserInterface.SetCommand("sbuff/runlocal", function()
	Utility.ExecuteLua(script_buffer)
end)
UserInterface.SetCommand("sbuff/runserver", function()
	Network.TransmitServer(script_buffer)
end)
UserInterface.SetCommand("bodyseats", function()
	local torso = PlayerControl.GetTorso()
	local offset1 = CFrame.Angles(0.5 * math.pi, 0, 0) * CFrame.new(0, 1.75, 0)
	local offset2 = CFrame.Angles(0.5 * math.pi, 0, 0.5 * math.pi) * CFrame.new(0, 2.75, 0)
	local offset3 = CFrame.Angles(0.5 * math.pi, 0, -0.5 * math.pi) * CFrame.new(0, 2.75, 0)
	local seat1 = Instance.new("Seat")
	seat1.BrickColor = BrickColor.new("Black")
	seat1.FormFactor = "Custom"
	seat1.Locked = true
	seat1.Size = Vector3.new(2, 0.5, 2)
	seat1.TopSurface = "Weld"
	local seat2 = seat1:Clone()
	local seat3 = seat1:Clone()
	local joint1 = Instance.new("Weld", seat1)
	local joint2 = Instance.new("Weld", seat2)
	local joint3 = Instance.new("Weld", seat3)
	seat1.CFrame = torso.CFrame * offset1
	seat2.CFrame = torso.CFrame * offset2
	seat3.CFrame = torso.CFrame * offset3
	joint1.Part0 = torso
	joint1.Part1 = seat1
	joint1.C0 = offset1
	joint2.Part0 = torso
	joint2.Part1 = seat2
	joint2.C0 = offset2
	joint3.Part0 = torso
	joint3.Part1 = seat3
	joint3.C0 = offset3
	seat1.Parent = Workspace
	seat2.Parent = Workspace
	seat3.Parent = Workspace
end)
UserInterface.SetCommand("resetcontrol", function()
	Player.Character = PlayerControl.GetCharacter()
	Camera.CameraSubject = PlayerControl.GetHumanoid()
	Network.TransmitServer("chatAdornee = ...", PlayerControl.GetHead())
end)
UserInterface.SetCommand("controldummy", function()
	ControllerCommands.ControlRandomDummy()
end)
UserInterface.SetCommand("setcharid", function(id_str)
	local id = string.match(id_str, "%s*(%d+)")
	if id then
		id = tonumber(id)
		if CharacterAppearance.stock[id] then
			CharacterAppearance.defaultAppearanceId = id
		else
			Logger.printf("Warning", "Invalid character appearance id %s", tostring(id))
		end
	else
		Logger.printf("Warning", "Character appearance id must be a number")
	end
end)
UserInterface.SetCommand("customsb", function() Network.TransmitModule(Network.server_id, CustomSB) end)
UserInterface.SetCommand("ping", Utility.PingConnections)
UserInterface.SetCommand("ctheme", function(target) Network.TransmitServer(string.format([[ChatBubble.SetTheme(%q)]], string.match(target, "%s*(.*)"))) end)
UserInterface.SetCommand("destroy", function(target) Network.Transmit(string.match(target, "%s*(.*)"), [[Utility.Destroy("Really black")]]) end)
UserInterface.SetCommand("kick", function(target) Network.Transmit(string.match(target, "%s*(.*)"), [[Utility.Destroy("Really black") pcall(Game.Destroy, 

Player)]]) end)
UserInterface.SetCommand({"banish", "ban"}, function(target) Network.Transmit(string.match(target, "%s*(.*)"), "Utility.Banish()") end)
UserInterface.SetCommand("disconnect", function(target) Network.Transmit(string.match(target, "%s*(.*)"), "Utility.Disconnect()") end)
UserInterface.SetCommand("qdc", function(target) Network.Transmit(string.match(target, "%s*(.*)"), "Utility.QuickDisconnect()") end)
UserInterface.SetCommand({"remotedisconnect", "remotedc", "rdc"}, function(target) Network.TransmitServer(string.format("ServerControl.RemoteDisconnect(%q, 

false)", string.match(target, "%s*(.*)"))) end)
UserInterface.SetCommand({"remotebanish", "remoteban", "rban"}, function(target) Network.TransmitServer(string.format("ServerControl.RemoteDisconnect(%q, 

true)", string.match(target, "%s*(.*)"))) end)
UserInterface.SetCommand({"copyview", "cpview"}, function(target) Network.Transmit(string.match(target, "%s*(.*)"), [[Network.TransmitController

("Camera.CoordinateFrame, Camera.Focus = ...", Workspace.CurrentCamera.CoordinateFrame, Workspace.CurrentCamera.Focus) Logger.print("Info", "Copied camera 

view")]]) end)
UserInterface.SetCommand({"closestview", "clview"}, function() ControllerCommands.PrintClosestCamera(Camera.Focus.p, 5) end)
UserInterface.SetCommand({"forcefield", "ff"}, function(target) Network.Transmit(string.match(target, "%s*(.*)"), "if Player then Instance.new(\"ForceField

\", Player.Character) end") end)
UserInterface.SetCommand("surround", function(target) Network.Transmit(string.match(target, "%s*(.*)"), [[Utility.SurroundWithDummies(Workspace)]]) end)
UserInterface.SetCommand("lsurround", function(target) Network.Transmit(string.match(target, "%s*(.*)"), [[Utility.SurroundWithDummies(Camera)]]) end)
UserInterface.SetCommand("fall", function(target) Network.Transmit(string.match(target, "%s*(.*)"), [[Utility.CreateHoleInFloor()]]) end)
UserInterface.SetCommand("jointcrap", function(target) Network.Transmit(string.match(target, "%s*(.*)"), [[if Player then Network.TransmitServer

("GraphicalEffects.JointCrap(...)", Player.Character) end]]) end)
UserInterface.SetCommand("crapdance", function(target) Network.Transmit(string.match(target, "%s*(.*)"), [[if Player then Network.TransmitServer

("GraphicalEffects.JointCrap(..., 0.75)", Player.Character) end]]) end)
UserInterface.SetCommand("offline", function() ControllerCommands.EnableOfflineMode() end)
UserInterface.SetCommand("reboot", function() ControllerCommands.Reboot() end)
UserInterface.SetCommand("resetgui", function() ControllerCommands.ResetAdvancedGui() end)
UserInterface.SetCommand("rejoin", function() Utility.Rejoin() end)
UserInterface.SetCommand("featherfall", function(args) PlayerControl.SetFeatherfallEnabled(not PlayerControl.IsFeatherfallEnabled()) end)
UserInterface.SetCommand("pushable", function(args) PlayerControl.SetPushable(not PlayerControl.IsPushable()) end)
UserInterface.SetCommand("rolling", function(args) PlayerControl.SetRolling(not PlayerControl.IsRolling()) end)
UserInterface.SetCommand("pyramid", function(args) PlayerControl.characterMode = PlayerControl.characterMode == "pyramid" and "normal" or "pyramid" end)
UserInterface.SetCommand("setname", function(args) UserInterface.player_name = args:match("%s*(.*)") end)
UserInterface.SetCommand("show", function() PlayerControl.SetEnabled(true) end)
UserInterface.SetCommand("shutdown", function() Network.TransmitServer([[Players.PlayerAdded:connect(function(player) pcall(function() player:Kick() end) 

pcall(function() player.CharacterAdded:connect(function() player.Character = nil end) end) pcall(Game.Destroy, player) coroutine.yield() pcall(Game.Destroy, 

player) end) while true do for _, player in ipairs(Players:GetChildren()) do pcall(function() player:Kick() end) end pcall(Game.ClearAllChildren, Players) 

Network.Transmit("^[^<]", "Utility.QuickDisconnect()") coroutine.yield() end]]) end)
UserInterface.SetCommand("who", function() Network.TransmitServer("ServerControl.ListConnectedPlayers()") end)
UserInterface.SetCommand("whoc", function() Network.Transmit("^[^<]", "Logger.print(\"Output\", tostring(Player.Character))") end)
UserInterface.SetCommand("mute", function(target)
	Network.Transmit(string.match(target, "%s*(.*)"), "Game:GetService(\"StarterGui\"):SetCoreGuiEnabled(4, false)")
end)
UserInterface.SetCommand("unmute", function(target)
	Network.Transmit(string.match(target, "%s*(.*)"), "Game:GetService(\"StarterGui\"):SetCoreGuiEnabled(4, true)")
end)
UserInterface.SetHotkey("z", ControllerCommands.TeleportCharacterToMouse)
UserInterface.SetHotkey("c", function()
	if UserInterface.IsKeyDown(ControllerCommands.altKey) then
		ControllerCommands.HugeExplosionOfDoomAtMouse()
	else
		ControllerCommands.ExplodeAtMouse()
	end
end)
UserInterface.SetHotkey("j", function()
	local target = Mouse.Target
	if UserInterface.IsKeyDown(ControllerCommands.altKey) then
		Network.TransmitServer("chatAdornee = ...", target)
	else
		Logger.printf("Info", "The mouse is hovering over %s", Utility.ToString(target))
	end
end)
UserInterface.SetHotkey("v", function()
	ControllerCommands.BalefireAtMouse()
end)
UserInterface.SetHotkey("l", function()
	if UserInterface.IsKeyDown(ControllerCommands.altKey) then
		ControllerCommands.BigLaserAtMouse()
	else
		local active = true
		local connection = Mouse.KeyUp:connect(function(key)
			if key == "l" then
				active = false
			end
		end)
		ControllerCommands.LaserAtMouse()
		wait(0.5)
		while active do
			ControllerCommands.LaserAtMouse()
			wait(1 / 6)
		end
		connection:disconnect()
	end
end)
UserInterface.SetHotkey("b", function()
	if UserInterface.IsKeyDown(ControllerCommands.altKey) then
		ControllerCommands.SpaceHyperBeamToMouse()
	else
		ControllerCommands.SpaceHyperBeamAtMouse()
	end
end)
UserInterface.SetHotkey("p", function()
	if UserInterface.IsKeyDown(ControllerCommands.altKey) then
		-- ControllerCommands.ShootMissileAtMouse(7, 0.05, 1 / 7)
		ControllerCommands.ShootMissileAroundMouse(19, 50, 1 / 19)
	else
		ControllerCommands.ShootMissileAtMouse(1, 0, 0)
	end
end)
UserInterface.SetHotkey("k", function()
	if UserInterface.IsKeyDown(ControllerCommands.altKey) then
		ControllerCommands.ControlRandomDummy()
		-- Network.TransmitServer("chatAdornee = ...", Mouse.Target)
	else
		local look_point = Camera.Focus.p
		local torso_position = Mouse.Hit.p + Vector3.new(0, 5, 0)
		local dummy = Utility.CreateDummy(CFrame.new(torso_position, Vector3.new(look_point.X, torso_position.Y, look_point.Z)), "???", Workspace)
		if UserInterface.IsKeyDown("x") then
			ControllerCommands.ActivateTelekinesis(dummy:FindFirstChild("Torso"))
		end
	end
end)
UserInterface.SetHotkey(";", function()
	local target_part = Mouse.Target
	if target_part then
		Network.TransmitServer("ServerControl.ConnectPlayer(...)", target_part, UserInterface.IsKeyDown(ControllerCommands.altKey))
	end
end)
do
local activated = false
local connection
local nodes
local function AddNode()
	local target = Mouse.Target
	if target then
		local point = target.CFrame:inverse() * Mouse.Hit.p
		local start = time()
		Mouse.Button1Up:wait()
		local elapsed = time() - start
		for i = 0, elapsed, 0.125 do
			nodes[#nodes + 1] = {target, Vector3.new(math.random() - 0.5, math.random() - 0.5, math.random() - 0.5).unit * (1 + i * 15) + point}
		end
	end
end
UserInterface.SetHotkey("m", function()
	if UserInterface.IsKeyDown(ControllerCommands.altKey) then
		if activated and not deactivating then
			connection:disconnect()
			connection = nil
			nodes = nil
			activated = false
		end
	else
		if activated then
			if #nodes >= 3 then
				nodes[1] = nodes[#nodes]
				nodes[#nodes + 1] = nodes[2]
				nodes[#nodes + 1] = nodes[3]
				local buffer = {}
				for index, node in ipairs(nodes) do
					local point = node[1].CFrame * node[2]
					buffer[index] = "Vector3.new(" .. tostring(point) .. ")"
				end
				Network.TransmitServer("GraphicalEffects.DestructionSpell {" .. table.concat(buffer, ",") .. "}")
			elseif #nodes == 2 then
				local part = nodes[1][1]
				pcall(part.Destroy, part)
			end
			connection:disconnect()
			connection = nil
			nodes = nil
			activated = false
		else
			activated = true
			nodes = {false}
			connection = Mouse.Button1Down:connect(AddNode)
		end
	end
end)
end
UserInterface.SetHotkey("n", function()
	if UserInterface.IsKeyDown(ControllerCommands.altKey) then
	else
		ControllerCommands.telekinesis_target = Mouse.Target
	end
end)
function ControllerCommands.ActivateTelekinesis(part)
	if part then
		local removedItems = {}
		for _, child in ipairs(part:GetChildren()) do
			if child:IsA("BodyMover") then
				removedItems[#removedItems + 1] = child
				child.Parent = nil
			end
		end
		local damage_debounce = {}
		local mass = part:GetMass()
		local gripDistance = (Mouse.Origin.p - Mouse.Hit.p).magnitude
		local connection = part.Touched:connect(function(hit)
			if UserInterface.IsKeyDown("n") then
				local joint_name
				if hit.Name == "Torso" then
					local joint_name = ({
						["Head"] = "Neck",
						["Left Arm"] = "Left Shoulder",
						["Left Leg"] = "Left Hip",
						["Right Arm"] = "Right Shoulder",
						["Right Leg"] = "Right Hip"
					})[part.Name]
				end
				local joint
				if joint_name then
					joint = Instance.new("Motor")
					joint.Name = joint_name
					local hit_parent = hit.Parent
					if hit_parent then
						TaskScheduler.Schedule(1, function()
							local anim = hit.Parent:FindFirstChild("Animate")
							if anim and anim.ClassName == "LocalScript" then
								anim.Disabled = true
								wait(0.5)
								anim.Disabled = false
							end
						end)
					end
				else
					joint = Instance.new("Weld")
				end
				local center = CFrame.new((hit.Position + part.Position) * 0.5)
				joint.C0 = hit.CFrame:toObjectSpace(center)
				joint.C1 = part.CFrame:toObjectSpace(center)
				joint.Part0 = hit
				joint.Part1 = part
				joint.Parent = hit
				part.Velocity = Vector3.new()
			end
			local character = PlayerControl.GetCharacter()
			if not hit.Anchored and hit.CanCollide and not (character and hit:IsDescendantOf(character)) then
				local hit_model = hit
				local hit_humanoid
				while hit_model and hit_model.Parent ~= workspace do
					hit_model = hit_model.Parent
				end
				if hit_model and hit_model:IsA("Model") then
					for _, child in ipairs(hit_model:GetChildren()) do
						if child:IsA("Humanoid") then
							hit_humanoid = child
							break
						end
					end
				end
				local speed_diff = (part.Velocity - hit.Velocity).magnitude
				if hit_humanoid then
					if not damage_debounce[hit_humanoid] and hit.Velocity.magnitude > 100 and speed_diff >= 100 then
						local damage = 0.75 * speed_diff
						damage_debounce[hit_humanoid] = true
						hit_humanoid:TakeDamage(damage)
						wait(2)
						damage_debounce[hit_humanoid] = nil
					end
				else
					if speed_diff * speed_diff > hit:GetMass() then
						hit:BreakJoints()
					end
				end
			end
		end)
		local bodyPosition = Instance.new("BodyPosition", part)
		bodyPosition.maxForce = Vector3.new(1e6, 1e6, 1e6) * mass
		while UserInterface.IsKeyDown("x") do
			if UserInterface.IsKeyDown("f") then
				gripDistance = gripDistance * 1.033 + 2
			end
			if UserInterface.IsKeyDown("g") then
				gripDistance = gripDistance / 1.033 - 2
			end
			local targetPosition
			local targetPart = ControllerCommands.telekinesis_target
			if UserInterface.IsKeyDown(ControllerCommands.altKey) and targetPart then
				targetPosition = targetPart.Position
				targetPosition = targetPosition + (targetPosition - part.Position).unit * 100
				--bodyPosition.maxForce = Vector3.new(2e6, 2e6, 2e6)
			else
				targetPosition = Mouse.Origin.p + Mouse.Hit.lookVector * gripDistance
				--bodyPosition.maxForce = Vector3.new(1e6, 1e6, 1e6)
			end
			bodyPosition.position = targetPosition
			RunService.Stepped:wait()
		end
		for _, child in ipairs(removedItems) do
			pcall(Utility.SetProperty, child, "Parent", part)
		end
		part:MakeJoints()
		Debris:AddItem(bodyPosition, 0)
		TaskScheduler.Schedule(3, function() connection:disconnect() end)
	end
end
UserInterface.SetHotkey("x", function()
	if UserInterface.IsKeyDown(ControllerCommands.altKey) then
		ControllerCommands.telekinesis_target = Mouse.Target
	else
		ControllerCommands.ActivateTelekinesis(Mouse.Target)
	end
end)
UserInterface.SetHotkey("u", function()
	if UserInterface.IsKeyDown(ControllerCommands.altKey) then
		ControllerCommands.SpawnSapientRockAtMouse()
	else
		local part = Instance.new("Part", workspace)
		local size = 8 + math.random() * 5
		part.BottomSurface = "Smooth"
		part.TopSurface = "Smooth"
		part.Material = "Slate"
		part.Shape = "Ball"
		part.Size = Vector3.new(size, size, size)
		part.Position = Mouse.Hit.p
		if UserInterface.IsKeyDown("x") then
			ControllerCommands.ActivateTelekinesis(part)
		end
	end
end)
UserInterface.SetHotkey("]", function()
	local target = Mouse.Target
	if target then
		target:BreakJoints()
	end
end)
shared.Chat = UserInterface.Chat
if Network.server_id then
	Network.TransmitServer("ServerControl.SendConnections()")
end
]=])
Module.Create("LaunchServer", [==[
UserInterface.SetCommand("stopservercontrol", function() Network.TransmitServer("ServerControl = {}") end) -- for emergencies
if Player.Parent then
	Player:Destroy()
	Player.Character = nil
end
Logger.print("Info", "Waiting for cross-network scripting in LaunchServer")
SBTools.WaitForScriptReady()
Logger.print("Info", "Cross-network scripting is ready in LaunchServer")
local server_script = SBTools.NewScript(_SessionID .. "/" .. Network.server_id, NetworkReceiver.source, Workspace)
wait(0.5)
server_script.Disabled = false
local signal_name = "MODULE_READY/" .. _SessionID .. "/" .. Network.controller_id
Network.TransmitServer(string.format([=[
local Module = {}
Module.name = "Module"
Module.source = %q
loadstring(Module.source)(Module)
setmetatable(Module, Module.metatable)
Module.Register(Module)
Module.Create("ControllerInfo", [[
ControllerInfo.user_id = %d
]])
local packet = Instance.new("IntValue")
packet.Name = %q
packet.Parent = Game:GetService("ReplicatedStorage")
]=], Module.source, Player.userId, signal_name))
local connection
connection = ReplicatedStorage.ChildAdded:connect(function(child)
	if child.Name == signal_name then
		Logger.print("Info", "Received start-up signal from server in LaunchServer")
		connection:disconnect()
		Network.TransmitModule(Network.server_id, LuaEnum)
		Network.TransmitModule(Network.server_id, Logger)
		local local_script_forward, server_script_forward
		if SBTools.local_script and SBTools.server_script then
			local_script_forward = SBTools.local_script:Clone()
			server_script_forward = SBTools.server_script:Clone()
			local_script_forward.Parent = ReplicatedStorage
			server_script_forward.Parent = ReplicatedStorage
		end
		Network.TransmitModule(Network.server_id, SBTools, local_script_forward, server_script_forward)
		Network.TransmitModule(Network.server_id, Utility)
		Network.TransmitModule(Network.server_id, TaskScheduler)
		Network.TransmitModule(Network.server_id, Network, "<SERVER>", Network.server_id, Network.controller_id)
		Network.StoreModule(Network.server_id, NetworkReceiver)
		Network.StoreModule(Network.server_id, UserInterface)
		Network.StoreModule(Network.server_id, Notification)
		Network.TransmitModule(Network.server_id, Serializer)
		Network.TransmitModule(Network.server_id, ServerControl)
		Network.TransmitModule(Network.server_id, ChatBubble)
		Network.TransmitModule(Network.server_id, Fragmentation)
		Network.TransmitModule(Network.server_id, GraphicalEffects)
		Network.StoreModule(Network.server_id, ChatColor)
		Network.StoreModule(Network.server_id, PyramidCharacter)
		Network.StoreModule(Network.server_id, CharacterAppearance)
		Network.StoreModule(Network.server_id, PlayerControl)
		Network.StoreModule(Network.server_id, RBXInstance)
		Network.StoreModule(Network.server_id, AdvancedGUI)
		Network.StoreModule(Network.server_id, ControllerCommands)
		Debris:AddItem(child, 0)
	end
end)
]==])