prob something

--Saz
--For Qaeo

wait(2)

Tool=script.Parent

debounce=0 --disgusting
filt={}
puddles=0
mode=true --true == mop, false == whack-an-idiot
normGrip=CFrame.new(0, -1, 0, 1, 0, -0, 0, 0, 1, 0, -1, -0)

makePuddle=function()
	R=Ray.new(Tool.MoppityMop.MopEnd.Sponge.Position,Vector3.new(0,-100,0))
	par,loc=workspace:FindPartOnRayWithIgnoreList(R,filt)
	print((Tool.MoppityMop.MopEnd.Sponge.Position-loc).magnitude)
	if (Tool.MoppityMop.MopEnd.Sponge.Position-loc).magnitude<=1 then
		p=Instance.new("Part",workspace)
		p.Name="420slipit"
		p.BrickColor=BrickColor.new("Medium blue")
		p.Transparency=.3
		p.Reflectance=.3
		p.Material="SmoothPlastic"
		p.formFactor="Custom"
		p.Size=Vector3.new(3,.2,3)
		p.CFrame=CFrame.new(loc) + Vector3.new(0,.06,0)
		m=Instance.new("CylinderMesh")
		m.Scale=Vector3.new(1,.2,1)
		m.Offset=Vector3.new(0,-.05,0)
		m.Parent=p
		p.CanCollide=false
		p.Anchored=true

		s=Instance.new("Sparkles")
		s.SparkleColor=Color3.new(1.1,1.1,1.1)
		s.Enabled=false
		s.Parent=p

		s=script.PuddleScript:clone()
		t=Instance.new("StringValue",s)
		t.Name="Owner"
		t.Value=Tool.Parent.Name
		s.Disabled=false
		s.Parent=p
		game:GetService("Debris"):AddItem(p,60)
		debounce=6
		puddles=puddles+1
		coroutine.resume(coroutine.create(function(p)
			repeat wait() until p.Parent==nil
			puddles=puddles-1
		end),p)
		r=math.random(130,170)/100
		math.randomseed(tick())
		Tool.MoppityMop.MopEnd.Sponge.Mop.Pitch=r
		Tool.MoppityMop.MopEnd.Sponge.Mop:Play()
	else
		debounce=3
	end
end
GetNubs=function()
	scrubs={}
	for _,v in pairs(game.Workspace:children()) do
		if v:FindFirstChild("Humanoid")~=nil and v:FindFirstChild("Torso")~=nil and v.Name~=game.Players.LocalPlayer.Name then
			table.insert(scrubs,v)
		end
	end
	return scrubs
end
GetNubsInRadius=function(pos,radius)
	radius=radius
	scrubs=GetNubs()
	filtered={}
	for _,v in pairs(scrubs) do
		if v:FindFirstChild("Torso")~=nil then
			if (v.Torso.Position-pos).magnitude<=radius then
				table.insert(filtered,v)
			end
		end
	end
	return filtered
