C210-001-6601 (FRTN) 3C NO.180463000 REV. D

* C210-001-6601 (FRTN) 3C NO.180463000 REV. D PAGE 64

3001 05270 0 01 05272 JMP *+2 3002 05271 0 01 05302 JMP V330 ADDR-2 = ADDR-3 3003 05272 140040 CRA 3004 05273 0 04 00040 STA A 3005 05274 0 02 13741 LDA OMJ2 =SNZ INSTR. 3006 05275 0 04 00640 STA DF 3007 05276 0 10 14127 JST OA00 OUTPUT ABSOLUTE 3008 05277 0 02 05332 LDA T2V3 3009 05300 0 10 05322 JST V360 OUTPUT A JMP(ADDR-2) INSTR. 3010 05301 0 02 05333 LDA T3V3 3011 05302 0 11 05331 V330 CAS T1V3 CHECK FOR ADDR-3 = ADDR-2 3012 05303 0 01 05305 JMP *+2 3013 05304 0 01 05313 JMP V340 ADDR-3 = ADDR-1 3014 05305 140040 CRA 3015 05306 0 04 00040 STA A 3016 05307 0 02 13742 LDA OMJ3 =SMI INSTR. 3017 05310 0 10 14127 JST OA00 OUTPUT ABSOLUTE 3018 05311 0 02 05333 LDA T3V3 3019 05312 0 10 05322 JST V360 OUTPUT A JMP (ADDR-3) INSTR. 3020 05313 0 02 05331 V340 LDA T1V3 3021 05314 0 04 00053 STA IFF SET IFF ' ADDR-1 3022 05315 0 01 04264 JMP C5 GO TO ILL-TERM 3023 * 3024 05316 0 02 00672 V350 LDA K5 3025 05317 0 10 02547 JST TS00 COMMA TEST 3026 05320 0 01 05260 JMP V324 INPUT NEXT STATEMENT NO. 3027 * 3028 05321 177775 V356 OCT 177775 -3 3029 * 3030 *---------------SUBROUTINE TO OUTPUT A RELATIVE JMP 3031 05322 0 000000 V360 DAC ** 3032 05323 0 04 00040 STA A SET ADDR. OF JUMP REF. TO A 3033 05324 140040 CRA 3034 05325 000201 IAB SET (B) = 0 3035 05326 0 02 13733 LDA OMI5 SET (A) = JMP INSTR. 3036 05327 0 10 12467 JST OB00 OUTPUT OA 3037 05330 -0 01 05322 JMP* V360 EXIT 3038 * 3039 05331 0 00 00000 T1V3 *** ** ADDR-1 3040 05332 0 00 00000 T2V3 *** ** ADDR-2 3041 05333 0 00 00000 T3V3 *** ** ADDR-3 3042 * 3043 * ******* 3044 * *GO TO* 3045 * ******* 3046 * CHECK FOR NORMAL (R740), COMPUTED (R710) OR 3047 * ASSIGNED (R730). INPUT BRANCH LIST USED BY BOTH 3048 * R710 AND R730 FOR STATEMENT NO. LIST. 3049 * 3050 *