FRTN

* NAME: FRTN DWG 70180463000 REV J PAGE 21

0771 01126 141140 ICL LEFT 0772 01127 141050 CAL RIGHT 0773 01130 0 12 00656 IRS CC RESTORE CC 0774 01131 0 04 00067 IC20 STA TC 0775 01132 0 35 01134 IC22 LDX ICXS RESTORE INDEX 0776 01133 -0 01 01061 JMP* IC00 RETURN 0777 01134 ICXS BSS 1 TEMP STORAGE FOR INDEX 0778 01135 0 02 00720 IC24 LDA K9 TC = /, END OF LINE - STATEMENT SCAN 0779 01136 0 04 00067 STA TC 0780 01137 0 01 01132 JMP IC22 GO TO IC22 0781 01140 0 10 02745 IC26 JST LIST LIST, CONTINUATION CARD 0782 01141 0 02 00743 LDA K107 CC = 7, IGNORE STATEMENT NO. 0783 01142 0 04 00656 STA CC 0784 01143 0 01 01121 JMP IC21 0785 01144 0 10 02745 IC30 JST LIST PRINT CARD IMAGE 0786 01145 0 01 01072 JMP IC12 READ IN NEW CARD 0787 01146 000357 K357 OCT 357 0788 01147 000303 K16 OCT 303 0C 0789 01150 000111 K108 DEC 73 0790 01151 120240 KASP BCI 1, (SP)(SP) MUST PRECEDE CARD IMAGE BUFFER 0791 EJCT