percent-destroyed go setup plot 0 plot percent-destroyed ]]> set density 60.0 setup repeat 180 [ go ]