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)