Previous File Previous Page Single Page Next Page Next File

* O180 (SYMLIST) DWG. 70181445000 REV. B PAGE 7

0272 00177 0 02 00371 GXTR LDA EXTF IF NOT AN EXTERNAL 0273 00200 101040 SNZ ENTRY, TREAT AS BLANKS 0274 00201 0 01 00161 JMP GFBT EXTERNAL ENTRY 0275 00202 140040 CRA BLANKS HAVE ALL BITS RESET 0276 00203 0 01 00175 JMP GXIT EXIT 0277 * 0278 * 0279 00204 0 000000 LCHK DAC ** LITERAL ENTRY CHECK 0280 00205 0 04 00374 STA PIC3 SAVE A 0281 00206 141206 AOA 0282 00207 0 04 00375 STA PIC4 GET ADDRESS OF WORD WITH LITERAL FLAG 0283 00210 -0 02 00375 LDA* PIC4 0284 00211 0414 75 LGL 3 A(1) & LITERAL FLAG 0285 00212 101400 SMI SKIP IF LITERAL ENTRY 0286 00213 0 12 00204 IRS LCHK BUMP RETURN 0287 00214 0 02 00374 LDA PIC3 RESTORE A 0288 00215 -0 01 00204 JMP* LCHK RETURN 0289 * 0290 * 0291 EJCT $$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$
Previous File Previous Page Single Page Next Page Next File