DIM A$
 
 IF COMMAND$ = "" THEN
   PRINT "Usage: Wav filename [.wav]"
   PRINT "Plays a wave file"
   END
 END IF
 
 A$ = EXTRACT$(COMMAND$, ".") & ".WAV"
 
 PLAYWAV(A$)

Result:

 Result not displayed for this example.