cdc:nos2.source:opl.opl871:deck:1pp.001
Deck 1PP Part 001
7 Modifications
Listing Sections
- Deck 1PP Start
- Deck 1PP Part 1 (Line 1953)
Source
Seq # *Modification Id* Act ----------------------------+ 01953 M00S01817.1pp +++| 01954 M00S01818.1pp +++| 01955 M00S01819.1pp +++| SME SUBR ENTRY/EXIT 01956 M00S01820.1pp +++| LDD EJ+4 READ MST WORD 01957 M00S01821.1pp +++| SHN 3 01958 M00S01822.1pp +++| ADN THLL 01959 M00S01823.1pp +++| CRD BB 01960 M00S01824.1pp +++| ADN CTLL-THLL 01961 M00S01825.1pp +++| CRD CM 01962 M00S01826.1pp +++| LDD CM+4 01963 M00S01827.1pp +++| SHN 0-13 01964 M00S01828.1pp +++| NJN SME1 IF CONDITION ALREADY PROCESSED 01965 M00S01829.1pp +++| LDD CM+4 CHECK UNRECOVERED ERROR COUNT 01966 M00S01830.1pp +++| SBD BB+4 01967 M00S01831.1pp +++| MJN SME1 IF COUNT DOES NOT EQUAL/EXCEED THRESHOLD 01968 M00S01832.1pp +++| LDC 2R U 01969 M00S01833.1pp +++| STM SMEA+3 01970 M00S01834.1pp +++| LDC 2RNR 01971 M00S01835.1pp +++| STM SMEA+4 01972 M00S01836.1pp +++| LDN 11D 01973 M00S01837.1pp +++| UJN SME3 PROCESS THRESHOLD ERROR 01974 M00S01838.1pp +++| 01975 M00S01839.1pp +++| SME1 LDD CM+3 01976 M00S01840.1pp +++| SHN 0-13 01977 M00S01841.1pp +++| SME2 NJN SMEX IF CONDITION ALREADY PROCESSED 01978 M00S01842.1pp +++| LDD CM+3 CHECK RECOVERED ERROR COUNT 01979 M00S01843.1pp +++| SBD BB+3 01980 M00S01844.1pp +++| MJN SMEX IF COUNT DOES NOT EQUAL/EXCEED THRESHOLD 01981 M00S01845.1pp +++| LDN 23D 01982 M00S01846.1pp +++| SME3 SHN 6 SET BIT POSITION 01983 M00S01847.1pp +++| STM SMEB+1 SAVE BIT POSITION 01984 M00S01848.1pp +++| LMC 11D*100 01985 M00S01849.1pp +++| ZJN SME4 IF UNRECOVERED COUNT EXCEEDED 01986 M00S01850.1pp +++| LDC 2R R 01987 M00S01851.1pp +++| STM SMEA+4 01988 M00S01852.1pp +++| ADN 1R -1RR 01989 M00S01853.1pp +++| STM SMEA+3 01990 M00S01854.1pp +++| SME4 LDN ZERL 01991 M00S01855.1pp +++| CRD CM 01992 M00S01856.1pp +++| LDN ELAE 01993 M00S01857.1pp +++| STD CM+4 01994 M00S01858.1pp +++| MONITOR EATM 01995 M00S01859.1pp +++| LDD CM+1 01996 M00S01860.1pp +++| NJN SME2 IF EVENT NOT ENTERED 01997 M00S01861.1pp +++| LDD T8 SET EST ORDINAL IN MESSAGE 01998 M00S01862.1pp +++| SHN -3 01999 M00S01863.1pp +++| RJM C2D CONVERT TO DISPLAY CODE 02000 M00S01864.1pp +++| STM SMEA+1 02001 M00S01865.1pp +++| LDD T8 SET EST ORDINAL IN MESSAGE 02002 M00S01866.1pp +++| LPN 7 02003 M00S01867.1pp +++| SHN 6 02004 M00S01868.1pp +++| ADC 2R0, 02005 M00S01869.1pp +++| STM SMEA+2 02006 M00S01870.1pp +++| LDD EJ+3 SET EQUIPMENT TYPE IN MESSAGE 02007 M00S01871.1pp +++| LPC 3777 02008 M00S01872.1pp +++| STM SMEA 02009 M00S01873.1pp +++| LDC SMEA+ERLN ISSUE ERRLOG MESSAGE 02010 M00S01874.1pp +++| RJM DFM 02011 M00S01875.1pp +++| LDN ZERL SET *1SJ* PROCESSED BIT 02012 M00S01876.1pp +++| CRD CM 02013 M00S01877.1pp +++| LDN 1 SET NUMBER OF REQUESTS 02014 M00S01878.1pp +++| STD CM+1 02015 M00S01879.1pp +++| LDD EJ+4 SET MST ADDRESS 02016 M00S01880.1pp +++| SHN 3 02017 M00S01881.1pp +++| STD CM+4 02018 M00S01882.1pp +++| SHN -14 02019 M00S01883.1pp +++| STD CM+3 02020 M00S01884.1pp +++| LDD MA 02021 M00S01885.1pp +++| CWM SMEB,ON 02022 M00S01886.1pp +++| MONITOR UTEM 02023 M00S01887.1pp +++| LJM SMEX RETURN 02024 M00S01888.1pp +++| 02025 M00S01889.1pp +++| 02026 M00S01890.1pp +++| SMEA DATA C*XXYYY, UNRECOVERED ERROR LIMIT EXCEEDED.* 02027 M00S01891.1pp +++| SMEB VFD 1/0,5/CTLL,6/1,6/11D,42/1 02028 M00S01892.1pp +++| SRS SPACE 4,10 02029 M00S01893.1pp +++|** SRS - SET ROLLOUT STATUS. 02030 M00S01894.1pp +++|* 02031 M00S01895.1pp +++|* ENTRY (SC) = SERVICE CLASS. 02032 M00S01896.1pp +++|* (SRSA+4) = JOB STATUS OF SELECTED ENTRY. 02033 M00S01897.1pp +++|* 02034 M00S01898.1pp +++|* EXIT (A) = 0, IF *UTEM* CALL COMPLETED. 02035 M00S01899.1pp +++|* .NE. 0, IF *UTEM* ABORTED. 02036 M00S01900.1pp +++|* USES T1. 02037 M00S01901.1pp +++|* 02038 M00S01902.1pp +++|* CALLS CET, IUT. 02039 M00S01903.1pp +++| 02040 M00S01904.1pp +++| 02041 M00S01905.1pp +++| SRS SUBR ENTRY/EXIT 02042 M00S01906.1pp +++| LDM TEPB+2*MXJC,SC SET UP *CET* PARAMETERS 02043 M00S01907.1pp +++| STD T1 02044 M00S01908.1pp +++| LDD SC 02045 M00S01909.1pp +++| SHN 14 02046 M00S01910.1pp +++| LMN EXQT 02047 M00S01911.1pp +++| RJM CET CALCULATE ENTRY TIME 02048 M00S01912.1pp +++| LDD T1 PLACE ENTRY TIME IN *UTEM* PARAMETER BLOCK 02049 M00S01913.1pp +++| STM SRSA+2*5+3 02050 M00S01914.1pp +++| LDD T2 02051 M00S01915.1pp +++| STM SRSA+2*5+4 02052 M00S01916.1pp +++| LDD EJ+4 CHECK FOR *PWJS* STATUS 02053 M00S01917.1pp +++| LPN 76 02054 M00S01918.1pp +++| LMK PWJS*2 02055 M00S01919.1pp +++| ZJN SRS1 IF SHOULD CHANGE *PWJS* TO *PRJS* 02056 M00S01920.1pp +++| LDK ROJS&PRJS SET *ROJS* STATUS FOR *ERJS* OR *TOJS* 02057 M00S01921.1pp +++| SRS1 LMK PRJS 02058 M00S01922.1pp +++| STM SRSA+1*5+4 02059 M00S01923.1pp +++| LDC SRSA+SRSAL*10000 02060 M00S01924.1pp +++| RJM IUT ISSUE *UTEM* 02061 M00S01925.1pp +++| LJM SRSX RETURN 02062 M00S01926.1pp +++| 02063 M00S01927.1pp +++| 02064 M00S01928.1pp +++|* *UTEM* PARAMETERS FOR CHANGING JOB STATUS AND SETTING 02065 M00S01929.1pp +++|* SCHEDULING PRIORITY TO UPPER BOUND. 02066 M00S01930.1pp +++| 02067 M00S01931.1pp +++| SRSA VFD 1/1,5/JSNE,6/6 VALIDATE JOB STATUS UNCHANGED 02068 M00S01932.1pp +++| VFD 6/0,6/0 02069 M00S01933.1pp +++| CON 0 02070 M00S01934.1pp +++| CON 0 02071 M00S01935.1pp +++| CON 0 02072 M00S01936.1pp +++| 02073 M00S01937.1pp +++| VFD 1/0,5/JSNE,6/5 SET JOB STATUS 02074 M00S01938.1pp +++| VFD 6/1,6/0 02075 M00S01939.1pp +++| CON 0 02076 M00S01940.1pp +++| CON 0 02077 M00S01941.1pp +++| CON ROJS 02078 M00S01942.1pp +++| 02079 M00S01943.1pp +++| VFD 1/0,5/SCHE,6/30D SET SCHEDULING PRIORITY 02080 M00S01944.1pp +++| VFD 6/0,6/0 02081 M00S01945.1pp +++| CON 0 02082 M00S01946.1pp +++| CON 0 02083 M00S01947.1pp +++| CON 0 02084 M00S01948.1pp +++| 02085 M00S01949.1pp +++| SRSAL EQU */5-SRSA/5 BLOCK LENGTH 02086 M00S01950.1pp +++| SSA SPACE 4,10 02087 M00S01951.1pp +++|** SSA - SET STATISTICAL AREA ADDRESS. 02088 M00S01952.1pp +++|* 02089 M00S01953.1pp +++|* EXIT (A) = ADDRESS OF PERIODIC PROCESSOR STATISTICS AREA. 02090 M00S01954.1pp +++|* 02091 M00S01955.1pp +++|* USES CM - CM+4. 02092 M00S01956.1pp +++| 02093 M00S01957.1pp +++| 02094 M00S01958.1pp +++| SSA SUBR ENTRY/EXIT 02095 M00S01959.1pp +++| LDK SDAP READ STATISTICAL DATA AREA POINTER 02096 M00S01960.1pp +++| CRD CM 02097 M00S01961.1pp +++| LDD CM 02098 M00S01962.1pp +++| SHN 14 02099 M00S01963.1pp +++| LMD CM+1 02100 M00S01964.1pp +++| ADK PF0S 02101 M00S01965.1pp +++| UJN SSAX EXIT 02102 M00S01966.1pp +++| SPACE 4,10 02103 M00S01967.1pp +++|* COMMON DECKS. 02104 M00S01968.1pp +++| 02105 M00S01969.1pp +++| 02106 M00S01970.1pp +++|*CALL COMPAST 02107 M00S01971.1pp +++| CET$ SET 1 ASSEMBLE ROUTINE *CET* OF *COMPCPE* 02108 M00S01972.1pp +++|*CALL COMPCPE
| Line S00003 Modification History | |
|---|---|
M01 (Added by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 02109 M01S00003.271l750 +++| JCB$ EQU 1 SET *JCB* ACCESS 02110 M01S00004.271l750 +++| IFP$ EQU 1 GENERATE *IFP* REMOTE CODE 02111 M01S00005.271l750 +++|*CALL COMPGFP 02112 M00S01973.1pp +++|*CALL COMPC2D
| Line S01974 Modification History | |
|---|---|
M01 (Removed by) | 273l780 |
Seq # *Modification Id* Act ----------------------------+ 02113 M01S01974.273l780 ---|*CALL COMPPCP 02114 M00S01975.1pp +++|*CALL COMPRJC 02115 M00S01976.1pp +++| SLBS EQU /CPS/SLBS 02116 M00S01977.1pp +++|*CALL COMPTLB 02117 M00S01978.1pp +++|*CALL COMPSEI 02118 M00S01979.1pp +++| TABLES SPACE 4,10 02119 M00S01980.1pp +++| USE TABLES 02120 M00S01981.1pp +++| 02121 M00S01982.1pp +++|** TEVT - POSTED EVENTS. 02122 M00S01983.1pp +++|* ENTRY = 2 WORDS. 02123 M00S01984.1pp +++|* 02124 M00S01985.1pp +++|*T 24/ EV
Figure
02125 M00S01986.1pp +++|* EV POSTED EVENT OBTAINED FROM EVT TABLE. 02126 M00S01987.1pp +++| 02127 M00S01988.1pp +++| 02128 M00S01989.1pp +++| TEVT EQU * 02129 M00S01990.1pp +++| TEVTE EQU 2 ENTRY LENGTH 02130 M00S01991.1pp +++| TABLES SPACE 4,10 02131 M00S01992.1pp +++|** TOVF - ACCUMULATOR OVERFLOW FLAGS. 02132 M00S01993.1pp +++|* ENTRY = 1 WORD. 02133 M00S01994.1pp +++|* INDEXED BY CONTROL POINT NUMBER. 02134 M00S01995.1pp +++|* 02135 M00S01996.1pp +++|*T 12/ OF
Figure
02136 M00S01997.1pp +++|* OF OVERFLOW FLAGS FROM *SRUW*. 02137 M00S01998.1pp +++| 02138 M00S01999.1pp +++| 02139 M00S02000.1pp +++| TOVF EQU TEVT+TEVTE*MEVC 02140 M00S02001.1pp +++| TOVFE EQU 1 ENTRY LENGTH 02141 M00S02002.1pp +++| SPACE 4,10 02142 M00S02003.1pp +++| P0AU EQU TOVF+/DSL/NCPS*TOVFE *0AU* PARAMETER BLOCK 02143 M00S02004.1pp +++| OVL0 EQU P0AU+12+5 *0AU* ORIGIN 02144 M00S02005.1pp +++| ERRPL *+ZAUL-EPFW CODE OVERLAYS ERROR PROCESSING BUFFER 02145 M00S02006.1pp +++| TITLE INITIALIZATION. 02146 M00S02007.1pp +++| PRS SPACE 4,10 02147 M00S02008.1pp +++|** PRS - PRESET. 02148 M00S02009.1pp +++|* 02149 M00S02010.1pp +++|* USES CF, NC, PN, T1, CM - CM+4, AA - AA+4, BB - BB+4, 02150 M00S02011.1pp +++|* EJ - EJ+4, TM - TM+4. 02151 M00S02012.1pp +++|*
| Line S02013 Modification History | |
|---|---|
M01 (Removed by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 02152 M01S02013.271l750 ---|* CALLS RJC.
| Line S00006 Modification History | |
|---|---|
M01 (Added by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 02153 M01S00006.271l750 +++|* CALLS IFP. 02154 M00S02014.1pp +++|*
| Line S02015 Modification History | |
|---|---|
M01 (Removed by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 02155 M01S02015.271l750 ---|* MACROS IPCP, ISTORE.
| Line S00007 Modification History | |
|---|---|
M01 (Added by) | 271l750 |
M02 (Removed by) | 273l780 |
Seq # *Modification Id* Act ----------------------------+ 02156 M02S00007.273l780 ---|* MACROS IPCP, ISTORE, SFA.
| Line S00048 Modification History | |
|---|---|
M01 (Added by) | 273l780 |
Seq # *Modification Id* Act ----------------------------+ 02157 M01S00048.273l780 +++|* MACROS ISTORE, SFA. 02158 M00S02016.1pp +++| 02159 M00S02017.1pp +++| 02160 M00S02018.1pp +++| PRS SUBR ENTRY/EXIT
| Line S02019 Modification History | |
|---|---|
M01 (Removed by) | 273l780 |
Seq # *Modification Id* Act ----------------------------+ 02161 M01S02019.273l780 ---| IPCP INITIALIZE *COMPPCP*
| Line S00049 Modification History | |
|---|---|
M01 (Added by) | 273l780 |
Seq # *Modification Id* Act ----------------------------+ 02162 M01S00049.273l780 +++| LDK PCPP SET FWA OF PCPA-S 02163 M01S00050.273l780 +++| CRD CM 02164 M01S00051.273l780 +++| LDD CM+3 02165 M01S00052.273l780 +++| SHN 14 02166 M01S00053.273l780 +++| LMD CM+4 02167 M01S00054.273l780 +++| SBK 200B 02168 M01S00055.273l780 +++| STM CCAA+1 02169 M01S00056.273l780 +++| SHN -14 02170 M01S00057.273l780 +++| LMC ADCI 02171 M01S00058.273l780 +++| STM CCAA 02172 M00S02020.1pp +++| LDD CM+2 SET NUMBER OF MCT ENTRIES 02173 M00S02021.1pp +++| ERRNZ MCTP-PCPP CODE DEPENDS ON VALUE 02174 M00S02022.1pp +++| STD PN
| Line S00008 Modification History | |
|---|---|
M01 (Added by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 02175 M01S00008.271l750 +++| RJM IFP INITIALIZE TABLE ACCESS 02176 M00S02023.1pp +++| LDN SSTL GET USER ECS FLAG 02177 M00S02024.1pp +++| CRD AA 02178 M00S02025.1pp +++| ADK EJTP-SSTL PRESET EJT FWA 02179 M00S02026.1pp +++| CRD CM 02180 M00S02027.1pp +++| ADK RTCL-EJTP READ REAL TIME CLOCK 02181 M00S02028.1pp +++| CRD TM 02182 M00S02029.1pp +++| ADK INWL-RTCL READ SCHEDULER CONTROL FLAGS 02183 M00S02030.1pp +++| CRD BB 02184 M00S02031.1pp +++| LDD BB+3 02185 M00S02032.1pp +++| STD CF SAVE SCHEDULER CONTROL FLAGS 02186 M00S02033.1pp +++| LPN 2 02187 M00S02034.1pp +++| ZJN PRS0 IF *AUTO* HAS BEEN ENTERED 02188 M00S02035.1pp +++| LDC TCPP+C1CK+1 DISABLE ALL PP CALLS BUT *1CK* 02189 M00S02036.1pp +++| STM CPPC 02190 M00S02037.1pp +++| PRS0 LDD CM+1 SET EJT FWA 02191 M00S02038.1pp +++| STM EJAA 02192 M00S02039.1pp +++| STM SEJB 02193 M00S02040.1pp +++| LDD CM 02194 M00S02041.1pp +++| RAM EJAA-1 02195 M00S02042.1pp +++| STM SEJB-1 02196 M00S02043.1pp +++| LDD CM+2 SET START OF EJT SCAN 02197 M00S02044.1pp +++| STM SEJA 02198 M00S02045.1pp +++| LDD CP SET NUMBER OF CONTROL POINTS 02199 M00S02046.1pp +++| SHN -7 02200 M00S02047.1pp +++| STD NC 02201 M00S02048.1pp +++| LDD AA 02202 M00S02049.1pp +++| SHN 21-5 02203 M00S02050.1pp +++| MJN PRS1 IF USER ECS IS DISABLED 02204 M00S02051.1pp +++| ISTORE PCAA,(UJN PCA13) DISABLE USER ECS CHECK 02205 M00S02052.1pp +++| 02206 M00S02053.1pp +++|* BUILD *TEPB*, *TJAM* TABLES. 02207 M00S02054.1pp +++| 02208 M00S02055.1pp +++| PRS1 LDN MXJC-1 INITIALIZE INDEX 02209 M00S02056.1pp +++| STD T1
| Line S02057 Modification History | |
|---|---|
M01 (Removed by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 02210 M01S02057.271l750 ---| PRS2 RJM RJC CALCULATE JCB ADDRESS
| Line S00009 Modification History | |
|---|---|
M01 (Added by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 02211 M01S00009.271l750 +++| PRS2 SFA JCB SET JCB ADDRESS 02212 M00S02058.1pp +++| ADN EXQT READ *EXQT* WORD OF JCB 02213 M00S02059.1pp +++| CRD AA 02214 M00S02060.1pp +++| ADN MCMT-EXQT READ *MCMT* WORD OF JCB 02215 M00S02061.1pp +++| CRD BB 02216 M00S02062.1pp +++| ADN MECT-MCMT READ *MECT* WORD OF JCB 02217 M00S02063.1pp +++| CRD EJ 02218 M00S02064.1pp +++| LDD AA 02219 M00S02065.1pp +++| STM TEPB,T1 02220 M00S02066.1pp +++| LDD AA+1 02221 M00S02067.1pp +++| STM TEPB+1*MXJC,T1 02222 M00S02068.1pp +++| LDD AA+2 02223 M00S02069.1pp +++| STM TEPB+2*MXJC,T1 02224 M00S02070.1pp +++| LDD BB 02225 M00S02071.1pp +++| STM TEPB+3*MXJC,T1 02226 M00S02072.1pp +++| LDD BB+2 02227 M00S02073.1pp +++| STM TJAM,T1 02228 M00S02074.1pp +++| LDD EJ+2 02229 M00S02075.1pp +++| STM TJAM+1*MXJC,T1 02230 M00S02076.1pp +++| SOD T1 DECREMENT JCB INDEX 02231 M00S02077.1pp +++| PJN PRS2 IF NOT ALL JCB-S HAVE BEEN PROCESSED 02232 M00S02078.1pp +++| UJP PRSX RETURN
| Line S00010 Modification History | |
|---|---|
M01 (Added by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 02233 M01S00010.271l750 +++| 02234 M01S00011.271l750 +++| 02235 M01S00012.271l750 +++| IFP HERE ASSEMBLE *COMPGFP* REMOTE CODE 02236 M00S02079.1pp +++| SPACE 4,10 02237 M00S02080.1pp +++|* OVERFLOW CHECKS. 02238 M00S02081.1pp +++| 02239 M00S02082.1pp +++| OVERFLOW PPFW,EPFW 02240 M00S02083.1pp +++| TABLES SPACE 4,10 02241 M00S02084.1pp +++|** TEPB - EJT/CP SCHEDULING PARAMETERS. 02242 M00S02085.1pp +++|* ENTRY = 4 WORDS. 02243 M00S02086.1pp +++|* INDEXED BY SERVICE CLASS. 02244 M00S02087.1pp +++|* 02245 M00S02088.1pp +++|*T 12/ IL,12/ LB,12/ UB,12/ CS
Figure
02246 M00S02089.1pp +++|* IL LOWER BOUND SCHEDULING PRIORITY USED FOR INITIAL CM 02247 M00S02090.1pp +++|* SLICE. 02248 M00S02091.1pp +++|* LB LOWER BOUND SCHEDULING PRIORITY OF EXECUTING JOBS. 02249 M00S02092.1pp +++|* UB UPPER BOUND SCHEDULING PRIORITY OF EXECUTING JOBS. 02250 M00S02093.1pp +++|* CS CONTROL POINT SLICE PRIORITY. 02251 M00S02094.1pp +++| 02252 M00S02095.1pp +++| 02253 M00S02096.1pp +++| TEPB EQU * 02254 M00S02097.1pp +++| TEPBE EQU 4 ENTRY LENGTH 02255 M00S02098.1pp +++| TABLES SPACE 4,10 02256 M00S02099.1pp +++|** TJAM - SERVICE CLASS RESOURCE CONSTRAINTS. 02257 M00S02100.1pp +++|* ENTRY = 2 WORDS. 02258 M00S02101.1pp +++|* INDEXED BY SERVICE CLASS. 02259 M00S02102.1pp +++|* 02260 M00S02103.1pp +++|*T 12/ MCJ,12/ MEJ
Figure
02261 M00S02104.1pp +++|* MCJ MAXIMUM CM FL/100B PER JOB OF SERVICE CLASS. 02262 M00S02105.1pp +++|* MEJ MAXIMUM ECS FL/100B PER JOB OF SERVICE CLASS. 02263 M00S02106.1pp +++| 02264 M00S02107.1pp +++| 02265 M00S02108.1pp +++| TJAM EQU TEPB+TEPBE*MXJC 02266 M00S02109.1pp +++| TJAME EQU 2 ENTRY LENGTH 02267 M00S02110.1pp +++| SPACE 4,10 02268 M00S02111.1pp +++| ERRPL TJAM+TJAME*MXJC-EPFW *TJAM* OVERFLOWS PP 02269 M00S02112.1pp +++| 02270 M00S02113.1pp +++| QUAL 02271 M00S02114.1pp +++| TTL 1PP - PERIODIC FUNCTION PROCESSOR. 02272 M00S02115.1pp +++| SPACE 4,10 02273 M00S02116.1pp +++| END
cdc/nos2.source/opl.opl871/deck/1pp.001.txt · Last modified: (external edit)