10 REM PC-BASIC test 
20 REM
30 ON ERROR GOTO 100
40 OPEN "OUTPUT.TXT" FOR APPEND AS 2
50 PRINT#2, "OUTPUT"
60 STOP
100 OPEN "ERRORS.TXT" FOR APPEND AS 1
110 PRINT#1, ERR, ERL
120 CLOSE 1
130 RESUME NEXT
