recover Example
10 CLEAR SCREEN
20 PRINT "Testing the ON ERROR RECOVER statement."
30 ON ERROR RECOVER Here
40 Forceerr
50 Here: PRINT "RECOVER works properly."
60 END
70 SUB Forceerr
80 PRINT "Forcing an error"
90 PRINT SYSTEM$("WHO IS BILL GATES") !gives error 401
100 SUBEND
