11 lines
230 B
Text
11 lines
230 B
Text
|
100 REM TRY
|
||
|
|
110 ONERR GOTO 200
|
||
|
|
120 D = - 44 / 0
|
||
|
|
190 END
|
||
|
|
200 REM CATCH
|
||
|
|
210 E = PEEK (222) < > 133
|
||
|
|
220 POKE 216,0: REM ONERR OFF
|
||
|
|
230 IF E THEN RESUME
|
||
|
|
240 CALL - 3288: REM RECOVER
|
||
|
|
250 PRINT "DIVISION BY ZERO"
|