How to make loop stop while processing?

So I'm currently making a Fireball and I added a decal that spins while playing the animation, but the Fireball won't come out and just adds a rotating decal. It's kinda hard to explain but how do I make a while true do work while it plays the animation without stopping the Fireball process?

Here's a part of the script:

animation:Play() ----- Active animation
	while true do
	    FireCircle.CFrame = FireCircle.CFrame * CFrame.fromEulerAnglesXYZ (0,-.1,0)
	    wait (0.00001)
	end --This one
	wait(0.5)
	FireCircle:Destroy()
	FireCircleA:Destroy()
	FireCircleB:Destroy()
	local Fireball = Instance.new("Part")
	local Fire = Instance.new("ParticleEmitter",Fireball)