AB16-CCT4

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

4059 07236 140040 CRA 4060 07237 0 04 07432 STA WAIT CLEAR INDEX BIT IF SET 4061 07240 0 02 07534 LDA ='77 4062 07241 0 04 00003 STA 3 4063 07242 0 02 07533 LDA ='4000 OVERFLOW MASK BIT 4064 07243 171020 OTK 4065 07244 0 01 07245 JMP *+1 4066 07245 000013 EXA 4067 07246 0 10 07247 JST *+1 SET UP FOR STACK OVERFLOW RUPT 4068 07247 0 000000 DAC ** 4069 07250 0 02 07247 LDA *-1 4070 07251 0 06 07532 ADD ='32 4071 07252 0 04 00057 STA '57 4072 07253 0 06 07543 ADD =3 4073 07254 0 04 07300 STA OTK1 4074 07255 000011 DXA 4075 07256 0 01 07257 JMP *+1 NORMAL MODE 4076 07257 000043 INK INPUT KEYS 4077 07260 171020 OTK 4078 07261 0 12 00003 IRS 3 CAUSE STACK OVERFLOW RUPT 4079 07262 0 02 07531 LDA =-10 4080 07263 0 10 07432 JST WAIT 52 +/- 2 USECS FROM IRS 3 TO STA '57 4081 07264 0 000000 DAC ** 4082 07265 000013 EXA 4083 07266 0 02 00000 LDA 0 DUMMY 4084 07267 0 02 07300 LDA OTK1 4085 07270 0 04 00057 STA '57 4086 07271 0 02 07531 LDA =-10 4087 07272 0 10 07432 JST WAIT 57 CYCLES FROM LDA =-12 TO NOP BEFORE HLT 4088 07273 0 000000 DAC ** 4089 07274 000000 HLT NO RUPT WITHIN 96 +/- 3 USECS. 4090 07275 101000 NOP 4091 07276 101000 NOP 4092 07277 0 01 07305 JMP *+6 4093 * 4094 07300 000000 OTK1 BSZ 1 4095 * 4096 07301 0 000000 DAC ** RUPT ENTRY 4097 07302 000000 HLT GOT RUPT BEFORE 52 +/- 2 USECS 4098 07303 100000 SKP 4099 * 4100 07304 0 000000 DAC ** CORRECT RUPT ENTRY 4101 07305 101000 NOP 4102 07306 0 02 00003 LDA 3 4103 07307 0 07 07530 SUB ='100 4104 07310 100040 SZE 4105 07311 000000 HLT STACK DID NOT INCREMENT 4106 07312 000043 INK 4107 07313 0 03 07505 ANA BIT6 DEFAULT BIT MUST BE SET 4108 07314 101040 SNZ