AB16-CCT4

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

3262 05716 0 04 00320 STA IN06 3263 05717 0 02 00457 LDA LM24 LDA =-24 3264 05720 0 04 00301 STA IN07 3265 05721 0 02 00464 LDA HISC 3266 05722 0 07 05772 SUB ='10 3267 05723 101400 SMI IF NEG., MEM IS ONLY 4K, MODIFY 3268 05724 0 01 05731 JMP *+5 3269 05725 0 02 00270 LDA IN10 3270 05726 0 04 00200 STA IN08+1 3271 05727 0 02 00177 LDA IN08 3272 05730 0 04 00201 STA IN08+2 3273 05731 0 02 05746 LDA =A 7 3274 05732 0 01 05655 JMP X133 3275 * 3276 * 3277 * TEST IF CP IS 716 AND MEMORY 20K AND IF SO, MODIFY PROGRAM 3278 * FOR UPPER HALF 3279 * 3280 05733 0 02 05752 S47R LDA =-1 3281 05734 0 12 00001 IRS 1 WILL SKIP IF CP IS 716 3282 05735 0 01 00162 JMP STR2 CP IS NOT 716, NO MODIFICATION 3283 05736 0 02 00464 LDA HISC CHECK IF MEMORY IS 20K 3284 05737 0 07 05745 SUB ='47 3285 05740 100040 SZE 3286 05741 0 01 00162 JMP STR2 OVER 20K, NO MODIFICATION 3287 05742 0 02 00257 LDA D20L MODIFY PROGRAM 3288 05743 0 04 00206 STA IN09 3289 05744 0 01 00162 JMP STR2 GO TO TEST 3290 * 3291 * 3292 * 3293 * 3294 05745 000047 FIN 05746 120267 05747 120265 05750 120263 05751 027174 05752 177777 05753 101000 05754 000001 05755 177761 05756 000031 05757 030071 05760 072460 05761 000151 05762 007701 05763 077555 05764 000016 05765 000777 05766 000023