N16-TLT9

* N520-001-H005 (N16-TLT9) DRAWING NO. 41285786-001-01 PAGE 12

0550 01267 100000 SKP INTERRUPTING, SKIP 0551 01270 0 01 01670 JMP ERR3 NOT, ERROR 0552 * 0553 01271 140040 CRA 0554 01272 74 0020 SMK MASK RESET MASK 0555 01273 0 02 00225 LDA BUTN 0556 01274 0 04 00063 STA '63 INTERRUPT LOCATION 0557 01275 0 10 01714 JST NDX2 LDA* BINA 0558 01276 74 0204 OTA BOAS OUTPUT BINARY CODE TO ASR 0559 01277 0 01 01674 JMP ERR4 NO SKIP ON OTA WITH READY SET 0560 * 0561 01300 34 0004 SKS ASRR SKIP IF ASR READY 0562 01301 0 01 01303 JMP *+2 0563 01302 0 01 01700 JMP ERR5 READY SET AFTER OTA 0564 * 0565 01303 0 12 00000 IRS 0 SKIP IF ALL PUNCHED 0566 01304 0 01 01240 JMP DELP GO TO DELAY 0567 * 0568 01305 34 0104 SKS ASRB SKIP IF ASR NOT BUSY 0569 01306 0 01 01305 JMP *-1 WAIT UNTIL NOT BUSY 0570 * 0571 * PRINT/PUNCH STOP CODE 0572 01307 0 10 01450 JST PRTY ASR PRINT ROUTINE 0573 01310 0 02 00232 LDA STOP X-OFF / RUBOUT MESSAGE 0574 01311 000002 DEC 2 0575 * 0576 01312 0 10 01640 JST MOTO START PUNCH ROUTINE 0577 * 0578 01313 0 10 01450 JST PRTY ASR PRINT ROUTINE 0579 01314 0 02 00232 LDA STOP X-OFF / RUBOUT MESSAGE 0580 01315 000002 DEC 2 0581 * 0582 * 0583 * READER INPUT 0584 * 0585 01316 0 10 01522 READ JST OUTP OUTPUT A MESSAGE TO ASR 0586 01317 0 002205 DAC RDIN READER INPUT MESSAGE 0587 * 0588 01320 000000 HLT 0589 * 0590 * START READER 0591 01321 34 0104 SKS ASRB SKIP IF ASR NOT BUSY 0592 01322 0 01 01321 JMP *-1 WAIT UNTIL NOT BUSY 0593 * 0594 01323 14 0104 OCP ASRO ASR OUTPUT MODE 0595 01324 0 02 02006 LDA ='221 X-ON CRARACTER 0596 01325 74 0004 OTA OASR OUTPUT A CHARACTER TO ASR 0597 01326 0 01 01325 JMP *-1 WAIT UNTIL READY 0598 * 0599 01327 34 0104 SKS ASRB SKIP IF ASR NOT BUSY