10 REM PC-BASIC test 
20 REM RENUM test
30 A=20: GOSUB 110: GOTO 40
40 ON ERROR GOTO 60
50 ON ERROR GOTO 0: GOTO 60
60 RESUME 10
70 LIST 10-35: LLIST 5-20: DELETE 50-49
80 AUTO 10,10,10: RENUM 10,10,10
90 RESTORE 110
100 IF A THEN 10 ELSE 20
110 PRINT ERR+10: PRINT ERL+10+20+30: PRINT ERL=10: RETURN 40 
120 RUN "A", 40
130 ON A GOTO 10, 20, 30
140 PRINT GOTO 20
150 GOTO 10, 20, "A", 30
