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