mol new dump_pull.lammpstrj
rotate x by 45

proc my_dynamics {} {
    set num [molinfo top get numframes]
    puts "$num frames found"
    for {set i 0} {$i < $num} {incr i 100} {
           set filename MOVIE/rotate_snap.[format "%04d" $i].rgb
           render snapshot $filename
           rotate y by 20
           animate goto $i
        }
	exec convert -delay 10 -loop 4 MOVIE/rotate_snap.*.rgb MOVIE/movie.gif
	rm MOVIE/rotate_snap.*.rgb
}

my_dynamics