AB16-CCT4

* NAME: AB16-CCT4 DOC 70180658000 REV H PAGE 79

3739 06543 0 02 06224 LDA BIT3 3740 06544 171020 OTK RESET RUPT MASK BUT LEAVE EXTEND MODE 3741 06545 0 01 06546 JMP *+1 3742 06546 0 10 06547 JST *+1 3743 06547 0 000000 DAC ** 3744 06550 0 02 06547 LDA *-1 3745 06551 0 06 06737 ADD ='12 3746 06552 0 04 00057 STA '57 3747 06553 000011 DXA 3748 06554 0 01 06555 JMP *+1 NORMAL MODE 3749 06555 0 02 06727 LDA ='100 3750 06556 0 04 00003 STA 3 3751 06557 0 02 00004 LDA 4 LOAD FROM STACK TOP AND PUSH 3752 06560 0 01 06563 JMP *+3 JUMP AROUND 3753 * 3754 06561 0 000000 DAC ** UNEXPECTED RUPT 3755 06562 000000 HLT ERROR 3756 06563 0 12 00000 IRS 0 CHECKED ALL POSSIBLE OVFLO CASES 3757 06564 100000 SKP NO, SKIP TO MODIFY 3758 06565 0 01 06571 JMP *+4 YES, GO AROUND 3759 06566 0 02 06227 LDA HADD 3760 06567 0 06 06727 ADD ='100 3761 06570 0 01 06526 JMP X13L+2 TRY ANOTHER OVFLO POINT 3762 * 3763 * 3764 06571 101000 NOP 3765 06572 0 35 06726 LDX =-20 3766 06573 0 02 06725 LDA ='120 3767 06574 0 04 00003 STA 3 STORE ADDR AT STACK TOP 3768 06575 0 02 06226 LDA BT35 3769 06576 171020 OTK SET RUPT MASK AND EXTEND MODE 3770 06577 000013 EXA 3771 06600 0 10 06601 JST *+1 SET UP FOR 3772 06601 0 000000 DAC ** EXPECTED RUPT 3773 06602 0 02 06601 LDA *-1 3774 06603 0 06 06737 ADD ='12 3775 06604 0 04 00057 STA '57 3776 06605 000011 DXA 3777 06606 0 01 06607 JMP *+1 NORMAL MODE 3778 06607 0 02 00004 LDA 4 LOAD FROM STACK TOP AND PUSH 3779 06610 0 12 00000 IRS 0 ARE WE FINISHED, DID WE GET RUPT 3780 06611 0 01 06607 JMP *-2 NO, GET ANOTHER WORD 3781 06612 000000 HLT FINISHED, ERROR: DID NOT GET RUPT 3782 * 3783 * 3784 06613 0 000000 DAC ** EXPECTED RUPT 3785 06614 101000 NOP 3786 06615 000011 DXA 3787 06616 0 01 06617 JMP *+1 NORMAL MODE 3788 *