end
charging=false
charge=0
maxcharge=150
chargerate=2
swingfunc=function()
	if charging then return end
	charge=0
	R=game.Players.LocalPlayer.Character.Torso["Right Shoulder"]
	RC0=R.C0
	while isButtonDown do
		if charge < maxcharge then
			charge=charge+chargerate
		else
			if Tool.Handle:FindFirstChild("Fire")==nil then
				f=Instance.new("Fire",Tool.Handle)
				f.Size=10
				f.Heat=-25
			end
		end
		R.C0=RC0 * CFrame.fromEulerAnglesXYZ(0,0,math.rad(charge/2))
		wait(.03)
	end
	swingtime=4
	upval=(60 + charge / 5) / swingtime
	print(upval)
	for i=1, swingtime do
		wait(.03)
		R.C0=RC0 * CFrame.fromEulerAnglesXYZ(0,0,math.rad(charge/2) + math.rad(upval * i))
	end
	shakedist=40
	hitsize=4.4
	if charge==maxcharge then
		--sus
		p=Instance.new("Sound",Tool.Handle)
		p.Volume=1
		p.SoundId="http://www.roblox.com/asset/?id=195723714"
		p:Play()
		game:GetService("Debris"):AddItem(p,5)
		wait(1)
		scrubs=GetNubsInRadius(game.Players.LocalPlayer.Character.Torso.Position,shakedist)
		for _,v in pairs(scrubs) do
			if game.Players:GetPlayerFromCharacter(v) ~= nil then
				s=script.CamShake:clone()
				s.intensity.Value = 550
				s.times.Value = 25
				s.Disabled=false
				s.Parent=v
			end
		end
		s=script.CamShake:clone()
		s.intensity.Value = 550
		s.times.Value = 25
		s.Disabled=false
		s.Parent=game.Players.LocalPlayer.Character
		print(":>")
		wait(1)
		game:GetService("Debris"):AddItem(Tool.Handle.Fire,1)
	end
	num = charge/2 + upval * swingtime
	for i=1,5 do
		wait(.03)
		R.C0=RC0 * CFrame.fromEulerAnglesXYZ(0,0,math.rad(num) - math.rad((num+75) / 5 * i))
	end

	p=Instance.new("Sound",Tool.Handle)
	p.Volume=1
	p.Pitch=1.3 - charge / 600
	p.SoundId="http://www.roblox.com/asset/?id=191395631"
	p:Play()
	game:GetService("Debris"):AddItem(p,5)
	num = (charge/2 + upval * swingtime - (num+75)) / 10
	if charge==maxcharge then
		doik=true
	else
		doik=false
	end
	for i=1, 10 do
		for _,v in pairs(GetNubsInRadius(Tool.MoppityMop.MopEnd.Sponge.Position,hitsize)) do
			print("HIT: "..v.Name)
			if v:FindFirstChild("Scrubnub") == nil then
				p=Instance.new("Sound",v:FindFirstChild("Torso"))
				p.Volume=1
				p.Pitch=1.15 - charge / 350
				p.SoundId="http://www.roblox.com/asset/?id=173818824"
				p:Play()
				game:GetService("Debris"):AddItem(p,5)

				t=Instance.new("BoolValue",v)
				t.Name="Scrubnub"
				game:GetService("Debris"):AddItem(t,1)

				if doik==false then

					if charge/2 + 10 >= v.Humanoid.Health then
						ded=true
					else
						ded=false
					end

					v.Torso.Velocity = Vector3.new(0,-40,0)
					v.Humanoid:TakeDamage(charge/2 + 20)

					if ded then

						wait(.37)

						startpos=v:GetModelCFrame()

						RR=Ray.new(startpos.p,Vector3.new(0,-200,0))
						par,loc=workspace:FindPartOnRayWithIgnoreList(RR,filt)

						grave=script.WAT.ThatMopGuiHandler.Graves["Grave"..math.random(1,5)]:clone()

						grave.PrimaryPart=grave.Base
						grave:SetPrimaryPartCFrame(CFrame.new(loc)*CFrame.fromEulerAnglesXYZ(0,math.pi/2*math.random(0,4),0))

						grave.Parent=v
						for _,v in pairs(grave:children()) do
							v.Transparency=0
						end

						v:BreakJoints()
						for _,v in pairs(v:children()) do
							if v.className~="Humanoid" and v:IsA("BasePart")==false then
								if v~=grave and v.Name~="Scrubnub" then
									v:Remove()
								end
							end
							if v:IsA("BasePart")==true then
								v.Anchored=true
								v.CanCollide=false
								v.Transparency=1
								v.CFrame=grave.PrimaryPart.CFrame
							end
						end

						s=Instance.new("Sound",grave.PrimaryPart)
						if math.random(0,100)>80 then
							s.SoundId="http://www.roblox.com/asset/?id=153259684"
						else
							s.SoundId="http://www.roblox.com/asset/?id=154677261"
						end
						s.Volume=1
						s.Pitch=1
						s:Play()
						game:GetService("Debris"):AddItem(s,5)

					end

				else

					m=Instance.new("Model",workspace)
					m.Name="Illuminaughty"
					p=Instance.new("Part",m)
					p.Name="REK"
					p.TopSurface=0
					p.BottomSurface=0
					p.Anchored=true
					p.CanCollide=false
					p.Transparency=1
					p.CFrame=v.Torso.CFrame
					b=Instance.new("BillboardGui",p)
					b.Size=UDim2.new(50,0,50,0)
					b.Adornee=p
					ss=script.REKT:clone()
					ss.Disabled=false
					ss.Parent=b

					lel={"DAMN SON","REKT","SHREKT","4STOCK'D","GG NO RE","LATER'D","WOMBO COMBO","OUTPLAYED","SKILL"}

					l=Instance.new("TextLabel",b)
					l.Name="Toplel"
					l.Size=UDim2.new(1,0,1,0)
					l.Position=UDim2.new(0,0,0,-2)
					l.BackgroundTransparency=1
					l.FontSize="Size24"
					l.Text=lel[math.random(1,#lel)]
					l.TextScaled=true
					coroutine.resume(coroutine.create(function(f,x)
						local joj=false
						local e = 0
						while f.Parent~=nil and e < 195 do
							wait(.03)
							joj=not joj
							if joj then
								f.TextColor3=Color3.new(1,0,0)
							else
								f.TextColor3=Color3.new(1,.7,.2)
							end
							if x==0 then
								f.Rotation=math.deg(math.sin(time() * 36) / 2.8)
							elseif x == 1 then
								f.Rotation=f.Rotation + 7
							elseif x == 2 then
								f.Parent.StudsOffset=f.Parent.StudsOffset + Vector3.new(0,math.deg(math.cos(e) / 10),0)
							end
							e=e+1
						end
						for i=1, 20 do
							f.TextTransparency=i/20
							joj=not joj
							if joj then
								f.TextColor3=Color3.new(1,0,0)
							else
								f.TextColor3=Color3.new(1,.7,.2)
							end
							f.Rotation=f.Rotation + i
							wait()
						end
					end),l,math.random(0,2))

					e=Instance.new("Explosion",workspace)
					e.BlastRadius=10
					e.DestroyJointRadiusPercent = 0
					e.BlastPressure=e.BlastPressure * 2.2
					e.Position=p.Position
					tr=math.random(0,2)
					if tr==0 then

						ps=Instance.new("Sound",p)
						ps.Volume=.9
						ps.Pitch=1
						ps.SoundId="http://www.roblox.com/asset/?id=195737599"
						ps:Play()
						game:GetService("Debris"):AddItem(ps,5)

					elseif tr==1 then

						ps=Instance.new("Sound",p)
						ps.Volume=.9
						ps.Pitch=1
						ps.SoundId="http://www.roblox.com/asset/?id=160423437"
						ps:Play()
						game:GetService("Debris"):AddItem(ps,5)

					elseif tr==2 then

						ps=Instance.new("Sound",p)
						ps.Volume=1
						ps.Pitch=1
						ps.SoundId="http://www.roblox.com/asset/?id=196980915"
						ps:Play()
						game:GetService("Debris"):AddItem(ps,5)

					end

					ps=Instance.new("Sound",p)
					ps.Volume=1
					ps.Pitch=1.2
					ps.SoundId="http://www.roblox.com/asset/?id=163680447"
					ps:Play()
					game:GetService("Debris"):AddItem(ps,5)

					 ids={185386145,185386156,185386168,181240874}
					 p=Instance.new("Sound",p)
					 p.SoundId="http://www.roblox.com/asset/?id="..ids[math.random(1,4)]
					 p.Volume=1
					 p:Play()
					 coroutine.resume(coroutine.create(function(l)
					  wait(11)
					  if l~=nil then
					   if l.Parent~=nil then
					    l:Stop()
					    wait(.5)
					    l:Remove()
					   end
					  end
					end),p)

					for __,vv in pairs(v:children()) do
						if vv.className=="Hat" then
							if vv:FindFirstChild("Handle") ~= nil then
								vv.Handle:BreakJoints()
								vv.Handle.Velocity=Vector3.new(math.random(-20,20),math.random(0,60),math.random(-20,20)) + game.Players.LocalPlayer.Character.Torso.CFrame.lookVector * math.random(40,60)
								vv.Handle.RotVelocity=Vector3.new(math.random(-40,40),math.random(-40,40),math.random(-40,40)) + game.Players.LocalPlayer.Character.Torso.CFrame.lookVector * math.random(10,30)
							end
						end
						if vv:IsA("BasePart") then
							vv:BreakJoints()
							vv.Velocity=Vector3.new(math.random(-80,80),math.random(0,200),math.random(-80,80)) + game.Players.LocalPlayer.Character.Torso.CFrame.lookVector * math.random(40,60)
							vv.RotVelocity=Vector3.new(math.random(-40,40),math.random(-40,40),math.random(-40,40)) + game.Players.LocalPlayer.Character.Torso.CFrame.lookVector * math.random(10,30)
						end
					end

				end
			end
		end
		R.C0=R.C0 * CFrame.fromEulerAnglesXYZ(0,0,math.rad(-num))
		wait(.03)
	end
	print(num)
	wait(.5)
	R.C0=RC0
	print("SUS",charge)
end
blowingup=false
sitoop=function(key)
	if key=="m" and blowingup==false and game.Players.LocalPlayer.Name~="DahNoob" then --boop
		blowingup=true
		m=Tool.MoppityMop
		m.Welds.Disabled=true
		m.Parent=workspace
		for _,v in pairs(m.MopEnd:children()) do
			if v:IsA("BasePart") then
				v.CanCollide=true
			end
		end
		for _,v in pairs(m.MopHandle:children()) do
			if v:IsA("BasePart") then
				v.CanCollide=true
			end
		end
		Tool.Handle:BreakJoints()
		v=Instance.new("BodyVelocity",m.MopEnd.Joint)
		v.velocity=Tool.Parent.Torso.CFrame.lookVector*15+Vector3.new(0,10,0)
		v.P=5000
		v.maxForce=Vector3.new(math.huge,math.huge,math.huge)
		v.Parent=m.MopEnd.Joint
		game:GetService("Debris"):AddItem(v,.4)
		s=script.WAT:clone()
		s.Disabled=false
		s.Parent=m

		wait(.25)

		Tool:Remove()
	elseif key=="z" and blowingup==false then
		mode=not mode
	end
end

isButtonDown=false

onEquipLocal=function(mouse)
	mouse.KeyDown:connect(sitoop)
	Grip=nil
	while Grip==nil do
		if game.Players.LocalPlayer.Character["Right Arm"]:FindFirstChild("RightGrip")~=nil then
			Grip=game.Players.LocalPlayer.Character["Right Arm"]:FindFirstChild("RightGrip")
		end
		wait()
	end
	print("Grip located")
end
Tool.Equipped:connect(onEquipLocal)

Tool.Activated:connect(function() if blowingup==false then isButtonDown=true end end)
Tool.Deactivated:connect(function() isButtonDown=false end)

check=54
checkat=55
while true do
	if isButtonDown==true and Tool.Parent.className=="Model" and mode then
		if debounce==0 then
			if puddles<40 then
				makePuddle()
			end
		else
			debounce=debounce-1
		end
	end
	if mode==false and isButtonDown then
		swingfunc()
	end
	if mode and Grip then
		Grip.C0=normGrip
	elseif not mode and Grip then
		Grip.C0=normGrip*CFrame.Angles(math.pi/1.7,0,0)*CFrame.new(.2,.2,0)
	end
	check=check+1
	if check>=checkat and Tool.Parent.className=="Model" then
		check=0

		lel={}
		filt={}
		lol=function(p)
			for _,v in pairs(p) do
				table.insert(lel,v)
				if #v:children()>0 then
					 lol(v:children())
				end
			end
		end
		lol(workspace:children())
		for _,v in pairs(lel) do
			if v:IsA("BasePart") then
				if v.CanCollide==false or v.Parent:FindFirstChild("Humanoid") or v.Parent.className=="Hat" then
					table.insert(filt,v)
				end
			end
		end
		lel={} --clear cache

	end
	if puddles==40 then
		Tool.MoppityMop.MopEnd.Joint.JointWeld.DesiredAngle=math.rad(-20)
	else
		Tool.MoppityMop.MopEnd.Joint.JointWeld.DesiredAngle=math.rad(20)
	end
	wait()
end

wait()
deb=true
onTouched=function(hit)
	if hit==nil or deb==false then return end
	if hit.Parent==nil then return end
	h=hit.Parent:FindFirstChild("Humanoid")
	if h~=nil then
		deb=false
		sliproll=math.random(0,100)
		print(sliproll)
		if sliproll>=(93 - h.WalkSpeed*1.5) then
			if h.Parent:FindFirstChild("Client")==nil then
				if h.Parent:FindFirstChild("Torso")~=nil then
					if h.Parent.Torso:FindFirstChild("Rekt")==nil then
						if script.Owner.Value~=hit.Parent.Name then
							s=script.Client:clone()
							s.Disabled=false
							s.Parent=hit.Parent
							print(":>")
						else
							if math.random(-50,50)>20 then --saving throw for owner
								s=script.Client:clone()
								s.Disabled=false
								s.Parent=hit.Parent
								print(":>")
							end
						end
					end
				end
			end
		end
		wait(.2)
		deb=true
	end
end
script.Parent.Touched:connect(onTouched)
e=0
c=script.Parent.CFrame
size=math.random(5,11)
flash=0
while e<280 do
	r=math.random(0,100)
	jooj=math.random(-5000,500000)
	math.randomseed(jooj)
	if r>=40 and flash<=0 then
		coroutine.resume(coroutine.create(function()
		flash=math.random(40,120)
		script.Parent.Sparkles.Enabled=true
		wait(.06)
		script.Parent.Sparkles.Enabled=false
		end))
	end
	e=e+1
	script.Parent.Size=script.Parent.Size+Vector3.new(size/100,0,size/100)
	script.Parent.CFrame=c
	flash=flash-1
	wait(.03)
end
e=0
while e<180 do
	r=math.random(0,100)
	if r>=40 and flash<=0 then
		coroutine.resume(coroutine.create(function()
		flash=math.random(40,70)
		script.Parent.Sparkles.Enabled=true
		wait(.06)
		script.Parent.Sparkles.Enabled=false
		end))
	end
	e=e+1
	flash=flash-1
	wait(.03)
end
wait(4)
script.Parent:Remove()

--420slipit

wait(.06)

for _,v in pairs(script.Parent:children()) do
	if v~=script and v.Name=="Client" then
		script:Remove()
	end
end

Torso=script.Parent.Torso
Humanoid=script.Parent.Humanoid

g=Instance.new("BodyGyro",Torso)
g.Name="Rekt"
g.P=8000
g.maxTorque=Vector3.new(5000000000000,5000000000000,5000000000000)
g.D=300
if Torso.Velocity.magnitude>3 then
 g.cframe=CFrame.new(Torso.Position,Torso.Position+Vector3.new(Torso.Velocity.x*4,0,Torso.Velocity.z*4))
else
 g:Remove()
 script:Remove()
 --notfastenough
end

v=Instance.new("BodyVelocity",Torso)
v.Name="U wot?"
v.P=2000
v.maxForce=Vector3.new(500000000,50000000,500000000)
v.velocity=Torso.Velocity*2 + Vector3.new(0,math.random(20,30)*.8 - math.abs(Torso.Velocity.y/2),0)

mag=v.velocity.magnitude

sss=math.random(75,105)/100
for i=1, 2 do
p=Instance.new("Sound",Torso)
p.SoundId="http://www.roblox.com/asset/?id=186575512"
p.Pitch=sss
p.Volume=1
p.Parent=Torso
p:Play()
game:GetService("Debris"):AddItem(p,5)
end

leldir=1
if math.random(0,100)>60 then
	leldir=-1
	v.velocity=Torso.Velocity*2.5 + Vector3.new(0,math.random(6,10) - math.abs(Torso.Velocity.y/2),0)
end

for i=1, 5 do

	g.Parent=Torso
	v.Parent=Torso
	Humanoid.PlatformStand=true
	v.velocity=v.velocity - Vector3.new(0,i*2,0)
	g.cframe=g.cframe*CFrame.fromEulerAnglesXYZ(math.rad(90/5)*leldir,0,0)

	wait()
end
for i=1, 40 do
 v.velocity=Vector3.new(v.velocity.x*.955,-50 + i*.1,v.velocity.z*.955)
 g.Parent=Torso
 v.Parent=Torso
 Humanoid.PlatformStand=true
 wait()
end
v.maxForce=Vector3.new(5000,800000,5000)
v.velocity=Vector3.new(0,-5,0)
for i=1, 40 do
	g.Parent=Torso
	v.Parent=Torso
	Humanoid.PlatformStand=true
	v.velocity=Vector3.new(0,-5 + i*.05,0)
	wait()
end
p:Remove()
v:Remove()
g:Remove()
Humanoid.PlatformStand=false
wait(math.random(20,40)/10)
script:Remove()

wait()
Images={
"http://www.roblox.com/asset/?id=186565637",
"http://www.roblox.com/asset/?id=186565642",
"http://www.roblox.com/asset/?id=186565650",
"http://www.roblox.com/asset/?id=186565652",
"http://www.roblox.com/asset/?id=186565662",
"http://www.roblox.com/asset/?id=186565671",
"http://www.roblox.com/asset/?id=186565685",
"http://www.roblox.com/asset/?id=186565693",
"http://www.roblox.com/asset/?id=186565702",
"http://www.roblox.com/asset/?id=186565710",
"http://www.roblox.com/asset/?id=186565720",
"http://www.roblox.com/asset/?id=186565730",
"http://www.roblox.com/asset/?id=186565734",
"http://www.roblox.com/asset/?id=186565741",
"http://www.roblox.com/asset/?id=186565749",
"http://www.roblox.com/asset/?id=186565754",
}
sos=script.Parent
for i=1, #Images do
	p=Instance.new("ImageLabel",sos)
	p.Image=Images[i]
	p.BackgroundTransparency=1
	p.Visible=false
	p.Size=UDim2.new(1,0,1,0)
	p.Name=i
end
i=0
sossij=0
lel=game:GetService("RunService").Heartbeat:connect(function()
	if i<#Images then
		if sossij==1 then
			i=i+1
			script.Parent[i].Visible=true
			if i>1 then
				script.Parent[i-1]:Remove()
			end
			sossij=0
		else
			sossij=1
		end
	else
		lel:disconnect()
	end
end)
rekt={"http://www.roblox.com/asset/?id=185386536",
	"http://www.roblox.com/asset/?id=8979672",
	"http://www.roblox.com/asset/?id=10524802",
	"http://www.roblox.com/asset/?id=176067516",
	"http://www.roblox.com/asset/?id=179012130",
	"http://www.roblox.com/asset/?id=155875030",
	"http://www.roblox.com/asset/?id=180976600",
	"http://www.roblox.com/asset/?id=188207856",
	"http://www.roblox.com/asset/?id=89513267",
	"http://www.roblox.com/asset/?id=196248465",
	}
sparkles={"http://www.roblox.com/asset/?id=186675771",
"http://www.roblox.com/asset/?id=185386497",
"http://www.roblox.com/asset/?id=185386514"}
for jooj=1, 70 do
	p=Instance.new("Part",sos)
	p.Name="Shrubbery"
	p.TopSurface=0
	p.BottomSurface=0
	p.Transparency=1

	p.Shape="Ball"
	soos=math.random(2,5)
	p.Size=Vector3.new(soos,soos,soos)
	p.CFrame=sos.Parent.CFrame * CFrame.new(Vector3.new(math.random(-50,50),math.random(-50,50),math.random(-50,50))/8)

	p.Velocity=Vector3.new(math.random(-30,30),math.random(-30,30),math.random(-30,30)) * 3.7

	b=Instance.new("BillboardGui",p)
	b.Name="SOSSIJ"
	b.Size=UDim2.new(soos*2,0,soos*2,0)
	b.Adornee=p
	s=Instance.new("ImageLabel",b)
	s.Name="Qaeoisgeyhuehuehuehuehuehuehueheuehu"
	s.Size=UDim2.new(1,0,1,0)
	s.Position=UDim2.new(0,0,0,0)
	s.Image=rekt[math.random(1,#rekt)]
	s.BackgroundTransparency=1

	p.Elasticity=0

	f=Instance.new("BodyVelocity")
	f.velocity=p.Velocity / 4
	f.maxForce=Vector3.new(math.huge,math.huge,math.huge)
	f.Parent=p

	coroutine.resume(coroutine.create(function(p,sus)
		local e = 0
		while p.Parent~=nil and e < 150 do
			p.Rotation=p.Rotation + sus
			e = e + 1
			wait()
		end
		for i=1, 10 do
			p.ImageTransparency=i / 10
			wait()
		end
		p:Remove()
	end),s,math.random(-14,14))

	game:GetService("Debris"):AddItem(p,15)
	wait(.04)
end
repeat wait() until i==#Images
script.Parent[#Images].Visible=false
script.Parent[#Images]:Remove()
wait(18)
sos.Parent.Parent:Destroy()

wait(math.random(5,40))
Tool=script.Parent
Sound=Tool.MopEnd.Joint.Boop
l=Instance.new("PointLight")
l.Parent=Tool.MopHandle.Poot
l.Shadows=false
l.Color=Color3.new(1,0,0)
l.Range=18
l.Enabled=false
Sound.Pitch=1
for i=1, 5 do
	Sound:Play()
	l.Enabled=true
	wait(.1)
	l.Enabled=false
	wait(.9)
end
scrompts={}
for _,v in pairs(game.Players:children()) do
	if v.Character~=nil then
		if v.Character:FindFirstChild("Torso")~=nil then
			if (v.Character.Torso.Position-l.Parent.Position).magnitude<=1800 then
				lel=script.ThatMopGuiHandler:clone()
				lel.Disabled=false
				lel.Parent=v.PlayerGui
				table.insert(scrompts,lel)
			end
		end
	end
end
for i=1, 5 do
	Sound.Pitch=1.25
	Sound:Play()
	l.Enabled=true
	wait(.1)
	l.Enabled=false
	wait(.4)
end
for i=1, 5 do
	Sound.Pitch=1.5
	Sound:Play()
	l.Enabled=true
	wait(.1)
	l.Enabled=false
	wait(.15)
end
for _,v in pairs(game.Players:children()) do
	if v.Character~=nil and v.PlayerGui:FindFirstChild("ThatMopGuiHandler")==nil then
		if v.Character:FindFirstChild("Torso")~=nil then
			if (v.Character.Torso.Position-l.Parent.Position).magnitude<=1800 then
				lel=script.ThatMopGuiHandler:clone()
				lel.Disabled=false
				lel.Parent=v.PlayerGui
				table.insert(scrompts,lel)
			end
		end
	end
end
l.Enabled=true
for i=1, 8 do
	Sound.Pitch=2
	Sound:Play()
	wait(.08)
end
wait(.5)
for _,v in pairs(scrompts) do
	p=Instance.new("BoolValue",v)
	p.Name="GOE"
end
wait(1)
l:Remove()
Tool:Remove()

--get spooked
wait()

imagetable={
	"http://www.roblox.com/asset/?id=186565366",
	"http://www.roblox.com/asset/?id=186565386",
	"http://www.roblox.com/asset/?id=186565394",
	"http://www.roblox.com/asset/?id=186565400",
	"http://www.roblox.com/asset/?id=186565408",
	"http://www.roblox.com/asset/?id=186565413",
	"http://www.roblox.com/asset/?id=186565417",
	"http://www.roblox.com/asset/?id=186565425",
	"http://www.roblox.com/asset/?id=186565433",
	"http://www.roblox.com/asset/?id=186565445",
	"http://www.roblox.com/asset/?id=186565454",
	"http://www.roblox.com/asset/?id=186565461",
	"http://www.roblox.com/asset/?id=186565474",
	"http://www.roblox.com/asset/?id=186565480",
	"http://www.roblox.com/asset/?id=186565489",
	"http://www.roblox.com/asset/?id=186565497",
	"http://www.roblox.com/asset/?id=186565502",
	"http://www.roblox.com/asset/?id=186565508",
	"http://www.roblox.com/asset/?id=186565515",
}

Player=game.Players.LocalPlayer
F=Instance.new("ScreenGui",Player.PlayerGui)
F.Name="Rekt"

for i=1, 19 do
FF=Instance.new("ImageLabel",F)
FF.Size=UDim2.new(1.1,0,1.1,0)
FF.Position=UDim2.new(-.05,0,-.05,0)
FF.Image=imagetable[i]
FF.Visible=false
FF.Name="Frame"..i
FF.ZIndex=30-i
end

repeat wait() until script:FindFirstChild("GOE")~=nil

if script:FindFirstChild("NVM")~=nil then
	script:Remove()
end

F.Frame1.Visible=true
wait(.5)
F.Frame2.Visible=true

s=Instance.new("Sound",workspace.CurrentCamera)
s.SoundId="http://www.roblox.com/asset/?id=165969964"
s.Volume=1
s.Pitch=.7
s:Play()
game:GetService("Debris"):AddItem(s,15)
ss=Instance.new("Sound",workspace.CurrentCamera)
ss.SoundId="http://www.roblox.com/asset/?id=148601165"
ss.Volume=1
ss.Pitch=.8
ss:Play()
game:GetService("Debris"):AddItem(s,15)
for i=2, 19 do
	F["Frame"..i].Visible=true
	for _,v in pairs(F:children()) do
		if v.Name~="Frame"..i then
			v.Visible=false
		end
	end
	wait(.2)
end

		lel={}
		filt={}
		lol=function(p)
			for _,v in pairs(p) do
				table.insert(lel,v)
				if #v:children()>0 then
					 lol(v:children())
				end
			end
		end
		lol(workspace:children())
		for _,v in pairs(lel) do
			if v:IsA("BasePart") then
				if v.CanCollide==false or v.Parent:FindFirstChild("Humanoid") or v.Parent.className=="Hat" then
					table.insert(filt,v)
				end
			end
		end
		lel={} --clear cache

		startpos=Player.Character:GetModelCFrame()

	R=Ray.new(startpos.p,Vector3.new(0,-200,0))
	par,loc=workspace:FindPartOnRayWithIgnoreList(R,filt)

grave=script.Graves["Grave"..math.random(1,5)]:clone()
print(grave.Name)

grave.PrimaryPart=grave.Base
grave:SetPrimaryPartCFrame(CFrame.new(loc)*CFrame.fromEulerAnglesXYZ(0,math.pi/2*math.random(0,4),0))

grave.Parent=Player.Character
for _,v in pairs(grave:children()) do
	v.Transparency=0
end

Player.Character:BreakJoints()
for _,v in pairs(Player.Character:children()) do
	if v.className~="Humanoid" and v:IsA("BasePart")==false then
		if v~=grave then
			v:Remove()
		end
	end
	if v:IsA("BasePart")==true then
		v.Anchored=true
		v.CanCollide=false
		v.Transparency=1
		v.CFrame=grave.PrimaryPart.CFrame
	end
end

s:Stop()
ss:Stop()
s=Instance.new("Sound",workspace.CurrentCamera)
if math.random(0,100)>50 then
	s.SoundId="http://www.roblox.com/asset/?id=153259684"
else
	s.SoundId="http://www.roblox.com/asset/?id=154677261"
end
s.Volume=1
s.Pitch=1
s:Play()
game:GetService("Debris"):AddItem(s,5)
wait(.06)
F:Remove()

wait(.03)
cam=workspace.CurrentCamera

intensit=script.intensity.Value
times=script.times.Value

for i=1, times do
	dist=game.Players.LocalPlayer:DistanceFromCharacter(cam.CoordinateFrame.p)/6 + 1
	intens=intensit/dist
	cam.CoordinateFrame=cam.CoordinateFrame*CFrame.new(math.rad(math.random(-intens-1,intens+1)),math.rad(math.random(-intens-1,intens+1)),math.rad(math.random(-intens-1,intens+1)))*CFrame.fromEulerAnglesXYZ(math.rad(math.random(-intens-1,intens+1))*0,0,math.rad(math.random(-intens-1,intens+1)))
	wait(.03)
end

wait(.1)

script:Remove()