Seq # *Modification Id* Act
----------------------------+
00001 M00S00001.wrm +++| IDENT WRM,WRM
00002 M00S00002.wrm +++| PERIPH
00003 M00S00003.wrm +++| BASE MIXED
00004 M00S00004.wrm +++| SST RDS
Line S00005 Modification History |
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act
----------------------------+
00005 M01S00005.ns22000 ---|*COMMENT WORM(S) DISPLAY.
Line S00001 Modification History |
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act
----------------------------+
00006 M01S00001.ns22000 +++|*COMMENT WRM - WORM(S) DISPLAY.
Line S00002 Modification History |
M01 (Added by) | ns22000 |
M02 (Removed by) | 281l803 |
Seq # *Modification Id* Act
----------------------------+
00007 M02S00002.281l803 ---| COMMENT COPYRIGHT CONTROL DATA CORP. 1982.
Line S00001 Modification History |
M01 (Added by) | 281l803 |
Seq # *Modification Id* Act
----------------------------+
00008 M01S00001.281l803 +++| COMMENT COPYRIGHT CONTROL DATA SYSTEMS INC. 1992.
00009 M00S00006.wrm +++| TITLE WRM - WORM(S) DISPLAY.
00010 M00S00007.wrm +++| SPACE 4
00011 M00S00008.wrm +++|*** WRM - WORM(S) DISPLAY.
00012 M00S00009.wrm +++|* AUTHOR UNKNOWN.
00013 M00S00010.wrm +++|* DISASSEMBLED FROM OCTAL AND REVISED - JAN 69. E.W. HOBBS.
00014 M00S00011.wrm +++|* REVISED. E. W. HOBBS. 70/04/21.
00015 M00S00012.wrm +++| SPACE 4
Line S00003 Modification History |
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act
----------------------------+
00016 M01S00003.ns22000 +++|** COMMON DECKS.
00017 M01S00004.ns22000 +++|
00018 M01S00005.ns22000 +++|
00019 M00S00013.wrm +++|*CALL COMDMAC
00020 M00S00014.wrm +++|*CALL COMPMAC
Line S00001 Modification History |
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act
----------------------------+
00021 M01S00001.242l642 +++|*CALL COMSCPS
00022 M00S00015.wrm +++| SPACE 4
Line S00016 Modification History |
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act
----------------------------+
00023 M01S00016.ns22000 ---|**** DIRECT LOCATION ASSIGNMENTS -
Line S00006 Modification History |
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act
----------------------------+
00024 M01S00006.ns22000 +++|**** DIRECT LOCATION ASSIGNMENTS.
00025 M00S00017.wrm +++|
00026 M00S00018.wrm +++| NC EQU 15 NUMBER OF CP-S (FOR *COMDSYS*)
00027 M00S00019.wrm +++| XC EQU 16 X - COORDINATE
00028 M00S00020.wrm +++| YC EQU 17 Y - COORDINATE
00029 M00S00021.wrm +++| AB EQU 20 - 24 CM WORD BUFFER (5 LOC)
00030 M00S00022.wrm +++| I1 EQU 25 INDEX
00031 M00S00023.wrm +++| I2 EQU 26 INDEX
Line S00024 Modification History |
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act
----------------------------+
00032 M01S00024.ns22000 ---| EQ EQU 27 EQUIPMENT NUMBER
Line S00007 Modification History |
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act
----------------------------+
00033 M01S00007.ns22000 +++| EQ EQU 27 EST ORDINAL
00034 M00S00025.wrm +++| DC EQU 30 DELAY COUNTER
00035 M00S00026.wrm +++| PM EQU 32 PROGRAM JUMP ADDRESS
00036 M00S00027.wrm +++| PI EQU 33 PROGRAM INDEX
00037 M00S00028.wrm +++| CT EQU 34 - 37 PASS COUNTERS
00038 M00S00029.wrm +++|
Line S00030 Modification History |
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act
----------------------------+
00039 M01S00030.ns22000 ---|** ASSEMBLY CONSTANTS -
Line S00008 Modification History |
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act
----------------------------+
00040 M01S00008.ns22000 +++|** ASSEMBLY CONSTANTS.
00041 M00S00031.wrm +++|
00042 M00S00032.wrm +++| NAME MICRO 1,, WORMS
00043 M00S00033.wrm +++| CH EQU CHDS DISPLAY CHANNEL
00044 M00S00034.wrm +++| DSCT EQU 0 DISPLAY CYCLE (SET = 0 FOR FULL SPEED)
00045 M00S00035.wrm +++|
00046 M00S00036.wrm +++|****
00047 M00S00037.wrm +++| WRM TITLE WRM - MAIN ROUTINE
00048 M00S00038.wrm +++| ORG PPFW
00049 M00S00039.wrm +++|
Line S00040 Modification History |
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act
----------------------------+
00050 M01S00040.ns22000 ---|** WRM - MAIN ROUTINE
Line S00009 Modification History |
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act
----------------------------+
00051 M01S00009.ns22000 +++|** WRM - MAIN ROUTINE.
00052 M01S00010.ns22000 +++|
00053 M00S00041.wrm +++|
00054 M00S00042.wrm +++| WRM RJM PRS PRESET
00055 M00S00043.wrm +++| WRM1 RJM KBI CHECK KEYBOARD
00056 M00S00044.wrm +++| RJM 0,PM DISPLAY
00057 M00S00045.wrm +++| RJM DEL DELAY
00058 M00S00046.wrm +++| RJM PSS PAUSE FOR SYSTEM
00059 M00S00047.wrm +++| UJN WRM1 LOOP
00060 M00S00048.wrm +++| DEL TITLE UTILITY SUBROUTINES
00061 M00S00049.wrm +++|** DEL - DELAY.
00062 M00S00050.wrm +++|
00063 M00S00051.wrm +++|
00064 M00S00052.wrm +++| DEL SUBR ENTRY/EXIT
00065 M00S00053.wrm +++| LDD DC DELAY
00066 M00S00054.wrm +++| SBN 1
00067 M00S00055.wrm +++| PJN *-1
00068 M00S00056.wrm +++| UJN DELX RETURN
00069 M00S00057.wrm +++| RNG SPACE 4
Line S00058 Modification History |
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act
----------------------------+
00070 M01S00058.ns22000 ---|** RNG - RANDOM NUMBER GENERATOR
Line S00011 Modification History |
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act
----------------------------+
00071 M01S00011.ns22000 +++|** RNG - RANDOM NUMBER GENERATOR.
00072 M00S00059.wrm +++|
00073 M00S00060.wrm +++| RNG SUBR ENTRY/EXIT
00074 M00S00061.wrm +++|
00075 M00S00062.wrm +++| IAN 14 READ CLOCK CHANNEL
00076 M00S00063.wrm +++| LMM RNGB,I1 COMPUTE RANDOM NUMBER
00077 M00S00064.wrm +++| RAM RNGA,I1
00078 M00S00065.wrm +++| SHN 6
00079 M00S00066.wrm +++| RAM RNGB,I1
00080 M00S00067.wrm +++| SHN 6
00081 M00S00068.wrm +++| LMM RNGA,I1
00082 M00S00069.wrm +++| SHN 4
00083 M00S00070.wrm +++| RAM RNGA,I1
00084 M00S00071.wrm +++| UJN RNGX RETURN
00085 M00S00072.wrm +++|
00086 M00S00073.wrm +++| RNGA DATA 6625
00087 M00S00074.wrm +++| DATA 1347
00088 M00S00075.wrm +++| DATA 3141
00089 M00S00076.wrm +++| DATA 1415
00090 M00S00077.wrm +++| DATA 4157
00091 M00S00078.wrm +++| DATA 1514
00092 M00S00079.wrm +++| DATA 7233
00093 M00S00080.wrm +++| RNGB DATA 1015
00094 M00S00081.wrm +++| DATA 6553
00095 M00S00082.wrm +++| DATA 2565
00096 M00S00083.wrm +++| DATA 2761
00097 M00S00084.wrm +++| DATA 3777
00098 M00S00085.wrm +++| DATA 1313
00099 M00S00086.wrm +++| DATA 1133
00100 M00S00087.wrm +++| ALW TITLE GENERATE AND DISPLAY WORM(S)
00101 M00S00088.wrm +++|** ALW - ADVANCE LONG WORM.
00102 M00S00089.wrm +++|
00103 M00S00090.wrm +++| ALW SUBR ENTRY/EXIT
00104 M00S00091.wrm +++| SOM CTRL DECREMENT COUNTER
00105 M00S00092.wrm +++| NJN ALW1 IF NEW RANDOM NUMBER NOT REQUIRED
00106 M00S00093.wrm +++| RJM RNG GENERATE RANDOM NUMBER
00107 M00S00094.wrm +++| LPN 3
00108 M00S00095.wrm +++| SHN 1
00109 M00S00096.wrm +++| ADN 1
00110 M00S00097.wrm +++| STM CTRL
00111 M00S00098.wrm +++| ALW1 LDM RNGA COMPUTE NEW X INCREMENT
00112 M00S00099.wrm +++| STD T6
00113 M00S00100.wrm +++| SHN -10
00114 M00S00101.wrm +++| LPN 14
00115 M00S00102.wrm +++| STD T7
00116 M00S00103.wrm +++| LPN 10 CONVERT TO SYMMETRIC INCREMENT
00117 M00S00104.wrm +++| ZJN ALW2
00118 M00S00105.wrm +++| LDD T7
00119 M00S00106.wrm +++| LMC -10
00120 M00S00107.wrm +++| UJN ALW3
00121 M00S00108.wrm +++|
00122 M00S00109.wrm +++| ALW2 LDD T7
00123 M00S00110.wrm +++| ALW3 ADM TXCL+40 GENERATE NEW X-COORDINATE
00124 M00S00111.wrm +++| STD T7
00125 M00S00112.wrm +++| PJN ALW4
00126 M00S00113.wrm +++| LMC -0
00127 M00S00114.wrm +++| UJN ALW6
00128 M00S00115.wrm +++|
00129 M00S00116.wrm +++| ALW4 ADC -770
00130 M00S00117.wrm +++| MJN ALW5
00131 M00S00118.wrm +++| STD T2
00132 M00S00119.wrm +++| LDC 770
00133 M00S00120.wrm +++| SBD T2
00134 M00S00121.wrm +++| UJN ALW6
00135 M00S00122.wrm +++|
00136 M00S00123.wrm +++| ALW5 LDD T7
00137 M00S00124.wrm +++| ALW6 STD T3
00138 M00S00125.wrm +++| LDD T6 COMPUTE NEW Y INCREMENT
00139 M00S00126.wrm +++| LPN 14
00140 M00S00127.wrm +++| STD T7
00141 M00S00128.wrm +++| LPN 10 CONVERT TO SYMMETRIC INCREMENT
00142 M00S00129.wrm +++| ZJN ALW7
00143 M00S00130.wrm +++| LDD T7
00144 M00S00131.wrm +++| LMC -10
00145 M00S00132.wrm +++| UJN ALW8
00146 M00S00133.wrm +++|
00147 M00S00134.wrm +++| ALW7 LDD T7
00148 M00S00135.wrm +++| ALW8 ADM TYCL+40 GENERATE NEW Y-COORDINATE
00149 M00S00136.wrm +++| STD T7
00150 M00S00137.wrm +++| PJN ALW9
00151 M00S00138.wrm +++| LMC -0
00152 M00S00139.wrm +++| UJN ALW11
00153 M00S00140.wrm +++|
00154 M00S00141.wrm +++| ALW9 ADC -770
00155 M00S00142.wrm +++| MJN ALW10
00156 M00S00143.wrm +++| STD T2
00157 M00S00144.wrm +++| LDC 770
00158 M00S00145.wrm +++| SBD T2
00159 M00S00146.wrm +++| UJN ALW11
00160 M00S00147.wrm +++|
00161 M00S00148.wrm +++| ALW10 LDD T7
00162 M00S00149.wrm +++| ALW11 STD T4
00163 M00S00150.wrm +++| LDD T6
00164 M00S00151.wrm +++| SHN -6
00165 M00S00152.wrm +++| LPN 3
00166 M00S00153.wrm +++| ADN 1
00167 M00S00154.wrm +++| STD CT
00168 M00S00155.wrm +++| LDN 4
00169 M00S00156.wrm +++| STD T2
00170 M00S00157.wrm +++| ALW12 LDM TXCL+34,T2
00171 M00S00158.wrm +++| LMD T3
00172 M00S00159.wrm +++| NJN ALW13
00173 M00S00160.wrm +++| LDM TYCL+34,T2
00174 M00S00161.wrm +++| LMD T4
00175 M00S00162.wrm +++| NJN ALW13
00176 M00S00163.wrm +++| LJM ALWX RETURN
00177 M00S00164.wrm +++|
00178 M00S00165.wrm +++| ALW13 SOD T2
00179 M00S00166.wrm +++| NJN ALW12
00180 M00S00167.wrm +++| LDN 1 SHIFT TABLE DOWN
00181 M00S00168.wrm +++| STD T1
00182 M00S00169.wrm +++| ALW14 LDM TXCL+1,T1
00183 M00S00170.wrm +++| STM TXCL,T1
00184 M00S00171.wrm +++| LDM TYCL+1,T1
00185 M00S00172.wrm +++| STM TYCL,T1
00186 M00S00173.wrm +++| AOD T1
00187 M00S00174.wrm +++| LMN 40
00188 M00S00175.wrm +++| NJN ALW14
00189 M00S00176.wrm +++| LDD T3
00190 M00S00177.wrm +++| STM TXCL+40
00191 M00S00178.wrm +++| LDD T4
00192 M00S00179.wrm +++| STM TYCL+40
00193 M00S00180.wrm +++| LJM ALWX RETURN
00194 M00S00181.wrm +++| ASW SPACE 4
00195 M00S00182.wrm +++|** ASW - ADVANCE SHORT WORM.
00196 M00S00183.wrm +++|
00197 M00S00184.wrm +++| ASW SUBR ENTRY/EXIT
00198 M00S00185.wrm +++| SOM CTRA,I2 DECREMENT COUNTER
00199 M00S00186.wrm +++| NJN ASW1 IF NEW RANDOM NUMBER NOT REQUIRED
00200 M00S00187.wrm +++| RJM RNG GENERATE RANDOM NUMBER
00201 M00S00188.wrm +++| LPN 3
00202 M00S00189.wrm +++| ADN 1
00203 M00S00190.wrm +++| STM CTRA,I2
00204 M00S00191.wrm +++| ASW1 LDM RNGA,I1 COMPUTE NEW X INCREMENT
00205 M00S00192.wrm +++| STD T6
00206 M00S00193.wrm +++| SHN -10
00207 M00S00194.wrm +++| LPN 14
00208 M00S00195.wrm +++| STD T7
00209 M00S00196.wrm +++| LPN 10 CONVERT TO SYMMETRIC INCREMENT
00210 M00S00197.wrm +++| ZJN ASW2
00211 M00S00198.wrm +++| LDD T7
00212 M00S00199.wrm +++| LMC -10
00213 M00S00200.wrm +++| UJN ASW3
00214 M00S00201.wrm +++|
00215 M00S00202.wrm +++| ASW2 LDD T7
00216 M00S00203.wrm +++| ASW3 ADM TXCA+20,I2 GENERATE NEW X-COORDINATE
00217 M00S00204.wrm +++| STD T7
00218 M00S00205.wrm +++| PJN ASW4
00219 M00S00206.wrm +++| LMC -0
00220 M00S00207.wrm +++| UJN ASW6
00221 M00S00208.wrm +++|
00222 M00S00209.wrm +++| ASW4 ADC -770
00223 M00S00210.wrm +++| MJN ASW5
00224 M00S00211.wrm +++| STD T2
00225 M00S00212.wrm +++| LDC 770
00226 M00S00213.wrm +++| SBD T2
00227 M00S00214.wrm +++| UJN ASW6
00228 M00S00215.wrm +++|
00229 M00S00216.wrm +++| ASW5 LDD T7
00230 M00S00217.wrm +++| ASW6 STD T3 COMPUTE NEW Y INCREMENT
00231 M00S00218.wrm +++| LDD T6
00232 M00S00219.wrm +++| LPN 14
00233 M00S00220.wrm +++| STD T7
00234 M00S00221.wrm +++| LPN 10 CONVERT TO SYMMETRIC INCREMENT
00235 M00S00222.wrm +++| ZJN ASW7
00236 M00S00223.wrm +++| LDD T7
00237 M00S00224.wrm +++| LMC -10
00238 M00S00225.wrm +++| UJN ASW8
00239 M00S00226.wrm +++|
00240 M00S00227.wrm +++| ASW7 LDD T7
00241 M00S00228.wrm +++| ASW8 ADM TYCA+20,I2 GENERATE NEW Y-COORDINATE
00242 M00S00229.wrm +++| STD T7
00243 M00S00230.wrm +++| PJN ASW9
00244 M00S00231.wrm +++| LMC -0
00245 M00S00232.wrm +++| UJN ASW11
00246 M00S00233.wrm +++|
00247 M00S00234.wrm +++| ASW9 ADC -770
00248 M00S00235.wrm +++| MJN ASW10
00249 M00S00236.wrm +++| STD T2
00250 M00S00237.wrm +++| LDC 770
00251 M00S00238.wrm +++| SBD T2
00252 M00S00239.wrm +++| UJN ASW11
00253 M00S00240.wrm +++|
00254 M00S00241.wrm +++| ASW10 LDD T7
00255 M00S00242.wrm +++| ASW11 STD T4
00256 M00S00243.wrm +++| LDD T6
00257 M00S00244.wrm +++| SHN -6
00258 M00S00245.wrm +++| LPN 3
00259 M00S00246.wrm +++| ADN 1
00260 M00S00247.wrm +++| STM CT,I1
00261 M00S00248.wrm +++| LDN 4
00262 M00S00249.wrm +++| ADD I2
00263 M00S00250.wrm +++| STD T2
00264 M00S00251.wrm +++| ASW12 LDM TXCA+14,T2
00265 M00S00252.wrm +++| LMD T3
00266 M00S00253.wrm +++| NJN ASW13
00267 M00S00254.wrm +++| LDM TYCA+14,T2
00268 M00S00255.wrm +++| LMD T4
00269 M00S00256.wrm +++| NJN ASW13
00270 M00S00257.wrm +++| LJM ASWX RETURN
00271 M00S00258.wrm +++|
00272 M00S00259.wrm +++| ASW13 SOD T2
00273 M00S00260.wrm +++| SBD I2
00274 M00S00261.wrm +++| NJN ASW12
00275 M00S00262.wrm +++| LDN 1 SHIFT TABLES DOWN
00276 M00S00263.wrm +++| ADD I2
00277 M00S00264.wrm +++| STD T1
00278 M00S00265.wrm +++| ASW14 LDM TXCA+1,T1
00279 M00S00266.wrm +++| STM TXCA,T1
00280 M00S00267.wrm +++| LDM TYCA+1,T1
00281 M00S00268.wrm +++| STM TYCA,T1
00282 M00S00269.wrm +++| AOD T1
00283 M00S00270.wrm +++| SBD I2
00284 M00S00271.wrm +++| LMN 20
00285 M00S00272.wrm +++| NJN ASW14
00286 M00S00273.wrm +++| LDD T3
00287 M00S00274.wrm +++| STM TXCA+20,I2
00288 M00S00275.wrm +++| LDD T4
00289 M00S00276.wrm +++| STM TYCA+20,I2
00290 M00S00277.wrm +++| LJM ASWX RETURN
00291 M00S00278.wrm +++| D1W SPACE 4
00292 M00S00279.wrm +++|** D1W - DISPLAY 1 WORM.
Line S00280 Modification History |
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act
----------------------------+
00293 M01S00280.ns22000 ---|* CALLS DLW, ALW
00294 M01S00281.ns22000 ---|* USES CT
Line S00012 Modification History |
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act
----------------------------+
00295 M01S00012.ns22000 +++|*
00296 M01S00013.ns22000 +++|* CALLS ALW, DLW.
00297 M01S00014.ns22000 +++|*
00298 M01S00015.ns22000 +++|* USES CT.
00299 M00S00282.wrm +++|
00300 M00S00283.wrm +++| D1W SUBR ENTRY/EXIT
00301 M00S00284.wrm +++| LDD DC DELAY
00302 M00S00285.wrm +++| SBN 1
00303 M00S00286.wrm +++| PJN *-1
00304 M00S00287.wrm +++| RJM DLW DISPLAY LONG WORM
00305 M00S00288.wrm +++| SOD CT
00306 M00S00289.wrm +++| NJN D1WX RETURN IF NOT 4TH PASS
00307 M00S00290.wrm +++| RJM ALW ADVANCE LONG WORM
00308 M00S00291.wrm +++| UJN D1WX RETURN
00309 M00S00292.wrm +++| D2W SPACE 4
00310 M00S00293.wrm +++|** D2W - DISPLAY 2 WORMS.
Line S00294 Modification History |
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act
----------------------------+
00311 M01S00294.ns22000 ---|* CALLS DSW, ASW
00312 M01S00295.ns22000 ---|* USES I1, I2, CT, CT+1
Line S00016 Modification History |
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act
----------------------------+
00313 M01S00016.ns22000 +++|*
00314 M01S00017.ns22000 +++|* CALLS ASW, DSW.
00315 M01S00018.ns22000 +++|*
00316 M01S00019.ns22000 +++|* USES I1, I2, CT - CT+1.
00317 M00S00296.wrm +++|
00318 M00S00297.wrm +++| D2W SUBR ENTRY/EXIT
00319 M00S00298.wrm +++| RJM DSW DISPLAY SHORT WORM
00320 M00S00299.wrm +++| SOM CT,I1
00321 M00S00300.wrm +++| NJN D2W1 IF NOT 4TH PASS
00322 M00S00301.wrm +++| RJM ASW ADVANCE SHORT WORM
00323 M00S00302.wrm +++| D2W1 LDD I1 TOGGLE INDICES
00324 M00S00303.wrm +++| LMN 1
00325 M00S00304.wrm +++| STD I1
00326 M00S00305.wrm +++| LDD I2
00327 M00S00306.wrm +++| LMN TXYAL
00328 M00S00307.wrm +++| STD I2
00329 M00S00308.wrm +++| UJN D2WX RETURN
00330 M00S00309.wrm +++| D3W SPACE 4
00331 M00S00310.wrm +++|** D3W - DISPLAY 3 WORMS.
Line S00311 Modification History |
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act
----------------------------+
00332 M01S00311.ns22000 ---|* CALLS DSW, ASW
00333 M01S00312.ns22000 ---|* USES I1, I2, CT - CT+2
Line S00020 Modification History |
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act
----------------------------+
00334 M01S00020.ns22000 +++|*
00335 M01S00021.ns22000 +++|* CALLS ASW, DSW.
00336 M01S00022.ns22000 +++|*
00337 M01S00023.ns22000 +++|* USES I1, I2, CT - CT+2.
00338 M00S00313.wrm +++|
00339 M00S00314.wrm +++| D3W SUBR ENTRY/EXIT
00340 M00S00315.wrm +++| RJM DSW DISPLAY SHORT WORM
00341 M00S00316.wrm +++| SOM CT,I1
00342 M00S00317.wrm +++| NJN D3W1 IF NOT 4TH PASS
00343 M00S00318.wrm +++| RJM ASW ADVANCE SHORT WORM
00344 M00S00319.wrm +++| D3W1 AOD I1 ADVANCE INDICES
00345 M00S00320.wrm +++| SBN 3
00346 M00S00321.wrm +++| MJN D3W2 IF < 3
00347 M00S00322.wrm +++| STD I1 RESET TO 0
00348 M00S00323.wrm +++| STD I2
00349 M00S00324.wrm +++| UJN D3WX RETURN
00350 M00S00325.wrm +++|
00351 M00S00326.wrm +++| D3W2 LDN TXYAL
00352 M00S00327.wrm +++| RAD I2
00353 M00S00328.wrm +++| UJN D3WX RETURN
00354 M00S00329.wrm +++| D4W SPACE 4
00355 M00S00330.wrm +++|** D4W - DISPLAY 4 WORMS.
Line S00331 Modification History |
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act
----------------------------+
00356 M01S00331.ns22000 ---|* CALLS DSW,ASW
00357 M01S00332.ns22000 ---|* USES I1, I2, CT - CT+3
Line S00024 Modification History |
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act
----------------------------+
00358 M01S00024.ns22000 +++|*
00359 M01S00025.ns22000 +++|* CALLS ASW, DSW.
00360 M01S00026.ns22000 +++|*
00361 M01S00027.ns22000 +++|* USES I1, I2, CT - CT+3.
00362 M00S00333.wrm +++|
00363 M00S00334.wrm +++| D4W SUBR ENTRY/EXIT
00364 M00S00335.wrm +++| RJM DSW DISPLAY SHORT WORM
00365 M00S00336.wrm +++| SOM CT,I1
00366 M00S00337.wrm +++| NJN D4W1 IF NOT 4TH PASS
00367 M00S00338.wrm +++| RJM ASW ADVANCE SHORT WORM
00368 M00S00339.wrm +++| D4W1 AOD I1 ADVANCE INDICES
00369 M00S00340.wrm +++| SBN 4
00370 M00S00341.wrm +++| MJN D4W2 IF < 4
00371 M00S00342.wrm +++| STD I1 RESET TO 0
00372 M00S00343.wrm +++| STD I2
00373 M00S00344.wrm +++| UJN D4WX RETURN
00374 M00S00345.wrm +++|
00375 M00S00346.wrm +++| D4W2 LDN TXYAL
00376 M00S00347.wrm +++| RAD I2
00377 M00S00348.wrm +++| UJN D4WX
00378 M00S00349.wrm +++| D5W SPACE 4
00379 M00S00350.wrm +++|** D5W - DISPLAY 5 WORMS.
Line S00351 Modification History |
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act
----------------------------+
00380 M01S00351.ns22000 ---|* CALLS DSW,ASW
00381 M01S00352.ns22000 ---|* USES I1, I2, CT - CT+4
Line S00028 Modification History |
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act
----------------------------+
00382 M01S00028.ns22000 +++|*
00383 M01S00029.ns22000 +++|* CALLS ASW, DSW.
00384 M01S00030.ns22000 +++|*
00385 M01S00031.ns22000 +++|* USES I1, I2, CT - CT+4.
00386 M00S00353.wrm +++|
00387 M00S00354.wrm +++| D5W SUBR ENTRY/EXIT
00388 M00S00355.wrm +++| RJM DSW DISPLAY SHORT WORM
00389 M00S00356.wrm +++| SOM CT,I1
00390 M00S00357.wrm +++| NJN D5W1 IF NOT 4TH PASS
00391 M00S00358.wrm +++| RJM ASW ADVANCE SHORT WORM
00392 M00S00359.wrm +++| D5W1 AOD I1 ADVANCE INDICES
00393 M00S00360.wrm +++| SBN 5
00394 M00S00361.wrm +++| MJN D5W2 IF < 5
00395 M00S00362.wrm +++| STD I1 RESET TO 0
00396 M00S00363.wrm +++| STD I2
00397 M00S00364.wrm +++| UJN D5WX RETURN
00398 M00S00365.wrm +++|
00399 M00S00366.wrm +++| D5W2 LDN TXYAL
00400 M00S00367.wrm +++| RAD I2
00401 M00S00368.wrm +++| UJN D5WX RETURN
00402 M00S00369.wrm +++| D6W SPACE 4
00403 M00S00370.wrm +++|** D6W - DISPLAY 6 SHORT WORMS.
Line S00371 Modification History |
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act
----------------------------+
00404 M01S00371.ns22000 ---|* CALLS DSW,ASW
00405 M01S00372.ns22000 ---|* USES I1, I2, CT - CT+5
Line S00032 Modification History |
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act
----------------------------+
00406 M01S00032.ns22000 +++|*
00407 M01S00033.ns22000 +++|* CALLS ASW, DSW.
00408 M01S00034.ns22000 +++|*
00409 M01S00035.ns22000 +++|* USES I1, I2, CT - CT+5.
00410 M00S00373.wrm +++|
00411 M00S00374.wrm +++| D6W SUBR ENTRY/EXIT
00412 M00S00375.wrm +++| RJM DSW DISPLAY SHORT WORM
00413 M00S00376.wrm +++| SOM CT,I1
00414 M00S00377.wrm +++| NJN D6W1 IF NOT 4TH PASS
00415 M00S00378.wrm +++| RJM ASW ADVANCE SHORT WORM
00416 M00S00379.wrm +++| D6W1 AOD I1 ADVANCE INDICES
00417 M00S00380.wrm +++| SBN 6
00418 M00S00381.wrm +++| MJN D6W2 IF < 6
00419 M00S00382.wrm +++| STD I1 RESET TO 0
00420 M00S00383.wrm +++| STD I2
00421 M00S00384.wrm +++| UJN D6WX RETURN
00422 M00S00385.wrm +++|
00423 M00S00386.wrm +++| D6W2 LDN TXYAL
00424 M00S00387.wrm +++| RAD I2
00425 M00S00388.wrm +++| UJN D6WX RETURN
00426 M00S00389.wrm +++| DLW SPACE 4
Line S00390 Modification History |
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act
----------------------------+
00427 M01S00390.ns22000 ---|** DLW - DISPLAY LONG WORM
00428 M01S00391.ns22000 ---|* CALLS DSZ
00429 M01S00392.ns22000 ---|* USES T3, T4
Line S00036 Modification History |
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act
----------------------------+
00430 M01S00036.ns22000 +++|** DLW - DISPLAY LONG WORM.
00431 M01S00037.ns22000 +++|*
00432 M01S00038.ns22000 +++|* CALLS DSZ.
00433 M01S00039.ns22000 +++|*
00434 M01S00040.ns22000 +++|* USES T3, T4.
00435 M00S00393.wrm +++|
00436 M00S00394.wrm +++| DLW SUBR ENTRY/EXIT
00437 M00S00395.wrm +++| LDN 40
00438 M00S00396.wrm +++| STD T4
00439 M00S00397.wrm +++| DLW1 ADN 1
00440 M00S00398.wrm +++| SHN -1
00441 M00S00399.wrm +++| STD T3
00442 M00S00400.wrm +++| LDM TXCL,T4
00443 M00S00401.wrm +++| ADC 6000
00444 M00S00402.wrm +++| STM DSZB
00445 M00S00403.wrm +++| LDM TYCL,T4
00446 M00S00404.wrm +++| ADC 7000
00447 M00S00405.wrm +++| STM DSZC
00448 M00S00406.wrm +++| RJM DSZ DISPLAY SEGMENT
00449 M00S00407.wrm +++| SOD T4 DECREMENT ELEMENT INDEX
00450 M00S00408.wrm +++| NJN DLW1 LOOP FOR NEXT ELEMENT
00451 M00S00409.wrm +++| LDM TXCL+40
00452 M00S00410.wrm +++| ADC 6000-1
00453 M00S00411.wrm +++| STM DSZB
00454 M00S00412.wrm +++| LDM TYCL+40
00455 M00S00413.wrm +++| ADC 7000
00456 M00S00414.wrm +++| STM DSZC
00457 M00S00415.wrm +++| SOM DSZA CHANGE TO 64 CHAR./LINE
00458 M00S00416.wrm +++| LDN 77 SET REWRITE COUNT
00459 M00S00417.wrm +++| STD T3
00460 M00S00418.wrm +++| RJM DSZ DISPLAY HEAD
00461 M00S00419.wrm +++| AOM DSZA RESTORE 32 CHAR./LINE
00462 M00S00420.wrm +++| LJM DLWX RETURN
00463 M00S00421.wrm +++| DSW SPACE 4
Line S00422 Modification History |
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act
----------------------------+
00464 M01S00422.ns22000 ---|** DSW - DISPLAY SHORT WORM
00465 M01S00423.ns22000 ---|* USES T3, T4
00466 M01S00424.ns22000 ---|* CALLS DSZ
Line S00041 Modification History |
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act
----------------------------+
00467 M01S00041.ns22000 +++|** DSW - DISPLAY SHORT WORM.
00468 M01S00042.ns22000 +++|*
00469 M01S00043.ns22000 +++|* CALLS DSZ.
00470 M01S00044.ns22000 +++|*
00471 M01S00045.ns22000 +++|* USES T3, T4.
00472 M00S00425.wrm +++|
00473 M00S00426.wrm +++| DSW SUBR ENTRY/EXIT
00474 M00S00427.wrm +++| LDN 20
00475 M00S00428.wrm +++| DSW1 ADD I2
00476 M00S00429.wrm +++| STD T4
00477 M00S00430.wrm +++| SBD I2
00478 M00S00431.wrm +++| STD T3
00479 M00S00432.wrm +++| LDM TXCA,T4
00480 M00S00433.wrm +++| ADC 6000
00481 M00S00434.wrm +++| STM DSZB
00482 M00S00435.wrm +++| LDM TYCA,T4
00483 M00S00436.wrm +++| ADC 7000
00484 M00S00437.wrm +++| STM DSZC
00485 M00S00438.wrm +++| RJM DSZ DISPLAY SEGMENT
00486 M00S00439.wrm +++| SOD T4 DECREMENT ELEMENT INDEX
00487 M00S00440.wrm +++| SBD I2
00488 M00S00441.wrm +++| NJN DSW1 LOOP FOR NEXT ELEMENT
00489 M00S00442.wrm +++| LDM TXCA+20,I2
00490 M00S00443.wrm +++| ADC 6000-1
00491 M00S00444.wrm +++| STM DSZB
00492 M00S00445.wrm +++| LDM TYCA+20,I2
00493 M00S00446.wrm +++| ADC 7000
00494 M00S00447.wrm +++| STM DSZC
00495 M00S00448.wrm +++| SOM DSZA CHANGE TO 64 CHAR./LINE
00496 M00S00449.wrm +++| LDN 77 SET REWRITE COUNT
00497 M00S00450.wrm +++| STD T3
00498 M00S00451.wrm +++| RJM DSZ DISPLAY HEAD
00499 M00S00452.wrm +++| AOM DSZA RESTORE 32 CHAR./LINE
00500 M00S00453.wrm +++| LJM DSWX RETURN
00501 M00S00454.wrm +++| DSZ TITLE DISPLAY SUBROUTINES
00502 M00S00455.wrm +++|** DSZ - DISPLAY ZERO.
Line S00456 Modification History |
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act
----------------------------+
00503 M01S00456.ns22000 ---|* ENTRY (T3) = REWRITE COUNT
00504 M01S00457.ns22000 ---|* USES T3
Line S00046 Modification History |
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act
----------------------------+
00505 M01S00046.ns22000 +++|*
00506 M01S00047.ns22000 +++|* ENTRY (T3) = REWRITE COUNT.
00507 M01S00048.ns22000 +++|*
00508 M01S00049.ns22000 +++|* USES T3.
00509 M00S00458.wrm +++|
00510 M00S00459.wrm +++| DSZ SUBR ENTRY/EXIT
00511 M00S00460.wrm +++| DSZ1 FNC 7001,CH SELECT WRITE LEFT SCREEN
00512 M00S00461.wrm +++| DSZA EQU *-1
00513 M00S00462.wrm +++| ACN CH
00514 M00S00463.wrm +++| DSZ2 LDN 3 DISPLAY *0*
00515 M00S00464.wrm +++| OAM DSZB,CH
00516 M00S00465.wrm +++| SOD T3 DECREMENT REWRITE COUNT
00517 M00S00466.wrm +++| PJN DSZ2 LOOP TO INTENSIFY
00518 M00S00467.wrm +++| DCN CH
00519 M00S00468.wrm +++| UJN DSZX RETURN
00520 M00S00469.wrm +++|
00521 M00S00470.wrm +++| DSZB DATA 6347
00522 M00S00471.wrm +++| DSZC DATA 7741
00523 M00S00472.wrm +++| DATA L*0*
00524 M00S00473.wrm +++| KBI SPACE 4
00525 M00S00474.wrm +++|** KBI - KEYBOARD INPUT AND INTERPRETATION.
00526 M00S00475.wrm +++|
00527 M00S00476.wrm +++| KBI SUBR ENTRY/EXIT
00528 M00S00477.wrm +++| LDD CP CHECK ROLLOUT FLAG
00529 M00S00478.wrm +++| ADN STSW
00530 M00S00479.wrm +++| CRD CM
00531 M00S00480.wrm +++| LDD CM+2
00532 M00S00481.wrm +++| LPN 1
00533 M00S00482.wrm +++| NJN DRP IF ROLLOUT FLAG SET
00534 M00S00483.wrm +++| FNC 7020,CH SELECT KEYBOARD INPUT
00535 M00S00484.wrm +++| ACN CH
00536 M00S00485.wrm +++| IAN CH
00537 M00S00486.wrm +++| DCN CH
00538 M00S00487.wrm +++| ZJN KBIX RETURN IF NO INPUT
00539 M00S00488.wrm +++| SBN 1RD
00540 M00S00489.wrm +++| NJN KBI1 IF NOT +D+
00541 M00S00490.wrm +++| DRP RJM DDS DROP DISPLAY
00542 M00S00491.wrm +++| DPP MONITOR DPPM DROP PP
00543 M00S00492.wrm +++| LJM PPR EXIT TO PP RESIDENT
00544 M00S00493.wrm +++|
00545 M00S00494.wrm +++| KBI1 SBN 1RH-1RD
00546 M00S00495.wrm +++| NJN KBI3 IF NOT +H+
00547 M00S00496.wrm +++| RJM DDS DROP DISPLAY
00548 M00S00497.wrm +++| RJM RDS REQUEST DISPLAY
00549 M00S00498.wrm +++| RJM MDC MODIFY CHANNELS
00550 M00S00499.wrm +++| KBI2 LDN 4 RESET COUNTER
00551 M00S00500.wrm +++| STM CTRA,I2
00552 M00S00501.wrm +++| STM CTRL
00553 M00S00502.wrm +++| LJM KBIX RETURN
00554 M00S00503.wrm +++|
00555 M00S00504.wrm +++| KBI3 SBN 1R+-1RH
00556 M00S00505.wrm +++| NJN KBI4 IF NOT *+*
00557 M00S00506.wrm +++| LDN 0 SET 0 DELAY
00558 M00S00507.wrm +++| UJN KBI5
00559 M00S00508.wrm +++|
00560 M00S00509.wrm +++| KBI4 SBN 1R--1R+
00561 M00S00510.wrm +++| NJN KBI6 IF NOT *-*
00562 M00S00511.wrm +++| LDM TDCT,PI SET DELAY
00563 M00S00512.wrm +++| KBI5 STD DC
00564 M00S00513.wrm +++| UJN KBI2
00565 M00S00514.wrm +++|
00566 M00S00515.wrm +++| KBI6 SBN 1R*-1R-
00567 M00S00516.wrm +++| NJN KBI7 IF NOT +*+
00568 M00S00517.wrm +++| RJM HDC HOLD DISPLAY CHANNEL
00569 M00S00518.wrm +++| UJN KBI2
00570 M00S00519.wrm +++|
00571 M00S00520.wrm +++| KBI7 ADN 1R*-1R1
00572 M00S00521.wrm +++| NJN KBI8 IF NOT *1*
00573 M00S00522.wrm +++| LDN 1 SET PROGRAM INDEX
00574 M00S00523.wrm +++| STD PI
00575 M00S00524.wrm +++| LDC D1W SET TO DISPLAY 1 LONG WORM
00576 M00S00525.wrm +++| UJN KBI10
00577 M00S00526.wrm +++|
00578 M00S00527.wrm +++| KBI8 SBN 1R2-1R1
00579 M00S00528.wrm +++| NJN KBI9 IF NOT *2*
00580 M00S00529.wrm +++| LDN 2 SET PROGRAM INDEX
00581 M00S00530.wrm +++| STD PI
00582 M00S00531.wrm +++| LDC D2W SET TO DISPLAY 2 SHORT WORMS
00583 M00S00532.wrm +++| UJN KBI10
00584 M00S00533.wrm +++|
00585 M00S00534.wrm +++| KBI9 SBN 1R3-1R2
00586 M00S00535.wrm +++| NJN KBI12 IF NOT *3*
00587 M00S00536.wrm +++| LDN 3 SET PROGRAM INDEX
00588 M00S00537.wrm +++| STD PI
00589 M00S00538.wrm +++| LDC D3W SET TO DISPLAY 3 SHORT WORMS
00590 M00S00539.wrm +++| KBI10 STD PM SET PROGRAM ADDRESS
00591 M00S00540.wrm +++| LDN 0 RESET INDICES
00592 M00S00541.wrm +++| STD I1
00593 M00S00542.wrm +++| STD I2
00594 M00S00543.wrm +++| LDM TDCT,PI SET DELAY
00595 M00S00544.wrm +++| STD DC
00596 M00S00545.wrm +++| KBI11 LJM KBI2
00597 M00S00546.wrm +++|
00598 M00S00547.wrm +++| KBI12 SBN 1R4-1R3
00599 M00S00548.wrm +++| NJN KBI13 IF NOT *4*
00600 M00S00549.wrm +++| LDN 4 SET PROGRAM INDEX
00601 M00S00550.wrm +++| STD PI
00602 M00S00551.wrm +++| LDC D4W SET TO DISPLAY 4 SHORT WORMS
00603 M00S00552.wrm +++| UJN KBI10
00604 M00S00553.wrm +++|
00605 M00S00554.wrm +++| KBI13 SBN 1R5-1R4
00606 M00S00555.wrm +++| NJN KBI14 IF NOT *5*
00607 M00S00556.wrm +++| LDN 5 SET PROGRAM INDEX
00608 M00S00557.wrm +++| STD PI
00609 M00S00558.wrm +++| LDC D5W SET TO DISPLAY 5 SHORT WORMS
00610 M00S00559.wrm +++| UJN KBI10
00611 M00S00560.wrm +++|
00612 M00S00561.wrm +++| KBI14 SBN 1R6-1R5
00613 M00S00562.wrm +++| NJN KBI11 IF NOT *6*
00614 M00S00563.wrm +++| LDN 6 SET PROGRAM INDEX
00615 M00S00564.wrm +++| STD PI
00616 M00S00565.wrm +++| LDC D6W SET TO DISPLAY 6 SHORT WORMS
00617 M00S00566.wrm +++| UJN KBI10
00618 M00S00567.wrm +++| COMDSYS SPACE 4
Line S00050 Modification History |
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act
----------------------------+
00619 M01S00050.ns22000 +++|** COMMON DECKS.
00620 M01S00051.ns22000 +++|
00621 M01S00052.ns22000 +++|
00622 M00S00568.wrm +++|*CALL COMDSYS
00623 M00S00569.wrm +++|*CALL COMDDSP
00624 M00S00570.wrm +++| SPACE 4,10
00625 M00S00571.wrm +++| DIS HERE *COMDSYS* *DISPLA* EXPANSION
00626 M00S00572.wrm +++| MDC SPACE 4
00627 M00S00573.wrm +++|** MDC - MODIFY DISPLAY CHANNELS.
Line S00574 Modification History |
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act
----------------------------+
00628 M01S00574.ns22000 ---|* USES T1,T2.
Line S00053 Modification History |
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act
----------------------------+
00629 M01S00053.ns22000 +++|*
00630 M01S00054.ns22000 +++|* USES T1, T2.
00631 M00S00575.wrm +++|
00632 M00S00576.wrm +++| MDC SUBR ENTRY/EXIT
00633 M00S00577.wrm +++| LDM /COMDDSP/DDSB
00634 M00S00578.wrm +++| STD T2
00635 M00S00579.wrm +++| LMM DSZ1 CHECK CHANNEL
00636 M00S00580.wrm +++| LPN 77
00637 M00S00581.wrm +++| ZJN MDCX RETURN IF SET
00638 M00S00582.wrm +++| LDC DSZ1-1 SET FIRST ADDRESS
00639 M00S00583.wrm +++| STD T1
00640 M00S00584.wrm +++| MDC1 AOD T1 ADVANCE ADDRESS
00641 M00S00585.wrm +++| LMC MDC2
00642 M00S00586.wrm +++| ZJN MDCX RETURN IF COMPLETE
00643 M00S00587.wrm +++| LDI T1 CHECK WORD
00644 M00S00588.wrm +++| LPC 7077
00645 M00S00589.wrm +++| LMC 7000+CH
00646 M00S00590.wrm +++| MDC2 NJN MDC1 IF NOT 7XCH
00647 M00S00591.wrm +++| LDI T1 MODIFY CHANNEL
00648 M00S00592.wrm +++| SCN 77
00649 M00S00593.wrm +++| ADD T2
00650 M00S00594.wrm +++| STI T1
00651 M00S00595.wrm +++| UJN MDC1 LOOP
00652 M00S00596.wrm +++| PRS TITLE PRESET PROGRAM
00653 M00S00597.wrm +++|** PRS - PRESET PROGRAM.
00654 M00S00598.wrm +++|*
00655 M00S00599.wrm +++|* EXIT (NC) = NUMBER OF CP-S.
00656 M00S00600.wrm +++|
00657 M00S00601.wrm +++|
00658 M00S00602.wrm +++| PRS SUBR ENTRY/EXIT
Line S00603 Modification History |
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act
----------------------------+
00659 M01S00603.v23l617 ---| RJM CUA CHECK USER ACCESS
00660 M01S00604.v23l617 ---| ZJN PRS1 IF ACCESS ALLOWED
00661 M01S00605.v23l617 ---| LDC PRSA DAYFILE MESSAGE *ILLEGAL CONTROL CARD.*
00662 M01S00606.v23l617 ---| RJM DFM
00663 M01S00607.v23l617 ---| MONITOR ABTM ABORT JOB
00664 M01S00608.v23l617 ---| LJM PPR EXIT TO PP RESIDENT
00665 M01S00609.v23l617 ---|
Line S00001 Modification History |
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act
----------------------------+
00666 M01S00001.v23l617 +++| CATD CHECK ACCESS TO DISPLAY CONSOLE
00667 M00S00610.wrm +++| PRS1 PAUSE
00668 M00S00611.wrm +++| LDD FL
00669 M00S00612.wrm +++| ZJN PRS3 IF FL = 0
00670 M00S00613.wrm +++| LDD CM+1
00671 M00S00614.wrm +++| ZJN PRS2 IF ERROR FLAG NOT SET
00672 M00S00615.wrm +++| LJM DPP DROP PP
00673 M00S00616.wrm +++|
00674 M00S00617.wrm +++| PRS2 STD CM+2 SET CM REQUEST
00675 M00S00618.wrm +++| MONITOR RSTM REQUEST 0 FL
00676 M00S00619.wrm +++| UJN PRS1
00677 M00S00620.wrm +++|
00678 M00S00621.wrm +++| PRS3 RJM RDS REQUEST DISPLAY
00679 M00S00622.wrm +++| RJM MDC MODIFY CHANNEL INSTRUCTIONS
00680 M00S00623.wrm +++| LDN 0 CLEAR INDICES
00681 M00S00624.wrm +++| STD I1
00682 M00S00625.wrm +++| STD I2
00683 M00S00626.wrm +++| LDN 4 PRESET COUNTERS
00684 M00S00627.wrm +++| STD CT
00685 M00S00628.wrm +++| STD CT+1
00686 M00S00629.wrm +++| STD CT+2
00687 M00S00630.wrm +++| STD CT+3
00688 M00S00631.wrm +++| STD CT+4
00689 M00S00632.wrm +++| STD CT+5
00690 M00S00633.wrm +++| LDC 3777 SET DELAY COUNTER
00691 M00S00634.wrm +++| STD DC
00692 M00S00635.wrm +++| LDC D2W PRESET FOR 2 WORMS
00693 M00S00636.wrm +++| STD PM
00694 M00S00637.wrm +++| LDN 2 SET PROGRAM INDEX
00695 M00S00638.wrm +++| STD PI
00696 M00S00639.wrm +++| LDN NCPL SAVE NUMBER OF CP-S
00697 M00S00640.wrm +++| CRD CM
00698 M00S00641.wrm +++| AOD CM+1
00699 M00S00642.wrm +++| STD NC
00700 M00S00643.wrm +++| LJM PRSX RETURN
Line S00644 Modification History |
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act
----------------------------+
00701 M01S00644.v23l617 ---|
00702 M01S00645.v23l617 ---| PRSA DATA C*ILLEGAL CONTROL CARD.*
00703 M00S00646.wrm +++| SPACE 4
Line S00055 Modification History |
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act
----------------------------+
00704 M01S00055.ns22000 +++|** COMMON DECKS.
00705 M01S00056.ns22000 +++|
00706 M01S00057.ns22000 +++|
00707 M00S00647.wrm +++|*CALL COMPCUA
00708 M00S00648.wrm +++| TDCT TITLE TABLES
00709 M00S00649.wrm +++|** TDCT - TABLE OF DELAY COUNTS.
00710 M00S00650.wrm +++|
00711 M00S00651.wrm +++| TDCT DATA 0
00712 M00S00652.wrm +++| DATA 3777
00713 M00S00653.wrm +++| DATA 3777
00714 M00S00654.wrm +++| DATA 1777
00715 M00S00655.wrm +++| DATA 777
00716 M00S00656.wrm +++| DATA 0
00717 M00S00657.wrm +++| DATA 0
00718 M00S00658.wrm +++| TDCTL EQU *-TDCT
00719 M00S00659.wrm +++| CTRA SPACE 4
00720 M00S00660.wrm +++|** TABLES OF X/Y COORDINATES.
Line S00661 Modification History |
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act
----------------------------+
00721 M01S00661.ns22000 ---|* NOTE:THE INITIAL ENTRIES SHOULD ALL BE ODD TO PREVENT
00722 M01S00662.ns22000 ---|* THE WORM FROM WORKING ITSELF INTO A CORNER.
Line S00058 Modification History |
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act
----------------------------+
00723 M01S00058.ns22000 +++|*
00724 M01S00059.ns22000 +++|* NOTE THE INITIAL ENTRIES SHOULD ALL BE ODD TO PREVENT
00725 M01S00060.ns22000 +++|* THE WORM FROM WORKING ITSELF INTO A CORNER.
00726 M00S00663.wrm +++|
00727 M00S00664.wrm +++| CTRA DATA 4
00728 M00S00665.wrm +++|
00729 M00S00666.wrm +++| TXCA DATA 0
00730 M00S00667.wrm +++| DATA 353
00731 M00S00668.wrm +++| DATA 353
00732 M00S00669.wrm +++| DATA 353
00733 M00S00670.wrm +++| DATA 357
00734 M00S00671.wrm +++| DATA 363
00735 M00S00672.wrm +++| DATA 367
00736 M00S00673.wrm +++| DATA 373
00737 M00S00674.wrm +++| DATA 367
00738 M00S00675.wrm +++| DATA 363
00739 M00S00676.wrm +++| DATA 357
00740 M00S00677.wrm +++| DATA 353
00741 M00S00678.wrm +++| DATA 353
00742 M00S00679.wrm +++| DATA 353
00743 M00S00680.wrm +++| DATA 353
00744 M00S00681.wrm +++| DATA 353
00745 M00S00682.wrm +++| DATA 347
00746 M00S00683.wrm +++| TYCA DATA 0
00747 M00S00684.wrm +++| DATA 725
00748 M00S00685.wrm +++| DATA 721
00749 M00S00686.wrm +++| DATA 715
00750 M00S00687.wrm +++| DATA 721
00751 M00S00688.wrm +++| DATA 725
00752 M00S00689.wrm +++| DATA 731
00753 M00S00690.wrm +++| DATA 735
00754 M00S00691.wrm +++| DATA 741
00755 M00S00692.wrm +++| DATA 745
00756 M00S00693.wrm +++| DATA 751
00757 M00S00694.wrm +++| DATA 755
00758 M00S00695.wrm +++| DATA 751
00759 M00S00696.wrm +++| DATA 745
00760 M00S00697.wrm +++| DATA 741
00761 M00S00698.wrm +++| DATA 735
00762 M00S00699.wrm +++| DATA 741
00763 M00S00700.wrm +++| TXYAL EQU *-CTRA
00764 M00S00701.wrm +++|
00765 M00S00702.wrm +++| CTRB DATA 4
00766 M00S00703.wrm +++|
00767 M00S00704.wrm +++| DATA 0
00768 M00S00705.wrm +++| DATA 273
00769 M00S00706.wrm +++| DATA 277
00770 M00S00707.wrm +++| DATA 303
00771 M00S00708.wrm +++| DATA 277
00772 M00S00709.wrm +++| DATA 277
00773 M00S00710.wrm +++| DATA 277
00774 M00S00711.wrm +++| DATA 273
00775 M00S00712.wrm +++| DATA 273
00776 M00S00713.wrm +++| DATA 273
00777 M00S00714.wrm +++| DATA 273
00778 M00S00715.wrm +++| DATA 273
00779 M00S00716.wrm +++| DATA 267
00780 M00S00717.wrm +++| DATA 267
00781 M00S00718.wrm +++| DATA 267
00782 M00S00719.wrm +++| DATA 267
00783 M00S00720.wrm +++| DATA 267
00784 M00S00721.wrm +++| DATA 0
00785 M00S00722.wrm +++| DATA 125
00786 M00S00723.wrm +++| DATA 125
00787 M00S00724.wrm +++| DATA 125
00788 M00S00725.wrm +++| DATA 131
00789 M00S00726.wrm +++| DATA 135
00790 M00S00727.wrm +++| DATA 141
00791 M00S00728.wrm +++| DATA 145
00792 M00S00729.wrm +++| DATA 141
00793 M00S00730.wrm +++| DATA 135
00794 M00S00731.wrm +++| DATA 131
00795 M00S00732.wrm +++| DATA 125
00796 M00S00733.wrm +++| DATA 131
00797 M00S00734.wrm +++| DATA 135
00798 M00S00735.wrm +++| DATA 141
00799 M00S00736.wrm +++| DATA 145
00800 M00S00737.wrm +++| DATA 151
00801 M00S00738.wrm +++|
00802 M00S00739.wrm +++| CTRC DATA 4
00803 M00S00740.wrm +++|
00804 M00S00741.wrm +++| DATA 0
00805 M00S00742.wrm +++| DATA 633
00806 M00S00743.wrm +++| DATA 633
00807 M00S00744.wrm +++| DATA 627
00808 M00S00745.wrm +++| DATA 623
00809 M00S00746.wrm +++| DATA 617
00810 M00S00747.wrm +++| DATA 617
00811 M00S00748.wrm +++| DATA 617
00812 M00S00749.wrm +++| DATA 617
00813 M00S00750.wrm +++| DATA 623
00814 M00S00751.wrm +++| DATA 623
00815 M00S00752.wrm +++| DATA 627
00816 M00S00753.wrm +++| DATA 633
00817 M00S00754.wrm +++| DATA 637
00818 M00S00755.wrm +++| DATA 643
00819 M00S00756.wrm +++| DATA 647
00820 M00S00757.wrm +++| DATA 653
00821 M00S00758.wrm +++| DATA 0
00822 M00S00759.wrm +++| DATA 515
00823 M00S00760.wrm +++| DATA 511
00824 M00S00761.wrm +++| DATA 511
00825 M00S00762.wrm +++| DATA 511
00826 M00S00763.wrm +++| DATA 515
00827 M00S00764.wrm +++| DATA 521
00828 M00S00765.wrm +++| DATA 525
00829 M00S00766.wrm +++| DATA 531
00830 M00S00767.wrm +++| DATA 531
00831 M00S00768.wrm +++| DATA 535
00832 M00S00769.wrm +++| DATA 541
00833 M00S00770.wrm +++| DATA 541
00834 M00S00771.wrm +++| DATA 545
00835 M00S00772.wrm +++| DATA 545
00836 M00S00773.wrm +++| DATA 545
00837 M00S00774.wrm +++| DATA 545
00838 M00S00775.wrm +++|
00839 M00S00776.wrm +++| CTRD DATA 4
00840 M00S00777.wrm +++|
00841 M00S00778.wrm +++| DATA 0
00842 M00S00779.wrm +++| DATA 725
00843 M00S00780.wrm +++| DATA 721
00844 M00S00781.wrm +++| DATA 715
00845 M00S00782.wrm +++| DATA 721
00846 M00S00783.wrm +++| DATA 725
00847 M00S00784.wrm +++| DATA 731
00848 M00S00785.wrm +++| DATA 735
00849 M00S00786.wrm +++| DATA 741
00850 M00S00787.wrm +++| DATA 745
00851 M00S00788.wrm +++| DATA 751
00852 M00S00789.wrm +++| DATA 755
00853 M00S00790.wrm +++| DATA 751
00854 M00S00791.wrm +++| DATA 745
00855 M00S00792.wrm +++| DATA 741
00856 M00S00793.wrm +++| DATA 735
00857 M00S00794.wrm +++| DATA 741
00858 M00S00795.wrm +++| DATA 0
00859 M00S00796.wrm +++| DATA 353
00860 M00S00797.wrm +++| DATA 353
00861 M00S00798.wrm +++| DATA 353
00862 M00S00799.wrm +++| DATA 357
00863 M00S00800.wrm +++| DATA 363
00864 M00S00801.wrm +++| DATA 367
00865 M00S00802.wrm +++| DATA 373
00866 M00S00803.wrm +++| DATA 367
00867 M00S00804.wrm +++| DATA 363
00868 M00S00805.wrm +++| DATA 357
00869 M00S00806.wrm +++| DATA 353
00870 M00S00807.wrm +++| DATA 353
00871 M00S00808.wrm +++| DATA 353
00872 M00S00809.wrm +++| DATA 353
00873 M00S00810.wrm +++| DATA 353
00874 M00S00811.wrm +++| DATA 347
00875 M00S00812.wrm +++|
00876 M00S00813.wrm +++| CTRE DATA 4
00877 M00S00814.wrm +++|
00878 M00S00815.wrm +++| DATA 0
00879 M00S00816.wrm +++| DATA 125
00880 M00S00817.wrm +++| DATA 125
00881 M00S00818.wrm +++| DATA 125
00882 M00S00819.wrm +++| DATA 131
00883 M00S00820.wrm +++| DATA 135
00884 M00S00821.wrm +++| DATA 141
00885 M00S00822.wrm +++| DATA 145
00886 M00S00823.wrm +++| DATA 141
00887 M00S00824.wrm +++| DATA 135
00888 M00S00825.wrm +++| DATA 131
00889 M00S00826.wrm +++| DATA 125
00890 M00S00827.wrm +++| DATA 131
00891 M00S00828.wrm +++| DATA 135
00892 M00S00829.wrm +++| DATA 141
00893 M00S00830.wrm +++| DATA 145
00894 M00S00831.wrm +++| DATA 151
00895 M00S00832.wrm +++| DATA 0
00896 M00S00833.wrm +++| DATA 273
00897 M00S00834.wrm +++| DATA 277
00898 M00S00835.wrm +++| DATA 303
00899 M00S00836.wrm +++| DATA 277
00900 M00S00837.wrm +++| DATA 277
00901 M00S00838.wrm +++| DATA 277
00902 M00S00839.wrm +++| DATA 273
00903 M00S00840.wrm +++| DATA 273
00904 M00S00841.wrm +++| DATA 273
00905 M00S00842.wrm +++| DATA 273
00906 M00S00843.wrm +++| DATA 273
00907 M00S00844.wrm +++| DATA 267
00908 M00S00845.wrm +++| DATA 267
00909 M00S00846.wrm +++| DATA 267
00910 M00S00847.wrm +++| DATA 267
00911 M00S00848.wrm +++| DATA 267
00912 M00S00849.wrm +++|
00913 M00S00850.wrm +++| CTRF DATA 4
00914 M00S00851.wrm +++|
00915 M00S00852.wrm +++| DATA 0
00916 M00S00853.wrm +++| DATA 515
00917 M00S00854.wrm +++| DATA 511
00918 M00S00855.wrm +++| DATA 511
00919 M00S00856.wrm +++| DATA 511
00920 M00S00857.wrm +++| DATA 515
00921 M00S00858.wrm +++| DATA 521
00922 M00S00859.wrm +++| DATA 525
00923 M00S00860.wrm +++| DATA 531
00924 M00S00861.wrm +++| DATA 531
00925 M00S00862.wrm +++| DATA 535
00926 M00S00863.wrm +++| DATA 541
00927 M00S00864.wrm +++| DATA 541
00928 M00S00865.wrm +++| DATA 545
00929 M00S00866.wrm +++| DATA 545
00930 M00S00867.wrm +++| DATA 545
00931 M00S00868.wrm +++| DATA 545
00932 M00S00869.wrm +++| DATA 0
00933 M00S00870.wrm +++| DATA 633
00934 M00S00871.wrm +++| DATA 633
00935 M00S00872.wrm +++| DATA 627
00936 M00S00873.wrm +++| DATA 623
00937 M00S00874.wrm +++| DATA 617
00938 M00S00875.wrm +++| DATA 617
00939 M00S00876.wrm +++| DATA 617
00940 M00S00877.wrm +++| DATA 617
00941 M00S00878.wrm +++| DATA 623
00942 M00S00879.wrm +++| DATA 623
00943 M00S00880.wrm +++| DATA 627
00944 M00S00881.wrm +++| DATA 633
00945 M00S00882.wrm +++| DATA 637
00946 M00S00883.wrm +++| DATA 643
00947 M00S00884.wrm +++| DATA 647
00948 M00S00885.wrm +++| DATA 653
00949 M00S00886.wrm +++|
00950 M00S00887.wrm +++| CTRL DATA 4
00951 M00S00888.wrm +++|
00952 M00S00889.wrm +++| TXCL DATA 0
00953 M00S00890.wrm +++| DATA 273
00954 M00S00891.wrm +++| DATA 277
00955 M00S00892.wrm +++| DATA 303
00956 M00S00893.wrm +++| DATA 277
00957 M00S00894.wrm +++| DATA 277
00958 M00S00895.wrm +++| DATA 277
00959 M00S00896.wrm +++| DATA 273
00960 M00S00897.wrm +++| DATA 273
00961 M00S00898.wrm +++| DATA 273
00962 M00S00899.wrm +++| DATA 273
00963 M00S00900.wrm +++| DATA 273
00964 M00S00901.wrm +++| DATA 267
00965 M00S00902.wrm +++| DATA 267
00966 M00S00903.wrm +++| DATA 267
00967 M00S00904.wrm +++| DATA 267
00968 M00S00905.wrm +++| DATA 267
00969 M00S00906.wrm +++| DATA 273
00970 M00S00907.wrm +++| DATA 273
00971 M00S00908.wrm +++| DATA 273
00972 M00S00909.wrm +++| DATA 273
00973 M00S00910.wrm +++| DATA 277
00974 M00S00911.wrm +++| DATA 277
00975 M00S00912.wrm +++| DATA 277
00976 M00S00913.wrm +++| DATA 273
00977 M00S00914.wrm +++| DATA 273
00978 M00S00915.wrm +++| DATA 273
00979 M00S00916.wrm +++| DATA 277
00980 M00S00917.wrm +++| DATA 303
00981 M00S00918.wrm +++| DATA 307
00982 M00S00919.wrm +++| DATA 313
00983 M00S00920.wrm +++| DATA 317
00984 M00S00921.wrm +++| DATA 323
00985 M00S00922.wrm +++| TYCL DATA 0
00986 M00S00923.wrm +++| DATA 125
00987 M00S00924.wrm +++| DATA 125
00988 M00S00925.wrm +++| DATA 125
00989 M00S00926.wrm +++| DATA 131
00990 M00S00927.wrm +++| DATA 135
00991 M00S00928.wrm +++| DATA 141
00992 M00S00929.wrm +++| DATA 145
00993 M00S00930.wrm +++| DATA 141
00994 M00S00931.wrm +++| DATA 135
00995 M00S00932.wrm +++| DATA 131
00996 M00S00933.wrm +++| DATA 125
00997 M00S00934.wrm +++| DATA 131
00998 M00S00935.wrm +++| DATA 135
00999 M00S00936.wrm +++| DATA 141
01000 M00S00937.wrm +++| DATA 145
01001 M00S00938.wrm +++| DATA 151
01002 M00S00939.wrm +++| DATA 151
01003 M00S00940.wrm +++| DATA 145
01004 M00S00941.wrm +++| DATA 141
01005 M00S00942.wrm +++| DATA 135
01006 M00S00943.wrm +++| DATA 135
01007 M00S00944.wrm +++| DATA 131
01008 M00S00945.wrm +++| DATA 125
01009 M00S00946.wrm +++| DATA 125
01010 M00S00947.wrm +++| DATA 131
01011 M00S00948.wrm +++| DATA 135
01012 M00S00949.wrm +++| DATA 135
01013 M00S00950.wrm +++| DATA 141
01014 M00S00951.wrm +++| DATA 145
01015 M00S00952.wrm +++| DATA 151
01016 M00S00953.wrm +++| DATA 155
01017 M00S00954.wrm +++| DATA 161
01018 M00S00955.wrm +++| SPACE 4
01019 M00S00956.wrm +++| END