local w=script.Parent if w and(w:IsA("\072\117\109\097\110\111\105\100")and w.Parent)then local n=w.Parent:GetChildren()local N={}for w=1,#n,1 do local X=n[w]if X and X:IsA("\080\097\114\116")then N[w]=X.BrickColor end end local X=w.WalkSpeed w.WalkSpeed=10 for X=1,10,1 do if not w or w.Health<=0 then break end for w=1,#n,1 do local t=n[w]if t and t:IsA("\080\097\114\116")then if X%2~=0 then t.BrickColor=BrickColor.new(119)else t.BrickColor=N[w]end end end if X%2~=0 then w:TakeDamage(w.MaxHealth/8)end wait(1)end if w then w.WalkSpeed=X end end script:Destroy()


local victim = script.Parent

if victim and victim:IsA("Humanoid") and victim.Parent then
	local victimChildren = victim.Parent:GetChildren()

	local originalColors = {}
	for i = 1, #victimChildren do -- Save original colors
		local child = victimChildren[i]
		if child and child:IsA("Part") then
			originalColors[i] = child.BrickColor
		end
	end

	local originalWalkSpeed = victim.WalkSpeed
	victim.WalkSpeed = 10

	for index = 1, 10 do -- Should be thought of as turning on and off 5 times
		if not victim or victim.Health <= 0 then break end
		for i = 1, #victimChildren do -- Color all parts green / Restore original colors
			local child = victimChildren[i]
			if child and child:IsA("Part") then
				if index % 2 ~= 0 then
					child.BrickColor = BrickColor.new(119) -- ("Br. yellowish green")
				else
					child.BrickColor = originalColors[i]
				end
			end
		end
		if index % 2 ~= 0 then
			victim:TakeDamage(victim.MaxHealth / 8) -- (12.5 normally, so 62.5 total)
		end
		wait(1)
	end

	if victim then victim.WalkSpeed = originalWalkSpeed end
end

script:Destroy()
