CLEAR STORAGE 1 ,008015,022026,030037,044,049,053053N000000N00001026 1 CLEAR STORAGE 2 L068116,105106,110117B101/I9I#071029C029056B026/B001/0991,001/001117I0? 2 BOOTSTRAP ,008015,022029,036040,047054,061068,072/061039 ,0010011040 3 0 RD-PCH-PR SPEED TEST 1000B PAGE 1 0 SEQ PG LIN LABEL OP OPERANDS SFX CT LOCN INSTRUCTION TYPE CARD 101 JOB RD-PCH-PR SPEED TEST 102 ORG 333 0333 103 * 104 333 START SW 8,12 7 0333 , 008 012 4 105 340 RELOAD SW 1 4 0340 , 001 4 106 344 R 1 4 0344 1 001 4 107 * 108 * LOOK FOR NEXT PROGRAM -- A IN COLUMN 80 109 * 110 348 DETAIL R 1 0348 1 4 111 349 TPTEST BCE *&5,80,A 8 0349 B 361 080 A 4 112 357 BCONT B DETAIL 4 0357 B 348 4 113 361 CS RELOAD,80 7 0361 / 340 080 4 114 368 DC #1 1 0368 4 115 * 116 TAPES1 EQU 1268 BLANK INDICATES THE TAPE LOADER 1268 117 TAPERD EQU 1288 TAPE READ ROUTINE? 1288 118 TAPES2 EQU 1398 GM INDICATES THE TAPE LOADER 1398 119 ORG 377 0377 120 377 BCE BEGIN2,1278,3 8 0377 B 700 S78 3 5 121 385 B TAPERD 4 0385 B S88 5 122 ORG 400 0400 123 400 BEGIN B BEGIN2 4 0400 B 700 6 124 DC #2 2 0405 6 125 406 LOOP CS 332 4 0406 / 332 6 126 410 CS 1 0410 / 6 127 411 BSS RD,B 5 0411 B 435 B 6 128 416 BSS PU,C 5 0416 B 459 C 6 129 421 BSS PR,D 5 0421 B 483 D 6 130 426 BSS CY,E 5 0426 B 507 E 6 131 431 B SKIPRP 4 0431 B 724 7 132 435 RD LCA READ,266 7 0435 L 571 266 7 133 442 RDLOOP R 1 0442 1 7 134 443 A K1,252 7 0443 A 608 252 7 135 450 BSS RDLOOP,B 5 0450 B 442 B 7 136 455 W LOOP 4 0455 2 406 7 137 459 PU LCA PUNCH,266 7 0459 L 589 266 7 138 466 PULOOP P 1 0466 4 8 139 467 A K1,252 7 0467 A 608 252 8 140 474 BSS PULOOP,C 5 0474 B 466 C 8 141 479 W LOOP 4 0479 2 406 8 142 483 PR LCA PRINT,266 7 0483 L 607 266 8 143 490 PRLOOP A K1,252 7 0490 A 608 252 8 144 497 W 1 0497 2 8 145 498 BSS PRLOOP,D 5 0498 B 490 D 9 146 503 B LOOP 4 0503 B 406 9 147 507 CY LCA CYCLES,259 7 0507 L 553 259 9 1 RD-PCH-PR SPEED TEST 1000B PAGE 2 0 SEQ PG LIN LABEL OP OPERANDS SFX CT LOCN INSTRUCTION TYPE CARD 148 514 CYLOOP A K5,252 7 0514 A 615 252 9 149 521 B SKIPN,F 5 0521 B 527 F 9 150 526 NOP 1 0526 N 9 151 527 SKIPN CS 831 4 0527 / 831 9 152 531 B CYLOOP,E 5 0531 B 514 E 10 153 536 W LOOP 4 0536 2 406 10 154 540 CYCLES DCW @ CYCLES@ 14 0553 10 155 554 READ DCW @ CARDS READ @ 18 0571 11 156 572 PUNCH DCW @ CARDS PUNCHED@ 18 0589 11 157 590 PRINT DCW @ LINES PRINTED@ 18 0607 12 158 608 K1 DCW 1 1 0608 12 159 609 K5 DCW @ 5@ 7 0615 12 160 616 DCW #1 1 0616 12 161 ORG 700 0700 162 700 BEGIN2 CS 332 4 0700 / 332 13 163 704 CS 1 0704 / 13 164 705 B HEADPR,1252,1 8 0705 B S00 S52 1 13 165 713 HDRET CS 180 4 0713 / 180 13 166 717 H 1 0717 . 13 167 718 NOP SKIPRP 4 0718 N 724 13 168 722 R 1 0722 1 13 169 723 P 1 0723 4 14 170 724 SKIPRP B H,G 5 0724 B 733 G 14 171 729 B LOOP 4 0729 B 406 14 172 733 H H DETAIL 4 0733 . 348 14 173 DCW #1 1 0737 14 174 ORG 1200 1200 175 1 200 HEADPR W 1 1200 2 15 176 1 201 SW 49 4 1201 , 049 15 177 1 205 LCA 76,276 7 1205 L 076 276 15 178 1 212 W 1 1212 2 15 179 1 213 CS 277 4 1213 / 277 15 180 1 217 W HDRET 4 1217 2 713 15 181 DCW #1 1 1221 15 182 END START / 333 080 1 RD-PCH-PR SPEED TEST 1000B PAGE 3 0SYMBOL ADDRESS SYMBOL ADDRESS SYMBOL ADDRESS SYMBOL ADDRESS SYMBOL ADDRESS SYMBOL ADDRESS SYMBOL ADDRESS BCONT 357 BEGIN 400 BEGIN2 700 CY 507 CYCLES 553 CYLOOP 514 DETAIL 348 H 733 HDRET 713 HEADPR 1200 K1 608 K5 615 LOOP 406 PR 483 PRINT 607 PRLOOP 490 PU 459 PULOOP 466 PUNCH 589 RD 435 RDLOOP 442 READ 571 RELOAD 340 SKIPN 527 SKIPRP 724 START 333 TAPERD 1288 TAPES1 1268 TAPES2 1398 TPTEST 349