Digital PDFs
Documents
Guest
Register
Log In
MAINDEC-15-D0HA-D
February 1978
116 pages
Original
2.8MB
view
download
Document:
EAE Part2 Feb70
Order Number:
MAINDEC-15-D0HA-D
Revision:
Pages:
116
Original Filename:
http://bitsavers.org/pdf/dec/pdp15/diag/MAINDEC-15-D0HA-D_EAE_Part2_Feb70.pdf
OCR Text
IDENTIFICATION Product Code: MAINDEC- 15-D~HA-D(O) Product Name: ~~'Pdr;t,iI \':'I·I,.!~II'''' ~ Date Created: February 6, 197~ Maintainer: Diagnostic Group Author: J. Hittell/J. Klapkiw 1. ABSTRACT Part 2 of the PDP-15 EAE Diagnostic verifies only correct operation of the EAE multiply and divide instructions. Part 2 is written in two sections: Section 1 checks EAE instructions against predetermined results. This ranges from setup operation, through multiply and divide instructions executed back to back; Section 2 is a random-number check of the signed multiply and signed divide instructions. Hardware malfunctions in Section 1 result inan error halt. Hardware malfunctions in Section 2 result in an error message on the teleprinter. 2. REQUIREMENTS The program when loaded occupies locations 20 to 7500. Subprograms and/or Subroutines Teletype Output Package Signed Multiply Subroutine (modified) Signed Divide Subroutine (modified) Equipment Minimum configuration PDP-15 with EAE option installed 3. USAGE 3. 1 Loading a. Set Bank Mode SW on 1 b. Set address SW to 177~ c. Press reset, press READ-I N. 3 .2 Ca II ing Sequence The program halts aft~r loading. Set address switches to: ~ Section 1 (Constants) 2~1 Section 2 (Random numbers) 2~3 Switch Setting typeout, Press Reset, press START. If 2~3 is chosen, program halts at 6622 after typeout. To continue, set ~, or 2,01 in address switches Press reset, press START. -1- 3.3 Switch Settings AC Switches = 0 or Down With all AC switches down, the program results in the following: a. Hardware malfunctions detected in Section 1 result in an error halt. b. Hardware malfunctions detected in Section 2 result in an error typeout. c. At the completion of the error typeout, the processor halts. d. The program completes whichever section of test it was started in, sequence from each subtest of the section to the next, without halting. AC Switches 1 or Up SW o Operation Description Delete error typeouts The program will not type out error messages, but will ring bell on error. Halt after EAE operation The processor halts after each EAE operation is initiated and its results are verified. (Note: Press CONTINUE to proceed .) 2 Repeat EAE operation (Scope Loop) The program repeats the last EAE operation# If SW2 is set during an error typeout or halt, the program repeats the operation that caused the error. (Note: SW 1 is tested before SW2.) 3 Halt after EAE sequence The processor halts after each sequence of testing an EAE operation. 4 Repeat EAE sequence The program repeats the last sequence of testing an EAE operation; i.e., the program repeats the EAE AC sign test and does not proceed to multiply/divide test. (Note: The program tests SW3 before SW4.) 5 Cycle a II sections At the completion of n passes through' the Set-Up Test, the program proceeds to the Random Multiply and Divide Test. At the completion of passes through Random Test the program repeats the Set-Up Test. 6 Print "OK" after each pass when SW5 =1 -2- 3.4 Start-Up and/or Entry Start up, Section 1 Set AC switches = 000000 Set address = 0200 Press Reset Press START Start up, Section 2 Set AC switch = 000000 Set address = 0201 Press Reset Press START 3 •5 Errors in Usage Hardware malfunctions detected in Section 1 will result in an error halt. Refer to the I isting using the address in the memory register to identify the error. Hardware malfunctions detected in Section 2 will result in an error typeout on the teleprinter, and a processor halt. a. Error typeouts are in standard format and include the following information. b. Type of failure, multiply or divide. c. Initial problem set-up, contents of the AC, MQ, and the divisor and multiplicand. d. The results of the instruction, i.e., if divide, the quotient and remainder; if multiply, the high and low order product. A comparison of the results (software vs hardware). e. A printout of the ratio of failure, based on 100 octal iterations. f. If the ratio is small, it is recommended that CONTINUE be depressed to find a setup that produces a higher failure ratio. g. Then set the address register equal to the contents of the AC and depress START. This will generate a simulated printout of the EAE failure. After the printout the program will go into a scope loop, executing the instruction that failed. -3- 3.5 (Continued) The abbreviations used by the header ar-e as follows: Abbreviation Meaning C(l) The information under this header is the contents of LINK. C(AC) The information under this header is the contents of AC. C(MQ) The info.rmation under this header is the contents of MQ. C(SC) The information under this header is the contents of SHIFT COUNT. (DIVISOR) The information under this header is the contents of MBnot sign corrected. (MULTIPLICAND) The information under this header is the contents of MBnot sign corrected. Error Typeout Examples: a. Sign Mu Itiply MUlS FAilED MULTIPLIER MULTIPLICAND 705722 167372 HIGH ORDER PRODUCT lOW ORDER PRODUCT SOFTWARE 762343 133015 HARDWARE 762443 762343 OUT OF 100 CHECKS BAD 1 6443XX (XX = SHIFT COUNT) b. Sign Divtde DIVS C(DIVISOR) C(AC) 235012 223506 QUOTIENT SOFTWARE 741320 HARDWARE 74132P OUT OF 100 CHECKS BAD 1 6443XX (XX = SHIFT COUNT) C(MQ) 304176 REMAINDER 146136 146135 c. Example of Multiply Simulation MULTIPLIER (AC) MULS FAilED 235037 HIGH ORDER PRODUCT -4- MULTIPLICAND 534247 LOW ORDER PRODUCT 754134 SOFTWARE 754134 HARDWARE OUT OF 100 CHECK BAD 100 (10 SHIFTS) 657110 257305 57305 C(L) C(AC) C(MQ) C(SC) 0 0 0 0 0 0 0 0 0 0 121654 172602 217155 231342 236435 117216 47507 754134 235037 116417 47207 23503 411641 204720 502350 241164 257305 70 (2's compliment of 10) 71 72 73 74 75 76 77 o d. Example of Divide Simulation DIVS FAILED C(DIVISOR) 317121 QUOTIENT 477353 477353 CHECK BAD 1,$ SOFTWARE HARDWARE OUT OF 1,$ C(AC) 216663 REMAINDER 715731 715731 C(MQ) /647735 LINK 1 ~ 6443,f13 (Program Halts. Set Address Register equal to AC then START. (3.5.g» (Print out of simulated Divide) ovrflo 3.6 C(L) ~ C(AC) 216663 C(MQ) /647735 ~ 1 1 677542 5773f64 116425 ,&t7735 117672 117672 11 11 11 235~52 715731 715731 237565 237565 477353 715731 477353 C(SC) 1175 ••... Initial AC & MQ after complenting ~75 ..••• 1st subtract ~76 .•••• 1st shift 1176 ••.•• 2nd subtract-overflow \ caused ~77 .•••• 2nd shift 1177 ..•.. 3rd subtract 1177 ••, ••• 3rd shift-overflow recognized. ,f177 ••••• Last cycle adjust. Recovery from such Errors In Section 1, a malfunction causes 0 processor halt. In Section 2, a malfunction will generate an error typeout, then halt the processor. One of the followi~ operations may be necessary if more information about the -5- 3.6 (Continued) failure is needed to repair the malfunction. a. Repeat the exact operation that detected the failure (possibly a scope loop). b. Continue normally in the test to generate more information about the failure. c. Repeat the sequence of operation, or data patterns that detected the failure. d. Produce a simulation printout of failing multiply or divide instruction. AC switch control is built into the program to allow for any of these operations assum ing the processor has ha Ited after an error. These operations may be accomplished as follows: a. Repeat same operation Set AC switch 2 up or to a Press CONTINUE Not that AC switch 0 sllows deletion of error typeout for a scope loop. b. Continue normally Press CONTINUE c. Repeat Sequence Set AC switch 4 up to a 1 Press CONTINUE d. Simulation Printout Set Address Switch = C(AC) (At completion of Printout the program goes to an automatic scope loop.) 4. PROGRAM DESCRIPTION 4. 1 General The PDP-15 EAE Diagnostic part 2 verifies correct operation of the Multiply and Divide EAE Instruction. Part 2 itself is written in two logical sections as follows: Section 1 - Set up test using fixed number Verifies correct operation of all EAE Multiply and Divide instructions with fixed numbers. -6- 401 (Continued) Section 2 - Random Number Verifies correct operation of signed Multiply and Signed Divide instruction with random numbers. The above sections are to be run sequentially; that is, Section 1 must run before Section 2. 4.2 test Description 4.2.1 Section 1 Set-Up Test - The Set-Up Test incrementally verifies correct operation of the mu ltiply and divide instruction. a. "ADVP" Checks that the memory location following the multiply and/or divide instruction is not modified by the execution of the instruction and that the program address counter is properly incremented during the exectuion of the instruction. b. "NEAE" Set up check - Checks the set-up of all EAE signed, unsigned, integer and fraction, multiply and divide instructions. These instructions are executed w itha shift count of zero. c. II SHCT" Shift Counter Test- Executes the Multiply instruction sequentially starting at a shift count of 1 and incrementing it up to a shift count of 22. d. "STMUL" Sign multiply and divide test - Test all signed multiply and divide instructions. e. "MULTST" Multiply and Divide Test - This test using worse-case number patterns acts as both a EAE and Adder Test. f. "MSPEED" Speed Multiply and Divide - This test is in three operations: (1) a sequence of multiply instructions are executed back to back, (2) then a sequence of divide instructions are executed, (3) followed by a sequence of MUL, DIV, MUL, and DIV executed back to back. 4.2.2 Section 2 Random Data Multiply and Divide Test - The Random Data Test verifies that the EAE will multiply and divide random numbers at shift counts 1 through maximum (22 for multiply, 23 for divide) and checks that the LI NK is set on _1_ 4.2.2 (Continued) divide overflow. The sequence of testing is as follows: (a) Test the Mu Itiply (1) Generate a random number (2) Do a software divide (3) Do a software divide (4) Compare the results of both operations (5) LOOP BACK TO 1 TILL DONE 4·.2.3 Extended Reliability Testa. If it is desired to run an extended reliability test on the EAE and the computer is to be left unattended, the halts in Part II Section 2 should be changed. MULCT-2 --- From a Halt to a NOP (6254) TIMTEX-2 ---From a Halt to a NOP (6304) b. There is also a counter that count$ pass completes "CTCMPT". This counter is cleared when starting the program or when restarting at "FIRST" oc FIRST + 3 (CTCMPT = 7146). PAGE 1 EAE-I I 00200 00200 00201 00202 00203 002~4 00205 00206 00207 00210 00211 00212 00213 00214 00215 00216 00217 00220 00221 00222 00223 00224 00225 00226 00227 00230 00231 00232 00233 00234 00235 00236 00237 00240 00241 00242 00243 00244 00245 606624 606627 607047 740000 147176 147177 207176 673101 740040 741000 740040 447176 600206 147176 147177 207176 653122 740040 741000 740040 447177 600217 147176 147177 207176 653122 007177 741000 740040 207177 547176 741000 740040 447176 740000 447177 60(11230 740000 .TITLE EAE-II IEAE PART r I MULTIPLY AND DIVIDE-rOR PDP 15 I IST,~RT AT 2~0 rOR SECTION ONE (CONSTANTS) ISTAF\T AT 201 rOR SECTION TWO (RANDOM DATA) ISTART AT 203 rOR SWITCH SETTING TYPEOUTS. I .ARS .LOC 200 JMP RUN+1 JMP RUN+4 JMP rIRST NOP ADVP ICHECK rOR P HNCREMENT r1~M STEMA# IWITH NO SHIrT D~M STEM8# LAC STEMA MUL -21 (1t15) IP NOT INCREMENTED HLT SKp HL T (107) IP OVER INCREMENTED IS~ STEMA JMP .-6 D~M STEMA /CHECK rOR P INCREMENT /WITH 22 SHIFT COUNTS Di!M STEMB LAC STEMA MUL (116) IP NOT INCREMENTER HLT SKP /p OVER INCREMENTED HLT (120) IS~ STEMS JMP .-6 D~M STEMA lIS MEMORY RESTORED /CORRECTLY D~M STEMS LAC STEMA MUL STEMB SKp /p OVER INCREMENTER HLT (132) LAC STEMS SAD STEMA SKP HLT IVARIA8LE NOT RESTORED CORRECT (136) IS2 STEMA Nap IS2 STEMS JMP .-14 Nap IEXIT .EJECT PAGE 2 r AF - I I Vl0?4t- 1~4162 ~0?47 104157 00250 (;')0251 00252 00253 00254 00255 00256 00257 00260 00261 00262 00263 00264 00265 00266 00267 00270 00271 00272 00273 00274 00275 00276 00277 00300 00301 00302 00303 00304 00305 00306 00307 00310 00311 00312 00313 00314 00315 00316 00317 00320 00321 00322 00323 744CH1!2 207205 652000 2072 0 6 6441 00 ~00001 047156 641002 047157 547207 741000 740040 207156 547210 741000 740040 10 4 130 740000 104157 207205 652000 207206 644100 777776 047156 641002 047157 547205 741000 740040 207156 547206 741000 740040 104130 104157 740000 207207 652000 207206 644100 000001 047156 641002 IBASIC EAE INSTRUCTION INa SHIFTS INO GSM JMS LOOP4 IHLT AnDRESS NEAE JMS LOOP2 STL LAC (070707) LMQ LAC (2'52525) ISPECIAL INST 6441(;,)0 EAE 4100 000001 OAC FIAC# LACa DAC FIMQ# SAO (7"'7070 SKP HLT (160) IBAD MO, GOOD=707070 LAC FIAC SAO (5?5252 SKP HLT 18AD AC, GOaO=C;25252 (164) JMS HLOOPS NOP JMS LOOP2 LAC (070707) LMQ LAC (2'52525) EAE 4100 ISPECIAL INST 644100 777776 DAC FIAC LACa DAC FIMa SAO (070707) SKP HLT (202) 18AD MQ, GOOo=070707 LAC FIAC SAO (2C;2525) SKP HLT (206) IBAD AC, GOOD=252525 JMS HLOOPS JMS LOOP2 Nap LAC (707070) LMQ LAC (252525) ISPECIAL INST 644100 EAE 4100 000001 OAC FIAC LAca .EJECT PAGE 3 fAE-II DAC FI~Q SAD (7(!'707(/1) ~0324 0471~7 ~0325 '147207 00326 00327 00330 00331 00332 00333 0033 4 00335 00336 00337 00340 00341 00342 00343 00344 00345 00346 00347 00350 00351 00352 00353 00354 00355 741000 SKP "4('1~40 HLT /8AD LAC FIAC SAD (2')252~) SKP HLT /8AD JMS HLOOPS JMS LOOP2 NOP LAC (707070) LMQ LAC (525252) EAE 4100 777776 OAC flAC LACa DAC FIMa SAD (7!'!707!fJ) SKP HLT /8AO LAC FIAC SAD (525252) SKP HLT /8AD JMS HLOOPS JMS LOOP2 .EJECT 0035~ 00357 2071~6 547206 741000 740040 104130 Hl4157 740000 207207 652000 207210 644100 777776 047156 641002 047157 547207 741000 740040 207156 547210 741000 74012140 104130 104157 MO, GOOD=707070 (224 ) AC, GOOD=252525 (230) /SPECIAL INST 644100 MO, GOOD=707070 (246 ) AC. GOOD=525252 (252) PAGE 4 EAF-I I 00360 00361 00362 00363 00364 00365 00366 00367 00370 00371 00372 00373 00374 00375 00376 00377 00400 00401 00402 00403 00404 00405 00406 00407 00410 00411 00412 00413 00414 00415 00416 00417 00420 00421 00422 00423 74~000 207205 65~000 207206 654100 Cll00001 047156 641002 (1147157 547211 7411£'00 7401£'40 207156 547206 741000 740040 104130 104157 740000 207205 652000 207206 654100 777776 047156 641002 047157 547211 741000 740040 207156 547206 741000 740040 104130 104157 NEA8 NOP LAC (070707) LMQ LAC (2'5252'5) rAE 1410~ 000001 OAC FlAG LACQ OAG FIMQ SAD (0~000~ SKP HLT IBAD LAC FIAC SAO (2'52525) SKP HLT 18AD JMS HLOOPS JMS LOOP2 NOP LAC (070707) LMQ LAC (252525) EAE 14100 777776 OAC FIAC LACQ UAC FIMQ SAO (000000 SKP HLT 18AD LAC FIAC SAO (252525) SKP HLT 18AD JMS HLOOPS JMS LOOP2 .EJECT ISPECIAL INST (-54100 MQ, GOOD=(1I00000 (270) AC, GOOD=252525 (274) ISPECIAL INST 654100 MO, GOOO=000000 (312) AC, GOOD=252525 (316) PAGE I:.i EAt -I I ~0424 V1042~ 0042(-, 00427 00430 00431 00432 00433 00434 00435 00436 00437 00440 00441 00442 00443 00444 00445 00446 00447 00450 00451 00452 00453 00454 00455 00456 00457 00460 00461 00462 00463 00464 00465 00466 74111000 207207 ('5?11100 054100 00""001 047156 641002 047157 547211 741000 740040 207156 547207 741000 740040 104130 104157 740000 207207 652000 207210 654100 777776 047156 641002 1.')47157 547211 741000 740040 207156 547210 741000 740040 104130 104157 NOP LAC (7flJ7flJ7fJJ) LMQ EAE 1410"" 000001 DAC FIAC LACQ DAC FIMQ SAD (0111000(11 SKP HLT IBAD LAC F"IAC SAO (707070) SKP HLT IBAD JMS HLOOPS JMS LOOP2 NOP LAC (7"'7070) LMQ LAC (5~5252) EAE 14100 777776 DAC F"IAC LACQ DAC FIMQ SAO (0111000flJ) SKP HLT IBAD LAC FIAC SAO (525252) SKP HLT IBAD JMS HlOOPS JMS LOOP2 .EJECT ISPECIAL INST 654100 MQ, GOOD=1II000(110 (333) AC, GOOD=707070 (337) ISPECIAL INST 654100 MQ, GOOD=flJ00000 (355) AC, GOOD=S25252 (361) PAGE 6 EAt - I I 00467 00470 00471 00472 00473 00474 00475 00476 00477 00500 00501 005 0 2 00503 00504 00505 00506 00507 00510 00511 00512 00513 00514 00515 00516 00517 00520 00521 00522 00523 00524 00525 ·3&526 005.27 00530 00531 00532 00533 00534 00535 00536 00537 00540 00541 00542 00543 00544 00545 00546 00547 00550 00551 00552 00553 74~000 207205 65 2 000 207206 673100 000001 047156 641002 047157 5472 0 6 741000 740040 207156 547211 741000 740040 104130 104157 740000 207205 652000 207206 673100 777776 047156 641002 047157 547206 741000 740040 207156 547211 741000 740040 104130 104157 740000 207207 652000 207210 673100 000001 047156 641002 047157 547210 741000 74"""140 207156 547211 741000 740040 104130 NMUL NOP LAC (070707) LMO LAC (252521) MUL -22 000001 DAC FlAC LACQ ITHE EAE [)AC FI~Q SAD (21)2525) SKP HLT IBAD MO, LAC FIAC SAD (0010000) SKP HLT IBAD AC, JMS HL()OPS JMS LOOP? NOP LAC (070707) LMQ LAC (252525) MUL -22 777776 DAC FIAC LACQ DAC FIMQ SAD (252525) SKP HLT IBAD MO, LAC FIAC SAD (0010000) SKP HLT IBAD AC, JMS HLOOPS JMS LOOP2 NOP LAC (707070) LMQ LAC (5?525?) MUL -22 000001 DAC FIAC LACQ OAC FIMQ SAD (525252) SKP HLT IBAD MO, LAC FIAC SAO ( ~:H~00001 SKP HLT IBAD AC, JMS HLOOPS .EJECT IMULTIPLY INSTRUCTIONS WITH NO SHIrTS ICHECKING SETUP, THE FIRST ONt:. IS lAC ~Q Ar ~Q I (252525) X(, el0~VJ1) =vl00l~VJ(21)2'52~ lOURING sETUP THE MQ IS sET TO SOME VALUF INSTROCTION DOES AN AC EUQAL TO MQ TRANSFER GOOD=252525 (377) GOOD=000000 (403) GOOD= 2·52525 (421) GOOD=000000 (425) GOOD=525252 (443) GOOD=000000 (447) PAGE 7 EAE-II 00554 00'555 00556 "'0557 012156121 00561 1210562 0121563 00564 1210565 1210566 00567 00570 00571 1210572 00573 00574 00575 00576 104157 7401211210 ?07207 65212100 21217210 673100 777776 047156 641002 047157 547210 74101210 740040 207156 547211 741000 740040 104130 104157 JMS LOOP2 NOP LAC (7r;,707e1) LMO LAC (525252) MUL -22 777776 nAC FI~C LACQ OAC Flt-.10 SAD (525252) SKP HLT IBAO MO, GOOD=r;25252 LAC FIAC SAD (001012100 SKP HLT IBAO AC, GOOD=Pl000el0 JMS HLOOPS JMS LOOP2 .EJECT (465) (471 ) PAGE A FAt - I I ~0S77 III 0 MH:' ~0601 006ilJ? "-10603 00604 00605 00606 00607 0061 0 00611 00612 00613 00614 00615 00616 00617 00620 00621 00622 00623 00624 00625 00626 00627 00630 00631 00632 00633 00634 74V'llil00 207205 652000 207206 677100 00(i11001 047156 641002 047157 547206 741000 740040 207156 547211 741000 740040 104130 104157 740000 207205 652000 207206 677100 777776 047156 641002 047157 547206 741000 740040 NMULS Nap LAC (070707) ISIGNED MULTIPLY NO SHIFTS LMQ LAC (2'12525) MULS -?2 000001 DAC FIAC LACQ OAC FIMQ SAD (2'52525) SKP HLT IBAD MQ, GOOD=252525 (507) LAC FIAC SAO (0010000) SKP HLT IBAD AC, GOOD=000000 (513) JMS HLOOPS JMS LOOP:? Nap LAC (070707) LMQ LAC (252525) MULS -22 777776 DAC FIAC LACQ OAC FIMQ SAO (252525) SKP HLT IBAD MQ, GOOD=252525 (531) .EJECT PAGE 9 EAE-II 121063'5 ~063A 00637 00640 00641 00642 00643 00644 0064'5 00646 00647 00650 1210651 00652 00653 00654 00655 00656 00657 00660 00661 00662 00663 00664 00665 00666 0121667 00670 00671 00672 00673 00674 00675 010676 00677 00700 00701 00702 00703 00704 00705 00706 207156 547211 74Hl00 LAC FIAC SAll (0(~eJ~eJ~ ) SKP 740040 104130 104157 740000 207207 652000 207210 677100 0000"'1 047156 641002 047157 547210 741000 740040 207156 547212 741000 740040 104130 104157 74001210 207207 652000 207210 677100 777776 047156 641002 047157 547210 741000 740040 207156 547212 741000 740040 104130 104157 HLT IBAD AC, GOOD=0!00000 JMS HLOOPS JMS LOOP2 NOP LAC (71lJ707flJ) LMQ LAC (525252 MULS -22 (1100001 nAC rIAC LACQ DAC FIMQ SAO (525252) SKP HLT IBAO MQ , GOOD=525252 LAC FIAC SAD (777777) SKP HLT 18AO AC, GOOO=777777 JMS HLOOPS JMS LOOP2 NOP LAC (707070) (535) (553) (557) LMQ LAC (525252) MULS -?2 777776 DAC FIAC LACQ OAC FIMQ SAD (525252) SKP HLT 18AO MO, GOOO=525252 LAC rlAC SAD (777777) SKP HLT 18AO AC, GOOO=777777 JMS HLOOPS JMS LOOP2 .EJECT (575) (601) PAGE 10 E AE - I I 00707 74~000 0071~ 207 2 05 007 11 00712 00713 00714 00715 00716 00717 00720 00721 00722 00723 00724 00725 00726 00727 00730 00731 00732 00733 00734 00735 00736 00737 00740 00741 00742 00743 00744 00745 00746 00747 00750 00751 00752 00753 652r!HlJ0 207206 660300 000001 047156 641002 047157 547205 741000 74(21040 207156 547206 741000 74(21040 104130 104157 740000 740000 207205 652000 207206 660300 777776 047156 641002 047157 547205 741000 740040 207156 547206 741000 7401(J40 104130 104157 NOIV NOP LAC (070707) LMQ LAC (2')2525) OIV -23 000001 DAC FIAC LACQ DAC FIMQ SAD (070707) SKP HLT IBAD LAC FIAC SAD (2525215) SKP HLT IBAD JMS HLOOPS JMS LOOP2 NOP NOP LAC (070707 LMQ LAC (2')2525 DIV -23 777776 DAC FIAC LACQ DAC FIMQ SAD (070707) SKP HLT IBAD LAC FIAC SAO (252525) SKP IBAD HLT JMS HLOOPS JMS LOOP2 .EJECT IDIVIOE INSTRUr,TION NO SHIFTS ITHE EAE INSTRUCTIONS OOFS NOT ICHANGF THE AC OR THE MQ MQ, GOOO=070707 (617) AC, GOOD=252525 (623) MQ, GOOD=070707 AC, GOOD=252525 (642) (646) -PAGE 11 EAE-I I 00754 00755 e0756 00757 007M~ 00761 00762 00763 00764 00765 00766 00767 00770 00771 00772 00773 00774 00775 00776 00777 01000 01001 01002 01003 01004 01005 01006 0H'J07 01010 01011 0HH2 01013 01014 01015 01016 01017 740000 207207 65?000 207210 660300 V'l00001 047156 641002 047157 547207 741000 740040 207156 547210 741000 740040 104130 104157 740000 207207 652000 207210 660300 777776 047156 641002 047157 547207 741000 740040 207156 547210 741000 740040 104130 104157 NOP LAC (7r;'17070 LMQ LAC (5~5252 DIV -23 00Vl0vH DAC FIAC LACQ nAC FIMQ SAO (70707~) SKP HLT IBAD LAC FIAC SAD (525252 SKP HLT IBAD JMS HLOOPS JMS LOOP2 NOP LAC (7V'1707V'1 LMO LAC (525252 DIV -23 777776 DAC FIAC LACQ DAC FIMQ SAD (707070) SKP IBAD HLT LAC FIAC SAD (525252 SKP IBAD HLT JMS HLOOPS JMS LOOP2 .EJECT MO, GOOD=707070 (664) AC, GOOD=525252 (670) MQ, GOOD=707070 (706) AC, GOOO=525252 (712) PAr.E 12 r AF - I I ~1~2~ V'1021 V'l1 0 22 ~1023 01024 V11025 01026 01027 0103(11 01031 0H1J32 01033 01 0 34 01035 01036 01037 01040 01041 01042 01043 01044 01045 01046 01047 01050 01051 01052 01053 01054 01055 01056 01057 01060 01 0 61 01062 74()j000 207205 652000 207206 664300 ()j0C1!001 047156 641002 047157 547205 741000 740040 207156 547206 741000 740040 104130 104157 740000 207205 652000 207206 664300 777776 047156 641002 047157 547205 741000 74Cl1040 207156 547206 741000 740040 104130 NDIVS NOP LAC (070707) LMO LAC (2'5252'5 OIVS -;:>3 ()j0C1!0P.11 OAC ~IAC LACQ DAC FIMQ SAD (070707) SKP HLT IBAD LAC FIAC SAD (2'5252'5) SKP HLT IBAD JMS HLOOPS JMS LOOP2 NOP LAC (070707 LMQ LAC (252525 OIVS -23 777776 DAC FIAC LACQ OAC FIMQ SAD (070707 SKP HLT IBAD LAC FIAC SAO (252525) SKP HLT IBAD JMS HLOOPS .EJECT INO SHI~TS DIVIDE SIGNFD MQ, GOOD=070707 (730) AC, GOOD=252525 (734) MQ, GOOD=070707 (752) AC, GOOD=252525 (756) PAGE 13 EAE-I I 01063 ~1~64 ~1065 01066 01067 v,!070 01071 01072 01073 rt!1074 01075 01076 01077 01100 01101 01102 01103 01104 01105 01106 01107 01110 01111 01112 01113 01114 01115 V'!1116 01117 01120 01121 01122 01123 01124 01125 01126 104157 74QHHlj0 207207 652000 207206 664300 0000rt!1 641002 047157 547207 741000 740040 207156 547206 741000 740040 104130 104157 740000 207207 652000 207210 664300 777776 047156 641002 047157 547207 741000 74V'!040 207156 547210 741000 740040 104130 104157 IINTEGER 11 CLEAR 12 AC TO 13 CLEAR JMS LOOP2 NOP LAC ( 7"'7070 LMQ LAC (252525 DIVS -23 000001 LACQ DAC rIMQ SAD (7"'7070) SKP HLT IBAD LAC FIAC SAO (252525) SKP HLT IBAD JMS HLOOPS JMS LOOP2 NOP LAC (707070 LMQ LAC (525252 OIVS -23 777776 OAC FIAC LACQ OAC FIMQ SAO (707070 SKP HLT IBAD LAC FIAC SAD (525252) SKP HLT IBAD JMS HLOOPS JMS LOOP2 DIVIDE MQ MQ AC .EJECT MQ, GOOD=707070 (773) AC, GOOO=252525 (777 ) MQ, GOOD=707070 (H;:)15) AC, GOOD=525252 (1021) PAGE 14 EAE-I I 01127 01130 01131 01132 01133 01134 01135 01136 01137 01140 01141 011 4 2 01143 01144 01145 01146 01147 01150 01151 01152 01153 01154 01155 01156 01157 01160 01161 01162 01163 01164 01165 01166 01167 01170 01171 01172 740000 207205 65:2000 207206 673300 000001 047156 ~41002 ~47157 547206 741000 740040 207156 547211 741000 740040 104130 104157 740000 207205 652000 207206 673300 777776 047156 641002 047157 547206 741000 740040 207156 547211 741000 740040 104130 104157 NIOIV NOp LAC (070707) LMO LAC (2'5252'5 IDIV -;:>3 000001 DAC FIAC LACQ OAC FIMQ SAD (252525 SKP HLT IBAD LAC FIAC SAD (000000) SKP HLT IBAD JMS HLOOPS JMS LOOP2 NOP LAC (070707 LMQ LAC (252525 IDIV -23 777776 DAC FIAC LACQ DAC FIMQ SAD (252525 SKP HLT IBAD LAC FIAC SAD (000000) SKP HLT IBAD JMS HLOOPS JMS LOOP2 .EJECT INO SHIFT INTEGER DIVInE MQ, GOOD=252525 (1037) AC, GOOD=000000 (1043) MQ, GOOD=252525 (1061) AC, GOOD=000000 (1065) PAGE 15 EAE- I I 01173 01174 f/J1175 01176 C1J1177 01200 01201 01202 01203 01204 01205 01206 01207 01210 01211 01212 01213 01214 01215 01216 01217 01220 01221 01222 01223 01224 01225 01226 01227 01230 01231 01232 01233 01234 01235 01236 740000 207207 652000 207206 673300 C1J00001 047156 641002 047157 r:>47206 741000 740040 207156 547211 741000 740040 104130 104157 740000 207207 652000 207210 673300 777776 047156 641002 047157 547210 741000 740040 207156 547211 741000 74P1040 104130 104157 NOP LAC (7fJ17070 LMQ LAC (2r:>2525) IDIV -23 000001 DAC FIAC LACQ [JAC FIMQ SAD (2r:>2525 SKP HLT IBAD LAC FIAC SAD (000000 SKP HLT IBAD JMS HLOOPS JMS LOOP2 NOP LAC (707070 LMQ LAC (525252 IDIV -23 777776 [JAC FIAC LACQ DAC FIMQ SAD (525252 SKP HLT IBAD LAC FIAC SAD (000000) SKP HLT IBAD JMS HLOOPS JMS LOOP2 .EJECT MO, GOOD=252525 (11 0 3 ) AC, GOOD=000000 (11 0 7) MQ, GOOD=525252 (1125) AC, GOOD=000000 (1131) PAGE 16 EAE-I I 01237 ~1240 740000 207205 01241 652~00 ~1242 207206 677300 000001 047156 641002 047157 547206 741000 740040 207156 547211 741000 740040 104130 104157 740000 207205 652000 207206 677300 777776 047156 641002 047157 547206 741000 740040 207156 547211 741000 74"'040 104130 104157 01243 01244 01245 01246 01247 01250 01251 °1252 01253 01254 01255 O1256 01257 01260 01261 01262 01263 O1264 01265 01266 01267 01270 01271 01272 01273 01274 01275 01276 01277 01300 01301 01302 NIDIVS NOP LAC (070707) LMQ LAC (2">252'5 IOIVS -23 INO SHIFTS INTEGFR otVTDF SIGNfD vHlHHHlJi DAC FIAC LACQ OAC FIMQ SAO (2">2525) SKP HLT IBAO LAC FIAC SAD (0~000"') SKP HLT IBAD JMS HLOOPS JMS LOOP2 NOP LAC (070707 LMQ LAC (252525 IDIVS -23 777776 DAC FIAC LACQ OAC FIMQ SAD (252525) SKP HLT IBAO LAC FIAC SAD (000000) SKP HLT IBAD JMS HLOOPS JMS LOOP2 .EJECT MQ, GOOD=252525 (11 47 ) AC, GOOD:"'00000 (1153) MQ, GOOD=252525 (1171) AC, GOOD=00"'000 (1175) --PAGE 17 EAE- I I CIl1303 01304 ~1305 01306 CIl1307 CIl131C1l ~1311 01312 01313 ~1314 01315 01316 01317 0132~ 01321 01322 01323 01324 01325 01326 01327 01330 01331 01332 01333 01334 01335 01336 01337 01340 01341 01342 01343 01344 01345 01346 74C1l000 207207 1152000 ??7210 677300 ~00001 047156 641002 047157 547210 741000 740040 207156 547212 741000 740040 104130 104157 740000 207207 652000. 207210 677300 777776 047156 641002 047157 547210 741000 740040 207156 547212 741000 74111040 104130 104157 NOP LAC (7'lJ707~ LMQ LAC (525252 IDIVS -23 000001 OAC FlAC LACQ OAC FI~Q SAn (525252 SKP HLT IRAD LAC FIAC SAD (777777 SKP HLT IBAD JMS HLOOPS JMS LOOP2 NOP LAC (707070 LMQ LAC (525252 IDIVS -23 777776 DAC FIAC LACQ DAC FIMQ SAO (525252 SKP HLT IBAD LAC FIAC SAO (777777) SKP HLT IBAD JMS HLOOPS JMS LOOP2 IFRACTION DIVIDE 11 CLEAR MQ .EJECT MO, GOOD=525252 (1213) AC, GOOD=777777 (1217) MQ, GOOD=525252 (1235) AC, GOOD=777777 (1241) PAGE 18 EAF-II 01347 01350 01351 01352 01353 01354 01355 1211356 01357 1211360 01361 1211362 01363 1211364 1211365 1211366 1211367 01370 1211371 1i11372 01373 1211374 1211375 1211376 01377 121140121 01401 1211402 121141213 121141214 0141215 121141216 0141217 121141121 1211411 1211412 74~000 207205 65?000 ?121721216 670300 00"'001 047156 64101212 "'47157 547211 7410121121 74004121 21217156 54721216 741121f7JI2I 740040 104130 11214157 740000 212172~5 652121121121 2121721216 6703121121 777776 12147156 64101212 047157 547211 7410121~ 741211214121 207156 547206 74100121 7401214121 1121413121 11214157 NFRDIV NOP INO SHIFT FRACTI0N DIVIDE LAC (070707) LMQ LAC (252525 FRDIV -23 "'1210001 DAC FIAC LACQ DAC FIMQ SAO (00\0121121(11 SKP HLT 18AD MO, GOOD=12I0~12I00 (1257) LAC FIAC SAO (252525) SKP HLT 18AD AC, GOOD=252525 (1263) JMS HLOOPS JMS LOOP2 Nap LAC (0707~7 LMQ LAC (252525 FRDIV -23 777776 DAC FIAC LACQ OAC FIMQ SAD (0(11012100) SKP HLT 18AD MQ, GOOD =1211210121121121 LAC FIAC SAO (252525) SKP HLT 18AD AC, GOOD=252525 JMS HLOOPS JMS LOOP2 .EJECT (131211) (131215) PAGE 19 E AE - I I (H413 "'1414 "'1415 01416 01417 01420 01421 01422 01423 01424 01425 01426 01427 0143121 01431 01432 1211433 01434 01435 01436 01437 0144121 1211441 01442 01443 1211444 01445 "'1446 1211447 121145121 1211451 01452 01453 01454 1211455 01456 207206 67030121 000001 12147156 64112102 047157 547211 74112100 740040 207156 547206 7411210121 7401214121 1121413121 11214157 740121121121 207207 652012121 2121721121 671213121121 777776 047156 6411211212 047157 547211 741121121121 7401214121 21217156 5472121 741121121121 741211214121 10413121 11214157 0 14 57 0146121 1211461 1211462 01463 1211464 1211465 1211466 1211467 eJ147eJ 1211471 1211472 1211473 1211474 1211475 01476 01477 7 4 121121121121 2217205 652121121121 2121721216 67430121 012101211211 12147156 641eJ02 12147157 547211 741121121121 7401214121 21217156 54721216 741eJ0eJ 74004eJ 10413121 74"'00121 207207 n52~HiJ0 NOP LAC (7;~ 707'" LMQ LAC (2'52525 FRDIV -23 000001 DAC FlAG LAGQ oAC FIMQ SAD (0!J1121Q100) SKP HLT 18AD MQ, LAC FlAG SAO (2'52525) SKP HLT IBAD AG, JMS HLOOPS JMS LOOP2 NOP LAC (70707f!J LMO LAG (525252 FRDIV -23 777776 OAC FIAC LACQ DAC FIMQ SAD (121-"'121121121121 ) SKP HLT IBAD MO, LAC FlAG SAD (5?5252) SKP HLT IBAD AC, JMS HLOOPS JMS LOOP2 TAPE 2 IPDP-15 EAE I I I NFRDVS GOOD:0I00000 (1323) GOOD=:?5:?525 (1327) GOOD=01211211210121 (1345) GOOD=525252 (1351) NOP INO SHIFTS FRACTION DIVIDE SIGNED LAC (121712171217) LMO LAC (2'52525 FRDIVS -23 0121(1112101 OAC FIAC LACQ OAC FIMQ SAD (0~12101210) SKP HLT IBAD MQ, GOOo=00l7112100 (1367) LAC FlAG SAn (2'52525) SKP HLT (1373) 18AD AC, GOOD=252525 JMS HLOOPS PAGE 20 EAE-II ~150~ 104157 ~1501 74~000 0151212 01503 0151214 01505 01506 01507 01510 207205 652000 207206 674300 777776 ~1511 01512 01513 01514 01515 1211516 01517 01520 1211521 01522 ~47156 641002 047157 547211 741000 740040 207156 547206 74112100 74012140 10413121 104157 JMS LOOP2 NOP LAC (07071217 LMQ LAC (2~2525 FROIVS -23 777776 DAC FIAC LACa OAC FIMQ SAO (00eJ0eJ~) SKP HLT IBAD MO, GOOO=000000 LAC FIAC SAO (2';2525) SKP HLT IBAD AC, ; +99 :252525 JMS HLOOPS JMS LOOP2 .EJECT (1411) (1415) PAGE 21 EAE-II 01523 01524 (lJ1525 01526 01527 01530 01531 01532 01533 01534 01535 1211536 01537 121154121 1211541 1211542 01543 1211544 1211545 01546 01547 0155171 01551 01552 01553 1211554 (lJ1555 (lJ1556 01557 0156121 01561 (lJ1562 01563 1211564 01565 1211566 01567 0157121 74(IJ00eJ 207207 fl5/00121 20721216 67430121 000001 047156 641002 047157 547211 741121121121 740040 207156 54721216 741000 740040 11214130 11214157 74121000 207207 652000 207210 674300 777776 12147156 6411211212 12147157 547212 741121121121 74004121 21217156 547210 74112100 7401214121 1121413121 104134 11214162 11214157 NOP LAC ( 7~1\7070 LMQ LAC (2'52525 FRDIVS -23 000001 DAC FIAC LACQ DAC FI"1Q SAD (0V!0000) SKP HLT JBAD LAC FIAC SAO (2'52525) SKP HLT IBAD JMS HLOOPS JMS LOOP2 NOP LAC (70712170 LMQ LAC (5?5252 FRDIVS -23 777776 flAC FIAC LACQ DAC FIMQ SAO (777777) SKP HLT IBAD LAC FIAC SAD (525252) SKP HLT IBAD JMS HLOOPS JMS HLOOPM JMS LOOP4 JMS LOOP2 .EJECT MQ, GOOO=000000 (1433) AC, GOOD=252525 ( 1437) MQ, GOOD:777777 (1455) AC, GOOO=525252 (1461) PAGE 22 EAf--II ~1571 01572 01573 01574 01575 01576 01577 0160121 01601 01602 01603 01604 01605 01606 01607 01610 01611 01612 01613 01614 01615 01616 01617 01620 1211621 01622 01623 01624 01625 01626 01627 0163121 01631 01632 01633 01634 01635 01636 1211637 1211640 01641 1211642 01643 1211644 1211645 1211646 01647 01650 01651 01652 01653 7440Q!0 207212 673101 V'00001 047156 ';47211 741000 74004121 641002 047157 547212 741000 740040 6411211211 740200 744'1040 104130 104157 207212 673102 000002 047156 547213 741000 7401214121 641002 047157 547214 741000 740040 641001 740200 74121040 104130 104157 207212 673103 000004 12147156 547215 741000 740040 641002 12147157 547216 741000 74121040 641001 740200 740040 1121413121 ISHIFT COUNTER TEST CLL SHCT1 LAC (777777 MUL -21 000001 DAC FIAC# SAD (0~0000 SKp HLT 18AO AC, LACQ DAC FIMQ# SAO (777777 SKP HLT IBAD MQ, LACS SlA HLT 18AD SC, JMS HLOOPS JMS LOOP2 SHCT2 LAC (777777 MUL -2(}J 12100002 nAC FIAC SAD (0~0001 SKp HLT IBAD AC. LACQ nAC FIMQ SAD (577777 SKP HLT IBAD MO, LACS SlA HLT /8140 SC, JMS HLOOPS JMS LOOP2 SHcT3 LAC (777777 MUL -17 000004 OAC FIAC SAO (0(}J0eJ03 SKP HLT IBAD AC, LACQ DAC FIMO SAD (477777 SKP HLT IBAD MO, LACS Si!A HLT IBAD SC, JMS HLOOPS .EJECT I~ULTIPLy WITH SHIFT OF nNE GOOO=00012100 (1475) GOOD=777777 (15 0 2) GOOD=000000 (1505) IMULTIPLV WITH SHIFT OF TWO GOOD=eJeJ0eJ01 (1516) GOOD=577777 (1523) GOOD=0eJeJ000 (1526) IMULTIPLY WjTH SHIFT OF THREE GOOD=000003 (1537) GODO=477717 (:1544) GOOD=~0~0~0 (1547) lJAGE 23 EAE- I I 01654 01655 01656 01657 01660 01661 01662 01663 01664 01665 01666 01667 01670 01671 01672 01673 01674 01675 01676 01677 01700 01701 01702 0171213 0171214 01705 0171216 01707 01710 1211711 01712 "01713 01714 01715 01716 01717 01720 01721 01722 01723 01724 01725 01726 01727 0173121 01731 01732 01733 01734 01735 1i'11736 104157 20 7 2 1 2 673104 SHCT4 ~0C:H~10 047156 547217 741000 740040 641002 047157 547220 741000 74012140 641001 740200 740040 104 1 30 104157 207212 673105 000020 047156 547221 741000 740040 641002 047157 547222 741000 740040 641001 740200 740040 104130 104157 207212 673106 000040 047156 547223 741000 740040 641002 047157 547224 74112100 74004121 641001 740200 740040 11214130 SHcTe; Jf'1S LO()P2 LAC (777777 MUL -16 000010 nAC FIAC SAO (000007 SKP HLT IBAD LACQ oAC Flt.1Q SAO (437777 SKP HLT IBAD LACS StA HLT IBAD JMS HLOOPS JMS LOOP2 LAC (777777 MuL -15 000020 oAC FIAC SAO (0"'0017 SKP HLT IBAD LACQ OAC FIMQ SAD (417777 SKP HLT 18AD LACS ISHIFT OF FOUR AC, GOOO=001i'1007 (j SAil!) MQ, GOOD=437777 (151)5) SC, GOOD=00001?10 (1574) ISHIFT OF FIVE AC, GOOD=012J1?leJ17 (1601) MO, GOOD=417777 (1606) SC, GOOD=012J012J00 (1611) S~A SHCT6 HL T 18AD JMS HLOOPS JMS LOOP2 LAC (777777 MuL -14 0121004121 DAC FIAC SAO (000037 SKP HLT IBAD LACQ DAC FIMQ SAD (407777 SKP HLT IBAD LACS StA HLT IBAD JMS HLOOPS .EJECT ISHIFT OF SIX AC, GOOD=000037 (1622) MO, GOOo=407777 (1627) SC, GOOD=000000 (1632) PAGE 24 EAF-I I 01737 ~1740 1211741 1211742 01743 01744 1211745 01746 1211747 01750 01751 1211752 121 1753 01754 1211755 1211756 1211757 121176121 eJ1761 1211762 01763 1211764 eJ1765 1211766 eJ1767 121177121 1211771 1211772 1211773 1211774 1211775 1211776 1211777 1212eJeJeJ 12121211211 121212102 121212103 12121211214 eJ2121eJ5 12121211216 12121211217 121212110 eJ2eJ11 121212112 0212113 121212114 1212eJ15 121212116 121212117 1212eJ2eJ 121212121 104157 21217212 673107 SHeT7 ~12I010121 ~001~el 047156 547225 7410121121 7401214121 6411211212 047157 547226 741eJl2leJ 741211214121 641eJeJ1 74020eJ 741211214121 1121413121 1eJ4157 2eJ7212 67311121 eJeJeJ20eJ eJ47156 547227 741eJeJ0 7401214121 6411211212 12147157 54723121 7411210f21 741211214121 6411211211 7412121210 741211214f21 1eJ4 1 3121 11214157 2eJ7212 673111 121 eJI2I4 121121 12147156 547231 oAC FIAC SAO (1210112112177 SKp HLT IBAD LACQ OAC FI"1Q SAD (4 01 3777 SKP HLT IBAD LACS SlA IBAD I4LT JMS HLOoPS JMS LooP2 LAC (777777 MuL -12 012112120121 DAC rIAC SAO (1210121177 SKp HLT 18AD LACQ DAC rIMQ SAO (401777 SKP HLT 18AD LACS 741~eJI2I 7401214121 64101212 047157 547232 741121121121 741211214eJ 64112101 74012121121 7401214121 1eJ413121 SHCTleJ ISHIF"T OF" SEVEN JMS LOOP2 LAC (777777 MUL -13 AC, GOoD=00012177 (1643) MQ, GOoD=4eJ3777 (165121) SC, GOOD: 0121121121121121 (1653) ISHlr T Or TEN AC, GOOD=I2I121121177 (1664) MQ, GOOD=41211777 (1671) S~A SHCT11 (1674) HLT 18AD SC, GOOD=12I12101210121 JMS HLOOPS ISHlrT or ELEVEN JMS LOOP2 LAC (777777 MUL -11 012104eJeJ OAC rIAC SAO (eJ0121377 SKP HLT (171215) 18AD AC, GOOD=I2I121121377 LACQ DAC FIMQ SAO (401121777 SKP HLT IBAD MQ, GooO=4eJ0777 (1712) LACS S~A HLT IBAD SC, JMS HLOQPS .EJECT GQOD=0I12I~eJ0eJ (1715) PAGE 25 E AE - I I 02022 02 0 23 02~24 02025 02026 02027 02030 02031 02032 02033 02034 02035 02036 02037 02040 02041 02042 02043 02044 02045 02046 02047 02050 02051 02052 02053 02054 02055 02056 02057 02060 02061 02062 02063 02064 02065 021366 02067 02070 02071 02072 02073 02074 02075 02076 02077 02100 02101 02102 02103 ClJ2104 104157 2072 1 2 673112 SHCT12 JMS LOOP2 LAC (777777 MUL -lVl Wi1000 ~01000 047156 547233 741000 740040 641002 047157 547234 nAC FIAC SAD (0~0777 SKP HLT IBAD LACQ DAC FIMQ SAD {4Vl0377 SKP HLT IBAD LACS Si!A HLT IBAO JMS HLOOPS JMS LOOP2 LAC {777777 MUL -7 002000 DAC FIAC SAO (001777 SKP HLT IBAO LACQ GAC FIMQ SAD (4010177 SKP HLT IBAD LACS SrA HLT IBAD JMS HU1QPS JMS LOOP2 LAC (777777 MUL -6 0040130 DAC FIAC SAD (003777 SKp HLT IBAD LACQ DAC FIMQ SAD (4~0077 SKP HLT IBAD LACS 74H~00 740~40 641001 740200 740040 104130 104157 207212 673113 002000 047156 547235 741000 740040 641002 047157 547236 741000 740040 641001 740200 740040 104130 104157 207212 673114 004000 047156 547237 7410130 740040 641002 047157 547240 741000 74C11040 641001 74C11200 74C11040 104130 SHCT13 SHCT14 ISHIFT OF TWELVE AC, GOOD=000777 (1726) MQ, GOOD=400377 (1733) SC, GOOD=000000 (1736) ISHIFT OF THIRTEEN AC, GOOD=001777 (1747) MQ, GOOD=400177 (1754) SC, GOOD=000000 (1757) ISHIFT OF FOURTEEN AC, GOOD=003777 (1770) MQ, GOOD=400077 (1775) HLT IBAD SC, GOOD=00000f1' JMS HLOOPS .EJECT (20C1J0) S~A PAGE 26 EAE-II ~2105 02106 02107 02110 02111 02112 02113 02114 02115 02116 02117 02120 02121 02122 02123 02124 02 1 25 02126 02127 02130 02131 02132 02133 02134 02135 02136 02137 02140 02141 02142 02143 02144 02145 02146 02147 02150 02151 02152 02153 02154 02155 02156 02157 02160 02161 02162 02163 02164 02165 02166 02167 104157 207212 673115 01(11000 047156 547241 741000 740040 641002 047157 547242 741000 740040 641001 740200 740040 104130 104157 207212 673116 020000 047156 547243 741000 740040 641002 047157 547244 741000 740040 641001 740200 740040 104130 104157 207212 673117 040000 047156 547245 741000 740040 641002 047157 547246 741000 740040 641001 740200 740040 104130 SHeT15 ISHIrT Or rIrTEEN JMS LOOP? LAC (777777 MUL -5 (1110000 DAC rIAC SAO (0flJ7777 SK~ HL (2011) IBAD AC, GOOO=007777 LACQ DAC FIMQ SAD (400037 SKP HLT IBAD MO, GOOD=400037 (2016) LACS Si!A SHcT16 SHcT17 HLT IBAD SC, JMS HLOOPS JMS LOOP2 LAC (777777 MuL -4 020000 DAC FIAC SAD (017777 SKp HLT IBAD AC, LACQ OAC FIMQ SAD (400017 SKP HLT IBAD MO, LACS SlA HLT IBAD SC, JMS HLOOPS JMS LOOP2 LAC (777777 MUL -3 040000 DAC FIAC SAD (037777 SKP HLT IBAD AC, LACQ DAC tIMQ SAO (400007 SKP HLT IBAD MO, LACS Si!A HLT IBAD SC, JMS HLOOPS .EJECT GOOD=000000 (2021) ISHlrT OF SIXTEEN GOOD=017777 (2032) GOOO=400017 (2037) GOOD=000000 (2042) ISHIFT OF SEVENTEEN GOOD=037777 (2053) GOOD=400007 (2060) GOOD=000000 (2063) -PAGE 27 EAE-II 02170 02171 02172 02173 02174 02175 02176 02177 02200 02201 02202 02203 02204 02205 02206 02207 02210 02211 02212 02213 02214 02215 02216 02217 02220 02221 02222 02223 02224 02225 02226 02227 02230 02231 02232 02233 02234 02235 02236 02237 02240 02241 02242 02243 02244 02245 02246 02247 02250 02251 02252 02253 02254 104157 2072 1 2 673120 HH'l000 047156 547247 741000 740040 641002 047157 547250 741000 740040 641001 740200 740040 104130 104157 207212 673121 200000 047156 547251 741000 740040 641002 047157 547252 741000 740040 641001 740200 740040 104130 1(214157 207212 653122 400000 047156 547253 741000 740040 641002 047157 547254 741000 740040 641001 740200 740040 104130 104134 104162 SHCT20 ISHIFT or TWENTY JMS LOOP? LAC (777777 MUL -2 100000 DAC FIAC SAO (077777 SKP (2074) HLT IBAD AC, GOOD=077777 LAca DAC FIMQ SAO (4()10003 SKP HLT (21()11) IBAD MQ, GOOD=400003 LACS S~A SHCT21 SHCT22 HLT IBAD JMS HLOOPS JMS LOOP2 LAC (777777 MUL -1 200000 OAC FIAC SAO (177777 SKP HLT IBAD LACQ DAC FIMQ SAD (400001 SKP HLT IBAD LACS SlA HLT IBAD JMS HLOOPS JMS LOOP2 LAC (777777) MUL 400000 DAC FIAC SAD (377777 SKp HLT IBAD LACQ DAC FIMQ SAD (400000 SKP HLT IBAD LACS SeA HLT IBAD JMS HLOOPS JMS HU10PM JMS LOOP4 .EJECT SC, GOOD=000000 (2104) ISHIFT OF TWENTYONE AC, GOOO=177777 (2115) MQ, GOOD=400001 (2122) SC, GOOD=000000 (2125) ISHIFT OF TWENTYTWO AC, GOOD=377777 (2136) MQ, GOOD=40vHHHJ (21 4 3) SC, GOOD=000000 (2146) PAGE 2R EA[-I I 02255 02256 02257 02260 02261 02262 02263 02264 02265 02266 02267 02270 022 7 1 02272 02273 02274 H'I4157 207255 652000 207256 64"'301 377777 047156 547256 741000 740040 641002 "'47157 547257 741000 740040 104130 02275 02276 02277 02300 02301 02302 02303 02304 02305 02306 02307 02310 02311 02312 02313 02314 104 1 57 207255 652000 207256 640302 377777 047156 547260 741000 74"'040 641002 047157 547261 741000 740040 104130 /OIVIOE SHIFT TEST JMS LOOP2 DSC1 LAC (525?3 LMQ LAC (052524 OIV-22 377777 DAC FIAC# SAO (052524 SKp HLT LACQ OAC FIMQ# SAO (125246 SKP HLT JMS HLOOPS /SHlrT OF ON[ /8AO AC; GOOD = 052524 IBAD MQ; GOOD = 125246 I OSC2 JMS LOOP2 LAC (52523 LMQ LAC (052524 oIV-21 377777 DAC FIAC SAD (125250 SKp HLT LACQ oAC FIMQ SAD (252514 SKP HLT JMS HLOOPS .EJECT /SHIFT OF TWO IBAD AC; GOOD = 1252'50 IBAo MQ; GOOD = 252514 PAGE 29 E AE - I I 104157 207255 652000 DSC3 02315 02316 02317 02320 02321 02322 02323 02324 02325 02326 02327 02330 02331 02332 02333 02334 64031713 377777 047156 547262 741000 740040 64H'l02 047157 547263 741000 74171040 104130 02 33 5 02336 02337 02340 02341 02342 02343 02344 02345 02346 02347 02350 02351 02352 02353 02354 104 1 57 207255 652000 207256 640304 377777 047156 547264 741000 74171040 641002 047157 547265 741000 74(('1040 104130 DSC4 0 2 355 02356 02357 02360 02361 02362 02363 02364 02365 02366 02367 02370 02371 02372 1712373 02374 104 1 57 207255 652000 207256 641.'1305 377777 047156 547266 741000 740040 641002 (('147157 547267 741000 740040 104130 DSC5 2~7256 JMS LOOP2 LAC (52523 LMQ LAC (052524 OIV-20 377777 DAC FIAC SAD (25252(('1 SKP HLT LACQ DAC FIMQ SAD (525230 SKP HLT JMS HLOOPS ISHIFT OF THREF 18AO AC; GOOD = 252520 IBAD MQ; GOOD = 525230 I JMS LOOP2 LAC (5(>523 LMQ LAC (052524 DIV-17 377777 DAC FIAC SAO (125241 SKP HLT LACQ OAC FIMQ SAO (252461 'SKP HLT JMS HLOOPS ISHIFT OF FOUR IBAD AC; GOOD = 125241 IBAD MQ; GOOD = 252461 I JMS LOOP2 LAC (52523 LMQ LAC (052524 OIV-16 377777 .. DAC FIAC SAD (252503 SKp HLT LACQ DAC rIMQ SAD (5:?5142 SKP HLT JMS HLOOPS .EJECT ISHIFT OF FjVE IBAD AC; GOOD = 252503 18AD MQ; GOOD = 525142 PAGE 30 EAE-I I OSC6 02375 02376 02377 02400 02401 02402 02403 02404 02405 02406 02407 02410 02411 02412 1Zl2413 02414 104157 207255 65?000 207256 640306 377777 047156 547270 741000 740040 641002 047157 5472 7 1 741000 741Zl041Zl 104130 0 2 415 02416 02417 02420 02421 02422 02423 02424 02425 02426 02427 02430 02431 02432 02433 02434 104157 207255 652000 207256 640307 377777 047156 547272 741000 740040 641002 047157 547273 741000 740040 104130 OSC7 02435 02436 02437 02440 02441 02442 02443 02444 02445 02446 02447 02450 02451 02452 02453 02454 104157 207255 652000 207256 640310 377777 047156 547274 741000 740040 641002 047157 547275 741000 740040 104130 OSC10 JMS LOOP2 LAC ( 5? 52 3 LMQ LAC (0'52524 Dlv-15 377777 DAC FIAC SAO (125207 . SKp HLT LACQ DAC FIMQ SAO (252305 SKP HLT JMS HLOOPS ISHIFT OF SIX JMS LOOP2 LAC (52523 LMQ LAC (0'52524 OIV-14 377777 OAC rlAC SAD (252417 SKp HLT LACQ OAC rIMa SAO (524612 SKP HLT JMS HLOOPS ISHIFT Or SEVEN JMS LOOP2 LAC (52523 LMQ LAC (052524 DIV-13 377777 DAC rIAC SAD (125037 SKP HLT LAca DAC riMa SAO (251425 SKP HLT JMS HLOOPS .EJECT ISHIrT OF TEN IBAD ACj GOOD = 125207 IBAD HQi GOOD = 252305 I I IBAD AC: GOOD = 252417 IBAD MO: GOOD = 524612 IBAD AC: GOOD = 125037 18AO MQi GOOD = 251425 !""'AGE 31 EAE-I I 02455 02 456 02457 1212460 02461 1212462 02463 02464 02465 02466 02467 02470 02471 02472 02473 02474 104157 20 7 255 65?000 21217256 640311 377777 047156 547276 741000 74012140 641002 12147157 547277 741000 740040 104130 DSCll 0 2 475 1212476 1212477 121250121 02501 02502 1212503 02504 0251215 0251216 02507 02510 02511 02512 02513 02514 104 1 57 207255 DSC12 0 251 5 02516 02517 02520 02521 02522 02523 02524 02525 02526 02527 02530 02531 02532 02533 02534 10 41 57 207255 652000 207256 640313 377777 047156 54731212 74,1000 740040 641002 047157 547303 741000 740040 104130 I 65~12J00 207256 64"'312 377777 047156 547300 74112100 740040 641002 047157 547301 741000 740040 104130 JMS LOOP2 LAC (52523 LMO LAC (12J~2524 DIV-12 377777 DAC FIAC SAO (25212177 SKP HLT LACQ DAC FIMQ SAO (5?3052 SKP HLT JMS HLOOPS ISHIFT OF ELFVEN JMS lOOP2 LAC (52523 LMO LAC (12152524 DIv-11 377777 nAC FIAC SAD (124177 SKP HLT LACQ DAC FIMQ SAO (246125 SKP HLT JMS HLOOPS ISHIFT OF TWELVE IBAD AC; GOOD = 252077 IBAD 1'10; GOOD = 523052 IBAD AC; GOOD = 124177 IBAD 1'10; GOOD = 246125 I DSC13 JMS lOOP2 ISHIFT OF THIRTEEN LAC (52523 LMQ LAC (052524 OIV-10 377777 DAC FIAC SAO (250377 SKp IBAD AC; GOOD = 250377 HLT LACQ DAC FIMQ SAO (514252 SKP IBAD MO; GOOD = 514252 HLT JMS HLOOPS .EJECT PAGE 32 EAE-I I 1212535 02536 1212537 121254121 02541 "'2542 02543 02544 02545 1212546 02547 02550 1212551 02552 02553 02554 11214157 207255 652000 21217256 64"'314 377777 047156 54731214 74112100 740040 641002 047157 54731215 74100121 740040 104130 OSC14 02555 02556 02557 02560 1212561 02562 02563 02564 02565 "'2566 1212567 02570 02571 02572 02573 02574 104157 207255 652000 207256 64121315 377777 047156 547306 741000 7401214121 64112102 047157 547307 741000 74r21eJ40 104130 OSC1; 02575 02576 02577 02600 02601 02602 02603 02604 02605 02606 02607 1212610 02611 02612 02613 02614 104157 207255 65201210 207256 64"'316 377777 12147156 547310 741000 7412112140 6411211212 047157 547311 741000 740040 104130 DSC16 JMS LOOP2 LAC <5/523 LMQ LAr, (0">2'524 OIV-7 377777 DAC FIAC SAD (120777 SKp HLT LACQ nAC FIMQ SAD (23121525 SKP HLT JMS HLOOPS ISHIFT OF FOURTEEN JMS LOOP2 LAC (5~523 LMQ LAC (052524 OIV-6 377777 DAC FIAC SAD (241777 SKp HLT LACQ OAC FIMQ SAO (461252 SKP HLT JMS HLOOPS ISHIFT OF FIFTEEN JMS LOOP2 LAC (52523 LMQ LAC (052524 DIV-5 377777 DAC FIAC SAD (1V!3777 SKP HLT LACQ DAC FIMQ SAO (142525 SKP HLT JMS HLOOPS .EJECT ISHIFT OF SIXTEEN 18AD Ar,i GOOD = 120777 18AD MQi GOOD = 23121525 I I 18AD AC; GOOD = 241777 IBAD MQi GOOD = 461252 GOOD = 1013777 18AD MQ; GOOO = 142525 18AD ACi PAGE 33 t AE" - I I 0261'5 !2I261~ 104157 ?0 7 255 OSC17 ~52(H:Ji0 ""2617 !212620 02621 02622 02623 02624 02625 02626 02627 1212630 1212631 02632 02633 02634 A40317 377777 ""47156 547312 741000 74Q104121 641002 047157 547313 741000 74012140 104130 026 3 5 02636 1212637 02640 02641 02642 02643 02644 02645 02646 02647 02650 02651 1212652 1212653 1212654 104 1 57 207255 652000 207256 640320 377777 12147156 547243 741000 740040 64112102 047157 '547314 741121121121 740040 104130 DSc20 0 2 655 1212656 02657 121266121 1212661 1212662 02663 1212664 1212665 1212666 1212667 121267121 !212671 02672 02673 02674 02675 02676 11214 1 57 207255 652000 207256 640321 377777 047156 547315 74100121 74004121 64112102 12147157 547316 7411211210 740040 11214130 104134 11214162 nSc21 ?~7256 JMS LOOP2 LAC (5?523 LMQ LAC (0~2524 OIV-4 377777 nAC FIAC SAD (2'117777 SKP HLT LACQ DAC FIMQ SAD (3""5252 SKP HLT JMS HLOOPS I JMS LOOP2 LAC (5?523 LMQ LAC (052524 DIV-3 377777 DAC FIAC SAD (12117777 SKP HLT LACQ DAC FIMQ SAD (612525 SKP HLT JMS HLOOPS ISHIFT OF SEVENTFEN 18AI) AC; GOOD 207777 18AD MQi Goon = 305252 ISHIFT OF TWENTY 18AD AC; GOOD = 017777 IBAD MQ; GOOD = 612525 I JMS LOOP2 LAC (52523 LMQ LAC (121'52524 Dlv-2 377777 DAC FIAC SAO (037776 SKp HLT LACQ DAC rIMQ SAD (4?5252 SKP HLT JMS HLOOPS JMS HLOOPM JMS LOOP4 IEAE PART I I TAPE 2A IEAE SIGN TEST I ISHIFT OF TWENTYONE IBAD ACi GOOD = 037776 IRAD MOi GOOD = 42'52'52 PAGE 34 EAr-II IMULS SIGN TrST IEAE AC SIGN FF TEST I 1212677 ClJ271210 121271211 121271212 1212703 121271214 121271215 1212706 1212707 121271121 1212711 1212712 1212713 1212714 1212715 1212716 1212717 121272121 1212721 1212722 1212723 1212724 1212725 1212726 1212727 121273121 1212731 1212732 1212733 1212734 1212735 1212736 02737 1212740 1212741 1212742 1212743 02744 1212745 1212746 1212747 121275121 1212751 1212752 1212753 1121 4 1 57 21217317 664121121121 653122 777776 7411121121 74C1J04121 21217320 6640121121 2121732121 653122 777776 741211121121 741211214121 1121413121 104157 21217213 6641210121 657122 1211211211211212 741100 741211214121 21217321 6641210121 21217317 657122 777776 7411121121 741121121121 741211214121 2121732121 664121121121 21217320 657122 777776 7411121121 741211214121 21217213 664121121121 2121732121 657122 12112101211212 74111210 7410121121 74QJ04121 STMUL STMULS JMS LOOP2 LAC (121011211211212 GSM MUL 777776 SPA HLT LAC (777775 GSM LAC (777775 MUL 777776 SMA HLT JMS HLOOPS JMS LOOP2 LAC (I2Iti1l21(;'J l2l l GSM MULS I(HLT ADDRESS) IGSM=12I AC=12I ISHOuLO RE posITIvE IGSM=l AC=l ISHOuLD BE NrGATIvE IGSM=12I (216121) (2167) AC=12I til00002 SPA HLT LAC (777776 GSM LAC (12IQ11211211212 MULS 777776 SPA SKP HLT LAC (777775 GSM LAC (777775 MULS 777776 SPA HLT LAC ( f2!vHH?J01 GSM LAC (777775 MULS QJ 0121 I2IQJ 2 SPA SKP HLT .EJECT ISHOuLD BE poSITIVE IGSM=l AC=12I ISHOULO BE NEGATIVE IGSM=l (221217) AC=l ISHOULD BE poSITIVE IGSM=12I (2177) (2216) AC=l ISHOULn RE NEGATIVr (?2?6) """AGE 35 EAE-I I 02 7 5 4 02755 02756 02757 02760 02761 02762 Lil2763 02764 02765 02766 02767 02770 1212771 02772 02773 02774 02775 02776 02777 0301210 104130 104157 207322 65?0Lil0 202764 6640121121 207211 644323 000004 74140121 74004121 047156 547213 7410121121 7401214121 64101212 047157 547213 7411210121 74~040 10413121 IDIVIDE SIGN TEST OIVS JMS HLOQPS JMS LOf)P2 STOIVS LAC (071000') LMQ LAC .+4 GSM LAC ( 0vH2100e' OIVS Lil00004 Si!L IBAD LINK. GOOD LINK=0 HLT nAC FIAC# SAO (00001211 SKP HLT IBAD AC. GOOD:C1II2JLilI2J01 LACQ OAC FI"1Q# SAD (0r;,012J12J1 SKP HLT 18AD MQ. GOOD:",00001 JMS HLOOPS .EJECT (2241) (2245) (2252) PAGE 36 EAE-I I 03001 03002 03003 03004 03005 03006 03007 03010 03011 03012 03013 03014 03015 03016 03017 03020 03021 03022 03023 03024 03025 03026 03027 03030 03031 03032 03033 03034 03035 03036 03037 03040 03041 03042 03043 03044 03045 03046 03047 03050 104157 207322 652000 207323 664000 207211 644323 00P1004 741400 740040 047156 547213 741000 740040 641002 047157 547321 741000 740040 104130 104157 207324 652000 203034 664000 207212 644323 000004 741400 74(:11040 047156 547321 741000 740040 641002 047157 547321 741000 740040 104130 SIGNA SIGNR JMS LonP2 LAC ( \!)~"0V'105 LMQ LAC (7777771 GSM LAC (0 ) DIVS 000004 StL IBAD HLT OAC FIAC SAn (0710001 SKP HLT /BAO LACQ OAC FIMQ SAD (777776 SKP HLT IBAD JMS HLOOPS JMS LOOP2 LAC (777772 LMQ LAC .+4 GSM LAC (777777 DIVS 000004 StL IBAD HLT OAC FIAC# SAO (777776 SKP HLT IBAD LACQ OAC FI~Q# SAO (777776 SKP HLT IBAD JMS HLOOPS .EJECT LINK, GOOD LINK=0 (?265) AC, GOOO=000001 (2271) MQ, GOOD=777776 (2276) LINK, GOOD LINK=0 (2311) AC, GOOD=777776 (2315) MQ, GOOO=777776 (2322) PAGE 37 EAE - I I 03051 0305? 03053 03054 03055 03056 03057 03060 03061 03062 03063 03064 03065 03066 03067 11'3070 03071 03072 03073 03074 1041'17 ?et 7 3?4 h5:::,,1(1~ ? ~~ . ,~? 3 664iJetQl ?07212 644323 00Q1VlQl4 741400 740040 047156 547321 741000 740040 641002 047157 547213 741000 740040 104130 SIGNC JMS LOOP2 LAC (77777? LMQ LAC (777773 GSM LAC (777777 OIVS 000004 StL 18AD LINK, GOOD LINK=0 HLT nAC FlAC SAO (777776 SKP HLT 18AD AC, GOOD=777776 LACQ OAC FJMQ SAD (0~0001 SKP HLT IBAD MQ, GOOD=000001 JMS HLOOPS .EJECT (2335) (2341) (2346) PAGE 38 EAE-II 031375 031376 03077 031013 ~3HH 03102 03103 133104 03105 1331136 1331137 133110 133111 03112 03113 133114 133115 03116 03117 03120 03121 133122 133123 03124 03125 03126 03127 133130 03131 03132 03133 03134 03135 03136 03137 03140 133141 133142 03143 133144 1134157 207212 6520130 2el3HH 664000 ?07322 657323 0001304 74141313 74130413 047156 547213 741131313 7400413 6410132 047157 547213 74101313 74013413 11341313 104157 207211 65201313 20732i 664000 207322 657323 0001304 741400 740040 047156 547213 741000 74(111340 6411302 047157 547321 741131313 7401340 104130 IOIVIOE SIGN TEST InIVS STIDVS JMS LonP2 LAC (777777 LMQ LAC • + 4 GSM SIGND LAC (000005 IDIVS (11013004 SlL IBAD HLT DAC FIAC# SAD (000001 SKP HlT IBAD LACQ OAC FIMQ# SAD (00130131 SKP HLT IBAD JMS HLOOPS JMS lOOP2 LAC (13013013121 LMQ LAC (777776 GSM LAC (1301313135 IDIVS 1300004 SlL IBAD HLT DAC FIAC SAD (000001 SKP HlT IBAD LACQ DAC FIMQ SAO (777776 SKP HLT IBAD JMS HLOOPS .EJECT LINK (2361) AC, GOOD=0130001 (2365) MO, GOOD=000001 (2372) LINK, (2405) AC, GOOD=000001 (2411) MO, GOOD=777776 (2416) lTAGE 39 EAE-II 03145 03146 03147 03150 03151 03152 03153 03154 03155 03156 03157 03160 03161 03162 03163 03164 03165 03166 03167 03170 03171 (113172 03173 03174 03175 03176 03177 03200 03201 03202 03203 (}J3204 03205 (113206 03207 03210 03211 03212. 03213 (113214 104157 207212 652000 SIGNE 20~154 664000 207324 657323 000004 741400 740040 047156 547321 741000 74"'040 641002 (1147157 C;47321 7410(110 740040 104130 104157 207212 652000 207323 664000 207324 657323 00(}J0(114 741400 740040 (}J47156 547321 741000 740040 641002 047157 547213 741000 740040 104130 SIGNF JMS LOOP2 LAC (777777 LMQ LAC ,+4 GSM LAC e77777? IDIVS 000004 S2L IBAD HLT nAC FIAC# SAD (777776 SKP HLT IBAD LACQ DAC FIMQ# SAO (777776 SKP HLT IBAD JMS HLOOPS JMS LOOP2 LAC (777777 LMQ LAC (777773 GSM LAC (777772 IDIVS (1100004 Si!L IBAD HLT DAC FIAC SAD (777776 SKP HLT IBAD LACQ DAC FIMQ SAO (0(}J0001 SKP HLT IBAD JMS HLOOPS .EJECT LINK (2431) AC, GOOD=777776 (2435) MQ, GOOO=777776 (2442) LINK, (2455) AC, GOOO=777776 (2461) MO, GOOO=(}J000P11 (2466) PAGE 40 EAE-I I 03215 03216 03217 03220 03221 03222 03223 03224 03225 03226 03227 03230 03231 03232 1213233 03234 03235 1213236 03237 03240 03241 1213242 1213243 1213244 03245 03246 03247 03250 03251 1213252 03253 03254 03255 03256 03257 1213260 1213261 1213262 03263 03264 H~4157 207211 652000 203224 664000 207322 654323 000004 740400 74121040 047156 547325 74100121 74012140 64112102 047157 547215 7410121121 740040 11214130 104157 207210 6520121121 21217321 66400121 21217322 654323 0121~001 7412140121 74004121 12147156 547-326 741000 74012140 6411211212 047157 54732121 741121121121 7401214121 10413121 /OIVIOE SIGN TEST FDIVS STrovs JMS LOOP2 LAC (0(110000 LMQ LAC .+4 GSM LAC (0(110005 FROIVS 000004 SNL /8AO LINK (2501) HLT OAC FIAC# SAO (777774 SKP HLT /8AD AC, GOOD=777774 LACQ OAC FIMQ# SAD (000003 SKP HLT /8AO MQ, GOOD=00012103 (2512) JMS HLOOPS JMS LOOP2 SIGNG LAC (525252 LMO LAC (777776 GSM LAC (00012105 FRDIVS 000001 SNL /8AD LINK (2525) HLT OAC FIAC SAO (1210121016 SKP HLT /8AC AC, GOOO = 000016 LACQ DAC FIMQ SAD (777775 SKP HLT /8AO MO, GOOD = 777775 JMS HLOOPS .EJECT (2505) (2531) (2536) -PAGE 41 EAE-II 03265 03266 03267 03270 03271 03272 03273 03274 03275 03276 03277 03300 03301 03302 03303 03304 03305 03306 03307 03310 03311 03312 03313 03314 03315 03316 03317 03320 03321 03322 03323 03324 03325 03326 03327 0333P1 03331 03332 03333 03334 03335 104157 207206 SIGNH 651'000 ;?~~274 664000 207324 654323 I/? 00 (iH?J4 740400 740040 047156 547215 741000 740040 641002 047157 547325 741000 74Q1040 104130 104157 207211 652000 207323 664000 207324 654323 000004 740400 740040 047156 547215 741000 740040 641002 047157 547215 741000 740040 104130 104134 SIGNI JMS LOOP2 LAC (2"'2525 LMQ LAC': • + 4 GSM LAC (777772 FRDIVS 000004 SNL (2551) IBAD LINK HLT nAC FIAC# SAO (0~0003 SKP HLT IBAD AC, GOOD = 000003 LACQ DAC FIMQ# SAD (777774 SKP HLT IBAD MQ, GOOD=777774 JMS HLOOPS JMS LOOP2 LAC (000000 LMQ LAC (777773 GSM LAC (777772 FRDIVS (2555) (2526) 0,~HH~Ql4 SNL (2575) IBAD LINK HLT [lAC FIAC SAD (000003 SKP HLT 18AD AC, GOOD=0000OJ3 LACQ DAC FIMQ SAO (000003 SKP HLT IBAD MQ, GOOD=Ql00V103 JMS HLOOPS JMS HLOOPM ,EJECT (2601) (2606) PAGE 42 E A[ - I I 03336 03337 03340 03341 03342 03343 1213344 1213345 1213346 1213347 1213350 1213351 1213352 1213353 1213354 1213355 1213356 1213357 121336121 1213361 1213362 1213363 1213364 1213365 1213366 1213367 121337121 03371 1213372 1213373 1213374 03375 1213376 104162 104157 207212 65200121 20721121 653122 01211211211211 12147156 547211 741121121121 7401214121 6411211212 12147157 54721121 741121121121 741211214121 1121413121 11214157 21217212 6521210121 21217212 653122 112101211219 12147156 547247 741121121121 741211214121 6411211212 12147157 547327 741121121121 7401214121 1121413121 IMULTIPLY DIVIDE TEST IMULTIPLY TEST USING 22 SHIFTS JMS LOOP4 MULTST JMS LOOP2 LAC (777777 LMQ LAC (525252 MUL 0121012101 DAC FIAC# SAO (I2IV'11211211210 SKp HLT IBAD AC, GOOD=012101211210 LACQ DAC FIMQ# SAO (525252 SKP HLT IBAD MQ, GOOD=525252 JMS HLOOPS JMS LODP2 MULA LAC (777777 LMQ LAC (777777 MUL 1121121121121121 DAC FIAC SAD (12177777) SKp HLT IBAD AC, GOOD=077777 LACQ OAC FIMQ SAO (701211211210 SKP HLT IBAD MQ, GOOD=712101210121 JMS HLOOPS .EJECT (2623) (263121) (2643) (265121) "PAGE 43 EAE-II 03377 03400 03401 03402 03403 03404 03405 03406 03407 03410 03411 03412 03413 03414 03415 03416 03417 03420 03421 03422 03423 03424 03425 03426 03427 03430 03431 03432 03433 03434 03435 03436 HJ4157 207212 652000 207210 653122 777777 047156 547330 741.000 740040 641002 047157 547331 741000 740040 104130 104157 207212 652000 207212 653122 252525 047156 547332 741000 740040 641002 ~47157 547333 741000 740040 104130 MULB MULC JMS LOOP? LAC (777777 LMQ LAC (5;?5252 MUL 777777 OAC FIAC1t SAD (5?5251 SKP HLT IBAD LACa DAC FIMQ# SAD (252526 SKP HLT IBAO JMS HLOOPS JMS LOOP2 LAC (777777 LMQ LAC (777777 MUL 252525 OAC FIAC SAO (252524) SKP HLT IBAD LACQ OAC FIMa SAD (525253) SKP HLT IBAD JMS HLOOPS .EJECT AC, GOOD:';25251 (2663) Ma, GOOD=252526 (2670) AC, GOOD=252524 (2703) Ma, GOOD=525253 (2710) PAGE 44 E AF - I I 03437 C'l3440 03441 03442 03443 03444 03445 03446 03447 03450 03451 03452 03453 03454 03455 03456 03457 03460 03461 03462 03463 03464 03465 03466 03467 03470 03471 03472 03473 03474 03475 03476 104157 207212 6'5:?000 207213 653122 777777 047156 547211 741000 740040 641002 047157 547212 741000 740040 104130 104157 207212 652000 207212 653122 000001 047156 547211 741000 74£'1040 641002 047157 547212 741000 740040 104130 JMS LOOP2 LAC (777777 LMQ LAC (0C'l0001 MUL 777777 OAC FIAC# SAD (000000) SKp HLT IBAD AC, LACQ DAC FIMQ# SAO (777777) SKP HLT leAD MO, JMS HLOOPS JMS LOOP2 MULE LAC (777777 LMO LAC (777777 MUL 000001 OAC FIAC SAO (000000 SKp HLT IBAD AC, LACQ OAC FIMQ SAD (777777 SKP HLT IBAD MQ, JMS HLOOPS TAPE 3 IPOP-15 EAE I I MULD GOOD=000000 (2723) GOOO=777777 (2730) GOOO=000000 (2743) GOOO=777777 (2750) JMS LOOP2 LAC (000000 LMO LAC (000000 Olv 000000 oAC FIAC# SAD (0~0000 SKP HLT IBAo AC, GOOo=0!00000 LACQ DAC FIMQ# SAD (0910002 SKP HLT IBAD MO, GOOD=0000eJ2 JMS HLOOPS JMS LOOP2 LAC (777777 LMQ (2763) I IOIVIOE TEST USING 23 SHIFTS I 03477 03500 03501 03502 03503 03504 03505 03506 03507 03510 03511 03512 03513 03514 03515 03516 03517 03520 03521 104157 207211 652000 207211 640323 00£'1000 047156 547211 741000 7401040 641002 047157 547317 741000 740040 104130 104157 207212 652000 OIVTST DIVA (2770) PAGE 4'5 EAE-II 03522 03523 ~3524 03525 03526 03527 03530 03531 03532 03533 03534 03535 03536 207334 64(11323 000000 047156 547253 741000 74004121 64101212 047157 547321 7411210121 7401214121 1121413121 LAC (677777 nIV 00(11000 OAC FIAC SAO (377777 SKP HLT LACQ OAC FI~Q SAD SKP IBAD AC, GOOO=377777 (777776 HLT JMS HL()OPS • EJECT IBAD MQ, GOOD=777776 (3003) PAGE 46 EAE- I I 03537 0354~ 03541 0354;::> 03543 03544 03545 03546 03547 03550 03551 03552 03553 03554 03555 03556 03557 03560 03561 03562 03563 03564 03565 03566 03567 1335713 03571· 03572 03573 03574 03575 03576 104157 ?07212 [lIV8 65;::>v'00 ;::>07334 6403;::>3 000001 047156 547335 741000 740040 641002 047157 547321 741000 74"'040 104130 104157 207211 652 00 0 207211 640323 000001 047156 547211 741000 740040 641002 047157 547211 741000 740040 104130 DIVC JMS LO()P2 LAC (777777 LMtJ LAC (677777 DIV 000001 OAC FIAC# SAD (377771 SKp 18AD AC, GOOD=377771 HLT LACQ OAC FIMQ# SAD (777776 SKP 18AD MQ, GOOD=777776 HLT JMS HLOOPS JMS LOOP2 LAC (0910000 LMQ LAC (0ti10000 DIV 000001 OAC FIAC SAD (0ti100013 SKp HLT IBAD AC, GOOD="'00000 (3043) LACQ DAC FP1Q SAD (0(}10000) SKP HLT (3050) IBAD MQ, GOOD=13000130 JMS HLOOPS .EJECT (3 0 23) (3030) PAGE 47 EAE- I I 03577 03600 03601 ?:~602 03603 03604 03605 03606 03607 03610 03611 03612 03613 03614 03615 03616 03617 03620 03621 03622 03623 0362 4 03625 03626 03627 03630 03631 03632 03633 03634 03635 03636 104157 207334 65;?000 ?07211 640323 677777 047156 '547211 741000 740040 641002 12147157 547213 741000 740040 11214130 104157 207333 652000 207332 640323 252525 047156 547211 741000 740040 641002 047157 547212 741000 740040 104130 DIVD DIVE JMS LOOP2 LAC (677777 LMO LAC (0~0000 OIV 677777 DAC FIAC# SAO (0910000 SKP HLT IBAD LACQ DAC FIMQ# SAD (000001 SKP HLT IBAD JMS HLOOPS JMS LOOP2 LAC (5~5253) LMQ LAC (2'52524) OIV 252525 DAC FIAC SAD (0~0000 SKP HLT IBAD LACQ DAC FIMQ SAO (777777 SKP HLT IBAD JMS HLOOPS .EJECT ISU8-SUB AC, GOOD=000000 (3063) MQ, GOOD=000001 (3070) IADD-ADD AC, GOOD=000000 (3103) MQ, GOOD=777777 (3110) PAGE 48 EAE-II 03637 013640 013641 03642 03643 03644 03645 03646 1213647 121365121 1213651 1213652 1213653 1213654 1213655 1213656 03657 1213660 1213661 1213662 1213663 03664 03665 1213666 03667 121367121 03671 03672 1213673 03674 03675 eJ3676 03677 0370121 104157 207333 652000 207332 640323 777777 047156 547211 741121121121 740040 64101212 12147157 54721216 7411211210 741211214121 11214130 11214157 21217331 65201210 207330 640323 777777 047156 547211 74100121 74eJI2I40 64112102 047157 54721121 74100121 74004121 10413121 104134 104162 01VF DIVG JMS LOOP2 LAC (5;>5253) LMQ LAC (252524) OIV 777777 nAC rIAC# SAO (0l11e1000 5Kp HLT IBAD LACQ OAC FIMQ# SAD (252525 SKP HLT IBAD JMS HLOOPS JMS LOOP2 LAC (252526 LMQ LAC (525251 DIV 777777 OAC FIAC SAD (0) SKP HLT IBAD LACQ DAC FIMQ SAD (5?5252 SKP HLT 18AD JMS HLOOPS JMS HLOOPM JMS LOOP4 .EJECT IAOO-SU8-ADO-SU8 AC, GOOD=eJ000eJ0 (3123) MQ, GOOD=252525 (313121) IADD-SU8-ADD-SUB AC, GOOO=01210000 (3143) MQ, GOOD=525252 (315121) PAGE 49 E AE - I I 03701 03702 03703 Cll3704 03705 03706 03707 03710 03711 03712 03713 03714 03715 03716 03717 03720 03721 03722 03723 03724 03725 03726 03727 03730 03731 03732 03733 03734 1'.13735 03736 03737 03741'.1 03741 03742 03743 03744 03745 03746 03747 03750 03751 1213752 1213753 03754 1041'57 207212 652000 207206 673102 777777 673102 777777 673102 777777 673102 777777 673102 777777 047156 547214 741000 740040 641002 047157 547336 741000 740040 207206 653122 520000 653122 520000 653122 520000 653122 521'.1001'.1 653122 520000 047156 547337 741000 74Q1040 641002 047157 547340 74112100 74"'12140 104130 IMUL AND DIV INSTRUCTION DONE RACK TO RACK I ISPEED MULTIPLY JMS LOOP2 MSPEED LAC (777777 LMQ LAC (2'52525 MUL -20 777777 MUL -2Cll 777777 MUL -2()J 777777 MUL -20 777777 MUL -20 777777 DAC rIAC# SAO (577777) SKp HLT IBAD AC, GOOD=577777 LACQ DAC FIMQ# SAD (337777) SKP HLT IBAD MQ, GOOD=337777 LAC (2152525 (3175) (3202) ~UL 5200"10 MUL 52Cll000 MUL 520000 MUL 520000 MUL 521'.1000 DAC FIAC SAD (024613) SKp HLT IBAD AC, GOOD="'24613 LACQ DAC rlMQ SAD (14000()J) SKP HLT IBAD MO, GOOD=14Cll0et0 JMS HLOOPS .EJECT (3221) (3226) PAGE 5(1) EAE-I I ISPEED DIVIDE / 03 7 55 03756 03757 03760 03761 03762 03763 O3764 03765 03766 03767 03770 03771 03772 03773 03774 03775 03776 03777 04000 04001 04002 04003 04004 04005 04006 04007 04010 04011 O4012 O4013 04014 04015 04016 04017 04020 1214021 04022 04023 1214024 04025 04026 04027 0412130 1214031 1214032 121412133 1214034 104157 21217212 652000 207206 660302 000002 660302 O00002 6612131212 000002 660302 000002 660302 000002 047156 ?47341 741000 740040 641002 047157 547342 741000 740040 104130 104157 207206 652000 207206 640323 000052 640323 000052 64"-1323 000052 640323 000052 640323 "-10"-1052 047156 547343 741000 74004O 641002 047157 547344 74101210 741211214121 1121413121 OSPEFD JMS LOOP2 LAC (777777 LMQ LAC (252525 DIv -21 000002 DIV -21 000002 DIV -21 "'00002 DIV -21 "'000002 DIV -21 000002 DAC FIAC SAD (525005 SKP !-ILT LACQ DAC F'IMQ SAD (777252 SKP !-ILT JMS HLOOPS JMS LOOP2 LAC (2?2525 U1Q LAC (252525 OIV 000052 DIV 000052 DIV 000052 DIV 000052 DIV 0OO052 DAC FIAC SAD (0OJ2651 SKp !-ILT LACQ DAC FIMQ SAO (253252 SKP HLT JMS HLOOPS .EJECT IBAD AC, GOOD=525005 (3251) IBAD MO, GOOD=777252 (3256) IBAD AC, GOOD=002651 (3301) IBAD MO, GOOO=253252 (331216) P""AGE 51 EAE-I I ISPEED MULTIPLY AND nIVIDE I ~4~3'5 (114036 04037 104157 207212 A520~0 ~404~ ~"'7251 04041 04042 04043 04044 04045 04046 04047 04050 04051 04052 04053 04054 04055 04056 04057 04060 04061 04062 04063 04064 04065 04066 04067 04070 04071 04072 04073 04074 04075 04076 04077 04100 04101 04102 04103 04104 04105 04106 04107 04110 04111 04112 04113 04114 04115 04116 04117 04120 04121 664000 653122 252525 640323 252525 1'147156 547211 741000 740040 641002 047157 547251 741000 740040 104130 104157 207247 653122 252525 640323 000025 653122 252525 640323 000025 653122 252525 640323 00Q1252 653122 252525 640323 000252 653122 252525 640323 00"'052 047156 547345 741000 741'1040 641002 1'147157 547346 741000 741'1040 104130 104134 741000 SPMUOV JMS LOOP2 LAC (777777 LMQ LAC (177777 GSM MUL ?52525 DIV 252525 nAC FIAC SAD ( 0 ) SKp HLT IBAO AC, GOOO=0e10000 LACQ OAC FIMQ SAD (177777) SKP HLT IBAD MO, GOOD=177777 JMS HLOOPS JMS LOOP2 LAC (077777 MUL 252525 OIV (3324) (3331) ~00025 MUL 252525 OIV 000025 MUL 252525 OIV 000252 MUL 252525 DIV 000252 MUL 252525 oIV 000052 OAC FIAC SAD (405476 SKp HLT LACQ OAC FIMQ SAO (117162 SKP HLT JMS HLOOPS JMS HLOOPM SKP IBAO AC, GOOO=405476 (3364) IBAD MQ, GOOO=117162 (3371 PAGE 52 EAE-II .EJECT !!"""AGE 53 EAE-I I 1214122 04123 1214124 04125 04126 04127 77771210 444122 600246 ?07347 044122 62(71203 LOOPA 7777'110 1St .-1 JMP NEAE LAC (777700 OAC LOOPA JMP* ArJVP ,EJECT PAGE 54 EAE-I I IINCREMENT ERROR LOCATION ON ERROR / .LOC vH2J020 2~ I Ci!002 0 00021 00022 00023 00024 00025 00026 00027 HLT CLA!CMA TAO 20 DAC .+2 SKp NOP IS~* .-1 JMP* 20 740040 751il001 340 0 20 Ci!40025 741000 740000 460025 620020 /SUBTRACT 1 FROM (20 ) /ERROR LOCATION /INCREMENT IEXIT / 04130 04130 04131 O4132 04133 740040 104202 104226 624130 ISMALL LOOP HALT .LOC LOOPA+6 HLOOPS HLT JMS HLTS JMS LOOPS JMP* HLOOPS 740040 104212 104234 624134 IMEDIUM HLT LOOP HLT HLOOPM JMS HLTM JMS LOOPM JMP. HLOOPM / 04134 04135 04136 04137 / /LARGE HLT LOOP HLT HLOOPL JMS LOOPL JMP. HLOOPL 04140 O4141 O4142 740040 104143 624140 04143 04144 04145 04146 04147 O4150 740000 75121004 507350 741200 624164 624143 LOOPL 04151 04152 04153 O4154 04155 04156 74('1040 75('1004 507254 740200 740040 624151 SWIT6 04157 04160 04161 000000 744000 624157 LOOP2 / NOP LAS AND (010000 SNA JMP. LOOP5 JMP. LOOPL /SWITCH 5 NOT S£T /LOOP /CONTINUE / HLT LAS AND (4C1!0000 /SWITCH ~ERO S~A HLT JMP* SWJT6 /PRINT ROUTINE /CONTINUE / 0 eLL JMP* .-2 /SCOPE LOOP TAG 0 ISUBROUTINE TAG / 04162 04163 04164 04165 000000 624162 000000 624164 lOOP4 JMP* ,-1 LOOP'5 0 JMP* .-1 .EJECT IROUTINE TAG PAGE:. 55 E"AE-I I 04166 04167 04170 04171 04172 04173 04174 04175 04176 04177 04200 04201 104166 044200 224166 044201 204200 74"'001 '524201 344200 444166 624166 000000 000000 lOR 04202 04203 04204 04205 04206 04207 04210 04211 740000 750004 '507351 741200 604211 204202 740040 624202 HLTS . JMS DAC .+11 LAC~ lOR DAC .+10 LAC .+f, CMA AND~ .+5 TAD .+3 lSi! lOR JMP" lOR 0 0 I NOP LAS AND (200000 SNA JMP .+3 LAC HLTS HLT JMP .. HLTS ISW1 ICONTINUE / 04212 04213 04214 04215 04216 04217 740000 HLTM 75~004 507352 740200 740040 624212 NOP LAS AND (040000 SlA ·HL T jMP. .-5 ISW3 ICONTINUE I 04220 04221 04222 04223 04224 04225 740000 750004 507353 740200 740040 624220 HLTL NOP LAS AND (0(114000 SlA HLT JMP .. .-5 15W6 ICONTINUE I 04226 04227 04230 04231 04232 04233 740000 750004 507354 744200 624157 624226 LOOPS 04234 04235 04236 04237 04240 04241 740000 750004 507355 740200 624162 624234 LOOPM NOP LAS AND (100000 SlA:CLL JMP .. LOOP2 JMP .. LOOPS ISWITCH 2 ILOOP ICONTINUE I NOP LAS AND (020000 SlA JMp .. LOQP4 JMP .. LOOPM .EJECT ISWITCH 4 ISWITCH 4 ILOQP /CONTINUE PAGE 56 EAf- I I ~4242 74NHH-'1 ~4243 75~1'H~4 04244 04245 '507356 ~4246 444242 624242 04247 74~200 ILOOK UP OR HALT SWIT7 NOP LAS AND (f2I"'200~ StA rS~ SWIT7 JMP. SWIT7 ISWITCH 7 IIF SET GO TO p+2 IIF NOT SET GO TO P+l I 04250 04251 04252 04253 04254 04255 04256 04257 04260 04261 04262 04263 740000 205023 047142 207357 044255 204376 047145 167145 444255 447142 604255 624250 IFILL ERROR LOCATIONS WITH tERO FILtER NOP LAC LENGTH OAC ADDCT# LAC (LAC ERWOR DAC .+1 LAC ERWOR OAC CTADD# DtM. CTADD 1St .-3 1St ADDCT JMP .-5 JMP. FILtER IEXIT IFIELD COUNTER ICURRENT ADDRESS I 04264 04265 04266 04267 04270 04271 04272 04273 04274 04275 04276 04277 04300 740000 205023 047142 207360 044271 204376 047145 207361 067145 444271 447142 604271 624264 IFILL ERROR LOCATION WITH HLT FILHLT NOP LAC LENGTH DAC ADDCT IFIELD COUNTER LAC (LAC ERWOR DAC .+1 LAC ERWOR IADDRESS OF LHE DAC CTADD LAC (HLT DAC. CTADD ICURRENT ADDRESS 1St .-4 1St ADDCT JMP .-6 JMP. FILHLT IEXIT I 04301 04302 04303 04304 04305 04306 04307 04310 04311 04312 04313 04314 740000 204376 047145 227145 741200 604313 207155 104166 740040 064311 444302 624301 ISET BIT IN BITWORD IF ERROR NOP SETBIT LAC ERWOR DAC CTADD LAC. CTADD SNA JMP • +5 LAC ERRBIT# JMS lOR XX DAC • . -1 1St SET8IT+1 JMP. SET81T .EJECT ICURRENT ADDRESS OF ERROR WORD IMODIFIED IEXIT F""AGE 57 EAE-II 04315 04316 04317 04320 04321 04322 04323 04324 04325 04326 04327 04330 12J4331 047142 207362 044325 204376 047145 227145 547211 604336 04332 04333 04334 04335 04336 04337 04340 04341 547363 741000 447143 447154 444325 447142 604325 624315 74V'000 75~000 ~47154 V'47143 2~5023 04342 1214343 04344 04345 04346 740090 207154 741200 625024 624342 04347 04350 04351 04352 04353 04354 1214355 04356 1214357 04360 12J4361 04362 207364 044311 207365 047144 207 2 54 12147155 207366 044302 205023 047142 624347 74~000 ISCAN FOR 00 OR 77 SET FLAG ON ERROR NOP SCAN CLA DAC ERFLAG OAC ASTRIC LAC LENGTH DAC ADDCT LAC (LAC ERWOR DAC .+1 LAC ERWOR DAC CTADO LAC. CTADD SAD (0 ICHECK FOR lERO JMP .+r; IYES SAD (100 ICHECK FOR 100 SKp IINTERMITTENT IS~ ASTRIC# IS~ ERFLAG# ISET FLAG lSi! .-11 ISl ADDCT JMP .-13 JMP. SCAN I ICHECK FLAG NOP CKFLAG LAC ERFLAG S,NA JMP. BEGIN JMP. CKFLAG I ISET UP COUNTS AND COUNTERS NOP SETUP LAC (WORDA DAC SETBIT+10 LAC (777755 DAe BITCT LAC (41210000 DAC ERRBIT LAC (LAC ERWOR OAC sETBIT+1 LAC LENGTH DAC ADDCT JMP. SETUP .EJECT IHOW MANY TEST FAILED INO ERROR 1# OF BIT WORDS I1ST BIT STORAGE LOCATION IcURRENT WORD ADESS IBIT COUNTER IINITIAL BIT ICURRENT BIT POSITION ILHE ADDRESS OF FIELD ICOUNTER ILENGTH OF FIELD IFIELD COUNTER IEXIT PAGE 58 EAr-II IROTATE 8IT AND CHECK WORD COUNT / 04363 04364 04365 04366 04367 04370 043 7 1 04372 04373 04374 04375 740000 207155 740020 447144 604374 444311 21217365 047144 207254 047155 624363 R8CW NOP LAC ERRBIT RAR 1St BITeT# JMP .+5 I5il 5ETBIT+10 LAC (777755 OAC BITeT LAC (4~0000 OAC ERR8IT JMP. R8CW .EJECT PAGE 59 EAf-I I 04~76 04377 04400 04401 04402 04403 04404 04405 04406 04407 044H'I 04411 1214412 04413 c;,4414 04415 04416 04417 04420 04421 1214422 1214423 04424 04425 04426 04427 04430 c;,4431 04432 04433 04434 04435 1214436 04437 04440 04441 04442 1214443 04444 1214445 04446 1214447 04450 04451 04452 04453 04454 04455 000263 000267 ~00305 ~00311 000327 000333 000351 000355 00121373 000377 0121121415 000421 000436 000442 000460 000464 000502 '110051216 000524 00121530 000546 000552 12100570 000574 000612 000616 00121634 01210640 000656 000662 00071210 000704 000722 000726 000745 000751 01210767 000773 001011 01211015 001033 00112137 001055 001061 001076 001102 001120 001124 ERWOR NEAE 1~ NEAE 21 NEAE 37 NEAE 4~ NEAE 61 NEAE 6E:j NEAE 1~3 NEAE lc;,7 NEA8 13 NEAB 17 NEA8 3C:; NEAB 41 NEAB 56 NEAB 62 NEAB 100 NEAB 104 NMUL 13 NMUL 17 NMUL 35 NMUL 41 NMUL 57 NMUL 63 NMUL lC111 NMUL 1C115 NMULS 13 NMULS 17 NMULS 35 NMULS 41 NMULS 57 NMULS 63 NMULS 101 NMULS 105 NOIV 13 NOIV 17 NOIV 36 NOIV 42 NOIV 60 NOIV 64 NOIV 1012 NOIV 106 NOIVS 13 NDIVS 17 NDIVS 35 NOIVS 41 NDIVS 56 NDIVS 62 NOIVS 100 NDIVS 1.04 .EJECT PAGE 6121 EAE-J I V'l4456 (114457 0446~ "'4461 04462 04463 04464 04465 04466 04467 04470 04471 04472 04473 04474 04475 04476 1214477 04500 0451211 04502 04503 1214504 04505 04506 04507 04510 04511 04512 04513 04514 04515 04516 04517 04520 04521 04522 04523 1214524 04525 04526 04527 04530 04531 001142 (11"'1146 (1101164 et01170 0012"'6 001212 et01230 001234 001252 001256 001274 12101300 001316 001322 001340 ~01344 001362 12101366 001404 ~12I1410 001426 01211432 001450 "'01454 001472 001476 CiJ01514 001520 12101536 001542 001560 "'01564 001600 001605 "'1211610 001621 001626 "'01631 001642 "'1211647 001652 001663 00167121 001673 NIDIV 13 Nlr)IV 17 NIOIV ~5 NIOIV 41 NIOIV 57 NIOIV 63 NIOIV 101 NIOIV 105 NIDIVS 13 NIOIVS 17 NIOIVS 35 NIOIVS 41 NIOIVS 57 NIOIVS 63 NIOIVS 101 NIOIVS 105 NF'ROIV 13 NF'ROIV 17 NFROIV 35 NF'ROIV 41 NFROIV 57 NF'ROIV 63 NF"ROIV 101 NF"ROIV 105 NF'ROVS 13 NF"ROVS 17 NF'ROVS 35 NF'ROVS 41 NFROVS 57 NF"ROVS 63 NFROVS 101 NF'ROVS 105 SHCTl 7 SHCTl 14 SHeTl 17 SHCT2 7 SHCT2 14 SHCT2 17 SHCT3 7 SHCT3 14 SHCT3 17 SHCT4 7 SHCT4 14 SHCT4 17 .EJECT PAGE 61 EAE-II 04532 04533 04534 04535 04536 04537 04540 04541 04542 04543 04544 04545 04546 04547 04550 04551 04552 04553 04554 04555 04556 04557 04560 04561 04562 04563 04564 04565 04566 04567 04570 04571 04572 04573 04574 04575 04576 04577 04600 04601 04602 04603 SHCTr; 7 SHeT5 14 SHCT5 17 S"1CT6 7 SHCT6 14 SHCT6 17 SHCT7 7 SHCT7 14 SHeT7 17 SHCT10 7 SHC T10 14 SHCT10 17 SHCT11 7 SHCT11 14 SHC Tll 17 SHCT12 7 SHC T12 14 SHC T12 17 SHC T13 7 SHC T13 14 SHCT13 17 SHCT14 7 SHC T14 14 SHCT14 17 SHCT15 7 SHC T15 14 SHCT15 17 SHC T16 7 Sl-tC T16 14 SHC T16 17 SHCT17 7 SHCT17 14 SHCT17 17 SHCT20 7 SHCT20 14 SHCT20 17 SHCT21 7 SHCT21 14 SHCT21 17 Sl-tCT22 7 SHCT22 14 SHCT22 17 001704 001.711 001714 001725 001732 001735 001746 001753 001756 001767 001774 001777 002010 002015 002020 002031 002036 002041 002052 002057 002062 002073 002100 002103 002114 002121 002124 002135 ('102142 002145 002156 002163 002166 002177 002204 002207 002220 002225 002230 002241 002246 002251 I .EJECT PAGE 62 EAt - I 1 04604 ~4605 ~4606 04607 04610 04611 04612 04613 04614 04615 04616 04617 04620 04621 04622 04623 04624 04625 04626 04627 04630 04631 04632 04633 04634 04635 04636 04637 04640 04641 04642 04643 04644 04645 04646 04647 04650 04651 04652 04653 04654 04655 04656 04657 04660 04661 0.02266 (1102273 0.02306 002313 ~02326 ~02333 002346 002353 002366 002373 002406 002413 002426 002433 002446 002453 002466 "'02473 002506 002513 002526 002533 "'02546 002553 002566 002573 0026"'6 002613 002626 rtl02633 "'02646 002653 002666 002613 ~02705 002714 002124 ~H!l2734 002143 002753 002766 002772 002717 003012 003016 "'03023 nSC1 1~+1 nSC1 11=)+1 OSC1 27+2 nSC1 34+2 OSCl 46+3 aSCl 53+3 DSCl 65+4 OSCl 72+4 DSCl IV'J4+5 OSCl 111+5 aSCl 123+6 DSCl 130+6 DSCl 142+7 DSCl 147+7 DSCl 161+1° DSCl 166+10 DSCl 2V'J0+11 DSCl 205+11 OSCl 217+12 aSCl 224+12 DSCl 236+13 DSCl 243+13 OSCl 255+14 DSCl 262+14 DSCl 274+15 DSCl 301+15 rlSCl 313+16 OSCl 320+16 OSCl 332+17 DSCl 337+11 DSCl 351+20 DSCl 356+20 DSCl 370+21 OSCl 375+21 STMUL 6 STMUL 15 STMULS 6 STMULS 16 STMULS 25 STMULS 35 STDIVS 11 STDIVS 15 STDIVS 22 SIGNA 11 SIGNA 15 SIGNA 22 .EJECT nGE 63 EAE-I I 1214662 04663 04664 04665 04666 1214667 1214670 ~4671 1214672 04673 1214674 04675 1214676 04677 0471210 121471211 Ql4702 121471213 121471214 121471215 0471216 0471217 0471121 1214711 1214712 04713 04714 1214715 04716 1214717 121472121 1214721 1214722 1214723 1214724 1214725 04726 1214727 1214730 1214731 04732 1214733 04734 1214735 1214736 1214737 1214740 1214741 1214742 1214743 0121312136 (711213121 4 2 ?03047 ~V'l3062 01213066 V'l12I3eJ73 01213106 01213112 01213117 Q!0~132 1211213136 01213143 1211213156 01213162 "'1213167 0121321212 0121321216 01213213 01213226 1211213232 01213237 01213252 1211213256 01213263 01213276 "'121331212 121121331217 01213322 01213326 1211213333 121121335121 1211213355 121121337121 01213375 ftlI2J34112J 01213415 0121343121 01213435 0121345121 01213455 121121347121 1211213475 0121351121 "'1213515 121121353121 1211213535 121121355121 1211213555 121121357121 01213575 SIGNS 11 SIGNR 15 SIGNA 1'2 SJ(~NC 11 SIGNC 15 SIGNC ?2 STrOVS 11 STIOVS 15 STrOVS 22 SIGNO 11 SIGNO 15 SIGNO 22 SIGNE 11 SIGNE 15 SIGNE 22 SIGNF 11 SIGNF 15 SIGNF ?2 STFOVS 11 STFOVS 15 STFOVS 22 SIGNG 11 SIGNG 15 SIGNG 22 SIGNH 11 SIGNH 15 SIGNH 22 SIGNI 11 SIGNI 15 SIGNI·22 MULTST 11 MULTST 16 MULA 11 MULA 16 MULB 11 MULB 16 MULe 11 MULe 16 MULO 11 MULO 16 MULE 11 MULE 16 DIVTST 11 DIVTST 16 OIVA 11 OIVA 16 DIVB 11 OIVB 16 DIve 11 DIVC 16 .EJECT PAGE 64 EAE-II 04744 04745 04746 04747 04750 04751 04752 04753 04754 04755 04756 04757 04760 04761 04762 04763 04764 04765 04766 04767 04770 04771 04776 04776 05023 05023 003610 003615 003630 003635 003650 003655 003670 003675 003722 003727 003746 003753 003776 Ci'l04':H~3 004026 004033 004051 004056 004111 004116 12104116 12104116 000000 WaRDA 777406 LENGTH OIVO 11 nlvO 16 nIVE 11 nIVE if> nIVF 11 OIVF 16 OIVG 11 OIVG 16 MSPEED 21 MSPEED 26 MSPEED 45 to4SPEED 52 OSPEED 21 OSPEED 26 OSPEEO 51 OSPEED 56 SPMUOV 14 SPMUOV 21 SPMUOV 54 SPMUOV 61 SPMUOV 61 SPMUOV 61 .LOC ERWOR+400 /BUFFER FOR BIT WORDS 0 .LOC WORDA+25 777406 .EJECT 'PAGE 65 EAE- I I 05(1)24 05025 05026 05027 740000 740000 605047 BEGIN 605031 NOP NOP JMP FACT JMP LOOKUP IWAS JMS SWIT7(NnT USEn) IHERE" IF NOT SrT IHERE IF SET 0. ICOUNTER JMS FIL~ER JMS CL8UF JMS ADVP JMS SCAN JMS CKF"LAG LAC LENGTH OAC LOOKUP-l JMS SETUP JMS SET81T JMS R8CW 1St LOOKUP-l JMP .-3 JMS STA8UF JMP* BEGIN IFILL ERROR LOK WITH CAL ICl BUFFER IGO TO MUl, DIV ROUTINES ISCAN FOR 00 OR 77 FLAG ANY ERROR I 0503V'l 05031 05032 05033 05034 05035 05036 05037 05040 05041 05042 05043 05044 05045 05046 000000 104250 105052 100203 104315 104342 205023 045030 104347 104301 104363 44521321 605041 105064 625024 052147 21521521 052151 1214264 12102213 625024 05052 05053 052154 05055 05056 05057 05060 05061 215062 05063 740040 207364 045063 2073721 165063 545063 625052 445063 6052156 000000 LOOKUP I FACT ISET UP COUNTE AND COUNTERS ISET BIT IF" ERROR IROTATE BIT AND CHECK WORD IPRINT OUT ERROR STATUS JMS FILHLT JMS ADVP JMP* BEGIN I I ICL BUrFER HLT Cl8UF LAC (WORDA OAr CLBUF+ll LAC (WORDA+24 O~M* CLBUF"+11 SAD CLBUF+l1 JMP* ClBUF IS~ CU~UF+11 JMp .-4 0 .EJECT IRHE ILHE IDEPOSIT IRHE=LHE ~EROS IEXIT INa YES PAGE 66 E AE - I I 05064 V'l5065 05066 05Q!67 05070 05 07 1 050 7 2 05073 121512174 05075 05076 05077 05100 05101 05102 05103 05104 1215105 05106 05107 740040 107026 105110 10'5144 105126 1 0 5412 205125 105314 105345 205143 105314 105345 205162 105314 207143 7412((10 625064 765724 105225 625064 IROUTINE TO PRINT ERROR BUFFER I STABUF HLT JMS PRINT /CHEr:K FOR PRINT JMS ANn8UF lAND THEM JMS IORBUF I"OR" THEM JMS TAD8UF ITAQ THEM TIN LAC ANOBUF+15 JMS OPS IPRINT THE "AND" TYT LAC TAOBUF+15 JMS OPS IPRINT THE "TAD" TYT LAC IOR8UF+16 JMS OPS IPRINT THE "lOR" LAC ASTRIC SNA JMP. STABUF IEXIT LAW TEXTJ IPRINT THE ASTRICT TSR JMP. STABUF IEXIT I I 1215110 ((15111 05112 05113 05114 1215115 05116 05117 0512121 05121 05122 ((15123 05124 05125 740040 750001 045125 207371 C1145115 204776 505125 045125 207372 545115 625110 445115 605115 C1100000 I"AND" ERROR WORDS HlT ANOBUF ClC DAC ANDBuF+15 LAC (lAC WORDA DAC .+1 LAC WORDA AND ANDBUF+15 OAC ANDBUF+15 LAC (LAC WORDA+14 SAO AN08UF+5 JMP. ANDBUF IS~ ANOBUF+5 JMP ANDBUF+5 0 I .EJECT IPERMIT "AND" FUNCTION ICLEAR TEM STORAGE IL.L. WORD IU.l. WORD ILL:UL IYES EXIT INO ILOOP ITEMP STORAGE -PAGE 67 EAE-II 05126 74VU40 ~5127 0513~ 05131 05132 05133 "'5134 05135 05136 05137 05140 05141 05142 05143 754000 liI45143 ?07371 045133 204776 345143 045143 207373 545133 625126 445133 60C;133 000000 05144 05145 05146 05147 05150 05151 05152 05153 05154 05155 05156 05157 05160 05161 05162 740040 754000 04C:;162 207371 045151 204776 104166 005162 045162 207373 C;45151 625144 445151 605151 0001000 IT AD ERROR WORDS HLT TADBUF CLL!CLA OAC TAllSUF+15 LAC (LAC WaRDA OAC • +1. LAC WaRDA TAD TAr)8UF+15 OAG TAJ')BUF+15 LAC (LAC WORDA+21 SAO TAnSUF+5 JMP .. TAD8UF IS~ TA09UF+5 JMP TAnSUF+5 0 I I IIOR ERROR WORoS HLT tORBUF IU.L. IADD THEM IU.L. IL.L.=U.L. IYES EXIT INO ILOOP ISUM OF ERROR CLL~CLA DAC IORBUF+16 LAC (LAC WORDA OAC .+1 LAC WORDA JMS lOR IORBUF+16 DAe IORBUF+16 LAC (LAC WORDA+21 SAD IORBUF+5 JMP. IORsUF IS~ IORBUF+5 JMP IOQBUF+5 III .EJECT IL.L. I"OR" IU.L. IU.L.=U.L. IYES INO ILOQP IINCLUSIvE OR OF WORDS PAGE 68 EAE-I I ~5163 ~5164 05165 015166 05167 015170 05171 051 7 2 05173 05174 05175 05176 05177 05200 74~040 765710 105225 207374 "'46362 046406 046411 106065 207375 046362 046406 046411 106075 605177 IMULTIPLY SIMULATION CONTROL ~LT MSC LAW TEXTH TSR LAC (Jt-1S MULSIM DAC MP4-1 [lAC MPSIGN+6 OAC MPIl+2 JMS SOFMUL LAC (NOP OAC MP4_1 DAC MPSIGN+6 OAC Mp;l+2 JMS ~ARMUL JMP .-1 IGEN[RATE SIMULATION /LOOP 1 / 05201 05202 05203 05204 05205 05206 05207 052H'I 05211 05212 05213 05214 05215 05216 05217 05220 05221 05222 05223 05224 05225 05226 05227 0523(;1 05231 05232 05233 Ql5234 05235 05236 05237 052401 05241 740040 765710 105225 207376 046443 046465 046453 046523 046531 046546 106170 207375 046443 046465 046453 046523 046531 046546 106156 605223 657323 605225 507241 0472(113 227203 447203 045307 74~020 742020 742020 045310 742"'20 742020 742020 /OIVIOE SIMULATION CONTROL HLT DISC LAW TEXTH TSR LAC (Jt-1S OIVSIM OAC OSP1 DAC OSP2 DAC OSP3 OAC OS P 4 OAC DSP5 OAC OSP6 JMS SOFDIV LAC (NOP OAC OSP1 OAC OSP2 OAC DSP3 OAC OSP4 OAC OSP5 OAC OSP6 JMS HARDIV JMP .-1 ITAPE 3A ITYPE STRING OF CHARACTERS IEOM=77=1 IOIVS=657323 TYPTSR JMP AND (7777) DAC TEMY1# LAC* TEMY1 IS~ TE MY 1 OAC TYPSAV RTR RTR RTR DAC TYPSAV+l RTR RTR RTR . IGENERATE SIMULATION ILOOP 'l"'AGE 6Q EAE-I I 10'1250 05242 C115243 05244 05245 05246 05247 0525C11 1215251 1215252 1215253 05254 05255 05256 1215257 05260 1215261 1215262 1215263 1215264 05265 05266 05267 1215270 05271 05272 05273 05274 05275 05276 05277 05300 105250 ?0s307 10')250 A05230 740040 045311 205 3 1217 ')1217347 547377 741V'1121eJ 605264 205307 51217225 045307 105412 605 2 45 205311 51217225 547225 625225 741200 625250 7441211211 347400 741400 605302 205311 507225 3474 0 1 05301 605305 1215302 05303 05304 1215305 05306 05307 053 1 0 05311 05312 V'l5313 205311 507225 347402 106562 62'1250 000000 000000 000000 0000121121 00012100 ~0r;310 TYPCHR JMS TYPCHR LAC TYPSAV+l JMS TYPCHR LAC TYPSAV JMS TYPCHR JMP TYPTSR+3 HLT DAC TYPSAV+2 LAC TYPSAV AND (777700 SAO (1512fiH'I SKp JMP .+6 LAC TYPSAV AND (0f}1121077 OAC TYPSAV JMS TYCRLF JMP TYPCHR-3 LAC TYPSAV+2 AND (77 SAO (77 JMPo TYPTSR SNA JMPo TYPCHR CMA!CLL TAD (40 IACTIVE ITEST FOR CRLF ICRLF'? lyES INa ICORRECT IT FOR NEXT TIME 100 CRLF ITYPE LAST CHARACTER lEND OF MESSAGE? IYES IIF ~ERO IGNOR IIGNOR S~L JMP .+5 TYPSAV LAC TYPSAV+2 AND (77 TAD (21210 JMP TYPSAV-2 LAC TYPSAV+2 AND (77 TAD ( 300 JMS OTY JMPo TYPCHR 0 0 '" '" '.EJECT " 13 Ro 12No IACTJVE cHAR PAGE 70 EAE-I I /TYPE CONTENTS OF THE AC IN OCTAL TYPCON JMP JMS DECaNT JMS TYPOCT LAC TYpSAV+4 JMS TyPOCT LAC TYPSAV+3 JMS TYPOCT LAC TYPSAV+2 JMS TYPOCT LAC TYPSAV+1 JMS TYPOCT LAC TYPSAV JMS TYPOcT 05322 05323 05324 05325 05326 05327 05330 6053 1 4 105360 105401 205313 105401 205312 10 540 1 20'5311 105401 20'5310 10'5401 205307 10'5401 eJ5331 1054eJ6 JMS SPACf2 05332 625314 05333 05334 05335 05336 05337 05340 05341 05342 60'5333 10'5360 205311 105401 205310 105401 205307 105401 105406 625333 605345 105354 105354 105354 105354 105354 625345 605354 207403 106562 625354 JMP. TYPCON /TYPE OUT LOWEST 3 CHAR IN OCTAL JMP TYPC03 JMS DECONT LAC TYPSAV+2 JMS TYPOCT LAC TYPSAV+1 JMS TYPOCT LAC TYPSAV JMS TYPOCT JMS SP4C[2 JMP. TYPC03 JMP TYPTYT TSP TSP TSP TSP TSP JMP. TYPTYT SPAC JMP • LAC (240 JMS OTY JMP. SPAC .EJECT ~5314 ~5315 ~5316 ~5317 ~532r;;, ~5321 ~5343 05344 05345 05346 (('15347 0535(('1 05351 05352 05353 05354 05355 05356 05357 PAGE 71 EAE-II 05360 05361 0536? 05363 A0')360 ~5364 04')310 742020 740020 045311 742020 740020 04')312 742020 0536~ 05366 05367 05370 05371 05372 05373 05374 05375 05376 05377 0540~ 05401 05402 05403 05404 05405 05406 05407 05410 05411 05412 05413 05414 05415 05416 05417 v\4~307 74?~20 74vH~20 74~020 045313 742020 740(2120 625360 605401 507217 347404 106562 625401 605406 767225 105225 625406 605412 207405 106562 207406 106562 625412 105401 105354 105225 105412 105412 005314 105345 005314 · JMP nAC TYPSAV RTR RAR f)AC TYPSAV+1 RTR RAR DAC TYPSAV+2 RTR RAR DAC TYPSAV+3 RTR RAR DAC TYPSAV+4 RTR RAR JMP .. DECONT JMP TYPOCT AND ( 7 TAD (260 JMS OTY JMP .. TYPOCT JMP SPACE2 LAW (77 TSR JMP .. SPACE2 JMP TYCRLr LAC (215 JM·S OTY LAC (212 JMS OTY JMP .. TYCRLr TDIGIT=JMS TYPOCT TSP=JMS SPAC TSR=JMS TYPTSR TCR=JMS TYCRLr TIN:TCR OPS=TYPcON TYT=JMS TYpTYT OPT=OPS DECONT · · I .EJECT ISTRING ICR,Lr ICONTENTS or AC IN OcTAL ITA8 PAGE 72 EAE-I I 05420 05421 05422 05423 05424 05425 05426 05427 '1154301 05431 05432 05433 05434 05435 151215 251424 112014 315504 112611 040540 240523 245420 012224 4062'56 151220 012224 41216140 231017 05436 251404 05437 05440 05441 05442 05443 05444 05445 05446 05447 05450 05451 05452 05453 05454 05455 05456 05457 05460 05461 05462 05463 05464 05465 05466 05467 05470 05471 05472 05473 05474 05475 05476 05477 05500 05501 05502 05503 05504 05505 05506 400205 402225 164020 221117 224024 174024 101123 402305 032411 171600 151223 276075 617504 051405 240540 052222 172240 243120 172524 235600 151223 276175 617510 011424 400106 240522 400501 031040 050105 401720 V1l522rtJl 241117 165600 151223 276275 fl17522 052005 012440 140123 244005 TEXTA .SIXAT <15><12>'MULTIPLY-OIVIOE TEST,PART 2, .SIXBT <15><12>'pART 1 SHOULD BE RUN PRIOR TO THIS SECTION .SIXBT <15><12>'SW0=1=DELETE ERROR TYPOUTS. . SIXBT <15><12>'SW1=1=HALT AtTER EACH EAE OPERATION • ,SIXBT <15><12>'SW2=1=REPEAT LAST EAE OPERATION. PAGE 73 EAE-II 05507 05510 05511 Vl5~12 05513 05514 05515 05516 05517 05520 05521 05522 05523 05524 05525 05526 05527 05530 05531 05532 05533 05534 05535 05536 05537 05540 05541 05542 05543 05544 05545 05546 05547 05550 05551 05552 05553 05554 05555 05556 05557 05560 05561 O5562 05563 05564 05565 05566 05567 0557'" 05571 O5572 05573 05574 05575 01~540 172005 ?2V1124 111716 560000 151223 276375 617510 011424 400106 240522 400501 03104121 050105 402305 212505 16"'305 560000 151223 276475 617522 052005 012440 050103 104005 010540 230521 250516 030556 151223 276575 617503 31tl1314 054003 171520 140524 O54024 052324 56"'0"'0 151223 276675 n17520 221116 244042 171342 400124 400516 044017 064020 012323 ~44027 100516 40::>327 657561 77000121 ,SIXBT <15><12>'SW3=1=HALT AFTER fACH EAE SEQUENCE. • SIXBT <15><12>'SW4=1=REpEAT EACH EAE SEQUENCE • .SIXBT <15><12>'SW5=1=CVCLE COMPLETE TEST. .SyXBT <15><12>'SW6=1=PRINT "OK" AT END OF pASS. WHEN SW5=1'(77) PAGE 74 E AF - I I 05576 05577 05600 05601 05602 05603 05604 05605 05606 05607 05610 135611 05612 05613 05614 05615 05616 05617 05620 05621 05622 05623 05624 05625 05626 05627 05630 05631 05632 ~5633 1215634 1215635 1215636 ~5637 0564121 05641 05642 05643 05644 1215645 05646 05647 0565121 05651 05652 1215653 05654 1215655 05656 1215657 05660 1215661 05662 05663 05664 1'51215 2'51423 400601 111405 044et4(.1! 401525 142411 201411 052240 500103 514015 251 4 24 11201 4 110301 160477 101107 1134017 220405 22402121 221704 250324 41214014 172740 172204 12152240 202217 042503 247700 151210 012204 270122 057700 15121214 112623 400601 111405 044003 500411 261123 172251 404040 03512101 12135140 404040 400350 152151 15120121 7712112100 212517 ?4111215 162440 404040 404040 220515 011116 MULTIPLIER (AC) HULTIPLICANn?' ~AILED TEXTS ,SIXBT <15><12>'MULS TEXTC ,SIXBT 'HIGH ORDER PRODUCT TEXTO ,SIXBT <15><12>'HARDWARE'<77> TEXTE ,SIXBT <15><12>'DIVS tAILED C(DIVISOR) TEXTF ,SIXBT ,SIXBT <77> 'QUOTIENT LOW ORDER PRODUCT'(77) REMAINDER C(AC) C (MQ) '<1 '5><12> LINK'<15><12>'SOFTWARE?'<77> PAGE 75 E AE - I I 05665 04~522 0~666 05667 404014 111613 0567~ 1';1223 V'5671 170624 270122 057777 151214 111613 401617 244023 052440 171640 041126 110405 401726 052206 141727 777700 151203 501451 404040 12135001 17135140 404040 41214003 51211521 514040 40'4003 5212303 5177210 05672 05673 05674 05675 05676 05677 05700 05701 05702 05703 05704 05705 "'5706 05707 05710 05711 05712 05713 05714 "'5715 05716 05717 05720 05721 05722 05723 05724 05725 05726 05727 0573'" 05731 1215732 05733 1215734 5201000 151217 252440 17"'640 616060 400310 050313 40121201 047700 TEXTG .SIXBT <15><12>'LINK NOT SET ON DIVIDE OVERFLOW?'<77) TEXTH .SIXBT <15><12>'C(L) TEXTr TExTJ .SIXBT .SIXBT 1.1 C(AC) C<MQ) <15><12>'OUT OF 10121 CHECK BAD?' IPOP-15 EAE I I - TAPE 4 IRANDOM CONTROL MUL/DIV I 05735 05736 05737 05740 05741 05742 05743 05744 05745 05746 740000 740000 104162 105747 104134 104162 106120 104134 740000 625735 EXRAN NOP NOP JMS LOOP4 JMS MULSHT JMS HLOOPM JMS LOOP4 JMS OIVSHT JMS HLOOPM NOP JMP. EXRAN 1 IMULTIPLY SHIFT CONTROL ISET UP FOR RANDOM LOOP ISET UP F"OR LOOP IRANOOM MULTIPLY ICHECK FOR HALT AND LOOP ISET uP F"OR LOOP IRANOOM DIVIDE ICHECK FOR HALT AND LOOP ICHECK FOR LOOP C(SC) '<77) PAGE 76 EAt - I I 05747 Ii'! 5751i'! 05751 0575? 05753 05754 ~5755 05756 05757 0576 0 05761 05762 1215763 05764 1215765 05766 1215767 1215770 1215771 1215772 05773 05774 1215775 05776 05777 060121£11 061211211 061211212 121601213 0601214 06005 06006 74~040 ?V'l7407 046334 777777 046360 H'l5765 206334 54741121 62 5747 446 334 7512112101 34636121 04636121 61215754 740121012l 21217411 047147 21217412 1214612121 207413 04612122 21217414 04612123 10612107 11214157 106~65 10612175 11216 1 1215 1121413121 447147 605776 625765 XX LAC (MULS-21 lONE SHIFT IHARnlo/ARf INSERT nAC HMPY+4 LAW -1 lONE ISOFTWARr INSERT OAC MP4-3 IGO TO MULTIPLY JMS EXMUL IMULTIPLy INSTRUCTION LAC HMPy+4 SAD (MlJLS 122 SHIFTS IYES EXIT JMP* MULSHT 1St HMPY+4 IINCREMENT HARDWARE SHIFT cLC TAD MP4-3 DAC MP4-3 IINCREMENT SOFTWARE SHIFT JMP .-1121 IMULTIPLY RANDOM NUMBERS (RAN2 X RAN3) NOP EXMUL LAC (771211211210 IRANDOM NUMBER COUNTER 4096 DAC cTRAN# LAC (0 91 3466 f)AC RAN1 LAC (15351211 DAC RAN2 LAC ( 2HJ762 OAC RAN3 IRANOOM NUMBER GENERATOR JMS RAN JMS LOOP2 ILOOP SET UP ISOFTWARE MULTIPLY JMS SOFMUL IHAROWARE MULTIPLY JMS HARMUL IHARDWARE=SOFTWARE JMS MULCOM IHALT-LOOP? JMS HLOOPS IS~ CTRAN JMp .-7 IEXIT JMP* EXMUL .EJECT MULSfiT PAGE 77 E AE -I I 06V!1Zl7 Vl6"'10 06"'11 06012 06013 06014 06015 06016 06017 (41)021 101)024 17146022 106024 046023 626007 /RANOOM NUMBER GENERATOR RAN 0 LAC RA~l JMS ROr,EN OAC RANl /FIRST NUMPER JMS ROGEN OAC RAN2 /SFCONO NUMBER JMS RoGEN OAC RA~J3 /THIRo NUMPER JMP .. RAN 06 0 2 0 06021 06022 06023 33'5671 003466 15351711 21 C1J7 62 RNO RANl RAN2 RAN3 1716024 06025 06026 0617127 06030 06031 06032 06033 06034 06035 06036 06037 06040 06041 06042 06043 06044 06045 0617146 06047 06050 1710017100 046064 206052 '547415 741000 606041 207416 17146052 206051 744010 741400 347213 (1146051 226052 346051 066052 206064 740020 3660'52 4460'52 626024 ROGEN (~(M'0v!1Zl ?VlA~'?l lC"I',{~?4 / 335671 003466 153501 21 171 762 / 0 OAC RWRK LAC RANOEX SAD (RANTBL+10 SKP JMP RANTAD LAC (RANTBL oAC RANOEX LAC RANCON CLL!RAL S~L RANTAo TAD ( 1 OAC RANCON LAC .. RANOEX TAD RANCON DAC .. RANDEX LAC RWRK RAR TAO .. RANDEX IS~ RANoEX JMP.. ROGEN .EJECT PAGE 78 EAE- I I 06051 0605? 06053 06054 0M'l55 06056 06057 06060 06 06 1 06062 06063 06064 123456 00612!63 A543;?1 36j 4 16 05'5363 '546060 243035 762'572 453237 150214 000000 000000 RANCON RANDEX RANT8L RWRK 123456 RANTBL+Ul! 654321 361416 055363 5461360 243035 762572 453237 150214 0 0 .EJECT PAGE 79 EAE - I I 641002 (il!47163 626075 ISOFTWAR[ MULTIPLY (RAN2 X RAN3) NOP SOFMllL LAC RA\J2 JMS toAULT ILOW ORDER IN AC HIGH ORDER It\.J MP5 LAC RAI-,'3 ILOW ORDrR OAC LPROOS# LAC MPc; OAC HPROOS IHIGH ORDER JMP ... snFMUL IEXIT IHAROWARE MULTIPLY NOP HARMUL IMULTIPLIER LAC RAN3 JMS HMPY IMULTIPLICANO LAC RAt\.J2 IHIGH ORDER OAC HPRODH LACQ ILOW ORDER OAC LPROOH JMP ... HARMUL IEXIT 740000 207160 547161 741000 606115 207163 547164 606117 106750 106256 626105 ICOMPARE PRODUCT OF SOFTWARE + HARDWARE NOP MULCOM LAC HPRODH# SAO HPROOS# SKP JMP • +4 IHIGH ORDER NOT EQUAL LAC LPRODH# SAO LPROOS Jf4P .+3 JMS BAOMUL ILOW ORDER NOT EQUAL JMS MULCT ILOW ORDER NOT EQUAL JMP. MULCOM 06065 740000 0606t06V'67 2060?2 1 ~h340 ~607(j\ 206023 06071 06072 06073 Vl47164 06V'74 06075 06076 06077 06100 06 1 0 1 06102 ~6103 06104 207170 047161 626065 740000 ?06023 106330 206022 ~47160 I 06105 06106 06107 06110 06111 06112 06113 06114 06115 06116 06117 I 0612'" 06121 06122 06123 06124 06125 06126 061 2 7 06130 06131 06132 06133 06134 06135 740040 207417 046324 777777 046436 106136 206324 547420 626120 446324 7501"H''I1 346436 046436 606125 IOIVIOE SHIF'T CONTROL HLT OIVSHT LAC (DIVS-22 DAC HDIVID+6 LAW -1 OAC OV4+4 JMS [XOIV LAC HOIVID+6 SAO (DrVS JMP'" DIVSHT IS~ HDrVID+6 CLC TAD OV4+4 DAC OV4+4 JMP .-10 .EJECT lONE SHIF'T cOUNT IHARDWARE INSERT lONE ISOrTWARE INSERT IGO TO DIVIDE IDIVIDE INSTRUCTION 123 SHIFTS IYES EXIT IINC HARDWARE SHIF'T IINC SOFTWARE SHIFT PAGE 80 EAE-I I 06136 06137 06 1 40 06 1 4 1 06142 06143 06144 06145 06146 06147 06150 06151 06152 06153 06154 06155 740000 207411 047147 207 4 1 3 046022 207414 046rtJ23 106007 104157 106170 106156 106201 104130 447147 606145 626136 IDIVIDE RANDOM NUMBERS (RA N1. RAN3)/(RA N2) NOP EXOIV LAC (770000 IRANOOM NUMBER COUNTER 4096 OAC CTRAN LAC (11:)35 01 DAC RAN2 LAC (2H1J762 f)AC RAN3 JMS RAN IRANDOM NUMBER GENERATOR JMS LOOP2 IlOOP SETUP JMS SOF"DIV ISOFTWARE DIVIDE JMS HARDIV II-fARoWARE DIVIDE JMS OIVCOM IHAROWARE=SOFTWARE JMS HLOOPS ICHECK HALT LOOP JS~ CTRAN JMP .-7 JMPtt EXDIV .EJECT 'l'"AGE 81 EAE-II (116157 V'J616V'1 74"'0V'J0 206023 A5?0(110 ~6161 ;J~6~21 ~616? 106316 206022 047174 641002 el47172 626156 0615t' 0616~ ~6164 (116165 06166 06167 06170. 06171 06172 06173 06174 06175 06176 06177 06200 740000 206021 106413 20.6023 206022 047173 207150 047175 626170 06201 06202 06203 06204 06205 06206 06207 06210 06211 06212 06213 06214 06215 06216 06217 el6221f! 740000 206156 741400 740001 741100 606216 207172 '547173 7410"'0 606216 207174 547175 606220 106664 106221 626201 IHARDWARD OIVIDE NOP HARDIV LAC RAN3 LM(J LAC RAN1 JMS HDIVID LAC RAN2 IIAC REMH LACa [JAC QUOTH JMP. HflRDIV /DIVIDEND LOW ORnER IDIVIDENO HIGH ORDER IDIVISOR /HAR[")W~RE REMAINDER /HARnWARE QUOTIENT I ISOF"TWARE nlVIDE (RAN1.RAN3)/(RAN2) Nap SOF"OIV LAC RAN1 IHIGH ORDER DIVIDEND JMs DIvIDE LAC RAN3 ILOW ORDER DIVIDEND IOIVISOR LAC RAN2 ISOF"TWARE QUOTIENT DAC QUOTS LAC OVI) nAC REMS ISOF"TWARE REMAINDER JMP. SOF"DIV I ICOMPARE QUOTIENT AND REMAINDERS NOP DIVCOM IGET LINK FROM SOFTWARE DIVIDE LAC HARDIV ICHECK LINK FROM HARDWARE DIVIDE S2L CMA IHDw LINK=l, so COMPL SOFW LINK. lAC SHOULD BE PLUSE FOE EQUAL LINKS SPA ILINKS NOT EQUAL, REPORT ERROR. JMP DVCMER LAC QUOTH# SAD QUaTS# SKP JMP • +4 IQUOTIENT NOT EQUAL LAC REMH# SAD REMS# JMP .+3 JMS BADDIV IREMAINDER NOT EQUAL OVCMER JMS DIVCT IPERCENT OF TIMES JMP. DIVCOM I .EJECT PAGE 82 EAt-II ~6221 ~6222 06223 06224 06225 06226 ~6227 0623~ 06231 06232 06 233 eJ6234 06235 06236 06237 06240 06241 06242 06243 06244 06245 06246 06247 06250 06251 06252 06253 06254 06255 06256 06257 06260 06261 06262 06263 06264 06265 06266 06267 06270 06271 06272 06273 V'l6274 06275 06276 06277 06300 06301 06302 06303 06304 74C11~40 107026 207347 047153 147204 106170 106156 206156 741400 740001 7 411 00 606244 207172 547173 741000 606244 207174 547175 741000 447204 447153 606226 106306 105412 206324 105314 207421 740040 626221 740040 107026 207347 047153 1472PJ4 106065 106075 207160 547161 741000 606274 207163 C;47164 741000 447204 447153 606263 106306 10C;412 200334 10~314 207422 74V'1040 INUMBER OF TIMES orvs BAD HLT OIVCT JMS PRINT LAC ( -H~0 ITIMES CHECK ITIMES COUNTER OAC EAEOON# ICL TIMES J:"OUNO 8AO OrM XBAOtl JMS SOFOIV JMS HARDIV IGET SFTW LINK LAC HAROIV SrL ICHECK HOW LINK IHOW LINK=l. SO COMPL SFT LINK CMA lAC MUST BE PLUS FOR EQUAL LINES SPA JMP DCTER INOT EQUAL, GO TO ERROR. LAC QUOTH SAl' QUOTS IGOOO SKP 19AD JMP .+4 LAC RE"1H SAD REMS SKP IGOOO ISr XBAD DCTER IBAD INcREMENT TIMES FOUND ILIMITS ISr EAEDON ILOOP JMP DIVCT+5 IPRINT ROUTINE JMS TI"'1TEX TCR LAC HDIVID+6 JMS OPT LAC (DISC+1 HLT IEXIT JMP. DIVCT I INUMBER OF TIMES MULS BAD HLT MULCT JMS PRINT ITIMES CHECK LAC (-100 ITIMES COUNTER 'lAC EAEDON lel TIMES FOUND BAD OrM XBAD JMS SOFMUL JMS HARMUl lAC HPRODH SAD HPROOS SKP IGOOO JMP .+4 IBAD LAC LPROOH SAD lPRODS SKP IIGOOD ISr XBAD IBAO INCREMENT TIMES FOUND ISr rArDON IlIMITS JMP MULCT+5 IlOOP IPRINT ROUTINE JMS TIfwlTr X TCR LAC HMPV+4 JMS OPT LAC (MSC+l HLT PAGE 83 EAE-II 626256 JMP* MULCT ,EJECT IEXIT PAGE 84 EAE - I I IPRIi\JT R au T I r!E OF TIME BAD 0630f 740J40 06307 V)6310 06311 i7l631? :,,17:126 76"')725 10")225 rIMT~X Jt-1S 2072Vl4 06~14 1Qlt)333 0631'5 62A3 Vl 6 P~fNi LAw TEXT.) TSR TSP LAC X8Ao JMS TYPC03 JMP* TIMTEX 1.05354 Vl6313 HLT lOUT OF IXX IEXrT I IHAROWARE ARITHMETIC SUBROUTINES IS I GI\JEO [) I VI DE SUBROUT I NE ICALLING SEQUENCE IOIVIDE IN AC ANo NQ /JMS HOIVInE /PICKUP OTHER FACTOR / 06 31 6 06317 06320 06321 06322 06323 Vl6324 06325 Vl6326 Vl6327 000000 Vl47202 426316 664000 046325 HOIVIO ?~'l7202 A44323 0QH~{'1~0 446316 62f,316 HDIVL lEN TRY TO SU8ROUTINE o DAC TEM# XCT* HOrVID G5 M DAC HOIVL LAC TEM nIVS o ;LOCATION OF DIVISOR 152 HorVIO JMP* HorVIn .EJECT 1~0 CHECKS 8Ao XX, PAGE 85 E AE- I I ISIGNED MULTIPLY SUBROUTINE ICALLING SFQUENCF. lONE FACTOR IN AC IJMS HMPY IPICK UP OTHrR FACTOR I ~633Vl 06331 Vl6332 06333 Vl6334 Vl6335 0633(' 06337 (1)00000 664000 046335 426330 657122 VlVl(i!0Vl0 446330 626330 HMPY o GSM nAC .+3 XCT* HMPy MULS (1\ IS2 HMPY JMP* HMPY .EJECT ILACXXX ON LAC I XXX IENTRY TO SUBROUTINE IFIX MULTIPLIER MAGNITUDE ILAC MULTIPLICAND ILOCATION OF MULTIPLIER IINDFX RETURN PAGE 86 EAE- I I 06340 06341 06342 06343 06344 06345 000000 147170 7412 0 0 740000 745100 ~6346 047165 426340 741200 740000 741100 740003 (ilJ47166 207423 740010 046400 777756 047167 740000 207165 740020 207170 745400 347166 740020 047170 207165 06347 06350 06351 06352 06353 06354 06355 06356 06357 06360 06361 06362 06363 06364 06365 ~6366 06367 06370 06371 06372 06373 06374 06375 06376 06377 06400 06401 06402 06403 06404 06405 06406 06407 06410 06411 0641? 74~003 IPnP-15 ONE'S CO~PLEMENT SINGLE PRECISION MULTIPLICATION SUBROUTINE IHARnWARE SIMULATION ICAlLING SEQUENCE: IlAC MULTIPLIER IJMS MULT ILAC MlJLTIPLICAND IRETURt\I; LOW ORDER PRODUCT IN AC, HIGH ORDER PRODUCT lIN MP5 MULT 0 o~M MP t15 SNA Nap SPA!CLL CMA!CML DAC M#Pl XCT* MULT SNA NOP MP4 74~020 ~47165 207170 447167 606411 000000 047170 207165 IS~ MPSIGN 74~000 406400 17147165 74~000 446340 626340 74~000 606363 SPA CMA!CML nAC MP 1t2 LAC (360000 RAL DAC MPSIGN LAW -2? OAC MP#3 NOP LAC MPl RAR LAC MP5 SZ!L!CLl TAO MP2 RAR OAC MP5 LAC MPl RAR DAC MPl LAC MP5 MP2 MP~ JMP MP~+2 0 DAC MP5 LAC MPl NOP XCT MPSIGN oAC MPl NOP IS2 MULT JMP6 MULT NOP JMP MP4 .EJECT PAGE 87 EAE -II IPDP-15 ONE'S COMPLEMENT DIVIDE SURROUTINE HARWARE SIMULATION ICALLING SFQUENC~, I LAC HIGH ORDER DIVIDENDI JMS nIVIDE I LAC LOW ORDER OIVIDEND I LAC DIVISOR I RETURN,QUOT. IN AS, REM. IN D#VD IIF HIGH DIVIOENn S GREATER OR EQUAL TO DIVISOR, DIVIDE TAKES IPLACE AND LINK IS SET TO 1. DIVInE 0 IHIGH ORDER DIVIDEND IN AC 06413 o6 ~ ~ 4 06,< '5 06416 064 1 7 06420 06421 06422 06423 06424 06425 06426 06427 06430 06431 06432 V'l6433 06434 06435 06436 V'l6437 06440 06441 06442 06443 06444 06445 745100 740003 047150 4264 13 741400 740001 047171 106424 000000 446413 426413 741100 740003 106432 000000 744000 047151 446413 777755 047152 206503 046476 147200 740000 207151 606460 DV5 DV4 DSP1 SPA!CLL lIS DIVIDEND POSITIVE INO, COMPLEMENT AC AND LINK CMA!CML ISTORE HIGH ORnER DIVIDEND nAC n#VD IFETCH LOW ORDER DIVIDEND XCT* DIVIDE IDIVIDEND SIGN 8IT POSITIVE? Stl INO, COMPLEMENT LOW ORDER DIVIDEND CMA ISTORE LOw ORDER DIvIDEND DAC Q#uO IDEPOSIT DIVIDEND SIGN 8IT INTO DV5M JMS DV5 IREMAINDER HAS SIGN OF DIVIDEND ~ ISr DIVIDE IFETCH DIVISOR XCT* DIVIDE ISKIP IF SIGN POSITIVE SPA ICOMPLEMENT AC AND LINK CMA!CML IDEPoSrT QUOTIENT SIGN BIT INTO DV4 JMS DV4 ICONTAINS SIGN BIT OF QUOTIENT o IClEAR lINK CLl ISAVE DIVISOR nAC D#VS IINCREMENT TO EXIT ADDRESS IS~ DIVIDE ISET UP "STEP COUNTER" LAW -23 DAC DV#l LAC SVC8 DAC SVC0 ISET SAVE CARRY SWITCH TO INITIAL DtM SVCRY ICLEAR SAvED CARRY. NOP LAC DVS IFETCH DIVISOR 1ST ART DIVISION JMP OV2A-1 .EJECT PAGE 88 EA[-I I 06446 06447 06450 06451 06452 06453 06454 06455 06456 06457 06460 06461 06462 06463 06464 06465 06466 06467 06470 206475 740010 207150 74111010 V'J4 7 150 74V'J000 206464 74QJ010 207 1 5 1 745400 74QJ031 347150 047150 106464 000000 740000 207200 741100 740002 06471 06472 06473 06474 06475 06476 06477 065£10 0650 1 065£12 065£13 065£14 065£15 065£16 065£17 06510 06511 06512 06513 06514 06515 06516 06517 207171 740"010 047171 106475 000000 740040 606513 606510 6065£14 606516 606477 207200 741100 606550 606515 207200 741100 606550 206464 QJ47200 446476 447152 606446 DS P 3 DCRY DSP2 LAC OHIB RAL LAC ovn RAL QAC Ilvn NOP LAC DCRY RAL LAC DVS SlL!C LL CMA!IAC TAD oVn DAC oVn JMS ,+1 ISAVE CARRY LAC QUO RAL DAC QUO JMS .+1 SVCB SVC1A SVC1 SVC2 SVC3 /GET LAST CARRY IPUT INTO LINK /GET DIVISOR /IF LINK IS 1, ADD NEG DIVISOR, IIF LINK Is 0, ADO PaS DIvISOR, IADD DIVISOR (+,-) TO nlVIOEND /STORE NEW DIVID[ND NOP "LAC SVCRY ICHECK LAST SPA CML QHIB SVC0 /GET SAVED HI OUOTIENT BIT /PUT BIT INTO l.INK IGET DIVIDEND /INSrRT HI QUaT INTO DIVIDFNO /STORE NEW DIVIOfNO o ICARRY,=l IF OVERFLOW IIF OVERFLOW ERROR LAST CYCLE, ICOMPLEMENT THIS INSrRT RIT, IGET QUOTIENT IINSERT CARRY INTO QUOTIENT, ISTORE NEW QUOTIENT, ISAVE HI BIT FOR IINSERTION INTO DIVIDEND. HLT JMP SVC2 I1ST - SAVE EXTRA SIGN BIT JMP SVCt 12ND - SAVE SIGN BIT, CHECK XSIGN BIT JMP SYC1A 13RD - CHECK SIGN BIT. JMP SVc3 IOTHERS - CONTINUE SVCQ.I+1 JMP LAC SYCRY SPA JMP OYRFLO JMP SYC3-1 ITEST SAVED SIGN BIT LAC S#VCRY SPA IMUST=0 JMP OVRFLO INOT=0, OVERFLOW LAC DCRY DAC SVCRY ISAVE CARRY FOR TEST NEXT CYCLE IS2 SVC0 IINCREMENT sWITCH 1St DVl IINCREMENT STEP COUNTER JMP DV2 IGO TO NEXT DIVIDE CYCLE .EJECT PAGE 89 EAE- I I ~652el 206464 06521 7411~el ':'t.1:;?2 61216527 ,/6523 74~CHH~ V /)524 207151 ~6525 ~6526 06527 1216530 06531 06532 06533 06534 065 3 5 06536 06537 06540 "'6541 06542 06543 06544 06545 06546 06547 06550 "'6551 06552 06553 06554 06555 06556 06557 0656'" 06561 34715121 047150 206424 740010 740000 207150 741401 "'47150 2064 32 740010 207171 741400 7 40~HIJ1 047171 207200 7401010 207171 74~0"'0 DSP4 OV3 DSP5 TAO OAC LAC RAL NOP LAC oVn ovn ove; ovn S~L!CMA DSP6 626413 207152 7401030 7401"'0 606527 206475 74(11010 207150 74"'010 047150 606527 LAC [lcqy SPA JMP DV~ NOP LAC DVS OVRFLO ISTF.:P COUNTER:~ ITEST LAST CARRY IIF:l "JO CORREf":T I O~~S NEEOEn /~AS eJ IADO ( + ) DIVISOR TO CORRECT IOVo VALUE FOR REMAINDER ICHEcK DIVIDEND SIGN I I IIF MINUS, COMPLEMENT REMAINDER I /CHECK DIVISOR SIGN nAC OVO LAC DV4 RAL LAC QUO Ilr MINUS, COMPLEMENT QUOTIENT s2L eMA OAC QUO LAC SVCRY ISET LINK TO DETERMINED VALUE RAL LAC QUO NOP JMP. DIVIDE IOVERFLOW OCCURRED LAC DV1 lAC SMA JMP DV3 LAC QHIB IGET SAVED HI QUOTIENT BIT RAL IPUT INTO DIVIDEND LAC Dvn RAL /STORE NEW DIVIDEND OAC DVD JMP OV3 IGO TO ADJUST SIGNS .EJECT PAGE 90 EAr-II Vl6562 06563 06564 06565 (ilJ6566 06567 (lJ0V'10Vl0 707704 70111406 7(ilJQ\401 (,06565 626562 06570 06571 06572 06573 06574 06575 06576 06577 06600 066 0 1 06602 06603 06604 106570 047162 446570 226570 047201 446570 227162 446570 227162 5472 0 1 626570 447162 606576 06605 06606 06607 (ilJ66l-(iIJ 06611 06612 06613 (ilJ6614 06615 06616 06617 0662(iIJ 06621 06622 106605 226605 047162 446605 226605 047201 446605 227162 105314 207162 547201 626605 447162 606614 lOUT PUT ROUTINE FOR TTy (II OTY LEM TLS TSF JMP .-1 JMP .. OTY I IMAKE THREE CHARACTERS OUT OF AN AC WORD IABCD ENTRANCE TO SUBROUTINE IXXXX LHE OF ADnRESS FIELD IIXXXX RHE OF AnDRESS FELD JMS ABCD oAC IACW IS2 ABCD LAC. ARCO oAC TACW# TSt ABCO LAC* IACW# IS2 ABCD LAC* IACW SAO TACW JMP* ARCO ISr IAr:W JMP .-6 I IOCTAl OUTPUT SURROUTINE 10CTOUT ENTRANCE TO ROUTINE IXXXX LHE OF ADDRESS FIELD IXXXX RHE OF ADORESS FIELO I DCTOUT JMS • LAC* OCT OUT DAC IACW IS2 OCTOUT LAC* OCTOUT oAC TACW ISr DCTOUT LAC* IACW JMS OPS LAC IACW SAO TACW JMP* OCTOUT 1St IAr:W JMP .-6 .EJECT . PAGE 91 EAt - I I ~6"'23 06624 06A25 Vl6A26 [1:6627 74"'040 1041A4 RUN 10~024 06631 06632 06633 06634 06635 j\il4140 1(;'14164 Hl5735 104140 106642 447146 60A624 AV'l6624 06636 06637 0664'" 06641 74V'l040 207424 106562 626636 BELL 06642 06643 06644 06645 06646 06647 06650 06651 06652 06653 06654 06655 06656 06657 06660 06661 06662 06663 740040 75V'l004 507353 741200 626642 446663 606654 105412 207425 046663 207426 106562 207427 lV'lA562 207403 10A562 626642 777777 PROK 06664 06665 06666 06667 06670 06671 06672 06673 06674 06675 06676 06677 0670'" 06701 06702 Cil6703 06704 06705 740040 107026 105412 76'5636 10'5225 105345 10'5345 105354 10S354 ?V'lA022 10'5314 105345 206021 lr?l'5314 10'5345 206023 RADDIV ~663~ H~5314 105412 I OKCTR HLT ILOOP SET UP JMS LOOP,) ITE5T WITH CONSTANTS JMS 8EGIN IH~LT LOOP JMS HLOOPL ILOOP SET UP JMS LOOP') ITEST WITH RAN~OMS JM5 EXRAN IJMS HLOOPL JMS HLOOPL JMS PRnK IPASS COMPLETE COUNTER ISl CTCMPT# ILOOP .JMP RUN+1 RUN+1 JMP IBELL AT END OF PASS HLT IRING BELL LAC (2 0 7207 JMS OTY JMP .. BELL IPRINT "OK" AT END OF PASS HLT LAS AND (004000 SNA PROK JMP .. OKCTR IS~ JMP ,+4 TCR (-30) LAC OKCTR DAC LAC (317 OTy JMS LAC (313 OTy JMS LAC (240 OTy JMS PROK JMP .. 777777 ITEXT FOR RAD DIVS HLT /PRINT? JMS PRINT TIN IDIVS FAILED LAW TEXTE TSR TYT TYT TSP TSP IDIVrSOR l.AC RA~2 JMS OPS TYT IC (AC) HIGH ORDER DIVIDEND LAC RAN1 JMS OPS TYT ITAR IC (MQ) LOW ORnER nIVIOEND l.AC RAN3 JMS OPS TCR ICR. LF PAGE 92 EAE-I I 06706 06707 0671V"' 06711 06712 V'l6713 06714 06715 06716 0671 7 06720 0672 1 06722 1216723 1216724 1216725 1216726 06727 06730 06731 06732 06733 06734 06735 06736 1216737 121674121 1216741 06742 06743 06744 06745 06746 06747 105345 105345 765656 105225 HJ5354 105354 207173 10C:;314 105345 105345 207175 1053 1 4 11215345 206156 7412101121 750010 105401 765632 105225 105354 105354 207172 105314 105345 105345 21217174 1053 1 4 105345 206201 740010 750010 11215401 105412 626664 TYT TYT LAW TEXTF TSR TSP TSP LAC QUOTS JMS OP S TYT TYT LAC REMS JMS OPS TYT LAC HARDIV RAL CLA!RAL TOIGIT LAW TEXTO TSR TSP TSP LAC QUOTH JMS OPS TYT TYT LAC REMH JMS OPS TYT LAC DIVCOM RAL CLA!RAL TDIGIT TCR JMP. BADOIV .EJECT IQUOTIENT IQUOTIENT (50FT) ITAB IREMAINDER (SOFT) IGET SFTW LINK ICLEAR AC AND PUT LINK IN AC17 ITYPE IQUOTIENT CHARD) IREMAINDER (HARD> IGET HDW LINK ICLEAR AC AND PUT LINK IN AC17 ITYPE PAGE 93 EAE-II 06750 06751 74(,}04('} 1070?6 ~6752 111'5412 l~6753 76'5576 105225 105412 10'5345 105345 105345 206022 105314 105345 10'5354 105345 206023 105314 105412 105345 105345 105345 765615 105225 765666 105225 105345 105345 207161 10'5314 105345 105345 105345 207164 105314 765632 105225 105345 105345 207160 105314 105345 10'5345 105345 207163 10'5314 105412 626750 06754 06755 06756 06757 06760 06761 06762 06763 06764 06765 06766 06767 06770 06771 06772 06773 06774 06775 06776 06777 07000 07001 07002 07003 07004 07005 07006 07007 07010 07011 07012 07013 07014 07015 07016 Cl!7017 07020 07021 07022 0702~ 07024 07025 BADMUL /TEXT FOR RAD MULS HLT JMS PRINT T 11\1 LAw TEXTS TSR TCR TYT TYT TYT LAC RAN2 JMS OPS TYT TSP TYT LAC RA"J3 JMS OPS TCR TYT TYT TYT LAW TEXTC TSR LAW TEXTF+10 TSR TYT TYT LAC HPRODS JMS OPS TYT TYT TYT LAC LPRODS JMS OPS LAW TEXTD TSR TYT TYT LAC HPRODH JMS OPS TYT TYT TYT LAC LPRODH JMS OPS TCR .jMP .. 84DMUL .EJECT /PRINT? /MULS FAILED, MULTIPLIFR, MULTIPLICAND IMULTIPLIER /TA8 /MULTIPLICAND /HIGH ORDER, LOW ORDER ISOFTWARE IHIGH ORDER PRODUCT SOFT ITAS /LOW ORDER PRODUCT (50 F T) IHIGH ORDER PRODUCT (HARD> /TAR ILOW ORDER PRODUCT (HARD) IRE TURN PAGE 94 EAE - I I 07026 07"'27 07030 07VJ31 07032 07033 VJ7034 f2l7rtl35 rtl7036 07037 07040 rtl7041 740000 750"'04 507254 741200 627026 207026 347321 VJ47026 227026 047026 106636 627026 PRINT I 07042 07043 07044 VJ7045 07046 740040 107026 765674 105225 627042 BALINK I 07047 VJ7050 07051 07rtl52 07053 105412 765420 10';225 147146 606623 FIRST ICHECK FOR PRINTOUT NOP LAS ANI) (4(10000 SNA IPRINT -IMP .. PRINT LAC PRINT TAO (777776 ISU8TRACT 2 OAC PRINT LAC .. PRINT OAC PRINT JMS BELL IFOR BELL JMP .. PRINT IEXIT NO PRINT ITEXT fOR BAD LINK DURING nIVIoE HLT JMS PRINT IPRINT LAW TEXTG IBAO LINK TSR JMP .. BALINK IEXIT IINITIAL TEXT TIN LAW TEXTA TSR Oi!M CTCMPT JMP RUN .EJECT PAGE 95 EAE-II ~7054 07055 07Ci'J5A 07057 07V'!6V'! 07061 07062 07063 07~64 07065 07066 07067 07070 07071 07072 0712173 07074 07075 07076 07077 07100 07101 07102 07103 07104 07H~5 07106 07107 l'J7110 07111 07112 07113 740340 105412 76'S710 10S225 627054 740040 1~7131 105412 207211 10S401 105345 207170 105314 105345 207165 1Ql'?314 105345 207167 507225 105333 107135 627061 740040 107131 105412 207102 74l'J100 607113 207213 10S401 607115 207211 IROUTrNES FOR SIMULATION OF TYPEOUT ISIMlJLATION SETUP HLT SETSIM TIN C(SCA) LAW TEXTH IL C(AC) CCMQ) TSR JMP .. S(TSIM I IPRINT OUT MULTIPLY SIMULATION HLT MULSIM ISTORE AC AND LINK JMS ST~CLK TIN LAC ( 0 ) ILINK=0 TDIGIT TYT I(AC) LAC MP5 JMS OPS TyT I(MQ) LAC MP1 JMS OPS TYT I(SCA) LAC MP3 ANn (000077 JMS TYPC03 IRESTORE AC AND LINK JMS FTACLK JMP. MULsIM I IPRINTOUT FOR DIVIDE SIMULATION HLT DIVSIM JMS STACLK ISTORE AC AND LINK TIN LAC DIVSrM SMA JMP • +4 LAC ( 1 ) TDIGIT JMP .+3 LAC (0 ) .EJECT PAGE 96 EAE-I I 07114 07115 07110 07117 07120 07121 07122 07123 07124 07125 07 126 07127 07 1 30 TOIGIT TYT 105401 H'l1)345 207150 1(ll1)3 1 4 105345 207171 105314 1ri15345 20 7 152 1)07225 105333 107135 627 10 2 LAC ovn JMS OPS TYT LAC QUO JMS OPS TyT LAC DVl AND (0~0077 JMS TYPC03 JMS FTACLK JMP* DIVSIM I(AC) I(MQ) I(SCA) IRESTORE AC ANn LINK I ISTORE AC AND LINK 07 131 07132 07133 07134 STACLK 74111040 047134 627131 000000 I 07 1 35 07136 07137 07140 07141 740040 207131 740010 207134 627135 07205 07206 01207 07210 07211 07212 07?13 07214 07215 07216 07217 07220 1217221 07222 07223 07224 1117225 07226 07227 07230 1117231 07232 07233 07234 07235 07236 07237 000000 070707 252525 707070 525252 000000 777777 11100001 577777 000003 477777 00001217 437777 000017 417777 000037 407777 00111077 403777 00111177 401777 000377 400777 000777 400377 001777 400177 003777 FTACLK XX ILINK STORED IN MSS nAC STACLK+3 JMP* STACLK 0 ISTORE AC IFETCH AC AND LINK I XX LAC STACLK RAL LAC STACLK+3 JMP. FTACLK IGET STORED LINK IRES TORE LINK IRESTORE AC IEXIT I .END .L .L *L .L .L .L .L .L .L *L *L oL .L .L .L .L .L .L .L .L .L .L *L .L .L .L .L nGE 97 E AE - I I 07240 07241 400077 0.07777 G'724? 40.~0.37 0. ;?4:; 07244 07245 07246 07247 07?50 07251 07252 07253 07254 07255 07256 07257 07260 07261 07262 07263 07264 07265 07266 07267 07270 07271 07272 07273 07274 07275 07276 07277 07300 07301 07302 07303 07304 07305 07306 07307 07310 07311 07312 07313 07314 07315 07316 07317 07320 07321 07322 07323 07324 07325 07326 :)1 7 777 400017 '037777 400007 077777 400003 177777 400001 377777 400000 052523 052524 125246 125250 252514 252520 525230 12'5241 252461 252503 525142 125207 252305 252417 524612 125037 251 4 25 252077 523052 124177 246125 250377 514252 120777 230525 ?41777 461252 103777 142525 207777 305252 612525 037776 42'5252 00(1)002 777775 777776 000~05 777773 777772 777774 00vH116 ~L oL oL oL oL oL ~L ~L ~L ~L ~L ~L ~L ~L ~L ~L oL ~L ~L ~L oL oL ~L ~L ~L ~L ~L oL oL ~L .L .L .L .L .L .L .L .L oL oL .L .L oL .L .L .L .L .L *L *L *L *L *L .L *L PAGE 98 EAE-II 07327 07330 07331 07332 07333 07334 07335 07336 07337 07340 07341 07342 07343 07344 0 7 345 07346 07347 07350 07351 07352 07353 07354 07355 07356 07357 07360 07361 07362 07363 07364 07365 07366 07367 07370 07371 07372 07373 07374 07375 07376 07377 07400 07401 07402 07403 07404 07405 07406 07407 07410 07411 07412 1717413 07414 07415 700000 ~25251 252526 1>5;::>5;::>4 525253 677777 377771 337777 024613 140000 525005 777252 002651 253252 40':)476 117162 777700 010000 200000 040000 004000 100000 020000 002000 2014376 204376 740040 204376 000100 004776 777755 204376 004776 005022 204776 205012 20C;017 107061 7401000 107102 151200 000040 17l017l200 000300 ~HH'I240 00171260 17l017l215 17100212 657101 657122 7717lfcHH2J 003466 153501 210762 006063 .L *L *L .L *L .L .L .L .L .L .L .L .L .L *L .L .L .L .L .L .L .L .L .L .L .L .L .L .L .L .L .L .L .L .L .L .L .L .L .L .L .L .L .L .L .L .L .L .L .L .L *L *L .L .L '!!""AGE 99 EAE - I I 07416 00M153 ~7417 6443~1 07420 07421 (,443::>3 ~7422 00'?164 ~0C:;202 0''''423 36~000 ", 74 ~4 20721117 777750 1Il74~, 07426 07427 00~317 0"'~313 *L *L *L *L *L *L *L .L .L *L NO ERR()R LINES PAGE100 EAt -I I ABCD ADDCT 06570 AOVp A"OBUj:"" ASTRIC RADDIV 00203 05110 07143 06664 RAOMUl 06750 RALINK 07042 05024 06636 07144 04342 05052 700004 700044 700001 07145 07146 07147 06464 06244 05360 05201 03517 03537 03557 062ftlJl 06221 03577 03617 03637 03657 06413 06120 REGIN RELL RITCT CKFLAG CLBU F CLOF CLaN CLSF CTADD cTCMPT cTRAN DCRY DCTER DECONT DISC DIVA DIva DIve nIVCOM OIveT DIVD DIVE DIVF DIVG DIVIDE OIVSHT nIVSIM DIVTST DSCl DSC10 DSC11 nSC12 DSC13 nSC14 nSC15 nSC16 nSC17 DSC2 nSC20 nSC21 nSC3 nSC4 nSC5 nSC6 nSC7 .~ED 07l4~ ~7102 03477 02255 02435 024S;5 0~475 02515 02535 0~555 02575 02615 02275 02635 02655 02315 02335 02355 02375 02415 03755 06443 'PAGE101 nSP2 nSP3 !lSP4 nSP5 nSP6 nVCMER nvn nvs nVl nV2 nV2A nV3 nV4 nV5 FAEDON [RFLAG FRR8IT FRWOR FXOIV EXMUL EXRAN FACT FIAC FILHLT FILlER FIMQ FIRST FTACLK HARDIV HARMUL HDIVID HDIVL HLOOPL HLOOPM HLOOPS HLTL HLTM HLTS HMPY HPRODH HPROnS IACW TOIVS lOR TOR8UF KR8 KSF LENGTH LOOKUP LOOPA LOOPL LOOPM LOOPS LOOP2 :_ OOP<; EAE-l I 06465 06453 ~6523 vHJj ,\ 1 ~6')46 06216 07150 07151 ~71'5(: 06446 06461 ~6527 06432 '1'6424 '1'7153 '1'7154 07155 '1'4376 06136 05765 '1'5735 '1'5'1'47 '1'7156 04264 04250 07157 07047 07135 06156 '1'6'1'75 '1'6316 06325 '1'4140 04134 04130 04220 04212 04202 06330 07160 07161 07162 657323 04166 05144 700312 700301 05023 0~Ql31 04122 04143 04234 04226 04157 04162 PAGE1e12 LOOP5 04164 LPROOH 07163 LPROOS 07164 MPSIGN 06400 MP2 06407 MP1 07165 MP2 Vl7166 MP3 07167 MP4 06363 MP5 07170 MSC 05163 MSPEED 03701 MULA 0~357 MULB 03377 MULC 03417 MULCOM 06105 MULCT 062r;6 MULD 03437 MULE 03457 MULSHT 05747 MULSIM 07061 MULT 06340 MULTST 03337 NDIV 00707 NDIVS 01020 NEAB 00360 NEAE 00246 NFRD I V . 01347 NFRDVS 01457 NIDIV 01127 NIOIVS 01237 NMUL 00467 NMULS 00577 OCT OUT 06605 OKCTR 06663 OPS 005314 OPT 005314 OTY OVRFLO PCF PRINT PROK PSA PS8 PSF QHIB QUO QUOTH QUaTS RAN RANCON RANOEX RANT AD NT8L N1 I 06562 06550 700202 070:?6 06642 700204 700244 700201 06475 07171 07172 07173 06007 06051 06052 06041 06053 06021 'PAGE 103 t AE- I I RAN2 06022 ;'6023 RAN3 04363 RBCW ReF 70~~102 ROGEN 06024 ~7174 REMH REMS 07175 RNO 0tJ020 RR8 700112 RSA 700104 RSA 700144 RSF 700UH RUN 06623 RWRK 06064 SCAN 04315 SET81T 04301 SETSIM 07054 SETUP 04347 SHeTl 01571 SHCT10 01760 SHCTll 02001 SHCT12 02022 02043 SHCT13 02064 SHCT14 SHCT15 02105 SHCT16 . 02126 SHCT17 02147 SHCT2 01612 SHCT20 02170 SHCT21 02211 SHCT22 02232 SHCT3 01633 SHCT4 01654 SHCT5 01675 SHCT6 01716 SHCT7 01737 SIGNA 03001 SIGNS 03025 SIGNC 03051 SIGND 03121 SIGNE 03145 SIGNF 03171 SIGNG 03241 SIGNH 03265 SIGNI 03311 SOFOIV 06170 SOFMUL SPAC SPACE2 SPMunv STA8UF STACLK STDIVS STEMA STFM8 06065 05354 05406 04035 05064 07131 02755 07176 07177 PAGE104 STFQVS STIDVS STMUL STMULS SVCg SVCRY SVC0 SVCl SVC1A SVC2 SVC3 SWIT6 SWIT7 TACW TAOBUF TCF TCR TDIGIT TEM TEMY1 TEXTA TEXTB TEXTC TEXTO TEXTE TEXTF TEXTG TEXTH TEXTI TEXTJ TIMTEX TIN TLS TSF TSP TSR TYCRLF TYPCHR TYPCON TYPC03 TYPOCT TYPSAV TYPTSR TYPTYT TYT WORDA X8AD EAE- I I 03215 03075 0?677 0?716 06503 07200 06476 06510 06504 06513 06516 04151 04242 07201 05126 700402 105412 105401 07202 07203 05420 05576 05615 ClJ5632 05636 05656 05674 05710 05724 05725 06306 105412 700406 700401 105354 105225 05412 05250 05314 05333 05401 05307 05225 05345 105345 04776 07204 f)AGE107 IOR8UF MSC f")ISC TYPTSR TYPCHR TYPSAV QPS OPT TYPCON TYPC03 TYPTYT SPAC DECONT TYPOCT SPACE2 TYCRLF TEXTA TEXT8 TEXTC TEXTD TEXTE TEXTF TEXTG TEXTH TEXTI TEXTJ [XRAN MULSHT rXMUL RAN RNO RAN1 RAN2 RAN3 RDGEN RANTAD RANCON RANDEX RANTBL RWRK SOf"MUL HARMUL MULCOM I')IVSHT f"XDIV HARDIV SOf"DJV f)IVCOM nVCMER nIVCT nCTER MULCT TIMTEX HO I V1'- HD I V\ EAE-I I 05144 ti.!'5163 0'?2ti.!1 0")225 ti.!")250 0531217 1211215314 01215314 05314 05333 05345 1215354 05360 0541211 121541216 ti.!5412 05420 1215576 1215615 05632 05636 05656 05674 121571121 1215724 1215725 05735 1215747 05765 ti.! 6 121121 7 12161212121 0612121 121612122 121612123 0612124 121612141 06051 1216052 0612153 121612164 121612165 0612175 0611215 1216120 06136 06156 0617121 06201 06216 06221 06244 1216256 121631216 06316 1216325 PAGE108 EAE - I I HMPY MUL T MP4 MPSIGN MPr 0£>330 06340 06363 06400 06407 nIvIOE 06413 nv~ 06424 06432 06443 06446 06453 06461 06464 06465 06475 06476 06503 06504 06510 06513 06516 06523 06527 06531 06546 06550 06562 06570 06605 06623 06636 06642 06663 06664 06750 07026 07042 07047 07054 07061 07102 07131 07135 07142 07143 07144 07145 07146 07147 07150 07151 07152 07153 07154 07155 nV4 nSP1 nV? nSP3 f1V2A nCRY nSP2 QHIB SVC0 SVr:B SVr:1 A SVC1 SVC2 SVC3 nSP4 OV3 OSP5 OSP6 OVRFLO OTY ABCD nCToUT RUN qELL PROK OKCTR 8 ADOIV BADMUL PRINT 8ALINK FIRST SETSIM MULSIM DIVSIM STACLK ~TACLK AOOCT ASTRIC RITCT CTAOO CTCMPT CTRAN OVO OVS nVl EAEDON .~ 'PAGE109 FIAC FIMQ HPRODH HPROOS IACW LPRODH LPRODS MP1 MP2 MP3 MP5 QUO QUOTH QUOTS REMH REMS STEMA STFM8 SVCRY TACW TE~ TEMY1 XBAD TSR TYT TSP TDIGIT TCR TIN IDIVS CLSF CLOF CLON RSF RCF RSA RR8 RSR PSF peF PSA PSR KSF KRR TSF TeF TLS EAE-I I 07156 071'17 ~7160 Vl71A1 Vl7162 07163 ~7164 07165 07166 07167 07170 07171 07172 07173 07174 07175 07176 07177 07200 07201 07202 07203 07204 10~225 105345 105354 105401 105412 105412 657323 7001211211 7121012104 71210044 700HH 71210102 71210104 7vHH12 700144 712112121211 700202 70021214 71210244 71210301 7121121312 71210401 700402 700406
Home
Privacy and Data
Site structure and layout ©2025 Majenko Technologies