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

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

4001 07024 0 02 13733 LDA OMI5 JMP RPL (SAVED) - POINTS TO 'STA' INST. 4002 07025 0 10 13773 JST OR00 OUTPUT REL 4003 07026 0 02 13733 LDA OMI5 OUTPUT JMP RPL (SAVED) 4004 07027 0 10 13773 JST OR00 OUTPUT REL 4005 07030 -0 01 06773 JMP* DQ00 4006 * ************ 4007 * *EXPRESSION* 4008 * ************ 4009 * THE RESULTANT OUTPUT IS A BUILT UP AOIN 4010 * TABLE THAT IS FURTHER PROCESSED BY SCAN. 4011 07031 0 00 00000 T0EX PZE 0 4012 007031 EXT0 EQU T0EX 4013 07032 0 00 00000 T1EX PZE 0 4014 07033 0 00 00000 T2EX PZE 0 4015 07034 0 00 00000 T3EX PZE 0 4016 07035 0 00 00000 T5EX PZE 0 4017 07036 0 00 00000 T6EX PZE 0 4018 07037 0 00 00000 EXT7 PZE 0 4019 07040 0 00 00000 T9EX PZE 0 4020 07041 0 000000 EX00 DAC ** 4021 07042 0 04 00664 STA F F = (A) 4022 07043 0 02 00040 LDA A SAVE POINTER TO FIRST VARIABLE 4023 07044 0 04 00066 STA TRFA FOR LATER POSSIBLE TRACING 4024 07045 0 02 00057 LDA D I = D+D0+10 4025 07046 0 06 00661 ADD DO 4026 07047 0 06 00743 ADD K125 =8 4027 07050 0 04 00041 STA I 4028 07051 0 10 10016 JST EX99 DATA POOL CHECK 4029 07052 0 10 02676 JST STXI 4030 07053 140040 CRA 4031 07054 0 04 07031 STA EXT0 T0 = 0 4032 07055 0 04 00642 STA B B = 0 4033 07056 0 04 07037 STA EXT7 T7 = 0 4034 07057 0 06 07770 ADD EX92+12 4035 07060 0414 67 LGL 9 O(1-2) = '=' 4036 07061 1 04 15377 STA DP-1,1 0 (I) = 0 4037 07062 140401 CMA 4038 07063 0 04 00652 STA IFLG IFLM NOT 0 4039 07064 0 02 00113 LDA L0 4040 07065 1 04 15376 STA DP-2,1 O(I-2) = L0 4041 07066 0 10 02676 EX10 JST STXI 4042 07067 140040 CRA 4043 07070 0 04 07032 STA T1EX T1 = 0 4044 07071 1 04 15400 STA DP,1 AOIN(I) = T(1) = 0 4045 07072 1 04 15401 STA DP+1,1 4046 07073 0 02 00653 LDA IM IF IM NOT ZERO, 4047 07074 100040 SZE 4048 07075 0 01 07331 JMP EX50 GO TO EX50 4049 07076 0 02 00724 LDA K106 4050 07077 140407 TCA