Seq # *Modification Id* Act
----------------------------+
| Line S08611 Modification History |
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act
----------------------------+
37108 M01S08611.274l797 +++| UJN WRT8.2
37109 M01S08612.274l797 +++| WRTD EQU *-1
37110 M01S08613.274l797 +++|
37111 M01S08614.274l797 +++|* DELAY 10 MICROSECONDS TO PREVENT A HARDWARE ERROR IN THE
37112 M01S08615.274l797 +++|* CCC. THE DISCONNECT WOULD SOMETIMES CAUSE THE LAST BYTE TO
37113 M01S08616.274l797 +++|* BE LOST.
37114 M01S08617.274l797 +++|
37115 M01S08618.274l797 +++|* LDN 20 (CTS)
37116 M01S08619.274l797 +++| SBN 1
37117 M01S08620.274l797 +++| NJN *-1
37118 M01S08621.274l797 +++| WRT8.2 DCN CH+40
37119 M00S21252.1mt +++| WRT9 STD BT SAVE BYTES REMAINING
37120 M00S21253.1mt +++| LDD MA SEND RESPONSE TO *1MT*
37121 M00S21254.1mt +++| CWD CR
37122 M00S21255.1mt +++| LJM WRT LOOP FOR NEXT BLOCK
37123 M00S21256.1mt +++| TITLE SUBROUTINES.
37124 M00S21257.1mt +++| ADP SPACE 4,10
37125 M00S21258.1mt +++|** ADP - ADVANCE POINTER.
37126 M00S21259.1mt +++|*
37127 M00S21260.1mt +++|* ENTRY (PT - PT+1) = IN POINTER.
37128 M00S21261.1mt +++|* (A) = WORDS TO INCREMENT IN POINTER BY.
37129 M00S21262.1mt +++|*
37130 M00S21263.1mt +++|* EXIT (T4 - T5) = STARTING IN POINTER.
37131 M00S21264.1mt +++|* (PT - PT+1) = UPDATED IN POINTER.
37132 M00S21265.1mt +++|* (T6) = FIRST PART WORD COUNT.
37133 M00S21266.1mt +++|*
37134 M00S21267.1mt +++|* MACROS SADT.
37135 M00S21268.1mt +++|
37136 M00S21269.1mt +++|
37137 M00S21270.1mt +++| ADP SUBR ENTRY/EXIT
37138 M00S21271.1mt +++| STD T6
37139 M00S21272.1mt +++| ADPA UJN ADP2 NOT READ SKIP
37140 M00S21273.1mt +++|* PSN (READ SKIP)
37141 M00S21274.1mt +++| LDD RS
37142 M00S21275.1mt +++| SHN 14
37143 M00S21276.1mt +++| LMD RS+1
37144 M00S21277.1mt +++| SBD T6
37145 M00S21278.1mt +++| PJN ADP1 IF STILL ROOM FOR ENTIRE BLOCK
37146 M00S21279.1mt +++| RAD T6 ADJUST WORD COUNT
37147 M00S21280.1mt +++| LDN 0 SET BUFFER FULL
37148 M00S21281.1mt +++| ADP1 STD RS+1
37149 M00S21282.1mt +++| SHN -14
37150 M00S21283.1mt +++| STD RS
37151 M00S21284.1mt +++| ADP2 LDD PT SAVE IN
37152 M00S21285.1mt +++| STD T4
37153 M00S21286.1mt +++| LDD PT+1
37154 M00S21287.1mt +++| STD T5
37155 M00S21288.1mt +++| LDN 0 PRESET SECOND PART WORD COUNT
37156 M00S21289.1mt +++| STD T7
37157 M00S21290.1mt +++| LDD T6 UPDATE IN
37158 M00S21291.1mt +++| RAD PT+1
37159 M00S21292.1mt +++| SHN -14
37160 M00S21293.1mt +++| RAD PT
37161 M00S21294.1mt +++| SHN 14
37162 M00S21295.1mt +++| LMD PT+1
37163 M00S21296.1mt +++| SADT .LM,C
37164 M00S21297.1mt +++| ADC -* (-LIMIT)
37165 M00S21298.1mt +++| MJN ADPX IF NO WRAP AROUND
37166 M00S21299.1mt +++| STD T7 SET SECOND PART WORD COUNT
37167 M00S21300.1mt +++| SADT .FT
37168 M00S21301.1mt +++| ADC * (FIRST)
37169 M00S21302.1mt +++| STD PT+1
37170 M00S21303.1mt +++| SHN -14
37171 M00S21304.1mt +++| STD PT
37172 M00S21305.1mt +++| LDD T6 RESET FIRST PART WORD COUNT
37173 M00S21306.1mt +++| SBD T7
37174 M00S21307.1mt +++| STD T6
37175 M00S21308.1mt +++| LJM ADPX RETURN
37176 M00S21309.1mt +++| CPD SPACE 4,10
| Line S21310 Modification History |
M01 (Removed by) | 282l826 |
Seq # *Modification Id* Act
----------------------------+
37177 M01S21310.282l826 ---|** CPD - CHECK PP (1MT) DROP OUT.
| Line S01565 Modification History |
M01 (Added by) | 282l826 |
Seq # *Modification Id* Act
----------------------------+
37178 M01S01565.282l826 +++|** CPD - CHECK PP DROP OUT.
37179 M00S21311.1mt +++|*
| Line S21312 Modification History |
M01 (Removed by) | 282l826 |
Seq # *Modification Id* Act
----------------------------+
37180 M01S21312.282l826 ---|* ENTRY (IR+4) = PP INPUT REGISTER ADDRESS.
| Line S01566 Modification History |
M01 (Added by) | 282l826 |
Seq # *Modification Id* Act
----------------------------+
37181 M01S01566.282l826 +++|* ENTRY (IR+4) = *1MT* INPUT REGISTER ADDRESS.
37182 M00S21313.1mt +++|*
37183 M00S21314.1mt +++|* EXIT EXIT TO DPP IF *1MT* GONE.
| Line S01567 Modification History |
M01 (Added by) | 282l826 |
Seq # *Modification Id* Act
----------------------------+
37184 M01S01567.282l826 +++|*
| Line S01568 Modification History |
M01 (Added by) | 282l826 |
M02 (Removed by) | 1mt51 |
Seq # *Modification Id* Act
----------------------------+
37185 M02S01568.1mt51 ---|* USES (CM - CM+4).
| Line S00495 Modification History |
M01 (Added by) | 1mt51 |
Seq # *Modification Id* Act
----------------------------+
37186 M01S00495.1mt51 +++|* USES CM - CM+4.
37187 M00S21315.1mt +++|
37188 M00S21316.1mt +++|
37189 M00S21317.1mt +++| CPD SUBR ENTRY/EXIT
| Line S21318 Modification History |
M01 (Removed by) | 282l826 |
Seq # *Modification Id* Act
----------------------------+
37190 M01S21318.282l826 ---| LDD IR+4
| Line S01569 Modification History |
M01 (Added by) | 282l826 |
Seq # *Modification Id* Act
----------------------------+
37191 M01S01569.282l826 +++| CPDA LDC 0 (*ACPP* ADDRESS)
37192 M01S01570.282l826 +++| CRD CM GET CP ASSIGNMENT
37193 M01S01571.282l826 +++| LDD CM+2
37194 M01S01572.282l826 +++| LMD CP
37195 M01S01573.282l826 +++| NJN CPD1 IF NOT CORRECT CP ASSIGNMENT
37196 M01S01574.282l826 +++| LDD IR+4 GET INPUT REGISTER
37197 M00S21319.1mt +++| CRD CM
| Line S21320 Modification History |
M01 (Removed by) | 282l826 |
Seq # *Modification Id* Act
----------------------------+
37198 M01S21320.282l826 ---| LDD CM
37199 M01S21321.282l826 ---| LMC 2R1M
37200 M01S21322.282l826 ---| NJN CPD1 IF NOT *1M*
37201 M01S21323.282l826 ---| LDD CP
37202 M01S21324.282l826 ---| SHN 5
37203 M01S21325.282l826 ---| LMN 1RT
| Line S01575 Modification History |
M01 (Added by) | 282l826 |
Seq # *Modification Id* Act
----------------------------+
37204 M01S01575.282l826 +++| LDD CM+1
37205 M01S01576.282l826 +++| SCN 77
37206 M00S21326.1mt +++| SHN 6
| Line S21327 Modification History |
M01 (Removed by) | 282l826 |
Seq # *Modification Id* Act
----------------------------+
37207 M01S21327.282l826 ---| LMD CM+1
37208 M01S21328.282l826 ---| NJN CPD1 IF NOT *1MT* AT CORRECT CP
37209 M01S21329.282l826 ---| LDD CM+2
37210 M01S21330.282l826 ---| LPN 37
| Line S01577 Modification History |
M01 (Added by) | 282l826 |
Seq # *Modification Id* Act
----------------------------+
37211 M01S01577.282l826 +++| LMD CM
37212 M01S01578.282l826 +++| LMC 3RT1M
37213 M01S01579.282l826 +++| NJN CPD1 IF NOT *1MT*
37214 M01S01580.282l826 +++| LDD CM+3
37215 M00S21331.1mt +++| LMD IR+3
| Line S21332 Modification History |
M01 (Removed by) | 252l678 |
Seq # *Modification Id* Act
----------------------------+
37216 M01S21332.252l678 ---| LPN 77
| Line S01897 Modification History |
M01 (Added by) | 252l678 |
Seq # *Modification Id* Act
----------------------------+
37217 M01S01897.252l678 +++| LPN 37
37218 M00S21333.1mt +++| ZJN CPDX IF CORRECT CHANNEL
37219 M00S21334.1mt +++| CPD1 LJM DPP DROP PPU
37220 M00S21335.1mt +++| INM SPACE 4,10
37221 M00S21336.1mt +++|** INM - INSTRUCTION MODIFICATION.
37222 M00S21337.1mt +++|*
37223 M00S21338.1mt +++|* ENTRY (A) = FWA OF INSTRUCTION MODIFICATION LIST.
37224 M00S21339.1mt +++|*
37225 M00S21340.1mt +++|* NOTE FET ADDRESS AND BLOCK SIZE ARE NOT AVAILABLE IN *1LT*.
37226 M00S21341.1mt +++|*
37227 M00S21342.1mt +++|* USES SC, CM+4, CM+5, T2 - CM+3.
37228 M00S21343.1mt +++|
37229 M00S21344.1mt +++|
37230 M00S21345.1mt +++| INM SUBR ENTRY/EXIT
37231 M00S21346.1mt +++| ZJN INMX IF NO MODIFICATIONS
37232 M00S21347.1mt +++| STD SC
37233 M00S21348.1mt +++| INMA LDC * SET FIRST
37234 M00S21349.1mt +++| STD .FT+1
37235 M00S21350.1mt +++| SHN -14
37236 M00S21351.1mt +++| STD .FT
37237 M00S21352.1mt +++| INMB LDC * SET LIMIT
37238 M00S21353.1mt +++| STD .LM+1
37239 M00S21354.1mt +++| SHN -14
37240 M00S21355.1mt +++| STD .LM
37241 M00S21356.1mt +++| SBD .FT
37242 M00S21357.1mt +++| SHN 14
37243 M00S21358.1mt +++| ADD .LM+1
37244 M00S21359.1mt +++| SBD .FT+1
37245 M00S21360.1mt +++| STD .LF+1
37246 M00S21361.1mt +++| SHN -14
37247 M00S21362.1mt +++| STD .LF
37248 M00S21363.1mt +++| INM1 LDI SC
37249 M00S21364.1mt +++| ZJN INMX IF END OF LIST
37250 M00S21365.1mt +++| SHN 21-0
37251 M00S21366.1mt +++| STD T1 SAVE INSTRUCTION ADDRESS
37252 M00S21367.1mt +++| SHN -21
37253 M00S21368.1mt +++| SHN 1 COMPLEMENT FLAG * 2
37254 M00S21369.1mt +++| LMC UJNI+3
37255 M00S21370.1mt +++| STM INMC
37256 M00S21371.1mt +++| LDI T1 PRESERVE INSTRUCTION OP CODE
37257 M00S21372.1mt +++| SCN 77
37258 M00S21373.1mt +++| STI T1
37259 M00S21374.1mt +++| LDM 1,SC EXTRACT DIRECT CELL TO REFERENCE
37260 M00S21375.1mt +++| SHN 14
37261 M00S21376.1mt +++| STD CM+4
37262 M00S21377.1mt +++| SCN 77 CLEAR DIRECT CELL ADDRESS
37263 M00S21378.1mt +++| SHN 3 EXTRACT BIAS
37264 M00S21379.1mt +++| STD CM+5
37265 M00S21380.1mt +++| SCN 7 CLEAR BIAS
37266 M00S21381.1mt +++| ADI CM+4 ADD UPPER PORTION OF VALUE
37267 M00S21382.1mt +++| PJN INM2 IF RELATIVE VALUE DESIRED
37268 M00S21383.1mt +++| SHN 6
37269 M00S21384.1mt +++| SCN 40 CLEAR ABSOLUTE FLAG
37270 M00S21385.1mt +++| ADD RA
37271 M00S21386.1mt +++| SHN 14
37272 M00S21387.1mt +++| INM2 SHN 14
37273 M00S21388.1mt +++| ADM 1,CM+4 ADD LOWER PORTION OF VALUE
37274 M00S21389.1mt +++| ADD CM+5 ADD BIAS
37275 M00S21390.1mt +++|
37276 M00S21391.1mt +++|* NOTE CODE SHOULD NOT BE ADDED IN NEXT THREE LINES.
37277 M00S21392.1mt +++|
37278 M00S21393.1mt +++| INMC UJN 3 COMPLEMENT NOT NEEDED
37279 M00S21394.1mt +++|* UJN 1 COMPLEMENT NEEDED
37280 M00S21395.1mt +++| LMC -0
37281 M00S21396.1mt +++| STM 1,T1 MODIFY INSTRUCTION
37282 M00S21397.1mt +++| SHN -14
37283 M00S21398.1mt +++| RAI T1
37284 M00S21399.1mt +++| LDN 2 INCREMENT TO NEXT ITEM IN LIST
37285 M00S21400.1mt +++| RAD SC
37286 M00S21401.1mt +++| LJM INM1 LOOP
| Line S00496 Modification History |
M01 (Added by) | 1mt51 |
Seq # *Modification Id* Act
----------------------------+
37287 M01S00496.1mt51 +++| ITS SPACE 4,10
37288 M01S00497.1mt51 +++|** ITS - INDICATE *1LT* TRANSFER STARTED.
37289 M01S00498.1mt51 +++|*
37290 M01S00499.1mt51 +++|* ENTRY (A) = BYTE COUNT.
37291 M01S00500.1mt51 +++|*
37292 M01S00501.1mt51 +++|* EXIT (A) = BYTE COUNT.
37293 M01S00502.1mt51 +++|
37294 M01S00503.1mt51 +++|
37295 M01S00504.1mt51 +++| ITS SUBR ENTRY/EXIT
37296 M01S00505.1mt51 +++| STD T0 SAVE BYTE COUNT
37297 M01S00506.1mt51 +++| LDD MA INDICATE *1LT* TRANSFER STARTED
37298 M01S00507.1mt51 +++| ADN 1
37299 M01S00508.1mt51 +++| CWD ZR
37300 M01S00509.1mt51 +++| LDD T0 RESTORE (A)
37301 M01S00510.1mt51 +++| UJN ITSX RETURN
37302 M00S21402.1mt +++| OPA SPACE 4,10
| Line S21403 Modification History |
M01 (Removed by) | 1mt51 |
Seq # *Modification Id* Act
----------------------------+
37303 M01S21403.1mt51 ---|** OPA - OUTPUT DATA TO ATS UNIT.
| Line S00511 Modification History |
M01 (Added by) | 1mt51 |
Seq # *Modification Id* Act
----------------------------+
37304 M01S00511.1mt51 +++|** OPA - OUTPUT DATA TO ATS UNIT (NON-CYBER 180).
37305 M00S21404.1mt +++|*
37306 M00S21405.1mt +++|* ENTRY (A) = NUMBER OF BYTES TO OUTPUT.
37307 M00S21406.1mt +++|*
37308 M00S21407.1mt +++|* EXIT (A) = BYTES REMAINING IF INCOMPLETE TRANSFER.
37309 M00S21408.1mt +++|
37310 M00S21409.1mt +++|
37311 M00S21410.1mt +++| OPA SUBR ENTRY/EXIT
37312 M00S21411.1mt +++| AJM *,CH WAIT FOR *1MT* TO OUTPUT CHUNK
37313 M00S21412.1mt +++| PSN DELAY TO ALLOW *1MT* TO REACTIVE CHANNEL
37314 M00S21413.1mt +++| PSN
37315 M00S21414.1mt +++| OAM BUFB,CH OUTPUT DATA
37316 M00S21415.1mt +++| FJM *,CH
37317 M00S21416.1mt +++| DCN CH+40 INDICATE TO *1MT* TO RESUME OUTPUT
37318 M00S21417.1mt +++| NJN OPAX IF INCOMPLETE TRANSFER
37319 M00S21418.1mt +++| ACN CH
37320 M00S21419.1mt +++| UJN OPAX RETURN
37321 M00S21420.1mt +++| OPD SPACE 4,10
| Line S21421 Modification History |
M01 (Removed by) | 1mt51 |
Seq # *Modification Id* Act
----------------------------+
37322 M01S21421.1mt51 ---|** OPD - OUTPUT DATA.
| Line S00512 Modification History |
M01 (Added by) | 1mt51 |
Seq # *Modification Id* Act
----------------------------+
37323 M01S00512.1mt51 +++|** OPD - OUTPUT DATA TO MTS UNIT (NON-CYBER 180).
37324 M00S21422.1mt +++|*
37325 M00S21423.1mt +++|* ENTRY (A) = NUMBER OF BYTES TO OUTPUT.
37326 M00S21424.1mt +++|*
37327 M00S21425.1mt +++|* EXIT (A) = BYTES REMAINING IF INCOMPLETE TRANSFER.
37328 M00S21426.1mt +++|
37329 M00S21427.1mt +++|
37330 M00S21428.1mt +++| OPD2 FJM OPD1,CH IF *1MT* OUTPUTTING DATA
37331 M00S21429.1mt +++| FJM OPD1,CH IF *1MT* OUTPUTTING DATA
37332 M00S21430.1mt +++| FJM OPD1,CH IF *1MT* OUTPUTTING DATA
37333 M00S21431.1mt +++| OAM BUFB,CH OUTPUT DATA
37334 M00S21432.1mt +++|
37335 M00S21433.1mt +++| OPD SUBR ENTRY/EXIT
37336 M00S21434.1mt +++| OPD1 FJM OPD1,CH IF *1MT* OUTPUTTING DATA
37337 M00S21435.1mt +++| FJM OPD1,CH IF *1MT* OUTPUTTING DATA
37338 M00S21436.1mt +++| UJN OPD2
37339 M00S21437.1mt +++| OPI SPACE 4,10
| Line S21438 Modification History |
M01 (Removed by) | 1mt51 |
Seq # *Modification Id* Act
----------------------------+
37340 M01S21438.1mt51 ---|** OPI - OUTPUT DATA FROM IOU.
| Line S00513 Modification History |
M01 (Added by) | 1mt51 |
Seq # *Modification Id* Act
----------------------------+
37341 M01S00513.1mt51 +++|** OPI - OUTPUT DATA FROM CYBER 180 IOU.
37342 M00S21439.1mt +++|*
37343 M00S21440.1mt +++|* ENTRY (A) = NUMBER OF BYTES TO OUTPUT.
37344 M00S21441.1mt +++|*
37345 M00S21442.1mt +++|* EXIT (A) = BYTES REMAINING IF INCOMPLETE TRANSFER.
| Line S00514 Modification History |
M01 (Added by) | 1mt51 |
Seq # *Modification Id* Act
----------------------------+
37346 M01S00514.1mt51 +++|*
37347 M01S00515.1mt51 +++|* CALLS ITS, WTS.
37348 M00S21443.1mt +++|
37349 M00S21444.1mt +++|
37350 M00S21445.1mt +++| OPI SUBR ENTRY/EXIT
| Line S21446 Modification History |
M01 (Removed by) | 1mt51 |
Seq # *Modification Id* Act
----------------------------+
37351 M01S21446.1mt51 ---| OPI1 IJM OPI2,CH IF *1MT* OUTPUT SHORT CHUNK
37352 M01S21447.1mt51 ---| SCF OPI1,CH WAIT FOR *1MT* TO CLEAR FLAG
37353 M01S21448.1mt51 ---| OPI2 OAM BUFB,CH
| Line S00516 Modification History |
M01 (Added by) | 1mt51 |
Seq # *Modification Id* Act
----------------------------+
37354 M01S00516.1mt51 +++| RJM WTS WAIT FOR *1MT* TRANSFER TO START
37355 M01S00517.1mt51 +++| OPI1 IJM OPIX,CH IF *1MT* OUTPUT SHORT CHUNK
37356 M01S00518.1mt51 +++| SCF OPI1,CH WAIT FOR *1MT* TO CLEAR CHANNEL FLAG
37357 M01S00519.1mt51 +++| RJM ITS INDICATE *1LT* TRANSFER STARTED
37358 M01S00520.1mt51 +++| OAM BUFB,CH
37359 M00S21449.1mt +++| NJN OPIX IF INCOMPLETE TRANSFER
| Line S21450 Modification History |
M01 (Removed by) | 1mt51 |
Seq # *Modification Id* Act
----------------------------+
37360 M01S21450.1mt51 ---| CCF *,CH SIGNAL *1MT* TO START OUTPUTTING
| Line S00521 Modification History |
M01 (Added by) | 1mt51 |
Seq # *Modification Id* Act
----------------------------+
37361 M01S00521.1mt51 +++| CCF *,CH SIGNAL *1MT* TO START OUTPUT
37362 M00S21451.1mt +++| UJN OPIX RETURN
37363 M00S21452.1mt +++| OPE SPACE 4,10
| Line S21453 Modification History |
M01 (Removed by) | ns21000 |
Seq # *Modification Id* Act
----------------------------+
37364 M01S21453.ns21000 ---|** OPE - OUTPUT ENDING CHUNK FROM IOU ON CYBER 170-8X5.
| Line S00292 Modification History |
M01 (Added by) | ns21000 |
M02 (Removed by) | 1mt51 |
Seq # *Modification Id* Act
----------------------------+
37365 M02S00292.1mt51 ---|** OPE - OUTPUT ENDING CHUNK FROM IOU ON
37366 M02S00293.1mt51 ---|* CYBER 170-815/825/835/855.
| Line S00522 Modification History |
M01 (Added by) | 1mt51 |
Seq # *Modification Id* Act
----------------------------+
37367 M01S00522.1mt51 +++|** OPE - OUTPUT ENDING CHUNK FROM CYBER 180 IOU.
37368 M00S21454.1mt +++|*
37369 M00S21455.1mt +++|* ENTRY (A) = NUMBER OF BYTES TO OUTPUT.
37370 M00S21456.1mt +++|*
37371 M00S21457.1mt +++|* EXIT (A) = BYTES REMAINING IF INCOMPLETE TRANSFER.
| Line S00523 Modification History |
M01 (Added by) | 1mt51 |
Seq # *Modification Id* Act
----------------------------+
37372 M01S00523.1mt51 +++|*
37373 M01S00524.1mt51 +++|* CALLS ITS, WTS.
37374 M00S21458.1mt +++|
37375 M00S21459.1mt +++|
37376 M00S21460.1mt +++| OPE SUBR ENTRY/EXIT
| Line S21461 Modification History |
M01 (Removed by) | 1mt51 |
Seq # *Modification Id* Act
----------------------------+
37377 M01S21461.1mt51 ---| OPE1 IJM OPEX,CH IF *1MT* OUTPUT SHORT CHUNK
37378 M01S21462.1mt51 ---| SCF OPE1,CH WAIT FOR *1MT* TO COMPLETE OUTPUTTING
| Line S00525 Modification History |
M01 (Added by) | 1mt51 |
Seq # *Modification Id* Act
----------------------------+
37379 M01S00525.1mt51 +++| RJM WTS WAIT FOR *1MT* TRANSFER TO START
37380 M01S00526.1mt51 +++| OPE1 IJM OPE2,CH IF *1MT* OUTPUT SHORT CHUNK
37381 M01S00527.1mt51 +++| SCF OPE1,CH WAIT FOR *1MT* TO CLEAR CHANNEL FLAG
37382 M01S00528.1mt51 +++| RJM ITS INDICATE *1LT* TRANSFER STARTED
37383 M00S21463.1mt +++| OAM BUFB,CH
| Line S00529 Modification History |
M01 (Added by) | 1mt51 |
Seq # *Modification Id* Act
----------------------------+
37384 M01S00529.1mt51 +++| OPE2 CCF *,CH CLEAR CHANNEL FLAG
37385 M00S21464.1mt +++| UJN OPEX RETURN
37386 M00S21465.1mt +++| OPL SPACE 4,10
| Line S21466 Modification History |
M01 (Removed by) | 1mt51 |
Seq # *Modification Id* Act
----------------------------+
37387 M01S21466.1mt51 ---|** OPL - OUTPUT LAST PARTIAL CHUNK TO ATS UNIT.
| Line S00530 Modification History |
M01 (Added by) | 1mt51 |
Seq # *Modification Id* Act
----------------------------+
37388 M01S00530.1mt51 +++|** OPL - OUTPUT LAST PARTIAL CHUNK TO ATS UNIT (NON-CYBER 180).
37389 M00S21467.1mt +++|*
37390 M00S21468.1mt +++|* ENTRY (A) = NUMBER OF BYTES TO OUTPUT.
37391 M00S21469.1mt +++|*
37392 M00S21470.1mt +++|* EXIT (A) = BYTES REMAINING IF INCOMPLETE TRANSFER.
37393 M00S21471.1mt +++|
37394 M00S21472.1mt +++|
37395 M00S21473.1mt +++| OPL SUBR ENTRY/EXIT
37396 M00S21474.1mt +++| AJM *,CH WAIT FOR *1MT* TO OUTPUT CHUNK
37397 M00S21475.1mt +++| PSN DELAY TO ALLOW *1MT* TO REACTIVATE CHANNEL
37398 M00S21476.1mt +++| PSN
37399 M00S21477.1mt +++| OAM BUFB,CH OUTPUT LAST PARTIAL CHUNK
37400 M00S21478.1mt +++| UJN OPLX RETURN
37401 M00S21479.1mt +++| RDA SPACE 4,10
37402 M00S21480.1mt +++|** RDA - READ DATA FROM CENTRAL.
37403 M00S21481.1mt +++|*
37404 M00S21482.1mt +++|* ENTRY (T4 - T5) = IN POINTER.
37405 M00S21483.1mt +++|* (T6) = FIRST PART WORD COUNT.
37406 M00S21484.1mt +++|* (T7) = SECOND PART WORD COUNT.
37407 M00S21485.1mt +++|*
37408 M00S21486.1mt +++|* MACROS SADT.
37409 M00S21487.1mt +++|
37410 M00S21488.1mt +++|
37411 M00S21489.1mt +++| RDA SUBR ENTRY/EXIT
37412 M00S21490.1mt +++| LDD T6
37413 M00S21491.1mt +++| ZJN RDAX IF NO FIRST PART
37414 M00S21492.1mt +++| SHN 2
37415 M00S21493.1mt +++| ADD T6
37416 M00S21494.1mt +++| ADC BUFB
37417 M00S21495.1mt +++| STM RDAA
37418 M00S21496.1mt +++| LDD T4 READ FIRST PART
37419 M00S21497.1mt +++| SHN 6
37420 M00S21498.1mt +++| ADD RA
37421 M00S21499.1mt +++| SHN 6
37422 M00S21500.1mt +++| ADD T5
37423 M00S21501.1mt +++| CRM BUFB,T6
37424 M00S21502.1mt +++| LDD T7
37425 M00S21503.1mt +++| ZJN RDAX IF NO SECOND PART
37426 M00S21504.1mt +++| SADT .FT,,,A
37427 M00S21505.1mt +++| LDC * READ SECOND PART
37428 M00S21506.1mt +++| CRM *,T7
37429 M00S21507.1mt +++| RDAA EQU *-1
37430 M00S21508.1mt +++| UJN RDAX RETURN
37431 M00S21509.1mt +++| WDA SPACE 4,10
37432 M00S21510.1mt +++|** WDA - WRITE DATA TO CENTRAL.
37433 M00S21511.1mt +++|*
37434 M00S21512.1mt +++|* ENTRY (T4 - T5) = IN POINTER.
37435 M00S21513.1mt +++|* (T6) = FIRST PART WORD COUNT.
37436 M00S21514.1mt +++|* (T7) = SECOND PART WORD COUNT.
37437 M00S21515.1mt +++|*
37438 M00S21516.1mt +++|* MACROS SADT.
37439 M00S21517.1mt +++|
37440 M00S21518.1mt +++|
37441 M00S21519.1mt +++| WDA SUBR ENTRY/EXIT
37442 M00S21520.1mt +++| LDD T6
37443 M00S21521.1mt +++| ZJN WDAX IF NO FIRST PART
37444 M00S21522.1mt +++| SHN 2
37445 M00S21523.1mt +++| ADD T6
37446 M00S21524.1mt +++| ADC BUFB
37447 M00S21525.1mt +++| STM WDAA
37448 M00S21526.1mt +++| LDD T4 TRANSFER FIRST PART
37449 M00S21527.1mt +++| SHN 6
37450 M00S21528.1mt +++| ADD RA
37451 M00S21529.1mt +++| SHN 6
37452 M00S21530.1mt +++| ADD T5
37453 M00S21531.1mt +++| CWM BUFB,T6
37454 M00S21532.1mt +++| LDD T7
37455 M00S21533.1mt +++| ZJN WDAX IF NO SECOND PART
37456 M00S21534.1mt +++| SADT .FT,,,A
37457 M00S21535.1mt +++| LDC * TRANSFER SECOND PART
37458 M00S21536.1mt +++| CWM *,T7
37459 M00S21537.1mt +++| WDAA EQU *-1
37460 M00S21538.1mt +++| UJN WDAX RETURN
37461 M00S21539.1mt +++| WSB SPACE 4,10
37462 M00S21540.1mt +++|** WSB - WAIT START OF BLOCK FROM *1MT*.
37463 M00S21541.1mt +++|*
| Line S00531 Modification History |
M01 (Added by) | 1mt51 |
Seq # *Modification Id* Act
----------------------------+
37464 M01S00531.1mt51 +++|* USES CM - CM+4.
37465 M01S00532.1mt51 +++|*
37466 M00S21542.1mt +++|* CALLS CPD, INM.
37467 M00S21543.1mt +++|*
37468 M00S21544.1mt +++|* MACROS PAUSE.
37469 M00S21545.1mt +++|
37470 M00S21546.1mt +++|
37471 M00S21547.1mt +++| WSB SUBR ENTRY/EXIT
37472 M00S21548.1mt +++| WSB1 LDN CMCL
37473 M00S21549.1mt +++| CRD CM
37474 M00S21550.1mt +++| LDD CP
| Line S00006 Modification History |
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act
----------------------------+
37475 M01S00006.271l716 +++| SHN -7
37476 M00S21551.1mt +++| LMD CM
37477 M00S21552.1mt +++| NJN WSB3 IF MOVE FLAG NOT SET FOR THIS CP
37478 M00S21553.1mt +++| LDD IR+4 CHECK IF *1MT* PAUSED
37479 M00S21554.1mt +++| ADN 1
37480 M00S21555.1mt +++| CRD CM
37481 M00S21556.1mt +++| LDD CM
37482 M00S21557.1mt +++| ZJN WSB3 IF NO FUNCTION
37483 M00S21558.1mt +++| SHN 21-10 CHECK STORAGE MOVE ALLOWED (BIT 56)
37484 M00S21559.1mt +++| MJN WSB2 IF STORAGE MOVE ALLOWED
37485 M00S21560.1mt +++| SHN 10-21 RESTORE BYTE TO ORIGINAL POSITION
37486 M00S21561.1mt +++| SBN SMAM
37487 M00S21562.1mt +++| MJN WSB3 IF STORAGE MOVE NOT ALLOWED
37488 M00S21563.1mt +++| SBN CPUM-SMAM
37489 M00S21564.1mt +++| PJN WSB3 IF STORAGE MOVE NOT ALLOWED
37490 M00S21565.1mt +++| WSB2 PAUSE NE
37491 M00S21566.1mt +++| LDC ADDR MODIFY INSTRUCTIONS
37492 M00S21567.1mt +++| RJM INM
37493 M00S21568.1mt +++| WSB3 RJM CPD CHECK IF *1MT* STILL AROUND
37494 M00S21569.1mt +++| LDD MA
37495 M00S21570.1mt +++| CRD CC
37496 M00S21571.1mt +++| LDD CC
37497 M00S21572.1mt +++| LMN 1
37498 M00S21573.1mt +++| NJN WSB4 IF NOT START OF BLOCK
37499 M00S21574.1mt +++| STD CC ACKNOWLEDGE BLOCK START UP
37500 M00S21575.1mt +++| LDD MA
37501 M00S21576.1mt +++| CWD CC
37502 M00S21577.1mt +++| LJM WSBX RETURN
37503 M00S21578.1mt +++|
37504 M00S21579.1mt +++| WSB4 LMN 3&1
37505 M00S21580.1mt +++| NJN WSB5 IF NOT READ SKIP OPERATION
37506 M00S21581.1mt +++| STD CC
37507 M00S21582.1mt +++| STM ADPA ENABLE READ SKIP
37508 M00S21583.1mt +++| LDD MA ACKNOWLEDGE TRANSFER
37509 M00S21584.1mt +++| CWD CC
37510 M00S21585.1mt +++| LDD CC+3 SET AMOUNT OF SPACE IN BUFFER
37511 M00S21586.1mt +++| STD RS
37512 M00S21587.1mt +++| LDD CC+4
37513 M00S21588.1mt +++| STD RS+1
37514 M00S21589.1mt +++| WSB5 LJM WSB1 LOOP
37515 M00S21590.1mt +++|
37516 M00S21591.1mt +++| ADDR TSAD ADDRESS RELOCATION INFORMATION
| Line S00533 Modification History |
M01 (Added by) | 1mt51 |
Seq # *Modification Id* Act
----------------------------+
37517 M01S00533.1mt51 +++| WTS SPACE 4,10
37518 M01S00534.1mt51 +++|** WTS - WAIT FOR *1MT* TRANSFER TO START.
37519 M01S00535.1mt51 +++|*
37520 M01S00536.1mt51 +++|* ENTRY (A) = BYTE COUNT.
37521 M01S00537.1mt51 +++|*
37522 M01S00538.1mt51 +++|* EXIT (A) = BYTE COUNT.
37523 M01S00539.1mt51 +++|*
37524 M01S00540.1mt51 +++|* USES CM - CM+4.
37525 M01S00541.1mt51 +++|*
37526 M01S00542.1mt51 +++|* CALLS CPD.
37527 M01S00543.1mt51 +++|
37528 M01S00544.1mt51 +++|
37529 M01S00545.1mt51 +++| WTS3 LDC * (BYTE COUNT)
37530 M01S00546.1mt51 +++| WTSA EQU *-1
37531 M01S00547.1mt51 +++|
37532 M01S00548.1mt51 +++| WTS SUBR ENTRY/EXIT
37533 M01S00549.1mt51 +++| STM WTSA SAVE BYTE COUNT
37534 M01S00550.1mt51 +++| WTS1 LDD MA CHECK *1MT*/*1LT* INTERLOCK
37535 M01S00551.1mt51 +++| ADN 1
37536 M01S00552.1mt51 +++| CRD CM
37537 M01S00553.1mt51 +++| LDD CM
37538 M01S00554.1mt51 +++| NJN WTS3 IF *1MT* TRANSFER STARTED
37539 M01S00555.1mt51 +++| RJM CPD CHECK IF *1MT* PP DROPPED OUT
37540 M01S00556.1mt51 +++| LDN 24 DELAY 10 MICROSECONDS
37541 M01S00557.1mt51 +++| WTS2 SBN 1
37542 M01S00558.1mt51 +++| NJN WTS2 IF NOT DONE
37543 M01S00559.1mt51 +++| UJN WTS1 CHECK INTERLOCK
37544 M00S21592.1mt +++| SPACE 4,10
37545 M00S21593.1mt +++| BUFFER BUFB
37546 M00S21594.1mt +++| TITLE PRESET.
37547 M00S21595.1mt +++| PRS SPACE 4,10
37548 M00S21596.1mt +++|** PRS - PRESET.
37549 M00S21597.1mt +++|*
37550 M00S21598.1mt +++|* CALLS CPD, INM, MCH.
37551 M00S21599.1mt +++|*
37552 M00S21600.1mt +++|* MACROS CHTL.
37553 M00S21601.1mt +++|
37554 M00S21602.1mt +++|
37555 M00S21603.1mt +++| PRS SUBR ENTRY/EXIT
| Line S01581 Modification History |
M01 (Added by) | 282l826 |
Seq # *Modification Id* Act
----------------------------+
37556 M01S01581.282l826 +++| LDK PPCP
37557 M01S01582.282l826 +++| CRD CM
37558 M01S01583.282l826 +++| LDD IR+4
37559 M01S01584.282l826 +++| SBD CM+4
37560 M01S01585.282l826 +++| SHN PPXES-PPCES SET EXTENDED PP COMMUNICATION BLOCK OFFSET
37561 M01S01586.282l826 +++| STD T1
37562 M01S01587.282l826 +++| LDD CM SET *ACPP* ADDRESS
37563 M01S01588.282l826 +++| SHN 14
37564 M01S01589.282l826 +++| ADD CM+1
37565 M01S01590.282l826 +++| ADD T1
37566 M01S01591.282l826 +++| ADK ACPP
37567 M01S01592.282l826 +++| STM CPDA+1
37568 M01S01593.282l826 +++| SHN -14
37569 M01S01594.282l826 +++| RAM CPDA
37570 M00S21604.1mt +++| RJM CPD CHECK FOR DROP OUT OF *1MT*
37571 M00S21605.1mt +++| LDD IR+4 READ PARAMETERS
37572 M00S21606.1mt +++| ADN 3
37573 M00S21607.1mt +++| CRD CM
37574 M00S21608.1mt +++| LDD CM+1 SET FIRST
37575 M00S21609.1mt +++| RAM INMA
37576 M00S21610.1mt +++| LDD CM+2
37577 M00S21611.1mt +++| STM INMA+1
37578 M00S21612.1mt +++| LDD CM+3 SET LIMIT
37579 M00S21613.1mt +++| RAM INMB
37580 M00S21614.1mt +++| LDD CM+4
37581 M00S21615.1mt +++| STM INMB+1
37582 M00S21616.1mt +++| LDN ZERL SET ACKNOWLEDGE TO *1MT*
37583 M00S21617.1mt +++| CRD ZR
37584 M00S21618.1mt +++| LDD MA SET UP FOR REQUESTS FOR *1MT*
37585 M00S21619.1mt +++| CWD ZR
| Line S00560 Modification History |
M01 (Added by) | 1mt51 |
Seq # *Modification Id* Act
----------------------------+
37586 M01S00560.1mt51 +++| ADN 1 PRESET *1MT*/*1LT* INTERLOCK
37587 M01S00561.1mt51 +++| CWD ZR
37588 M00S21620.1mt +++| LDN 2
37589 M00S21621.1mt +++| STD CR
37590 M00S21622.1mt +++| LDD IR+4 TELL *1MT* THAT *1LT* IS LOADED
37591 M00S21623.1mt +++| ADN 3
37592 M00S21624.1mt +++| CWD ZR
37593 M00S21625.1mt +++| LDD IR+3 SET MTS/ATS CONTROLLER FLAG
37594 M00S21626.1mt +++| SHN 14
37595 M00S21627.1mt +++| STM PRSA
37596 M00S21628.1mt +++| STM PRSB
37597 M00S21629.1mt +++| SHN 6
| Line S21630 Modification History |
M01 (Removed by) | 252l678 |
Seq # *Modification Id* Act
----------------------------+
37598 M01S21630.252l678 ---| LPN 77
| Line S01898 Modification History |
M01 (Added by) | 252l678 |
Seq # *Modification Id* Act
----------------------------+
37599 M01S01898.252l678 +++| LPN 37
37600 M00S21631.1mt +++| STD IR+3
37601 M00S21632.1mt +++| LDC TCHS MODIFY CHANNELS
37602 M00S21633.1mt +++| STD T1
37603 M00S21634.1mt +++| UJN PRS2 ENTER LOOP TO MODIFY INSTRUCTIONS
37604 M00S21635.1mt +++|
37605 M00S21636.1mt +++| PRS1 RAI T2
37606 M00S21637.1mt +++| AOD T1
37607 M00S21638.1mt +++| PRS2 LDI T1 MODIFY CHANNEL INSTRUCTIONS
37608 M00S21639.1mt +++| STD T2
37609 M00S21640.1mt +++| LDD IR+3
37610 M00S21641.1mt +++| CHTL *
37611 M00S21642.1mt +++| SBN CH
37612 M00S21643.1mt +++| NJN PRS1 IF MORE CHANNELS TO MODIFY
37613 M00S21644.1mt +++| LDC ADDR MODIFY INSTRUCTIONS
37614 M00S21645.1mt +++| RJM INM
| Line S21646 Modification History |
M01 (Removed by) | ns21000 |
Seq # *Modification Id* Act
----------------------------+
37615 M01S21646.ns21000 ---| LDN CPUL
37616 M01S21647.ns21000 ---| CRD CM
37617 M01S21648.ns21000 ---| LDD CM+3
37618 M01S21649.ns21000 ---| SHN 21-10
37619 M01S21650.ns21000 ---| MJN PRS3 IF CYBER 170-8X5 IOU
| Line S00294 Modification History |
M01 (Added by) | ns21000 |
M02 (Removed by) | 274l797 |
Seq # *Modification Id* Act
----------------------------+
37620 M02S00294.274l797 ---| LDK MABL
| Line S08622 Modification History |
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act
----------------------------+
37621 M01S08622.274l797 +++| LDD IR+2
37622 M01S08623.274l797 +++| SHN 21-7
37623 M01S08624.274l797 +++| PJN PRS2.1 IF NOT CTS
37624 M01S08625.274l797 +++| LDC LDNI+20 DELAY BEFORE DISCONNECT
37625 M01S08626.274l797 +++| STM WRTD
37626 M01S08627.274l797 +++| PRS2.1 LDK MABL
| Line S00295 Modification History |
M01 (Added by) | ns21000 |
Seq # *Modification Id* Act
----------------------------+
37627 M01S00295.ns21000 +++| CRD CM
37628 M01S00296.ns21000 +++| LDD CM+1
37629 M01S00297.ns21000 +++| SHN -6
37630 M01S00298.ns21000 +++| LPN 41
37631 M01S00299.ns21000 +++| LMN 1
| Line S00300 Modification History |
M01 (Added by) | ns21000 |
M02 (Removed by) | 1mt51 |
Seq # *Modification Id* Act
----------------------------+
37632 M02S00300.1mt51 ---| ZJN PRS3 IF CYBER 170-815/825/835/855 IOU
| Line S00562 Modification History |
M01 (Added by) | 1mt51 |
Seq # *Modification Id* Act
----------------------------+
37633 M01S00562.1mt51 +++| ZJN PRS3 IF CYBER 180 IOU
37634 M00S21651.1mt +++| LDD IR+2
| Line S08628 Modification History |
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act
----------------------------+
37635 M01S08628.274l797 +++| LPN 77
37636 M00S21652.1mt +++| NJN PRS4 IF WRITE
37637 M00S21653.1mt +++| LJM PRS6 PRESET FOR READ
37638 M00S21654.1mt +++|
| Line S21655 Modification History |
M01 (Removed by) | ns21000 |
Seq # *Modification Id* Act
----------------------------+
37639 M01S21655.ns21000 ---| PRS3 LJM PRS9 PRESET CYBER 170-8X5
| Line S00301 Modification History |
M01 (Added by) | ns21000 |
M02 (Removed by) | 1mt51 |
Seq # *Modification Id* Act
----------------------------+
37640 M02S00301.1mt51 ---| PRS3 LJM PRS9 PRESET FOR CYBER 170-815/825/835/855
| Line S00563 Modification History |
M01 (Added by) | 1mt51 |
Seq # *Modification Id* Act
----------------------------+
37641 M01S00563.1mt51 +++| PRS3 LJM PRS9 PRESET FOR CYBER 180
37642 M00S21656.1mt +++|
| Line S21657 Modification History |
M01 (Removed by) | ncccts |
Seq # *Modification Id* Act
----------------------------+
37643 M01S21657.ncccts ---| PRS4 LDC 0
| Line S00036 Modification History |
M01 (Added by) | ncccts |
Seq # *Modification Id* Act
----------------------------+
37644 M01S00036.ncccts +++| PRS4 LDD IR+2
37645 M01S00037.ncccts +++| SHN 21-7
37646 M01S00038.ncccts +++| MJN PRS4.1 IF CTS
37647 M01S00039.ncccts +++| LDC 0
37648 M00S21658.1mt +++| PRSA EQU *-1
37649 M00S21659.1mt +++| SHN 21-4
37650 M00S21660.1mt +++| PJN PRS5 IF MTS CONTROLLER
| Line S21661 Modification History |
M01 (Removed by) | ncccts |
Seq # *Modification Id* Act
----------------------------+
37651 M01S21661.ncccts ---| LDC OPA SET ATS OUTPUT ROUTINE
| Line S00040 Modification History |
M01 (Added by) | ncccts |
Seq # *Modification Id* Act
----------------------------+
37652 M01S00040.ncccts +++| PRS4.1 LDC OPA SET ATS OUTPUT ROUTINE
| Line S21662 Modification History |
M01 (Removed by) | ns2466 |
Seq # *Modification Id* Act
----------------------------+
37653 M01S21662.ns2466 ---| STM WRTA
| Line S00300 Modification History |
M01 (Added by) | ns2466 |
Seq # *Modification Id* Act
----------------------------+
37654 M01S00300.ns2466 +++| STM WRTB
37655 M00S21663.1mt +++| LDC OPL
| Line S21664 Modification History |
M01 (Removed by) | ns2466 |
Seq # *Modification Id* Act
----------------------------+
37656 M01S21664.ns2466 ---| STM WRTB
| Line S00301 Modification History |
M01 (Added by) | ns2466 |
Seq # *Modification Id* Act
----------------------------+
37657 M01S00301.ns2466 +++| STM WRTC
37658 M00S21665.1mt +++| PRS5 LJM PRSX RETURN
37659 M00S21666.1mt +++|
37660 M00S21667.1mt +++| PRS6 LDM DLYA
37661 M00S21668.1mt +++| LPN 10
37662 M00S21669.1mt +++| ZJN PRS7 IF 1X PPU SPEED
37663 M00S21670.1mt +++| LDC LDNI+77 RESET DELAY FOR 2X PPU SPEED
37664 M00S21671.1mt +++| STM REDC
| Line S21672 Modification History |
M01 (Removed by) | ncccts |
Seq # *Modification Id* Act
----------------------------+
37665 M01S21672.ncccts ---| PRS7 LDC 0 CHECK CONTROLLER TYPE
| Line S00041 Modification History |
M01 (Added by) | ncccts |
Seq # *Modification Id* Act
----------------------------+
37666 M01S00041.ncccts +++| PRS7 LDD IR+2
37667 M01S00042.ncccts +++| SHN 21-7
37668 M01S00043.ncccts +++| MJN PRS8.1 IF CTS
37669 M01S00044.ncccts +++| LDC 0 CHECK CONTROLLER TYPE
37670 M00S21673.1mt +++| PRSB EQU *-1
37671 M00S21674.1mt +++| SHN 21-4
37672 M00S21675.1mt +++| PJN PRS5 IF MTS CONTROLLER
| Line S21676 Modification History |
M01 (Removed by) | ncccts |
Seq # *Modification Id* Act
----------------------------+
37673 M01S21676.ncccts ---| LDC NJNI+.RED8-.REDB MODIFY INSTRUCTIONS
| Line S00045 Modification History |
M01 (Added by) | ncccts |
Seq # *Modification Id* Act
----------------------------+
37674 M01S00045.ncccts +++| PRS8.1 LDC NJNI+.RED8-.REDB MODIFY INSTRUCTIONS
37675 M00S21677.1mt +++| STM REDA
37676 M00S21678.1mt +++| LDC UJNI+.RED8-.REDB
37677 M00S21679.1mt +++| STM REDD
37678 M00S21680.1mt +++| LDC UJNI+RED3-REDB
37679 M00S21681.1mt +++| STM REDB
37680 M00S21682.1mt +++| LDC .REDB
| Line S21683 Modification History |
M01 (Removed by) | 1mt51 |
Seq # *Modification Id* Act
----------------------------+
37681 M01S21683.1mt51 ---| STM REDA+2
37682 M01S21684.1mt51 ---| STM REDD+2
| Line S00564 Modification History |
M01 (Added by) | 1mt51 |
Seq # *Modification Id* Act
----------------------------+
37683 M01S00564.1mt51 +++| STM REDF
37684 M01S00565.1mt51 +++| STM REDG
37685 M00S21685.1mt +++| LDN .REDRL-1 MOVE ATS INPUT LOOP
37686 M00S21686.1mt +++| STD T1
37687 M00S21687.1mt +++| PRS8 LDM .REDR,T1
37688 M00S21688.1mt +++| STM .REDA,T1
37689 M00S21689.1mt +++| SOD T1
37690 M00S21690.1mt +++| PJN PRS8 IF MOVE NOT DONE
37691 M00S21691.1mt +++| LDC .REDC MODIFY CHANNELS
37692 M00S21692.1mt +++| RJM MCH
37693 M00S21693.1mt +++| LJM PRSX RETURN
37694 M00S21694.1mt +++|
| Line S21695 Modification History |
M01 (Removed by) | ns21000 |
Seq # *Modification Id* Act
----------------------------+
37695 M01S21695.ns21000 ---|* PRESET FOR CYBER 170-8X5.
| Line S00302 Modification History |
M01 (Added by) | ns21000 |
M02 (Removed by) | 1mt51 |
Seq # *Modification Id* Act
----------------------------+
37696 M02S00302.1mt51 ---|* PRESET FOR CYBER 170-815/825/835/855.
| Line S00566 Modification History |
M01 (Added by) | 1mt51 |
Seq # *Modification Id* Act
----------------------------+
37697 M01S00566.1mt51 +++|* PRESET FOR CYBER 180.
37698 M00S21696.1mt +++|
37699 M00S21697.1mt +++| PRS9 LDC OPI MODIFY INSTRUCTIONS
| Line S21698 Modification History |
M01 (Removed by) | ns2466 |
Seq # *Modification Id* Act
----------------------------+
37700 M01S21698.ns2466 ---| STM WRTA
| Line S00302 Modification History |
M01 (Added by) | ns2466 |
Seq # *Modification Id* Act
----------------------------+
37701 M01S00302.ns2466 +++| STM WRTB
37702 M00S21699.1mt +++| LDC OPE
| Line S21700 Modification History |
M01 (Removed by) | ns2466 |
Seq # *Modification Id* Act
----------------------------+
37703 M01S21700.ns2466 ---| STM WRTB
| Line S00303 Modification History |
M01 (Added by) | ns2466 |
Seq # *Modification Id* Act
----------------------------+
37704 M01S00303.ns2466 +++| STM WRTC
37705 M00S21701.1mt +++| LDC NJNI+RED8.-REDB.
37706 M00S21702.1mt +++| STM REDA
37707 M00S21703.1mt +++| LDC UJNI+RED8.-REDB.
37708 M00S21704.1mt +++| STM REDD
37709 M00S21705.1mt +++| LDC UJNI+RED3-REDB
37710 M00S21706.1mt +++| STM REDB
37711 M00S21707.1mt +++| LDC REDB.
| Line S21708 Modification History |
M01 (Removed by) | 1mt51 |
Seq # *Modification Id* Act
----------------------------+
37712 M01S21708.1mt51 ---| STM REDA+2
37713 M01S21709.1mt51 ---| STM REDD+2
| Line S00567 Modification History |
M01 (Added by) | 1mt51 |
Seq # *Modification Id* Act
----------------------------+
37714 M01S00567.1mt51 +++| STM REDF
37715 M01S00568.1mt51 +++| STM REDG
37716 M00S21710.1mt +++| LDN REDRL.-1 MOVE IOU LOOP
37717 M00S21711.1mt +++| STD T1
37718 M00S21712.1mt +++| PRS10 LDM REDR.,T1
37719 M00S21713.1mt +++| STM .REDA,T1
37720 M00S21714.1mt +++| SOD T1
37721 M00S21715.1mt +++| PJN PRS10 IF MOVE NOT COMPLETE
37722 M00S21716.1mt +++| LDC REDC. MODIFY CHANNELS
37723 M00S21717.1mt +++| RJM MCH
| Line S00304 Modification History |
M01 (Added by) | ns2466 |
Seq # *Modification Id* Act
----------------------------+
37724 M01S00304.ns2466 +++| LDC UJNI+WRT2-WRTA MODIFY *WRTA*
37725 M01S00305.ns2466 +++| STM WRTA
37726 M00S21718.1mt +++| LJM PRSX RETURN
| Line S21719 Modification History |
M01 (Removed by) | 1mt51 |
Seq # *Modification Id* Act
----------------------------+
37727 M01S21719.1mt51 ---|
37728 M01S21720.1mt51 ---|
| Line S00569 Modification History |
M01 (Added by) | 1mt51 |
Seq # *Modification Id* Act
----------------------------+
37729 M01S00569.1mt51 +++| SPACE 4,10
37730 M00S21721.1mt +++| TCHS CHTB CHANNEL TABLE
| Line S00570 Modification History |
M01 (Added by) | 1mt51 |
Seq # *Modification Id* Act
----------------------------+
37731 M01S00570.1mt51 +++| TITLE PRESET SUBROUTINES.
37732 M00S21722.1mt +++| RED SPACE 4,10
| Line S21723 Modification History |
M01 (Removed by) | 1mt51 |
Seq # *Modification Id* Act
----------------------------+
37733 M01S21723.1mt51 ---|** ATS INPUT LOOP.
| Line S00571 Modification History |
M01 (Added by) | 1mt51 |
Seq # *Modification Id* Act
----------------------------+
37734 M01S00571.1mt51 +++|** ATS INPUT LOOP (NON-CYBER 180).
37735 M00S21724.1mt +++|
37736 M00S21725.1mt +++|
37737 M00S21726.1mt +++| .REDR BSS 0
37738 M00S21727.1mt +++| LOC .REDA
37739 M00S21728.1mt +++|
37740 M00S21729.1mt +++| .RED6 AJM *,CH WAIT FOR *1MT* TO DCN CHANNEL
37741 M00S21730.1mt +++| STD BI SAVE BYTES TO INPUT
37742 M00S21731.1mt +++| STD T1
37743 M00S21732.1mt +++| .RED7 IJM RED11,CH IF *1MT* FINISHED INPUT
37744 M00S21733.1mt +++| EJM .RED7,CH IF DATA NOT AVAILABLE
37745 M00S21734.1mt +++| IAM BUFB,CH
37746 M00S21735.1mt +++| DCN CH+40 INDICATE TO *1MT* TO CONTINUE READ
37747 M00S21736.1mt +++| .REDB NJN .RED8 IF END OF BLOCK
37748 M00S21737.1mt +++|* UJN .RED8 (LAST PARTIAL BLOCK BEING READ)
37749 M00S21738.1mt +++| ACN CH
37750 M00S21739.1mt +++| .RED8 STD T1 SAVE BYTES REMAINING
37751 M00S21740.1mt +++| .RED9 IJM RED10,CH IF *1LT* FINISHED INPUT
37752 M00S21741.1mt +++| EJM .RED9,CH IF *1MT* NOT TAKING DATA YET
37753 M00S21742.1mt +++| UJN RED10 COMPUTE WORD COUNT
37754 M00S21743.1mt +++|
37755 M00S21744.1mt +++| LOC *O
37756 M00S21745.1mt +++| .REDRL EQU *-.REDR LENGTH OF ATS INPUT LOOP
37757 M00S21746.1mt +++|
37758 M00S21747.1mt +++| ERRMI .REDAL-.REDRL OVERLAID CODE OVERFLOWED
37759 M00S21748.1mt +++| MCH SPACE 4,10
37760 M00S21749.1mt +++|** MCH - MODIFY CHANNELS.
37761 M00S21750.1mt +++|*
37762 M00S21751.1mt +++|* ENTRY (A) = ADDRESS OF CHANNEL TABLE
37763 M00S21752.1mt +++|*
37764 M00S21753.1mt +++|* USES T1, T2.
37765 M00S21754.1mt +++|*
37766 M00S21755.1mt +++|* MACROS CHTL.
37767 M00S21756.1mt +++|
37768 M00S21757.1mt +++|
37769 M00S21758.1mt +++| MCH1 RAI T2
37770 M00S21759.1mt +++| AOD T1
37771 M00S21760.1mt +++| MCH2 LDI T1
37772 M00S21761.1mt +++| STD T2
37773 M00S21762.1mt +++| LDD IR+3
37774 M00S21763.1mt +++| CHTL *
37775 M00S21764.1mt +++| MCHA SBN CH
37776 M00S21765.1mt +++| NJN MCH1 IF MORE CHANNEL TO MODIFY
37777 M00S21766.1mt +++|
37778 M00S21767.1mt +++| MCH SUBR ENTRY/EXIT
37779 M00S21768.1mt +++| STD T1 SAVE ADDRESS
37780 M00S21769.1mt +++| UJN MCH2 ENTER LOOP TO MODIFY CHANNELS
37781 M00S21770.1mt +++|
37782 M00S21771.1mt +++| .REDC CHTB CHANNEL TABLE FOR ATS INPUT LOOP
37783 M00S21772.1mt +++| RED SPACE 4,10
| Line S21773 Modification History |
M01 (Removed by) | 1mt51 |
Seq # *Modification Id* Act
----------------------------+
37784 M01S21773.1mt51 ---|** IOU INPUT LOOP.
| Line S00572 Modification History |
M01 (Added by) | 1mt51 |
Seq # *Modification Id* Act
----------------------------+
37785 M01S00572.1mt51 +++|** IOU INPUT LOOP (CYBER 180).
37786 M00S21774.1mt +++|
37787 M00S21775.1mt +++| REDR. BSS 0
37788 M00S21776.1mt +++| LOC .REDA
37789 M00S21777.1mt +++| RED6. STD BI SAVE BYTES TO INPUT
37790 M00S21778.1mt +++| STD T1
| Line S00573 Modification History |
M01 (Added by) | 1mt51 |
Seq # *Modification Id* Act
----------------------------+
37791 M01S00573.1mt51 +++| RJM WTS WAIT FOR *1MT* TRANSFER TO START
37792 M00S21779.1mt +++| RED7. IJM RED11,CH IF *1MT* FINISHED INPUT
37793 M00S21780.1mt +++| SCF RED7.,CH WAIT FOR *1MT* TO READ ITS CHUNK
| Line S00574 Modification History |
M01 (Added by) | 1mt51 |
Seq # *Modification Id* Act
----------------------------+
37794 M01S00574.1mt51 +++| RJM ITS INDICATE *1LT* TRANSFER STARTED
37795 M00S21781.1mt +++| IAM BUFB,CH
37796 M00S21782.1mt +++| NJN RED8. IF INCOMPLETE TRANSFER
37797 M00S21783.1mt +++|* UJN RED8. LAST TRANSFER
37798 M00S21784.1mt +++| REDB. EQU *-1
37799 M00S21785.1mt +++| CCF *,CH SIGNAL *1MT* TO CONTINUE INPUT
37800 M00S21786.1mt +++| RED8. STD T1
37801 M00S21787.1mt +++| UJN RED10 COMPUTE WORD COUNT
37802 M00S21788.1mt +++|
37803 M00S21789.1mt +++| LOC *O
37804 M00S21790.1mt +++| REDRL. EQU *-REDR. LENGTH OF IOU INPUT LOOP
37805 M00S21791.1mt +++|
37806 M00S21792.1mt +++| ERRMI .REDAL-REDRL. OVERLAID CODE OVERFLOWED
37807 M00S21793.1mt +++|
37808 M00S21794.1mt +++| CHTL MCHA
37809 M00S21795.1mt +++| REDC. CHTB CHANNEL TABLE FOR IOU INPUT LOOP
37810 M00S21796.1mt +++| SPACE 4,10
37811 M00S21797.1mt +++| TTL 1MT - PPU MAGNETIC TAPE EXECUTIVE.
37812 M00S21798.1mt +++| END