# Create demo data if needed. cl (< "demos$mkdonessie.cl") unlearn dohydra params delete ("demologfile,demoplotfile", verify=no, >& "dev$null") # Execute playback. if (substr (envget("stdgraph"), 1, 6) == "xgterm") stty (playback="demos$xgdonessie.dat", nlines=24, verify=no, delay=0) else error (1, "Playback for current terminal type not available")