/* Interaktiver Test für EasyVideo 
   (c) Jörg Trahm
*/

address "EasyVideo"
options prompt "EVideo > "
options results
start:
signal on syntax
signal on error
do forever
 parse pull input
 interpret input
 say result
end

syntax:
 say "Fehler" rc "in Zeile" sig1":" errortext(rc)
signal start

error:
 say "Rückkehrcode:" rc
signal start