BASIC-PTLB

* NAME BASIC-PTLB DOC. ??????????? REV. ? PAGE 7

0224 * 0225 * 0226 * PROGRAM BREAK CHECK ROUTINE 0227 * 0228 * CALLING SEQUENCE: 0229 * 0230 * JST BRKC 0231 * ......RETURN 0232 * 0233 * 0234 * SENSE SWITCH ONE IS TESTED. IF IT IS NOT SET, THEN THE 0235 * ROUTINE RETURNS IMMEDIATELY, OTHERWISE THE BREAK FLAG, BRKF, IS 0236 * SET NON-ZERO. 0237 * 0238 * 0239 00117 0 000000 BRKC DAC ** 0240 00120 100020 SR1 SENSE SWITCH 1 SET? 0241 00121 0 12 00000 IRS BRKF YES - SET BREAK FLAG 0242 00122 -0 01 00117 JMP* BRKC NO - RETURN 0243 00123 0 01 00121 JMP *-2 IF BRKF REACHES ZERO, SET AGAIN 0244 EJCT