/MACRO COMPILER / /PAGE 2600 *2600 TYPO, 0 IOF TLS TSF JMP .-1 ION CLA JMP I TYPO / OSANDV, 0 JMS OSYM TAD TYCAR TAD Z M7 JMS I Z SKIP TAD Z VAL JMS OPS JMS TYCAR JMP I OSANDV / OSYM, 0 DCA TYCAR TAD Z TEM1A JMS OX TAD Z TEM1A+1 JMS OX TAD Z TEM1A+2 JMS OX JMP I OSYM / TYCAR, 0 TAD C215 JMS I Z DECOUT TAD C212 JMS I Z DECOUT JMP I TYCAR / RSUB, 0 CIA TAD Z CON DCA Z CON JMP I RSUB / OX, 0 SNA JMP I OSYM / RAL DCA Z LWC DCA Z HIC TAD MN14 DCA Z MP1 JMP DV2 / DV3, TAD Z HIC RAL DCA Z HIC TAD Z HIC TAD Z M45 SZL DCA Z HIC CLA DV2, TAD Z LWC RAL DCA Z LWC ISZ Z MP1 JMP DV3 / TAD Z LWC JMS UNTRAN TAD Z HIC JMS UNTRAN JMP I OX / / UNTRAN, 0 SNA JMP I OSYM / TAD Z M33 SPA TAD C53 TAD C260 JMS I Z DECOUT ISZ TYCAR JMP I UNTRAN / OPS, 0 DCA OSYM TAD MN4 DCA TYCAR TAD OSYM RTL RAL DCA OSYM TAD OSYM RAL AND Z C7 TAD C260 JMS I Z DECOUT ISZ TYCAR JMP OPS+4 / JMP I OPS / LITBUF, 0 *2772 MN4, 0-4 C260, 260 C53, 53 MN14, 0-14 C212, 212 C215, 215 PAUSE @