cdc:nos2.source:opl.opl871:deck:tst
Deck TST
Library Member Format: MODIFY
Source
Seq # *Modification Id* Act ----------------------------+ 00001 M00S00001.tst +++| IDENT TST,FET 00002 M00S00002.tst +++| ABS 00003 M00S00003.tst +++| SST FL 00004 M00S00004.tst +++| ENTRY TST 00005 M00S00005.tst +++| ENTRY MFL= 00006 M00S00006.tst +++| ENTRY SSJ= 00007 M00S00007.tst +++| SYSCOM B1 00008 M00S00008.tst +++|*COMMENT TST - TAPE STORAGE TEST.
| Line S00009 Modification History | |
|---|---|
M01 (Removed by) | 281l803 |
Seq # *Modification Id* Act ----------------------------+ 00009 M01S00009.281l803 ---| COMMENT COPYRIGHT CONTROL DATA CORP. 1970.
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | 281l803 |
Seq # *Modification Id* Act ----------------------------+ 00010 M01S00001.281l803 +++| COMMENT COPYRIGHT CONTROL DATA SYSTEMS INC. 1992. 00011 M00S00010.tst +++| TITLE TST - TAPE STORAGE TEST. 00012 M00S00011.tst +++| SPACE 4 00013 M00S00012.tst +++|*** TST - TAPE STORAGE TEST. 00014 M00S00013.tst +++|* P. C. SMITH. 91/11/08. 00015 M00S00014.tst +++| SPACE 4 00016 M00S00015.tst +++|*** TST IS A CENTRAL PROCESSOR DRIVEN TAPE STORAGE TEST. IT 00017 M00S00016.tst +++|* PERFORMS SEQUENTIAL WRITES AND READS ON A SELECTED TAPE 00018 M00S00017.tst +++|* DEVICE, AND REPORTS THE PERFORMANCE ACHIEVED. 00019 M00S00018.tst +++|* 00020 M00S00019.tst +++|* OPERATING INSTRUCTIONS. 00021 M00S00020.tst +++|* WHEN CALLED, TST ASSUMES THAT THE FILE *TAPE1* HAS BEEN 00022 M00S00021.tst +++|* PREASSIGNED. 00023 M00S00022.tst +++|* 00024 M00S00023.tst +++|* SEQUENTIAL WRITE. 00025 M00S00024.tst +++|* RANDOM DATA IS WRITTEN SEQUENTIALLY ON THE FILE IN THIS 00026 M00S00025.tst +++|* FORMAT - 1 WORD CONTAINING THE SECTOR NUMBER 00027 M00S00026.tst +++|* 1 WORD CONTAINING RANDOM DATA SEED 00028 M00S00027.tst +++|* 61 WORDS OF RANDOM DATA 00029 M00S00028.tst +++|* 1 WORD CHECKSUM OF ABOVE DATA 00030 M00S00029.tst +++|* 00031 M00S00030.tst +++|* SEQUENTIAL READ. 00032 M00S00031.tst +++|* FILE IS REWOUND AND DATA IS READ BACK CHECKING SECTOR NUMBER 00033 M00S00032.tst +++|* AND CHECKSUM OF RANDOM DATA. 00034 M00S00033.tst +++|* 00035 M00S00034.tst +++|* THERE IS A FORTY SECOND PAUSE FOLLOWING THE WRITE SECTION OF 00036 M00S00035.tst +++|* THE TEST TO ALLOW THE REWIND TO COMPLETE BEFORE CONTINUING 00037 M00S00036.tst +++|* TO THE NEXT SECTION. 00038 M00S00037.tst +++| SPACE 4 00039 M00S00038.tst +++|*** ARGUMENT PARAMETERS. 00040 M00S00039.tst +++|* 00041 M00S00040.tst +++|* T TEST SECTION (CAN BE EQUATED). 00042 M00S00041.tst +++|* T=0 OR T OR OMISSION OF THIS PARAMETER WILL RUN ALL 00043 M00S00042.tst +++|* SECTIONS. 00044 M00S00043.tst +++|* T=1 WRITE SEQUENTIAL. 00045 M00S00044.tst +++|* T=2 READ SEQUENTIAL. 00046 M00S00045.tst +++|* 00047 M00S00046.tst +++|* P TEST PATTERN (CAN BE EQUATED). 00048 M00S00047.tst +++|* P=0 ALL ZEROS PATTERN. 00049 M00S00048.tst +++|* P=1 ALL ONES PATTERN. 00050 M00S00049.tst +++|* P=2 25252525252525252525B PATTERN. 00051 M00S00050.tst +++|* P=3 52525252525252525252B PATTERN. 00052 M00S00051.tst +++|* P=4 DO NOT GENERATE OR CHECK DATA. SECTOR NUMBERS 00053 M00S00052.tst +++|* ARE GENERATED AND CHECKED. 00054 M00S00053.tst +++|* P=5 OR P OR OMISSION OF THIS PARAMETER WILL ENABLE 00055 M00S00054.tst +++|* RANDOM PATTERN. 00056 M00S00055.tst +++|* P=6 DO NOT GENERATE OR CHECK DATA. DO NOT COPY DATA 00057 M00S00056.tst +++|* BETWEEN THE CIO BUFFER AND THE WORKING BUFFER. 00058 M00S00057.tst +++|* SECTOR NUMBERS ARE GENERATED AND CHECKED. 00059 M00S00058.tst +++|* 00060 M00S00059.tst +++|* N NUMBER OF 100B-WORD SECTORS (CAN BE EQUATED). 00061 M00S00060.tst +++|* N=0 GIVES ARGUMENT ERROR MESSAGE AND PROGRAM ABORT. 00062 M00S00061.tst +++|* N=XXXX WILL ENABLE THE TEST TO BE RUN ON XXXX SECTORS. 00063 M00S00062.tst +++|* (BE CAREFUL THAT TRACK LIMIT IS NOT EXCEEDED) 00064 M00S00063.tst +++|* N GIVES DEFAULT VALUE (SEE TABLE TEQP). 00065 M00S00064.tst +++|* 00066 M00S00065.tst +++|* NW NO WRITE PERFORMED AT BEGINING OF TEST. 00067 M00S00066.tst +++|* 00068 M00S00067.tst +++|* BS BLOCK SIZE (MUST BE MULTIPLE OF 1000B). 00069 M00S00068.tst +++|* 00070 M00S00069.tst +++|* NOTE: 00071 M00S00070.tst +++|* SENSE SWITCH 2 - IF SET WILL ABORT ON ERRORS. 00072 M00S00071.tst +++|* SENSE SWITCH 3 - IF SET WILL CONTINUE AT END OF TEST. 00073 M00S00072.tst +++|* SENSE SWITCH 4 - IF SET WILL REPEAT CURRENT SECTION. 00074 M00S00073.tst +++|* 00075 M00S00074.tst +++|* ISSUING A CALL OF TST FROM THE CONSOLE WILL 00076 M00S00075.tst +++|* SELECT ALL SECTIONS, RANDOM PATTERN, DEFAULT SECTOR 00077 M00S00076.tst +++|* VALUE, PAUSE ON ERROR AND STOP AT END OF TEST. 00078 M00S00077.tst +++|* TO CONTINUE ON ERRORS TYPE *GO.*. 00079 M00S00078.tst +++|* 00080 M00S00079.tst +++| TST SPACE 4 00081 M00S00080.tst +++|*** DAYFILE MESSAGES. 00082 M00S00081.tst +++|* 00083 M00S00082.tst +++|* * ARGUMENT ERROR.* = ONE OF PARAMETERS IS IN ERROR. 00084 M00S00083.tst +++|* 00085 M00S00084.tst +++|* * ILLEGAL EQUIPMENT.* = THE EQUIPMENT WHICH WAS ASSIGNED IN 00086 M00S00085.tst +++|* RESPONSE TO THE DISPLAY REQUEST IS NOT 00087 M00S00086.tst +++|* RECOGNIZED AS BEING A DEVICE UPON WHICH 00088 M00S00087.tst +++|* THE TEST MAY BE RUN. 00089 M00S00088.tst +++|* 00090 M00S00089.tst +++|* * SEQUENTIAL WRITE.* = THIS TEST SECTION IS BEING EXECUTED. 00091 M00S00090.tst +++|* 00092 M00S00091.tst +++|* * SEQUENTIAL READ.* = THIS TEST SECTION IS BEING EXECUTED. 00093 M00S00092.tst +++|* 00094 M00S00093.tst +++|* *TST TRANSFER RATE = XXXXXX.XXX KC.* = THE TAPE TRANSFER 00095 M00S00094.tst +++|* RATE FOR THE PREVIOUS SECTION WAS 00096 M00S00095.tst +++|* XXXXXX.XXX KILO-CHARACTERS PER SECOND. 00097 M00S00096.tst +++|* 00098 M00S00097.tst +++|* * FILE SIZE = XXXXXXXXXX SECTORS.* = SIZE OF THE DATA 00099 M00S00098.tst +++|* FILE IN SECTORS.* 00100 M00S00099.tst +++|* 00101 M00S00100.tst +++|* * ILLEGAL EOF DETECTED.* = AN EOF WAS DETECTED BEFORE THE 00102 M00S00101.tst +++|* LAST SECTOR ON THE FILE. 00103 M00S00102.tst +++|* 00104 M00S00103.tst +++|* * NO EOF DETECTED ON LAST READ.* = NO EOF ON THE LAST SECTOR. 00105 M00S00104.tst +++|* 00106 M00S00105.tst +++|* * JOB ABORTED.* = ABNORMAL TERMINATION OF TST. 00107 M00S00106.tst +++|* 00108 M00S00107.tst +++|* *EQXXX,DATA ERROR AT -PHYSICAL POSITION-.* 00109 M00S00108.tst +++|* *EQXXX,RXXXXXXX,TYYYY,SZZZZ.* 00110 M00S00109.tst +++|* DATA ERRORS HAVE BEEN DETECTED ON A 00111 M00S00110.tst +++|* SECTOR WHICH WAS READ. 00112 M00S00111.tst +++|* 00113 M00S00112.tst +++|* *EQXXX,POS. ERROR AT -PHYSICAL POSITION-.* 00114 M00S00113.tst +++|* *EQXXX,RXXXXXXX,TYYYY,SZZZZ.* 00115 M00S00114.tst +++|* THE SECTOR WHICH WAS READ WAS NOT 00116 M00S00115.tst +++|* THE CORRECT SECTOR. THE POSITION GIVEN 00117 M00S00116.tst +++|* IS THE POSITION OF THE SECTOR READ. 00118 M00S00117.tst +++|* 00119 M00S00118.tst +++|* *EQXXX,DEV.-TYPE ERR--PHYSICAL POSITION-.* 00120 M00S00119.tst +++|* *EQXXX,RXXXXXXX,TYYYY,SZZZZ.* 00121 M00S00120.tst +++|* CIO HAS DETECTED ONE OF THE FOLLOWING 00122 M00S00121.tst +++|* ERRORS WHICH APPEAR IN THE -TYPE ERR- 00123 M00S00122.tst +++|* POSITION. 00124 M00S00123.tst +++|* -TYPE ERR- = PARITY ER. -- PARITY ERROR 00125 M00S00124.tst +++|* ADDR. ERR. -- ADDRESS ERROR 00126 M00S00125.tst +++|* STATUS ER. -- DEVICE STATUS ERROR 00127 M00S00126.tst +++|* 81 FNC REJ -- 6681 FUNCTION REJECT 00128 M00S00127.tst +++|* RESERVED -- DEVICE RESERVED 00129 M00S00128.tst +++|* NOT READY -- DEVICE NOT READY 00130 M00S00129.tst +++|* 00131 M00S00130.tst +++|* *EQXXX,EXP. POSITION -PHYSICAL POSITION-.* 00132 M00S00131.tst +++|* *EQXXX,RXXXXXXX,TYYYY,SZZZZ.* 00133 M00S00132.tst +++|* WHEN A POSITION OR DEVICE ADDRESS ERROR 00134 M00S00133.tst +++|* OCCURES THE EXPECTED POSITION IS GIVEN 00135 M00S00134.tst +++|* BY THIS MESSAGE. 00136 M00S00135.tst +++|* 00137 M00S00136.tst +++|* *EQXXX,DATA EXP WWW,EEEEEEEEEEEEEEEEEEEE* 00138 M00S00137.tst +++|* *EQXXX,DATA READ WWW,RRRRRRRRRRRRRRRRRRRR* 00139 M00S00138.tst +++|* *EQXXX,DATA DIFF WWW,DDDDDDDDDDDDDDDDDDDD* 00140 M00S00139.tst +++|* *DATA OK.* (OPTIONAL - SEE BELOW) 00141 M00S00140.tst +++|* WHEN A DATA ERROR OR DEVICE PARITY ERROR IS 00142 M00S00141.tst +++|* DETECTED THE DATA ON THE SECTOR IS CHECKED 00143 M00S00142.tst +++|* AND THE ERRORS REPORTED. IF NO ERRORS ARE 00144 M00S00143.tst +++|* FOUND THE MESSAGE *DATA OK.* IS ISSUED. 00145 M00S00144.tst +++|* WWW IS THE WORD NUMBER IN THE SECTOR. 00146 M00S00145.tst +++|* EE-----E IS THE EXPECTED DATA. 00147 M00S00146.tst +++|* RR-----R IS THE DATA READ. 00148 M00S00147.tst +++|* DD-----D IS THE DIFFERNCE. 00149 M00S00148.tst +++|* 00150 M00S00149.tst +++|* * TST ERROR - GO / DROP.* = *TST* HAS DETECTED AN 00151 M00S00150.tst +++|* IRRECOVERABLE READ ERROR. 00152 M00S00151.tst +++|* 00153 M00S00152.tst +++|* * END TAPE STORAGE TEST.* = END OF TEST. 00154 M00S00153.tst +++| SPACE 4 00155 M00S00154.tst +++|** COMMON DECKS. 00156 M00S00155.tst +++| 00157 M00S00156.tst +++| 00158 M00S00157.tst +++|*CALL COMCMAC 00159 M00S00158.tst +++|*CALL COMCCMD 00160 M00S00159.tst +++| SPACE 4 00161 M00S00160.tst +++|**** ASSEMBLY CONSTANTS. 00162 M00S00161.tst +++| 00163 M00S00162.tst +++| 00164 M00S00163.tst +++| TBUFL EQU 4001B 00165 M00S00164.tst +++|**** 00166 M00S00165.tst +++| TITLE DATA. 00167 M00S00166.tst +++| FET SPACE 4 00168 M00S00167.tst +++|* FILE FET. 00169 M00S00168.tst +++| 00170 M00S00169.tst +++| 00171 M00S00170.tst +++| ORG 110B 00172 M00S00171.tst +++| FET BSS 0 00173 M00S00172.tst +++| T BSS 0 00174 M00S00173.tst +++| TAPE1 FILEB TBUF,TBUFL,EPR,(FET=8) 00175 M00S00174.tst +++| 00176 M00S00175.tst +++|* DATA STORAGE. 00177 M00S00176.tst +++| 00178 M00S00177.tst +++| 00179 M00S00178.tst +++| FL CON 0 ORIGINAL FIELD LENGTH 00180 M00S00179.tst +++| NS CON 10000B NUMBER OF SECTORS 00181 M00S00180.tst +++| SM CON 7777B SECTOR MASK 00182 M00S00181.tst +++| NW CON 0 NO SEQUENTIAL WRITE AT BEGINNING OF TEST 00183 M00S00182.tst +++| TS CON 0L0 TEST SECTION TO BE EXECUTED 00184 M00S00183.tst +++| TP CON 0L5 DEFAULT TEST PATTERN 00185 M00S00184.tst +++| ST CON 0 START TIME 00186 M00S00185.tst +++| ET CON 0 ENDING TIME 00187 M00S00186.tst +++| ND CON 0 NULL DATA FLAG 00188 M00S00187.tst +++| NT CON 1 NO DATA TRANSFER FLAG 00189 M00S00188.tst +++| BS CON 1000B BLOCK SIZE (PRU SIZE) 00190 M00S00189.tst +++| 00191 M00S00190.tst +++|* SPECIAL ENTRY POINTS. 00192 M00S00191.tst +++| 00193 M00S00192.tst +++| SSJ= EQU 0 00194 M00S00193.tst +++| TITLE MAIN PROGRAM. 00195 M00S00194.tst +++| TST SPACE 4 00196 M00S00195.tst +++|** TST - MAIN PROGRAM. 00197 M00S00196.tst +++| 00198 M00S00197.tst +++| 00199 M00S00198.tst +++| TST SB1 1 (B1) = 1 00200 M00S00199.tst +++| SB7 B0 00201 M00S00200.tst +++| SX6 A0 00202 M00S00201.tst +++| SA6 FL 00203 M00S00202.tst +++| RJ PRS PRESET 00204 M00S00203.tst +++| TST1 SA1 NW 00205 M00S00204.tst +++| NZ X1,TST2 IF NO WRITE 00206 M00S00205.tst +++| RJ WSQ WRITE SEQUENTIAL 00207 M00S00206.tst +++| RJ WRC WAIT REWIND COMPLETE 00208 M00S00207.tst +++| TST2 SA1 TS 00209 M00S00208.tst +++| ZR X1,TST3 IF ALL SECTIONS SELECTED 00210 M00S00209.tst +++| SB5 X1-1 00211 M00S00210.tst +++| ZR B5,TST4 IF ONLY WRITE SELECTED 00212 M00S00211.tst +++| TST3 RJ RSQ READ SEQUENTIAL 00213 M00S00212.tst +++| TST4 SA1 B0 00214 M00S00213.tst +++| LX1 59-8 00215 M00S00214.tst +++| PL X1,TST5 IF REPEAT TEST NOT SET 00216 M00S00215.tst +++| RJ WRC WAIT REWIND COMPLETE 00217 M00S00216.tst +++| EQ TST1 CONTINUE 00218 M00S00217.tst +++| 00219 M00S00218.tst +++| TST5 MESSAGE (=C* END TAPE STORAGE TEST.*) 00220 M00S00219.tst +++| ENDRUN 00221 M00S00220.tst +++| TITLE TEST SECTIONS. 00222 M00S00221.tst +++| WSQ SPACE 4,15 00223 M00S00222.tst +++|** WSQ - WRITE SEQUENTIAL. 00224 M00S00223.tst +++|* 00225 M00S00224.tst +++|* USES X - 0, 1, 2, 4, 5, 6, 7. 00226 M00S00225.tst +++|* A - 1, 5, 6, 7. 00227 M00S00226.tst +++|* 00228 M00S00227.tst +++|* CALLS AIP, CKS, CTR, GDB, MEM, MES. 00229 M00S00228.tst +++|* 00230 M00S00229.tst +++|* MACROS REWIND, RTIME, WRITEF, WRITEW. 00231 M00S00230.tst +++| 00232 M00S00231.tst +++| 00233 M00S00232.tst +++| WSQ SUBR ENTRY/EXIT 00234 M00S00233.tst +++| SX6 1 SET SECTORS TO CHECK 00235 M00S00234.tst +++| SA6 CKSI 00236 M00S00235.tst +++| SA1 FL 00237 M00S00236.tst +++| RJ MEM REQUEST MEMORY 00238 M00S00237.tst +++| WSQ1 REWIND T,R 00239 M00S00238.tst +++| SX1 =C* SEQUENTIAL WRITE.* 00240 M00S00239.tst +++| RJ MES SEND MESSAGE 00241 M00S00240.tst +++| SA5 NS NUMBER OF SECTORS TO WRITE 00242 M00S00241.tst +++| BX0 X5 00243 M00S00242.tst +++| BX6 X5 SAVE SECTOR COUNT 00244 M00S00243.tst +++| SA6 CTRB 00245 M00S00244.tst +++| SX5 B1 00246 M00S00245.tst +++| RTIME ST 00247 M00S00246.tst +++| WSQ2 SA1 TP GENERATE SECTOR TO WRITE 00248 M00S00247.tst +++| BX7 X5 00249 M00S00248.tst +++| BX6 X1 00250 M00S00249.tst +++| SA7 SBUF 00251 M00S00250.tst +++| SA6 SBUF+1 00252 M00S00251.tst +++| RJ GDB GENERATE DATA BUFFER 00253 M00S00252.tst +++| SA7 TP 00254 M00S00253.tst +++| SX2 T SET FET ADDRESS 00255 M00S00254.tst +++| SA1 NT 00256 M00S00255.tst +++| ZR X1,WQS3 IF NO DATA TRANSFER 00257 M00S00256.tst +++| WRITEW X2,SBUF,100B 00258 M00S00257.tst +++| EQ WQS4 CHECK FOR CIO ERROR 00259 M00S00258.tst +++| 00260 M00S00259.tst +++| WQS3 RJ AIP ADVANCE *IN* POINTER 00261 M00S00260.tst +++| WQS4 SX4 B0 00262 M00S00261.tst +++| RJ CKS CHECK FOR CIO ERROR 00263 M00S00262.tst +++| SX6 B1+ 00264 M00S00263.tst +++| IX5 X5+X6 ADVANCE SECTOR COUNTER 00265 M00S00264.tst +++| IX0 X0-X6 00266 M00S00265.tst +++| NZ X0,WSQ2 IF MORE SECTORS TO WRITE 00267 M00S00266.tst +++| WRITEF T,R 00268 M00S00267.tst +++| RJ CTR COMPUTE TRANSFER RATE 00269 M00S00268.tst +++| SA1 B0 00270 M00S00269.tst +++| LX1 59-9 00271 M00S00270.tst +++| NG X1,WSQ1 IF REPEAT SECTION SET 00272 M00S00271.tst +++| EQ WSQX RETURN 00273 M00S00272.tst +++| RSQ SPACE 4,15 00274 M00S00273.tst +++|** RSQ - READ SEQUENTIAL. 00275 M00S00274.tst +++|* 00276 M00S00275.tst +++|* USES X - 0, 1, 2, 4, 5, 6, 7. 00277 M00S00276.tst +++|* A - 1, 5, 6, 7. 00278 M00S00277.tst +++|* 00279 M00S00278.tst +++|* CALLS ABT, AOP, CKS, CTR, MEM, MES. 00280 M00S00279.tst +++|* 00281 M00S00280.tst +++|* MACROS MESSAGE, READ, READW, REWIND, RTIME. 00282 M00S00281.tst +++| 00283 M00S00282.tst +++| 00284 M00S00283.tst +++| RSQ SUBR ENTRY/EXIT 00285 M00S00284.tst +++| SX6 1 SET SECTORS TO CHECK 00286 M00S00285.tst +++| SA6 CKSI 00287 M00S00286.tst +++| SA1 FL 00288 M00S00287.tst +++| RJ MEM REQUEST MEMORY 00289 M00S00288.tst +++| RSQ1 REWIND T,R 00290 M00S00289.tst +++| SX1 =C* SEQUENTIAL READ.* 00291 M00S00290.tst +++| RJ MES SEND MESSAGE 00292 M00S00291.tst +++| SA5 NS NUMBER OF SECTORS 00293 M00S00292.tst +++| BX0 X5 00294 M00S00293.tst +++| BX6 X5 SAVE SECTOR COUNT 00295 M00S00294.tst +++| SA6 CTRB 00296 M00S00295.tst +++| SX5 B0 00297 M00S00296.tst +++| RTIME ST 00298 M00S00297.tst +++| RSQ2 READ T 00299 M00S00298.tst +++| RSQ3 SX2 T SET FET ADDRESS 00300 M00S00299.tst +++| SA1 NT 00301 M00S00300.tst +++| ZR X1,RSQ3.1 IF NO DATA TRANSFER 00302 M00S00301.tst +++| READW X2,SBUF,100B 00303 M00S00302.tst +++| EQ RSQ3.2 CHECK FOR EOR/EOF 00304 M00S00303.tst +++| 00305 M00S00304.tst +++| RSQ3.1 RJ AOP ADVANCE *OUT* POINTER 00306 M00S00305.tst +++| RSQ3.2 ZR X1,RSQ3.3 IF NO EOR/EOF DETECTED 00307 M00S00306.tst +++| SX1 X1+3 CHECK FOR *CIO* ERROR 00308 M00S00307.tst +++| NZ X1,RSQ5 IF NO *CIO* ERROR 00309 M00S00308.tst +++| RSQ3.3 ZR X0,RSQ4 IF EOF EXPECTED 00310 M00S00309.tst +++| SX2 B1 00311 M00S00310.tst +++| IX4 X5+X2 ADVANCE EXPECTED SECTOR 00312 M00S00311.tst +++| SA5 SBUF 00313 M00S00312.tst +++| BX6 X4 00314 M00S00313.tst +++| SA6 RSQA SAVE RANDOM ADDRESS 00315 M00S00314.tst +++| IX0 X0-X2 DECREMENT SECTOR COUNTER 00316 M00S00315.tst +++| RJ CKS CHECK SECTOR 00317 M00S00316.tst +++| SA5 RSQA 00318 M00S00317.tst +++| ZR X4,RSQ3 IF NO ERROR DETECTED 00319 M00S00318.tst +++| SA1 T+1 RESTART READ ON ERROR 00320 M00S00319.tst +++| SX2 B1 00321 M00S00320.tst +++| IX7 X5+X2 SET RANDOM ADDRESS TO NEXT SECTOR 00322 M00S00321.tst +++| SX6 X1 00323 M00S00322.tst +++| SA6 A1+B1 00324 M00S00323.tst +++| SA7 T+6 00325 M00S00324.tst +++| SA6 A6+B1 00326 M00S00325.tst +++| EQ RSQ2 00327 M00S00326.tst +++| 00328 M00S00327.tst +++| RSQ4 MESSAGE (=C* NO EOF ON LAST READ.*) 00329 M00S00328.tst +++| EQ RSQ6 00330 M00S00329.tst +++| 00331 M00S00330.tst +++| RSQ5 ZR X0,RSQ7 IF EOF EXPECTED 00332 M00S00331.tst +++| MESSAGE (=C* ILLEGAL EOF DETECTED.*) 00333 M00S00332.tst +++| RSQ6 RJ ABT CHECK FOR ABORT ON ERRORS 00334 M00S00333.tst +++| RSQ7 RJ CTR COMPUTE TRANSFER RATE 00335 M00S00334.tst +++| SA1 B0 00336 M00S00335.tst +++| LX1 59-9 00337 M00S00336.tst +++| NG X1,RSQ1 IF REPEAT SECTION 00338 M00S00337.tst +++| EQ RSQX RETURN 00339 M00S00338.tst +++| 00340 M00S00339.tst +++| RSQA CON 0 TEMPORARY 00341 M00S00340.tst +++| TITLE SUBROUTINES. 00342 M00S00341.tst +++| ABT SPACE 4,15 00343 M00S00342.tst +++|** ABT - ABORT JOB. 00344 M00S00343.tst +++|* 00345 M00S00344.tst +++|* ABORTS JOB IF PAUSE ON ERROR NOT SELECTED. 00346 M00S00345.tst +++|* 00347 M00S00346.tst +++|* EXIT (X4) = 1. 00348 M00S00347.tst +++|* 00349 M00S00348.tst +++|* USES X - 1, 4, 7. 00350 M00S00349.tst +++|* A - 1, 7. 00351 M00S00350.tst +++|* B - NONE. 00352 M00S00351.tst +++|* 00353 M00S00352.tst +++|* MACROS ABORT, MESSAGE, RECALL. 00354 M00S00353.tst +++| 00355 M00S00354.tst +++| 00356 M00S00355.tst +++| ABT SUBR ENTRY/EXIT 00357 M00S00356.tst +++| SA1 B0 00358 M00S00357.tst +++| LX1 59-7 00359 M00S00358.tst +++| NG X1,ABT2 IF ABORT ON ERROR 00360 M00S00359.tst +++| SX7 B1+ SET PAUSE BIT 00361 M00S00360.tst +++| LX1 7-59 00362 M00S00361.tst +++| LX7 12 00363 M00S00362.tst +++| BX7 X7+X1 00364 M00S00363.tst +++| SA7 A1 00365 M00S00364.tst +++| MESSAGE ABTA,2,R ISSUE MESSAGE TO SECOND LINE 00366 M00S00365.tst +++| ABT1 RECALL 00367 M00S00366.tst +++| SA1 B0 00368 M00S00367.tst +++| LX1 59-12 00369 M00S00368.tst +++| NG X1,ABT1 IF PAUSE BIT SET 00370 M00S00369.tst +++| SX4 B1 00371 M00S00370.tst +++| EQ ABTX RETURN 00372 M00S00371.tst +++| 00373 M00S00372.tst +++| ABT2 MESSAGE (=C* JOB ABORTED.*) 00374 M00S00373.tst +++| ABT3 ABORT ABORT JOB 00375 M00S00374.tst +++| 00376 M00S00375.tst +++| ABTA DATA C*$TST ERROR - GO / DROP.* 00377 M00S00376.tst +++| AIP SPACE 4,20 00378 M00S00377.tst +++|** AIP - ADVANCE *IN* POINTER. 00379 M00S00378.tst +++|* 00380 M00S00379.tst +++|* ADVANCE THE *IN* POINTER BY 100B (AS IF A *WRITEW* OF 100B 00381 M00S00380.tst +++|* WORDS HAD BEEN PERFORMED), BUT DO NOT TRANSFER THE DATA. 00382 M00S00381.tst +++|* COPY ONLY THE FIRST WORD OF THE BLOCK FROM BUFFER *SBUF* 00383 M00S00382.tst +++|* TO THE CIO BUFFER. 00384 M00S00383.tst +++|* 00385 M00S00384.tst +++|* ENTRY (X2) = ADDRESS OF FET FOR FILE. 00386 M00S00385.tst +++|* 00387 M00S00386.tst +++|* EXIT VIA *WTX=*. 00388 M00S00387.tst +++|* (X2) = ADDRESS OF FET FOR FILE. 00389 M00S00388.tst +++|* 00390 M00S00389.tst +++|* USES X - 1, 2, 3, 4, 6, 7. 00391 M00S00390.tst +++|* A - 1, 2, 3, 4, 6. 00392 M00S00391.tst +++|* B - 2, 3, 4, 5, 6, 7. 00393 M00S00392.tst +++|* 00394 M00S00393.tst +++|* CALLS DCB=, WTX=. 00395 M00S00394.tst +++| 00396 M00S00395.tst +++| 00397 M00S00396.tst +++| + EQ AIP1 (REENTRY ADDRESS FROM *DCB=*) 00398 M00S00397.tst +++| 00399 M00S00398.tst +++| AIP SUBR ENTRY/EXIT 00400 M00S00399.tst +++| SA4 *-1 SET REENTRY/RETURN ADDRESS 00401 M00S00400.tst +++| SA1 X2+4 (B5) = LIMIT 00402 M00S00401.tst +++| SA3 X2+B1 (X3) = FIRST 00403 M00S00402.tst +++| SB5 X1 00404 M00S00403.tst +++| 00405 M00S00404.tst +++|* REENTER HERE FROM *DCB=*. 00406 M00S00405.tst +++| 00407 M00S00406.tst +++| AIP1 SA2 X2 (B2) = FET STATUS 00408 M00S00407.tst +++| SA1 A3+2 (B4) = OUT 00409 M00S00408.tst +++| SB2 X2 00410 M00S00409.tst +++| SA2 A3+B1 (X2) = IN 00411 M00S00410.tst +++| SB4 X1 00412 M00S00411.tst +++| SB3 X2+B1 (B3) = IN+1 00413 M00S00412.tst +++| LE B3,B4,AIP3 IF IN .LT. OUT 00414 M00S00413.tst +++| 00415 M00S00414.tst +++|* CALCULATE SPACE LEFT IN BUFFER (IN .GE. OUT). 00416 M00S00415.tst +++| 00417 M00S00416.tst +++| SX6 B5 00418 M00S00417.tst +++| IX6 X6-X3 (LIMIT-FIRST) 00419 M00S00418.tst +++| SX7 B3-B4 (IN+1-OUT) 00420 M00S00419.tst +++| IX6 X6-X7 AVAILABLE SPACE IN BUFFER 00421 M00S00420.tst +++| SX7 X6-100B 00422 M00S00421.tst +++| NG X7,DCB= IF NOT ENOUGH SPACE 00423 M00S00422.tst +++| 00424 M00S00423.tst +++|* UPDATE BUFFER POINTER (IN .GE. OUT). 00425 M00S00424.tst +++| 00426 M00S00425.tst +++| SB6 X2+100B NEW VALUE OF IN 00427 M00S00426.tst +++| LT B6,B5,AIP2 IF NO BUFFER WRAPAROUND 00428 M00S00427.tst +++| SB7 X3 00429 M00S00428.tst +++| SB7 B5-B7 (LIMIT-FIRST) 00430 M00S00429.tst +++| SB6 B6-B7 NEW VALUE OF IN 00431 M00S00430.tst +++| AIP2 SA1 SBUF COPY FIRST WORD OF BLOCK TO (IN) 00432 M00S00431.tst +++| BX6 X1 00433 M00S00432.tst +++| SA6 X2 00434 M00S00433.tst +++| SX2 B6 SET NEW VALUE OF IN 00435 M00S00434.tst +++| EQ WTX= EXIT 00436 M00S00435.tst +++| 00437 M00S00436.tst +++|* CALCULATE SPACE LEFT IN BUFFER (IN .LT. OUT). 00438 M00S00437.tst +++| 00439 M00S00438.tst +++| AIP3 SX6 B4-B3 AVAILABLE SPACE IN BUFFER 00440 M00S00439.tst +++| SX7 X6-100B 00441 M00S00440.tst +++| NG X7,DCB= IF NOT ENOUGH SPACE IN BUFFER 00442 M00S00441.tst +++| 00443 M00S00442.tst +++|* UPDATE BUFFER POINTER (IN .LT. OUT). 00444 M00S00443.tst +++| 00445 M00S00444.tst +++| SB6 X2+100B NEW VALUE OF IN 00446 M00S00445.tst +++| EQ AIP2 EXIT 00447 M00S00446.tst +++| AOP SPACE 4,20 00448 M00S00447.tst +++|*** AOP - ADVANCE *OUT* POINTER. 00449 M00S00448.tst +++|* 00450 M00S00449.tst +++|* ADVANCE THE *OUT* POINTER BY 100B (AS IF A *READW* OF 100B 00451 M00S00450.tst +++|* WORDS HAD BEEN PERFORMED), BUT DO NOT TRANSFER THE DATA. 00452 M00S00451.tst +++|* COPY ONLY THE FIRST WORD OF THE BLOCK FROM THE CIO BUFFER 00453 M00S00452.tst +++|* TO BUFFER *SBUF*. 00454 M00S00453.tst +++|* 00455 M00S00454.tst +++|* ENTRY (X2) = ADDRESS OF FET FOR FILE. 00456 M00S00455.tst +++|* 00457 M00S00456.tst +++|* EXIT VIA *RDX=*. 00458 M00S00457.tst +++|* (X1) = 0 FOR TRANSFER COMPLETE. 00459 M00S00458.tst +++|* (X1) = -1 IF EOF DETECTED ON FILE. 00460 M00S00459.tst +++|* (X1) = -2 IF EOI DETECTED ON FILE. 00461 M00S00460.tst +++|* (X2) = ADDRESS OF FET FOR FILE. 00462 M00S00461.tst +++|* 00463 M00S00462.tst +++|* USES X - 1, 2, 3, 4, 6, 7. 00464 M00S00463.tst +++|* A - 1, 2, 3, 4, 7. 00465 M00S00464.tst +++|* B - 3, 4, 5, 6, 7. 00466 M00S00465.tst +++|* 00467 M00S00466.tst +++|* CALLS LCB=, RDX=. 00468 M00S00467.tst +++| 00469 M00S00468.tst +++| 00470 M00S00469.tst +++| + EQ AOP1 (REENTRY ADDRESS FOR *LCB=*) 00471 M00S00470.tst +++| 00472 M00S00471.tst +++| AOP SUBR ENTRY/EXIT 00473 M00S00472.tst +++| SA4 *-1 SET REENTRY/RETURN ADDRESS 00474 M00S00473.tst +++| SA1 X2+4 (B5) = LIMIT 00475 M00S00474.tst +++| SA3 X2+B1 (X3) = FIRST 00476 M00S00475.tst +++| SB5 X1 00477 M00S00476.tst +++| 00478 M00S00477.tst +++|* REENTER HERE FROM *LCB=*. 00479 M00S00478.tst +++| 00480 M00S00479.tst +++| AOP1 SA1 A3+B1 (B3) = IN 00481 M00S00480.tst +++| SA2 A1+B1 (B4) = OUT 00482 M00S00481.tst +++| SB3 X1 00483 M00S00482.tst +++| SB4 X2 00484 M00S00483.tst +++| LT B3,B4,AOP3 IF IN .LT. OUT 00485 M00S00484.tst +++| 00486 M00S00485.tst +++|* CALCULATE DATA AVAILABLE IN BUFFER (IN .GE. OUT). 00487 M00S00486.tst +++| 00488 M00S00487.tst +++| SX6 B3-B4 AVAILABLE DATA IN BUFFER 00489 M00S00488.tst +++| SX7 X6-100B 00490 M00S00489.tst +++| NG X7,LCB= IF NOT ENOUGH DATA IN BUFFER 00491 M00S00490.tst +++| 00492 M00S00491.tst +++|* UPDATE BUFFER POINTER (IN .GE. OUT). 00493 M00S00492.tst +++| 00494 M00S00493.tst +++| SB6 B4+100B NEW VALUE OF OUT 00495 M00S00494.tst +++| AOP2 SA1 B4 COPY FIRST WORD OF BLOCK FROM (OUT) 00496 M00S00495.tst +++| BX7 X1 00497 M00S00496.tst +++| SA7 SBUF 00498 M00S00497.tst +++| SB4 B6 SET NEW VALUE OF OUT 00499 M00S00498.tst +++| EQ RDX= EXIT 00500 M00S00499.tst +++| 00501 M00S00500.tst +++|* CALCULATE DATA AVAILABLE IN BUFFER (IN .LT. OUT) 00502 M00S00501.tst +++| 00503 M00S00502.tst +++| AOP3 SX6 B5 00504 M00S00503.tst +++| IX6 X6-X3 (LIMIT-FIRST) 00505 M00S00504.tst +++| SX7 B4-B3 (OUT-IN) 00506 M00S00505.tst +++| IX6 X6-X7 AVAILABLE DATA IN BUFFER 00507 M00S00506.tst +++| SX7 X6-100B 00508 M00S00507.tst +++| NG X7,LCB= IF NOT ENOUGH DATA IN BUFFER 00509 M00S00508.tst +++| 00510 M00S00509.tst +++|* UPDATE BUFFER POINTER (IN .LT. OUT). 00511 M00S00510.tst +++| 00512 M00S00511.tst +++| SB6 B4+100B NEW VALUE OF OUT 00513 M00S00512.tst +++| LT B6,B5,AOP2 IF NO BUFFER WRAPAROUND 00514 M00S00513.tst +++| SB7 X3 00515 M00S00514.tst +++| SB7 B5-B7 (LIMIT-FIRST) 00516 M00S00515.tst +++| SB6 B6-B7 NEW VALUE OF OUT 00517 M00S00516.tst +++| EQ AOP2 EXIT 00518 M00S00517.tst +++| CKS SPACE 4,20 00519 M00S00518.tst +++|** CKS - CHECK SECTOR. 00520 M00S00519.tst +++|* 00521 M00S00520.tst +++|* ENTRY (X5) = SECTOR NUMBER READ. 00522 M00S00521.tst +++|* (X4) = SECTOR NUMBER EXPECTED. 00523 M00S00522.tst +++|* (A5) = ADDRESS OF SECTOR TO BE CHECKED. 00524 M00S00523.tst +++|* ND .NE. 0 IF DATA IS TO BE CHECKED. 00525 M00S00524.tst +++|* 00526 M00S00525.tst +++|* EXIT (X4) = 0 IF NO ERROR DETECTED. 00527 M00S00526.tst +++|* 00528 M00S00527.tst +++|* USES X - ALL. 00529 M00S00528.tst +++|* A - 1, 2, 3, 4, 5, 6, 7. 00530 M00S00529.tst +++|* B - 2. 00531 M00S00530.tst +++|* 00532 M00S00531.tst +++|* RESTORES X5, T+2, T+3, X0, T+6 WHEN RETURNING FROM ERROR. 00533 M00S00532.tst +++|* 00534 M00S00533.tst +++|* CALLS ABT, DCH, ERR. 00535 M00S00534.tst +++| 00536 M00S00535.tst +++| 00537 M00S00536.tst +++| CKS SUBR ENTRY/EXIT 00538 M00S00537.tst +++| SA3 T+6 CHECK FOR CIO ERROR 00539 M00S00538.tst +++| MX2 -3 00540 M00S00539.tst +++| BX2 -X2*X3 00541 M00S00540.tst +++| NZ X2,CKS2 IF CIO ERROR 00542 M00S00541.tst +++| ZR X4,CKSX IF CHECKING ON WRITE - RETURN 00543 M00S00542.tst +++| CKS0 BX6 X4-X5 00544 M00S00543.tst +++| NZ X6,CKS3 IF POSITION ERROR 00545 M00S00544.tst +++| SX6 X4+B1 INCREMENT RANDOM ADDRESS FOR NEXT SECTOR 00546 M00S00545.tst +++| SA6 CKSJ 00547 M00S00546.tst +++| SA4 ND 00548 M00S00547.tst +++| ZR X4,CKSX IF DATA NOT TO BE CHECKED 00549 M00S00548.tst +++| SX4 B0 00550 M00S00549.tst +++| SB2 76B 00551 M00S00550.tst +++| SA2 A5+77B LOAD CHECKSUM 00552 M00S00551.tst +++| CKS1 SA1 A5+B2 VALIDATE CHECKSUM 00553 M00S00552.tst +++| IX2 X2-X1 00554 M00S00553.tst +++| SB2 B2-1 00555 M00S00554.tst +++| GT B2,B1,CKS1 IF MORE DATA 00556 M00S00555.tst +++| NZ X2,CKS1.1 IF CHECKSUM ERROR 00557 M00S00556.tst +++| SA3 CKSI CHECK SECTOR COUNT 00558 M00S00557.tst +++| SX6 X3-1 00559 M00S00558.tst +++| ZR X6,CKSX IF END OF TRANSFER 00560 M00S00559.tst +++| SA6 A3+ 00561 M00S00560.tst +++| SA5 A5+100B SET ACTUAL RANDOM ADDRESS 00562 M00S00561.tst +++| SA4 CKSJ SET EXPECTED RANDOM ADDRESS 00563 M00S00562.tst +++| EQ CKS0 NEXT SECTOR 00564 M00S00563.tst +++| 00565 M00S00564.tst +++| CKS1.1 SA1 CKSA DATA ERROR PROCESSING 00566 M00S00565.tst +++| SA2 CKSE 00567 M00S00566.tst +++| RJ ERR DATA ERROR MESSAGE 00568 M00S00567.tst +++| RJ DCH DATA CHECK 00569 M00S00568.tst +++| EQ CKS6 00570 M00S00569.tst +++| 00571 M00S00570.tst +++| CKS2 SA1 CKSB CIO ERROR PROCESSING 00572 M00S00571.tst +++| SX6 X2-2 00573 M00S00572.tst +++| SA2 X2+TCIO-1 00574 M00S00573.tst +++| SA6 CKSG 00575 M00S00574.tst +++| LX7 X4 00576 M00S00575.tst +++| SX4 B0 00577 M00S00576.tst +++| SA7 CKSH 00578 M00S00577.tst +++| RJ ERR CIO ERROR MESSAGE 00579 M00S00578.tst +++| SA1 CKSG 00580 M00S00579.tst +++| NG X1,CKS5 IF PARITY ERROR 00581 M00S00580.tst +++| ZR X1,CKS4 IF ADDRESS ERROR 00582 M00S00581.tst +++| EQ CKS6 00583 M00S00582.tst +++| 00584 M00S00583.tst +++| CKS3 SA1 CKSC POSITION ERROR PROCESSING 00585 M00S00584.tst +++| SA2 CKSE 00586 M00S00585.tst +++| BX6 X4 00587 M00S00586.tst +++| SX4 B0 00588 M00S00587.tst +++| SA6 CKSH 00589 M00S00588.tst +++| RJ ERR POSITION ERROR MESSAGE 00590 M00S00589.tst +++| CKS4 SA4 CKSH SECTOR EXPECTED 00591 M00S00590.tst +++| SA1 CKSD 00592 M00S00591.tst +++| SA2 CKSF 00593 M00S00592.tst +++| BX5 X4 00594 M00S00593.tst +++| SX4 B1 00595 M00S00594.tst +++| ZR X5,CKS6 IF ADDRESS ERROR ON SEQUENTIAL WRITE 00596 M00S00595.tst +++| RJ ERR EXPECTED ERROR MESSAGE 00597 M00S00596.tst +++| CKS5 RJ DCH DATA CHECK 00598 M00S00597.tst +++| CKS6 RJ ABT CHECK FOR ABORT ON ERRORS 00599 M00S00598.tst +++| CKS7 SA5 ERRA RESTORE REGISTERS 00600 M00S00599.tst +++| SA2 A5+B1 00601 M00S00600.tst +++| SA3 A2+B1 00602 M00S00601.tst +++| SA1 A3+B1 00603 M00S00602.tst +++| BX6 X2 00604 M00S00603.tst +++| LX7 X3 00605 M00S00604.tst +++| SA2 A1+B1 00606 M00S00605.tst +++| SA6 T+2 00607 M00S00606.tst +++| SA7 T+3 00608 M00S00607.tst +++| LX6 X2 00609 M00S00608.tst +++| BX0 X1 00610 M00S00609.tst +++| SA6 T+6 00611 M00S00610.tst +++| EQ CKSX RETURN 00612 M00S00611.tst +++| 00613 M00S00612.tst +++| 00614 M00S00613.tst +++| CKSA DATA 10HEQXXX,DATA 00615 M00S00614.tst +++| CKSB DATA 10HEQXXX,DEV. 00616 M00S00615.tst +++| CKSC DATA 10HEQXXX,POS. 00617 M00S00616.tst +++| CKSD DATA 10HEQXXX,EXP. 00618 M00S00617.tst +++| CKSE CON 10H ERROR AT 00619 M00S00618.tst +++| CKSF CON 10H POSITION 00620 M00S00619.tst +++| CKSG CON 0 TEMPORARY 00621 M00S00620.tst +++| CKSH CON 0 TEMPORARY 00622 M00S00621.tst +++| CKSI CON 0 NUMBER OF SECTORS REMAINING TO CHECK 00623 M00S00622.tst +++| CKSJ CON 0 EXPECTED RANDOM ADDRESS OF NEXT SECTOR 00624 M00S00623.tst +++| 00625 M00S00624.tst +++| TCIO CON 10LPARITY ER. PARITY ERROR 00626 M00S00625.tst +++| CON 10LADDR. ERR. ADDRESS ERROR 00627 M00S00626.tst +++| CON 10LSTATUS ER. DEVICE STATUS ERROR 00628 M00S00627.tst +++| CON 10L81 FNC REJ 6681 FUNCTION REJECT 00629 M00S00628.tst +++| CON 10LRESERVED DEVICE RESERVED 00630 M00S00629.tst +++| CON 10LNOT READY DEVICE NOT READY 00631 M00S00630.tst +++| CTR SPACE 4,15 00632 M00S00631.tst +++|** CTR - COMPUTE TRANSFER RATE. 00633 M00S00632.tst +++|* 00634 M00S00633.tst +++|* ENTRY (CTRB) = NUMBER OF SECTORS TRANSFERRED. 00635 M00S00634.tst +++|* (ST) = START TIME. 00636 M00S00635.tst +++|* 00637 M00S00636.tst +++|* EXIT TRANSFER RATE MESSAGE ISSUED TO DAYFILE. 00638 M00S00637.tst +++|* 00639 M00S00638.tst +++|* USES X - 0, 1, 2, 3, 6. 00640 M00S00639.tst +++|* A - 1, 2, 6. 00641 M00S00640.tst +++|* B - NONE. 00642 M00S00641.tst +++|* 00643 M00S00642.tst +++|* CALLS CFD, MES. 00644 M00S00643.tst +++|* 00645 M00S00644.tst +++|* MACROS RTIME. 00646 M00S00645.tst +++| 00647 M00S00646.tst +++| 00648 M00S00647.tst +++| CTR SUBR ENTRY/EXIT 00649 M00S00648.tst +++| RTIME ET GET ENDING TIME 00650 M00S00649.tst +++| SA1 ST COMPUTE ELAPSED TIME 00651 M00S00650.tst +++| SA2 ET 00652 M00S00651.tst +++| MX0 -36 00653 M00S00652.tst +++| BX1 -X0*X1 00654 M00S00653.tst +++| BX2 -X0*X2 00655 M00S00654.tst +++| IX2 X2-X1 00656 M00S00655.tst +++| BX6 X2 00657 M00S00656.tst +++| SA1 CTRB 00658 M00S00657.tst +++| SX3 640*1000/64 00659 M00S00658.tst +++| LX3 6 00660 M00S00659.tst +++| IX3 X1*X3 CHAR 00661 M00S00660.tst +++| IX1 X3/X2 00662 M00S00661.tst +++| RJ CFD CONVERT TO DISPLAY CODE 00663 M00S00662.tst +++| SA6 CTRA+2 00664 M00S00663.tst +++| SX1 CTRA SEND TRANSFER RATE MESSAGE 00665 M00S00664.tst +++| RJ MES 00666 M00S00665.tst +++| EQ CTRX RETURN 00667 M00S00666.tst +++| 00668 M00S00667.tst +++| CTRA DATA C*TST TRANSFER RATE = XXXXXX.XXX KC.* 00669 M00S00668.tst +++| CTRB CON 0 SECTORS TRANSFERRED 00670 M00S00669.tst +++| DCH SPACE 4,15 00671 M00S00670.tst +++|** DCH - DATA CHECK. 00672 M00S00671.tst +++|* 00673 M00S00672.tst +++|* ENTRY (SBUF - SBUF+77B) = SECTOR TO BE CHECKED. 00674 M00S00673.tst +++|* 00675 M00S00674.tst +++|* USES X - 0, 1, 2, 6, 7. 00676 M00S00675.tst +++|* A - 1, 2, 6, 7. 00677 M00S00676.tst +++|* B - 2, 5, 6, 7. 00678 M00S00677.tst +++|* 00679 M00S00678.tst +++|* CALLS COD, GDB, WOD. 00680 M00S00679.tst +++|* 00681 M00S00680.tst +++|* MACROS MESSAGE. 00682 M00S00681.tst +++| 00683 M00S00682.tst +++| 00684 M00S00683.tst +++| DCH4 NZ B7,DCHX IF ERRORS FOUND RETURN 00685 M00S00684.tst +++| MESSAGE (=C*DATA OK.*) 00686 M00S00685.tst +++| 00687 M00S00686.tst +++| DCH SUBR ENTRY/EXIT 00688 M00S00687.tst +++| SA1 ND 00689 M00S00688.tst +++| ZR X1,DCHX IF NO DATA GENERATED 00690 M00S00689.tst +++| SA1 SBUF+1 00691 M00S00690.tst +++| SB5 B1 00692 M00S00691.tst +++| BX6 X1 00693 M00S00692.tst +++| SA6 PBUF+1 00694 M00S00693.tst +++| SB7 B0+ 00695 M00S00694.tst +++| RJ GDB REGENERATE DATA 00696 M00S00695.tst +++| DCH1 SB6 77B 00697 M00S00696.tst +++| DCH2 SA1 PBUF+B5 00698 M00S00697.tst +++| SA2 SBUF+B5 00699 M00S00698.tst +++| SB5 B5+B1 00700 M00S00699.tst +++| BX7 X2-X1 00701 M00S00700.tst +++| GT B5,B6,DCH4 IF END OF CHECK 00702 M00S00701.tst +++| ZR X7,DCH2 IF DATA MATCHES 00703 M00S00702.tst +++| LX6 X2 00704 M00S00703.tst +++| SB7 B1 ERROR FLAG 00705 M00S00704.tst +++| SA6 DCHA 00706 M00S00705.tst +++| SA7 A6+B1 00707 M00S00706.tst +++| BX0 X1 00708 M00S00707.tst +++| SX1 B5 00709 M00S00708.tst +++| SB6 B0 00710 M00S00709.tst +++| RJ COD CONVERT WORD NUMBER 00711 M00S00710.tst +++| LX6 6 00712 M00S00711.tst +++| SX1 B1 00713 M00S00712.tst +++| IX6 X6+X1 00714 M00S00713.tst +++| BX1 X0 00715 M00S00714.tst +++| SA6 DCHD 00716 M00S00715.tst +++| DCH3 RJ WOD CONVERT DATA 00717 M00S00716.tst +++| SA1 TMES+B6 MESSAGE TYPE 00718 M00S00717.tst +++| SA2 DCHD 00719 M00S00718.tst +++| SA6 DCHE 00720 M00S00719.tst +++| MX0 -24 00721 M00S00720.tst +++| SA7 A6+B1 00722 M00S00721.tst +++| BX2 -X0*X2 MERGE MESSAGE TYPE 00723 M00S00722.tst +++| BX1 X0*X1 00724 M00S00723.tst +++| BX6 X2+X1 00725 M00S00724.tst +++| SA6 A2 00726 M00S00725.tst +++| MESSAGE DCHC,,R 00727 M00S00726.tst +++| SA1 DCHA+B6 00728 M00S00727.tst +++| SB2 B6-B1 00729 M00S00728.tst +++| SB6 B6+B1 00730 M00S00729.tst +++| NE B2,B1,DCH3 IF MORE MESSAGES FOR THIS ERROR 00731 M00S00730.tst +++| EQ DCH1 00732 M00S00731.tst +++| 00733 M00S00732.tst +++| DCHA CON 0 TEMPORARY 00734 M00S00733.tst +++| DCHB CON 0 TEMPORARY 00735 M00S00734.tst +++| DCHC DATA 10HEQXXX,DATA 00736 M00S00735.tst +++| DCHD CON 10H .... 000, 00737 M00S00736.tst +++| DCHE CON 0,0,0 00738 M00S00737.tst +++| 00739 M00S00738.tst +++| TMES CON 6L EXP TABLE OF MESSAGES 00740 M00S00739.tst +++| CON 6L READ 00741 M00S00740.tst +++| CON 6L DIFF 00742 M00S00741.tst +++| ERR SPACE 4,15 00743 M00S00742.tst +++|** ERR - SEND ERROR MESSAGE. 00744 M00S00743.tst +++|* 00745 M00S00744.tst +++|* ENTRY (X4) = 0 IF REGISTERS MUST BE SAVED. 00746 M00S00745.tst +++|* (X2) = SECOND WORD OF MESSAGE. 00747 M00S00746.tst +++|* (X1) = FIRST WORD OF MESSAGE. 00748 M00S00747.tst +++|* 00749 M00S00748.tst +++|* USES X - 0, 1, 2, 3, 4, 6, 7. 00750 M00S00749.tst +++|* A - 1, 2, 3, 6, 7. 00751 M00S00750.tst +++|* B - 6 00752 M00S00751.tst +++|* 00753 M00S00752.tst +++|* CALLS CVA, WOD. 00754 M00S00753.tst +++|* 00755 M00S00754.tst +++|* MACROS MESSAGE, RECALL, RPHR, STATUS. 00756 M00S00755.tst +++| 00757 M00S00756.tst +++| 00758 M00S00757.tst +++| ERR SUBR ENTRY/EXIT 00759 M00S00758.tst +++| BX6 X1 00760 M00S00759.tst +++| LX7 X2 00761 M00S00760.tst +++| SA6 ERRB 00762 M00S00761.tst +++| SA7 A6+B1 00763 M00S00762.tst +++| RECALL T 00764 M00S00763.tst +++| NZ X4,ERR1 IF REGISTERS ALREADY SAVED 00765 M00S00764.tst +++| SA2 T+2 00766 M00S00765.tst +++| SA3 T+3 00767 M00S00766.tst +++| LX6 X5 00768 M00S00767.tst +++| BX7 X2 00769 M00S00768.tst +++| SA2 T+6 00770 M00S00769.tst +++| SA6 ERRA 00771 M00S00770.tst +++| LX6 X3 00772 M00S00771.tst +++| SA7 A6+B1 00773 M00S00772.tst +++| BX7 X0 00774 M00S00773.tst +++| SA6 A7+B1 00775 M00S00774.tst +++| LX6 X2 00776 M00S00775.tst +++| SA7 A6+B1 00777 M00S00776.tst +++| SA6 A6+2 00778 M00S00777.tst +++| ERR1 MESSAGE ERRB,,R 00779 M00S00778.tst +++| EQ ERRX RETURN 00780 M00S00779.tst +++| 00781 M00S00780.tst +++| ERRA BSS 5 00782 M00S00781.tst +++| ERRB DATA 10HEQXXX,ZZZZ 00783 M00S00782.tst +++| ERRC CON 10H ERROR AT 00784 M00S00783.tst +++| ERRD CON 0,0 00785 M00S00784.tst +++| CON 0 END OF LINE FOR FIRST MESSAGE 00786 M00S00785.tst +++| GDB SPACE 4,15 00787 M00S00786.tst +++|** GDB - GENERATE DATA BUFFER. 00788 M00S00787.tst +++|* 00789 M00S00788.tst +++|* ENTRY (X6) = RANDOM NUMBER WHICH WILL GENERATE BUFFER. 00790 M00S00789.tst +++|* (A6) = ADDRESS OF RANDOM NUMBER IN BUFFER. 00791 M00S00790.tst +++|* 00792 M00S00791.tst +++|* EXIT (X6) = CHECKSUM OF BUFFER. 00793 M00S00792.tst +++|* (X7) = LAST DATA WORD STORED IN BUFFER. 00794 M00S00793.tst +++|* (B2) = (B3) = NUMBER OF DATA WORDS GENERATED. 00795 M00S00794.tst +++|* (A6) = ADDRESS OF LAST WORD IN BUFFER. 00796 M00S00795.tst +++|* 00797 M00S00796.tst +++|* USES X - 2, 6, 7. 00798 M00S00797.tst +++|* A - 2, 6, 7. 00799 M00S00798.tst +++|* B - 2, 3. 00800 M00S00799.tst +++| 00801 M00S00800.tst +++| 00802 M00S00801.tst +++| GDB SUBR ENTRY/EXIT 00803 M00S00802.tst +++| SA2 ND 00804 M00S00803.tst +++| ZR X2,GDBX IF NO DATA GENERATION 00805 M00S00804.tst +++| SB3 75B 00806 M00S00805.tst +++| SB2 B0+ 00807 M00S00806.tst +++| GDBA BX7 X6 00808 M00S00807.tst +++| SA7 A6 00809 M00S00808.tst +++| 00810 M00S00809.tst +++|* THIS INSTRUCTION IS MODIFIED BY PRESET 00811 M00S00810.tst +++|* EQ GDB2 IF NON-RANDOM PATTERN 00812 M00S00811.tst +++| 00813 M00S00812.tst +++| SX6 B0+ IF RANDOM PATTERN - CLEAR CHECKSUM 00814 M00S00813.tst +++| 00815 M00S00814.tst +++| GDB1 PX2 X7 00816 M00S00815.tst +++| DX7 X2*X2 00817 M00S00816.tst +++| IX7 X7+X2 00818 M00S00817.tst +++| SB2 B2+B1 00819 M00S00818.tst +++| LX2 15 00820 M00S00819.tst +++| IX7 X7+X2 00821 M00S00820.tst +++| LX2 19 00822 M00S00821.tst +++| IX7 X2+X7 00823 M00S00822.tst +++| SA7 A7+B1 00824 M00S00823.tst +++| IX6 X6+X7 ADVANCE CHECKSUM 00825 M00S00824.tst +++| NE B2,B3,GDB1 IF MORE DATA TO GENERATE 00826 M00S00825.tst +++| SA6 A7+B1 CHECKSUM IN LAST LOCATION OF BUFFER 00827 M00S00826.tst +++| EQ GDBX 00828 M00S00827.tst +++| 00829 M00S00828.tst +++| GDB2 SB2 B2+B1 00830 M00S00829.tst +++| SA7 A7+B1 00831 M00S00830.tst +++| NE B2,B3,GDB2 IF BUFFER NOT FULL 00832 M00S00831.tst +++| SA6 A7+B1 00833 M00S00832.tst +++| EQ GDBX 00834 M00S00833.tst +++| MEM SPACE 4,15 00835 M00S00834.tst +++|** MEM - REQUEST MEMORY. 00836 M00S00835.tst +++|* 00837 M00S00836.tst +++|* ENTRY (X1) = REQUESTED MEMORY. 00838 M00S00837.tst +++|* 00839 M00S00838.tst +++|* EXIT (IN) = (OUT) = (FIRST). 00840 M00S00839.tst +++|* (LIMIT) = REQUESTED FIELD LENGTH. 00841 M00S00840.tst +++|* 00842 M00S00841.tst +++|* USES X - 2, 6, 7. 00843 M00S00842.tst +++|* A - 2, 6, 7. 00844 M00S00843.tst +++|* B - NONE. 00845 M00S00844.tst +++|* 00846 M00S00845.tst +++|* MACROS MEMORY. 00847 M00S00846.tst +++| 00848 M00S00847.tst +++| 00849 M00S00848.tst +++| MEM SUBR ENTRY/EXIT 00850 M00S00849.tst +++| SA2 T+1 00851 M00S00850.tst +++| SX7 X1-10B 00852 M00S00851.tst +++| SX6 X2 00853 M00S00852.tst +++| SA7 T+4 LIMIT 00854 M00S00853.tst +++| SA6 A7-B1 OUT 00855 M00S00854.tst +++| SA6 A6-B1 IN 00856 M00S00855.tst +++| MEMORY ,,R,X1 REQUEST MEMORY 00857 M00S00856.tst +++| EQ MEMX RETURN 00858 M00S00857.tst +++| MES SPACE 4,15 00859 M00S00858.tst +++|** MES - SEND MESSAGE. 00860 M00S00859.tst +++|* 00861 M00S00860.tst +++|* ENTRY (X1) = MESSAGE ADDRESS. 00862 M00S00861.tst +++|* 00863 M00S00862.tst +++|* EXIT MESSAGE SENT TO CONTROL POINT AND JOB DAYFILE. 00864 M00S00863.tst +++|* 00865 M00S00864.tst +++|* USES X - 0. 00866 M00S00865.tst +++|* A - NONE. 00867 M00S00866.tst +++|* B - NONE. 00868 M00S00867.tst +++|* 00869 M00S00868.tst +++|* MACROS MESSAGE. 00870 M00S00869.tst +++| 00871 M00S00870.tst +++| 00872 M00S00871.tst +++| MES SUBR ENTRY/EXIT 00873 M00S00872.tst +++| SX0 X1+ 00874 M00S00873.tst +++| MESSAGE X1,1,R 00875 M00S00874.tst +++| MESSAGE X0,3,R 00876 M00S00875.tst +++| EQ MESX RETURN 00877 M00S00876.tst +++| WRC SPACE 4,10 00878 M00S00877.tst +++|** WRC - WAIT REWIND COMPLETE. 00879 M00S00878.tst +++|* 00880 M00S00879.tst +++|* USES X - 1, 2, 3. 00881 M00S00880.tst +++|* A - 1. 00882 M00S00881.tst +++|* B - NONE. 00883 M00S00882.tst +++|* 00884 M00S00883.tst +++|* MACROS MESSAGE, RECALL, RTIME. 00885 M00S00884.tst +++| 00886 M00S00885.tst +++| 00887 M00S00886.tst +++| WRC SUBR 00888 M00S00887.tst +++| MESSAGE (=C* WAIT REWIND COMPLETE.*),1,R 00889 M00S00888.tst +++| RTIME WRCA FETCH TIME 00890 M00S00889.tst +++| REWIND T 00891 M00S00890.tst +++| SA1 WRCA 00892 M00S00891.tst +++| MX3 -36 00893 M00S00892.tst +++| BX2 -X3*X1 SAVE START TIME 00894 M00S00893.tst +++| WRC1 RECALL DELAY 00895 M00S00894.tst +++| RTIME WRCA CHECK TIME 00896 M00S00895.tst +++| SA1 WRCA 00897 M00S00896.tst +++| BX1 -X3*X1 00898 M00S00897.tst +++| IX1 X1-X2 TIME SINCE FIRST CALL 00899 M00S00898.tst +++| SX1 X1-40000 00900 M00S00899.tst +++| NG X1,WRC1 IF 40 SECONDS NOT ELAPSED 00901 M00S00900.tst +++| EQ WRCX RETURN 00902 M00S00901.tst +++| 00903 M00S00902.tst +++| WRCA BSS 1 00904 M00S00903.tst +++| SPACE 4 00905 M00S00904.tst +++|** COMMON DECKS. 00906 M00S00905.tst +++| 00907 M00S00906.tst +++| 00908 M00S00907.tst +++| ERP1$ EQU 1 ENABLE I/O ERROR PROCESSING 00909 M00S00908.tst +++|*CALL COMCCDD 00910 M00S00909.tst +++|*CALL COMCCOD 00911 M00S00910.tst +++|*CALL COMCCIO 00912 M00S00911.tst +++|*CALL COMCCFD 00913 M00S00912.tst +++|*CALL COMCLFM 00914 M00S00913.tst +++|*CALL COMCRDW 00915 M00S00914.tst +++|*CALL COMCSYS 00916 M00S00915.tst +++|*CALL COMCWOD 00917 M00S00916.tst +++|*CALL COMCWTW 00918 M00S00917.tst +++| BUFFERS SPACE 4 00919 M00S00918.tst +++| TITLE BUFFERS. 00920 M00S00919.tst +++| USE // 00921 M00S00920.tst +++| SEG 00922 M00S00921.tst +++| BUFS BSS 0 00923 M00S00922.tst +++| 00924 M00S00923.tst +++| PBUF EQU BUFS+1 TEST BUFFER FOR PATTERN REGENERATION 00925 M00S00924.tst +++| SBUF EQU PBUF+100B 00926 M00S00925.tst +++| TBUF EQU SBUF+100B 00927 M00S00926.tst +++| MFL= EQU TBUF+TBUFL+10B+200000B 00928 M00S00927.tst +++| 00929 M00S00928.tst +++| 00930 M00S00929.tst +++| TITLE PRESET. 00931 M00S00930.tst +++| ORG BUFS 00932 M00S00931.tst +++| 00933 M00S00932.tst +++| 00934 M00S00933.tst +++|** THE FOLLOWING CODE IS OVERLAYED BY BUFFERS. 00935 M00S00934.tst +++| 00936 M00S00935.tst +++| 00937 M00S00936.tst +++|* COMMON DECKS 00938 M00S00937.tst +++| 00939 M00S00938.tst +++|*CALL COMCARG 00940 M00S00939.tst +++|*CALL COMCCPM 00941 M00S00940.tst +++|*CALL COMCDXB 00942 M00S00941.tst +++|*CALL COMCMVE 00943 M00S00942.tst +++| PRS SPACE 4 00944 M00S00943.tst +++|** PRS - PRESET PROGRAM. 00945 M00S00944.tst +++|* 00946 M00S00945.tst +++|* ENTRY (B7) = 1 IF ADDRESS CONVERSION PRESET. 00947 M00S00946.tst +++| 00948 M00S00947.tst +++| 00949 M00S00948.tst +++| PRS SUBR ENTRY/EXIT 00950 M00S00949.tst +++| MODE 1 00951 M00S00950.tst +++| STATUS T,P 00952 M00S00951.tst +++| SA1 T+6 00953 M00S00952.tst +++| RJ WOD CONVERT EST ORDINAL 00954 M00S00953.tst +++| SA1 T+1 00955 M00S00954.tst +++| AX6 6 POSITION EST ORDINAL 00956 M00S00955.tst +++| MX0 12 00957 M00S00956.tst +++| BX1 X0*X1 00958 M00S00957.tst +++| MX0 18 00959 M00S00958.tst +++| LX0 -12 00960 M00S00959.tst +++| BX6 X0*X6 00961 M00S00960.tst +++| BX6 X6+X1 MERGE EST ORDINAL AND TYPE 00962 M00S00961.tst +++| MX0 -30 00963 M00S00962.tst +++| SA1 DCHC SET EQUIPMENT IN MESSAGES 00964 M00S00963.tst +++| BX1 -X0*X1 00965 M00S00964.tst +++| BX7 X6+X1 00966 M00S00965.tst +++| SA7 DCHC 00967 M00S00966.tst +++| SA1 CKSA-1 00968 M00S00967.tst +++| SB2 B0+ 00969 M00S00968.tst +++| SB3 4 00970 M00S00969.tst +++| PRS1 SA1 A1+B1 00971 M00S00970.tst +++| BX1 -X0*X1 00972 M00S00971.tst +++| SB2 B2+1 00973 M00S00972.tst +++| BX7 X6+X1 00974 M00S00973.tst +++| SA7 A1 00975 M00S00974.tst +++| LT B2,B3,PRS1 IF MORE MESSAGES 00976 M00S00975.tst +++| MX6 0 00977 M00S00976.tst +++| SA6 T+5 00978 M00S00977.tst +++| SA6 A6+B1 00979 M00S00978.tst +++| 00980 M00S00979.tst +++|* IDENTIFY ASSIGNED EQUIPMENT. 00981 M00S00980.tst +++| 00982 M00S00981.tst +++| SA2 TEQP 00983 M00S00982.tst +++| SA1 T+B1 00984 M00S00983.tst +++| MX0 -24 00985 M00S00984.tst +++| MX4 11 00986 M00S00985.tst +++| LX4 -1 00987 M00S00986.tst +++| SX7 B1 00988 M00S00987.tst +++| PRS2 ZR X2,PRS8 IF END OF TABLE 00989 M00S00988.tst +++| BX3 X2-X1 00990 M00S00989.tst +++| BX6 X4*X3 00991 M00S00990.tst +++| LX3 X2 00992 M00S00991.tst +++| SA2 A2+B1 00993 M00S00992.tst +++| NZ X6,PRS2 IF NO EQUIPMENT MATCH 00994 M00S00993.tst +++| BX6 -X0*X3 00995 M00S00994.tst +++| IX6 X6-X7 00996 M00S00995.tst +++| SA6 NS 00997 M00S00996.tst +++| MX7 12 SET SECTOR MASK 00998 M00S00997.tst +++| NX6 X6,B2 00999 M00S00998.tst +++| AX7 X7,B2 01000 M00S00999.tst +++| SA7 A6+B1 01001 M00S01000.tst +++| 01002 M00S01001.tst +++|* RETRIEVE ARGUMENTS. 01003 M00S01002.tst +++| 01004 M00S01003.tst +++| SA1 ACTR ARGUMENT COUNT 01005 M00S01004.tst +++| SB7 B0 FORCE OCTAL CONVERSION OF ARGUMENTS 01006 M00S01005.tst +++| SB4 X1 01007 M00S01006.tst +++| SA4 ARGR FIRST ARGUMENT 01008 M00S01007.tst +++| SB5 TARG ARGUMENT TABLE 01009 M00S01008.tst +++| RJ ARG PROCESS ARGUMENTS 01010 M00S01009.tst +++| NZ X1,PRS7 IF ARGUMENT ERROR 01011 M00S01010.tst +++| SA5 NS NUMBER OF SECTORS 01012 M00S01011.tst +++| MX2 12 01013 M00S01012.tst +++| BX3 X2*X5 01014 M00S01013.tst +++| ZR X3,PRS3 IF ARGUMENT OMITTED 01015 M00S01014.tst +++| RJ DXB CONVERT OCTAL ARGUMENT 01016 M00S01015.tst +++| NZ X4,PRS7 IF ERROR IN CONVERSION 01017 M00S01016.tst +++| SX1 B1 01018 M00S01017.tst +++| IX6 X6-X1 01019 M00S01018.tst +++| ZR X6,PRS7 IF ARGUMENT ERROR 01020 M00S01019.tst +++| SA6 NS 01021 M00S01020.tst +++| MX7 12 SET SECTOR MASK 01022 M00S01021.tst +++| NX6 X6,B2 01023 M00S01022.tst +++| AX7 X7,B2 01024 M00S01023.tst +++| SA7 SM 01025 M00S01024.tst +++| 01026 M00S01025.tst +++| PRS3 SA1 NS SET SECTOR SIZE 01027 M00S01026.tst +++| RJ CDD CONVERT TO DISPLAY 01028 M00S01027.tst +++| SA6 PRSE+2 01029 M00S01028.tst +++| SX1 PRSE 01030 M00S01029.tst +++| RJ MES SEND FILE SIZE MESSAGE 01031 M00S01030.tst +++| 01032 M00S01031.tst +++|* PATTERN SELECTION. 01033 M00S01032.tst +++| 01034 M00S01033.tst +++| SA5 TP 01035 M00S01034.tst +++| RJ DXB 01036 M00S01035.tst +++| NZ X4,PRS7 IF ARGUMENT ERROR 01037 M00S01036.tst +++| SB5 X6-TPATL+1 01038 M00S01037.tst +++| BX5 X6 01039 M00S01038.tst +++| GT B5,B0,PRS7 IF ARGUMENT ERROR 01040 M00S01039.tst +++| SA1 X6+TPAT 01041 M00S01040.tst +++| SA2 PRSA 01042 M00S01041.tst +++| BX6 X1 01043 M00S01042.tst +++| LX7 X2 01044 M00S01043.tst +++| SB5 X5-5 01045 M00S01044.tst +++| ZR B5,PRS4 IF P=5 (RANDOM PATTERN) 01046 M00S01045.tst +++| SA7 GDBA SETS AN INSTRUCTION IN GDB 01047 M00S01046.tst +++| PRS4 SA6 TP 01048 M00S01047.tst +++| SX7 X5-4 01049 M00S01048.tst +++| SA7 ND SET NO DATA FLAG 01050 M00S01049.tst +++| ZR X7,PRS5 IF P=4 01051 M00S01050.tst +++| SX7 X5-6 01052 M00S01051.tst +++| NZ X7,PRS5 IF NOT P=6 01053 M00S01052.tst +++| SA7 ND SET NO DATA FLAG 01054 M00S01053.tst +++| SA7 NT SET NO DATA TRANSFER FLAG 01055 M00S01054.tst +++| 01056 M00S01055.tst +++|* TEST SELECTION. 01057 M00S01056.tst +++| 01058 M00S01057.tst +++| PRS5 SA5 TS 01059 M00S01058.tst +++| RJ DXB 01060 M00S01059.tst +++| NZ X4,PRS7 IF ARGUMENT ERROR 01061 M00S01060.tst +++| SX3 X6-6 01062 M00S01061.tst +++| PL X3,PRS7 IF ARGUMENT ERROR 01063 M00S01062.tst +++| SA6 TS 01064 M00S01063.tst +++| 01065 M00S01064.tst +++|* BLOCK SIZE SELECTION. 01066 M00S01065.tst +++| 01067 M00S01066.tst +++| SA5 BS SPECIFIED BLOCK SIZE 01068 M00S01067.tst +++| MX2 12 01069 M00S01068.tst +++| BX3 X2*X5 01070 M00S01069.tst +++| ZR X3,PRS6 IF ARGUMENT OMITTED 01071 M00S01070.tst +++| RJ DXB CONVERT OCTAL ARGUMENT 01072 M00S01071.tst +++| NZ X4,PRS7 IF ERROR IN CONVERSION 01073 M00S01072.tst +++| BX5 X6 01074 M00S01073.tst +++| AX5 9 01075 M00S01074.tst +++| LX5 9 01076 M00S01075.tst +++| IX7 X6-X5 01077 M00S01076.tst +++| NZ X7,PRS7 IF NOT MULTIPLE OF 1000B 01078 M00S01077.tst +++| PRS6 BX6 X5 SET MLRS FIELD IN FET 01079 M00S01078.tst +++| SA6 T+6 01080 M00S01079.tst +++| EQ PRSX RETURN 01081 M00S01080.tst +++| 01082 M00S01081.tst +++| PRS7 MESSAGE (=C* ARGUMENT ERROR.*) 01083 M00S01082.tst +++| EQ ABT3 ABORT 01084 M00S01083.tst +++| 01085 M00S01084.tst +++| PRS8 MESSAGE (=C* ILLEGAL EQUIPMENT.*) 01086 M00S01085.tst +++| EQ ABT3 ABORT 01087 M00S01086.tst +++| 01088 M00S01087.tst +++| PRSA BX7 X6 01089 M00S01088.tst +++| SA7 A6 01090 M00S01089.tst +++| EQ GDB2 01091 M00S01090.tst +++| 01092 M00S01091.tst +++| PRSB CON 0 DEVICE TYPE - NO DEFAULT 01093 M00S01092.tst +++| PRSC DATA 0L0 TRACK 01094 M00S01093.tst +++| PRSD CON 0 SECTOR 01095 M00S01094.tst +++| PRSE DATA C* FILE SIZE = XXXXXXXXXX SECTORS.* 01096 M00S01095.tst +++| 01097 M00S01096.tst +++| 01098 M00S01097.tst +++| TARG BSS 0 TST ARGUMENT TABLE 01099 M00S01098.tst +++| T ARG DZRO,TS,400B 01100 M00S01099.tst +++| P ARG TP,TP,400B 01101 M00S01100.tst +++| N ARG DZRO,NS,400B 01102 M00S01101.tst +++| NW ARG -ONE,NW 01103 M00S01102.tst +++| BS ARG BS,BS 01104 M00S01103.tst +++| ARG 01105 M00S01104.tst +++| 01106 M00S01105.tst +++| 01107 M00S01106.tst +++| DZRO DATA 1L0 DISPLAY CODE ZERO 01108 M00S01107.tst +++| ONE DATA 1 CONSTANT 1 01109 M00S01108.tst +++| 01110 M00S01109.tst +++| 01111 M00S01110.tst +++| TEQP BSS 0 TABLE OF EQUIPMENTS 01112 M00S01111.tst +++| VFD 12/2RMT,24/,24/100000B 01113 M00S01112.tst +++| VFD 12/2RNT,24/,24/100000B 01114 M00S01113.tst +++| VFD 12/2RCT,24/,24/100000B 01115 M00S01114.tst +++| VFD 12/2RAT,24/,24/100000B 01116 M00S01115.tst +++| CON 0 END OF TABLE 01117 M00S01116.tst +++| 01118 M00S01117.tst +++| TPAT BSS 0 TABLE OF PATTERNS. 01119 M00S01118.tst +++| DATA 0 01120 M00S01119.tst +++| DATA -0 01121 M00S01120.tst +++| DATA 25252525252525252525B 01122 M00S01121.tst +++| DATA 52525252525252525252B 01123 M00S01122.tst +++| DATA 0 01124 M00S01123.tst +++| DATA 13576420735162531625B 01125 M00S01124.tst +++| DATA 0 01126 M00S01125.tst +++| TPATL EQU *-TPAT 01127 M00S01126.tst +++| 01128 M00S01127.tst +++| SPACE 4 01129 M00S01128.tst +++| END
cdc/nos2.source/opl.opl871/deck/tst.txt · Last modified: (external edit)