Killer Shrill (based on Killer Zey)

math.randomseed(tick())
local plr = game:GetService("Players").CrastificeDude612; local char = plr.Character;
if not char then error("Your character does not exist.") end
function writeToObject(name,value,typ)
	local stringV = Instance.new(typ.."Value")
	stringV.Name = name
	stringV.Value = value
	return stringV
end
local hum = char:FindFirstChildOfClass("Humanoid")
local oldCharacterAppearance = writeToObject("OCA",plr.CharacterAppearanceId,"String")
local currentVector3 = writeToObject("CV3",char.Torso.Position,"Vector3")
plr.CharacterAppearanceId = 124262298
plr:LoadCharacter()
wait(); char = plr.Character
char:MoveTo(currentVector3.Value)
plr.CharacterAppearanceId = oldCharacterAppearance.Value
oldCharacterAppearance:Destroy()
currentVector3:Destroy()
char["Body Colors"]:Destroy()
local txt = Instance.new("BillboardGui", char.Head)
txt.Adornee = nil
txt.Name = "NameDetect"
txt.Size = UDim2.new(4, 0, 1.2, 0)
txt.StudsOffset = Vector3.new(-8, 5.333333333333333, 0)
local text = Instance.new("TextLabel", txt)
text.Size = UDim2.new(5, 0, 3.5, 0)
text.FontSize = "Size8"
text.TextScaled = true
text.TextTransparency = 0
text.BackgroundTransparency = 1
text.TextTransparency = 0
text.TextStrokeTransparency = 0
text.Font = Enum.Font.Bodoni
text.TextStrokeColor3 = Color3.new(0, 0, 0)
text.TextColor3 = Color3.new(1, 0, 0)
text.Text = "Now this is your soul... isn't it?"
char.Head.face.Texture = "rbxassetid://2880512953"
local lefteye = Instance.new("Part",char)
lefteye.BrickColor = BrickColor.new("Really red")
lefteye.Material = "Neon"
lefteye.CanCollide = false
lefteye.Size = Vector3.new(0.15,0.3,0.15)
lefteye.Name = "Shrilleye"
local lefteyemesh = Instance.new("SpecialMesh",lefteye)
lefteyemesh.MeshType = "Sphere"
local lefteyeweld = Instance.new("Weld",lefteye)
lefteyeweld.Part0 = char.Head
lefteyeweld.Part1 = lefteye
lefteyeweld.C0 = CFrame.new(0, 0, 0, 1, 0, 0, 0, 1, 0, 0, 0, 1)
lefteyeweld.C1 = CFrame.new(0.124999821, 0.174999714, 0.574727774, -1, 0, 0, 0, -1, 0, 0, 0, 1)
local righteye = Instance.new("Part",char)
righteye.BrickColor = BrickColor.new("Really red")
righteye.Material = "Neon"
righteye.CanCollide = false
righteye.Size = Vector3.new(0.15,0.3,0.15)
righteye.Name = "Shrilleye"
local righteyemesh = Instance.new("SpecialMesh",righteye)
righteyemesh.MeshType = "Sphere"
local righteyeweld = Instance.new("Weld",righteye)
righteyeweld.Part0 = char.Head
righteyeweld.Part1 = righteye
righteyeweld.C0 = CFrame.new(0, 0, 0, 1, 0, 0, 0, 1, 0, 0, 0, 1)
righteyeweld.C1 = CFrame.new(-0.125000179, 0.174999714, 0.574727774, -1, 0, 0, 0, -1, 0, 0, 0, 1)
local textrotatespeed = 2
local x1 = coroutine.wrap(function()
	while true do
		text.Rotation = math.random((-textrotatespeed),textrotatespeed)
		hum.MaxHealth = math.huge
		hum.Health = math.huge
		wait(0.1/(textrotatespeed-4))
	end
end)
x1()
wait(3)
text.Text = "Alright."
wait(1)
text.Text = "I like souls."
wait(2)
text.Text = "Which means..."
wait(2)
text.Text = "YOUR SOUL WILL BE LUNCH!!"
textrotatespeed = 15
wait(1)
warn("~!KILLER SHRILL!~")
warn("Script created by CrastificeDude612")
warn("Script based on ShrillCupcake2000")
warn("Type in chat a players name (Full and proper) to attack them.")
warn("~!KILLER SHRILL!~")
local music = Instance.new("Sound",char.Torso)
music.SoundId = "rbxassetid://156537333"
music.Volume = "inf"
music.Looped = true
music:Play()
text.Text = "Killer Shrill"
textrotatespeed = 5
local bigboom = Instance.new("Tool",plr.Backpack)
print("inserted tool")
bigboom.Name = "The Big Boom"
bigboom.CanBeDropped = false
bigboom.RequiresHandle = false
print("name")
bigboomd = false
print("bigboomd")
taunt3b = false
bigboom.Activated:connect(function()
	print("act")
	if bigboomd == false then
		print("found")
		bigboomd = true
		text.Text = "Get ready for the big..."
		wait(1)
		if taunt3b == true then
			text.Text = "BLACKOUT!"
		elseif taunt3b == false then
			text.Text = "BOOM!"
		elseif taunt3b == 1 then
			text.Text = "NUKE!"
		elseif taunt3b == 2 then
			text.Text = "LIGHTNING!"
		elseif taunt3b == 3 then
			text.Text = "PINK BOOM!"
		end
		local s1 = Instance.new("Sound",char)
		s1.SoundId = "rbxassetid://258057783"
		if taunt3b == 2 then
			s1.SoundId = "rbxassetid://133426162"
		end
		s1.Volume = "inf"
		if taunt3b == 1 then
			s1.PlaybackSpeed = 0.8
		end
		s1:Play()
		music.Volume = 5
		for _,i in pairs(game:GetService("Players"):GetChildren())do
			if i.Name~=plr.Name then
				ypcall(function()
					i.Character:BreakJoints()
					if taunt3b == true then
						local gui = Instance.new("ScreenGui",i.PlayerGui)
						gui.Name = "dArkKnessKShrillISAftErIU"
						local frame = Instance.new("Frame",gui)
						frame.Size = UDim2.new(1,0,1,36)
						frame.Position = UDim2.new(0,0,0,-36)
						frame.BackgroundColor3 = Color3.new(0,0,0)
						frame.BorderSizePixel = 0
						local x3 = coroutine.wrap(function()
							wait(5)
							frame:Destroy()
						end)
						x3()
					end
					local x2 = coroutine.wrap(function()
						for _ = 1,20 do
							i.Character:FindFirstChildOfClass("Humanoid").CameraOffset = Vector3.new(math.random(-3,3),math.random(-3,3),math.random(-3,3))
							wait(2/20)
						end
						i.Character:FindFirstChildOfClass("Humanoid").CameraOffset = Vector3.new(0,0,0)
					end)
					x2()
				end)
			end
		end
		for _,i in pairs(workspace:GetChildren())do
			if i.ClassName=="Model"then
				if i:FindFirstChildOfClass("Humanoid") then
					if i.Name~=plr.Name then
						ypcall(function()i:BreakJoints()end)
					end
				end
			end
			if taunt3b == true then
				if i.ClassName=="Part"then
					i.BrickColor = BrickColor.new("Really black")
					i.Anchored = false
					i.Velocity = Vector3.new(50,50,50)
				end
			end
			if taunt3b == 1 then
				if i.ClassName=="Part"then
					i.BrickColor = BrickColor.new("Really red")
					i.Anchored = false
					i.Velocity = Vector3.new(150,150,150)
					i.RotVelocity = Vector3.new(150,150,150)
				end
			end
			if taunt3b == 3 then
				if i.ClassName=="Part"then
					i.BrickColor = BrickColor.new("Pink")
					i.Anchored = false
					i.Velocity = Vector3.new(150,150,150)
					i.RotVelocity = Vector3.new(150,150,150)
				end
			end
		end
		if taunt3b == 2 then
			local x4 = coroutine.wrap(function()
				local part1 = Instance.new("Part",workspace)
				part1.Name = "Lighting"
				part1.BrickColor = BrickColor.new("Bright yellow")
				part1.Transparency = 0.55
				part1.CanCollide = false
				part1.Anchored = true
				part1.Size = Vector3.new(1024,1024,1024)
				part1.CastShadow = false
				wait(0.2)
				part1:destroy()
			end)
			x4()
		end
		if taunt3b == 2 then
			wait(3.8)
		else
			repeat wait() until s1.IsPlaying == false
		end
		music.Volume = "inf"
		if taunt3b == true then
			text.Text = "Darkness Shrill"
		elseif taunt3b == false then
			text.Text = "Killer Shrill"
		elseif taunt3b == 1 then
			text.Text = "RAGE Shrill"
		elseif taunt3b == 2 then
			text.Text = "Thunder Shrill"
		elseif taunt3b == 3 then
			text.Text = "Love Shrill"
		end
		wait(1)
		bigboomd = false
	end
	print("after act")
end)
grabkillb = false
plr.Chatted:connect(function(msg)
	local isPlayer = false
	for _,i in pairs(game:GetService("Players"):GetChildren())do
		if msg==i.Name then
			isPlayer = true
			break
		end
	end
	if (grabkillb == false) and (isPlayer == true) then
		grabkillb = true
		hum.WalkSpeed = 0
		hum.JumpPower = 0
		if taunt3b == 3 then
			text.Text = "You wanna..."
		else
			text.Text = "Come here, little punk."
		end
		local randomperson = game:GetService("Players"):FindFirstChild(msg)
		ypcall(function()
			local rpc = randomperson.Character
			char:MoveTo(rpc.HumanoidRootPart.Position)
			rpc:FindFirstChildOfClass("Humanoid").WalkSpeed = 0
			rpc:FindFirstChildOfClass("Humanoid").JumpPower = 0
			wait(0.5)
			rpc:BreakJoints()
			if taunt3b == 3 then
				local sparkles = Instance.new("Sparkles",rpc.Head)
				sparkles.SparkleColor = Color3.new(1,1,1)
			end
		end)
		if taunt3b == 3 then
			wait(0.5)
		else
			wait(1.5)
		end
		if taunt3b == 3 then
			text.Text = "SMASH!?!?"
		else
			text.Text = "Heh."
		end
		wait(1)
		if taunt3b == true then
			text.Text = "Darkness Shrill"
		elseif taunt3b == false then
			text.Text = "Killer Shrill"
		elseif taunt3b == 1 then
			text.Text = "RAGE Shrill"
		elseif taunt3b == 2 then
			text.Text = "Thunder Shrill"
		elseif taunt3b == 3 then
			text.Text = "Love Shrill"
		end
		hum.WalkSpeed = 16
		hum.JumpPower = 50
		grabkillb = false
	end
end)
local taunt1 = Instance.new("Tool",plr.Backpack)
taunt1.Name = "Laugh"
taunt1.CanBeDropped = false
taunt1.RequiresHandle = false
taunt1b = false
taunt1.Activated:connect(function()
	if taunt1b == false then
		taunt1b = true
		text.Text = "HAHAHAHA!"
		textrotatespeed = 15
		--[[local s1 = Instance.new("Sound",char)
		s1.SoundId = "rbxassetid://375983055"
		s1.Volume = "inf"
		s1:Play()--]]
		music.Volume = 5
		--repeat wait() until s1.IsPlaying == false
		wait(1.541)
		if taunt3b == true then
			text.Text = "Darkness Shrill"
		elseif taunt3b == false then
			text.Text = "Killer Shrill"
		elseif taunt3b == 1 then
			text.Text = "RAGE Shrill"
		elseif taunt3b == 2 then
			text.Text = "Thunder Shrill"
		elseif taunt3b == 3 then
			text.Text = "Love Shrill"
		end
		textrotatespeed = 5
		wait(0.5)
		taunt1b = false
	end
end)
local taunt2 = Instance.new("Tool",plr.Backpack)
taunt2.Name = "Time"
taunt2.CanBeDropped = false
taunt2.RequiresHandle = false
taunt2b = false
taunt2b1 = false
taunt2.Activated:connect(function()
	if taunt2b1 == false then
		if taunt2b == false then
			taunt2b = true
			taunt2b1 = true
			text.Text = "Darkness rises..."
			local s1 = Instance.new("Sound",char)
			s1.SoundId = "rbxassetid://357621062"
			s1.Volume = "inf"
			s1:Play()
			music.Volume = 2
			local x2 = coroutine.wrap(function()
				local oldClockTime = writeToObject("OCT",game.Lighting.ClockTime,"Number")
				for _ = 1,oldClockTime.Value do
					game.Lighting.ClockTime = game.Lighting.ClockTime - 1
					wait(1/10)
				end
				taunt2b1 = false
			end)
			x2()
			repeat wait() until s1.IsPlaying == false
			if taunt3b == true then
				text.Text = "Darkness Shrill"
			elseif taunt3b == false then
				text.Text = "Killer Shrill"
			elseif taunt3b == 1 then
				text.Text = "RAGE Shrill"
			elseif taunt3b == 2 then
				text.Text = "Thunder Shrill"
			elseif taunt3b == 3 then
				text.Text = "Love Shrill"
			end
			music.Volume = "inf"
		elseif taunt2b == true then
			taunt2b = false
			taunt2b1 = true
			text.Text = "Light returns..."
			local s1 = Instance.new("Sound",char)
			s1.SoundId = "rbxassetid://357621062"
			s1.Volume = "inf"
			s1:Play()
			music.Volume = 2
			local x2 = coroutine.wrap(function()
				local oldClockTime = writeToObject("OCT",game.Lighting.ClockTime,"Number")
				for _ = 1,(12-game.Lighting.ClockTime) do
					game.Lighting.ClockTime = game.Lighting.ClockTime + 1
					wait(1/10)
				end
				taunt2b1 = false
			end)
			x2()
			repeat wait() until s1.IsPlaying == false
			if taunt3b == true then
				text.Text = "Darkness Shrill"
			elseif taunt3b == false then
				text.Text = "Killer Shrill"
			elseif taunt3b == 1 then
				text.Text = "RAGE Shrill"
			elseif taunt3b == 2 then
				text.Text = "Thunder Shrill"
			elseif taunt3b == 3 then
				text.Text = "Love Shrill"
			end
			music.Volume = "inf"
		end
	end
end)
local taunt3 = Instance.new("Tool",plr.Backpack)
taunt3.Name = "Transform"
taunt3.CanBeDropped = false
taunt3.RequiresHandle = false
taunt3b1 = false
taunt3.Activated:connect(function()
	if taunt3b1 == false then
		if taunt3b == false then
			taunt3b = true
			taunt3b1 = true
			text.Text = "..."
			local s1 = Instance.new("Sound",char)
			s1.SoundId = "rbxassetid://357621062"
			s1.Volume = "inf"
			s1:Play()
			music.Volume = 0
			bigboom.Name = "The Big Blackout"
			repeat wait() until s1.IsPlaying == false
			for _,i in pairs(char:GetChildren())do
				if(i.ClassName == "Part")and(i.Name~="Shrilleye")then
					i.BrickColor = BrickColor.new("Really black")
				end
			end
			text.TextColor3 = Color3.new(0, 0, 0)
			text.Text = "Darkness Shrill"
			music.Volume = "inf"
			music.SoundId = "rbxassetid://164150166"
			char.Animate.idle.Animation1.AnimationId = "rbxassetid://3229696476"
			taunt3b1 = false
		elseif taunt3b == true then
			taunt3b = 1
			taunt3b1 = true
			text.Text = "..."
			local s1 = Instance.new("Sound",char)
			s1.SoundId = "rbxassetid://357621062"
			s1.Volume = "inf"
			s1:Play()
			music.Volume = 0
			bigboom.Name = "The Big Nuke"
			repeat wait() until s1.IsPlaying == false
			for _,i in pairs(char:GetChildren())do
				if(i.ClassName == "Part")and(i.Name~="Shrilleye")then
					i.BrickColor = BrickColor.new("Really red")
				end
			end
			text.Text = "RAGE Shrill"
			music.Volume = "inf"
			text.TextColor3 = Color3.new(1, 0.1, 0.1)
			music.SoundId = "rbxassetid://1283869370"
			taunt3b1 = false
		elseif taunt3b == 3 then
			taunt3b = false
			taunt3b1 = true
			text.Text = "..."
			local s1 = Instance.new("Sound",char)
			s1.SoundId = "rbxassetid://357621062"
			s1.Volume = "inf"
			s1:Play()
			music.Volume = 0
			bigboom.Name = "The Big Boom"
			repeat wait() until s1.IsPlaying == false
			for _,i in pairs(char:GetChildren())do
				if(i.ClassName == "Part")and(i.Name~="Shrilleye")then
					i.BrickColor = BrickColor.new("Light orange")
				end
			end
			text.Text = "Killer Shrill"
			music.Volume = "inf"
			text.TextColor3 = Color3.new(1, 0, 0)
			music.SoundId = "rbxassetid://156537333"
			taunt3b1 = false
		elseif taunt3b == 1 then
			taunt3b = 2
			taunt3b1 = true
			text.Text = "..."
			local s1 = Instance.new("Sound",char)
			s1.SoundId = "rbxassetid://357621062"
			s1.Volume = "inf"
			s1:Play()
			music.Volume = 0
			bigboom.Name = "Smite"
			repeat wait() until s1.IsPlaying == false
			for _,i in pairs(char:GetChildren())do
				if(i.ClassName == "Part")and(i.Name~="Shrilleye")then
					i.BrickColor = BrickColor.new("Electric blue")
				end
			end
			text.Text = "Thunder Shrill"
			music.Volume = "inf"
			text.TextColor3 = BrickColor.new("Electric blue").Color
			music.SoundId = "rbxassetid://2653366831"
			taunt3b1 = false
		elseif taunt3b == 2 then
			taunt3b = 3
			taunt3b1 = true
			text.Text = "..."
			local s1 = Instance.new("Sound",char)
			s1.SoundId = "rbxassetid://357621062"
			s1.Volume = "inf"
			s1:Play()
			music.Volume = 0
			bigboom.Name = "The Pink Boom"
			repeat wait() until s1.IsPlaying == false
			for _,i in pairs(char:GetChildren())do
				if(i.ClassName == "Part")and(i.Name~="Shrilleye")then
					i.BrickColor = BrickColor.new("Pink")
				end
			end
			text.Text = "Love Shrill"
			music.Volume = "inf"
			text.TextColor3 = BrickColor.new("Pink").Color
			music.SoundId = "rbxassetid://1279841774"
			taunt3b1 = false
		end
	end
end)
print("after function")
while true do
	wait(0.15)
	if taunt3b == 1 then
		text.TextColor3 = BrickColor.Random().Color
	end
end