diff --git a/cimp.bas b/cimp.bas index c943510..52eddb9 100644 --- a/cimp.bas +++ b/cimp.bas @@ -6,7 +6,7 @@ declare library "terminkey" end declare $console:only - +on error goto quit const KEY_UP = 1001 const KEY_DOWN = 1002 const KEY_RIGHT = 1003 @@ -19,7 +19,7 @@ $end if redim file(0) as string if command$ = "" then print "please specify file to play." - system + goto quit end if echooff @@ -102,7 +102,7 @@ i=0 musichandle = _sndopen(file(i)) if musichandle = 0 then print "Error: could not open file "; file(i) - system + goto quit end if _sndvol musichandle, volume _sndplay musichandle