home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 22 gnu / 22-gnu.zip / gp371os2.zip / demo / animate.dem < prev    next >
Text File  |  1999-10-11  |  661b  |  24 lines
  1. # HBB: Demo animation, tumbling around 'glass.dat'
  2. # meant to replace the 'rotating whale' demo.
  3. set parametric
  4. set hidden3d
  5. set nokey
  6. set data style line
  7. xrot=60
  8. zrot=0
  9. set view xrot,zrot
  10. splot "glass.dat"
  11.  
  12. limit_iterations=40 # limits number of iterations if nonzero
  13.  
  14. if (!limit_iterations) print "The following animation will never stop on its own. You have"
  15. if (!limit_iterations) print "to stop it manually by interrupting gnuplot (e.g., press ^C)"
  16. print "On some screen terminal drivers for PC screens, you'll have"
  17. print "to hit a key to get to the next frame"
  18.  
  19. pause -1 "Press a key to start the rotation..."
  20.  
  21. iteration_count=0
  22. load "gnuplot.rot"
  23. reset
  24.