test18.b 289 B

1234567891011
  1. 110 rem second trap test
  2. 120 on error goto 200
  3. 130 print 1/o
  4. 140 print "division error not catched"
  5. 200 print "division error catched", err, erl
  6. 210 on error goto 500
  7. 220 print "waiting for interrupt"
  8. 230 goto 230
  9. 500 print "interrupt catched"
  10. 510 print "generate error 352"
  11. 520 error 352