5 ON ERROR GOTO 100
7 OPEN "OUTPUT.TXT" FOR OUTPUT AS 1
9 DEFSTR D,C
10 DEF FNA=1
20 DEF FND="a"
30 DEF FNB="b"
40 DEF FNC=2
50 PRINT#1, FNA
60 PRINT#1, FND
70 PRINT#1, FNB
80 PRINT#1, FNC
90 END
100 PRINT#1, "ERR:", ERR, ERL
110 RESUME NEXT

