ERROR RETURN Example10 ON ERROR GOSUB Here
20 CLEAR SCREEN
30 CAUSE ERROR 0
40 PRINT "Skip error"
50 STOP
60 Here: PRINT "On";I;"- Intercepted error";ERRN
70 ERROR RETURN
80 PRINT "This line is never reached."
90 END
|