Previous File   Multiple Pages   Next File

* PAGE 1

0001 * 0002 * 0003 SUBR O$GHAP,O$AH GENERAL HEADING ASR/HSP 0004 SUBR O$ALHB,HEAD ASR LIST HEADING BUFFER 0005 SUBR O$PLHB,HEAD HSP LIST HEADING BUFFER 0006 SUBR O$ALPB,PBUF ASR LIST PAGE NUMBER BUFFER 0007 SUBR O$PLPB,PBUF HSP LIST PAGE NUMBER BUFFER 0008 SUBR O$ALPN,PAGE ASR LIST PAGE NUMBER 0009 SUBR O$PLPN,PAGE HSP LIST PAGE NUMBER 0010 SUBR O$ALLC,LCNT ASR LIST LINE COUNT/PAGE 0011 SUBR O$PLLC,LCNT HSP LIST LINE COUNT/PAGE 0012 SUBR O$ALLN,LINE ASR LIST LINE NUMBER 0013 SUBR O$PLLN,LINE HSP LIST LINE NUMBER 0014 * 0015 * 0016 CF5 H316 AND DDP-516 0017 REL RELOCATABLE 0018 * 0019 * 0020 * LIST HEADING 0021 * 0022 00000 0 000000 O$AH DAC ** RETURN ADDRESS 0023 00001 0 15 00000 STX O$AH RETURN ADDRESS 0024 00002 -0 02 00000 LDA* O$AH HEADING ADDRESS 0025 00003 0 12 00000 IRS O$AH RETURN ADDRESS 0026 00004 0 04 00063 STA PAGE LIST PAGE NUMBER 0027 00005 0 35 00066 LDX =-28 SET INDEX 0028 00006 -0 02 00063 LOOP LDA* PAGE PAGE 0029 00007 1 04 00053 STA HEAD+28,1 LIST HEADING BUFFER 0030 00010 0 12 00063 IRS PAGE LIST PAGE NUMBER 0031 00011 0 12 00000 IRS 0 INDEX 0032 00012 0 01 00006 JMP LOOP LOOP 0033 00013 0 15 00063 STX PAGE PAGE 0034 00014 0 02 00064 LDA LCNT LIST LINE COUNT/PAGE 0035 00015 0 04 00065 STA LINE LIST LINE NUMBER 0036 00016 -0 01 00000 JMP* O$AH RETURN 0037 * 0038 * 0039 * CONSTANTS AND VARIABLES 0040 * 0041 * LIST HEADING BUFFER 0042 00017 HEAD BSS 28 LIST HEADING BUFFER 0043 00053 120320 BCI 5, PAGE 00054 140707 00055 142640 00056 120240 00057 120240 0044 * 0045 * LIST PAGE NUMBER BUFFER 0046 00060 120240 PBUF BCI 3, LIST PAGE NUMBER BUFFER
* PAGE 2

00061 120240 00062 120240 0047 * 0048 * LIST PAGE NUMBER 0049 00063 000000 PAGE BSZ 1 LIST PAGE NUMBER 0050 * 0051 * LIST LINE COUNT/PAGE 0052 00064 000110 LCNT DEC 72 LIST LINE COUNT/PAGE 0053 * 0054 * LIST LINE NUMBER 0055 00065 000000 LINE BSZ 1 LIST LINE NUMBER 0056 * 0057 * LITERALS 0058 00066 177744 FIN LITERALS 0059 * 0060 * 0061 END END OF O$GHAP 22.MAY.70 P.J.VYSE HEAD 000017 LCNT 000064 LINE 000065 LOOP 000006 O$AH 000000 PAGE 000063 PBUF 000060 0000 WARNING OR ERROR FLAGS DAP-16 MOD 2 REV. C 01-26-71
Previous File   Multiple Pages   Next File