cdc:nos2.source:opl.opl871:deck:dsdi.015
Deck DSDI Part 015
70 Modifications
Listing Sections
- Deck DSDI Start
- Deck DSDI Part 1 (Line 1418)
- Deck DSDI Part 2 (Line 2568)
- Deck DSDI Part 3 (Line 3960)
- Deck DSDI Part 4 (Line 5655)
- Deck DSDI Part 5 (Line 6926)
- Deck DSDI Part 6 (Line 8515)
- Deck DSDI Part 7 (Line 10149)
- Deck DSDI Part 8 (Line 11633)
- Deck DSDI Part 9 (Line 13348)
- Deck DSDI Part 10 (Line 14720)
- Deck DSDI Part 11 (Line 16256)
- Deck DSDI Part 12 (Line 18013)
- Deck DSDI Part 13 (Line 19591)
- Deck DSDI Part 14 (Line 21366)
- Deck DSDI Part 15 (Line 23194)
- Deck DSDI Part 16 (Line 24786)
- Deck DSDI Part 17 (Line 26291)
Source
Seq # *Modification Id* Act ----------------------------+ 23194 M01S18806.ns2647 ---| NZ X1,PPO9 IF PP IDLED 23195 M01S18807.ns2647 ---| SB2 B2+B1 23196 M01S18808.ns2647 ---| NE B2,B6,PPO8 IF NOT THROUGH REGISTER CHECK 23197 M01S18809.ns2647 ---| SA2 =13H PP HUNG 23198 M01S18810.ns2647 ---| EQ PPO10 PRINT MESSAGE 23199 M01S18811.ns2647 ---| 23200 M01S18812.ns2647 ---| PPO9 SA2 =13H PP IDLED 23201 M01S18813.ns2647 ---| PPO10 SB6 12D 23202 M01S18814.ns2647 ---| RJ UPS 23203 M01S18815.ns2647 ---| PRINT CCCH,B7-CCCH 23204 M01S18816.ns2647 ---| PRINT (=2C ) 23205 M01S18817.ns2647 ---| EQ PPO12 EXIT
| Line S00302 Modification History | |
|---|---|
M01 (Added by) | ns2647 |
Seq # *Modification Id* Act ----------------------------+ 23206 M01S00302.ns2647 +++| SX5 X5+B1 ADVANCE BYTE ADDRESS 23207 M01S00303.ns2647 +++| LX0 -1 23208 M01S00304.ns2647 +++| NG X0,PPO2 IF NOT THROUGH READING A REGISTER 23209 M01S00305.ns2647 +++| SB6 B6+B1 STORE REGISTER 23210 M01S00306.ns2647 +++| SA7 B6 23211 M01S00307.ns2647 +++| BX7 X7-X7 CLEAR ASSEMBLY REGISTER 23212 M01S00308.ns2647 +++| SX0 X0+ 23213 M01S00309.ns2647 +++| NZ X0,PPO2 IF NOT THROUGH READING ALL REGISTERS 23214 M01S00310.ns2647 +++| EQ PPO3 CHECK FOR DFT BUFFER 23215 M01S00311.ns2647 +++| 23216 M00S18818.dsdi +++| 23217 M00S18819.dsdi +++| PPOA CON 0 LOGICAL PP NUMBER
| Line S18820 Modification History | |
|---|---|
M01 (Removed by) | ns2647 |
Seq # *Modification Id* Act ----------------------------+ 23218 M01S18820.ns2647 ---| PPOB BSSZ 8 UNPACKED REGISTERS 23219 M01S18821.ns2647 ---| PPOC CON 0 OCTAL/HEX FLAG 23220 M01S18822.ns2647 ---| PPOD CON 0 SAVED RANDOM ADDRESS FOR PP RECORD
| Line S00312 Modification History | |
|---|---|
M01 (Added by) | ns2647 |
Seq # *Modification Id* Act ----------------------------+ 23221 M01S00312.ns2647 +++| PPOB BSS 0 UNPACKED REGISTERS 23222 M01S00313.ns2647 +++| DUP 16,1 23223 M01S00314.ns2647 +++| CON 1S59 23224 M00S18823.dsdi +++| PRS SPACE 4,5 23225 M00S18824.dsdi +++|** PRS - PRESET PROGRAM. 23226 M00S18825.dsdi +++|* 23227 M00S18826.dsdi +++|* USES ALL REGISTERS. 23228 M00S18827.dsdi +++|* 23229 M00S18828.dsdi +++|* CALLS ARG, ZAP. 23230 M00S18829.dsdi +++|* 23231 M00S18830.dsdi +++|* MACROS DATE, REPRIEVE. 23232 M00S18831.dsdi +++| 23233 M00S18832.dsdi +++| 23234 M00S18833.dsdi +++| PRS SUBR 23235 M00S18834.dsdi +++| REPRIEVE RPVB,SET,001 23236 M00S18835.dsdi +++| SX6 A0+ 23237 M00S18836.dsdi +++| SX1 X6-MFL= 23238 M00S18837.dsdi +++| PL X1,PRS0.0 IF SUFFICIENT FIELD LENGTH 23239 M00S18838.dsdi +++| MEMORY CM,,R,MFL=
| Line S18839 Modification History | |
|---|---|
M01 (Removed by) | dsdi91 |
Seq # *Modification Id* Act ----------------------------+ 23240 M01S18839.dsdi91 ---| SA6 MFL= 23241 M01S18840.dsdi91 ---| SX6 X6+77B ROUND UP BY 100B
| Line S00008 Modification History | |
|---|---|
M01 (Added by) | dsdi91 |
Seq # *Modification Id* Act ----------------------------+ 23242 M01S00008.dsdi91 +++| SX6 MFL=+77B ROUND UP BY 100B 23243 M00S18841.dsdi +++| AX6 6 23244 M00S18842.dsdi +++| LX6 6 23245 M00S18843.dsdi +++| PRS0.0 SA6 FN SAVE INITIAL FIELD LENGTH 23246 M00S18844.dsdi +++| SA6 FM SET CURRENT FIELD LENGTH 23247 M00S18845.dsdi +++| SX6 X6-10B 23248 M00S18846.dsdi +++| SA6 F.TEND INITIALIZE TABLE SPACE 23249 M00S18847.dsdi +++| GETPP PRSE,PRSD,PRSC JOBS DEFAULT PRINT INFORMATION 23250 M00S18848.dsdi +++| SA1 =1LS 23251 M00S18849.dsdi +++| SA2 PRSC 23252 M00S18850.dsdi +++| BX2 X1-X2 23253 M00S18851.dsdi +++| NZ X2,PRS0 IF NOT 6 LINES PER INCH (1LS) 23254 M00S18852.dsdi +++| SA1 =1L6 SET 6 LINES PER INCH 23255 M00S18853.dsdi +++| EQ PRS0.1 SET JOBS DEFAULT PRINT DENSITY 23256 M00S18854.dsdi +++| 23257 M00S18855.dsdi +++| PRS0 SA1 =1L8 SET 8 LINES PER INCH 23258 M00S18856.dsdi +++| PRS0.1 BX6 X1 23259 M00S18857.dsdi +++| SA6 PRSB JOBS DEFAULT PRINT DESITY SELECTION
| Line S18858 Modification History | |
|---|---|
M01 (Removed by) | dsdi56 |
Seq # *Modification Id* Act ----------------------------+ 23260 M01S18858.dsdi56 ---| PRS.3 SA1 ACTR
| Line S00257 Modification History | |
|---|---|
M01 (Added by) | dsdi56 |
Seq # *Modification Id* Act ----------------------------+ 23261 M01S00257.dsdi56 +++| SA1 ACTR 23262 M00S18859.dsdi +++| SB4 X1+ ARGUMENT COUNT 23263 M00S18860.dsdi +++| ZR B4,PRS1 IF NO ARGUMENTS 23264 M00S18861.dsdi +++| SB5 PRSA ARGUMENT TABLE ADDRESS 23265 M00S18862.dsdi +++| SA4 ARGR READ FIRST ARGUMENT 23266 M00S18863.dsdi +++| RJ ARG PROCESS COMMAND ARGUMENTS 23267 M00S18864.dsdi +++| NZ X1,ERR1 IF ARGUMENT ERROR 23268 M00S18865.dsdi +++| SA1 F 23269 M00S18866.dsdi +++| ZR X1,ERR1 IF F=0 SPECIFIED 23270 M00S18867.dsdi +++| SA1 BF 23271 M00S18868.dsdi +++| ZR X1,PRS1 IF *B* NOT SPECIFIED 23272 M00S18869.dsdi +++| SA2 B SET BML FILE NAME IN FET 23273 M00S18870.dsdi +++| MX0 -18 23274 M00S18871.dsdi +++| BX6 -X0*X2 23275 M00S18872.dsdi +++| BX6 X1+X6 23276 M00S18873.dsdi +++| SA6 A2 23277 M00S18874.dsdi +++| SA6 EB SET EMPTY BML FILE FLAG 23278 M00S18875.dsdi +++| SA1 BD 23279 M00S18876.dsdi +++| NZ X1,ERR43 IF BINARY DUMP 23280 M00S18877.dsdi +++| PRS1 SA1 ZF 23281 M00S18878.dsdi +++| ZR X1,PRS2 IF *Z* ARGUMENT NOT SELECTED 23282 M00S18879.dsdi +++| SX2 I SET INPUT FET ADDRESS 23283 M00S18880.dsdi +++| SB6 80 SET STRING BUFFER LENGTH 23284 M00S18881.dsdi +++| RJ ZAP PROCESS *Z* ARGUMENT 23285 M00S18882.dsdi +++| PRS2 DATE DATE SET DATE 23286 M00S18883.dsdi +++| SX6 1R. 23287 M00S18884.dsdi +++| SA6 CHAR+80 GUARANTEE TERMINATOR ON DIRECTIVES 23288 M00S18885.dsdi +++| SA3 BD
| Line S18886 Modification History | |
|---|---|
M01 (Removed by) | dsdi81 |
Seq # *Modification Id* Act ----------------------------+ 23289 M01S18886.dsdi81 ---| ZR X3,PRSX IF NOT BINARY DUMP
| Line S00011 Modification History | |
|---|---|
M01 (Added by) | dsdi81 |
Seq # *Modification Id* Act ----------------------------+ 23290 M01S00011.dsdi81 +++| ZR X3,PRS3 IF NOT BINARY DUMP 23291 M00S18887.dsdi +++| SX6 1RX CHANGE CPO DIRECTIVE DEFAULT 23292 M00S18888.dsdi +++| SA1 =10H(DMB MODE) SET MODE IN HEADER 23293 M00S18889.dsdi +++| LX6 59-5 23294 M00S18890.dsdi +++| BX7 X1 23295 M00S18891.dsdi +++| SA6 CO 23296 M00S18892.dsdi +++| SA7 TITL2+2
| Line S00012 Modification History | |
|---|---|
M01 (Added by) | dsdi81 |
Seq # *Modification Id* Act ----------------------------+ 23297 M01S00012.dsdi81 +++| PRS3 SA1 DR 23298 M01S00013.dsdi81 +++| SA2 S 23299 M01S00014.dsdi81 +++| MX3 42 23300 M01S00015.dsdi81 +++| BX6 X3*X1 23301 M01S00016.dsdi81 +++| ZR X6,PRSX IF NO RANDOM FILE NAME SPECIFIED 23302 M01S00017.dsdi81 +++| BX2 -X3*X2 23303 M01S00018.dsdi81 +++| BX6 X6+X2 23304 M01S00019.dsdi81 +++| SX7 -1 23305 M01S00020.dsdi81 +++| SA6 A2 23306 M01S00021.dsdi81 +++| SA7 A1 23307 M00S18893.dsdi +++| JP PRSX EXIT 23308 M00S18894.dsdi +++| 23309 M00S18895.dsdi +++| PRSA BSS 0 COMMAND ARGUMENT TABLE 23310 M00S18896.dsdi +++| I ARG I,I 23311 M00S18897.dsdi +++| F ARG F,F 23312 M00S18898.dsdi +++| L ARG L,L 23313 M00S18899.dsdi +++| B ARG BF,BF
| Line S18900 Modification History | |
|---|---|
M01 (Removed by) | dsdi81 |
Seq # *Modification Id* Act ----------------------------+ 23314 M01S18900.dsdi81 ---| D ARG -=1,DR
| Line S00022 Modification History | |
|---|---|
M01 (Added by) | dsdi81 |
Seq # *Modification Id* Act ----------------------------+ 23315 M01S00022.dsdi81 +++| D ARG =1,DR 23316 M00S18901.dsdi +++| DMB ARG -=1,BD 23317 M00S18902.dsdi +++| NR ARG -=1,RBIA
| Line S00419 Modification History | |
|---|---|
M01 (Added by) | 271l739 |
Seq # *Modification Id* Act ----------------------------+ 23318 M01S00419.271l739 +++| FULL ARG -=1,VE 23319 M00S18903.dsdi +++| PD ARG =0L8,PRSB 23320 M00S18904.dsdi +++| P ARG -=1,PF 23321 M00S18905.dsdi +++| Z ARG -=1,ZF 23322 M00S18906.dsdi +++| VFD 60/0 23323 M00S18907.dsdi +++| 23324 M00S18908.dsdi +++| PRSB CON 0 PRINT DESITY SELECTION 23325 M00S18909.dsdi +++| PRSC CON 0 PRINT DESITY FORMAT CONTROL CHARACTER 23326 M00S18910.dsdi +++| PRSD CON 0 PAGE LINE LIMIT 23327 M00S18911.dsdi +++| PRSE CON 0,0 *GETPP* REPLY BUFFER 23328 M00S18912.dsdi +++| PSM SPACE 4,10 23329 M00S18913.dsdi +++|** PSM - POSITION SIXTY-FOUR BIT MEMORY. 23330 M00S18914.dsdi +++|* 23331 M00S18915.dsdi +++|* ENTRY (B2) = POINTER TO 64-BIT MEMORY ADDRESS. 23332 M00S18916.dsdi +++|* 23333 M00S18917.dsdi +++|* EXIT *NXB* SET TO GET NEXT BYTE. 23334 M00S18918.dsdi +++|*
| Line S18919 Modification History | |
|---|---|
M01 (Removed by) | 271l739 |
Seq # *Modification Id* Act ----------------------------+ 23335 M01S18919.271l739 ---|* USES A - 1, 3, 6. 23336 M01S18920.271l739 ---|* X - 1, 2, 3, 6. 23337 M01S18921.271l739 ---|* 23338 M01S18922.271l739 ---|* CALLS NXB, PDF.
| Line S00420 Modification History | |
|---|---|
M01 (Added by) | 271l739 |
Seq # *Modification Id* Act ----------------------------+ 23339 M01S00420.271l739 +++|* USES X - 1, 2, 3, 6, 7. 23340 M01S00421.271l739 +++|* A - 1, 2, 3, 6, 7. 23341 M01S00422.271l739 +++|* 23342 M01S00423.271l739 +++|* CALLS FBP, ISM. 23343 M00S18923.dsdi +++| 23344 M00S18924.dsdi +++| 23345 M00S18925.dsdi +++| PSM SUBR ENTRY/EXIT 23346 M00S18926.dsdi +++| SA1 B2 64 BIT MEMORY BYTE ADDRESS
| Line S18927 Modification History | |
|---|---|
M01 (Removed by) | 271l739 |
Seq # *Modification Id* Act ----------------------------+ 23347 M01S18927.271l739 ---| AX1 1
| Line S00424 Modification History | |
|---|---|
M01 (Added by) | 271l739 |
Seq # *Modification Id* Act ----------------------------+ 23348 M01S00424.271l739 +++| BX7 X7-X7 23349 M01S00425.271l739 +++| SA2 XB FETCH MEMORY BOUNDS 23350 M01S00426.271l739 +++| IX1 X1-X2 23351 M01S00427.271l739 +++| NG X1,PSM1 IF NOT *EI* ADDRESS 23352 M01S00428.271l739 +++| BX7 X2 23353 M01S00429.271l739 +++| PSM1 SA7 AO DETERMINE 64-BIT MEMORY RECORD 23354 M01S00430.271l739 +++| RJ ISM 23355 M01S00431.271l739 +++| SA1 XI SET CM RANDOM INDEX 23356 M01S00432.271l739 +++| BX6 X1 23357 M01S00433.271l739 +++| SA1 B2 23358 M01S00434.271l739 +++| SA6 RI 23359 M00S18928.dsdi +++| SA3 XH 23360 M00S18929.dsdi +++| IX6 X1-X3 64 BIT WORD OFFSET WITHIN RECORD
| Line S18930 Modification History | |
|---|---|
M01 (Removed by) | 271l739 |
Seq # *Modification Id* Act ----------------------------+ 23361 M01S18930.271l739 ---| SX2 15 23362 M01S18931.271l739 ---| BX1 X6 23363 M01S18932.271l739 ---| IX3 X1/X2 23364 M01S18933.271l739 ---| SX2 15 23365 M01S18934.271l739 ---| IX1 X3*X2 23366 M01S18935.271l739 ---| LX3 2 23367 M01S18936.271l739 ---| IX6 X6-X1 23368 M01S18937.271l739 ---| SA6 PSMA 16 BIT BYTE OFFSET WITHIN 4 WORD BLOCK 23369 M01S18938.271l739 ---| SA1 XI 23370 M01S18939.271l739 ---| BX6 X1 23371 M01S18940.271l739 ---| SA6 RI RANDOM INDEX OF RECORD 23372 M01S18941.271l739 ---| RJ PDF POSITION DUMP FILE 23373 M01S18942.271l739 ---| MX6 0 23374 M01S18943.271l739 ---| SA6 NXBA INITIALIZE FOR *NXB* 23375 M01S18944.271l739 ---| SA6 A6+B1 23376 M01S18945.271l739 ---| RJ NXB UNPACK FIRST 15 BYTES 23377 M01S18946.271l739 ---| SA1 PSMA 23378 M01S18947.271l739 ---| SX2 15 23379 M01S18948.271l739 ---| IX6 X2-X1 23380 M01S18949.271l739 ---| SA6 NXBB SET BYTE POSITION WITHIN BUFFER
| Line S00435 Modification History | |
|---|---|
M01 (Added by) | 271l739 |
Seq # *Modification Id* Act ----------------------------+ 23381 M01S00435.271l739 +++| AX3 X6,B1 23382 M01S00436.271l739 +++| RJ FBP FIND BYTE POSITION 23383 M00S18950.dsdi +++| EQ PSMX RETURN
| Line S18951 Modification History | |
|---|---|
M01 (Removed by) | 271l739 |
Seq # *Modification Id* Act ----------------------------+ 23384 M01S18951.271l739 ---| 23385 M01S18952.271l739 ---| 23386 M01S18953.271l739 ---| PSMA BSS 1 23387 M00S18954.dsdi +++| PTC SPACE 4,11 23388 M00S18955.dsdi +++|** PTC - PRINT TRACK CHAIN. 23389 M00S18956.dsdi +++|* 23390 M00S18957.dsdi +++|* ENTRY TRACK LINKS IN TABLE *TSC1* ONE PER WORD RIGHT 23391 M00S18958.dsdi +++|* JUSITIFIED. A NEGATIVE TABLE ENTRY IS AN ERROR 23392 M00S18959.dsdi +++|* MESSAGE ADDRESS. 23393 M00S18960.dsdi +++|*
| Line S18961 Modification History | |
|---|---|
M01 (Removed by) | 271l739 |
Seq # *Modification Id* Act ----------------------------+ 23394 M01S18961.271l739 ---|* SAVES X - NONE. 23395 M01S18962.271l739 ---|* B - 1. 23396 M01S18963.271l739 ---|* A - 0. 23397 M01S18964.271l739 ---|* 23398 M01S18965.271l739 ---|* CALLS CTS,SSB,WOF.
| Line S00437 Modification History | |
|---|---|
M01 (Added by) | 271l739 |
Seq # *Modification Id* Act ----------------------------+ 23399 M01S00437.271l739 +++|* USES X - 1, 2, 3, 5. 23400 M01S00438.271l739 +++|* A - 1, 2, 3. 23401 M01S00439.271l739 +++|* B - 2, 3, 4, 6, 7. 23402 M01S00440.271l739 +++|* 23403 M01S00441.271l739 +++|* CALLS CTS, SSB. 23404 M01S00442.271l739 +++|* 23405 M01S00443.271l739 +++|* MACROS PRINT. 23406 M00S18966.dsdi +++| 23407 M00S18967.dsdi +++|
| Line S00444 Modification History | |
|---|---|
M01 (Added by) | 271l739 |
Seq # *Modification Id* Act ----------------------------+ 23408 M01S00444.271l739 +++| PTC4 BX1 -X1 23409 M01S00445.271l739 +++| PRINT X1 PRINT ERROR MESSAGE 23410 M01S00446.271l739 +++| 23411 M00S18968.dsdi +++| PTC SUBR 23412 M00S18969.dsdi +++| SX5 0 PRESET TABLE INDEX 23413 M00S18970.dsdi +++| RJ SSB CLEAR PRINT STRING
| Line S18971 Modification History | |
|---|---|
M01 (Removed by) | 271l739 |
Seq # *Modification Id* Act ----------------------------+ 23414 M01S18971.271l739 ---| 23415 M00S18972.dsdi +++| PTC1 SA2 F.TSC1 LINK TABLE BASE ADDRESS 23416 M00S18973.dsdi +++| SA3 L.TSC1 23417 M00S18974.dsdi +++| SB2 X5 SET CURRENT INDEX 23418 M00S18975.dsdi +++| SB3 X3 TABLE LENGTH 23419 M00S18976.dsdi +++| GE B2,B3,PTCX IF FINISHED 23420 M00S18977.dsdi +++| SB7 PRBF+24 PRINT STRING ADDRESS 23421 M00S18978.dsdi +++| SB4 21 LOOP COUNT
| Line S18979 Modification History | |
|---|---|
M01 (Removed by) | 271l739 |
Seq # *Modification Id* Act ----------------------------+ 23422 M01S18979.271l739 ---| 23423 M00S18980.dsdi +++| PTC2 SA1 X2+B2 READ NEXT ENTRY 23424 M00S18981.dsdi +++| NG X1,PTC4 IF ERROR 23425 M00S18982.dsdi +++| LX1 -12 23426 M00S18983.dsdi +++| SB6 4 23427 M00S18984.dsdi +++| RJ CTS CONVERT TRACK LINK 23428 M00S18985.dsdi +++| SB7 B7+B1 23429 M00S18986.dsdi +++| SB2 B2+B1 ADVANCE INDEX 23430 M00S18987.dsdi +++| SB4 B4-1 LOOP COUNT 23431 M00S18988.dsdi +++| GE B2,B3,PTC3 IF END OF CHAIN REACHED 23432 M00S18989.dsdi +++| GE B4,B0,PTC2 IF MORE SPACE IN THIS LINE 23433 M00S18990.dsdi +++| PTC3 SX5 B2+ SAVE INDEX 23434 M00S18991.dsdi +++| PRINT CCCH,B7-CCCH 23435 M00S18992.dsdi +++| JP PTC1 CONTINUE
| Line S18993 Modification History | |
|---|---|
M01 (Removed by) | 271l739 |
Seq # *Modification Id* Act ----------------------------+ 23436 M01S18993.271l739 ---| 23437 M01S18994.271l739 ---| PTC4 BX1 -X1 23438 M01S18995.271l739 ---| PRINT X1 PRINT ERROR MESSAGE 23439 M01S18996.271l739 ---| JP PTCX EXIT 23440 M00S18997.dsdi +++| PTL SPACE 4,16 23441 M00S18998.dsdi +++|** PTL - PRINT TABLE LINE. 23442 M00S18999.dsdi +++|* 23443 M00S19000.dsdi +++|* ENTRY X1 = FORMAT TABLE POINTER. 23444 M00S19001.dsdi +++|* A1 = ADDRESS OF FORMAT TABLE POINTER. 23445 M00S19002.dsdi +++|* B2 = BASE ADDRESS OF TABLE DATA IN CORE. 23446 M00S19003.dsdi +++|* FW = BASE ADDRESS OF TABLE IN DUMP. 23447 M00S19004.dsdi +++|* B7 = PRINT STRING ADDRESS. 23448 M00S19005.dsdi +++|* 23449 M00S19006.dsdi +++|* EXIT FORMAT TABLE POINTER IS UPDATED. 23450 M00S19007.dsdi +++|* X2.LT.0 IF END OF DUMP. 23451 M00S19008.dsdi +++|* 23452 M00S19009.dsdi +++|* SAVES X - NONE. 23453 M00S19010.dsdi +++|* B - 1,2. 23454 M00S19011.dsdi +++|* A - 0. 23455 M00S19012.dsdi +++|* 23456 M00S19013.dsdi +++|* CALLS CTS,SBL,SDI,UPS. 23457 M00S19014.dsdi +++| 23458 M00S19015.dsdi +++| 23459 M00S19016.dsdi +++| PTL SUBR 23460 M00S19017.dsdi +++| SA2 X1+ READ FORMAT TABLE 23461 M00S19018.dsdi +++| NG X2,PTLX IF END OF DUMP 23462 M00S19019.dsdi +++| NZ X2,PTL1 IF DATA TO DUMP 23463 M00S19020.dsdi +++| SB6 68 23464 M00S19021.dsdi +++| RJ SBL BLANKFILL LINE 23465 M00S19022.dsdi +++| JP PTLX EXIT 23466 M00S19023.dsdi +++| 23467 M00S19024.dsdi +++| PTL1 SX6 X1+4 23468 M00S19025.dsdi +++| SA6 A1 UPDATE FORMAT TABLE POINTER 23469 M00S19026.dsdi +++| SB3 X2 WORD ORDINAL IN TABLE 23470 M00S19027.dsdi +++| AX2 18 23471 M00S19028.dsdi +++| SB4 X2 FIRST DIGIT POSITION OF FIELD 23472 M00S19029.dsdi +++| AX2 18 23473 M00S19030.dsdi +++| SX4 X2 NUMBER OF DIGITS IN FIELD 23474 M00S19031.dsdi +++| AX2 18 23475 M00S19032.dsdi +++| ZR X2,PTL2 IF NOT INDIRECT PROCESSING 23476 M00S19033.dsdi +++| SA1 B3 23477 M00S19034.dsdi +++| SB3 X1+ WORD ORDINAL IN TABLE 23478 M00S19035.dsdi +++| PTL2 SA2 A2+1 READ FIRST WORD OF FIELD DESCRIPTION 23479 M00S19036.dsdi +++| SB6 28 23480 M00S19037.dsdi +++| RJ UPS STORE IN PRINT STRING 23481 M00S19038.dsdi +++| NZ B4,PTL3 IF NOT FIRST FIELD IN WORD 23482 M00S19039.dsdi +++| SA1 FW 23483 M00S19040.dsdi +++| SX1 X1+B3 FORM WORD ADDRESS 23484 M00S19041.dsdi +++| SB6 6 23485 M00S19042.dsdi +++| LX1 -18 23486 M00S19043.dsdi +++| RJ CTS CONVERT WORD ADDRESS 23487 M00S19044.dsdi +++| SB7 B7+B1 23488 M00S19045.dsdi +++| JP PTL4 PROCESS FIELD DATA 23489 M00S19046.dsdi +++| 23490 M00S19047.dsdi +++| PTL3 SB6 7 23491 M00S19048.dsdi +++| RJ SBL BLANK OUT ADDRESS CHARACTERS 23492 M00S19049.dsdi +++| PTL4 SX5 B7+21 SAVE ADDRESS OF END OF DATA FIELD 23493 M00S19050.dsdi +++| SA1 FW 23494 M00S19051.dsdi +++| SB6 B2+B3 23495 M00S19052.dsdi +++| SA1 X1+B6 READ DATA WORD FROM TABLE 23496 M00S19053.dsdi +++| SX6 1R 23497 M00S19054.dsdi +++| SB3 B4+ SAVE FIRST DIGIT NUMBER 23498 M00S19055.dsdi +++| PTL5 ZR B4,PTL6 IF FIRST DIGIT POSITION REACHED 23499 M00S19056.dsdi +++| LX1 3 SHIFT DATA 23500 M00S19057.dsdi +++| SA6 B7 SPACEFILL TO FIRST DIGIT POSITION 23501 M00S19058.dsdi +++| SB7 B7+B1 23502 M00S19059.dsdi +++| SB4 B4-B1 23503 M00S19060.dsdi +++| EQ PTL5 CONTINUE 23504 M00S19061.dsdi +++| 23505 M00S19062.dsdi +++| PTL6 SB6 X4 DIGIT COUNT FOR THIS FIELD 23506 M00S19063.dsdi +++| RJ CTS CONVERT FIELD 23507 M00S19064.dsdi +++| SB6 X5 23508 M00S19065.dsdi +++| SB6 B6-B7 23509 M00S19066.dsdi +++| RJ SBL SPACEFILL TO END OF DATA FIELD 23510 M00S19067.dsdi +++| SX2 0 PRESET FOR NO INTERPRETATION 23511 M00S19068.dsdi +++| SB6 10 23512 M00S19069.dsdi +++| NZ B3,PTL7 IF NOT FIRST FIELD OF WORD 23513 M00S19070.dsdi +++| SA2 A1+ READ DATA WORD TO INTERPRET 23514 M00S19071.dsdi +++| PTL7 RJ SDI STORE DISPLAY CODE INTERPRETATION FOR WORD 23515 M00S19072.dsdi +++| SX2 0 CLEAR END OF DUMP INDICATOR 23516 M00S19073.dsdi +++| JP PTLX EXIT
| Line S19074 Modification History | |
|---|---|
M01 (Removed by) | dsdi67 |
Seq # *Modification Id* Act ----------------------------+ 23517 M01S19074.dsdi67 ---| PTX SPACE 4,10
| Line S00213 Modification History | |
|---|---|
M01 (Added by) | dsdi67 |
Seq # *Modification Id* Act ----------------------------+ 23518 M01S00213.dsdi67 +++| PTX SPACE 4,15 23519 M00S19075.dsdi +++|** PTX - POSITION TO EXCHANGE PACKAGE. 23520 M00S19076.dsdi +++|* 23521 M00S19077.dsdi +++|* ENTRY (B6) = LIVE EXCHANGE PACKAGE FLAG. 23522 M00S19078.dsdi +++|* 0 = USE LIVE EXCHANGE PACKAGE.
| Line S00214 Modification History | |
|---|---|
M01 (Added by) | dsdi67 |
Seq # *Modification Id* Act ----------------------------+ 23523 M01S00214.dsdi67 +++|* (X3) = RADIAL MCI FLAG. 23524 M00S19079.dsdi +++|* (X6) = ADDRESS OF EXCHANGE PACKAGE. 23525 M00S19080.dsdi +++|* 23526 M00S19081.dsdi +++|* EXIT (X2) = DIRECTORY ADDRESS OF LIVE EXCHANGE PACKAGE. 23527 M00S19082.dsdi +++|* 0 = CM RESIDENT EXCHANGE PACKAGE. 23528 M00S19083.dsdi +++|* *NXB* PARAMETERS SET TO READ NEXT BYTE. 23529 M00S19084.dsdi +++|*
| Line S19085 Modification History | |
|---|---|
M01 (Removed by) | dsdi67 |
Seq # *Modification Id* Act ----------------------------+ 23530 M01S19085.dsdi67 ---|* USES X - 0, 1, 2, 3, 6. 23531 M01S19086.dsdi67 ---|* A - 1, 2, 3, 6. 23532 M01S19087.dsdi67 ---|* B - 3, 7. 23533 M01S19088.dsdi67 ---|* 23534 M01S19089.dsdi67 ---|* CALLS CNR, PDF, PVM.
| Line S00215 Modification History | |
|---|---|
M01 (Added by) | dsdi67 |
Seq # *Modification Id* Act ----------------------------+ 23535 M01S00215.dsdi67 +++|* USES X - 1, 2, 3, 6, 7. 23536 M01S00216.dsdi67 +++|* A - 1, 2, 3, 6, 7. 23537 M01S00217.dsdi67 +++|* 23538 M01S00218.dsdi67 +++|* CALLS FBP, FPR, PVM. 23539 M00S19090.dsdi +++| 23540 M00S19091.dsdi +++| 23541 M00S19092.dsdi +++| PTX1 SA6 PXPA SAVE SVA 23542 M00S19093.dsdi +++| RJ PVM POSITION VIRTUAL MEMORY 23543 M00S19094.dsdi +++| NZ X2,ERR30 IF PAGE NOT FOUND 23544 M00S19095.dsdi +++| PTX1.1 SA1 PTXA 23545 M00S19096.dsdi +++| SX2 0 23546 M00S19097.dsdi +++| 23547 M00S19098.dsdi +++| PTX SUBR ENTRY/EXIT 23548 M00S19099.dsdi +++| SA1 S2LPS 23549 M00S19100.dsdi +++| ZR B6,PTX2 IF NO ADDRESS GIVEN 23550 M00S19101.dsdi +++| BX1 X1-X6 23551 M00S19102.dsdi +++| NZ X1,PTX1 IF NOT SAME AS LIVE EXCHANGE 23552 M00S19103.dsdi +++| SX7 B1 SET PARAMETER FLAG
| Line S19104 Modification History | |
|---|---|
M01 (Removed by) | dsdi67 |
Seq # *Modification Id* Act ----------------------------+ 23553 M01S19104.dsdi67 ---| SA7 PTXC
| Line S00219 Modification History | |
|---|---|
M01 (Added by) | dsdi67 |
Seq # *Modification Id* Act ----------------------------+ 23554 M01S00219.dsdi67 +++| SA7 PTXB 23555 M00S19105.dsdi +++| SA2 SPPB 23556 M00S19106.dsdi +++| BX7 X2
| Line S19107 Modification History | |
|---|---|
M01 (Removed by) | dsdi67 |
Seq # *Modification Id* Act ----------------------------+ 23557 M01S19107.dsdi67 ---| SA7 PTXD SAVE CPU NUMBER
| Line S00220 Modification History | |
|---|---|
M01 (Added by) | dsdi67 |
Seq # *Modification Id* Act ----------------------------+ 23558 M01S00220.dsdi67 +++| SA7 PTXC SAVE CPU NUMBER
| Line S19108 Modification History | |
|---|---|
M01 (Removed by) | 271l739 |
Seq # *Modification Id* Act ----------------------------+ 23559 M01S19108.271l739 ---| PTX2 SA1 =3LPXP
| Line S00447 Modification History | |
|---|---|
M01 (Added by) | 271l739 |
Seq # *Modification Id* Act ----------------------------+ 23560 M01S00447.271l739 +++| PTX2 SA1 .PXP
| Line S19109 Modification History | |
|---|---|
M01 (Removed by) | dsdi67 |
Seq # *Modification Id* Act ----------------------------+ 23561 M01S19109.dsdi67 ---| SA2 PTXB 23562 M01S19110.dsdi67 ---| ZR X2,PTX3 IF FIRST EXCHANGE PACKAGE 23563 M01S19111.dsdi67 ---| SB3 A2 23564 M01S19112.dsdi67 ---| SA2 X2 23565 M01S19113.dsdi67 ---| EQ PTX4 PROCESS NEXT EXCHANGE PACKAGE 23566 M01S19114.dsdi67 ---| 23567 M01S19115.dsdi67 ---| PTX3 MX0 18 23568 M01S19116.dsdi67 ---| SEARCH TDIR,X1,X0 23569 M01S19117.dsdi67 ---| ZR X2,ERR14 IF *PXP* RECORD NOT FOUND 23570 M01S19118.dsdi67 ---| PTX4 SA3 =3LPXP DIRECTORY TABLE ENTRY ID 23571 M01S19119.dsdi67 ---| SB7 C.TDIR DIRECTORY TABLE ENTRY LENGTH 23572 M01S19120.dsdi67 ---| SB3 PTXB 23573 M01S19121.dsdi67 ---| RJ CNR CHECK NEXT RECORD 23574 M01S19122.dsdi67 ---| SA3 PTXD
| Line S00221 Modification History | |
|---|---|
M01 (Added by) | dsdi67 |
Seq # *Modification Id* Act ----------------------------+ 23575 M01S00221.dsdi67 +++| BX6 X3 RADIAL MCI FLAG 23576 M01S00222.dsdi67 +++| RJ FPR FIND PROCESSOR RECORD 23577 M01S00223.dsdi67 +++| ZR X2,ERR14 IF RECORD NOT FOUND 23578 M01S00224.dsdi67 +++| SA3 PTXC 23579 M00S19123.dsdi +++| ZR X3,PTX4.1 IF CPU-0 EXCHANGE PACKAGE
| Line S19124 Modification History | |
|---|---|
M01 (Removed by) | dsdi67 |
Seq # *Modification Id* Act ----------------------------+ 23580 M01S19124.dsdi67 ---| SA2 PTXB
| Line S00225 Modification History | |
|---|---|
M01 (Added by) | dsdi67 |
Seq # *Modification Id* Act ----------------------------+ 23581 M01S00225.dsdi67 +++| SA2 NR 23582 M00S19125.dsdi +++| SA2 X2 CPU-1 RANDOM ADDRESS POINTER 23583 M00S19126.dsdi +++| BX3 X3-X3 23584 M00S19127.dsdi +++| PTX4.1 BX6 X2 23585 M00S19128.dsdi +++| SA6 PTXA SAVE DIRECTORY ENTRY
| Line S19129 Modification History | |
|---|---|
M01 (Removed by) | dsdi67 |
Seq # *Modification Id* Act ----------------------------+ 23586 M01S19129.dsdi67 ---| SA2 A2+B1 23587 M01S19130.dsdi67 ---| BX6 X2 23588 M01S19131.dsdi67 ---| SA6 RI SAVE RANDOM INDEX 23589 M01S19132.dsdi67 ---| RJ PDF POSITION DUMP FILE 23590 M01S19133.dsdi67 ---| MX6 0 23591 M01S19134.dsdi67 ---| SA6 NXBA 23592 M01S19135.dsdi67 ---| SA6 A6+B1 INITIALIZE NXB 23593 M01S19136.dsdi67 ---| SA3 PTXC
| Line S00226 Modification History | |
|---|---|
M01 (Added by) | dsdi67 |
Seq # *Modification Id* Act ----------------------------+ 23594 M01S00226.dsdi67 +++| RJ FBP POSITION DUMP FILE 23595 M01S00227.dsdi67 +++| SX6 B0+ 23596 M01S00228.dsdi67 +++| SA3 PTXB 23597 M00S19137.dsdi +++| ZR X3,PTX5 IF NO PARAMETERS
| Line S19138 Modification History | |
|---|---|
M01 (Removed by) | dsdi67 |
Seq # *Modification Id* Act ----------------------------+ 23598 M01S19138.dsdi67 ---| SA6 PTXB CLEAR NEXT EXCHANGE PACKAGE ENTRY 23599 M01S19139.dsdi67 ---| PTX5 SA6 PTXC CLEAR FLAG 23600 M01S19140.dsdi67 ---| SA3 PTXD 23601 M01S19141.dsdi67 ---| SA6 PTXD CLEAR FLAG
| Line S00229 Modification History | |
|---|---|
M01 (Added by) | dsdi67 |
Seq # *Modification Id* Act ----------------------------+ 23602 M01S00229.dsdi67 +++| SA6 NR CLEAR NEXT EXCHANGE PACKAGE ENTRY 23603 M01S00230.dsdi67 +++| PTX5 SA6 PTXB CLEAR FLAG 23604 M01S00231.dsdi67 +++| SA3 PTXC 23605 M01S00232.dsdi67 +++| SA6 PTXC CLEAR FLAG 23606 M00S19142.dsdi +++| NZ X3,PTX1.1 IF CPU-1 EXCHANGE PACKAGE 23607 M00S19143.dsdi +++| SA2 PTXA DIRECTORY ENTRY 23608 M00S19144.dsdi +++| JP PTXX RETURN 23609 M00S19145.dsdi +++|
| Line S00233 Modification History | |
|---|---|
M01 (Added by) | dsdi67 |
Seq # *Modification Id* Act ----------------------------+ 23610 M01S00233.dsdi67 +++| 23611 M00S19146.dsdi +++| PTXA DATA 0 23612 M00S19147.dsdi +++| PTXB CON 0 23613 M00S19148.dsdi +++| PTXC CON 0
| Line S19149 Modification History | |
|---|---|
M01 (Removed by) | dsdi67 |
Seq # *Modification Id* Act ----------------------------+ 23614 M01S19149.dsdi67 ---| PTXD CON 0 23615 M00S19150.dsdi +++| PVM SPACE 4,10 23616 M00S19151.dsdi +++|** PVM - POSITION VIRTUAL MEMORY. 23617 M00S19152.dsdi +++|* 23618 M00S19153.dsdi +++|* ENTRY (X6) = SYSTEM VIRTUAL ADDRESS. 23619 M00S19154.dsdi +++|* 23620 M00S19155.dsdi +++|* EXIT (X1) = (BRMA) = BYTE REAL MEMORY ADDRESS. 23621 M00S19156.dsdi +++|* (X2) = 0, IF PAGE FOUND. 23622 M00S19157.dsdi +++|* 23623 M00S19158.dsdi +++|* USES A - 6. 23624 M00S19159.dsdi +++|* X - 2. 23625 M00S19160.dsdi +++|* B - 2. 23626 M00S19161.dsdi +++|*
| Line S19162 Modification History | |
|---|---|
M01 (Removed by) | 271l739 |
Seq # *Modification Id* Act ----------------------------+ 23627 M01S19162.271l739 ---|* CALLS ISM, PSM, SPT.
| Line S00448 Modification History | |
|---|---|
M01 (Added by) | 271l739 |
Seq # *Modification Id* Act ----------------------------+ 23628 M01S00448.271l739 +++|* CALLS PSM, SPT. 23629 M00S19163.dsdi +++| 23630 M00S19164.dsdi +++| 23631 M00S19165.dsdi +++| PVM SUBR ENTRY/EXIT 23632 M00S19166.dsdi +++| SA6 BRMA SAVE POSSIBLE RMA
| Line S19167 Modification History | |
|---|---|
M01 (Removed by) | 271l739 |
Seq # *Modification Id* Act ----------------------------+ 23633 M01S19167.271l739 ---| RJ ISM INITIALIZE FOR 64-BIT CM 23634 M00S19168.dsdi +++| SB2 BRMA 23635 M00S19169.dsdi +++| RJ SPT SEARCH PAGE TABLE 23636 M00S19170.dsdi +++| NZ X2,PVMX IF PAGE NOT FOUND 23637 M00S19171.dsdi +++| SB2 BRMA 23638 M00S19172.dsdi +++| RJ PSM POSITION 64-BIT MEMORY 23639 M00S19173.dsdi +++| SX2 0 23640 M00S19174.dsdi +++| JP PVMX RETURN
| Line S19175 Modification History | |
|---|---|
M01 (Removed by) | dsdi78 |
Seq # *Modification Id* Act ----------------------------+ 23641 M01S19175.dsdi78 ---| PXH SPACE 4,8
| Line S00065 Modification History | |
|---|---|
M01 (Added by) | dsdi78 |
Seq # *Modification Id* Act ----------------------------+ 23642 M01S00065.dsdi78 +++| PXH SPACE 4,12 23643 M00S19176.dsdi +++|** PXH - PRINT PPU XP HEADING. 23644 M00S19177.dsdi +++|*
| Line S19178 Modification History | |
|---|---|
M01 (Removed by) | dsdi78 |
Seq # *Modification Id* Act ----------------------------+ 23645 M01S19178.dsdi78 ---|* EXIT X1 = 0 IF NO MORE XPS TO PROCESS.
| Line S00066 Modification History | |
|---|---|
M01 (Added by) | dsdi78 |
Seq # *Modification Id* Act ----------------------------+ 23646 M01S00066.dsdi78 +++|* EXIT (X1) = 0 IF NO MORE XP-S TO PROCESS. 23647 M01S00067.dsdi78 +++|* (X5) = 0 IF ONLY ONE XP TO PROCESS. 23648 M00S19179.dsdi +++|*
| Line S19180 Modification History | |
|---|---|
M01 (Removed by) | dsdi78 |
Seq # *Modification Id* Act ----------------------------+ 23649 M01S19180.dsdi78 ---|* USES ALL REGISTERS.
| Line S00068 Modification History | |
|---|---|
M01 (Added by) | dsdi78 |
Seq # *Modification Id* Act ----------------------------+ 23650 M01S00068.dsdi78 +++|* USES X - 1, 5. 23651 M01S00069.dsdi78 +++|* B - 7. 23652 M00S19181.dsdi +++|*
| Line S19182 Modification History | |
|---|---|
M01 (Removed by) | dsdi78 |
Seq # *Modification Id* Act ----------------------------+ 23653 M01S19182.dsdi78 ---|* CALLS CPS,SXH,WOF.
| Line S00070 Modification History | |
|---|---|
M01 (Added by) | dsdi78 |
Seq # *Modification Id* Act ----------------------------+ 23654 M01S00070.dsdi78 +++|* CALLS CPS, SXH. 23655 M01S00071.dsdi78 +++|* 23656 M01S00072.dsdi78 +++|* MACROS PRINT. 23657 M00S19183.dsdi +++| 23658 M00S19184.dsdi +++| 23659 M00S19185.dsdi +++| PXH SUBR 23660 M00S19186.dsdi +++| SB7 PRBF SET PRINT STRING ADDRESS 23661 M00S19187.dsdi +++| RJ SXH SET LEFT HEADING 23662 M00S19188.dsdi +++| ZR X1,PXHX IF NO MORE XPS TO PROCESS 23663 M00S19189.dsdi +++| SX1 20 23664 M00S19190.dsdi +++| RJ CPS CHECK PAGE SPACE 23665 M00S19191.dsdi +++| PRINT (=2C ) 23666 M00S19192.dsdi +++| SB7 PRBF+45 23667 M00S19193.dsdi +++| RJ SXH SET RIGHT HEADING 23668 M00S19194.dsdi +++| NZ X1,PXH1 IF BOTH XPS ARE PRESENT 23669 M00S19195.dsdi +++| SX5 B0 SET ONE XP FLAG 23670 M00S19196.dsdi +++| PXH1 PRINT CCCH,B7-CCCH 23671 M00S19197.dsdi +++| PRINT (=2C )
| Line S00073 Modification History | |
|---|---|
M01 (Added by) | dsdi78 |
Seq # *Modification Id* Act ----------------------------+ 23672 M01S00073.dsdi78 +++| SX1 1 ENSURE X1 NON-ZERO 23673 M00S19198.dsdi +++| JP PXHX EXIT 23674 M00S19199.dsdi +++| PXM SPACE 4,20 23675 M00S19200.dsdi +++|** PXM - PRINT MULTIPLE EXCHANGE PACKAGES. 23676 M00S19201.dsdi +++|* 23677 M00S19202.dsdi +++|* PRINT A PAIR OF EXCHANGE PACKAGES WITH THE HEADER 23678 M00S19203.dsdi +++|* POINTED TO BY THE CONTENTS OF X1. 23679 M00S19204.dsdi +++|* 23680 M00S19205.dsdi +++|* ENTRY (X1) = EXCHANGE PACKAGE HEADER ADDRESS. 23681 M00S19206.dsdi +++|* (PXMM) = PRINT 1 XP FLAG 23682 M00S19207.dsdi +++|* (B2) = DATA BUFFER OFFSET. 23683 M00S19208.dsdi +++|* (CPRA) = ADDRESS OF FIRST EXCHANGE PACKAGE. 23684 M00S19209.dsdi +++|* XP DATA IS IN *BUF*. 23685 M00S19210.dsdi +++|* 23686 M00S19211.dsdi +++|* EXIT CPRA IS UPDATED. 23687 M00S19212.dsdi +++|* (PXMM) = 0. 23688 M00S19213.dsdi +++|* (PXMP) = 0. 23689 M00S19214.dsdi +++|* 23690 M00S19215.dsdi +++|* USES ALL REGISTERS. 23691 M00S19216.dsdi +++|* 23692 M00S19217.dsdi +++|* CALLS CPS,CTS,FXW,SSB,UPS,WOF. 23693 M00S19218.dsdi +++| 23694 M00S19219.dsdi +++| 23695 M00S19220.dsdi +++| PXM SUBR 23696 M00S19221.dsdi +++| SX7 X1+ SAVE HEADER ADDRESS 23697 M00S19222.dsdi +++| SA7 PXME 23698 M00S19223.dsdi +++| SX6 BUF+B2 23699 M00S19224.dsdi +++| SA6 PXMB SET EXCHANGE PACKAGE DATA ADDRESS 23700 M00S19225.dsdi +++| 23701 M00S19226.dsdi +++|* PRINT HEADINGS. 23702 M00S19227.dsdi +++| 23703 M00S19228.dsdi +++| SX1 20 23704 M00S19229.dsdi +++| RJ CPS CHECK REMAINING PAGE SPACE 23705 M00S19230.dsdi +++| RJ SSB CLEAR PRINT STRING 23706 M00S19231.dsdi +++| SA2 PXME 23707 M00S19232.dsdi +++| SA2 X2+ READ FIRST WORD OF HEADER 23708 M00S19233.dsdi +++| SB6 90 23709 M00S19234.dsdi +++| SB7 PRBF 23710 M00S19235.dsdi +++| RJ UPS SET HEADING 23711 M00S19236.dsdi +++| 23712 M00S19237.dsdi +++|* SET EXCHANGE PACKAGE ADDRESSES. 23713 M00S19238.dsdi +++| 23714 M00S19239.dsdi +++| SA1 CPRA 23715 M00S19240.dsdi +++| LX1 -15 23716 M00S19241.dsdi +++| SB6 5 23717 M00S19242.dsdi +++| SB7 PRBF 23718 M00S19243.dsdi +++| RJ CTS CONVERT ADDRESS 23719 M00S19244.dsdi +++| SA2 PXMM 23720 M00S19245.dsdi +++| NZ X2,PXM0 IF ONLY 1 XP 23721 M00S19246.dsdi +++| SX1 X1+20B ADVANCE FOR SECOND PACKAGE 23722 M00S19247.dsdi +++| LX1 -15 23723 M00S19248.dsdi +++| SB6 5 23724 M00S19249.dsdi +++| SB7 PRBF+45 23725 M00S19250.dsdi +++| RJ CTS 23726 M00S19251.dsdi +++| PXM0 SX6 X1+20B 23727 M00S19252.dsdi +++| SA6 CPRA UPDATE XP ADDRESS 23728 M00S19253.dsdi +++| PRINT (=2C ) 23729 M00S19254.dsdi +++| PRINT CCCH,90 23730 M00S19255.dsdi +++| PRINT (=2C ) 23731 M00S19256.dsdi +++| 23732 M00S19257.dsdi +++|* FORMAT TWO EXCHANGE PACKAGES. 23733 M00S19258.dsdi +++| 23734 M00S19259.dsdi +++| SX6 0 23735 M00S19260.dsdi +++| SA6 PXMA CLEAR LINE INDEX 23736 M00S19261.dsdi +++| SA5 PXMB 23737 M00S19262.dsdi +++| SA5 X5+ READ FIRST XP WORD 23738 M00S19263.dsdi +++| PXM1 RJ SSB CLEAR PRINT STRING 23739 M00S19264.dsdi +++| SB7 PRBF+1 23740 M00S19265.dsdi +++| SA1 PXMA LINE INDEX 23741 M00S19266.dsdi +++| RJ FXW FORMAT EXCHANGE PACKAGE WORD 23742 M00S19267.dsdi +++| SA2 PXMM 23743 M00S19268.dsdi +++| NZ X2,PXM1.1 IF ONLY 1 XP 23744 M00S19269.dsdi +++| SA5 A5+17B ADVANCE TO NEXT EXCHANGE PACKAGE 23745 M00S19270.dsdi +++| SA1 PXMA LINE INDEX 23746 M00S19271.dsdi +++| SB7 PRBF+46 23747 M00S19272.dsdi +++| RJ FXW 23748 M00S19273.dsdi +++| SA5 A5-20B 23749 M00S19274.dsdi +++| PXM1.1 PRINT CCCH,B7-CCCH 23750 M00S19275.dsdi +++| SA1 PXMA 23751 M00S19276.dsdi +++| SX6 X1+B1 23752 M00S19277.dsdi +++| SA6 A1 ADVANCE LINE INDEX 23753 M00S19278.dsdi +++| SX7 X6-10B 23754 M00S19279.dsdi +++| NZ X7,PXM2 IF NOT END OF A AND B REGISTERS 23755 M00S19280.dsdi +++| PRINT (=2C ) 23756 M00S19281.dsdi +++| PXM2 SA1 PXMA 23757 M00S19282.dsdi +++| SX1 X1-20B 23758 M00S19283.dsdi +++| NG X1,PXM1 IF MORE LINES TO FORMAT 23759 M00S19284.dsdi +++| BX6 X6-X6 23760 M00S19285.dsdi +++| SA6 PXMM CLEAR 1 XP FLAG 23761 M00S19286.dsdi +++| JP PXMX EXIT 23762 M00S19287.dsdi +++| 23763 M00S19288.dsdi +++| PXMA BSS 1 EXCHANGE PACKAGE LINE INDEX 23764 M00S19289.dsdi +++| PXMB BSS 1 EXCHANGE PACKAGE DATA ADDRESS 23765 M00S19290.dsdi +++| PXMM CON 0 PRINT 1 XP FLAG 23766 M00S19291.dsdi +++| 23767 M00S19292.dsdi +++| 23768 M00S19293.dsdi +++| PXMC CON =90H - PP MONITOR XP
| Line S19294 Modification History | |
|---|---|
M01 (Removed by) | 261l700 |
Seq # *Modification Id* Act ----------------------------+ 23769 M01S19294.261l700 ---|,
| Line S00127 Modification History | |
|---|---|
M01 (Added by) | 261l700 |
Seq # *Modification Id* Act ----------------------------+ 23770 M01S00127.261l700 +++|,- BREAKPOINT / HANG XP 23771 M00S19295.dsdi +++| PXMN CON =90H - IDLE 0 XP 23772 M00S19296.dsdi +++|, 23773 M00S19297.dsdi +++| PXMO CON =90H - IDLE 1 XP 23774 M00S19298.dsdi +++|, 23775 M00S19299.dsdi +++| PXMD CON =90H - CPU DEADSTART XP 23776 M00S19300.dsdi +++|,- REAL TIME CLOCK XP 23777 M00S19301.dsdi +++| PXMF CON =90H - ERROR EXIT XP 23778 M00S19302.dsdi +++|,- UNUSED XP 23779 M00S19303.dsdi +++| PXME CON 0 EXCHANGE PACKAGE HEADER ADDRESS 23780 M00S19304.dsdi +++| PXMG CON =90H - CHANNEL 2 INPUT XP 23781 M00S19305.dsdi +++|,- CHANNEL 2 OUTPUT XP 23782 M00S19306.dsdi +++| PXMH CON =90H - CHANNEL 3 INPUT XP 23783 M00S19307.dsdi +++|,- CHANNEL 3 OUTPUT XP 23784 M00S19308.dsdi +++| PXMI CON =90H - CHANNEL 4 INPUT XP 23785 M00S19309.dsdi +++|,- CHANNEL 4 OUTPUT XP 23786 M00S19310.dsdi +++| PXMJ CON =90H - CHANNEL 5 INPUT XP 23787 M00S19311.dsdi +++|,- CHANNEL 5 OUTPUT XP 23788 M00S19312.dsdi +++| PXMK CON =90H - CHANNEL 6 INPUT XP 23789 M00S19313.dsdi +++|,- CHANNEL 6 OUTPUT XP 23790 M00S19314.dsdi +++| PXML CON =90H - CHANNEL 7 INPUT XP 23791 M00S19315.dsdi +++|,- CHANNEL 7 OUTPUT XP 23792 M00S19316.dsdi +++| PXP SPACE 4,8 23793 M00S19317.dsdi +++|** PXP - PRINT PPU EXCHANGE PACKAGES. 23794 M00S19318.dsdi +++|* 23795 M00S19319.dsdi +++|* ENTRY CPRA = XP ADDRESS. 23796 M00S19320.dsdi +++|* 23797 M00S19321.dsdi +++|* USES ALL REGISTERS. 23798 M00S19322.dsdi +++|* 23799 M00S19323.dsdi +++|* CALLS FXW,PXH,SSB,WOF. 23800 M00S19324.dsdi +++| 23801 M00S19325.dsdi +++| 23802 M00S19326.dsdi +++| PXP SUBR 23803 M00S19327.dsdi +++| SX7 BUF PRESET PP EXCHANGE PACKAGE ADDRESS 23804 M00S19328.dsdi +++| SA7 FW 23805 M00S19329.dsdi +++| SX6 1 23806 M00S19330.dsdi +++| SA6 PP CLEAR PPU NUMBER 23807 M00S19331.dsdi +++| SA5 X7+ READ FIRST EXCHANGE PACKAGE WORD 23808 M00S19332.dsdi +++| PXP1 RJ PXH PRINT XP HEADING 23809 M00S19333.dsdi +++| ZR X1,PXPX IF NO MORE TO DUMP 23810 M00S19334.dsdi +++| NZ X5,PXP1.1 IF ONLY ONE XP LEFT 23811 M00S19335.dsdi +++| BX6 X5 23812 M00S19336.dsdi +++| SA6 PXPB 23813 M00S19337.dsdi +++| PXP1.1 SX6 0 23814 M00S19338.dsdi +++| SA6 PXPA CLEAR XP LINE INDEX 23815 M00S19339.dsdi +++| PXP2 SA1 PXPA 23816 M00S19340.dsdi +++| RJ SSB CLEAR PRINT STRING 23817 M00S19341.dsdi +++| SB7 PRBF+1 23818 M00S19342.dsdi +++| RJ FXW FORMAT LEFT XP 23819 M00S19343.dsdi +++| SA1 PXPB 23820 M00S19344.dsdi +++| ZR X1,PXP2.1 IF AT LAST XP 23821 M00S19345.dsdi +++| SA5 A5+20B READ DATA FROM NEXT XP 23822 M00S19346.dsdi +++| SA1 PXPA 23823 M00S19347.dsdi +++| SB7 PRBF+46 23824 M00S19348.dsdi +++| RJ FXW FORMAT RIGHT XP 23825 M00S19349.dsdi +++| SA5 A5-21B RESET FOR PREVIOUS XP 23826 M00S19350.dsdi +++| PXP2.1 PRINT CCCH,B7-CCCH 23827 M00S19351.dsdi +++| SA1 PXPA 23828 M00S19352.dsdi +++| SX6 X1+B1 23829 M00S19353.dsdi +++| SA6 A1 ADVANCE LINE INDEX 23830 M00S19354.dsdi +++| SX6 X6-10B 23831 M00S19355.dsdi +++| NZ X6,PXP3 IF NOT END OF A AND B REGISTERS 23832 M00S19356.dsdi +++| PRINT (=2C ) 23833 M00S19357.dsdi +++| PXP3 SA1 PXPA 23834 M00S19358.dsdi +++| SX1 X1-20B 23835 M00S19359.dsdi +++| NG X1,PXP2 IF MORE LINES 23836 M00S19360.dsdi +++| SA5 A5+22B ADVANCE TO NEXT XP PAIR 23837 M00S19361.dsdi +++| JP PXP1 CONTINUE 23838 M00S19362.dsdi +++| 23839 M00S19363.dsdi +++| PXPA BSS 1 XP LINE INDEX 23840 M00S19364.dsdi +++| PXPB CON 1 LAST XP FLAG 23841 M00S19365.dsdi +++| P4F SPACE 4,11 23842 M00S19366.dsdi +++|** P4F - PRINT FOUR BIT FLAGS. 23843 M00S19367.dsdi +++|* 23844 M00S19368.dsdi +++|* ENTRY X1 = FLAG BITS LEFT JUSTIFIED. 23845 M00S19369.dsdi +++|* B7 = PRINT STRING ADDRESS. 23846 M00S19370.dsdi +++|* 23847 M00S19371.dsdi +++|* EXIT X1 SHIFTED LEFT FOUR PLACES. 23848 M00S19372.dsdi +++|* B7 IS UPDATED. 23849 M00S19373.dsdi +++|* 23850 M00S19374.dsdi +++|* USES X - 1,6. 23851 M00S19375.dsdi +++|* B - 5,7. 23852 M00S19376.dsdi +++|* A - 6. 23853 M00S19377.dsdi +++| 23854 M00S19378.dsdi +++| 23855 M00S19379.dsdi +++| P4F SUBR 23856 M00S19380.dsdi +++| SB5 4 LOOP COUNT 23857 M00S19381.dsdi +++| P4F1 PL X1,P4F3 IF FLAG NOT SET 23858 M00S19382.dsdi +++| SX6 1R1 *ON* INDICATOR 23859 M00S19383.dsdi +++| P4F2 SA6 B7 STORE INDICATOR 23860 M00S19384.dsdi +++| SB7 B7+B1 ADVANCE PRINT STRING 23861 M00S19385.dsdi +++| SB5 B5-B1 23862 M00S19386.dsdi +++| LX1 1 SHIFT FLAGS 23863 M00S19387.dsdi +++| GT B5,B0,P4F1 IF MORE TO PRINT 23864 M00S19388.dsdi +++| JP P4FX EXIT 23865 M00S19389.dsdi +++| 23866 M00S19390.dsdi +++| P4F3 SX6 1R- *OFF* INDICATOR 23867 M00S19391.dsdi +++| JP P4F2 23868 M00S19392.dsdi +++| RBC SPACE 4,15 23869 M00S19393.dsdi +++|** RBC - READ BUFFER CONTROLLER MEMORY. 23870 M00S19394.dsdi +++|* 23871 M00S19395.dsdi +++|* ENTRY DUMP FILE POSITIONED TO CORRECT WORD 23872 M00S19396.dsdi +++|* 23873 M00S19397.dsdi +++|* EXIT (X1) .EQ. 0 IF TRANSFER COMPLETE. 23874 M00S19398.dsdi +++|* .NE. 0 IF TRANSFER NOT COMPLETE. 23875 M00S19399.dsdi +++|* (X7) = 20/0,8/B1,8/B2,8/B3,8/B4,8/B5. 23876 M00S19400.dsdi +++|* 23877 M00S19401.dsdi +++|* USES X - 0, 1, 6, 7. 23878 M00S19402.dsdi +++|* B - 2. 23879 M00S19403.dsdi +++|* 23880 M00S19404.dsdi +++|* MACROS READO. 23881 M00S19405.dsdi +++|* 23882 M00S19406.dsdi +++|* NOTES THE X7 EXIT CONDITION WILL BE SET ONLY IF THE 23883 M00S19407.dsdi +++|* TRANSFER COMPLETED NORMALLY (X1 .EQ. 0). IF THE 23884 M00S19408.dsdi +++|* TRANSFER COMPLETED NORMALLY, THE DUMP FILE WILL BE 23885 M00S19409.dsdi +++|* ADVANCED TO THE NEXT WORD. 23886 M00S19410.dsdi +++| 23887 M00S19411.dsdi +++| 23888 M00S19412.dsdi +++| RBC SUBR ENTRY/EXIT 23889 M00S19413.dsdi +++| READO S READ NEXT WORD 23890 M00S19414.dsdi +++| NZ X1,RBCX IF TRANSFER NOT COMPLETE 23891 M00S19415.dsdi +++| MX0 -8 23892 M00S19416.dsdi +++| BX7 X7-X7 CLEAR ASSEMBLY REGISTER 23893 M00S19417.dsdi +++| SB2 5 SET LOOP COUNT 23894 M00S19418.dsdi +++| 23895 M00S19419.dsdi +++|* CONVERT 8/12 FORMAT- 4/0,8/B1,4/0,8/B2 ... 23896 M00S19420.dsdi +++| 23897 M00S19421.dsdi +++| RBC1 LX6 12 23898 M00S19422.dsdi +++| LX7 8 23899 M00S19423.dsdi +++| BX1 -X0*X6 23900 M00S19424.dsdi +++| BX7 X7+X1 23901 M00S19425.dsdi +++| SB2 B2-1 23902 M00S19426.dsdi +++| NZ B2,RBC1 IF WORD NOT PACKED 23903 M00S19427.dsdi +++| BX1 X1-X1 INDICATE TRANSFER COMPLETE 23904 M00S19428.dsdi +++| EQ RBCX RETURN 23905 M00S19429.dsdi +++| RBF SPACE 4,15 23906 M00S19430.dsdi +++|** RBF - READ UP TO 512 WORDS OR TO EOR FROM FILE F. 23907 M00S19431.dsdi +++|* 23908 M00S19432.dsdi +++|* EXIT (X1) = NONZERO IF EOF. 23909 M00S19433.dsdi +++|* (EOFF) = NONZERO IF EOF. 23910 M00S19434.dsdi +++|* (EORF) = NEGATIVE IF EOR. 23911 M00S19435.dsdi +++|* (BWCF) = BLOCK WORD COUNT. 23912 M00S19436.dsdi +++|* (RWCF) = RECORD WORD COUNT. 23913 M00S19437.dsdi +++|* 23914 M00S19438.dsdi +++|* USES A - 1, 2, 6, 7. 23915 M00S19439.dsdi +++|* X - 0, 1, 2, 3, 5, 6, 7. 23916 M00S19440.dsdi +++|* 23917 M00S19441.dsdi +++|* MACROS READW. 23918 M00S19442.dsdi +++| 23919 M00S19443.dsdi +++| 23920 M00S19444.dsdi +++| RBF SUBR ENTRY/EXIT
| Line S00015 Modification History | |
|---|---|
M01 (Added by) | dsdi88 |
Seq # *Modification Id* Act ----------------------------+ 23921 M01S00015.dsdi88 +++| SA1 RBHA CHECK FOR DEFERRED HEADER 23922 M00S19445.dsdi +++| SX0 BUF ADDRESS TO READ DATA 23923 M00S19446.dsdi +++| SA2 RBFA FILE TO READ
| Line S00016 Modification History | |
|---|---|
M01 (Added by) | dsdi88 |
Seq # *Modification Id* Act ----------------------------+ 23924 M01S00016.dsdi88 +++| ZR X1,RBF1 IF NO DEFERRED HEADER 23925 M01S00017.dsdi88 +++| SX6 B0+ CLEAR HEADER WORD COUNT 23926 M01S00018.dsdi88 +++| BX5 X1 23927 M01S00019.dsdi88 +++| SA6 A1 23928 M01S00020.dsdi88 +++| EQ RBF1.1 PROCESS HEADER 23929 M01S00021.dsdi88 +++| 23930 M00S19447.dsdi +++| RBF1 READW X2,CONW,B1 READ HEADER CONTROL WORD 23931 M00S19448.dsdi +++| BX6 X1 SAVE EOF INFORMATION 23932 M00S19449.dsdi +++| SA6 EOFF 23933 M00S19450.dsdi +++| NZ X1,RBFX IF EOF 23934 M00S19451.dsdi +++| SA1 CONW COMPUTE WORD COUNT FOR PRU 23935 M00S19452.dsdi +++| SX6 5 23936 M00S19453.dsdi +++| SX3 X1+4 23937 M00S19454.dsdi +++| IX5 X3/X6 23938 M00S19455.dsdi +++| READW X2,X0,X5+B1 READ DATA PLUS TRAILER CONTROL WORD 23939 M00S19456.dsdi +++| ZR X5,RBF1 IF ZERO LENGTH PRU
| Line S19457 Modification History | |
|---|---|
M01 (Removed by) | dsdi88 |
Seq # *Modification Id* Act ----------------------------+ 23940 M01S19457.dsdi88 ---| IX0 X0+X5 INCREMENT BUFFER ADDRESS
| Line S00022 Modification History | |
|---|---|
M01 (Added by) | dsdi88 |
Seq # *Modification Id* Act ----------------------------+ 23941 M01S00022.dsdi88 +++| RBF1.1 IX0 X0+X5 INCREMENT BUFFER ADDRESS 23942 M00S19458.dsdi +++| SA1 CONW CHECK FOR SHORT PRU (EOR) 23943 M00S19459.dsdi +++| AX1 36 23944 M00S19460.dsdi +++| SX1 X1 23945 M00S19461.dsdi +++| IX6 X5-X1 23946 M00S19462.dsdi +++| MX1 0 CLEAR EOF FLAG 23947 M00S19463.dsdi +++| NG X6,RBF2 IF SHORT PRU (EOR) 23948 M00S19464.dsdi +++| SX6 X0-BUF-512 CHECK FOR 512 WORDS READ 23949 M00S19465.dsdi +++| NG X6,RBF1 IF NOT 512 WORDS 23950 M00S19466.dsdi +++| RBF2 SA6 EORF SET/CLEAR EOR 23951 M00S19467.dsdi +++| SX7 X0-BUF NUMBER OF WORDS IN BLOCK 23952 M00S19468.dsdi +++| SA7 BWCF 23953 M00S19469.dsdi +++| EQ RBFX RETURN 23954 M00S19470.dsdi +++| 23955 M00S19471.dsdi +++| 23956 M00S19472.dsdi +++| RBFA CON F INITIAL FILE TO READ 23957 M00S19473.dsdi +++| BWCF CON 0 BLOCK WORD COUNT
| Line S19474 Modification History | |
|---|---|
M01 (Removed by) | dsdi56 |
Seq # *Modification Id* Act ----------------------------+ 23958 M01S19474.dsdi56 ---| RWCF CON 0 RECORD WORD COUNT 23959 M00S19475.dsdi +++| EOFF CON 0 NONZERO IF EOF
| Line S00023 Modification History | |
|---|---|
M01 (Added by) | dsdi88 |
Seq # *Modification Id* Act ----------------------------+ 23960 M01S00023.dsdi88 +++| RBH SPACE 4,15 23961 M01S00024.dsdi88 +++|** RBH - READ BLOCK OR HEADER RECORD. 23962 M01S00025.dsdi88 +++|* 23963 M01S00026.dsdi88 +++|* EXIT (X1) .EQ. +0, IF NOT EOF OR DEFERRED HEADER EOR. 23964 M01S00027.dsdi88 +++|* .NE. 0, IF EOF. 23965 M01S00028.dsdi88 +++|* .EQ. -0, IF EOR WITH DEFERRED HEADER. 23966 M01S00029.dsdi88 +++|* (EOFF) = NONZERO IF EOF. 23967 M01S00030.dsdi88 +++|* (EORF) = NEGATIVE IF EOR. 23968 M01S00031.dsdi88 +++|* = NEGATIVE ZERO IF EOR WITH DEFERRED HEADER. 23969 M01S00032.dsdi88 +++|* (BWCF) = BLOCK WORD COUNT. 23970 M01S00033.dsdi88 +++|* (RWCF) = RECORD WORD COUNT. 23971 M01S00034.dsdi88 +++|* (RBHA) = WORD COUNT OF DEFERRED HEADER. 23972 M01S00035.dsdi88 +++|* 23973 M01S00036.dsdi88 +++|* USES A - 1, 6, 7. 23974 M01S00037.dsdi88 +++|* X - 1, 6, 7. 23975 M01S00038.dsdi88 +++|* 23976 M01S00039.dsdi88 +++|* CALLS DRT, RBF. 23977 M01S00040.dsdi88 +++| 23978 M01S00041.dsdi88 +++| 23979 M01S00042.dsdi88 +++| RBH SUBR ENTRY/EXIT 23980 M01S00043.dsdi88 +++| RJ RBF READ BLOCK OF UP TO 512 WORDS 23981 M01S00044.dsdi88 +++| NZ X1,RBHX IF EOF 23982 M01S00045.dsdi88 +++| SA1 EORF 23983 M01S00046.dsdi88 +++| ZR X1,RBHX IF NOT EOR 23984 M01S00047.dsdi88 +++| SA1 BWCF CHECK FOR HEADER 23985 M01S00048.dsdi88 +++| SX6 0 PRESET FOR EXIT CONDITION 23986 M01S00049.dsdi88 +++| SX1 X1-4 23987 M01S00050.dsdi88 +++| NZ X1,RBH1 IF NOT RIGHT SIZE FOR HEADER 23988 M01S00051.dsdi88 +++| SA1 BUF 23989 M01S00052.dsdi88 +++| RJ DRT DETERMINE RECORD TYPE 23990 M01S00053.dsdi88 +++| ZR X4,RBH1 IF NO MATCH ON RECORD TYPE 23991 M01S00054.dsdi88 +++| SA1 BWCF SAVE HEADER WORD COUNT 23992 M01S00055.dsdi88 +++| MX6 60 SET HEADER DEFERRED STATUS 23993 M01S00056.dsdi88 +++| BX7 X1 23994 M01S00057.dsdi88 +++| SA6 EORF 23995 M01S00058.dsdi88 +++| SA7 RBHA 23996 M01S00059.dsdi88 +++| RBH1 BX1 X6 SET EXIT CONDITION 23997 M01S00060.dsdi88 +++| EQ RBHX RETURN 23998 M01S00061.dsdi88 +++| 23999 M01S00062.dsdi88 +++| 24000 M01S00063.dsdi88 +++| RBHA CON 0 DEFERRED HEADER WORD COUNT
| Line S19476 Modification History | |
|---|---|
M01 (Removed by) | 271l739 |
Seq # *Modification Id* Act ----------------------------+ 24001 M01S19476.271l739 ---| RBI SPACE 4,5
| Line S00449 Modification History | |
|---|---|
M01 (Added by) | 271l739 |
Seq # *Modification Id* Act ----------------------------+ 24002 M01S00449.271l739 +++| RBI SPACE 4,10 24003 M00S19477.dsdi +++|** RBI - RANDOMIZE BINARY INPUT FILE. 24004 M00S19478.dsdi +++|*
| Line S19479 Modification History | |
|---|---|
M01 (Removed by) | 271l739 |
Seq # *Modification Id* Act ----------------------------+ 24005 M01S19479.271l739 ---|* USES A - 1, 2, 3, 6, 7. 24006 M01S19480.271l739 ---|* X - 0, 1, 2, 3, 4, 6, 7. 24007 M01S19481.271l739 ---|* B - 2, 3, 4. 24008 M01S19482.271l739 ---|* 24009 M01S19483.271l739 ---|* CALLS BPN, DRT, LDD, RBF. 24010 M01S19484.271l739 ---|* 24011 M01S19485.271l739 ---|* MACROS ADDWRD, ALLOC, MESSAGE, MOVE, READ, READCW, RECALL, 24012 M01S19486.271l739 ---|* RENAME, RETURN, REWIND, SEARCH, SETFS, WRITEF, 24013 M01S19487.271l739 ---|* WRITEO, WRITER, WRITEW.
| Line S00450 Modification History | |
|---|---|
M01 (Added by) | 271l739 |
Seq # *Modification Id* Act ----------------------------+ 24014 M01S00450.271l739 +++|* USES X - 0, 1, 2, 3, 5, 6, 7. 24015 M01S00451.271l739 +++|* A - 1, 2, 3, 5, 6, 7. 24016 M01S00452.271l739 +++|* 24017 M01S00453.271l739 +++|* CALLS BPN, DRT, LDD, RBF, RDR, SFR. 24018 M01S00454.271l739 +++|* 24019 M01S00455.271l739 +++|* MACROS ADDWRD, MESSAGE, READ, READW, READCW, RECALL, RENAME, 24020 M01S00456.271l739 +++|* RETURN, REWIND, SEARCH, SETFS, WRITEF, WRITEO, WRITER, 24021 M01S00457.271l739 +++|* WRITEW. 24022 M00S19488.dsdi +++| 24023 M00S19489.dsdi +++|
| Line S00458 Modification History | |
|---|---|
M01 (Added by) | 271l739 |
Seq # *Modification Id* Act ----------------------------+ 24024 M01S00458.271l739 +++| RBI10 BX6 X1 PLACE DUMP NUMBER IN HEADER 24025 M01S00459.271l739 +++| SA6 TITL2 24026 M01S00460.271l739 +++| 24027 M00S19490.dsdi +++| RBI SUBR 24028 M00S19491.dsdi +++| RJ LDD LOAD DUMP DIRECTORY 24029 M00S19492.dsdi +++| ZR X1,RBI6 IF DUMP INPUT RANDOM 24030 M00S19493.dsdi +++| 24031 M00S19494.dsdi +++|* INITIALIZE FOR RANDOM FILE GENERATION. 24032 M00S19495.dsdi +++|
| Line S00002 Modification History | |
|---|---|
M01 (Added by) | dsdi85 |
Seq # *Modification Id* Act ----------------------------+ 24033 M01S00002.dsdi85 +++| SETFET F,ERP=E 24034 M00S19496.dsdi +++| RECALL F
| Line S00023 Modification History | |
|---|---|
M01 (Added by) | dsdi81 |
Seq # *Modification Id* Act ----------------------------+ 24035 M01S00023.dsdi81 +++| SA1 DR 24036 M01S00024.dsdi81 +++| NG X1,RBI0 IF RANDOM FILE NAME SPECIFIED 24037 M00S19497.dsdi +++| RETURN S,R DELETE BINARY SCRATCH FILE
| Line S19498 Modification History | |
|---|---|
M01 (Removed by) | dsdi81 |
Seq # *Modification Id* Act ----------------------------+ 24038 M01S19498.dsdi81 ---| MESSAGE (=C* COPYING DUMP TO RANDOM FILE.*),1,R
| Line S00025 Modification History | |
|---|---|
M01 (Added by) | dsdi81 |
Seq # *Modification Id* Act ----------------------------+ 24039 M01S00025.dsdi81 +++| EQ RBI0.1 INITIATE COPY 24040 M01S00026.dsdi81 +++| 24041 M01S00027.dsdi81 +++| RBI0 REWIND S,R REWIND EXISTING SCRATCH FILE, IF PRESENT 24042 M01S00028.dsdi81 +++| RBI0.1 MESSAGE (=C* COPYING DUMP TO RANDOM FILE.*),1,R 24043 M00S19499.dsdi +++| SA1 RBIA 24044 M00S19500.dsdi +++| NZ X1,RBI1 IF NO REWIND REQUESTED 24045 M00S19501.dsdi +++| REWIND F,R 24046 M00S19502.dsdi +++| RBI1 SA2 RBFA INITIATE READ OF INPUT FILE 24047 M00S19503.dsdi +++| READCW X2,17B 24048 M00S19504.dsdi +++| 24049 M00S19505.dsdi +++|* PROCESS INPUT FILE. 24050 M00S19506.dsdi +++| 24051 M00S19507.dsdi +++| RBI2 RJ RBF READ UP TO 512 WORD BLOCK 24052 M00S19508.dsdi +++| NZ X1,RBI3 IF END OF FILE 24053 M00S19509.dsdi +++| RBI2.1 SA1 BUF SET RECORD ID = 1ST WORD OF RECORD 24054 M00S19510.dsdi +++| BX7 X1 24055 M00S19511.dsdi +++| SA7 ID 24056 M00S19512.dsdi +++| RJ DRT DETERMINE RECORD TYPE 24057 M00S19513.dsdi +++| JP B3 BRANCH ON RECORD TYPE 24058 M00S19514.dsdi +++| 24059 M00S19515.dsdi +++|* PROCESS END OF FILE. 24060 M00S19516.dsdi +++| 24061 M00S19517.dsdi +++| RBI3 SA1 DR 24062 M00S19518.dsdi +++| ZR X1,RBI3.1 IF *D* NOT SPECIFIED
| Line S00029 Modification History | |
|---|---|
M01 (Added by) | dsdi81 |
Seq # *Modification Id* Act ----------------------------+ 24063 M01S00029.dsdi81 +++| NG X1,RBI3.1 IF *D=FILE* SPECIFIED 24064 M00S19519.dsdi +++| RETURN F 24065 M00S19520.dsdi +++| RBI3.1 SX6 B0+ MAKE *PP* ENTRIES FOR ALL IOU-S 24066 M00S19521.dsdi +++| SA6 PP 24067 M00S19522.dsdi +++| RBI4 RJ BPN BUILD PP NAME
| Line S19523 Modification History | |
|---|---|
M01 (Removed by) | 271l739 |
Seq # *Modification Id* Act ----------------------------+ 24068 M01S19523.271l739 ---| SX1 3RI00+X3 FORM IOU IDENTIFIER
| Line S00461 Modification History | |
|---|---|
M01 (Added by) | 271l739 |
Seq # *Modification Id* Act ----------------------------+ 24069 M01S00461.271l739 +++| SA1 .IPP 24070 M00S19524.dsdi +++| MX0 18
| Line S19525 Modification History | |
|---|---|
M01 (Removed by) | 271l739 |
Seq # *Modification Id* Act ----------------------------+ 24071 M01S19525.271l739 ---| LX1 59-17
| Line S00462 Modification History | |
|---|---|
M01 (Added by) | 271l739 |
Seq # *Modification Id* Act ----------------------------+ 24072 M01S00462.271l739 +++| LX3 42 FORM RECORD ID 24073 M00S19526.dsdi +++| SA2 PP 24074 M00S19527.dsdi +++| SX6 X2+B1 24075 M00S19528.dsdi +++| SA6 A2 INCREMENT PP NUMBER 24076 M00S19529.dsdi +++| SX2 X2-32B 24077 M00S19530.dsdi +++| ZR X2,RBI5 IF END OF POSSIBLE IOU-S
| Line S19531 Modification History | |
|---|---|
M01 (Removed by) | 271l739 |
Seq # *Modification Id* Act ----------------------------+ 24078 M01S19531.271l739 ---| SEARCH TDIR,X1,X0
| Line S00463 Modification History | |
|---|---|
M01 (Added by) | 271l739 |
Seq # *Modification Id* Act ----------------------------+ 24079 M01S00463.271l739 +++| IX6 X1+X3 24080 M01S00464.271l739 +++| SEARCH TDIR,X6,X0 24081 M00S19532.dsdi +++| ZR X2,RBI4 IF IOU NOT FOUND 24082 M00S19533.dsdi +++| SA1 BPNA 24083 M00S19534.dsdi +++| SA5 A2+B1 FETCH SECOND WORD OF ENTRY 24084 M00S19535.dsdi +++| ADDWRD TDIR,X1 24085 M00S19536.dsdi +++| ADDWRD TDIR,X5 24086 M00S19537.dsdi +++| EQ RBI4 PROCESS NEXT IOU 24087 M00S19538.dsdi +++| 24088 M00S19539.dsdi +++| RBI5 WRITEW S,RBIB,RBIBL WRITE 7700 TABLE 24089 M00S19540.dsdi +++| SA1 L.TDIR 24090 M00S19541.dsdi +++| SA3 =0LDUMP 24091 M00S19542.dsdi +++| BX6 X1+X3 24092 M00S19543.dsdi +++| WRITEO X2 WRITE DIRECTORY LENGTH WORD 24093 M00S19544.dsdi +++| SA1 F.TDIR 24094 M00S19545.dsdi +++| WRITEW X2,X1,X6 WRITE DIRECTORY TABLE 24095 M00S19546.dsdi +++| WRITER X2,R 24096 M00S19547.dsdi +++| WRITEF X2,R TERMINATE DUMP FILE 24097 M00S19548.dsdi +++| SA1 DR
| Line S00030 Modification History | |
|---|---|
M01 (Added by) | dsdi81 |
Seq # *Modification Id* Act ----------------------------+ 24098 M01S00030.dsdi81 +++| NG X1,RBI5.1 IF *D=FILE* SPECIFIED 24099 M00S19549.dsdi +++| ZR X1,RBI6 IF *D* NOT SPECIFIED 24100 M00S19550.dsdi +++| RENAME S,F RENAME SCRATCH FILE
| Line S19551 Modification History | |
|---|---|
M01 (Removed by) | dsdi81 |
Seq # *Modification Id* Act ----------------------------+ 24101 M01S19551.dsdi81 ---| SETFS S,0 CLEAR ID
| Line S00031 Modification History | |
|---|---|
M01 (Added by) | dsdi81 |
Seq # *Modification Id* Act ----------------------------+ 24102 M01S00031.dsdi81 +++| RBI5.1 SETFS S,0 24103 M00S19552.dsdi +++| RBI6 ADDWRD TDIR,X6-X6 TERMINATE DIRECTORY TABLE 24104 M00S19553.dsdi +++| ADDWRD A0,X6-X6
| Line S19554 Modification History | |
|---|---|
M01 (Removed by) | 271l739 |
Seq # *Modification Id* Act ----------------------------+ 24105 M01S19554.271l739 ---| SX6 0 CLEAR RANDOM ADDRESS WORD
| Line S00465 Modification History | |
|---|---|
M01 (Added by) | 271l739 |
Seq # *Modification Id* Act ----------------------------+ 24106 M01S00465.271l739 +++| SA1 .EIC LOOK FOR *EIC* RECORD 24107 M01S00466.271l739 +++| MX0 18 24108 M01S00467.271l739 +++| SEARCH TDIR,X1,X0 24109 M01S00468.271l739 +++| ZR X2,RBI7 IF RECORD NOT FOUND 24110 M01S00469.271l739 +++| BX6 X2 24111 M01S00470.271l739 +++| SA3 A2+B1 24112 M01S00471.271l739 +++| SA6 EH SAVE RECORD HEADER 24113 M01S00472.271l739 +++| BX7 X3 SAVE RANDOM ADDRESS 24114 M01S00473.271l739 +++| SA7 A6+B1 24115 M01S00474.271l739 +++| RBI7 SA1 .MEM LOOK FOR *MEM* RECORD 24116 M01S00475.271l739 +++| SEARCH TDIR,X1,X0 24117 M01S00476.271l739 +++| ZR X2,RBI9 IF RECORD NOT FOUND 24118 M01S00477.271l739 +++| BX6 X2 24119 M01S00478.271l739 +++| SA3 A2+B1 24120 M01S00479.271l739 +++| SA6 MH SAVE RECORD HEADER 24121 M01S00480.271l739 +++| BX7 X3 SAVE RANDOM ADDRESS 24122 M01S00481.271l739 +++| SA7 A6+B1 24123 M01S00482.271l739 +++| SA1 .MMR LOCATE *MMR* RECORD 24124 M01S00483.271l739 +++| RJ RDR 24125 M01S00484.271l739 +++| ZR X2,ERR42 IF RECORD NOT FOUND 24126 M01S00485.271l739 +++| SX5 /IOU/MBRG ASSEMBLE MEMORY BOUNDS 24127 M01S00486.271l739 +++| RJ SFR 24128 M01S00487.271l739 +++| NG X1,ERR42 IF REGISTER NOT FOUND 24129 M01S00488.271l739 +++| MX0 -16
| Line S00489 Modification History | |
|---|---|
M01 (Added by) | 271l739 |
M02 (Removed by) | dsdi92 |
Seq # *Modification Id* Act ----------------------------+ 24130 M02S00489.dsdi92 ---| AX7 16 POSITION UPPER BOUND 24131 M02S00490.dsdi92 ---| BX7 -X0*X7
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | dsdi92 |
Seq # *Modification Id* Act ----------------------------+ 24132 M01S00001.dsdi92 +++| BX7 -X0*X7 UPPER BOUND
| Line S00491 Modification History | |
|---|---|
M01 (Added by) | 271l739 |
Seq # *Modification Id* Act ----------------------------+ 24133 M01S00491.271l739 +++| LX7 12 CONVERT TO FWA OF EI 24134 M01S00492.271l739 +++| SA7 XB 24135 M01S00493.271l739 +++| RBI9 SX6 0 CLEAR RANDOM ADDRESS IN FET 24136 M00S19555.dsdi +++| SA6 S+6 24137 M00S19556.dsdi +++| 24138 M00S19557.dsdi +++|* SET EXPRESS DUMP NUMBER IN TITLE LINE. 24139 M00S19558.dsdi +++| 24140 M00S19559.dsdi +++| REWIND S,R 24141 M00S19560.dsdi +++| SA1 X2+B1 RESET FET 24142 M00S19561.dsdi +++| SX6 X1 24143 M00S19562.dsdi +++| SA6 A1+B1 IN = FIRST 24144 M00S19563.dsdi +++| SA6 A6+B1 OUT = FIRST 24145 M00S19564.dsdi +++| READ X2 READ FIRST LABEL BLOCK 24146 M00S19565.dsdi +++| READW X2,BUF,4 READ DUMP HEADER 24147 M00S19566.dsdi +++| SA1 BUF+3 DUMP NUMBER FROM *EDD* 24148 M00S19567.dsdi +++| SA2 BD
| Line S19568 Modification History | |
|---|---|
M01 (Removed by) | 271l739 |
Seq # *Modification Id* Act ----------------------------+ 24149 M01S19568.271l739 ---| NZ X2,RBI7 IF BINARY DUMP
| Line S00494 Modification History | |
|---|---|
M01 (Added by) | 271l739 |
Seq # *Modification Id* Act ----------------------------+ 24150 M01S00494.271l739 +++| NZ X2,RBI10 IF BINARY DUMP 24151 M00S19569.dsdi +++| SA2 =8R DUMP 24152 M00S19570.dsdi +++| MX3 12 24153 M00S19571.dsdi +++| BX6 X3*X1 24154 M00S19572.dsdi +++| BX6 X6+X2 24155 M00S19573.dsdi +++| LX6 18 24156 M00S19574.dsdi +++| SA6 TITL2 SET DUMP NUMBER IN HEADER 24157 M00S19575.dsdi +++| JP RBIX EXIT 24158 M00S19576.dsdi +++|
| Line S19577 Modification History | |
|---|---|
M01 (Removed by) | 271l739 |
Seq # *Modification Id* Act ----------------------------+ 24159 M01S19577.271l739 ---| RBI7 BX6 X1 PLACE DUMP NUMBER IN HEADER 24160 M01S19578.271l739 ---| SA6 TITL2 24161 M01S19579.271l739 ---| EQ RBIX RETURN 24162 M00S19580.dsdi +++| 24163 M00S19581.dsdi +++| RBIA CON 0 NO REWIND FLAG 24164 M00S19582.dsdi +++| RBIB DATA 77000016000000000000B 24165 M00S19583.dsdi +++| DATA 0LDUMP 24166 M00S19584.dsdi +++| BSSZ 15B 24167 M00S19585.dsdi +++| RBIBL EQU *-RBIB
| Line S19586 Modification History | |
|---|---|
M01 (Removed by) | dsdi56 |
Seq # *Modification Id* Act ----------------------------+ 24168 M01S19586.dsdi56 ---| BLCT CON 0 PRU COUNT FOR *CM* AND *EXTENDED MEMORY* 24169 M00S19587.dsdi +++| CONW CON 0 HEADER CONTROL WORD 24170 M00S19588.dsdi +++| EORF VFD 1/1,59/0 EOR FLAG 24171 M00S19589.dsdi +++| RBT SPACE 4,11 24172 M00S19590.dsdi +++|** RBT - READ DATA IN BYTE FORMAT. 24173 M00S19591.dsdi +++|*
| Line S19592 Modification History | |
|---|---|
M01 (Removed by) | dsdi56 |
Seq # *Modification Id* Act ----------------------------+ 24174 M01S19592.dsdi56 ---|* ENTRY A0 = NUMBER OF BYTES TO READ. 24175 M01S19593.dsdi56 ---|* RBTA = CURRENT BYTE NUMBER. 24176 M01S19594.dsdi56 ---|* RBTA+1 = CURRENT WORD.
| Line S00258 Modification History | |
|---|---|
M01 (Added by) | dsdi56 |
Seq # *Modification Id* Act ----------------------------+ 24177 M01S00258.dsdi56 +++|* ENTRY (A0) = NUMBER OF BYTES TO READ. 24178 M01S00259.dsdi56 +++|* (APPG) = PP DATA IN *PBUF* FLAG. 24179 M01S00260.dsdi56 +++|* (RBTA) = CURRENT BYTE NUMBER. 24180 M01S00261.dsdi56 +++|* (RBTA+1) = CURRENT WORD. 24181 M00S19595.dsdi +++|* 24182 M00S19596.dsdi +++|* EXIT BYTES STORED LEFT JUSTIFIED AT *BUF*. 24183 M00S19597.dsdi +++|* 24184 M00S19598.dsdi +++|* USES X - 0, 1, 5, 6, 7. 24185 M00S19599.dsdi +++|* A - 0, 1, 6, 7. 24186 M00S19600.dsdi +++|* B - 3, 4, 5. 24187 M00S19601.dsdi +++|* 24188 M00S19602.dsdi +++|* CALLS NXB. 24189 M00S19603.dsdi +++|* 24190 M00S19604.dsdi +++|* MACROS READO. 24191 M00S19605.dsdi +++| 24192 M00S19606.dsdi +++|
| Line S00262 Modification History | |
|---|---|
M01 (Added by) | dsdi56 |
Seq # *Modification Id* Act ----------------------------+ 24193 M01S00262.dsdi56 +++| RBT9 SX7 B5 24194 M01S00263.dsdi56 +++| SA7 RBTA SAVE BYTE COUNTER 24195 M01S00264.dsdi56 +++| SA6 A7+B1 SAVE CURRENT WORD 24196 M01S00265.dsdi56 +++| 24197 M00S19607.dsdi +++| RBT SUBR
| Line S19608 Modification History | |
|---|---|
M01 (Removed by) | dsdi56 |
Seq # *Modification Id* Act ----------------------------+ 24198 M01S19608.dsdi56 ---| SA1 AP 24199 M01S19609.dsdi56 ---| NZ X1,RBT5 IF ADVANCED PROCESSOR PRESENT 24200 M00S19610.dsdi +++| SA1 RBTA 24201 M00S19611.dsdi +++| SB5 X1 SET CURRENT BYTE COUNTER 24202 M00S19612.dsdi +++| SA1 A1+B1 24203 M00S19613.dsdi +++| BX6 X1 SET CURRENT WORD 24204 M00S19614.dsdi +++| MX0 12 24205 M00S19615.dsdi +++| SB3 BUF 24206 M00S19616.dsdi +++| SB4 B3+A0 BUFFER LIMIT
| Line S00266 Modification History | |
|---|---|
M01 (Added by) | dsdi56 |
Seq # *Modification Id* Act ----------------------------+ 24207 M01S00266.dsdi56 +++| SA1 APPG 24208 M01S00267.dsdi56 +++| NZ X1,RBT6 IF DATA IS IN *PBUF* 24209 M01S00268.dsdi56 +++| SA1 AP 24210 M01S00269.dsdi56 +++| NZ X1,RBT4 IF 16-BIT PP 24211 M00S19617.dsdi +++| JP RBT3 ENTER READ LOOP
| Line S00270 Modification History | |
|---|---|
M01 (Added by) | dsdi56 |
Seq # *Modification Id* Act ----------------------------+ 24212 M01S00270.dsdi56 +++| 24213 M01S00271.dsdi56 +++|* GET 12-BIT BYTES FROM FILE. 24214 M00S19618.dsdi +++| 24215 M00S19619.dsdi +++| RBT1 SB5 5 RESET BYTE COUNTER 24216 M00S19620.dsdi +++| READO S READ NEXT WORD 24217 M00S19621.dsdi +++| RBT2 BX7 X0*X6 24218 M00S19622.dsdi +++| SA7 B3 STORE NEXT BYTE 24219 M00S19623.dsdi +++| SB5 B5-B1 COUNT BYTE 24220 M00S19624.dsdi +++| LX6 12 24221 M00S19625.dsdi +++| SB3 B3+1 ADVANCE BUFFER ADDRESS
| Line S19626 Modification History | |
|---|---|
M01 (Removed by) | dsdi56 |
Seq # *Modification Id* Act ----------------------------+ 24222 M01S19626.dsdi56 ---| EQ B3,B4,RBT4 IF NO MORE TO READ
| Line S00272 Modification History | |
|---|---|
M01 (Added by) | dsdi56 |
Seq # *Modification Id* Act ----------------------------+ 24223 M01S00272.dsdi56 +++| EQ B3,B4,RBT9 IF NO MORE TO READ 24224 M00S19627.dsdi +++| RBT3 NZ B5,RBT2 IF NOT END OF WORD 24225 M00S19628.dsdi +++| JP RBT1 READ NEXT WORD 24226 M00S19629.dsdi +++|
| Line S19630 Modification History | |
|---|---|
M01 (Removed by) | dsdi56 |
Seq # *Modification Id* Act ----------------------------+ 24227 M01S19630.dsdi56 ---| RBT4 SX7 B5 24228 M01S19631.dsdi56 ---| SA7 RBTA SAVE BYTE COUNTER 24229 M01S19632.dsdi56 ---| SA6 A7+B1 SAVE CURRENT WORD 24230 M01S19633.dsdi56 ---| JP RBTX EXIT
| Line S00273 Modification History | |
|---|---|
M01 (Added by) | dsdi56 |
Seq # *Modification Id* Act ----------------------------+ 24231 M01S00273.dsdi56 +++|* GET 16-BIT BYTES FROM FILE. BYTES STORED 4 PER 64 BITS. 24232 M00S19634.dsdi +++|
| Line S19635 Modification History | |
|---|---|
M01 (Removed by) | dsdi56 |
Seq # *Modification Id* Act ----------------------------+ 24233 M01S19635.dsdi56 ---|* PROCESS IOU DATA. BYTES STORED 4 PER 64 BITS. 24234 M01S19636.dsdi56 ---| 24235 M01S19637.dsdi56 ---| RBT5 SX5 A0 SAVE BYTE COUNT
| Line S00274 Modification History | |
|---|---|
M01 (Added by) | dsdi56 |
Seq # *Modification Id* Act ----------------------------+ 24236 M01S00274.dsdi56 +++| RBT4 SX5 A0 SAVE BYTE COUNT 24237 M00S19638.dsdi +++| SA0 BUF NEXT ADDRESS TO STORE 24238 M00S19639.dsdi +++| MX0 12 PP BYTE MASK
| Line S19640 Modification History | |
|---|---|
M01 (Removed by) | dsdi56 |
Seq # *Modification Id* Act ----------------------------+ 24239 M01S19640.dsdi56 ---| RBT6 RJ NXB READ NEXT IOU BYTE
| Line S00275 Modification History | |
|---|---|
M01 (Added by) | dsdi56 |
Seq # *Modification Id* Act ----------------------------+ 24240 M01S00275.dsdi56 +++| RBT5 RJ NXB READ NEXT IOU BYTE 24241 M00S19641.dsdi +++| LX1 59-11 24242 M00S19642.dsdi +++| BX6 X0*X1 EXTRACT PP BYTE 24243 M00S19643.dsdi +++| SA6 A0 24244 M00S19644.dsdi +++| SA0 A0+B1 24245 M00S19645.dsdi +++| SX5 X5-1
| Line S19646 Modification History | |
|---|---|
M01 (Removed by) | dsdi56 |
Seq # *Modification Id* Act ----------------------------+ 24246 M01S19646.dsdi56 ---| NZ X5,RBT6 IF MORE BYTES TO READ
| Line S00276 Modification History | |
|---|---|
M01 (Added by) | dsdi56 |
Seq # *Modification Id* Act ----------------------------+ 24247 M01S00276.dsdi56 +++| NZ X5,RBT5 IF MORE BYTES TO READ 24248 M00S19647.dsdi +++| EQ RBTX RETURN 24249 M00S19648.dsdi +++|
| Line S00277 Modification History | |
|---|---|
M01 (Added by) | dsdi56 |
Seq # *Modification Id* Act ----------------------------+ 24250 M01S00277.dsdi56 +++|* GET 12-BIT BYTES FROM *PBUF*. 24251 M01S00278.dsdi56 +++| 24252 M01S00279.dsdi56 +++| RBT6 SA1 RBTB GET CURRENT *PBUF* ADDRESS 24253 M01S00280.dsdi56 +++| SA1 X1+ 24254 M01S00281.dsdi56 +++| RBT7 NZ B5,RBT8 IF NOT END OF WORD 24255 M01S00282.dsdi56 +++| SA1 A1+1 READ NEXT WORD 24256 M01S00283.dsdi56 +++| SB5 5 RESET BYTE COUNTER 24257 M01S00284.dsdi56 +++| BX6 X1 24258 M01S00285.dsdi56 +++| RBT8 BX7 X0*X6 24259 M01S00286.dsdi56 +++| SB5 B5-B1 COUNT BYTE 24260 M01S00287.dsdi56 +++| SA7 B3 STORE NEXT BYTE 24261 M01S00288.dsdi56 +++| SB3 B3+B1 ADVANCE BUFFER ADDRESS 24262 M01S00289.dsdi56 +++| LX6 12 24263 M01S00290.dsdi56 +++| LT B3,B4,RBT7 IF MORE TO COPY 24264 M01S00291.dsdi56 +++| SX7 A1 24265 M01S00292.dsdi56 +++| SA7 RBTB SAVE CURRENT *PBUF* ADDRESS 24266 M01S00293.dsdi56 +++| EQ RBT9 RETURN 24267 M01S00294.dsdi56 +++| 24268 M01S00295.dsdi56 +++| 24269 M00S19649.dsdi +++| RBTA BSS 2 PARAMETER SAVE
| Line S00296 Modification History | |
|---|---|
M01 (Added by) | dsdi56 |
Seq # *Modification Id* Act ----------------------------+ 24270 M01S00296.dsdi56 +++| RBTB CON 0 PBUF-1 OR LAST *PBUF* WORD READ 24271 M00S19650.dsdi +++| RCM SPACE 4,15 24272 M00S19651.dsdi +++|** RCM - READ 60-BIT CM. 24273 M00S19652.dsdi +++|* 24274 M00S19653.dsdi +++|* ENTRY (B6) = FWA OF BLOCK TO READ CM. 24275 M00S19654.dsdi +++|* (B7) = LENGTH OF BLOCK. 24276 M00S19655.dsdi +++|* 24277 M00S19656.dsdi +++|* EXIT 60-BIT CM WORDS READ FROM FILE. 24278 M00S19657.dsdi +++|* 24279 M00S19658.dsdi +++|* USES X - 1, 6. 24280 M00S19659.dsdi +++|* A - 1, 6. 24281 M00S19660.dsdi +++|* B - 5, 6, 7. 24282 M00S19661.dsdi +++|* 24283 M00S19662.dsdi +++|* CALLS RCW. 24284 M00S19663.dsdi +++|* 24285 M00S19664.dsdi +++|* MACROS READO, READW. 24286 M00S19665.dsdi +++| 24287 M00S19666.dsdi +++| 24288 M00S19667.dsdi +++| RCM SUBR ENTRY/EXIT 24289 M00S19668.dsdi +++| SA1 MT 24290 M00S19669.dsdi +++| NZ X1,RCM0 IF MEMORY TYPE IS ESM 24291 M00S19670.dsdi +++| SA1 AP 24292 M00S19671.dsdi +++| NZ X1,RCM2 IF ADVANCED PROCESSOR PRESENT 24293 M00S19672.dsdi +++| RCM0 ZR B6,RCM1 IF READING ONE WORD 24294 M00S19673.dsdi +++| READW S,B6,B7 24295 M00S19674.dsdi +++| EQ RCMX RETURN 24296 M00S19675.dsdi +++| 24297 M00S19676.dsdi +++| RCM1 READO S 24298 M00S19677.dsdi +++| EQ RCMX RETURN 24299 M00S19678.dsdi +++| 24300 M00S19679.dsdi +++| RCM2 NZ B6,RCM3 IF MULTIPLE WORD TRANSFER 24301 M00S19680.dsdi +++| RJ RCW READ CYBER WORD 24302 M00S19681.dsdi +++| EQ RCMX RETURN 24303 M00S19682.dsdi +++| 24304 M00S19683.dsdi +++| RCM3 SB5 B6 SAVE CM ADDRESS 24305 M00S19684.dsdi +++| RJ RCW READ CYBER WORD 24306 M00S19685.dsdi +++| NZ X1,RCMX IF EOR 24307 M00S19686.dsdi +++| SA6 B5 24308 M00S19687.dsdi +++| SB6 B5+B1 24309 M00S19688.dsdi +++| SB7 B7-B1 24310 M00S19689.dsdi +++| NZ B7,RCM3 IF BLOCK NOT READ 24311 M00S19690.dsdi +++| EQ RCMX RETURN 24312 M00S19691.dsdi +++| RCW SPACE 4,15 24313 M00S19692.dsdi +++|** RCW - READ CYBER WORD. 24314 M00S19693.dsdi +++|* 24315 M00S19694.dsdi +++|* ENTRY UBUF CONTAINS UNPACKED 60 BIT WORDS. 24316 M00S19695.dsdi +++|* BI = INDEX INTO UBUF. 24317 M00S19696.dsdi +++|* 24318 M00S19697.dsdi +++|* EXIT (X6) = NEXT CM WORD. 24319 M00S19698.dsdi +++|* (X1) = DUMP FILE STATUS. 24320 M00S19699.dsdi +++|* UBUF UPDATED. 24321 M00S19700.dsdi +++|* 24322 M00S19701.dsdi +++|* USES X - 1, 2, 3, 6, 7. 24323 M00S19702.dsdi +++|* A - 2, 3, 6, 7. 24324 M00S19703.dsdi +++|* B - 5, 7. 24325 M00S19704.dsdi +++|* 24326 M00S19705.dsdi +++|* CALLS UPW. 24327 M00S19706.dsdi +++| 24328 M00S19707.dsdi +++| 24329 M00S19708.dsdi +++| RCW SUBR ENTRY/EXIT 24330 M00S19709.dsdi +++| SA3 BI 24331 M00S19710.dsdi +++| SA2 UBUF+16+X3 24332 M00S19711.dsdi +++| SX7 X3+B1 24333 M00S19712.dsdi +++| SA7 A3 24334 M00S19713.dsdi +++| MX1 0 24335 M00S19714.dsdi +++| BX6 X2 24336 M00S19715.dsdi +++| NZ X7,RCWX IF NOT END OF BUFFER 24337 M00S19716.dsdi +++| SA6 RCWA 24338 M00S19717.dsdi +++| SX6 B7 24339 M00S19718.dsdi +++| SA6 A6+B1 24340 M00S19719.dsdi +++| SX6 B5 24341 M00S19720.dsdi +++| SA6 A6+B1 24342 M00S19721.dsdi +++| RJ UPW READ AND UNPACK WORDS 24343 M00S19722.dsdi +++| SX6 -15 24344 M00S19723.dsdi +++| SA6 BI SET WORD INDEX 24345 M00S19724.dsdi +++| SA3 RCWA 24346 M00S19725.dsdi +++| SA2 A3+B1 24347 M00S19726.dsdi +++| SB7 X2 24348 M00S19727.dsdi +++| SA2 A2+B1 24349 M00S19728.dsdi +++| SB5 X2 24350 M00S19729.dsdi +++| BX6 X3 24351 M00S19730.dsdi +++| EQ RCWX RETURN 24352 M00S19731.dsdi +++| 24353 M00S19732.dsdi +++| 24354 M00S19733.dsdi +++| RCWA BSS 3 SAVE AREA 24355 M00S19734.dsdi +++| RDC SPACE 4,12 24356 M00S19735.dsdi +++|** RDC - READ DIRECTIVE INPUT CARD. 24357 M00S19736.dsdi +++|* 24358 M00S19737.dsdi +++|* ENTRY AF = 0 READ FROM REGULAR INPUT FILE. 24359 M00S19738.dsdi +++|* = 1 READ FROM ALTERNATE FILE TO EOR. 24360 M00S19739.dsdi +++|* = 2 READ FROM ALTERNATE FILE TO EOF. 24361 M00S19740.dsdi +++|* 24362 M00S19741.dsdi +++|* EXIT X1.NE.0 IF END OF DIRECTIVES SENSED. 24363 M00S19742.dsdi +++|* DIRECTIVE READ IN 80R1 FORMAT TO *CHAR*. 24364 M00S19743.dsdi +++|* 24365 M00S19744.dsdi +++|* USES ALL REGISTERS. 24366 M00S19745.dsdi +++|* 24367 M00S19746.dsdi +++|* CALLS CIO=,PKS,RDS=,RDO=. 24368 M00S19747.dsdi +++| 24369 M00S19748.dsdi +++| 24370 M00S19749.dsdi +++| RDC SUBR 24371 M00S19750.dsdi +++| SA1 AF 24372 M00S19751.dsdi +++| NZ X1,RDC3 IF READING FROM ALTERNATE INPUT 24373 M00S19752.dsdi +++| SX1 B1+ SET END OF DIRECTIVES 24374 M00S19753.dsdi +++| SA2 I 24375 M00S19754.dsdi +++| ZR X2,RDCX IF ZERO FET 24376 M00S19755.dsdi +++| RDC1 READS I,CHAR,80 24377 M00S19756.dsdi +++| NZ X1,RDCX IF END OF RECORD SENSED 24378 M00S19757.dsdi +++| RDC2 SB6 50 24379 M00S19758.dsdi +++| SB7 TITL1 24380 M00S19759.dsdi +++| SB2 CHAR 24381 M00S19760.dsdi +++| RJ PKS MOVE DIRECTIVE TO TITLE LINE 24382 M00S19761.dsdi +++| SA1 DP 24383 M00S19762.dsdi +++| SX6 X1+B1 24384 M00S19763.dsdi +++| SA6 A1 ADVANCE DIRECTIVES PROCESSED COUNTER 24385 M00S19764.dsdi +++| MX1 0 24386 M00S19765.dsdi +++| JP RDCX EXIT 24387 M00S19766.dsdi +++| 24388 M00S19767.dsdi +++| RDC3 READS J,CHAR,80 READ ALTERNATE INPUT FILE 24389 M00S19768.dsdi +++| ZR X1,RDC2 IF NOT END OF RECORD 24390 M00S19769.dsdi +++| NG X1,RDC4 IF END OF FILE 24391 M00S19770.dsdi +++| SA3 AF 24392 M00S19771.dsdi +++| SX3 X3-2 24393 M00S19772.dsdi +++| NZ X3,RDC4 IF READING ONLY 1 RECORD 24394 M00S19773.dsdi +++| READ X2 READ NEXT RECORD 24395 M00S19774.dsdi +++| READO X2 READ RECORD NAME 24396 M00S19775.dsdi +++| JP RDC3 CONTINUE 24397 M00S19776.dsdi +++| 24398 M00S19777.dsdi +++| RDC4 SX6 0 24399 M00S19778.dsdi +++| SA6 AF CLEAR ALTERNATE INPUT FLAG 24400 M00S19779.dsdi +++| JP RDC1 RETURN TO NORMAL INPUT FILE 24401 M00S19780.dsdi +++| RDR SPACE 4,15 24402 M00S19781.dsdi +++|** RDR - READ DUMP RECORD. 24403 M00S19782.dsdi +++|* 24404 M00S19783.dsdi +++|* ENTRY (X1) = RECORD ID TO READ. 24405 M00S19784.dsdi +++|* 24406 M00S19785.dsdi +++|* EXIT (X2) = FIRST WORD OF RECORD. 24407 M00S19786.dsdi +++|* = 0, IF RECORD NOT FOUND. 24408 M00S19787.dsdi +++|*
| Line S19788 Modification History | |
|---|---|
M01 (Removed by) | dsdi67 |
Seq # *Modification Id* Act ----------------------------+ 24409 M01S19788.dsdi67 ---|* USES X - 0, 1, 2, 3, 6. 24410 M01S19789.dsdi67 ---|* A - 1, 2, 3, 6. 24411 M01S19790.dsdi67 ---|* B - 3, 7.
| Line S00234 Modification History | |
|---|---|
M01 (Added by) | dsdi67 |
Seq # *Modification Id* Act ----------------------------+ 24412 M01S00234.dsdi67 +++|* USES X - 1, 2, 3, 6. 24413 M01S00235.dsdi67 +++|* A - 1, 2, 6. 24414 M00S19791.dsdi +++|*
| Line S19792 Modification History | |
|---|---|
M01 (Removed by) | dsdi67 |
Seq # *Modification Id* Act ----------------------------+ 24415 M01S19792.dsdi67 ---|* CALLS CNR, PDF.
| Line S00236 Modification History | |
|---|---|
M01 (Added by) | dsdi67 |
Seq # *Modification Id* Act ----------------------------+ 24416 M01S00236.dsdi67 +++|* CALLS FPR, PDF. 24417 M00S19793.dsdi +++|*
| Line S19794 Modification History | |
|---|---|
M01 (Removed by) | dsdi67 |
Seq # *Modification Id* Act ----------------------------+ 24418 M01S19794.dsdi67 ---|* MACROS READW, SEARCH.
| Line S00237 Modification History | |
|---|---|
M01 (Added by) | dsdi67 |
Seq # *Modification Id* Act ----------------------------+ 24419 M01S00237.dsdi67 +++|* MACROS READW. 24420 M00S19795.dsdi +++| 24421 M00S19796.dsdi +++| 24422 M00S19797.dsdi +++| RDR SUBR ENTRY/EXIT
| Line S19798 Modification History | |
|---|---|
M01 (Removed by) | dsdi67 |
Seq # *Modification Id* Act ----------------------------+ 24423 M01S19798.dsdi67 ---| ZR X1,RDR1 IF SECOND CALL FOR PROCESSOR REGISTERS 24424 M01S19799.dsdi67 ---| MX0 18 24425 M01S19800.dsdi67 ---| SEARCH TDIR,X1,X0 24426 M01S19801.dsdi67 ---| ZR X2,RDRX IF RECORD NOT FOUND 24427 M01S19802.dsdi67 ---| EQ RDR2 PROCESS FIRST RECORD 24428 M01S19803.dsdi67 ---| 24429 M01S19804.dsdi67 ---| 24430 M01S19805.dsdi67 ---|* READ MAINTENANCE REGISTERS RECORD. 24431 M01S19806.dsdi67 ---| 24432 M01S19807.dsdi67 ---| RDR1 SA1 RDRB NEXT DIRECTORY TABLE ENTRY 24433 M01S19808.dsdi67 ---| SA2 X1 24434 M01S19809.dsdi67 ---| RDR2 SB3 RDRB 24435 M01S19810.dsdi67 ---| SB7 C.TDIR 24436 M01S19811.dsdi67 ---| SA3 DMRA 24437 M01S19812.dsdi67 ---| RJ CNR CHECK NEXT RECORD 24438 M01S19813.dsdi67 ---| BX6 X2 SAVE FIRST WORD OF RECORD 24439 M01S19814.dsdi67 ---| SA1 A2+B1 SET RANDOM INDEX
| Line S00238 Modification History | |
|---|---|
M01 (Added by) | dsdi67 |
Seq # *Modification Id* Act ----------------------------+ 24440 M01S00238.dsdi67 +++| SX6 B0+ SET NO RADIAL MCI DISPLAY 24441 M01S00239.dsdi67 +++| RJ FPR FIND RECORD 24442 M01S00240.dsdi67 +++| ZR X2,RDRX IF RECORD NOT FOUND 24443 M01S00241.dsdi67 +++| BX6 X2 SAVE FIRST WORD OF TABLE ENTRY 24444 M01S00242.dsdi67 +++| SX3 B0 24445 M00S19815.dsdi +++| SA6 RDRA
| Line S19816 Modification History | |
|---|---|
M01 (Removed by) | dsdi67 |
Seq # *Modification Id* Act ----------------------------+ 24446 M01S19816.dsdi67 ---| BX6 X1 24447 M01S19817.dsdi67 ---| SX3 B0 POSITION DUMP FILE 24448 M01S19818.dsdi67 ---| SA6 RI 24449 M01S19819.dsdi67 ---| RJ PDF
| Line S00243 Modification History | |
|---|---|
M01 (Added by) | dsdi67 |
Seq # *Modification Id* Act ----------------------------+ 24450 M01S00243.dsdi67 +++| RJ PDF POSITION DUMP FILE 24451 M00S19820.dsdi +++| SA1 RI READ MAINTENANCE REGISTERS RECORD 24452 M00S19821.dsdi +++| AX1 30 24453 M00S19822.dsdi +++| BX6 X6-X6 24454 M00S19823.dsdi +++| SA6 BUF+X1 24455 M00S19824.dsdi +++| SA6 BUF+1+X1 24456 M00S19825.dsdi +++| READW S,BUF,X1
| Line S19826 Modification History | |
|---|---|
M01 (Removed by) | dsdi67 |
Seq # *Modification Id* Act ----------------------------+ 24457 M01S19826.dsdi67 ---| SA2 RDRA RETURN FIRST WORD OF DUMP RECORD
| Line S00244 Modification History | |
|---|---|
M01 (Added by) | dsdi67 |
Seq # *Modification Id* Act ----------------------------+ 24458 M01S00244.dsdi67 +++| SA2 RDRA RETURN FIRST WORD OF TABLE ENTRY 24459 M00S19827.dsdi +++| EQ RDRX RETURN 24460 M00S19828.dsdi +++| 24461 M00S19829.dsdi +++|
| Line S19830 Modification History | |
|---|---|
M01 (Removed by) | dsdi67 |
Seq # *Modification Id* Act ----------------------------+ 24462 M01S19830.dsdi67 ---| RDRA DATA 0 FIRST WORD OF DUMP RECORD 24463 M01S19831.dsdi67 ---| RDRB CON 0 NEXT DIRECTORY TABLE ENTRY POINTER
| Line S00245 Modification History | |
|---|---|
M01 (Added by) | dsdi67 |
Seq # *Modification Id* Act ----------------------------+ 24464 M01S00245.dsdi67 +++| RDRA DATA 0 FIRST WORD OF DIRECTORY TABLE ENTRY
| Line S19832 Modification History | |
|---|---|
M01 (Removed by) | ns2647 |
Seq # *Modification Id* Act ----------------------------+ 24465 M01S19832.ns2647 ---| RIU SPACE 4,15 24466 M01S19833.ns2647 ---|** RIU - READ IOU PP IMAGE. 24467 M01S19834.ns2647 ---|* 24468 M01S19835.ns2647 ---|* ENTRY (PP) = PP NUMBER. 24469 M01S19836.ns2647 ---|* 24470 M01S19837.ns2647 ---|* EXIT IOU IMAGE IN PBUF - PBUF+IUBUFL. 24471 M01S19838.ns2647 ---|* 24472 M01S19839.ns2647 ---|* USES A - 2. 24473 M01S19840.ns2647 ---|* X - 2. 24474 M01S19841.ns2647 ---|* 24475 M01S19842.ns2647 ---|* CALLS BPN, CPD, SPD. 24476 M01S19843.ns2647 ---|* 24477 M01S19844.ns2647 ---|* MACROS SEARCH. 24478 M01S19845.ns2647 ---| 24479 M01S19846.ns2647 ---| 24480 M01S19847.ns2647 ---| RIU SUBR ENTRY/EXIT 24481 M01S19848.ns2647 ---| RJ BPN BUILD PP NAME 24482 M01S19849.ns2647 ---| SEARCH TDIR,X7,X0 FIND SELECTED PP 24483 M01S19850.ns2647 ---| ZR X2,ERR7 IF NOT FOUND 24484 M01S19851.ns2647 ---| SA2 A2+B1 SET RANDOM INDEX 24485 M01S19852.ns2647 ---| RJ SPD SET UP PP/CPP DUMP 24486 M01S19853.ns2647 ---| RJ CPD COPY PP DATA TO BUFFER 24487 M01S19854.ns2647 ---| EQ RIUX RETURN 24488 M00S19855.dsdi +++| RMB SPACE 4,10 24489 M00S19856.dsdi +++|** RMB - READ MEMORY BYTES. 24490 M00S19857.dsdi +++|* 24491 M00S19858.dsdi +++|* ENTRY (X1) = SVA OF BYTES TO READ. 24492 M00S19859.dsdi +++|* (X6) = NUMBER OF WORDS OF BYTES TO READ. 24493 M00S19860.dsdi +++|* 24494 M00S19861.dsdi +++|* EXIT (BUF - BUF+X6*4-1) = 16 BIT DATA CHUNKS. 24495 M00S19862.dsdi +++|* 24496 M00S19863.dsdi +++|* USES A - 0, 2, 3, 6, 7. 24497 M00S19864.dsdi +++|* X - 4, 6. 24498 M00S19865.dsdi +++|* B - 2. 24499 M00S19866.dsdi +++|* 24500 M00S19867.dsdi +++|* CALLS CPC, NXB. 24501 M00S19868.dsdi +++| 24502 M00S19869.dsdi +++| 24503 M00S19870.dsdi +++| RMB SUBR ENTRY/EXIT 24504 M00S19871.dsdi +++| SA6 RMBA SAVE NUMBER OF WORDS TO READ 24505 M00S19872.dsdi +++| BX6 X1 24506 M00S19873.dsdi +++| SA6 A6+B1 SAVE CURRENT SVA 24507 M00S19874.dsdi +++| SA0 BUF+1 24508 M00S19875.dsdi +++| RMB1 SB2 RMBA+1 CHECK IF CROSSING A PAGE BOUNDARY 24509 M00S19876.dsdi +++| RJ CPC 24510 M00S19877.dsdi +++| NZ X2,ERR30 IF PAGE ENTRY NOT PRESENT 24511 M00S19878.dsdi +++| RJ NXB GET NEXT 16 BITS 24512 M00S19879.dsdi +++| BX6 X1 24513 M00S19880.dsdi +++| SA6 A0-B1 24514 M00S19881.dsdi +++| RJ NXB AND THE NEXT 24515 M00S19882.dsdi +++| BX6 X1 24516 M00S19883.dsdi +++| SA6 A0 24517 M00S19884.dsdi +++| RJ NXB AND THE NEXT 24518 M00S19885.dsdi +++| BX6 X1 24519 M00S19886.dsdi +++| SA6 A0+B1 24520 M00S19887.dsdi +++| RJ NXB AND THE LAST 24521 M00S19888.dsdi +++| SA2 RMBA FETCH SVA 24522 M00S19889.dsdi +++| SA3 A2+B1 24523 M00S19890.dsdi +++| BX6 X1 24524 M00S19891.dsdi +++| SA6 A0+2 24525 M00S19892.dsdi +++| SX6 X2-1 24526 M00S19893.dsdi +++| SX4 8 24527 M00S19894.dsdi +++| SA0 A0+4 24528 M00S19895.dsdi +++| IX7 X4+X3 24529 M00S19896.dsdi +++| SA6 A2 24530 M00S19897.dsdi +++| SA7 A3 INCREMENT SVA 24531 M00S19898.dsdi +++| NZ X2,RMB1 IF MORE WORDS TO READ 24532 M00S19899.dsdi +++| JP RMBX RETURN 24533 M00S19900.dsdi +++| 24534 M00S19901.dsdi +++| RMBA BSS 2 24535 M00S19902.dsdi +++| RMR SPACE 4,15 24536 M00S19903.dsdi +++|** RMR - READ MAINTENANCE REGISTER. 24537 M00S19904.dsdi +++|* 24538 M00S19905.dsdi +++|* ENTRY (LPWA+1) = WORD OFFSET. 24539 M00S19906.dsdi +++|* 24540 M00S19907.dsdi +++|* EXIT (X1) = 0 IF END OF REGISTERS. 24541 M00S19908.dsdi +++|* (RMRA) = REGISTER LENGTH. 24542 M00S19909.dsdi +++|* (RMRB) = REGISTER NUMBER. 24543 M00S19910.dsdi +++|* (MRBF,MRBF+7) = 1ST 64 BITS OF REGISTER. 24544 M00S19911.dsdi +++|* 24545 M00S19912.dsdi +++|* USES B - 3, 4. 24546 M00S19913.dsdi +++|* A - 6, 7. 24547 M00S19914.dsdi +++|* X - 1, 7. 24548 M00S19915.dsdi +++|* 24549 M00S19916.dsdi +++|* CALLS LPW. 24550 M00S19917.dsdi +++| 24551 M00S19918.dsdi +++| 24552 M00S19919.dsdi +++| RMR SUBR ENTRY/EXIT 24553 M00S19920.dsdi +++| RJ LPW GET REGISTER LENGTH 24554 M00S19921.dsdi +++| ZR X1,RMRX IF END OF REGISTERS 24555 M00S19922.dsdi +++| SX7 X6 24556 M00S19923.dsdi +++| RJ LPW GET REGISTER NUMBER 24557 M00S19924.dsdi +++| SA7 RMRA 24558 M00S19925.dsdi +++| SA6 A7+B1 24559 M00S19926.dsdi +++| SB4 B0 24560 M00S19927.dsdi +++| SB3 X7 24561 M00S19928.dsdi +++| RMR1 RJ LPW GET ANOTHER 8 BITS OF REGISTER 24562 M00S19929.dsdi +++| SA6 MRBF+B4 24563 M00S19930.dsdi +++| SB4 B4+B1 24564 M00S19931.dsdi +++| MX1 1 24565 M00S19932.dsdi +++| NE B3,B4,RMR1 IF MORE BYTES TO GET 24566 M00S19933.dsdi +++| EQ RMRX RETURN 24567 M00S19934.dsdi +++| 24568 M00S19935.dsdi +++| 24569 M00S19936.dsdi +++| RMRA CON 0 REGISTER LENGTH 24570 M00S19937.dsdi +++| RMRB CON 0 REGISTER NUMBER 24571 M00S19938.dsdi +++| RNF SPACE 4,20 24572 M00S19939.dsdi +++|** RNF - READ NEGATIVE FL OF CONTROL POINT. 24573 M00S19940.dsdi +++|*
| Line S19941 Modification History | |
|---|---|
M01 (Removed by) | dsdi89 |
Seq # *Modification Id* Act ----------------------------+ 24574 M01S19941.dsdi89 ---|* ENTRY (CN) = CONTROL POINT NUMBER.
| Line S00402 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
M02 (Removed by) | dsdi89 |
Seq # *Modification Id* Act ----------------------------+ 24575 M02S00402.dsdi89 ---|* (OP) = PCPA FWA OFFSET (0 IF DUMPING CONTROL POINTS).
| Line S00135 Modification History | |
|---|---|
M01 (Added by) | dsdi89 |
Seq # *Modification Id* Act ----------------------------+ 24576 M01S00135.dsdi89 +++|* ENTRY (X2) = CONTROL POINT NUMBER. 24577 M01S00136.dsdi89 +++|* (X1) = PCPA FWA OFFSET (0 IF DUMPING CONTROL POINTS). 24578 M00S19942.dsdi +++|* 24579 M00S19943.dsdi +++|* EXIT (RC) = RA. 24580 M00S19944.dsdi +++|* (FC) = FL. 24581 M00S19945.dsdi +++|* TABLE TNFL CONTAINS NFL DATA. 24582 M00S19946.dsdi +++|* 24583 M00S19947.dsdi +++|* ERROR TO *ERR8*, IF CONTROL POINT NUMBER IS ZERO. 24584 M00S19948.dsdi +++|*
| Line S19949 Modification History | |
|---|---|
M01 (Removed by) | dsdi71a |
Seq # *Modification Id* Act ----------------------------+ 24585 M01S19949.dsdi71a ---|* USES X - 1, 2, 3, 6, 7. 24586 M01S19950.dsdi71a ---|* A - 1, 2, 7.
| Line S00069 Modification History | |
|---|---|
M01 (Added by) | dsdi71a |
Seq # *Modification Id* Act ----------------------------+ 24587 M01S00069.dsdi71a +++|* USES X - 1, 2, 6, 7. 24588 M01S00070.dsdi71a +++|* A - 1, 2, 6, 7. 24589 M00S19951.dsdi +++|* B - 2. 24590 M00S19952.dsdi +++|*
| Line S19953 Modification History | |
|---|---|
M01 (Removed by) | dsdi71a |
Seq # *Modification Id* Act ----------------------------+ 24591 M01S19953.dsdi71a ---|* CALLS POM.
| Line S00071 Modification History | |
|---|---|
M01 (Added by) | dsdi71a |
Seq # *Modification Id* Act ----------------------------+ 24592 M01S00071.dsdi71a +++|* CALLS GFL, POM. 24593 M00S19954.dsdi +++|* 24594 M00S19955.dsdi +++|* MACROS ALLOC, GETCM. 24595 M00S19956.dsdi +++| 24596 M00S19957.dsdi +++| 24597 M00S19958.dsdi +++| RNF SUBR ENTRY/EXIT
| Line S19959 Modification History | |
|---|---|
M01 (Removed by) | dsdi71a |
Seq # *Modification Id* Act ----------------------------+ 24598 M01S19959.dsdi71a ---| SA1 F.TCMT FORM CONTROL POINT AREA ADDRESS
| Line S19960 Modification History | |
|---|---|
M01 (Removed by) | dsdi89 |
Seq # *Modification Id* Act ----------------------------+ 24599 M01S19960.dsdi89 ---| SA2 CN
| Line S19961 Modification History | |
|---|---|
M01 (Removed by) | dsdi69 |
Seq # *Modification Id* Act ----------------------------+ 24600 M01S19961.dsdi69 ---| ZR X2,ERR8 IF CONTROL POINT ZERO
| Line S00053 Modification History | |
|---|---|
M01 (Added by) | dsdi69 |
Seq # *Modification Id* Act ----------------------------+ 24601 M01S00053.dsdi69 +++| ZR X2,ERR8.1 IF CONTROL POINT ZERO 24602 M00S19962.dsdi +++| LX2 7
| Line S19963 Modification History | |
|---|---|
M01 (Removed by) | dsdi71a |
Seq # *Modification Id* Act ----------------------------+ 24603 M01S19963.dsdi71a ---| IX2 X1+X2
| Line S00403 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
M02 (Removed by) | dsdi89 |
Seq # *Modification Id* Act ----------------------------+ 24604 M02S00403.dsdi89 ---| SA1 OP ADD PCPA OFFSET
| Line S00404 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
M02 (Removed by) | dsdi71a |
Seq # *Modification Id* Act ----------------------------+ 24605 M02S00404.dsdi71a ---| IX2 X1+X2
| Line S19964 Modification History | |
|---|---|
M01 (Removed by) | dsdi71a |
Seq # *Modification Id* Act ----------------------------+ 24606 M01S19964.dsdi71a ---| SA2 X2+FLSW GET FL 24607 M01S19965.dsdi71a ---| MX3 -12 24608 M01S19966.dsdi71a ---| BX7 -X3*X2 24609 M01S19967.dsdi71a ---| LX7 6 24610 M01S19968.dsdi71a ---| AX2 12 GET RA
| Line S00072 Modification History | |
|---|---|
M01 (Added by) | dsdi71a |
Seq # *Modification Id* Act ----------------------------+ 24611 M01S00072.dsdi71a +++| IX1 X1+X2 24612 M01S00073.dsdi71a +++| RJ GFL GET FL, RA 24613 M00S19969.dsdi +++| SA7 FC
| Line S19970 Modification History | |
|---|---|
M01 (Removed by) | dsdi71a |
Seq # *Modification Id* Act ----------------------------+ 24614 M01S19970.dsdi71a ---| MX7 -15 24615 M01S19971.dsdi71a ---| BX7 -X7*X2 24616 M01S19972.dsdi71a ---| LX7 6 24617 M01S19973.dsdi71a ---| SA7 RC
| Line S00074 Modification History | |
|---|---|
M01 (Added by) | dsdi71a |
Seq # *Modification Id* Act ----------------------------+ 24618 M01S00074.dsdi71a +++| SA6 RC 24619 M00S19974.dsdi +++| AX2 36 GET NFL
| Line S19975 Modification History | |
|---|---|
M01 (Removed by) | dsdi71a |
Seq # *Modification Id* Act ----------------------------+ 24620 M01S19975.dsdi71a ---| BX6 -X3*X2
| Line S00075 Modification History | |
|---|---|
M01 (Added by) | dsdi71a |
Seq # *Modification Id* Act ----------------------------+ 24621 M01S00075.dsdi71a +++| MX6 -12 24622 M01S00076.dsdi71a +++| BX6 -X6*X2 24623 M00S19976.dsdi +++| LX6 6 24624 M00S19977.dsdi +++| SA2 L.TNFL ALLOCATE SPACE FOR NFL 24625 M00S19978.dsdi +++| IX1 X6-X2 24626 M00S19979.dsdi +++| ALLOC TNFL,X1 24627 M00S19980.dsdi +++| SA1 RC POSITION DUMP FILE 24628 M00S19981.dsdi +++| SA2 L.TNFL 24629 M00S19982.dsdi +++| IX7 X1-X2 24630 M00S19983.dsdi +++| SA7 CPRA 24631 M00S19984.dsdi +++| SB2 A7 24632 M00S19985.dsdi +++| RJ POM POSITION TO CM WORD 24633 M00S19986.dsdi +++| SA2 L.TNFL LENGTH TO READ 24634 M00S19987.dsdi +++| SA1 F.TNFL BUFFER ADDRESS 24635 M00S19988.dsdi +++| ZR X2,RNFX IF NO NFL TO READ 24636 M00S19989.dsdi +++| GETCM X1,X2 24637 M00S19990.dsdi +++| EQ RNFX RETURN 24638 M00S19991.dsdi +++| RPB SPACE 4,10 24639 M00S19992.dsdi +++|** RPB - READ PPU BYTE. 24640 M00S19993.dsdi +++|* 24641 M00S19994.dsdi +++|* ENTRY X1 = PPU ADDRESS TO READ. 24642 M00S19995.dsdi +++|* PPU DATA IS AT *PBUF*. 24643 M00S19996.dsdi +++|* 24644 M00S19997.dsdi +++|* EXIT X6 = PPU BYTE READ LEFT JUSTIFIED. 24645 M00S19998.dsdi +++|* 24646 M00S19999.dsdi +++|* USES X - 1,2,3,6. 24647 M00S20000.dsdi +++|* B - 7. 24648 M00S20001.dsdi +++|* A - 2. 24649 M00S20002.dsdi +++| 24650 M00S20003.dsdi +++| 24651 M00S20004.dsdi +++| RPB SUBR 24652 M00S20005.dsdi +++| BX3 X1 24653 M00S20006.dsdi +++| SX2 5 24654 M00S20007.dsdi +++| IX2 X3/X2 CPU WORD ORDINAL = AD/5 24655 M00S20008.dsdi +++| SX3 5 24656 M00S20009.dsdi +++| IX3 X2*X3 COMPUTE BYTE POS = AD-(AD/5)*5 24657 M00S20010.dsdi +++| IX3 X1-X3 24658 M00S20011.dsdi +++| SX1 12 24659 M00S20012.dsdi +++| IX1 X1*X3 24660 M00S20013.dsdi +++| SB7 X1 SHIFT COUNT 24661 M00S20014.dsdi +++| MX1 12 24662 M00S20015.dsdi +++| SA2 X2+PBUF READ WORD 24663 M00S20016.dsdi +++| LX2 X2,B7 POSITION TO BYTE 24664 M00S20017.dsdi +++| BX6 X1*X2 EXTRACT BYTE 24665 M00S20018.dsdi +++| JP RPBX EXIT 24666 M00S20019.dsdi +++| RPD SPACE 4,12 24667 M00S20020.dsdi +++|** RPD - READ PPU DATA TO CORE. 24668 M00S20021.dsdi +++|*
| Line S20022 Modification History | |
|---|---|
M01 (Removed by) | ns2647 |
Seq # *Modification Id* Act ----------------------------+ 24669 M01S20022.ns2647 ---|* ENTRY PP = PPU NUMBER.
| Line S00315 Modification History | |
|---|---|
M01 (Added by) | ns2647 |
Seq # *Modification Id* Act ----------------------------+ 24670 M01S00315.ns2647 +++|* ENTRY (PP) = PPU NUMBER. 24671 M00S20023.dsdi +++|* 24672 M00S20024.dsdi +++|* EXIT ALL OF REQUESTED PPU STORED AT *PBUF*.
| Line S20025 Modification History | |
|---|---|
M01 (Removed by) | ns2647 |
Seq # *Modification Id* Act ----------------------------+ 24673 M01S20025.ns2647 ---|* BPNA = PPU NAME. 24674 M01S20026.ns2647 ---|* 24675 M01S20027.ns2647 ---|* SAVES B - 1. 24676 M01S20028.ns2647 ---|* A - 0. 24677 M01S20029.ns2647 ---|* 24678 M01S20030.ns2647 ---|* CALLS BPN, CPD, NXB, PDF, SFN.
| Line S00316 Modification History | |
|---|---|
M01 (Added by) | ns2647 |
Seq # *Modification Id* Act ----------------------------+ 24679 M01S00316.ns2647 +++|* (BPNA) = PPU NAME. 24680 M01S00317.ns2647 +++|* 24681 M01S00318.ns2647 +++|* USES X - 0, 1, 2, 3, 4, 5, 6. 24682 M01S00319.ns2647 +++|* A - 1, 2, 3, 6. 24683 M01S00320.ns2647 +++|* B - 2, 6, 7. 24684 M01S00321.ns2647 +++|* 24685 M01S00322.ns2647 +++|* CALLS BPN, CPD, CPN, NXB, PDF, SFN. 24686 M00S20031.dsdi +++|* 24687 M00S20032.dsdi +++|* MACROS READW, SEARCH. 24688 M00S20033.dsdi +++| 24689 M00S20034.dsdi +++| 24690 M00S20035.dsdi +++| RPD SUBR 24691 M00S20036.dsdi +++| RJ BPN BUILD PPU NAME 24692 M00S20037.dsdi +++| SA1 F.TCMT 24693 M00S20038.dsdi +++| SB2 X1 SET TCMT TABLE ADDRESS 24694 M00S20039.dsdi +++| MX4 24 24695 M00S20040.dsdi +++| SA1 PC GET PP COMMUNICATION AREA POINTER
| Line S20041 Modification History | |
|---|---|
M01 (Removed by) | ns2647 |
Seq # *Modification Id* Act ----------------------------+ 24696 M01S20041.ns2647 ---| SA2 PP PPU NUMBER 24697 M01S20042.ns2647 ---| SA3 NP 24698 M01S20043.ns2647 ---| SX7 X2-12B 24699 M01S20044.ns2647 ---| NG X7,RPD1 IF NOT UPPER PPUS 24700 M01S20045.ns2647 ---| SX2 X2+12B-20B CORRECT FOR UPPER PPU BANK 24701 M01S20046.ns2647 ---| RPD1 SA5 IC 24702 M01S20047.ns2647 ---| ZR X5,RPD1.0 IF *CPP* RECORDS NOT CHOSEN 24703 M01S20048.ns2647 ---| IX2 X2+X3
| Line S00323 Modification History | |
|---|---|
M01 (Added by) | ns2647 |
Seq # *Modification Id* Act ----------------------------+ 24704 M01S00323.ns2647 +++| RJ CPN CONVERT PP/CPP NUMBER 24705 M01S00324.ns2647 +++| ZR X3,RPD1 IF *CPP* RECORDS NOT CHOSEN 24706 M00S20049.dsdi +++| MX4 30
| Line S20050 Modification History | |
|---|---|
M01 (Removed by) | ns2647 |
Seq # *Modification Id* Act ----------------------------+ 24707 M01S20050.ns2647 ---| RPD1.0 LX2 3 24708 M01S20051.ns2647 ---| IX1 X1+X2
| Line S00325 Modification History | |
|---|---|
M01 (Added by) | ns2647 |
Seq # *Modification Id* Act ----------------------------+ 24709 M01S00325.ns2647 +++| RPD1 LX6 3 24710 M01S00326.ns2647 +++| IX1 X1+X6 24711 M00S20052.dsdi +++| SA2 X1+B2 24712 M00S20053.dsdi +++| MX3 18 24713 M00S20054.dsdi +++| BX1 X3*X2 EXTRACT PROGRAM NAME 24714 M00S20055.dsdi +++| RJ SFN SPACEFILL NAME 24715 M00S20056.dsdi +++| LX6 24 24716 M00S20057.dsdi +++| SA1 BPNA+1 24717 M00S20058.dsdi +++| BX6 -X4*X6 24718 M00S20059.dsdi +++| BX6 X6+X1 MERGE PP AND PROGRAM NAMES 24719 M00S20060.dsdi +++| SA1 A1-B1 GET PP RECORD NAME 24720 M00S20061.dsdi +++| SA6 SBTL1 STORE IN SUBTITLE LINE 24721 M00S20062.dsdi +++| SEARCH TDIR,X1,X0 24722 M00S20063.dsdi +++| ZR X2,ERR7 IF NO SUCH PPU 24723 M00S20064.dsdi +++| SA1 A2+B1 24724 M00S20065.dsdi +++| BX6 X1 24725 M00S20066.dsdi +++| SA6 RI SET RANDOM ADDRESS OF REQUESTED PPU 24726 M00S20067.dsdi +++| SX3 0 24727 M00S20068.dsdi +++| RJ PDF POSITION DUMP FILE 24728 M00S20069.dsdi +++| SA3 AP 24729 M00S20070.dsdi +++| NZ X3,RPD2 IF IOU TO BE READ 24730 M00S20071.dsdi +++| READW X2,PBUF,PBUFL READ ENTIRE PPU TO CORE 24731 M00S20072.dsdi +++| JP RPDX EXIT 24732 M00S20073.dsdi +++| 24733 M00S20074.dsdi +++| RPD2 RJ CPD COPY PP DATA TO BUFFER 24734 M00S20075.dsdi +++| SB7 B0 STORING INDEX INTO PBUF
| Line S20076 Modification History | |
|---|---|
M01 (Removed by) | dsdi56 |
Seq # *Modification Id* Act ----------------------------+ 24735 M01S20076.dsdi56 ---| SB6 5 24736 M01S20077.dsdi56 ---| BX5 X5-X5 24737 M00S20078.dsdi +++| MX0 -12
| Line S20079 Modification History | |
|---|---|
M01 (Removed by) | dsdi56 |
Seq # *Modification Id* Act ----------------------------+ 24738 M01S20079.dsdi56 ---| RPD3 RJ NXB GET FIRST BYTE OF DATA
| Line S00297 Modification History | |
|---|---|
M01 (Added by) | dsdi56 |
Seq # *Modification Id* Act ----------------------------+ 24739 M01S00297.dsdi56 +++| RPD3 SB6 5 24740 M01S00298.dsdi56 +++| SX5 B0+ 24741 M01S00299.dsdi56 +++| RPD4 RJ NXB GET FIRST BYTE OF DATA 24742 M00S20080.dsdi +++| LX5 12 24743 M00S20081.dsdi +++| BX2 -X0*X1
| Line S20082 Modification History | |
|---|---|
M01 (Removed by) | dsdi56 |
Seq # *Modification Id* Act ----------------------------+ 24744 M01S20082.dsdi56 ---| IX5 X5+X2 24745 M00S20083.dsdi +++| SB6 B6-B1
| Line S20084 Modification History | |
|---|---|
M01 (Removed by) | dsdi56 |
Seq # *Modification Id* Act ----------------------------+ 24746 M01S20084.dsdi56 ---| NZ B6,RPD3 IF MORE BYTES TO COLLECT
| Line S00300 Modification History | |
|---|---|
M01 (Added by) | dsdi56 |
Seq # *Modification Id* Act ----------------------------+ 24747 M01S00300.dsdi56 +++| BX5 X5+X2 24748 M01S00301.dsdi56 +++| NZ B6,RPD4 IF MORE BYTES TO COLLECT 24749 M01S00302.dsdi56 +++| SA1 PS BYTES IN PP (4096 OR 8192) 24750 M00S20085.dsdi +++| BX6 X5
| Line S20086 Modification History | |
|---|---|
M01 (Removed by) | dsdi56 |
Seq # *Modification Id* Act ----------------------------+ 24751 M01S20086.dsdi56 ---| SA6 PBUF+B7 SAVE PP BYTES
| Line S00303 Modification History | |
|---|---|
M01 (Added by) | dsdi56 |
Seq # *Modification Id* Act ----------------------------+ 24752 M01S00303.dsdi56 +++| SX5 B7+B1 WORDS MOVED 24753 M00S20087.dsdi +++| SB7 B7+B1
| Line S20088 Modification History | |
|---|---|
M01 (Removed by) | dsdi56 |
Seq # *Modification Id* Act ----------------------------+ 24754 M01S20088.dsdi56 ---| SB6 5 24755 M01S20089.dsdi56 ---| BX5 X5-X5 24756 M01S20090.dsdi56 ---| SB4 PBUFL 24757 M01S20091.dsdi56 ---| NE B7,B4,RPD3 IF MORE WORDS TO READ
| Line S00304 Modification History | |
|---|---|
M01 (Added by) | dsdi56 |
Seq # *Modification Id* Act ----------------------------+ 24758 M01S00304.dsdi56 +++| LX5 2 24759 M01S00305.dsdi56 +++| SA6 PBUF-1+B7 SAVE PP BYTES 24760 M01S00306.dsdi56 +++| SX6 X5+B7 BYTES MOVED 24761 M01S00307.dsdi56 +++| IX6 X6-X1 24762 M01S00308.dsdi56 +++| NG X6,RPD3 IF MORE TO MOVE 24763 M00S20092.dsdi +++| EQ RPDX RETURN 24764 M00S20093.dsdi +++| RSP SPACE 4,14 24765 M00S20094.dsdi +++|** RSP - RESET PRINT DENSITY SELECTION. 24766 M00S20095.dsdi +++|* 24767 M00S20096.dsdi +++|* ENTRY X1 = 1L3 FOR 3 LINES PER INCH. 24768 M00S20097.dsdi +++|* 1L4 FOR 4 LINES PER INCH. 24769 M00S20098.dsdi +++|* 1L6 FOR 6 LINES PER INCH. 24770 M00S20099.dsdi +++|* 1L8 FOR 8 LINES PER INCH. 24771 M00S20100.dsdi +++|* 24772 M00S20101.dsdi +++|* EXIT CCCH = 1R0 FOR 3 OR 4 LINES PER INCH. 24773 M00S20102.dsdi +++|* 1R FOR 6 OR 8 LINES PER INCH. 24774 M00S20103.dsdi +++|* PD = NUMBER OF LINES PER PAGE. 24775 M00S20104.dsdi +++|* 24776 M00S20105.dsdi +++|* USES ALL REGISTERS. 24777 M00S20106.dsdi +++|* 24778 M00S20107.dsdi +++|* CALLS WTO=. 24779 M00S20108.dsdi +++| 24780 M00S20109.dsdi +++| 24781 M00S20110.dsdi +++| RSP SUBR 24782 M00S20111.dsdi +++| SB2 RSPA OPTION TABLE ADDRESS 24783 M00S20112.dsdi +++| MX0 6 24784 M00S20113.dsdi +++| RSP1 SA2 B2 READ OPTION TABLE 24785 M00S20114.dsdi +++| SB2 B2+B1
Proceed to Part 16
cdc/nos2.source/opl.opl871/deck/dsdi.015.txt · Last modified: (external edit)