blob: b0b99f4f2f00f45fff43e905d4e6d0f4552c18c9 (
plain) (
blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
|
# Create demo data if needed.
cl (< "demos$mkdohydra.cl")
unlearn dohydra params
params.log = yes
delete ("demologfile,demoplotfile", verify=no, >& "dev$null")
# Execute playback.
if (substr (envget("stdgraph"), 1, 6) == "xgterm")
stty (playback="demos$xgdohydra.dat", nlines=24, verify=no, delay=0)
else
error (1, "Playback for current terminal type not available")
|
