AB16-CCT4

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

3909 07040 0 000000 DAC ** SO WE GET TWO MORE INSTRUCTIONS 3910 07041 0 02 07543 LDA =3 FIRST INSTRUCTION 3911 07042 001001 INH SECOND INSTRUCTION - NO RUPTS ALLOWED 3912 07043 0 01 07046 JMP *+3 3913 * 3914 07044 0 000000 DAC ** 3915 07045 000000 HLT WRONG RUPT - CHECK A REGISTER 3916 * 3917 07046 000013 EXA 3918 07047 0 10 07050 JST *+1 SET UP FOR ANOTHER RUPT 3919 07050 0 000000 DAC ** 3920 07051 0 02 07050 LDA *-1 3921 07052 000011 DXA 3922 07053 0 01 07054 JMP *+1 NORMAL MODE 3923 07054 0 06 07542 ADD ='22 3924 07055 0 04 00063 STA '63 STORE RETURN ADDRESS 3925 07056 0 35 07541 LDX =0 3926 07057 140040 CRA 3927 07060 000401 ENB ENABLE RUPTS 3928 07061 0 10 07062 JST *+1 JST SHOULD GIVE TWO FREE INSTRUCTIONS 3929 07062 0 000000 DAC ** 3930 07063 0 12 00000 IRS 0 FIRST INSTRUCTION - DOES NOT COUNT 3931 07064 0 12 00000 IRS 0 SECOND INSTRUCTION - DOES NOT COUNT 3932 07065 0 12 00000 IRS 0 THIRD INSTRUCTION - DOES NOT COUNT 3933 07066 0 02 07545 LDA =1 FOURTH INSTRUCTION - REALLY THE FIRST 3934 07067 0 02 07544 LDA =2 FIFTH INSTRUCTION - REALLY SECOND INSTR. 3935 07070 0 02 07543 LDA =3 SIXTH INSTRUCTION 3936 07071 000000 HLT DID NOT GO TO RUPT 3937 * 3938 07072 0 000000 DAC ** RUPT ENTRY 3939 07073 000011 DXA 3940 07074 0 01 07075 JMP *+1 NORMAL MODE 3941 07075 0 07 07544 SUB =2 3942 07076 100040 SZE 3943 07077 000000 HLT DID NOT RUPT AFTER FIVE INSTRUCTIONS 3944 * CHECK A-REG 3945 * 3946 * 3947 * TEST JMP/JST TRACE RUPTS 3948 * 3949 07100 101000 NOP 3950 07101 000013 EXA 3951 07102 0 10 07103 JST *+1 SET UP FOR RUPT 3952 07103 0 000000 DAC ** 3953 07104 0 02 07103 LDA *-1 3954 07105 0 06 07540 ADD ='14 3955 07106 0 04 00056 STA '56 3956 07107 000011 DXA 3957 07110 0 01 07111 JMP *+1 3958 07111 0 02 07506 LDA BIT8 SET RUPT MASK