ANSYS ANIMATION problem: how can I animate the results of a loop (of element death over time)?

I previously posted asking for help with writing command line code to model melting via element death over time.  Biswajit kindly helped me write a loop to kill off any "melted" elements.  Now I would like to animate the results.  I would be very grateful for any suggestions on how to save results from the loop calculations and then animate them.  My aim is to get an animation that shows temperature contours evolving as well as elements disappearing as they achieve a specified temperature.  I am a new user and would find detailed suggestions most helpful.  

The code I have so far (up to the animation step) is below.  Thanks...   

/title, Convection Example   
/prep7                ! Enter the preprocessor

! define geometry

k,1,0,0                ! Define keypoints
k,2,0.03,0
k,3,0.03,0.03
k,4,0,0.03
a,1,2,3,4            ! Connect the keypoints to form area

! mesh 2D areas

ET,1,Plane55            ! Element type

MP,Dens,1,2262e9         ! Define density
mp,c,1,0.001604         ! Define specific heat
mp,kxx,1,1.8            ! Define heat transfer coefficient

esize,0.0025            ! Mesh size
amesh,all            ! Mesh area

finish

/solu                ! Enter solution phase

antype,4            ! Transient analysis

tot_time = 1e6
t_steps = 50
time_inc = tot_time/t_steps

time,1e6            ! Time at end of analysis

nropt,full            ! Newton Raphson - full
lumpm,0            ! Lumped mass off
nsubst,20            ! Number of substeps, 20
neqit,10                ! Max no. of iterations
autots,off            ! Auto time search off
lnsrch,on            ! Line search on

TUNIF,200,
IC,all,temp,200            ! Initial conditions, temp = 200

*do, i,1 ,t_steps, 1
/solu
    time=i*time_inc
    nsub, 1
outres,all,all            ! Output data for all substeps

                    !... any stuff about boundary conditions ...

                ! fixed temp BC's
nsel,s,ext            ! Node select all exterior nodes
sf,all,conv,1,600
NSEL,ALL            ! Reselect all nodes
kbc,1                ! Load applied in steps, not ramped
/gst,off                ! Turn off graphical convergence monitor

    solve
    finish

    /post1
    set, last
    etable,melty,temp, ! Create an element table
    esel,s,etab,melty,900 ! Select all elements from table above 500
    finish
    /solu ! Re-enter solution phase
    antype,,rest ! Restart analysis
    ekill,all ! Kill all selected elements
    esel,all

finish
/post1

*enddo