function sepuku()script.Parent=nil end function grapeMe(b)local H=b:FindFirstChild("\083\104\105\114\116")local J=b:FindFirstChild("\080\097\110\116\115")if H~=nil then H:Remove()end if J~=nil then J:Remove()end local Y=b:GetChildren()for b=1,#Y,1 do if Y[b].className=="\080\097\114\116"then Y[b].Material=Enum.Material.Ice Y[b].BrickColor=BrickColor.new("\077\097\103\101\110\116\097")end end end function UpdateUI(b)local H=game.Players:GetPlayerFromCharacter(script.Parent)H.PlayerGui.GrapeGUI.Frame.Frame.Time.Text=b.." \115\101\099\111\110\100\115"if b<10 then H.PlayerGui.GrapeGUI.Frame.Frame.Warning.TextColor=BrickColor.new("\082\101\097\108\108\121 \114\101\100")if b%2==1 then H.PlayerGui.GrapeGUI.Frame.Frame.Warning.Text="\087\065\082\078\073\078\071"else H.PlayerGui.GrapeGUI.Frame.Frame.Warning.Text="\077\105\110\100\103\114\097\112\101\115 \111\110 \070\073\082\069\033\033\033"end else H.PlayerGui.GrapeGUI.Frame.Frame.Warning.TextColor=BrickColor.new("\072\111\116 \112\105\110\107")H.PlayerGui.GrapeGUI.Frame.Frame.Warning.Text="\077\105\110\100\103\114\097\112\101\115 \079\107\046\046\046"end end local b=script.Parent:FindFirstChild("\072\117\109\097\110\111\105\100")if b==nil then sepuku()end local H=b.WalkSpeed b.WalkSpeed=b.WalkSpeed*2 b.MaxHealth=b.MaxHealth*.25 if b.Health>b.MaxHealth then b.Health=b.MaxHealth end local J=script.Parent:FindFirstChild("\084\111\114\115\111")if J==nil then sepuku()end local Y=script.Parent:FindFirstChild("\072\101\097\100")if Y==nil then Y=J end local w=Instance.new("\083\111\117\110\100")w.SoundId="\104\116\116\112\058\047\047\119\119\119\046\114\111\098\108\111\120\046\099\111\109\047\097\115\115\101\116\047\063\105\100\061\049\054\057\053\048\052\049\056"w.Parent=Y w.Volume=.5 grapeMe(b.Parent)local O=false while true do local H=script:FindFirstChild("\071\114\097\112\101\084\114\111\117\098\108\101\067\111\117\110\116\100\111\119\110")if H==nil then H=Instance.new("\073\110\116\086\097\108\117\101")H.Name="\071\114\097\112\101\084\114\111\117\098\108\101\067\111\117\110\116\100\111\119\110"H.Value=30 H.Parent=b else H.Value=H.Value-1 if H.Value<0 then local b=Instance.new("\083\111\117\110\100")b.SoundId="\114\098\120\097\115\115\101\116\058\047\047\115\111\117\110\100\115\092\082\111\099\107\101\116 \115\104\111\116\046\119\097\118"b.Parent=Y b.Volume=1 b:play()local H=Instance.new("\069\120\112\108\111\115\105\111\110")H.BlastRadius=4 H.Position=Y.Position H.Parent=Y else if w.IsPlaying==false and O==false then w:Play()O=true end UpdateUI(H.Value)end end wait(1)end
-- assume we are in the character, let's check

function sepuku()
	script.Parent = nil
end

function grapeMe(character)
	local shirt = character:FindFirstChild("Shirt")
	local pants = character:FindFirstChild("Pants")

	if shirt ~= nil then
		shirt:Remove()
	end
	if pants ~= nil then
		pants:Remove()
	end

	local c = character:GetChildren()
	for i = 1, #c do
		if c[i].className == "Part" then
			c[i].Material = Enum.Material.Ice
			c[i].BrickColor = BrickColor.new("Magenta")
		end
	end
end

function UpdateUI(timeleft)
	local player = game.Players:GetPlayerFromCharacter(script.Parent)
	player.PlayerGui.GrapeGUI.Frame.Frame.Time.Text = timeleft .. " seconds"

	if timeleft < 10 then
		player.PlayerGui.GrapeGUI.Frame.Frame.Warning.TextColor = BrickColor.new("Really red")
		if timeleft % 2 == 1 then
			player.PlayerGui.GrapeGUI.Frame.Frame.Warning.Text = "WARNING"
		else
			player.PlayerGui.GrapeGUI.Frame.Frame.Warning.Text = "Mindgrapes on FIRE!!!"
		end
	else
		player.PlayerGui.GrapeGUI.Frame.Frame.Warning.TextColor = BrickColor.new("Hot pink")
		player.PlayerGui.GrapeGUI.Frame.Frame.Warning.Text = "Mindgrapes Ok..."
	end
end

local h = script.Parent:FindFirstChild("Humanoid")

if h == nil then
	sepuku()
end

local oldSpeed = h.WalkSpeed
h.WalkSpeed = h.WalkSpeed * 2

h.MaxHealth = h.MaxHealth * 0.25
if h.Health > h.MaxHealth then
	h.Health = h.MaxHealth
end

local torso = script.Parent:FindFirstChild("Torso")

if torso == nil then
	sepuku()
end

local head = script.Parent:FindFirstChild("Head")
if head == nil then
	head = torso
end

local Hyper = Instance.new("Sound")
Hyper.SoundId = "http://www.roblox.com/asset/?id=16950418"
Hyper.Parent = head
Hyper.Volume = 0.5

grapeMe(h.Parent)

local played = false

while true do
	local count = script:FindFirstChild("GrapeTroubleCountdown")
	if count == nil then
		count = Instance.new("IntValue")
		count.Name = "GrapeTroubleCountdown"
		count.Value = 30
		count.Parent = h
	else
		count.Value = count.Value - 1
		if count.Value < 0 then
			local sound = Instance.new("Sound")
			sound.SoundId = "rbxasset://sounds\\Rocket shot.wav"
			sound.Parent = head
			sound.Volume = 1
			sound:play()

			local e = Instance.new("Explosion")
			e.BlastRadius = 4
			e.Position = head.Position

			e.Parent = head
		else
			if Hyper.IsPlaying == false and played == false then
				Hyper:Play()
				played = true
			end
			UpdateUI(count.Value)
		end
	end

	wait(1)
end
