MAINDEC 11 D0QD_T17_SYSTEM_EXERCISER_Feb71 D0QD T17 SYSTEM EXERCISER Feb71
MAINDEC-11-D0QD_T17_SYSTEM_EXERCISER_Feb71 MAINDEC-11-D0QD_T17_SYSTEM_EXERCISER_Feb71
User Manual: MAINDEC-11-D0QD_T17_SYSTEM_EXERCISER_Feb71
Open the PDF directly: View PDF .
Page Count: 72
Download | |
Open PDF In Browser | View PDF |
IDENTIF"ICATION pRODUCT CODE: MAINDEC"11-DI1'JQD pRODUCT NAME: T17 SYSTEM EXERCISER (WITH CORE EXPANSION) DATE CREATED: rEB. 1971 MAINTAINER: DIAGNOSTIC GROUP AUTHOR: JOHN HITTELL ,MAINOEC ... PAGE 2 ABSTRACT THIS PRCGRAM IS A CORE EXPANDABLE INTERACTIVE 8U~ EXERCISER FeR A PAPE~ TAPE ORIENTED 1'01'-11/20. IT PERrORMS A TEST or INSTRUCTIONS AND CONCURRENT OPERATIONS or 1/0 EQUIPMENT SIMU~TANEOUSLY. IT MAY ALSO PERFORM T~E SAME OPERATION INDEPENDENTLY. THIS PROGRAM IS NOT TO 8E CONSIDERED A TOTAL CHECK or THE SYSTEM. If AN ERROR IS DETECTED INAN 1/0 DEVICE, IT WILL PROBABLY BE NECESSARY TO CORRECT THCMALFUNCTION WITH THE RESPECTIVE DIAGNOSTIC FOR THAT DEVlcr. REQUIREt-IENTS EQUIPMENT 1'01'-11/20 STANDARD COMPUTER OPT I ONAl HARDWA;RE THAT THE "ROGRAM WILL EXERC 1SE MM11 RFll Tell KE11 KW11l PCll KLll lPl1 uP TO 2!8KW or MEMORY DISK (256K) OECTAPE-TRANSPORT lERO £XTENDED ARITHMETIC UNIT LINE CLiOCK HIGH SPEED READER/PUNCH ASR33 OR ASR35 TELEPRINTER LINE PRINTER STORAGE PROGRAM STORAGE • THE ROUTINE USES rROM 0000 TO 17476. ~EMORY LOADING PROCEDURE METHOD PROCEDU~[ rOR NORMAL ABSOLUTE TAP[S SHOULD ~E FOLLOWED. MAINDEC .. PAGE 3 4. STARTING PROCEDURE 4.1 CONTROL SWITCH SETTING STARTING AT SA 4.2 20~ ALL SWITCHES SHOULD BE SET AS INDICATED. STARTING ADDRESS OR ADDRESSES (A) (8) ec) (D) 200:: SR = 000777 200 = SR = 001777 CORE EXPANSION 200 = SR : 002XXX 200: SR = 000000 1/0 DEVICES TEST PROCESSOR ONLY-WITH CORE EXPANSION TEST PROCESSOR ONLY-4K-INHIBIT TEST 1/0 ONLY -CORE EXPAND AND TEST ALL AVAILABLE Sw0 = 1 INHIBIT TTY OUTPUT SWl : 1 INHIBIT lTY INPUT SW2 : 1 INHIBIT HSP SW3 = 1 INHIBIT HSR SW4 = 1 INHIBIT L, I NE CLOCK sw5 : 1 INHIBIT P.Fl1 0151( (256K) SW6 = 1 INHIBIT ,'Cl1 DECTAPE SW7 II: 1 INHIBIT L,INE PRINTER --- IF" LINE PRINTER IS USED, MUST RESTART AT 400 IF EAE EXIST IT WILL BE AUTOMATICALLY SELECTED 4.3 PROGRAM ANDIOR OPERATOR ACTION LOAD PROGRAM INTO MEMORY. SET SWITCH REGISTER TO STARTING ADDRESS. LOAD ADDRESS. SET SWITCHES TO INHIB1T NDN'rXISTANT-oEVICES PRESS START. THE PROGRAM WILL LOOP AND BEll WILL RING ONCE PER PASS OF THE PROGRAM. A MINIMUM OF TWO PASS£S SHOU~D ALWAYS BE RUN. MAINOCC. PAGE 4 5. OPERATiNG PROCEDURE 5.1 OPERATIONAL SWITCH SETTINGS 5.1.1 AT SA 20~ THE INSTRUCTION AND LOGIC TEST. WITH ALL SWITCHES DOWN THE PROGRAM WILL TEST ALL DEVICES AND PRINT OUT ON ERRORS AND CONTINUE IN TEST. (BELL WILL RING AT COMPLETION OF A PASS) 5.1.2 SWITCH SETTINGS ARE I. SW15 :: 1 OR uP SW14 :: 1 OR uP SW13 :: 1 OR UP SW12 :: l OR UP SW11 :: 1 OR UP SW1~ :: 1 OR uP SW09 :I 1 OR UP IoIALT ON ERROR SCOPE LOOP INHIBIT PRINTOUT INHIBIT TRACE TRAPPING INHIBIT ITERATION LOOP INHIBIT PROCESSOR TEST INHIBIT VARIABLE CORE EXPANSION 5.1.3 5.2. SUBROUTINE ABSTRACTS BEGIN 5.2.2 SA 200 SCOPE THIS SUB~OUTINE CALL IS PLACED BETWEEN EACH SUBT£ST IN THE INSTRUCTION SECTION. IT RECORDS T~E STARTING ADDRESS OF EACH SUB-TEST AS IT IS BEING ENTERED. IF A SCOPE LOOP IS REQUESTED, IT WILL JUMP TO THE START OF THE SUBTEST THAT THE SCOPE LOOP IS REQUESTED FOR. IF SCOPE LOOP IS NOT REQUESTED, THERE WILL BE EITHER A FIXED OR RANDOM NUM8ER OF ITERATIONS ON THAT SUBTEST BEFORE THE NEXT SUBTEST IS ENTERED. SWITCH 11 ON A 1 INHIBI·TS ITERATION OF SUBTESTS. "5,2.3 HLT IS A ROUTINE THAT PRINTS-OUT AN ADDRESS T~AT TAGS THE FAILING SU8t[ST, AND THE STATUS REGISTER AT THE TIME DFTHE FAILURE. 5.2.4 TRTRAP THIS ROUTINE WILL ALLOW THE TRACE BIT TRAP TO BE SET AFTER FIRST LOOP OF THE PROGRAM. UNDER NORMAL TESTING THE TRACE BIT WI~L BE SET ON ALTERNATE LOOPS OF THE PROGRAM. WHEN SET IT CAUSES A TRAP AFTER EACH INSTRUCTION. THE FIRST INS TRU:CT ION EXECUT ED UP 0 N TRAP PIN GIS AN" RT I" W1,,11 CH RET URN S TO THE INTERRUPTED SEQUENCE OF INSTRUCTION. THIS SEQUENCE IS CONTlNUED TILL THE END OF THE PROGRAM LOOP IS REACHED. MAINDECPAGE 5 (5. OPERATING PROCEDURE CONT'D) 5.2.5 TRAPCATCIo4ER THIS IS A SERIES OF INSTRUCTIONS STARTING AT LOCATION 0, DESIGNED TO DETECT, AND ISOLATE UNEXPECTED TRAPS AND INTERRUPTS TO THE TRAP AND INTERRUPT VECTOR AREA OF MEMORY. THE PRINCIPAL OF THIS ROUTINE IS: THE VECTOR ENTRANCE ADDRESS POINTS TO THE NEXT SEQUENTIAL WORD WHICH CONTAINS A ~ALT (00000). (THIS LOCATION IS ALSO THE STATUS FOR THAT VECTOR ENTRANCE, BUT THIS HAS NO EFFECT ON IT ALSO BEING THE NEXT INSTRUCTION). IF A HALT OCCURS IN THE TRAP OR INTERRUPT VECTOR AREA, REGISTER SIX SHOULD BE EXAMINED TO DETERMINE ITS CONTENTS, T~EN USE REGISTER SIX CONTENTS AS AN ADDRESS TO DETERMINE THE LOCATION WHERE THE PROGRAM WAS AT, W~EN THE INTERRUPT OR TRAP OCCURRED. (MEMORY AS SPECIFIED BY R6 CONTAINS T~E PC OF THE INSTRUCTION FOLLOWING THE INSTRUCTION WHERE THE TRAP OCCURRED). 5.2.6 TTYINl (TTy INPUT) THIS ROUTINE OPERATES IN THE INTERRUPT MODE AND CHECKS FOR A COUNT PATTERN IN THE READER OF THE TTY. THE ROUTINE WILL ACCEPT AN tNFtNITE NUMBER OF ~ERO BYTES (BLANK TAPE). BUT THE FIRST ByTE THAT IS NOT A ~ERO MUST BE A ONE AND ALL SEQUENTIAL BYTES MUST BE ONE GREATER. IF THE ROUTINE DETECTS AN ERROR IN THE COUNT PATTERN, IT CHECKS TO SEE IF IT IS A 207 (BELL). IF SO IT IS IGNORED, IF NOT A COMPARSION ERROR IS FLAGED. 5.2.7 TYOUT (TTY OUTPUT) THIS IS A ROUTINE THAT OUTPUTS A COUNT PATTERN IN THE INTERRUPT MOOE TO THE TELEPRINTER. IF A PAPER TAPE IS'PUNCHED IT MAY 'HAVE 201'S (BELLS) IN IT. PUNCHED WHEN THE BELL FOR PASS COMPLETE RINGS. 5.2.8 RFSTART (RF-i1 DISK) THIS ROUTINE PERrORMS A WRITE AND A WRITE CHECK OF THE DISK. THE DATA THAT IS WRITTEN ON THE DISK IS PART OF TEST PROGRAM CODE THAT IS NEVER MODIFIED. THIS SEGMENT Or CORE IS WRITTEN IN CONTIGUOUS BLOCK THRU T~E DISK MEMORY, AFTER THE TOTAL DIS~(S) ~AS BEEN WRITTEN, A WRITE CHECK IS USED TO VERIFY THAT THE DATA HAS BEEN ~RITTEN CORRECTLY ON THE DISK, NOTE T~AT NO "DATI" ARE USED IN EXERCISING THE DISK (DATA IS NOT TRANSFERRED INTO CORE>. THERE IS A LOCATION IN THE PROGRAM THAT IF MODIFIED wILL ALLOW ExERCISING UP TO EIGHT DISKS. MA1~pEt PAGt" 6 5.2.9 rEND~ ,(TCll FORWARD END 20NE) IS THE FIRST ADDRESS IN THE DECTA~E INTERRUPT (214). THIS ROUTINE wILL READ· :~ REVERSE, BLOCK ~UMBERS UNTIL THE REVERSE END tONE IS FOUND. AT THIS POINT THE INTERRUPT VECTOR AND COMMAND REGlSTER ARE MODlrIED TO READ ALL BLOCK NUMBERS I~ THE FORWARD DIRECTION, EACH BLOCK NUMBER READ IS COMPARED WITH THE EXPECTED BLOCK NUM" 8ER COUNT AND MI5COMPARISONS REPORTED. WHEN EACH BLOCK IS FOUND (WITH THE EXCEPTION OF BLOCK 0) A BLOCK (400 WORDS) OF TEST DATA IS WRITTEN ONTO TAPE. AFTER ALL BLOCK NUMBERS HAVE BEEN READ THE TAPE IS DRIVEN INTO THE FORWARD END tONE. HERE THE DIRECTION IS REVERSED AND ALL BLOCK NUMBERS ARE READ IN REVERSE. STARTING WITH BLOCK 1100 THROUGH BLOCK 1 THE DATA IS READ FROM TAPE. T~E SAME BUFrER IS USED FOR BOTH READ AND WRITE OPERATIONS. THE DATA IN THE BUFFER IS CHECK~ SUMMED DURING THE READ OPERATION. IF THE DATA-BUFFER IS DESTROYED DURING A READ OPERATION IT MAY BE NECESSARY TO RELOAD THE PROGRAM. FENO~ VECTO~ 5,2,10 LCLK (LINE CLOCK) THIS TEST OF THE LINE CLOCK IS IN THE INTERRUPT MODE. IF OPERATING CORRECTLY THE SYSTEM I/O wILL RUN A FULL SPEED rOR '5 SECONDS THEN ALL 1/0 AT LEVEL FOUR OR LESS WILL STALL FOR 5 SECONDS. THIS IS BASED ON 6~ CYCLES AS THE LINE FREQUENCY, 5.2.11 LPl (LINE PRINTER) THIS ROUTINE OUTPUTS TO THE LINE PRINTER IN THE rLAG MODE WHILE rILLING THE BurF£R IN THE INTERRUPT MODE WHILE THE BUFrER IS BEING PRINTED, 5.2.12 HSRINl (PCll INPUT) THIS ROUTINE OPERATES IN THE INTERRUPT MODE AND CHECKS FOR A COUNT PATTERN IN THE PCll READER. THE ROUTINE WILL ACCEPT AN INFINITE NUMBER OF lERO ByTES (BLANK TAPE). SUT THE rIRST BYTE THAT IS NOT A ~ERO MUST BE A ONE AND ALL SEQUENTIAL BYTES MUST 8E ONE GREATER. IF THE ROUTINE DETECTS AN ERROR IN THE COUNT PATTERN, A DATA ERROR IS FLAGED. 5.2.13 HPOUT (PCll OUTPUT) THIS IS A ROUTINE THAT OUTPUTS A COUNT PATTERN IN THE INTERRUPT MODE TO THE HIGH SPEED PUNCH. 5.2.14 CORE EXPANSION (OET1) THIS ROUTINE IS CONT~OLLED BY SWITCH 9. THE PROCESSOR MAINLINE CODE WILL 8E EITHER 4KW OR EXPANDS TO THE MAXIMUM CORE THAT IS AVAILABLE. THE ROUTINE DETERMINES THE MAXIMUM CORE SIlE BY DOING A "DATO" TO A LOCATION IN EACH BANK. IF THE BANK DOES NOT EXIST, A TIME OUT WILL OCCUR. WHEN CORE SIlE IS DETERMINED AN IMAGE OF BANK 0 IS TRANS· FERRED TO EACH EXISTING BANK. THEN THE CODE IN EACH BANK IS MODIFIED SO THAT, WHEN THE LAST SUB TEST IN A MEMORY BANK IS EXECUTED THERE IS A JUMP INSERTED TO THE FIRST SUB TEST OF THE NEXT BANK. WHEN IN THE LAST BANK THE MODIFIED INSTRUCTION WILL TRANSFER yOU TO BANK 0. THE LISTING SHOWS ONLY THE CODE OF BANK ~ERO. WHEN AN ERROR OCCURS THAT IS NOT IN BANK ~ERO, IGNORE THE BANK BITS OF THE PRINT OUT AND USE THE LISTING FOR BANK ~ERO. 5.3 5.3.1 PROGRAM AND/OR OPERATOR ACTION LOADING AND STARTING AT 200 WITH ALL SWITCHES DOWN IS WORSE CASE TESTING. IF AN ERROR IS DETECTED HERE. THERE WILL 8E A PRINTOUT. WHEN AN ERROR IS DETECTED AND IT IS NECESSARY TO SCOPE ON IT, PLACE SW15 UP TO HALT ON ERROR, THEN SW14 UP TO LOOP ON ERROR, THEN SW13 UP TO DELETE PRINTOUTS. WHEN TESTING THE HSR OR TTY READER THE TAPE ~UST HAVE A COUNT PATTERN AND BE LOCATED ON THE LEADER PORTION WHEN STARTING TEST, M.A I N.00456 000460 t'e046? 0327i'7 0014ei l 1040e0 1044eeJ 0146 4 ~12706 ~~47~ 0rr10005 '~472 052777 032777 lC50l 177556 016756 3001r0 17 7 524 000100 177516 START: MOV *l,ICOUNT #BUFF,%6 ;SET UP MOV .START2,RETURN MOV CLR SCOPEF #341fJ,STAT"US MOV CLR PRF"LAG SCOPE #100,\lTTCSR START2: 8IS RESET #100,tlTTC5R 8IT BEQ .+4 HLT SCOPE :00[5 "RESET" ON THE BUS LAST TOO LONG MOV #8UFF,"6 RESET 81S #100,tlTTCSR BIT tt100,6ITTCSR STA~K JLO~K OUT INTERRUPTS ,PRINT ROUTINE BUSY 'INTERRUPT E~ABLE 'RESET DID NOT CLEAR INTERRUPT ENABLE ,SET UP STACK ,SET A BIT lIS IT SET ""L x'il1 ~~0'5,f~ 00'~51~ 000'51,2 v0i3~ 000532 000536 00'0'54 '4 00055 2 00056:0 00056'6 1 0~H2'5 i4 00060!2 0006~16 0157;)0 0e021l4 #8EGIN,RETUR\J v.C v' TST ~MQ 00~0'H ~00540 ~OV 000000 000001 000000 016756 000600 00121656 000752 MOV MOV MOV MOV CLR ""OV BIT BNE SIS BIT ekH~746 00011('1 177354 177344 176702 000004 000100 177324 177334 176656 00'0010 "12767 052777 000100 000101 000'634 177276 0121073:2 00074'0 00074'2 00074 6 000754 100076;2 00e764 01210'772 00077'6 0010,,4 00HH2 001020 e121026 ;101030 036727 001005 005067 052777 036727 IiHh016 012767 10'5277 016777 01677/ 116777 ,,36727 0e1011 012767 176632 000020 000732 00010[.;1 176610 177264 ~~01036 HI 4' 4 ST1: BNE ST2: BIS TST 8MI BIT BNE ST3: 0121~040 043503 171264 001172 001162 001152 176544 12101176 012771 002176 002206 ~01052 012777 036727 176512 00'1146 177254 177234 00'0200' ~~ 00'4H~3 010 6 ~ 001~3e: 001062 vJ01071? a127b7 ~'01142 ~12"1t-7 'v.0~·137 ~~~h17 012707 000117 n " av "'OV "10V 17724~ 177234 177366 000'0'02 0~ J R'ES£T IS ON S'US TO'O: LONG ~ESET (;1037521 ((00366 177526 000006 000002 000100 176726 1 • +4' SCOPE 177156 00121001 (~1006 1-4* ~Lr 000342J 176744 i PAtGe BNt: 112l44~00 00061:2 00062:0 00062'6 0121063 '0 00063 6 00'0644 00064:6 00065 i4 000660 000662 000670 000672 00070'0 00070''4 0121070'6 0~0' i'4f' 00121716 00072A e0052;4 1 J":'iti' ~0H~:01 104~"0 0 0e0005 012767 e!12} Yl 005777 i.127 6 7 012'16'1 012767 0'12767 012767 012767 012706 121:05067 0'12767 036727 001003 052777 036727 001003 052777 005777 100'407 036727 001003 052777 005777 100412 036727 01tH~514 200516 1.(-rrEf.. 7f 5T4: BIS TST 8MI 8IT 8NE MOV 8IS SIT 8NE CLR 815 ST5: BIT 8NE MOV n~C8 17725e 177244 177240 000100 "10V MOV MOV8 S'!'6: 81' 9NE "10V ~OV S"'7: ,~tl4 #6,4 #2,6 #1,DATA1 #0,OATA2 #1,DATA3 #0,DATA4 #8UFF,%6 DELAY #341Zl,STATUS SR,#l STl #100,'TTCSR SR,#2 ST2 #101,@TRCSR lilHPCSR ST3 SR,#4 ST3 #100,'HPCSR ttHRCSR ST4 SR,#10 ST4 #100,DELAY ;TES'" "OR EAE ;TRAP I I=' ~::NEXISTANT ; • +2=~AL. r J A'~ RTI rOR NON EXISTENT 1/0 ISASE DATA rOR TTV READER OR KEVBOARD ISASe: DATA F"OR TTV PUNCH OR TE LEPR t NH"R ,BASE DATA F"OR HSR lSASE DATA F"OR HSP #11'1"~HRCSR 5R,#20 ST5 TIME #100,'LKCSR 5R,#40 ST6 #43503,FUNCTION ~RF'CSRH WORDCT,~RFWC LL I MIT ,(ilRFCAR FUNCTION,ilRFCSR SR,#100 ST7 #TCFIRST,TCEXPE ttFENDr.'TCIV ~OV #R+IE+RB+DO.~TCCM aIT SR,#2Ql0 ST8 #ST8,4 #137,SOLI'AT #79 •• CLINCT 8NE 176714 000752 000746 tfNOEAE ~OV ~av >,10 V ;F"OR READER STALL ... HSR ILOCK OUT INTE:RRUPTS - ,TTv OUT 'TTV IN ,'rEST FOR OUT OF TAPE 'I-IS? .TEST F' OA' OUT or TA!'!: Jr.-OR STAL.L HSR ;I-ISR ILINE CLOCK 50 OR 60 CYCLES :WRITE C~IECK/WR I n: ,INJTIA:"ltE 'j ISK"'OAR', DAF iLENGTH OF' T~ANSF'ER ;CORE ADDRESS or START C"F' 'o,A\SFFR ;TELL DISK TO READ OR WRITE J2ND NPR TEST CR IFIRST Bl.OCK Sf-IOULO BE trR2 IGO TO END H'I"lE ON I fI.!TERr:;UJ: lMOVE REVERSL I LINE PRINiER iDON'T IRESET '- T "-iE C~UNGE ~CP ('OUf" 2 p; :.~.~ START OF L I '" ;, ~\I PAL Xli V003 ~tH104 012767 00e137 001112 e:e1120 012737 012777 001726 e00014 l01126 ;"0113 4 012731 012777 0002~0 000734 000200 17 7 116 000202 00~11~ 1771e0 ;'e1142 Ze1146 005~67 176643 012767 ~0~:076 005"3} 015542 004737 016762) 015572 ,~01204 004767 042767 016767 000401 e01206 000001 e012H~ 036727 ;?~H216 001373 001220 000167 eliH224 00012100 ;)01154 e01160 e01164 001170 001176 F'AGE 1-5 14-F"EB-71 176630 000340 176600 176366 ~HHHl20 176354 0020210 002524 MOV MOV MOV MOV "IOV 5T8: CLR MOV CLR JSR JSR SIC MOV BR MAINLINE: BIT ANE jMP. REG1: " tH37, CURPAT #LPiNTR,,*200 #14,@LP09R #200,'#22'2 tt100,~LPCSR 6 #6,4 ~#TRP9 "7,~#USER %7,OETl t;t340,STATUS SR,REG1 ,INTERRUPT VECTOR JLINE FEED TO POSITION BuF"FER JPROCESSQR LEVEL 4 :INTERRUPT ENABLE :HALT F"OR BUS ERROR ,SET UP TIME OUT iNO "T" BIT F"IRST PASS JF"OR USER 1/0 PROGRA~ ,CHECK FOR CORE EXPANSION :ALLOW INTERRUPTS ,SAVE SWITCIoI ,+4 WAIT SR,#2000 ,WAIT HERE FOR INTERRUPTS :INHIBIT PROCESSOR TEST ~AINLINE BEGIN ,STATUS OF SELECTED DEVICES iTTY RECEIVER VALUES 0 TO 377 e01226 001234 012767 005277 e~1240 000,~e2 001242 105177 100401 e;01246 001250 001252 elZ1256 e01260 00r2!064 176752 TTYIN1: MOV TTYIN2: INC RTI TTYINR: TS T9 8MI 105 7 77 201 7 66 176744 127 7 67 176736 000032 0002(n 176124 TST9 8EQ CMPS SEQ CMP BEQ 001405 022:7 77 11'01403 ~e1300 104'~00 e01302 005267 022/67 ~01314 001:547 e01316 011HP 4 3 IltTRCSR ,TRDR TTYIN2 ,TROR,DATA1 TTYIN3 .207,'TROR TTYIN4 ~LT 000012 00040-0 0~H?l~HH TTYIN3: INC TTY!N4: CMP 8NE 8R DATAl: ,BASE DATA ,START READER ,RETURN TO MAINLINE ,IS DONE SET ,+4 ~LT 104'~e0 ekH 266 001270 001276 001306 00e'0211 176760 DATAl #400,OATA1 TTYIN2 TTYIN1 ,FALSE RETURN FROM MAI~LINE ,TEST DATA FOR LEAOER JIF LEADER GO BACK 'NOT LEAOER TEST rOR DATA ,BELL? .DATA COMPARISON ERROR 'INCREMENT DATA ,TEST FOR UPPER LIMIT 240 iTTY TRANSMITTER PRINT VALUES 0 TO 377 001322 012i67 ee1330 016}77 012'1336 ~HHHH~2 e01340 e0134 4 105777 ?e1346 le4w~f0 005,~6 7 ~0e(i!12 022 7 c7 Ql01C' 4 ,;:e1350 101354 ;21362 L' ~ 13 6 4 0000(?13 000C32 176660 1~,,"!J4e1 001 ~'5 7 0007t-l ~~ V' 000036 176670 TYOUT: MOV TYOUT1: MOV RT I TYOUTR: TST8 8MI HLT INC CMP BEQ 8R #0,DATA2 DATA2,lITTD8R caTTCSR ,+ 4 OATA2 #4~e,!)ATA2 TYOUT T y Ol' T1 JINtTAL OATA ,OUTPUT TO DEVICE ,RETURN TO MAINLINE JTEST FOR DONE ,BRANCH IF FLAG rou~o .FALSE INTERRUPT RETURN J INCREMENT DATA JTEST DATA F"OR UPPER ~I~IT ;AT UPPER LIMIT START OVER JFINISH REST o~ OATA 767 2e1370 ~12 ?e137~ ~F?27/ ;'21402 ,;..e1404 ~e 1 1766'26 I-ISRY\il: '-OV I-ISRI\J2: INC 17662Q! >4 SRI \ R: 0~H?2'~ U~1410 001 4 12 10400~ 01211414 ?01420 105777 176612 ZiZ1 4 22 001766 127767 176604 v'01430 0~1401 e01434 1040Q!\!l 005267 0~~012 0'2"2~7 e·~04e,",0 221434 l'Ht.4"0" 0e1446 'H?1450 :nr 0e'.""' 2 105777 100401 67 T5 r 8 8MI #l,D.6oTA3 I 8"A SE ~HRCSR JSTART READER 'RETURN TO MiINLINE ; IS DONE SET @lHRCSR • +4 HL" T T5T8 8EQ CMPB 001353 000747 DATA3: 0 A T ,A taHRDBR HSRJ:N2 (i)HRDBR,DATA3 8EQ ~L T ,+4 INC CMP 8NE 8R D.6oTA3 #4"'h DA T A3>0 HSRIN2 HSRXNl ,FALSE RETURN FROM MAINLINE 'TEST DATA FOR LEADER .IF LEADER GO BACK 'NOT LEADER TEST FOR DATA .DATA COMPARISON ERROR J INCREMENT DATt, ,TEST FOR UPPER LIMIT 24k' 005067 012l.0-~2-6 000024 201536 056777 005267 e'01542 001550 022767 0e1741 0004Z0 001552 000743 ;HS PUNCH SECTION, VALUES 0 TO 377 ;ENA2LE READER ON FIX COU~T OF PUNCH ONLY (14 TIMES) HPOUT: MOV #0,O.6oT.604 J INITAL DATA HPOUT1: MOV D.6oTA4,~HPOBR .OUTPUT TO DEVICE RTI ;RETURN TO MAINLiNE HPOUTR: TST8 ~HPCSR JTEST FOR DONE 8MI ,+4 .BRANCH IF FLAG fOUNO HLT .FALSE INTERRUPT RETURN BIC DELAy,taHRCSR ~CLEAR HSR INTERRUPT ENABLE INC INTeNT 'COUNT INTERRUPTS CMP INTCNT,#14 lSAVE TO TURN READER ON? 8NE HPOUT2 INO~NEED MORE TIME CLR iNTeNT ~YES R:SET C~UNTER ;SET REAOER tNT ENABLE 815 OELAY'~HRCSR HPOUT2: INC DAT,tt4 J INCREMeNT DAT,~ CMP #400,OATA4 ,TEST DATA rOR UPPER ~i~I; BEQ HPOUT JAT UPPER LIMIT START OVER 8R HPOUTl IFINISH REST O~ DATA 001554 201556 2100240 2100000 00000121 OAT A4: 240. INTCNT: ~ DELAY: 0 001454 001462 ~~e1470 ~01472 e01476 2112767 016777 000072 176546 000002 105777 100401 176536 ?0150~ 104000 00150~ 046777 ~0~052 001510 QHZl5267 000042 ~12I1514 026727 0'HH~36 e01522 001005 001524 ee1530 l0156~ Qlk)5067 052777 000100 1il?2767 000002 105777 00C100 £2.1.~H~ c:' J 1612 ."~1614 12142""'77 005267 022767 ," 216 26 176472 ~kHHH2 le1562 ;:'01566 201574 ?01602 ;e1604 ~'el~2i2 176520 iEQUAL 100 ;TEST OF LINE CLOCK, INTERRUPT FOR 55 SELONDS THEN STA~L FOR 5 srCO~DS. CLR TIM E J CL £' AR ~. I NE CL ~; ; ' TIM E C LK1: 000112 815 #100,LiLKCSR BIS RT I TST8 #100,STATUS @)LKCSR HH'l401 8MI ,+4 le400~ HLT 176444 176174 U 1 0127;7 002610 e~26~2 H~5/77 17550eJ ~02606 000V02 r0261e 002616 2jr, n 0~2620 1~400~ 002622 002624 002626 002634 002636 002642 002650 002652 0.02654 002656 002662 001001 1040e0 026777 175516 TeR2: ;FI~D 002664 002672 002700 002706 002714 002720 002722 002726 00273,0 002732 002740 002746 TCR3: le0Zel 177344 177342 175444 105277 175424 17 7 334 T'CR4 ! 000002 012777 012777 012777 1774"0 112777 ~00105 004767 175402 002722 002750 175426 175414 175410 175372 000e02 1753M3 100r2!01 1~4Ql00 0127J7 112777 000743 INCa 175360 175340 #TCR3,tITCIV taTCCM T: :(r'E~TIAL BIT BPL HLT BNE HLT CMP 175456 0~1662 005367 027767 0014"'1 104000 000403 005777 RTI MOV ~ 175470 1-1~ JWE rOUNO OUR rlRST BLOCK JSET UP INTERRUPT TO TEST ALL BLOCKS ;5ET 00 JWAtT FOR NEXT BLOCK TO INTERRU~T BLOCK IN REvERSE DI~ECTION #100200,'TCCM ;TEST FOR READ AND ERROR •• 4 JERROR READING SEQUENTIAL BLOCK IN REVERSE ,+4 TCFIRST"TCOT BEQ DEC CMP BEQ HL: XFENDt rCEXPE SR TCRBK INCB RT I ~TCCM ~TCDT,TCEXPE ,+4 :FALSE D£CTAPE INTERRUPT JoIO WE DO ALL THE BLOCKS ,YES - GO TO END lONE TO RESTART JNO - DECREMENT BLOCK NUMBER .TEST SFCUENTAIL BLOCK IN REVERsr .TEST SEQUENTIAL READ BLOCK IN REVERSE FAILED JTHIS ROUTINE READ A BLOCK ISET DO JLETS TRY A NEW BLOCK ;READ REVERSE ALL BLOCK EXCEPT BLOCK 11~1 t/TCRB1,IilTCIV MOV JSET UP INTERRUPT VECTOR MOV #-4~0,~TCWC JREAO ONE BLOCK #TCR8UF,~TCBA MOV JWH£RE BUFF"ER IS #IE+RO+DO,II'TCCM 'READ THE BLOCK MOV9 %7,TCl JSR 'CHECK DATA BUFFER RTI JEXIT - ~ETURN W~EN BLOCK IS READ @TCCM TCRB1: TST JAND ERRORS .+4 BPL HL T JOECTAPE ERROR MOV #TCR3,"TCIV JNEW VECTOR rOR BLOCK SEARC~ MOVa JREAD BLOCK FUNCTION ftIE+RBd'TCCM TC·R4 JRETURN TO BLOCK SEARCN BR TCR8K: :THIS WRITE BUFFER LOOK THE SAME FO~WARD OR REvrR~~ TCWBUF :: TCRBUF :: N=l .REPT N JOECTAPE WRI1E BUfFER -N N=N+1 .ENDR 002750 002752 000001 177777 000002 N 002754 0~HH'02 0~2756 177-'76 N -·N 0~~~{'3 N=N+l 002760 00e ..~23 N 002762 177775 -N N=N+l o0 2 7 6 ~ 13 e~ : ,,' 4 177 '74 ~ 0 ~~, 002766 ." 4 JDECTAPE WRITE BUFFER -N N=N+l N -N JDECTAPE WRITE BUfFER IDECTAPE WRITE BUFFER ;DECTAPE WRITE BUFFER PALX11 V~H:'l ~, 14-fEB .. 71 13106 PAGE 1-11 0e~e06 N=N+l N -N N=N+1 e22774 2e02~'6 N ic277/.) 177i72 2e3~H"l 0e0e07 177771 0rcH,e10 000e10 177770 00eel1 000ell 177761 -N N=N+l N -N N=N+l N 0e:;,e'e'5 1e!2770 e2!2772 0e-~e05 177773 [tJ002?7 ee3llZ2 e03~~4 ~232~6 0e301~ ~03212 0"H~e12 ~e3e14 e03~H6 e03020 003022 e03e24 e03026 003030 01213032 e03e134 0213036 000112 177766 000e13 0fH"~ 13 177765 000e14 000e14 177764 rcHHH?15 000015 177763 000016 0121012116 177762 211211::')1317 0032140 003042 0~3044 02130,46 0e3e50 003052 003054 ee.3~56 003e62! 0eJ3062 000iC17 177761 00002121 012100,20 177760 000021 000021 177757 11J0eJeJ22 00121022 177756 121121121023 01210023 177 7 55 000e24 ;z03~72 000024 17775 4 000025 000025 177753 ;' 0 3 C' 74 ~0~h~2b 0C~C2 003064 003066 v' 03072 Ck~3l7b 11'7/5 wH'002 .. N N=N+l N -N N=N+1 N -N N=N+l N JOECTAPE WRITE BUFFER ~OEC"APE WRITE BUFFER ;OECTAPE WRITE BUfFER ;OECTAPE WRITE BUFfER iOECTAPE WRITE BurFER JOECTAPE WRITE BUffER ;OECTAPE WRITE BUFFER -N N=N+l N -N N=N+1 N -N N=N+l N -N ;OECTAPE WRITE BUFFER JOECTAPE WR I·T E BUfFER .OECTAPE WRITE BUfFER N=N+l N .. N N=N+l N JOECTAPE WRITE BUFFER JOECTAPE WRITE BUfFER -N N=N+l N JOECTAPE WRITE BurFER -N N=N+l N -N N=N+l N -N N=N+l N -N N=N+l N JOECTAPE WRITE BUFFER JOECTAPE WRITE BUFFER JOECTAPE WRITE BUF"FER ;OECTAPE WRITE BUFFER -N N=N+l N -N ~=N+~ JDECTAPE WRITE BurfE~ ~LX11 V0~3 14-1="[8-71 13: 16 PkGe; :L-1a .,J3100 00~~27 N ~H33'102 177/51 -N ~031~:4 ~~ ei6 013003~ 00~i130 1 ~. 7750 -N ~('e2:H N=N+l ~103110 000(731 N 012'3112 17774J -N 000~~32 000~32 f\=N+l N -N N=N+1 012'31 013311~ ~03116 0133120 0133122 003124 003126 177746 01313033 0131312133 177745 01210034 0~HHl34 177744 0~0eJ35 003130 003132 0133134 0133136 121133140 121133142 003144 01213146 eH2l3150 1211213152 Wk'!3154 0133156 13133160 121031b2 003164 12103166 00317121 12103172 12103174 121133176 00121035 177743 013012136 0130036 177742 013012137 012113037 177741 012101214121 0121012140 177740 013012141 0121012141 177737 012101342 00012142 177736 0130043 01313043 177735 00012144 01211312144 177734 00012145 ~HH'045 177733 000046 012112112146 177732 0121012147 N;N+i JOECTAPE WRITE 8UFI="ER JOECTAPE WRITE BUFF"ER JOECTAPE WRITE BUF"FER N JOECTAPE WRITE BUF"FER -N N=N.+ 1 N ;OECTAPE WRITE BUFF"ER -N N=N+1 N JOECTAPE WRITE BUFFER -N N=N+l N :DECTAPE WRITE BUFFER -N N=N+l N -N N=N+1 N ... N N=N+1 N -N N=N+l N -N N=N+l N -N N=N+1 N JOECTAPE WRITE 8UFF"ER :DECTAPE WRITE BUFFER IDECTAPE WRITE BUFF"ER JDECTAPE WRITE 8UFP"R ;DECTAPE WRITE BUFfER ;DECTAPE WRITE BUFFER -N N=N+l N ... N N=N+l N :DEGTAPE WRITE BUFFER iDECTAPE WRITE BUFFER -N 003?00 003202 000e47 N=N+l N 177731 -N ~e005~ e03?04 ",O0050 N=N+l N 003206 177730 -N 2100051 "J=N+1 ~.00051 N ~~03?H~ iOECTAPE WRITE BUFF"ER IDECTAPE WRITE BUFFER iDECTAPE WR ITE 8UF"FER :DECTAP[ WRITE BUFFER PALXll V00.3 0~3212 177727 000'~52 003214 003216 0032212l 003222 000052 177726 000'~53 'HHH~53 177725 000'~54 003224 003226 ,,'H"'54 177724 003230 003232 000055 177723 000056 rlI00056 177722 ,,00057 .000057 177721 000e160 12100~55 003234 003236 003240 003242 003244 003246 003250 0~3252 003254 003256 003260 003262 003264 003266 0~3270 0~3272 003274 003276 003300 003302 003304 003306 003310 003312 003314 12103316 "00~60 17772121 0002161 000061 177717 000062 000062 177716 000063 000063 177715 000064 000064 177714 000065 rlI~0065 177713 000066 000066 177712 000067 000067 177711 000070 000070 177710 000071 000071 177707 000072 12l03:~22 13"1.16 PAGE 1-13 -N N=N+1 N -N N=N+1 .OEeTAPE WRITE BUpoER N ;DECTAPE WRITE BurFER -N N=N+l N ;OECTAPE WRITE BUFFE:R -N N=N+1 N ... N N=N+l til N N=N+l N -N N=N+l N 'OECTAPE WRITE BurrER :OECTAPE WRITE BUFFER JOECTAPE WRITE BUFFER -N N=N+l N JOECTAPE WRITE BUFFER "N N=N+1 N -N JOECTAPE WRITE BUFFER N=N+1 BUFFE~ N JOECTAPE WRITE N=N+1 N JDECTAPE WRITE BUFFER ... N ... N N=N+1 N ... N N=N+1 N -N N=N+1 N -N N=N+l N -N N=N+l N -N 177705 JOECTAPE WRITE BuFFER "'N ~HH:l072 012l12l"'7~ ;OECTAPE WRITE BUrrER -N N=N+l 177706 01210073 00332121 14-FEB-71 JOECTA?E WRITE BUFFER JOECTAPE WRITE SUFFER JOECTAPE WRtTE BuFrER JOECTAPE WRITE BUFFER JOECTAPE WRITE BUFFER N=N+l N -N JOEeTAPE wRITE BUFFER ~LX11 v003 14-F~~-71 13: 0,Q ,If •.G,E 1-~4 00332': ~e3 3 216 000V174 PHHiHJ7 4 1.77704 N:;N-I'l N 000~75 f.-J=N+l ?:03~3? 2100075 ~ 1;03332 177/03 00;:1076 -N N=N+l ~QJ3334 ~e0076 N ;OECTAPE WRITE BUFrER 003336 177702 000077 000077 177701 0eJ0Hl0 0k:HH00 177700 00eJleJ1 -N N=N+1 N -N N=N+l JDECTAPE WRITE BUrrER N .OECTAPE WRITE Bur FER eJ03340 eJ03342 0eJ334,4 00334,6 0eJ010~ eJ03352 003354 1(J0335p 003360 003362 eJ03364 0eJ3366 003370 003372 003374 003376 003400 003 4 02 00340 4 003 4 06 0e3410 003412 00010eJ 177700 000 U?J0 000077 177701 000077 000076 177702 000076 000075 1777eJ3 rlJ0eJ075 000074 177704 000074 000073 177705 000eJ73 000072 177706 000072 O00071 177707 000071 000070 177710 00007121 0~0067 e03~14 177711 -N N=N+l .REPT N=N-l -N 100 IeEe TAPE WRITE eurrER .ENOR N=N-l -N N N=N-l -N N JDEe TAPE WRITE BurFER IDEC TAPE \rI~ITE Bur FER N=N .. 1 .. N N N=N-l ,..N N N=N .. 1 ... N N N=N-l ... N N N=N"'l JOEC TAP!: WRITE BUFFER IDEe TAP£ WRITE BUFFEr: JOEe TAPE WRIT: E'PC"t"ER JOEC TAPE: WRITE BUFrER ... N N N=N-l -N N N=N-1 "DEC TAP[ WRITE SUFFER N JDEC TAPE WRITE BurrER N=N-1 -N N N=N-l -N ;DEC TAPE WRITE Bur FER -N (~03415 000~67 ee3.:! 2;' 000066 177712 o ~ 0 ~~ 6 b N 0ev'h';f)5 N=N-l ~'e3422 W,R t r E: BlJF" r ER JDECTAPE WRYTE BUFFER 1 \' N 00335e IOECT~PE i~ • ,DEC TAPE: WRITE BurFER ;OE(" TAPE \~R I TE BUFFER PALX11 Vf2l 0 ~j 12103424 12103426 177713 210121065 14-I="E8-71 000Q164 210343121 eeJ3432 177714 00121064 e1~'kH163 e0343 4 1771'15 003436 000~'63 0~HH162 00344121 177716 01210062 e03442 0eJ0~161 e03444 ri303446 003450 01213452 177717 000~'61 000Ql60 0213460 003462 0213464 0213466 121121347121 003472 2103474 01213476 003500 01213502 0035214 003506 N N=N-1 -N N N=N-l -N N N=N-1 JOEC TAP!: WRITE BurF'ER IDEe TAPE WRITE BurrER JDEC TAPE WRITf BurrER ~N N N=N-1 ... N N N=N-1 JOEC TAPE WRITE BUrF'ER JOEC TAPE WRITE BurF'ER -N JOEC TAPE WRITE BurrER 177721 N N=N-1 ... N IiH210~157 N N=N-1 -N N N=N-1 .. N N N=N-1 ... N JDEC TAPE WRITE BurrER 2100056 177722 00e~156 JDEC TAPE WRITE BurrER 2100055 177723 2100055 Q"H.H154 1777'24 00121054 0121121053 1 7 7725 01210053 2100052 1,77726 rJ00e52 000e51 177727 N N=N-1 .. N N N=N"l .. N .DEC TAP[ WRITE BurFER 000~51 N JDEC TAP[ WR I n: BurrER QJI1"H~ 4 4 lil0353f1 177734 0 3 '3 3? eHhh' 44 0~0043 l~~3534 .. N 177i'20 2100e50 003510 177730 003512 . 000250 2100e47 003514 177731 003516 00"H~4 7 00li:H'46 003520 177732 003522 2100046 01210045 '103524 177733 000045 ~03526 V' PAGE 1-15 000060 000~157 003454 003456 13'06 177735 N JOEC TAPE WRITE BurrER .DEC TAPE WRITE BurF'ER N=N-1 -N N=N-1 .. N N N=N-1 .. N N N=N-1 ... N N N=N-1 -N N N=N-l -N N N=N-l -N JOEC TAPE WRITE Bur FER .DEC TAPE. WRITE: BUF'rER JDEC TAP£ WRITt: BurrER ;CEC TAP~ WRITE BurrER ;OEC TAPE WRITE BUrF'ER .OEC TAPE WRITE BurrER ~LXll ~3536 ,,03540 ~03542 003544 003546 003550 003552 ""'3554 003556 0~3560 003562 00356~ 003566 0"3570 003572 003574 003576 0036021 rHJ3602 003604 003606 0036H'l 003612 003614 003616 0036221 003622 003624 003626 003630 303632 003634 ?e3636 V'~3640 l' e31, 4 2 .:.'.2'3644 ,'~ 3646 V"03 14-FE8 ... 71 13:0~ PAGE 1-1.6 0"0043 N ,,01be42 N.:,N -1 177736 0"0042 000041 177737 000041 00004" 177740 000040 000037 177741 000037 000036 177742 000036 000035 177743 000035 12100034 177744 000034 12100033 177745 QJ00033 00"'''32 177746 QJ00032 QJ00031 177747 -N ~00031 QJ00030 177750 21001()30 000027 177751 000027 000026 177752 ",00026 11)00025 177753 00"025 00"'024 177754 ",0121"'24 ""0023 177755 0021023 000022 177756 ~,' JDEC TAP[ WRITE BUFFER JOEe TAPE WRITE BUFFER "~=N-1 -N N N=N-l JOEC TAPE WRITE BUFFER N JOEC TApt WRITE BUfFER .. N N=N-l .. N N N=N .. 1 ... N N N=N-l -N' N N=N-l -N JOEC TAPe WRITE BUFFER ;OEC TAPE WRITE BUFFER JOEC TAPE WRITE BUFFER N N=N-l ... N N N=N-l JOEC TAPE WRITE BUFF"E:R N N=N-1 ,..N N N=N-l ... N N .OEC TAPE WRITE BUF"FER JDEC TAPE b~R I TE BUF"FER .. N N=N-l JOEC TAP£ WRITE BUF"F"ER IDEe TAPE WRITE BUFFER pN N N=N-l -N N N=N-l JDEC TAPE WRITE BUFF'lR iOEC TAPE WRITE BUrF'ER -N N N=N-l -N N N=N-l -N N N=N-l -N 000e22 N 000021 177757 N=N-l ... N 1Z!~0~~?1 N JDEC TAp~ WRITE BUFFER JOEC TAPE WRITE BUFF"ER JOEC TAPE WRITE BUFFER 'DEe TAPE WRITE BUFFER lorc TAPE WRITE BUFrER PALX11 ,~el3650 0036:>2 003654 l-,e3656 "eel:s 12100"20 177'160 ,HH"'20 el~HHH 7 177761 r21IlHHa 7 'H~0~H6 00366~ 003662 0213664 003666 177/62 r210r21kH6 2100015 177763 o r2HHH 5 elfll0~H4 ~03670 003672 003674 003676 003700 0037212 003704 003706 003710 0'13712 003714 003716 003720 2103722 003724 0'13726 IlH213730 0'13732 01213734 003736 . 003740 0133742 003744 0.03746 177764 12100014 000013 177765 00'H113 000012 177766 0021012 000011 177767 000~111 14-FES-71 13106 PAGE 1-17 N=N-1 -N N N=N-1 -N N N=N-l JDEC TAP£ WRITE BUFFER :OEC TAPE WRITE BUFFER -~ N N=N-l -N N N=N-1 -N N N=N-1 ;DEC TAPE WRITE BUFFER JDEC T,APE WRITE BUFFER .DEC TAPE WRITE BUFFER -N N N=N-1 -N N N=N-1 -N N N=N-1 000010 177770 00 '1 el 1'1 900el07 177771 12100007 12100006 177772 000006 12100005 177773 12100005 0210004 177774 000004 12100003 177775 N=N-1 -N 0~HHH:'J. N 0~0~132. N=N-1 -N N iDEC TAP~ WRITE BUFFER ,DEC TAP~ WRITE BUFFER JDEC TAPE: WRITE BUrFER JDEC TAPP: WRITE BUFrER N=N-1 -N N N=N-1 -N N N=N-1 -N N N=N-1 -N N ;DEC TAP£ WRITE BUr FER IDEC TAPE: WRITE BUFrER IDEC TAPE: WRITE BUFFER JDEC TAP£ WRITE: BUFFER JDEC TAPE WRITE Bur.F"ER 177776 -N "00~02 ,DEC TAPE: WRITE BUFrER 000kHH 177777 N N=N-l -N ,,00~'01 N JDEC TAPE WRITE BurFER ~PALX11 V003 14-FEB-71 Z0315e 012767 003750 012446 203156 1~4400 i'e'376l ~12737 ::04~00 ~16420 Zl3766 203772 "127l~ 177770 026027 ~'1662'2 ?04ee~ 0~14L:l ee4?02 le400~ I;H~~2e4 10 44 00 e0 4 Ze6 012700 022760 ?0 4 012 e~4~20 Z~4022 204:e2 4 177770 125252 PAGE 1-.18 ;INDEX, AND INOIRt .. , TEST Or-PDP"11 #BEGIN,RETUf'~ BEGIN: 1'10\1 SCOPE #4~'00, ~# 1COUNT ""OV :TESl CJMPARE INSTRUCTION I ~,I i) EX ED MOV 125252 016622 liHH4~1 1'04e;00 104400 CMP BEQ HLT SCOPE #--10,%0 AI( 0) , #125~?52 • -~ 4 MOV CMP BEQ HLT SCOPE .-10,%0 #125252,A (0) MOV CMP BEQ HLT SCOPE #:LIi~ , ,%0 AI( 0) , #052525 MOV CMP BEQ HLT SCOPE #:Lrll,%0 #052525,A(0) MOV CMP BEQ I-lLT SCOPE # ... 113,%0 AI(Z),A(0) MOV CMP BEQ HLT SCOPE #,"10,%0 A(0),A(0) e0 4 i40 004042 ee4~4~ H~4400 004046 1t04eS2 00 4 060 004062 0041864 1i!112700 022760 001401 104000 104400 00001,0 004~66 012700 026060 001401 104000 104400 177770 016622 012700 026060 001401 104000 104400 00"010 016622 ee4~26 ~127eJ0 00 4 132 004i36 177770 000004 016622 e04144 00 4 1.46 004i5C 012701 2126061 0014(2)1 104(2)0(2) 104400 eC 4 152 0261b0 CMP A(1) , A«(2) ~~e4:'6el ",014~1 SEQ .... 4 (' e 4: e 2 104000 HLl 2e4!.6 4 H?44d~ SCOPE z04~32 004072 004100 0041fr~2 e134i04 0~Hl~6 004i12 e0 4 120 004122 0041.24 ~52525 'H6622 Ze 4 :bC' '" 12 ? I{" k' 177774 ~'04: 0127[ll ?e~~[?Il(2) -;-::? 052525 016622 016622 016622 016622 016622 MOV MOV CMP BEQ HLT SCOPE MOV MOV .FOR SCOPING ;ITERAlION • -~ 4 • ,.. 4 • ·.. 4 • ·.. 4 #'-10,~0 #·.. 4,%1 A(12J) , A(1 ) • ,~4 #,.4, %0 #'''H'l,%l COUNT JMINUS 10 TO REG J (A INDEX BY MINUS " H~) TO ICOMPARE WI Hol INDEX fA,ILED JrOR INDEX INDEXED JA • -~ 4 012700 026027 001401 104000 ~e4~26 00?:01.tl 016622 1,3 U'6 J INOEX 1~1.25c5? PALX11 V003 14-rEB-71 0e4176 0042e4 004206 0042121 226061 001401 104000 104400 012HI(t 0127 .:.; 1 2120160 001401 104000 016622 v.04212 004216 004222 e0423e 004232 004234 177774 000010 016622 016622 13:e6 PAGE 1-19 CMP BEQ Io1LT SCOPE h10V !.10V 016622 CMP BEQ A(0),A(1) .+4 #-4.%0 # UI), %1 A(1) • A(0' ,+4 HLT SCOPE H~4400 JTEST "1QVE INSTRUCTION rOR INDEX MOV MOV CMP BEQ HLT SCOPE 004236 004242 004250 01Z!4256 004260 004262 012700 016067 026727 0f2114el 104000 104400 177770 016622 012370 e12374 125252 004264 004270 004276 004304 004306 01214310 012700 016067 026727 001401 104000 1121441210 eHH'010 016622 012342 012346 12152525 12104312 004316 004324 004332 004334 004336 012700 01:2760 02:3727 00141Z!1 10400121 10<4400 17777121 125252 016634 016644 125252 004340 004344 01214352 004360 004362 004364 012700 012760 023727 201401 104000 10440121 000010 052525 016654 004366 004374 004400 004406 004414 01:n67 ,U;nI:10 177777 177770 016622 012232 012250 177777 0r2H1010 ''16622 012214 ~122V'2 RIC ~~12176 125252 eMP 046067 026727 0~4416 00:L4~1 le400~ 004420 104400 004422 01?767 ~0443~ 012700 00443 4 004442 ~H;!445" o4 ~10 6 7 026}27 00j 4'~1 016644 12152525 __ .. le.%eJ A(0),TEMP TEMP,#125252 ,+4 MOV MOV CMP BEQ HLT SCOPE #+10,%0 AC0',TEMP TEMP,#12I52525 .+4 MOV MOV CMP BEQ HLT SCOPE .... 10,%121 '125252,TEMP(0) MOV MOV CMP BEQ .. #C,#125252 .+4 '+10,"0 *052525,TEMP(0) ,#TEMP+10,#052525 ,+4 ~LT SCOPE 012236 052525 ;TEST AND I~STRUCTION FO~ INDEXING _-l,TEMP MOV MOV #-10,%0 A(0),TEMP BIC CMP TEMP,#052525 ,+4 BEQ HLT SCOPE MOV ~Ov BEQ #-l,TEMP #10,"0 A(0),TEMP TEMP.#125252 .+4 14-F"E8-71 13 :~06 :.P A~E fAL~11 V.'303 004452 V104454 1040",e ~L"! le440.6 SCOPE 004456 004464 012737 0127?0 177777 ~04470 ~42760 125252 Z16644 004476 004504 004506 023727 716654 {'52525 I?JriH4Vl 1040~0 ~04510 104401?J 004512 004516 004524 004532 004540 004542 004544 0127~0 004546 004554 012767 0127 k:'0 166067 001401 12104560 004566 004570 0045'72 l16654 2erelZ 012767 042767 026727 177770 177777 052525 012076 0014~1 104000 1044N:'l 125252 177770 016622 e12070 2'12~56 1~4000 104400 004574 004602 004606 004614 004616 004620 012737 012700 166760 001401 104k.H30 104400 125252 171770 216644 ~120e0 ~16654 004622 004630 004634 01214642 004644 01214646 2112767 012700 166067 01211401 104000 104400 052525 000010 016622 004650 004656 004662 004670 004672 004674 012737 0127e.0 166760 2152525 004676 004704 00471121 004714 004720 004722 1Z112737 0127012J 00:>060 005737 0014 ..'1 104er0 e12Q!14 012002 ~16644 016634 104000 104400 :TEST ~16654 ?lc644 2116644 #1.0,,,2 MOV MOV SUB SEQ HLT SCOPE 2I014~1 177777 177770 #--1, (i#TEMP+10 #125252,TEMP(0) ,#TEMP+10,#52525 • +- 4 ....·10, "0 TEMP-lel #052525,TEMP-10 TEMP-10,#125252 # ...·1, , ... 4 ;TEST SUBTRACT INSTRUCTION F"OR INDEXING #1.25252, TEMP MOV #.,10,%0 MOV A(0),TEMP SUB ,+4 BEQ HLT SCOPE 00~H~1e! 011744 rv.(j V MOV BIC CMP 8EQ HLT SCOPE MOV MOV BIC CMP BEQ HLT SCOPE 012110 e12102 125252 1~20 #1.25252, ta#TEMP #-1121,"~ B,TEMP+10(12J) ,+4 MOV MOV SUB BEQ HLT SCOPE #0!52525,TEMP #10,%0 A(0),TEMP MOV MOV SUB BEQ HLT SCOPE #0!52525,.#TEMP #10,%0 A+10,C(I2J) ~JNARYS MOV MOV CLR TST BEQ HLT ,+4 ,+4 INDEXED #-l,Gt#TEMP #-112l,"~ D(0) ~#TEMP ... 4 PALX11 V0~3 0~4724 104400 ~~4726 012737 00473 4 0127~0 e.0474~ 0(2:52100 005737 001401 1040l'eJ 004744 0~4750 004752 0.04754 14-I="(B-11 13&06 PAGE 1·21 SCOP( 177777 000.010 016644 e166~4 016644 1044Vjjl MOV MOV CLR TST SEQ I-lLT SCOPE # ... 1, tatHEMP #+10,%0 C (") @#TEMP • +4 MOV MOV COM TST SEQ HLT SCOPE *.. 1 d'#TEMP 016644 MOV MOV COM TST BEQ HLT SCOPE #-l,@#TEMP #10,%0 C(0) 8#TEMP ,+4 MOV MOV INC TST BEQ HL T SCOPE 004756 004764 004770 004774 005000 005002 005004 012737 0127e:0 005160 "05737 001401 104000 104400 177777 177770 016654 016644 ~16644 005006 005014 012737 012700 177777 016634 016644 00001~ #-10,%0 De0} (i#TEMP .+4 005~20 0~516~ 005024 005030 005032 005034 005737 104400 0051?l36 005044 005050 005054 005060 0050.62 005064 012737 012700 005260 ,U'5737 001401 104000 104400 177777 177770 016654 016644 016644 005066 005074 005100 012737 012700 005260 ,,05737 001401 104000 H!l4400 177777 000010 016634 016644 016644 MOV MOV INC TST BEQ HLT SCOPE #-l,(I#TEMP #+10,%0 C(0) (I#TEMP ,+4 012737 01:?700 000001 177770 016654 016644 016644 MOV MOV DEC TST BEQ HLT SCOPE #l,.#TEMP #-10,%0 0(0 ) ta#TEMP ,+4 ~16644 MOV MOV DEC TST BEQ #l,lI#TEMP ~'05H~4 005110 005112 005114 0~1401 104~00 005116 0.05124 005130 005134 01215140 12105:142 1211215144 01215737 001401 112141210121 11214400 "0~;360 005146 ~1;n37 e'00001 h~5 ~4 01;~7~~1ZI ~l5 6~ d~5 64 12105360 1211215737 00CI2'H'l 016634 016644 01215 7121 00=.4C1 *.. l,.#TEMP #-10,%0 0(0) G'#TEMP ,+4 *1~,"1ZI CO" lI#TEMP .+4 fA'LX11 ve03 0'0:'172 0e5174 104000 005i76 012737 kf127"'0 1.3:05460 022737 001401 70'520<1 ~'05l>H?J ~05214 20522? H~40(l:0 ~05226 104400 ~05230 312737 012700 005460 005~42 { 005246 ~?2737 e~5254 e~5256 001401 104000 005260 1~4400 005262 012737 012700 005~70 ~e5274 005276 005302 e05306 005310 005312 ~05314 005322 005326 00533~ 005334 005340 0~5342 005344 0~0261 0~5560 005737 001401 104000 104400 012737 IcU2700 000261 005560 005737 001401 104000 104400 ?J0e01 ~16654 177777 ~16644 000001 016644 ~~0010 ~16634 177777 ~16644 177777 177770 016644 177777 000el10 el2!5412!12! 0f2l5412!6 012737 0127()12I 0012!261 005660 (05737 121 e 14 i:.' 1 "'16644 016654 e16644 1~412!00 112!4400 112!4e00 1~44('iC ~OV ti:L,~#TE"'1P MOV NEG CMP BEQ HLT SCOPE 11-10,%0 D (0) #··1. ," 4 ~# TEMP MaV MOV NEG I'H, '#TEMP CMP #··l,ti#TEMF' MOV MOV SEC AOC TST BEQ HLT SCOPE MOV MOV SEC ADC TST BEQ #+121,%0 Cn~) , ~. 4 *.. l,~#TEMF' #-·H!'l,%0 o (0) (III#TEMP • . .·4 # ..·1, fI#TEMFt # . .·10,%0 C( " ) (a_TEMP • ,,·4 SCOPE f2l012!0~1 iJ05~26 ~f2l543:1 1-'i2 I4L T 177770 F05424 016644 016634 016644 0127210 000261 0056612! 005737 001401 ~e542? fJ~(jE SEQ HLT SCOPE 016654 016644 1112737 0~54i14 ?16644 17 7 770 0053 4 6 005354 e05360 12!05362 12!05366 005372 005374 12!05376 . e~5412 13':i6 HlT SCOPE le440( "'~5~24 e~5~36 1 14 -':-£:8'-71 00012101 012!0010 ~16634 016644 12!16644 MOV MOV SEC SSC TST BEQ HLT SCOPE MOV MOV SEC SSC TST BEQ HLT SCOPE #l,(;)#TEMP .--10,"121 0(0 ) @~!TEMP • ",4 #1., @#TEt-1P #+,10,%0 con @#TEMP • +4 PAL Xli V003 0~5432 0121700 005434 005440 005442 005444 005446 0627tl 00e112 (21215450 005452 005456 005460 005462 005464 21121700 062700 000110 104000 ,,00240 10 4 4le 104400 2122737 001401 10 4 000 005516 005524 005526 005530 2123737 001,401 10 4 000 005532 005536 005542 005544 005546 2113700 e.05572 01?J560~ ~05606 2I2,~700 001,401 CMP BEQ HLT SCOPE #125252,.#8 ,+4 0,16612 016612 CMP BEQ HLT SCOPE .#8,li#B ,+4 , I,' ~ ;TEST MOVE INSTRUCTIONS ,#8,%0 MOV CMP *125252,%" .+4 8EQ HLT SCOPE 016612 125252 125252 016612 016644 016644 MOV CMP BEQ HLT SCOPE #125252 .... TEMP .#8,li#TEMP .+4 016512 1i'16634 016634 MOV CMP BEQ HLT SCOPE @'B, .. ,C eUB, (I#C 10400~ 1044('10 ~lb612 001401 005610 005612 104 itt:';.' 00561 4 12'7,';' 0437.:':: (,~05620 016612 104~00 013737 023737 1~44~\i' ~ ;TEST INDIRECT ADDRESSING ;TEST COMPARE INSTRUCTION CMP .#8,#125252 ,+4 BEQ HLT SCOPE 125252 104400 012737 023737 0211401 #le,%0 0''''' 125252 101J4N~ H!J4400 %7,%0 e'16612 1~40e0 005502 005510 005512 005514 PAGE 1 .. 23 MOV ADD JMP HLT NOP SCOPE Z0ZelUJ H~440~ CZl05476 005500 005550 ,005556 005564 005566 005570 e0(.~121 104~e0 2123727 001401 13:06 :TEST JMP INDIRECT MOV %7,"0 #1O,%0 ADD t'%eJ JMP HLT NOP SCOPE 000240 ~05474 0~5466 14-F"E:8-71 177777 ,'1" 612 • +4 ;TEST BIC INSTRUCTION INDIRECT #-1,%0 MOV BlC t8*8.%~ ~ALX11 Vil03 14-rES .. 71 M"6'24 0056:30 020€2 7 l52525 ~05632 01215634 0~1401 1£40t:~ 1044L'~ 13:0b PAnt 1-24 CMf:! "",#052525 SEQ .+4 liLT SCOPE MOV BIC CMP BEQ HLT SCOPE #-l,(lt#TEMP #125252,fiI#TEMP t#052525,,#TEMP .+4 177777 125252 052525 "'16644 177777 12116612 C!l16634 016634 ~16634 ~52525 005714 012737 2143737 023727 01211401 112141211210 1121440121 0057'16 12105722 12l12l5726 1211215 'f 32 12105734 1211215736 01271210 1637ell21 212121027 1lJI2I 14 I2l 1 1121 412l 121121 112144121121 125252 C!l16612 000012112l 12105740 1211215746 01lJ5754 005756 012l57612l 012737 166737 01lJ1401 112l412l121121 112144121121 125252 0112164121 O16644 016644 MOV SUB BEQ HLT SCOPE #125252,'#TEMP 8,(il#TEMP • ..·4 1211215762 1210577121 1211215776 012767 163767 01215767 01211401 1121 40ell2l 112144012l 125252 016612 010642 010654 010646 MOV SUB TST SEQ #125252,Tf.MP 'MB,TEMp TEMP , ~'4 005636 005644 01215652 012l56:60 012156 62 01215664 1 ~056'6 6 1211215674 0057132 0057:10 0121~712 12112l6~02 12106004 006006 01216010 006012 Qll2l6016 006022 006024 Qll2l6026 ~12l6030 006034 006042 ?-06050 0121612152 006054 01216Ql56 ~127.37 042737 022737 001401 016644 ~16644 1~4(i"!l12l 11214400 12'050012l 0637012l 02271210 ~#C,#52525 .+4 ~LT SCOPE JTEST ADD INDIRECT CLR '''~ ~~8,%12I ADD CMP #125252, '''~ SEQ • +4 HLT SCOPE 12116612 125252 10400~ 11214400 ~16644 125252 125252 016644 016644 1~4400 012 7 ,~ 7 #-l,Qa#C ~#8,6)#C ;TEST SUBTRACT INSTRUCTION #125252,,,O MOV ~#B,%0 SUB CMP "O,#0 ,+4 SEQ HLT SCOPE 01211401 12105037 062737 022737 2'01401 104000 MOV BIC CMP BEQ HLT SCOPE 125252 e16644 CLR ADD CMP SEQ HLT SCOPE MOV (I#TEMP #125252,(I#TE"1P #125252,(I#TE~P • .. 4 #125252,~#TEMP PALX11 V003 14-F"EB-71 006264 006072 006100 ~67737 023727 0211401 2110540 Z16644 016644' 177777 ~06122 10400~ 7?61~4 le4 4 l l e061~6 012737 005037 00';737 001401 104000 104400 177777 216644 e16644 e16644 125252 016644 052525 016644 006152 e06154 ee6156 012737 021!5137 022737 021:l401 HHe00 104400 e06160 006164 e06170 00617-{) e06200 e06202 005037 a0!;237 022737 001401 104000 104400 0.16644 016644 006204 e06210 0e6214 00~j377 N~6114 e06120 0.06124 ':H~6126 006130 Z06132 e06140 e06144 00e~01 216644 016644 016644 0121432 016644 177777 01,~737 0~H~0e.1 016644 "0~j437 2116644 177777 016644 005037 023727 00l.401 006224 .104000 006226 1044-~0 ~06222 006230 006236 N'l6242 e062521 e06252 e06254 e~6256 1822737 01ll1.401 104000 104·400 ~27727 ~014~1 ee6264 ee6266 ?1l6270 104000 104400 ('l6272 022777 ~e63l0 001401 .' ?t-~2! 2 104Cv1e ~ • .: ~ 3 ~ j i.~ ~ ~ ~ r6 PAGE 1-25 ADD CMP BEQ f1LT SCOPE 91A+6.61#TEMP .#TEMP,'-l , +4 :TEST UNARYS INDIRECT MOV #-l,91'TEMP ,.TEMP CLR TST .'TEMP ,+4 BEQ f1LT SCOPE MOV COM CMP BEQ HLT SCOPE .125252,,#TEMP (I.TEMP #052525,.#TEMP CLR INC CMP BEQ HLT SCOPE (It.TEMP ,'TEMP #l,tIl.TEMP CLR DEC CMP BEQ HLT SCOPE "TEMP 6ITEMP+2 •• TEMP" .. l MOV NEG CMP BEQ HLT SCOPE #l,6I#TEMP tII.TEMP #-l,_.TEMP ,+4 ,+4 ,+4 ,+04 ;TEST INDIRECT ADDRESSING WITH INOEXING ;TEST COMPARE INSTRUCTION CMP (i1IB"2,#125252 ,+4 BEQ f1LT SCOPE 010332 125252 125252 01~314 CMP BEQ f1LT SCOPE #125252,.8+2 ,+4 211i'~~2 l: 1? 3~' 0 CMP @lB+2.1I8+2 104400 027777 13:06 PALfX;ll v e~Ql3 lil-F,E,8 -71 l3:;1:6 P;A.(;[ ..... . 006;31 4 e~lA0l SEGl 0.e6i~16 ~_06:320 If:400e ,~LT l~4400 SCOPE 006322 006326 006332 006334 006336 el177/.;0 222720 2101401 104000 1214400 iTES: 006~40 ~12777 2106\346 006354 023737 ro06~56 !\STRUCTIONS ~OV ~B+2,%0 125252 eM? #125252,~0 SEQ ,+4 !-ILT SCOPE 125252 rc:l16612 01Y1300 2116644 MOY CMP SEQ HLT SCOPE #125252,'TEMP+2 (il*B,(iI#TEMP ,+4 0H'J226 016612 01e'246 016634 MOY CMP 1!D19+2,IIIC+2 @it#B ,G~#C 0~1401 006360 006362 006370 0216376 006400 2117777 2123737 2101401 104000 006~02 1~4400 006404 006410 006414 006420 006422 006424 012700 2147'100 2120027 001401 104000 1214400 177777 010200 052525 006426 006434 2106442 006450 006452 006454 2112737 ,,42777 2122737 001401 104000 104400 177777 125252 2152525 006456 0216464 006472 006500 006502 006504 012737 047777 "26'737 0014'11 104000 1044r10 177777 2110124 0{0134 006$06 006512 006516 006522 006?24 006526 12J,1270~ 125252 010076 00(:'000 006530 ~12737 :125252 016644 006536 166777 010050 01~102 ~20027 ' 0H~266 12140il0 104400 167700 ~2YE 1"'2~ ~ j SEQ HLT SCOPE • -+4 iTEST BIC I NSTRuc'r I ON INDIRECT WITH INDEXING #·-1,%0 MOV BIC '13+2,%0 CMP '''~, #52525 SEQ • ·.. 4 HLT SCOPE 016644 010204 2116644 016634 010144 016634 IiH31401 104000 1~44~H~ ~10V BIC CMP SEQ HLT SCOPE #,.. l,8t#TEMP ':L25252,tTEMP+2 .52525,ta#TEMP • .~ 4 MOV BIC CMP BEQ HLT SCOPE #·-l,@#C 'B+2,6'C+2 MOV SUB CfoiP 8EQ HLT SCOPE' #125252, '''' fIIB+2,%0 ~ov suB A·~10,'#C • •• 4 '''' , #0 • .~ 4 #t25252,(J#TEMP B" @lTEMP+2 PAL Xli VIZlIO 3 0106544 0106546 0101401 ~10655Q! 1044010 ?0655? 012737 167777 00656l 006566 0106572 2106574 006576 14 ... r:-E8-71 125252 V'10030 e16644 016644 eHH~61O 10014?1 l1Z1400~ 11044010 010661010 006602 006606 0106612 0106614 0106616 01050010 067700 022700 0101401 104000 1044010 10066210 0106624 0106632 01066410 1006642 0106644 10106646 1006654 0106662 10066710 0106672 1006674 QjlO51037 062777 022737 0101401 11040100 1104400 012737 006676 0067104 1006710 0106714 006716 1006720 PAGE 1-27 BEQ HLT SCOPE H"4001O ~05737 13 H~J6 "'10V SUB TST SEQ HLT SCOPE eH~l0106 125252 010014 1016644 125252 0077521 016644 016644 007764 177777 012737 ""5077 005737 0101401 110410010 111'4400 177777 007736 016644 016644 ~1ZI6722 012737 ~05117 125252 007712 016644 006730 006734 006742 006744 006746 022737 2e.1401 10401.:10 H'4400 ~52525 016644 MeV COM CMP BEQ HLT SCOPE 005~37 e'16644 005277 ~1ZI7666 00~0el e16644 CLR INC CMP BEQ HLT SCOPE (;06750 (.06754 ;<06760 006766 023727 0101401 10410010 11044010 022737 ~H:H401 ;'06770 1k~4200 ~H~b772 1~'44~~\~ #125252,,#TE"1 P ~8+2,@TEMP+2 (a#TEMP ,+4 :TEST ADO INDIRECT WITH INDEXING CLR %0 ea8+2,~0 ADO #125252,,,e CMP ,+4 BEQ HLT SCOPE 016644 125252 125252 ~67777 .+4 CLR ADO CMP BEQ "'LT SCOPE MOV ADO CMP BEQ HLT SCOPE ,#TEMP #125252,titTEMP+2 #125252,.*TEt-1P ,+4 *125252,,'TEMP ttA"'6,IIITEMP+2 @#TEMP,#-l ,+4 }TEST U-NARYS INDIRECT WITH INDEXING j ... l",TEMP MOV CLR "TEMP+2 TST 'I'TEMP .... 4 SEQ HLT SCOPE *125252.,.TEMP @tTEMP+2 #052525,'#TEMP .+4 ~#TEMP liTEMP+2 flIl,ea#TE,.," ,+4 V~:03 14-FES-71 e06774 ~0:5e37 016644 0e7~00 N'!7012!4 0e:5371 02:3727 ~07l12 .20721 11 ~014~1 H~40~0 ie7~16 le44iHj 121217023 012737 0eS477 022737 PAL 007~26 007el32 007e40 k~07042 C07244 01~737 000261 005577 00p737 00;1.401 104000 11214400 007H~2 Ql07H~4 007110 00711 4 007116 007120 177777 e0~.HH·l 016644 0t;!7614 177777 016644 177777 016644 1,~4e00 10440~ ~07054 NP2J74 016644 00~401 0e7046 007056 007062 007066 007070 007072 ~07642 012737 000261 005677 005737 001 4 01 104000 007564 12!16644 000001 016644 007536 016644 1044~0 007122 007126 01217134 007136 007140 012700 027027 0''1401 104000 104400 177772 016622 125252 007142 007146 007154 "07156 r0716e' 012710 02277"" 177772 125252 016622 0014~1 1~4000 ~'072""2 c07204 lk~44J~ ~:e72i'6 ~ '~07~ 66 ?07172 ~~e7200 CLR DEC CM.P SEQ HLT SCOPE MOV NEG CMP SEQ HLT SCOPE MOV SEC ADC TST SEQ HLT SCOPE MOV SEC SSC TST BEQ HLT SCOPE ~#TEMP 'TEMP+2 .#TEMP,#~l .+4 #1, (i)#TEM'P ~TEMP+2 j-1,1II#TEMP .+4 #-l,QII#TEMP IIHEMP+2 ~#TEMP .+4 #l.@#TEMI' QIITEMP+2 8II#TEMP .+4 JTEST OF COMBINEO INDEXING AND INOIRECT MOV #-6,~0 C'A(0),#12525? CMP ,+4 SEQ HLT SCOPE MOV CMP SEQ #-6,%0 #125252,'A(0) .... 4 SCOPE 177772 01£H~0Z2 ~16622 12" ~~;; V"0Jerl6 l07212 ~n2"b7 C'e722~ ~ 177777 e'16622 4 7;~ b 7 P.(GE 1-28 ~LT 104400 0127ee 0127.:'1 027371 0014.'1 1 e4 (l" ~ ~~07162 13106 016622 0e7424 'H~7416 MOV MOV CMP 8EQ HLT SCOPE '/1. .. 6,%0 #+2,%1 tilA(0) ,tlAI(l) .+4 ;TEST B!C INSTRUCTION #+6,~0 MOV MOV #-l,TEMP 8IC (ilA(0),TD~P PALX11 V~213 14-FEB .. 71 125252 0e74121 177772 177777 125252 016634 016634 e16644 2152525 e~7226 022767 0217234 10217236 V'2172421 'H~1401 ;,l7242 21127021 012737 21427721 023727 0211401 Z07246 707254 2217262 J2I72721 007272 104211O~ le4400 H~40021 ~217274 121442121 21217276 0073214 02173121 21217314 21217322 21073321 21217332 21217334 012737 012700 012701 21472171 022737 0014211 177777 177772 1:77772 2116622 2152525 016634 2116644 016634 1214el2l~ 12144210 01272121 1262127 0r2l1401 1r2l421e21 1214400 1777721 2116622 21127~0 177770 0021252 016622 01272121 1262127 0014"1 1040021 104400 210 210 H'J 2116622 212121125 0127021 122760 0211401 104000 1044(.110 0"21010 '-"00125 016622 eel7436 012700 ~07442 126060 2101401 1 e 4 ~ ~~ 21 177770 2)16622 016622 0217336 21217342 ~2173521 21217352 0217354 21217356 2107362 02173721 21217372 ~217374 ~HP376 0217402 0~7410 0217412 e'07414 e07416 e07422 l07430 e07432 007434 /07450 ;'07452 •.~~745~ 1227621 2101401 121421021 12144021 1e44~~~ 0210252 13106 PAGE 1 .. 29 CMP BEQ !-ILT SCOPE #125252,TEMP .... 4 MOV MOV BIC CMP BEQ !-IlT SCOPE ;;,-6,%0 #-l,lIt#C #125252,'TEMP(0) MOV MOV MOV BIC CMP BEQ IoIlT SCOPE # ... l,(I#C #-6,,,21 #-6,,,1 'A(2I),(ltTEMP(l) #052525,.#C ~#C,#2152525 .+4 .+4 ;BINARY INSTRUCTIONS :INDEX, AND INDIRECT TEST OF" PDP"'11 ;TEST COMPARE INSTRUCTION INDEXED MOV 1\1 .. 10,"21 A(21),#2100252 CMPB .+4 BEQ IoIlT SCOPE .MINUS 10 TO REG 21 j ( A INDEX BY MINUS 121) TO #125252 ;COMPARE WIT'"' INDEX rAILED MOV CMPB BEQ lolL T SCOPE 1\1 .. 121,"21 #21021252,A(0) .+4 .fOR INDEX J A INDEX£D MOV CMPB BEQ IoIlT SCOPE #10,"21 A(0),#21210125 .+4 J I NOE X MOV CMPB SEQ IoILT SCOPE #10,"21 #11J021125,A(0) .+4 MOV CMPg SEQ IoILT SCOPE #-121,%21 A(21) , A(0) .+4 P A·L ~ V'0!t.j ... 0''''74'62 0~74:... 0l12'7~0' @il0'~10' ! 2'60'6 0 016622 ~07470 00t'4~1 007472 007474 1040C0 207476 007502 k1ftJ7506 007514 007516 007520 007522 007530 007532 007534 007536 01217542 007546 007554 007556 007560 007562 007566 007572 C07600 007602 007604 14'-r E ~-71 "'166'22 P'A·G;E 01270il 177770 012 7 ~11 126061 001401 104000 104400 00000.4 01:6622 016622 A· ( 0') , k ( 0' ) • +4' MOV MOV CMPS SEQ SCOPE 016622 016622 CMPB SEQ 104400 SCOPE 126061 0"H 401 1040021 104400 012700 012701 126160 #-10,%0 #,+4,%1 A( 0)', A(1) .+4 HLT HLT 012700 Ut"%0 ft+ C,"'PS; BEQ 104'0~Hl 0127~1 l-:5~a M'OV HLT SCOPE 1044~j~ 12d160 121'0114" 1 13 f'Q1'6 177774 0000121 016622 016622 MOV MOV CMPB SEQ HLT A(1) , A(0) .... 4 # ... 4,%0 #+10,%1 A(0),A(1)' • +4 SCOPE 177774 0210010 016622 016622 0014~~1 MOV MOV CMPS SEQ #~4,"0 #10,"1 A(l),A(21:~ .+4 HLT 104e0f2J 104400 SCOPE JTEST MOVE INSTRUCTION #-10,%0 A(0),TEMf) TEMP, #0~"~252 MOV MOV8 CMPS SEQ #+10,%0 A(0),TEMP 012700 116067 126727 001401 104000 104400 007634 12107640 007646 007654 12107656 007660 012700 ~00010 11M~67 126 7 27 11HH4kH 1040(1'0 104400 016622 006772 00766? 012 7 CJ 17777'0 0~766f> 112;'6~~ 007~74 123727 125252 016634 0077132 0077(14 ,~e 7 l0 6 12J~14;'1 SEQ 1 It 4 ~11.' e 1 ~> 4.~? ,: HLT SCOPE 016622 007020 007~24 000252 006776 000125 HLT SCOPE MOV "'16644 125252 INDEX MOV MOV8 CMPS SEQ HLT SCOPE 007606 01217612 007620 007626 007630 007632 17777f!J F'()R 1'10 V~I CMPEl .+4 TEMP,#00~125 • +4 *-10,\0 #125252,TEMP(0) @I#e, #125:252 t +4 PALX11 VeJI2I3 14 .. F"E8-71 0127e~ e0212110 e52525 e~7722 112760 123727 ;?Z773Z ~HH4el ~e7732 le40e0 ee773~ 104410 227 7 36 012767 2e7710 207714 2~P744 eJ127~iil 007750 ~~7756 ~Hn764 146067 126727 2101401 207766 207770 1044;00 007772 01021210 0UH304 e1ee12 eH~12I2e e10022 e16654 177177 17777;1 'H6622 e06662 012767 012700 146067 126727 12101401 177777 0011121 1 121 e16622 ~12I6626 e10026 l10034 eHHH0 01012146 010054 lle'056 e10eJ60 12112737 012700 142760 123727 "014kH 10412100 104400 177777 000010 125252 016654 eleJ062 01012166 e'10074 01271210 012767 142767 126727 0014e"1 1·7777121 1?7777 li'7777 eH~124 ~127e,21 lle132 H'5060 1e5737 2101401 177770 "'16654 ~16644 12!40e0 10442e ZlZ146 012 7 37 177777 ?ll 54 ~' 17 63 ,-. ... 64 eJ127.'~ 177773 le5~~b0 ~16654 023727 ;'16644 . ~ ~ (. ? "- J.-~ ..,~ / t:: 016644 12102525 104021~ 012737 .... 12116654 016644 e~;2525 llel16 2121142 ':1t:144 006632 0'''652 21"6526 1044021 eH~14l 006644 21216540 006532 125252 ~10114 eHH34 006666 177525 1040~0 1044e0 e1~110 el~112 121121671210 H~4~H~0 e10~24 eH~U~2 12116644 12152525 "01'~'1 13:1216 PAGE 1-31 MOV MOVB CMP8 BEQ HLT SCOPE #+1121,"121 ti052525,TEi"1P(I2I) ~#TEMP+1121,#052525 .... 4 ;TEST BIC INSTRUCTION F"OR l"JOEXING # .. l,TEMP MOV MOV #-10,"~ Id 21 ) , TE "1P 8ICB CMPB TEMP,#177525 BEQ .+4 HLT SCOPE MOV MOV BICB CMPB BEQ HLT SCOPE *-l,TEMP #10,"0 A(21),TEMP TEMP, #1211211652 .... 4 MOV MOV BICB CMPB BEQ HLT SCOPE # .. 1,,,#TEMP+1121 #10,"0 #125252,TEMP(0) tittiTEMP+10,#2525 .... 4 MOV MOV BICB CMPB *-10,"121 #-1,TEMP-10 #052525,TEMP-10 TEMP-H~, *125252 ,+4 SEQ HLT SCOPE ,T£ST UNARYS INO£X£D ~-l,.#TEMP MOV MOV 10,%0 c:l (21) CLRB @~TEMP TSTB .+4 BEQ HLT SCOPE *.. 2'16644 MOV ~-1.@*TE"'1P o (it" 1774021 MOV CLR8 CMP SEQ • +4 ~-10,"~ :III#TEMP,*1774~0 PAL~ v0e3 e1 0 1', 0H:'176 ~LT SCOPE H~5060 12)23727 i'lt644 tH~£'377 012737 012,700 105060 177777 016644 10~737 ~16644 MOV MOV CLRB TSTB BEQ HLT SCOPE tj"l,@#TEMP #+10,%0 C (") @#TEMP .+4 177777 177770 016654 2116644 016644 MOV MOV COMB TSTB SEQ f.lLT SCOPE 1,tD#TEMP #-10,%0 012737 012700 105160 105737 2101412)1 104000 104400 177777 012)012!10 12!16634 12!16644 016644 012.737 177777 177770 010232 e10240 010244 e102512) e10254 010256 010260 010262 01027" 010274 010300 01030 4 010306 010310 012 737 012700 105'160 105:737 (01412)1 1041c'HH'J 104400 eH~312 ~H~1401 10~~H~0 1~4400 1 0127~0 11215260 ~16654 1~5737 016644 010376 0H~400 104~e0 010 4 02 104400 el~404 12112737 012700 10526k1 le5737 210422 e10 4 26 0~kHH0 ~H6634 '''H:401 104:12)012) 104:400 001401 104000 023727 001401 eH"416 ~~1, '#TE~IP 216644 e10216 210?2 4 e10226 010230 ?10412 MOV MOV CLRg CMP BEQ HLT SCOPE 177777 177771 ":.6654 ~14737 012700 ~H0370 PAGE 1-32 1044e~ ~10206 i'1~21? e10342 010350 010354 e10360 010364 010366 13:~6 104000 eH~20e 0103212) 010324 010330 12)112)334 010336 010340 14-F"ES .. 71 016644 177777 er,HH~l 016644 17 7 40121 104eC0 eH"'43? 1044::'0 iH"434 ('l12 7 37 *. D(rzl) Gt#TEMP .+4 MOV MOV COMB TST8 SEQ HLT SCOPE: # ... l,@#TEMP #10,%0 C (0) ED#TEMP MOV MOV INCS TST8 SEQ HLT CMP SEQ HLT SCOPE # ... l,@#TEMP *-10,%0 .+4 D ("') lI#TEMP .+4 @#TEMP,#177400 .+4 MOV MOV INCa TST8 8EQ HLT SCOPE #-l,(i#TEMP #+10,%0 C (0) (i#TEMP .+4 r.lb644 MOV #l,(Ol#TE~P 016634 016644 ~0~e?1 #C!lriH~377 016644 J 0014Jl 01~43~ #-7,%12) D(0) t.iI#TEMP, .+4 PALX11 V003 14-F"EB-71 010442 211270121 l1Z536eJ 11215737 2116654 ""16644 ~10446 0121452 010456 010460 010462 H~42~~ 1044~it 2112737 ~10472 0127~2l 010476 105360 105737 001401 1eJ4flel0 ~1(l!502 010506 1211121510 12110512 00ilJ001 0121211211121 016644 ~16634 2116644 eJ00~"H 016644 17777121 12116654 016644 000377 000001 016644 010546 010554 010560 010564 010572 010574 010576 012737 01270121 105460 023727 001401 lel40e'0 104 4 00 010600 010606 010612 010614 010620 010626 010630 010632 012737 012700 000261 105560 023727 210141211 112140e0 104402 177777 177770 ~16644 177400 010634 010642 010646 12110650 eJ10654 010662 01121664 010666 012737 012700 177777 000010 12116644 016634 01.6644 0021377 ,,12737 0127Jr. 0112'n~2 0002bl 010704 *l,~#TEMP #10,"0 C( " ) ,#TEMP ,+4 MOV MOV NEGB CMP BEQ IofLT SCOPE MOV MOV NEGB CMP BEQ ~l,@#TEMP #-10,%121 0(0) 61#TEMP,.377 ,+4 .1,'.TEMP .+10,"0 C( 0 ) ,.TEMP,#'!;7 ,+4 ~LT SCOPE 016644 016654 016634 016644 17741210 ~0~4~1 ~16644 H~44'~0 010£'712' 0112'676 ~~10710 0rr"~010 Q"~0261 105562 023727 001401 le4000 ,+4 ~LT 1211121526 01121532 12110540 010542 12110544 ~11121522 MOV MOV DECB TST8 SEQ *-lel,%~ 0(0 ) (a#TEMP SCOPE leJ44e~ 012737 012700 1121546121 2123727 2101401 10412100 10440121 010514 PAGE 1-33 MOV DECB TST8 8EQ HLT SCOPE 17777~ ",,014Z1 010464 13:06 MOV MOV SEC ADCB CMP BEQ HLT SCOPE MOV MOV SEC ADC8 CMP BEQ HLT SCOPE MOV 177771 MOV le5t:::;' "'16654 ,,22/37 ;"~ ;~ SEC S8CB CMP '" ('11 ~16644 #-l,(I#TEMP #-10,"0 0(0) ,#TEMP,#1774eJ0 ,+4 *-l".TEMP #+10,"0 C (Ii!!) 6I#TEMP"17740~ ,+4 .401,'*TEMP #-7,"0 'J (~, #l,£i#TEMP PAL,#"", V~0~ 010716 ,HH401 01"72~ 104000 0HD22 14 ... rES;:'71 1044V';1t1 eHn24 (2112'737 ~eer,0.1 ~127e0 eH~0261 l~l01eJ 105660 (211215737 2101401 11214000 104400 016634 016644 ~10744 01075121 010752 010754 PAGE 1-34 BEQ f-lLT SCOPE c107,52 010736 wt0740 13106' 016644 010756 01121764 01121766 010770 123'727 01211401 104,00121 112144;10 016612 000252 01121772 011000 123727 0kH;401 12116613 000252 MOV MOV SEC S8CB TST BEQ f-lLT SCOPE .+4 #l,tiD#TEMP #+1(21,%0 C ( eJ ) @#TEMP , +4 ;TEST INDIRECT ADDRESSING ;TEST COMPARE INSTRUCTION ,#8,#0121121252 CMPB BEQ .+4 HLT SCOPE CMP8 BEQ HLT SCOPE (ittH~+l, #2'2 ,+4 ~11002 104:~HH' 011~04 10440121 01101216 011014 011016 011020 122737 ml2l1401 104000 104400 125252 016612 CMP8 BEQ HLT SCOPE IIl125252, .W8 ,+4 011022 1£'11030 01H:l32 0111£'34 123737 00t'401 104,000 104400 016612 016612 CMP8 BEQ HLT SCOPE ,;fjI8,(I#8 .+4 011036 011042 011046 011050 011052 113:700 12,2:700 ''16612 000252 011054 el1~62 011070 011072 011074 ?11076 ~11104 ~~ 11112 01111 4 l11116 ;TEST MOVE INSTRUCTIONS (1#8,%0 MOVB #9.100252, %21 CMPS • +4' BEQ HLT SCOPI: 001A ell 11214;00121 104400 016644 016644 MOVS CMPS SEQ HLT SCOP[ #125252,tI#TEMP B', tafl!TEMP .+4 ~16612 ~16634 005502 (?!16634 MOVB CMPB SEQ HLT SCOP[ tI#B,@#C S,'#C 112737 12 6~7 3 7 '!J01401 1 ~ 40 ~~ 0 104'4!CIJ 125252 113'737 1267::;7 0014?1 1 kl4 0~' 0 1044,,1.1 el05524 .+4 PALX11 V003 14-F"EB .. 71 211120 VJ11132 012737 105037 023727 177777 016644 216644 ~11140 rtH~1421 011142 011144 104e~:e 1~44~2 011146 125252 016644 125125 016644 011160 011166 011170 011172 012737 105137 022737 0014Qa 104000 104400 011174 011202 011206 011214 011216 011220 "12737 105137 222737 0014e1 104000 104400 125252 016645 052652 016644 011222 011226 011232 011240 011242 011244 005037 105237 022737 001401 104000 104400 016644 016645 011246 011252 011256 016644 011266 011270 2105037 105377 023727 001401 104000 104400 011272 011276 011304 011310 011316 011320 k111322 305037 112737 105437 022737 001401 104000 104400 016644 el1126 ~11154 ~11264 ""11324 0.11332 127727 001401 f1L~34 104000 011336 10440~ ~1113 011340 46 0014,' 1 01135~ 1f'14 [I ..~k:} 122777 iH~0040el 016644 177400 '-HlJ0NH ;TEST UNARYS INDIRECT #-l,til#TEMP MOV CI#TEMP CLRB (i#TEMP,#177400 CMP ,+ 4 BEQ HLT SCOPE *125252, .. #TEMP tII#TEMP *125125,.#TEMP MOV COMB CMP BEQ HLT SCOPE #125252,.#TEMP tI#TEMP+1 #052652,.#TEMP 016644 CLR INCB CMP BEQ IoILT SCOPE (I'TEMP _.TEMP+1 .400, .. #TEMP .+4 000377 CLR DECB CMP BEQ IoILT SCOPE tI#TEMP eITEMP+2 ta#TEMr:»,#377 .+4 016644 016644 016645 016645 1774~0 PAGE 1 ... 35 MOV COMS CMP BEQ HLT SCOPE 00537~ 016644 13106 016644 ~05264 125252 125252 0e5246 CLR MOVB NEGB CMP BEQ HLT SCOPE .+4 ,+4 ~#TEMP iH, ta# TEM!'+ 1 .'TEMP+1 *177400,_'TEMP ,+04 JTEST INDIRECT ADDRESSING ~IHf INDEXING ;TEST COMPARE INSTRUCTION 1118+2,#125252 CMPa ,+4 8EQ HLT SCOPE CMP8 8EQ HLT #125252 ... B+2 , +4 PAL.,..,., V0~3 14-FEB-71 le4~400 rl1354 011362 211364 ",:11366 127777 001401 1044('iC el137~ 1177Z~ ~05220 011374 011403 122700 125252 e!05?34 005232 104'e\:';~ ~11402 e114e4 104'400 e:11406 011414 011422 011424 112777 126737 001401 ~11426 104400 011430 011436 12111444 12111446 12111450 117777 126737 0'014 v; 1 104121'00 211452 3127~0 125252 2105172 005160 ~05150 2105232 2116644 005200 016634 1'477~0 1202127 ~01401 H~4000 011472 1~4400 011474 e11502 011510 r11516 011520 011522 012737 142777 122737 001401 104000 104400 177777 125252 12152525 011524 011532 012737 147777 126737 001401 177777 005056 "'05P!66 016634 005076 016634 177777 el16644 e11540 12116644 2135136 016644 104~HHlJ ~11552 104400 ?11554 r11562 012737 1~5077 ~05eJ60 ~11566 ~e5737 216644 i'115"/2 0e14~~1 ;'1157 4 ~'115 76 1 e4 4 k~ 0 1040~~0 MOV8 CMP8 BEQ HLT SCOPE #125252,'TEMP+2 8,6t#TEMp MOV8 CMPB _B+2, "C+2' 8,(!II#C ,+4 BEQ ,+4 }TEST BIC INSTRUCTION INDIRECT WITH INDEXING MOV #-1,"0 _8+2,%0 BICB CMPS "0,#52525 ,+4 BEQ HLT SCOPE 177777 005132 052525 ~11470 011546 211'550 tIlIB+2,.8+2 .+4 HLT SCOPE 1044~0 e.11456 CMPB BEQ HLT SCOPE ;TEST MOVE I~STRUCTIONS MOV8 1118+2,"0 CMPB #125252."" BEQ .+4 I-ILT SCOPE 1040~0 e11 4 62 011466 PAGE 1-36 SCOPE ~1135c ~01'401 1040~0 13:~6 MOV 8ICS CMPS BEQ HLT SCOPE #-1, @#TE~IP #125252,fIITEMP+2 #52525,GljTEMP MOV BICB CMPB BEQ HLT SCOPE j-l,GI#C f8+ 2 ,Gle. ~~ A+10,f#C ,+4 ,+4 :TEST UNARYS INDIRECT WITH INDEXING #-l,fI#TEMP MOV flTEMP+2 CLR8 ~#TEMP TST8 ,+ 4 8EQ HLT SCOPE PALX11 V003 14-I="E8-71 e11600 011606 2112737 1125177 122737 001401 1040e0 104400 125252 005034 052525 Qle5037 le5277 122737 01211401 016644 005010 ~11612 C11620 ~11622 ;.:1162 4 e11626 C11632 011636 011644 1211646 011650 011652 12,11656 011662 011670 011672 011674 011676 011704 011710 011716 0117221 005~37 1rl5377 123727 001401 104000 104400 012737 105477 122737 001401 016644 004764 016644 012737 12100261 105577 022737 001401 1k14001i!! 1rd5737 001401 "10V #125252,,#TEI-1P CO~B ~TEMP+2 CMPS 8EQ HLT SCOPE #052525,8I#TEMP .+4 016644 CLR INCB CMP8 SEQ HLT SCOPE 177777 CLR DECB CMPB BEQ HLT SCOPE (I#TEMP fIITEMP+2 ,#TEMP,# .. l .+4 MOV NEGB CMPB BEQ HL T SCOPE #l,(i#TEHP lIITEMp+2 # .. l,@#TEMP ,+4 MOV SEC ADCS CMP tII-l,lII#TEMP 0210001 004736 177777 016644 177777 016644 016644 H~4~00 01172 4 011732 011734 011740 011746 011756 e11760 011762 "'16644 1044e~ 1044QH!J ~11752 016644 1~4~e,0 ~11722 ~11750 ~"'''~0e1 PAGE 1·37 13:06 004706 1"174-0-0 -13"16644 BEQ HLT TST8 8EQ HLT SCOPE 016644 1040~0 104400 ~#TEMP (lTEMP+2 #l,(i#TEMP .+4 'T£HP+2 *177400,'#TEMP ,+4 .#TEMP .+4 tII1,(i#TEMP MOV SEC OEC8 TST ~#TEMP ~C1401 SEQ .+~ ~'12~1~ H'!40(;10 1 k'J 4 4 e' k.~ j.jLT SCOPE ~~12?12 a127 J 177772 e12l16 1(27C 7 2t'14 1 ~~16622 011764 e11772 e11774 0120~~ '~12 '-' ~ 4 012le6 012737 Ql00261 lk'J5377 Qle5737 0000"'1 016644 ~04646 016644 ;TES'" :Jr ~'12? 24 r: 12:';2 b V12?.3? 1~4? 0 H:'44 ~ I.ITEMP+2 CC~8INED INDEXING # ... 6,%0 AND INDIRECT ~OV 125252 CMPg ~A(QI),#125252 8_EO • +4 lolL; _ S(,Dor PAL-r. V003 14-r:EB-71 012032 012036 012044 0121700 ~12eJ46 104eJv~0 V127'50 1~44i'~ 012052 012056 012062 0122170 012072 012074 012700 177772 0127~1 e000e.2 12~071 016622 12277~ 177772 125?52 ~16622 "'01:4~1 016622 001471 104000 1~4400 012700 000006 177777 016622 125252 004534 004526 004520 2112700 012737 142770 123727 001401 104000 104400 177772 177777 125252 016634 2116634 016644 000125 012166 012172 -e12!/b 01221tl0 012202 2112700 023067 00t401 11tl4001tl 104400 016614 211tl4414 012204 012210 012214 012216 012220 2112700 025067 001401 112141210121 1044210 016616 004:376 012222 012226 012232 0122:34 012?'36 (2112700 125067 e16616 004360 0122176 012102 012110 '012116 012124 012126 012130 147067 122767 0ftH401 104000 104400 2112132 012136 012144 012152 012160 012162 012164 ~12767 13106 PAGE 1-38 MOV CMP8 8EQ HLT SCOPE: #-6,%0 MOV MOV CMP8 8EQ HLT SCOPE ,;-6,%0 #+2,%1 MOV MOV BICB CMP8 BEQ HLT SCOPE MOV CMP 8EQ I1LT SCOPE MOV CMP8 BEQ HLT SCOPE 00i4~1 012700 ~16640 ((112737 177777 016634 716634 177400 ,+4 ~A(0),~A(1) ,+4 ;TEST BIC INSTRUCTION #+6,%21 MOV #-l,TEMP MOV GtA(0),TEMiP 8IC8 #125252, 'T'EMP CMPB ,.4 BEQ HLT SCOPE MOV CMP BEQ HLT SCOPE 104000 104400 #125252,~A(0) MOV MOV CLR8 CMP 012240 012244 012252 105050 "~12?'54 12J237~7 V!12262 00141'1 SEQ vJ12?64 H~4~h',~ HL: #-6,%0 # ... l,.,#C *125252, (!!!TEMP (21) .*C, #21001.25 •• 4 #8+2,"0 ,(0)+,8 ,+4 tt8+4,"0 .- (0) ,8 .+4 j8·4,X0 ,8 ~- (e) .+4 #C+4,"0 #-l,@#C (it-(0) ~#C,#17740el , +4 JADOII'ESS or ADDRESS OF" 8 PALX11 Ve03 012266 1~4400 e12270 012737 012700 0127;H ~12276 v123~2 e123~6 141~)1 14-F"EB-71 177777 177772 177772 016622 177525 r.12322 012324 012326 e.1233el 012700 052525 ~12334 004767 000405 121627 001401 104000 000207 104400 000002 012340 e12342 012346 ~12350 012352 012354 012356 012360 012362 012366 e12370 012372 e12374 012376 e124r210 012404 0124[2)6 e12410 rl!12412 012 4 14 012416 e1242r21 012422 e12424 00[2)257 004717 121627 001401 104000 005726 104400 000257 "'04767 1004[2)1 104000 001401 1040[2)0 H'J2401 104000 103401 104 Ii"?) 0 C!l16634 016644 CH6634 TJSR3: 012362 CCC JSR BMI HlT BEQ HlT BVS 004052 1044e0 000257 012767 123456 ~124412l H~6e167 ~042~1 z12444 lrt3401 7012 4 46 le4~H30 H~2401 ('12 52 104000 0227b7 ;'12~62 "e14r1 ;::'12464 :"12466 H~4~'~'0 1 ~ 4 4 ~~ 0 ,,7, TJSR2 TJSR3 _,,6, #T JSFU 004204 ,,7 ee 4 162 JINSTRUCTION UNDER TEST JTEST THE STACK .PC Or JSR 010 NOT GO TO STACK JREPOSITION THE STACK }ClEAR CONOyTION CODES ,+4 ,+4 ,+4 ,+4 BCS HLT SCOPE JTEST ROTATE ODD BYTE SCOPE CCC #123456.TEMP MOV TEMP+1 RORB • +4 8CS HlT .+4 BVS CMP 8EQ HLT SCOPE 'INCORRECT PC ON STACK JRETURN TO IMST AFTER JSR "7,SuBR6 ~lT ?51456 ,PLACE PC ON STACK IRETURN HERE ON RTS "19 :CHECK rOR CORRECT PC ON STACK ,+4 ~lT e12426 ;"12454 JSR BR CMPB BEQ HLT RTS SCOPE CCC JSR ,,7,(1"7 CMPB '''6,#TJSR3+6 ,+4 BEQ HlT (6) + TST SCOPE :TEST NESTED SUBROUTINES 104.4~0 ;:11245~ 4 #-l,@#C MOV #.-6, %0 MOV #-6,%1 MOV (lA(0) ,&!'TEMP(1) BICB #177525,II#C CMP ,+4 BEQ HlT SCOPE :TEST THAT R0 IS NOT DESTROYED BY rALSE SELECTION MOV JTHIS IS CHECK lATER IN PROGRAM #52525,"0 :TEST JSR INSTRUCTION TJSR1: TJSR2: 012340 ~1243e i'12432 PAGE 1-39 SCOPE el22737 001401 le4000 104400 e1231 4 13:"6 JJSR OR RTS FAILED 'JSR OR RTS F'AIlEO JJSR OR RTS F'AIlED JJSR OR RTS F'AIlED .CLEAR "C" JROTATE ODD BYTE JC NOT SET JV NOT SET #051456,TE~P .+4 .ROTATE F"AILED PAL~ V0~3 e12470 ~12472 i:125Z2 l1250 4 l125e6 ~12'H~ 212512 012514 012522 01252 4 e12526 0e0277 012767 le6267 1~2e21 le4000 000277 012767 :1.06167 103401 10400k' 102401 104000 022767 001401 104000 104400 012630 e12632 012640 012644 e12646 000257 012767 106267 Ul3401 ~12650 t02001 ~12662 ~12664 e12666 e12670 e1267? '" 12 700 004104 e041~1 12'47056 123456 004041 047456 177777 00412162 004044 00412122 004004 e~40"1 e'03764 177777 ~'12710 102~r.l 1-40~ }SET C #123456,1'E~P TEMP+1 ,+4 • +4 JC NOT SET JV NOT CLEARED #151456,TEMP ,+4 ,ROTATE F'AILED MOV ROlB BCS HlT BVS HlT CMP BEQ HLT SCOPE SCC MOV ROL8 BCS HlT BVS HlT CMP BEQ HLT SCOPE CCC MOV ASRB Bes Bve HlT CMP BEQ HLT SCOPE #123456. 'f,[MP TEMP+l ,+4 .... 4 Ie NOT SET JV NOT SET • 0 4 7 1215 6 , 'f' EMP ,+4 .ROTATE BYTE F'IQLED .SET C #123456.l'EMP TEMP+l .+4 • C NOT SET .+4 IV NOT SET #047456, 'f'EMP .+4 .ROTATE 000 BYTE F'AIlED .CLEAR C #-l,TEMP TEMP+l ,+4 ,+4 • C NOT SET JV NOT CLEARED TEMP,#-l • +4 JSHIF'T F'AILED sce 0'0~277 r12706 MOV ROR8 BCS HLT BVC HLT CMP BEQ HLT SCOPE ~LT 1~4"00 026727 12!01401 1040k:10 1044'10 PAGE eee 123456 104"~H" 012767 106307 103401 104000 ?127e'4 004122 H~441t0 012570 012572 012600 012604 012606 0126H' 012612 012614 012622 e12624 012626 012652 012654 151456 104~HH'J 012566 ~12562 ~12564 ~H2!4144 H~4e.f\e 022767 001401 13f06 sec 123456 704141 1~34Z1 000257 012767 1e6167 103401 1.04000 102401 104000 022767 001401 10401!:l0 104400 012530 e:12532 e12540 012544 012546 e12550 012552 e12554 14-r:E8-71 177777 "'03741 003744 MOV ASL8 BCS HLT 8VC #-l,TEMP TEMP+1 ,+4 ,+4 JC NOT SET PALX11 V003 012712 104000 026727 001401 ~'12714 012722 \1:12724 V12726 PAGE 1 ... 41 QHI,3724 177377 H~4000 104400 I-lLT CMP BEQ HLT SCOPE IV NOT CLEARED TEMP,.177377 ,+4 JSHIFT BYTE FAILED JTEST COMBINATION OF N, C AND V ,MACR TNCV BPL ,+12 BCC ,+20 BVC ,+3"" HLT 8R BCC BVS HLT .+24 ,+16 ,+20 Jl=l Jl=l, C=l jl=C, BUT V=i ,l=0 ii!=0, C=1 Ii! NOT EQUAL C, V=i BR BVS Ji!=i, C=0 ii! NOT EQUAL C, V-1 ~LT BR ji!=0, C=rlJ 1i!=C, BUT V=1 BVC HLT SCOPE 012730 005037 012734 005000 005001 020001 001401 104000 020027 rll01403 005200 005201 000767 104400 e12736 fl12740 "'12742 el12744 012746 012752 012754 012756 012760 012762 .ENDM CLR '_ICOUNT JNO ITERATION JTEST ALL COMBINATIONS or NUMBERS WITH COMPARE INSTRUCTION COMPAR: CLR ~0 JINIT X0 CLR ~1 JINIT %1 CMP %0,%1 JARE THE EQUAL CMP1: BEQ ,+4 JR0 AND RiOlO NOT COMPARE ~L T CMP JAT UPPER LIMIT "0,#-1 BEQ JYES EXIT CMP2 IINCREMENT TO NEXT NUMBER INC ~0 INC "1 CMF'l BR SCOPE CMP2: 177777 ;TEST ROTATING ALL NUMBEAS SCOPE #-1 d~EFF MOV REFF TSROT: INC %7,ROTALL JSR CMP R.EFF,#-l BNE TSROT TSRT2A 8R 012764 012766 012774 104400 e13~00 004767 e02l((!12 V13710 4 e.13012 026727 000116 ~~13~14 000446 r13~16 (' 13 e 44 016767 006067 006067 006067 006167 00616/ e00060 ROR ROR ROL ROL .:.' 13 ;;'5;; ~06161 e0~054 ROL ?13024 (,13e30 ?1303 4 vj13~4~i'I 012767 177777 005267 ~01ZJ126 001370 177777 e0~104 ROTALL: MOV ee0120 ROR e0~074 000070 ~HH'I064 TNCV REFF,TEST TEST TEST TEST TE.ST TEST TEST JINITIALIi!E BASE NUMBER .INCREMENT NUMBER JGO TO COMPARE ROUTINE JTEST ALL VALUES INO TEST THEM ALL ,WE ARE OONE PAL~ V003 013~:...-, 100004 013056 1~30e7 '~13V'60 14-FEB-.71 1:3 J.~,6 Pl\~E 1-4,2 8PL BCC Bve !-ILT BR ~113064 102013 104000 0kH'411 f~13?J66 1030~6 Bce 013070 1024(:,7 104000 000405 102404 104000 000402 102001 104000 104400 026767 001401 104000 ItHll0207 000000 000000 BVS HLT BR BVS HLT BR BVC HL.T SCOPE CMP BEQ HLT RTS 0 013;;:'62 013~72 013074 013076 ~13100 013102 013104 013106 013110 ~'13112 ~'13120 013122 013124 013126 013130 000012 o 12HHH' 6 REF"F: TEST: 013126 013132 013140 013144 013150 013154 013162 013164 013166 013174 013200 ~'13204 013210 013214 "13220 013224 ~13226 ~13230 ~13232 ~13234 013236 '~1324 0 013242 013244 'H3246 013250 CH3252 '113254 l~13256 V'13260 r13~62 12112767 005267 004767 004767 2122767 2101366 000505 016767 106067 10612167 1136067 106167 106167 10~167 177777 177762 000016 2100122 177777 177766 177734 177730 177724 177720 177714 177710 177704 177734 177744 Jt=~ ;t ,+14 ,+12 .+6 ,+4 C=l NOT EQUAL C, V=l J~=0, J t =1, C:;:0 i i! NOT EOUAL. C, V=l Jt=0, C=0 Jt=C, BUT V=l TEST, REn.+4 JINITIAL NOT EQUAL TO VINAL %7 g) REF::REFF ;TEST ROTATING BYTE EVEN/ODD, ALL NUMBERS # .. l,REFF TSRT2A: MOV REf"F" TSROT2: INC JSR ,,',RoTBE JSR "7,ROTBO # ... l,REFF CMP TSROT2 BNE ROTEN1 8R REFF,TEST ROTS£:: MOV JROTATE BYTE EVEN RORE! TEST RORE! TEST TEST RORe TEST ROLE! TEST ROLE! TEST ROLE! 1044e~ 177636 ,+12 ,'+221 .... 30 BPL BCC BVC !-ILT BR BCC BVS HLT BR VS a HL f .+24 .+16 ,+20 SR .+6 Bve 1040'~Z 177642 ,+24 ,+16 .+20 Ji!=l J i! =1, C=l Jt=C, BUT V=l TNCV 100004 103007 102013 104000 000411 103006 102407 10il000 000405 102404 104000 0004r2 10 2 0l~ 1 026767 .... 12 .+20 ,+30 HLT SCOPE CMP Ji!=t it=1, J i!=C, .+14 .+ 1?: ,+4 TEST,RU'"F C=l BUT V=l it=0 Ji!=f;. C=l J l NOT EQUAL C, V=l C=21 NOT EOUAL ~i!=1, J i! 1i!=0, :::~ J t=C. BUT V=l e I V=l PALX11 V003 013270 013272 013274 013276 013302 013306 013312 013316 013322 001401 104000 2100207 106067 106067 106067 106167 106167 106167 013326 013330 013332 013334 013336 013340 013342 013344 013346 013350 013352. 013354 013356 013360 013362 013364 013372 013374 013376 013400 100004 103007 102013 104000 01iH'J411 103006 102407 104000 2100405 102404 104000 000402 102001 10400121 104400 11126767 001401 HlJ400i2J 0021207 104400 013402 013406 013414 013420 013424 013432 013434 013436 013440 013446 013454 013462 013470 013472 013474 013476 013500 013502 e135v.l4 013510 ,,11667 012767 005267 004767 022767 001370 000422 104400 016767 066767 166767 026767 001401 104000 :1.4-F'EB-7l 177627 177623 177617 177613 177607 177603 1775421 000072 01iHH!101 177506 0kHHH4 177777 177462 0"H~026 000020 177440 104411'0 000207 171534 177512 177474 177462 177454 177446 177440 13106 PAGE 1-43 BEQ HLT RTS RCTeo: RORe RORB RORB ROLB ROLB ROLB TNCV BPL BCC BVC HLT 8R BCC BVS HLT SR BVS IoILT BR BVC HLT SCOPE CMP BEQ IoILT RTS ROTENls SCOPE ,+4 "7 TEST+1 TEST+1 TEST+1 TEST+1 TEST+1 TEST+1 JROTATE BYTE 000 ,+12 ,+2111 ,+321 .l=l J l=l, C=l il=C, BUT V=l ,+24 ,+16 ,+2111 'l=21 'lee, C-l il NOT EQUAL ,+14 ,+12 '!=1, c=e 'l·e, C=0 .l NOT EQUAL C, V=l ,+6 ,+4 .!=C, BUT V=l TEST,REF'F" ,+4 '" IADD AND SUBTRACT ALL NUMBERS AGAINST ·F'IXEO NUMBERS IA+B=C, C.. A=B, BF' SHOULD EQUAL Bl TST AR I I MOV .. "6,NUMA MOV *l,REF' REF' ARITSTt INC ,,7,ADSU8 JSR CMP *-l,REF"F' ARITST BNE ARIENO SR SCOPE REF',TEST AOSUB: MOV NUMA,TEST AOD NUMA,TEST SUB REF',TEST CMP ,+4 BEQ HLT SCOPE RTS ~ NUMA: ARIEND: SCOPE '" 000000 104400 005067 ee3134 005e67 e~3134 JTEST COMPLIMENTING ALL TEMP CLR TEMP+4 CLR C, V=l ~UMBERS IBASE DATA 'BASE REF'ERENCE PAL"", V0 i03 14-I="EB-71 ~3:06 PAGE 1-44 l13: _ l13520 Z13524 :'13532 0e:5167 00,5367 02:6767 00 1401 112,4 :tl0i1 o e'51 b i ;'.03124 TeaM: :Z3H~2 COM DEC CMP SEQ HLT COM ~~"5261 .·e3~76 INC ~13534 ;'13536 ;'13542 ~'03124 0123114 003116 1 113545 e~1362 BNE ':13550 1044e0 SCO~)E 213552 013556 i~ 13562 :?13566 213572 2:.3600 00'5067 005067 ;~13602 213604 ~13610 013614 l13616 0136221 ;c13624 213630 e13634 213640 213646 e13650 013652 013656 013662 e13664 ''113666 013672 013700 013702 ~'13704 ~~13706 ~n371~ ~'13712 ~'13714 013722 ~~13730 v~13732 ~13734 Q:13742 ~'13750 ~:L3756 ~'13 76 4 ~:13772 10~167 1Z105367 126767 e01401 104000 105167 105267 001362 1044012 ~03066 ~03~66 e03056 003056 e03046 t1'Jk:'!3034 02)3030 005067 005067 105167 2l0p367 0032120 003020 0032111 12~767 02!3QJrll 0211401 104000 10f5167 105267 003050 ~0~eH'J 003002 0212767 002763 00~362 104400 0215"'67 126767 002752 002746 0~2745 00~401 1042100 002001 104000 00:3401 104000 062767 02?767 001.360 104400 012737 052737 042737 ra52737 0 4 2737 052737 it004~1 177777 ~0400e1 l~H'.3421 "100340 i'0fZ!3r0 "003~0 ? 121 k.~ 2 4 0 002722 002714 016420 177776 177776 177776 177776 177776 TEMP TEMP+4 TEMP,TEMP+4 ,+4 TEMP TEMP TCOM ;TE5T COMB (EVEN BYTE) CLR TEMP TEMP+4 CLR TEMP TCOM2: COMB TEMP+4 DEC TEMP,TEMP+4 CMPB .+4 BEQ HLT CaMS TEMP INC8 TEMP TCOM2 BNE SCOPE ;TEST COMB (ODD CLR CLR TCOM3: COMEI DEC CMP9 BEQ HLT COM8 INCa BNE SCOPE BYTE) TEMP TEMP+4 TEMP+1 TEMP+4 TEMP+1,TEMP+4 JCOMPLIME:NT DATA :DECREMENT REF"ERENC'[ ;COMPARE ;TE5T ;COMPLIMENT OR DECRE~E'IlT F"AILED ;INCREMENT AND TEST I="CR DONE JNOT FINISHEO GO LOOP ;BASE DATA :REf"ERENCE DATA JCOMPARE JCOMPLIM£NT OR INCREMENT BYTE FAIlEO IBASE DATA JREFERENCE DATA JODD BYTE .+4 ;COMPLIMENT BYTE FAILED TEMP+1 TEMP+1 TCOM3 ITEST COMPARE ALL VALUE EVEN BYTE WITH 000 TEMP CLR IBASE VALUE TEMP,TEMP+1 J COMPARE T5CQMS: CMPEI ,+4 BEQ HLT ,COMPARE FAILED ,+4 BGE HLT J V IS NOT = TO N • +4 BlE HLT IV IS SET #401,TE.MP AOD #-1,TEMP CMP TSCOMB BNE SCOPE MOV #40210,@#ICOUNT #340, GUSTATUS BIS #340,4i#S'fATUS SIC #300,@#STATUS BIS #300,@#STATUS BIC #240, GlItiSTATUS SIS PALX11 V003 e1400~ 2142737 2152737 2142737 2152737 12142737 12152737 ~i4~1216 014014 12'14022 014030 014036 "'14044 014052 01406121 01412166 14-F"E8-71 ~e0240 000200 00020121 ~00140 I'0e140 ~1001021 ~42737 tHH31Q10 052737 12142737 '~00040 ~eJ0040 13"'J6 PAGE 1-45 SIC BIS BIC 8IS SIC BIS SIC 177776 177776 177776 177776 177776 177776 177776 177776 177776 81S BIC SCOPE 1'~4400 .24e,'#STATUS #200,@#STATUS *2G'Je,~·STATUS #140,~#STATUS #140,'.STATUS tHe0, '.ST ATUS #1G'J0,@#STATUS #40dt#STATUS #4121,tI#STATUS ;TEST THAT A WAIT INSTRUCTION IS TERMINATED BY A ;TRACE TRAP 014070 014076 01411210 01411212 014104 014106 014110 014112 ~H~0020 177776 12112737" 2:121001121 016420 032737 1211211404 1211210001 021012101 01210001 0210001 WAIT3: H~440eJ '" 014120 014126 014130 014132 014134 014136 014140 014142 01415121 014156 014162 014164 014166 01417121 014172 014176 01421210 014202 014204 014206 014210 014214 014220 014224 123727 001404 1210121001 12102112101 Z0210el 0211224 000377 12100001 104400 2112737 2112767 02121367 1fZl0001 lfZl4000 01642121 000200 176752 176746 ~HH4eJ1 10412100 0210367 10e4e1 104000 176732 12101001 104000 1044e0 'H~5037 'H6420 0C5l6i' 17671121 1'76702 12105067 000367 1767~0 e'14230 026767 176674 ~14236 ~e14~1 e:14240 1(2'4020 17667121 BIT SEQ WAIT WAIT WAIT WAIT SCOPE MOV #2e,ft.STATUS WAIT3 JTEST OF TRACE BIT 'BRANCH iF NOT rOUND ,TRACE S~OULO PASS US JTHROUGH THE WAIT INSTRUCTION .10 , f l ' I COUNT ;TEST TO SEE IF 1/0 DEVICES WERE SELECTED .,REG1,.377 ,SELECTED DEVICES STORED IN ~EG1 CMPB BEQ WAIT4 JB~ANCH Ir NO DEVICES SELECTED WAIT 'INTERRUPTS WILL OCCUR WAIT IIr OEVICES ARE SELECTED WAIT WAIT WAIT4: SCOPE MOV ,TEST SWAB MOV SWAB BPL HLT BEQ HLT SWAB BMI HLT BNE HLT SCOPE CLR ."2"0,TE5T TEST •• 4 ,.4 TEST .+4 .+4 .. #ICOUNT ;TE51 ALL CO~8INATIONS OF SWAB CLR TEST CLR REF SWABA: SWAB TEST CMf' TEST.REF BE Q HLT JNUMBER UNDER TEST .REFERENCE NUMBER 'OPE~ATION UNDER TEST ,TEST SWAB INSTRUCTION ... 4 ,SWAB F"AIlED ::~ 1114246 i21 4 252 014256 21 4 26el e14262 ~~:~6 P4GE l-,\~ V~1~3 14-FE8-71 0~1~36 7 176662 176654 176653 SW413 INC INCI3 8~E TEST+1 SWABA ~QJ4000 SCOPE MOV #40r21eJ,tiD#ICOUNT 0~~267 i~§267 00:t,362 1014400 11'12737 016420 TEST ~EF ij£FERENC£ NUMBER I NO TEST NUMBER JLOOjl) TILL !:lONE 'INC~EMENT I NOP=240 ce=177776 000240 177776 ;MACRO FOR TESTING CONDYTION CODES .MACR 8MI HLT 8VS HLT BCS HLT SEQ Io4LT SCOPE .ENOM TSCC .MACR BPL HLT Bve HLT Bce HLT BNE HLT SCOPE ,ENOM Tcec ,+4 ,+4 'N IS NOT SET J V IS NOT SET ,+4 ,+4 Je IS NOT SET Jl IS NOT SET .+4 $N IS NOT CLEAREO .... 4 JV IS NOT CLEARED ,+4 f ,+4 0 IS NOT CLEAREO Il IS NOT CLEARED ,TEST MOV 014270 012737 014276 014300 014302 tj14304 e14306 014310 e14312 014314 014316 100401 104000 102401 104000 103'401 10401210 00f401 104:000 104400 e14320 012737 014326 10001211 1040('121 102001 V'14330 014332 000017 00e000 177776 177776 CCT1: MOV TSCC 8MI HLT 8VS HLT BCS HLT SEQ HLT seOPE #17,GD#CC MOV #0,~#CC BPL HLT ,+4 ,+4 iN IS NOT SET .+4 I V IS NOT Sri I C IS NOT SET .+4 .+4 : i! IS NOT SET TeGc Bve ,+4 IN IS NOT CLEt,Rf:.LJ PAL Xli V131213 014334 014336 01434121 e14344 e:14346 113412100 113"312101 11214"-10121 012111211211 104121130 1044010 01435121 O14352 0013257 "-162737 01436121 O14362 eJ14364 014366 0143721 014372 014374 014376 e!14400 112121401 1121413121121 11212401 113413eJ0 103401 11340eJ0 121"-11401 121413021 121441313 0144"-12 0144"-14 0013277 162737 014412 12114414 014416 014420 014422 e14424 ;;,14426 014430 014432 112102101 1214211210 10213"-11 12141210121 11213001 11214121021 121211001 11214121013 HH4013 014434 el14436 12113"-1257 162737 el14444 014446 014450 014452 014454 014456 014460 el14462 014464 100401 014466 01447eJ 01313277 042737 014476 10214211 10 41cHH~ 102401 10400e 1133401 U'4000 ~14342 e145~r2l 0145212 014504 0145136 014510 1~I-FE8-71 131136 PAGE 1 .. 41 IoILT BCC lolL T 8NE HLT SCOPE JV IS NOT CLEARED JC IS NOT CLEARED J i! IS NOT CU:ARED ,+4 ,+4 cce 0"02117 eJ~"-I1317 177776 177776 ADD TSCC BMI HLT BVS IoILT BCS HLT BEQ HLT SCOPE SCC SUB Tcce BPL HLT BVC HLT BCC HLT BNE HLT SCOPE 1'17761 177776 H~40021 11324"-11 104"-1"-10 H'3401 H'J 4 "-1"-10 121014131 104"-100 10440el CCC SUB TSCC 8MI HLT 8VS HLT BCS HLT SEQ #17 da#CC ,+4 ; N IS NOT SET ,+4 ,+4 ,+4 177776 SCC BIC TSCC BMI HLT BVS HLT BCS HLT IS NOT SET JC IS NOT SET J! IS NOT SET #17,..#CC ,+4 ,+4 ,+4 ,+4 IN IS NOT CLEAREO IV IS NOT CLEARED IC IS NOT CLEAREO Ii! IS NOT CLEARED '-17,'#CC ,+4 IN IS NOT SET .... 4 ,+4 ,+4 HLT SCOPE 01aeJ000 JV IV IS NOT SET JC IS NOT SET J i! IS NOT SET JN IS NOT SET JV IS NOT SET JC IS NOT SET 'lC!,li#CC ,+4 .+4 .+4 PAl~ V,,'Wl' e'1451~ ~"lt40l '114514 ~14516 104"00'0 104"4·00 e.14520 12100'277 014522 ~4t3737 e14530 100001 014532 014534 014536 014540 014542 014544 014546 014550 H~4000 014574 014576 014600 014602 100401 104 0013 102401 1214:2100 103401 11340021 ,,01'401 104'000 104400 014604 014606 "},00'277 052737 014614 014616 014620 014622 014624 014626 014630 014632 014634 U'J0:401 1214:0013 102401 104000 103'401 104000 0131:401 104'13013 104:4021 014636 014640 0210 i277 0215037 '-"14644 014646 014650 e1465a 014654 1~Hl'2101 104'rlH~0 ~14660 177776 10~000 014562 014564 014566 014570 e14656 177757 0211001 1214000 104400 QJ~"~257 052737 '-HH~017 177776 104;000 , 103,001 104;000 00HH!1 ~314662 104;~00 ~14664 10440'" PAG€ sec BIC Tecc BPL HLT BVe HLT BCC HLT BNE HLT SCOPE cce 8IS TSCC BMI HL.T 8VS HLT BCS HLT 8EQ HLT SCOPE 1 1212,0~1 13' 0'6 BEQ HLI SCOPE 102001 1134012'0 103ftHH 014552 014554 01~572 144-F'EB-1f 12100000 177776 sec 8IS TSCC BMI HI..T BVS Io4I.. T BCS HLT SEQ HLT SCOPE 177776 sce CLR lCCe BPL HLT BVC HLT BCC HLT BNE HLT SCOPE: :t:"4'~ ..... 4· ti.' 1 7 7 7 5 7 , J2 IS NOT s;£r IN IS NOT CLEARED JV IS NOT CLEARED ,. # CC .+4 ,+'" • +4 I C IS NOT CLEARED .... 4 I~ IS NOT CLEARED IN IS NOT SET JV IS NOT SET #17,tt#CC ....... .... 4 .... 4 IC IS NOT SET .+4 Jl IS NOT SET IN IS NOT SET JV IS NOT SET JC IS NOT SET Jl IS NOT SET IN IS NOT CLEARED #0,lt#CC , ... 4 .+4 .+4 ,+4 ~#CC ,+4 .+4 J V IS NOT CLEARED .+4 JC IS NOT CLEARED J i! IS NOT CLEARED .+4 PALXll V~~3 /14666 210'0257 2100261 2105337 7:467~ 1':4672 ?1 4 676 z ;':.4 7 2 :'147e2 l147e4 2'14706 104~00 2101001 104000 l1472Z e14722 e14724 2100257 000261 005637 e1473~ 100001 104000 102001 104000 103001 104000 001001 104000 104400 2112737 2113767 2126727 001401 104000 005037 104400 005737 100003 2152737 ~14736 e14740 e14742 l14744 e1 4 746 214750 r1 4 752 ::'14760 e1 4 766 e14774 014776 e15200 e15e04 215226 215e12 e15e14 2112767 000261 105567 (?15~32 e15736 ' 103401 715042 10 4 000 022767 ~'15042 ;.-150:,e JIZI1401 11505? 104000 ~15e54 H~4400 (15~56 ~00402 ~e0167 ,'152'6 ~ .. "-, 1 ;'6 4 177776 10440~ (,15e22 015232 177776 177357 177776 001652 ' 177776 001656 000357 ' 177776 015542 000020 177776 177777 001614 e01607 000377 001574 000.362 ll44~~0 163172 ~e5071 • J. :'66 ,,- -:.? ~127l1 12~252 ;'1 •.J..k',n (..... ~12777 177760 , PAGE 1-49 cce 1030~1 e147H~ 13=06 SEC DEC TCCC BPL HLT 8VC HLT BCC "'LT BNE HLT SCOPE 1000e1 104000 1020el HH000 214712 214714 e14716 214732 2,14734 14-F'EB-71 163166 163174 CCC SEC, SSC TCCC BPL HLT BVC HLT BCC IoILT BNE HLT SCOPE MOV MOV CMP 8EQ HLT CLR SCOPE TST 8PL 8IS ~#CC ,+4 IN IS NOT CLEARED .+4 ,.4 JV IS NOT CLEARED ; C IS NOT CLEARED ,+4 ; i! IS NOT CLEARED I!b#CC ,+4 •• 4 ,+4 IN IS NOT CLEARED J V IS JC NOT CLEARED IS NOT CLEARED ,+4 Ii! IS NOT CLEARED #177357,'#STATUS Ci.STATUS,TEMP TEMP,#357 ,+4 l!t#STATUS I!b#TRP8 ,+10 #20,(iI#STATUS #-l,TEMP MOV SEC TEMP+1 ADC8 .+4 8CS !-ILT ti377,TE~P CMP .+4 SEQ HLT SCOPE .+6 EAESRT: SR JMP ENDEAE ;TEST LEF"T SHIFT SCOPE (ilMQ CLR #125252,~AC MOV MOV #-16. , @LSH JT BIT F'LAG .SET THE T BIT JNOP IF" NO EAE ITEST JLOAC ;LOAD 'LOAD OF" LOGICAL SHIF"T MQ WITH 0 AC WIT~ 125252 SHIF'T COUNT (LSH) wyT!-I -16 P'At.f\ V003 14-rEB-71 i0151~b 0~i5777 163154 1ST ~AC 015112 015114 1015116 015124 015126 17151.3;;' 1015L3b 015140 ~014k11 BEQ .+4 le:4000 WLT 015142 1~15144 ~2:2'!71 125252 13:06 163140 0e14~1 1 e:4 0 e 12) 122777 001401 le i4000 104400 12105077 012777 0f2777 005777 10:0401 10'4000 005777 rlJ01412l1 163114 177777 000020 163076 12'2777 210'1401 10'4000 015216 015220 015226 015234 0152421 .015246 015250 015252 015260 015262 015264 015272 015274 U3A400 01'2777 012777 0e;5077 022777 00:1401 104000 02:2777 001401 10'4000 12~2 777 00·1401 1(2)40(2)0 #125252,~MO •+4 015276 015300 015306 015314 1015322 015324 104400 2112777 012777 022777 tZ15~~26 00:5777 162732 NH~300 015344 104000 122777 001401 ~15346 015350 163110 163120 163064 H~l40012l 000110 CMP!3 BEQ HLT 1.63134 163060 #20,(tilSRE • +4 ;TEST RIGHT SHIFT SCOPE ~MQ CLR #-1 diAC MOV MOV #16.,'AS~ @AC TST ,+4 8MI HLT GH1Q TST ,+4 BEQ HLT CMP(3 #110,flSRE BEQ • +4 HLT :TE5T y)15336 C~P BEQ ~LT e00~20 1015150 1015156 015164 015170 015172 015174 015200 015202 015204 015212 015214 015332 v115334 PAGE 1""5,2 .COMPARE AC ,\II I T~ ;CO "'0 HLT IF BAD " .COMPARE MQ wITH 1252~;2 ,GO TO ~LT r F BAD JCOMPARE SR WITH 2 .5KIP HLT IF" GOOD JHALT ON ERROR CLEFT SHIF"T) ,TEST OF' ARITHMETIC SHIFT .LOAC MQ WIT~ 0 JLOAD AC WITIoI -1 JLOAD SHIFT COUNT (ASH) WITH 16. J COMP'ARE AC wITH 1000el0 • SK IP HLT IF' GOOD JI-lALT ON ERROR JCOMPARE MQ WITH 21 ;SKIP HLT IF' GOOD :HALT ON ERROR .COMPARE SR WITH 1(2) JSKIP HLT IF" GOOD .HAlT ON ERROR (RIGIolT SHIrT) NORMALl~E ;TEST OF' NORMALli!E JlOAO MQ WITH 125252 )LOAD AC WITH 1700(2)0 JSTART NORMALI~E .COMPARE AC WITH 1000~5 .SKIP HLT IF" GOOD • HALT ON ERROR :COMPARE MQ WITH 52520 JSKIP HlT IF' GOOO :HALT ON ERROR ,COMPARE SC WITH 3 ;SKIP HLT IF GOOD • HALT ON ERROR (NORMALIrE) 1e4~~0k."l SCOPE #125252,t.aMO MOV MOV #170000,'AC {iNOR CLR CMP #101210e15,taAC ,+4 BEQ HLT #52520,rIIMQ CMP ,+4 BEQ HLT #3,~SC eMPB 8E'Q ' • +4 I-jLT ;TEST MUl T !'PL Y SCOPE #125252,(JIMQ MOV #40000,CfMUL MOV CMP #165252,@AC ,+4 BEQ HLT @;MQ TST , ... 4 8MI HLT CMPg ~312!0,~SRE ,+4 BEQ HLT JTEST OF MULTIPLY ILOAD MQ WliH 1252~;: JLOAD MUL WY T f-: 4 17)0f2J 0 ;COMPARE AC IoJ I "1 H 1652 JSKIP IF GOOD JHALT ON ERROR ;COMPARE MQ wITH HHH'H~ ;SKIP ~LT IF GOOD JHALT ON ERROR ,COMPARE SR HTTI-! 30i? ISKIP HLT IF (('00 IHALT ON ERR0~1 (MULTyPLY) H~'4400 ;TEST DIVIDE SCOPE ;TEST OF DIVIDE 125252 17002'0 1630421 163036 163032 HHH~05 1631320 052520 163004 000003 162776 125252 040000 165252 162756 162760 162744 12!~1401 H~4000 H~0401 162726 PAL Xli VfZe!3 14-F'EB-71 PAGE 1-51 ?1535::' 012777 012777 012777 125252 ~e5777 t':?1 4 ;':1 162666 MOV MOV MOV TST BEQ HLT CMP BEQ HLT SCOPE 015~60 015366 (115374 1': 15.: l2 ~:, 15 4 Z2 ,-' 154 e'4 ~~ 15412 015414 r.15416 U!44ee 01542~ ;?J12767 e15426 015430 ?-15434 e15442 015444 015446 01545'11 015456 0~H~261 Ztleee2 ~22777 152525 162652 177777 12'01216 21131211 177377 001202 ~~14;)1 le4e~e 1e5667 022767 ee1 4 el 104e!e0 10442)0 012737 000024 012737 00~026 000401 000423 012737 H'J5777 100375 e:15504 012777 105777 1ee!375 177776 015530 015536 032737 001406 0 4 2737 000137 e15542 00e0ee e15544 015552 015556 215564 215572 e15572 '-'15600 012737 005037 2142737 e"0016 ~H!5137 e15542 100003 052737 00e167 177732 e15520 015526 162704 1627021 162702 12'4;:?Z 015464 015466 0154712' 015476 0155'112 215512 015516 177777 ~15604 0~000e ~156e6 ;'1561~ 0e0~~f' eee0e'2 ;:'15612 ~'1 5 t 14 e~e2ee ~eel2e 0:.0000 1775721 r"0360 177776 ek'3750 t'll5610 ~'Hl360 0~,e020 liH'H?J2I14 177776 177776 MOV SEC S8CB CMP BEQ HLT ENDEAE: SCOPE MOV MOV SKPBEL: BR SR MOV TSTB BPL #125252,.MQ #-l,"AC #2diilOIv (alAC .+4 tt152525,'MQ .+4 ILOAn MQ WITH 125252 ILOAC AC WIT~ -1 ILOAC DIV WITH 2 AND DIVIDE ;COMPARE AC WITH 0 (QUOTIANT) :SKIP HLT IF' GOOD :HALT ON ERROR ;COMPARE MQ WITH 152525 :SKIP HLT IF' GOOD ;OIVIOE ERROR TEMP+l #177377,TEt-1P ,+4 .PF AI L dI-#24 #3421,tI#26 ,POWER FAIL VECTOR :PROCESSOR PRIORITY ,+4 ,SKIP OVER BELL-NOP ON CORE TRPA #200,tI#CC taTCSR JLOCK OUT TTY INTER~UPTS ,WAIT F'OR F'LAG; MAKE SU~E NOT BUSY EXPA~SION .-4 :8ELL ON PASS COMPLETE #207,tlTDBR BELL: MOV TSTB 'TCSR .... 4 BPL ,ROUTINE TO CHECK FOR TRACE TRAP TO BE RUN WITH pROGRAM *10000,tI#SR ,SHOULD WE RUN WITH TRACE T~AP TRTRAP: BIT BEQ YESTR JYES #360,Iit#CC :CLEAR TRACE TRAP BIC ,#BEGIN JMP .START Of TEST wrTH TRACE orF' TRPA: TRPB: o ;SAVE OLD CONTENTS, SET UP FOR TRACE TRAP VESTR: MOV #YESRT,@*14 'NEW TRAP VECTOR CLR ~#16 iNEW CONOITION COOES BIC .360,,#CC COM li#TRPB BPL ,+121 BIS #20,f#CC JSET TRACE TRAP JMP TRPA JSTART OF' TEST WITH TRACE YESTR1: 21 YESTR2: '" YESRT: RTI HALT PRFLAG: 0 O~ ,STORAGE FOR OOT PC JSTORAG FOR ODT STATUS ,RETURN TO PROGRAM FRO~ TRAP JRTI FAILED ,PRINT ROUTINE BUSY IF' NOT ~ER~ ;ENTEREO WITH SYSTEM TRAP CALLCHLT) SPRINT OUT THE ERROR PC AND STATUS REGISTER \/003 14-~E8·-71 13:06 .1561,6 ~"~5767 177772 PRINT: e1562~ 21e14el ~lXl1 015624 e15626 [15632 015640 015642 315644 01565~ 015654 015656 015664 ·015670 015672 ~1!5700 k115704 (0)5706 015714 015720 01572~ 0r572~ 177762 161732 l02166 e00140 02H~215 eee130 000212 ~00074 2'00072 l00074 000074 000240 0002154 015762 015766 015772 015776 0167e2 e1600~ 0167e4 ~0e022 016006 016012 016014 016016 016022 005767 100001 000000 005067 0000e2 161556 016024 0e0000 000000 000000 177566 177564 016030 016032 016034 016036 0162140 016042 016046 016052 016056 016064 016072 000116 200e16 01~467 ~16026 000132 00~114 0167e2 1104767 012777 105777 100375 e157'~ 162112 700144 01573t> 01574~ 020000 002164 0'1573~ 01574(> 015754 0047Q7 20e052 2(30050 0167~2 e0Z026 016703 00e024 00£ll2l56 177572 ~00000 005067 ~0e252 10(?244 01271.'4 012767 012 7 67 ~16324 ~12767 2 01 1:773J H~5777 10~375 .... 4 BEQ 8R MOV MOV CMP BIC TST8 BPl MOV T5T8 8Pl MOV TST.8 8PL MOV MOV MOV MOV JSR MOV 1ST8 BPL. MOV JSR MOV MOV MOV PRINT1: TST BPL HALT CLR RTI PRF"LAG SR,#20300 • + 4 PRINTl (6)+,SAVPC (6)+,SAVCC -(6),-(6) 1i140,STATUS GliCSR J 70~>~7'5 ~'h~??7 ? eJ~' PRTA8: 001236 00Ql220 0vH~214 WA I T1 : IS ROUTINE BUSY ;YES EXIT SET F'lAG .TEST FOR IN~li3['T' PRINf OUT JBRANCH TO PR I I\lT JINHIBIT. RETUI:{N TO "1AIN STRIEA~ IPC OF' FAllING ROUTl~E .CC OF' ERROR CONOITION JREPOSITION TIo1E STACK INO n~A I T FOR FLAG .-4 #215,.TD8R ,TCSR .-4 #212, ~tTDe~ (laTCSR .CR JlINe: F'Ee:D ,-4 "2,SAVR2 "3,SAVR3 ~4,SAIJR4 SAVPC,"2 ,,7,PRTAB #240,.TDBR dHCSR , ... 4 SAVCC,X2 "7,PRTAB SAVR2,X2 SAVR3,"3 SAVR4,X4 SR 'SAVE R2 'SAVE R3 .SAVE R4 ,PRINT OCTAL. NUMBER SSPACE Be:TWEEN WORDS ,PRINT OCTAL NUMBER 'RESTORE REGISTERS ,TEST FOR HALT SWITC~ ,+4 PRF"l.AG 'I-fALT ON ERROR SET .CLEAR FLAG WHEN OONE 'RETURN TO MA I ~J STREAM 0 0 0 177566 177564 .DATA ,STATUS IZ' III ;ENO OF 8UFF"=FIN 005067 V'16HH PRF'L ... " INC BIT SAVR2: SAVR3:. SAVR4: T08R: TCSR: SAVPC: SAVCC: 000ee0 016756 e16HH., TST SEQ RTI 210~HH"2 005267 2136727 0014el ~H"?J 4 61 2'12667 012667 024646 0 4 2767 HlJ5777 100375 2112777 le5777 100375 012777 105777 100375 2110267 010367 PAGE 1-52 CLR CLR MOV MOV MOV MOV TSTB BPL BINeT WGTCT #LIST,%4 *5,ASCNT '117, SE VE\J #l,DECt-1L ~TCSR IoiA ITl PI~OGRA"'I-S~' JGET lIST ADDRESS AREA. FALX11 V003 14-rE8-71 2161~6 ae5702 01611~ H~0404 l16112 2112777 "e0403 012777 0167;: 3 e10267 :-H6122 216122 ~161..32 21613 4 21614~ e16144 ~~ 1615 klJ e16152 2116160 e16164 ;216170 Wl.6172 016200 016204 016212 016216 016222 e16226 e16230 ~16234 016242 016244 016246 016250 016256 2116262 016264 016270 016274 016276 016300 0e5167 0 4 67e3 2"~ 14 H~ 066767 005267 026703 062767 016724 066767 005067 0e5067 2105367 0 Z 1:' 6 ~02150 202144 ~0e14J ~0e136 000126 000260 0001~2 000076 000074 066767 Qle532\3 1301373 ",00730 1312767 105777 100375 014477 2105367 000e52 0e0050 000005 177552 eeel"'44 177542 e0~026 00141~1 177530 000000 rz"HH"~0 Ql0001~0 0000'~0 "f,H~0'~0 ee ~H:~ I~ e ,,0 ~H:"~ 0 "e 012!,~e / ,PUT MASK IN R3 .GET READY TO DOODLE NUMBER IN TOODLE :COMPENSATES FOR COMPLEMENT DURING BTC JAND IN OCTAL C~ARACTER J~ERO, WRITE 0 IN LIST .COUNT UP TO JAND RECORD iSAME BINARY WEIGI-IT JKEEP COUNT~ .ADD ASCII PREFIX .WRITE ASC I I CHAR I~ LIST .EXPAND BINARY WEIGHT J 5 CI-IAR IN LIST JSET X3 fOR ADD LOOP 'MAKING SEVENTY BY SEVEN 'NX SEVEN SE:T GET NX OCTAL .SEND 5 CHAR TO TTY JfINISH PRINTING GET NXT NUM JI-IEAD fOR HOME "0 '" 161432 0e~H:' ;,el~(,5 :1635.~ eJ27b7 7 ;NEG SIGN PRINT 1 'POS SIGN PRINT 0 :( 0 ;SCOPE LOOP ROV TINE ENTE~ED 8Y USER TRAP (6)+,"6 !REPOSITION THE STACK SCOPEB: CMP (6) +, CC :J:OR ~~HEN TRACE IS ACTIVE. MOV ~RETuRN ;SCOPE RETURN JMP 000ekH~ oe 1.3 c' TST "2 8MI MINUS #260,€lT09R MOV 8R STAR _261,~TD8R MINUS: MOV MOV SEVEN,%3 STAR: MOV %2,TOOOLE COM TOODLE TOODLE,%:5 BIC BEQ wRToe OECML,WGTCT MKNUM: ADD INC BINCT CMP WGTCT,%3 MKNUM BNE *260,BINCT WRToe: ADD BIN CT., ( 4 ) + MOV SEVEN,DECML ADD CLR WGTCT CLR BINCT DEC ASCNT BEQ XLIST MOV .3,"3 SEVEN,SEVEN MOADD: ADD DEC "3 BNE MOAOD STAR BR *5,ASCNT XLIsr: MOV ~TCSR WAIT2: TSTB WAIT2 BPL -(4),aaTOBR MOV ASCNT DEC BEQ IoIDF'~M WAIT2 BR HDFHM: TSTB (ITCSR ,-4 BPL RTS "7 TOODLE: 0 SEVEN: OECML: 0 WGTCT: 0 BINCT: 0 .. . -, ASCNT: I2J -'e; LIS T: ~ 0~HH300 :' PAGE 1 .. 53 '" 0000,?'0 7'16344 355 000102 000H~0 (l!226C6 0126 c'-: ~'16 0e0120 00e114 2'1634~ ~16336 000136 ee.2134 e~eee3 0002e7 0163321 ?16332 016334 177702 ~. 0127Z3 016306 ~16326 l0~261 ~01410 e16304 016312 01631 4 016316 016320 016322 r16324 177712 0~H370 2100767 105777 100375 Z163H~ Z0e26J 13=06 ;' 4 L' 4 L.' 'll 161212 ;SCOPE ORlAND ITERATJ:J\I LOOF' rOR EACH TEST 4000 TIMES #4l~0~,SR ,TEST SR fOR SCOPE SCOPEC: BIT ,YES SCOPE 8NE SCOPES -i(L Xlii V003 14-FES-71 ,163610 01636!6 101637i0 eJ 16 3 7i6 01641Oi0 216401 4 ~ 16 4 0:6 016412 016416 eo 16 4 2:0 016422 016424 ,,32767 r.:1040,~0 016426 016430 016432 016434 016440 016442 016446 016 4 50 016454 016456 016462 13:06 16122'2 'H~1~el7 026767 001433 000026 ~eJ5267 ~H:HP:;4 k'07016 0105067 011667 000022 SCOPEG: e00010 e.(2l00e6 0~00j{'2 ICOUNT: SCOPEF: RETURN: 004000 000000 00375k1 ~04767 177766 el0el207 004767 177766 #40"' .... ,SR SCOPEG SCOPEF, I COUNT SCOPEG SCOPEF SCOPES SCOPE.F" ~%6,RETURN 177766 "7 ~002eJ7 - TEST F"OR ITERATION .NO .INIo4IBIT ITERATION - i EX I T nONE iINCREMENT COUNT iLOOP SOME MORE ;ClEAR COUNT ,SAVE SCOPE RETURN POINTER ;RETURN INLINE-NEXT TEST JCOUNT LOCATION paR ITERATION LOOP .ADDRESS OF" LAST TEST "7 0002107 177770 SIT BNE CMP BEQ INC 8R CLR MOV RTJ 4000 el BEGIN iGROUP OF NESTED SUBROUTINES ~7 SUBR1: RTS SCC SUBR2: RTS X7,SUSR2 JSR SUBR3: RTS %7 X7,SUBR3 SUBR4: JSR RTS ,,7,SUBR4 JSR SUBR5: RTS %7 ,,7,SUSR5 SUBR6: JSR RTS %7 2I0el207 0k'H3277 004767 "O0207 004767 00el207 PAGE 1-54 JaNE INSTRUCTION JONE OEEP JTWO DEEP JTHREE DEEP ;F"OUR DEEP ;F"IVE DEEP ;ENTER HERE OR PQWEIR F"AIl 016464 016466 016470 016472 016474 016476 016500 016504 01651l? 016516 016522 e.1652~ 01653l 01654~ 016542 016544 016550 016554 e16560 ~16564 ~'16570 r16574 ~~ 16576> 010046 010146 010246 010346 010446 010546 2116746 012737 (2113746 013746 '1113746 010667 012767 000000 000000 0167e'6 1Z112637 012637 012637 C1J05037 1Z112667 2112605 0126Vi4 ~166~0 0126r~ C16602 0126':~2 r166~4 21126J1 6 VI 6 01261'10 ~'16 PF"AIl: 161320 0kll0002 0011'266 000264 000270 000010 016544 177772 000270 000264 00~266 000"'06 161?30 000006 161264 SAVR6: RESTART: to1DV to1av Mav MOV Mav MOV Mav Mav Mav MaV Mav Mav MOV HALT "0,,-(6) "1,,-(6) "2,,-(6) "3"-(6) %4,,-(6) %5, ,- (6) 24,,-(6) ,SAVE REGISTER OR STACK JWHEN POwERING DOWN *RTI,~#6 J I1t#AC,-(6) @#MI~,-(6' @#SC,-(6) %6,SAVR6 #RESTART,24 121 MOV MOV MOV MDV CLR MaV Mav MOV MOV MOV MOV MOV IN SAVE OF NE EAE SAVR6,%6 JSTORE STACK POSITION ; H ! T ON POWER DOWN NORMAL J S ': ACK IS SAVED ~ERE :RESTORE REGIS'rER OFF" STACK (6)'·,~#sc (6)·~,tit#MQ (6)··,tit#AC ~#6 (6) ,10,24 ( 6 ) " , %5 (6),', %4 (6),', %3 (6);', %2 (6H·, %1 (6) .... %0 JMQ MUST BE L.O~'OEO JRESTORE. TIME our IWI.fEN POWERING UP BEF"ORE AC 13:216 PAL Xli VI(l~3 ~16610 l2I~el002 016612 125252 e16614 ~16616 0166t2 052525 016622 016624 016622 177777 016626 .=B+10 A: 12116626 125252 .=A+4 016626 016630 016632 016634 016636 016644 016646 016652 016654 016756 ~1676el 0.16762 016770 016776 01.7004 0170,06 0170lr~ 017014 10171212113 01,7026 e!17034 017042 017050 v)17056 1017064 '11 7072 14-rE8-71 RTI 1210ell2lel0 12116634 016644 .=C+1~ 012l000~ TEMP: 2116644 21ri.H~000 r17102 (2112 61~2 021375121 121121121401 0k'Jl~00 16077121 16121766 017102 000340 C?37770 057770 077770 117776 13777eJ 157770 7;26 [17104 ~05 ~~171f216 02 2 71~ 2 ~'1711(> ill i£h 4;~ Ql (' 1 7114 022?02 to' 1712 k-; 12101463 JADD~ESS 0 TEMP TEMP+lk'J ~ D: .=.+100 FIN: 0 RTS USER: 21k'J0207 000442 JAODRESS OF" A+l21 OF" C .ADDRESS OF" TEMP .=TEMP+6 12116652 016654 00k'Jel00 2116756 1:.:171100 lADDRESS OF 8 -1 A+4 125252 A+10 2152525 JFOR STORAGE 0 C: C 052525 0137,37 :RETURN TO MAIN LINE 125252 B: iFIXEO VALUES FOR USE I r..J TEST B 052525 ~16632 12116762 012767 012767 12132767 2101401 0121121207 016746 016746 012767 012767 013737 013737 013737 013737 12113737 PAGE 1-55 e1774J " 1 J i' 4 6 176550 176466 16121564 160756 16~752 ~3771el ~57771O e.77770 117"770 137770 15 7 77121 JADDRESS OF" TEMP ... 10 OR ~7 "0" JBUF"F"ER F"OR SP ;OVERLAY USER ROUTINE HERE IF" 4KW, USE BANKl yr 8KW ;PDP-l1 MEMORY DETERMINATION AND SETUP iUSE WITH VARIABLE CORE QUANTITY SYSTEMS .=FIN + 4 JAPPLICABLE TO SYSTEM JEST 21 MOV #8EGIN,TRPA+2 DET1: .401,SKPBEL MOV JaR .'" 4 BIT #100el,SR JCHECK VARIABLE CORE SWITCH BEQ DET4 JUSE VARIABLE CORE ROUTINE RTS ;4K ONLY ~7 4, - (6) MOV ;SAVE TRAP VECTOR OET4: 6, - (6) MOV JSAVE TRAP STATUS #OET2,4 :TRAP VECTOR SETUP MOV #340,6 MOV .TRAP STATUS SETUP •• 37770,.#37770 JCHECK F'OR 8K MOV E I GI·n: ,#577710,.#057170 HoJELVE: MOV JCHECK F"OR 12K ~#0777T0,'#07777~ SXTEEN: MOV JCHECK FOR 16K ~#11777e.,'#117770 TWENTY: MOV .CHECK F'OR 20K ~#137770"#137770 ,CHECK FOR 24K TWOF"OR: MOV ~#157770,~#15777eJ TWOEIG: MOV JCHECK FOR 28K STRT28 8R (6)+,%2 MOV JRETRIEVE TRAP PC OET2: (6) + TST IDISCARD TRAP STATUS WORD CMP #EIGHT+4,%2 8EQ J4K DET3 CMP #TWELVE+4,%2 8EQ STRT8 J8K ~LX11 ..,17122 017126 017130 017134 017136 v)17142 et17144 017150 017152 017154 017160 e17164 017166 017170 017172 017176 017200 017202 1211721214 12117206 017212 12117216 017220 017224 017230 017232 017236 14-FE8-71 13:06 022702 001453 ",22702 ",O1443 022702 e17054 CMP 8EQ CMP 8EQ CMP 8EQ CMP BEQ SR MOV !JET3: MOV RTS CLR "lOVE: MOV ADD MOV CMP 8NE RTS STRT28: JSR JSR 8R ST~T24: JSR JSR 8R STRT221: JSR JSR 8R STRT16: JSR JSR BR ~17242 ~210744 "'214767 004767 000737 017256 017262 017266 017270 017274 017300 017302 017306. "'17312 017316 017346 017352 017356 ~H 7 362 2104767 2104767 2100732 21e4767 G!H2l4767 ",00725 012701 ",O4767 012701 k!l04707 2112701 004767 012701 004767 012721 004767 01271'1 ",04767 000207 ~17326 017332 017336 ~17342 O17762 017070 ~01433 022702 00142.3 0"'0415 012667 012661 000207 005000 01(1)102 062702 012021 020201 001375 12100207 004767 ,,04767 ,,012l756 004767 004767 000751 21214767 21214767 017244 017250 017254 ~17322 PAGE 1-56 V"'03 017076 160626 160620 016760 00121070 12100146 "'00066 I2l 0 fi315 0 0210064 21210152 00~062 000154 0f2!12!060 000156 000056 00016'" 140000 ' 177654 120000 177644 112!0000 177634 ~60000 177624 040000 177614 0200('10 1776C114 116146 2112767 143756 o 0 ~12 4 0 123756 ~12767 0~W240 ~76e50 v.17364 ~12767 (' 1 7372 ~12767 V174~0 v: 1 7 4 ~ 6 116~64 r;-76132 STRT12: JSR JSR 8R STRT8: JSR JSR BR XFER28: MOV JSR XFER24: MOV JSR x~ER20: MOV JSR XFER16: MOV JSR XFER12: MOV JSR MOV XFER8: JSR RTS MOV -.1002 4 : MOV MOV ~OD2.:': MOV #SX"' t.t.t'II+4, Xt? STRT12 #TWENTY+4, %t? STRT16 #TWOFOR+4,%2 STRT20 #TWOEIG+4,%2 STRT24 STRT28 (6) +,6 (6).~, 4 %7 %0 %1,"2 #FIN+2,X2 on •• , (1)+ %2,"1 ... 4 %7 ,,7, )(FER28 %7, ~10D24 1121( 1161( J201( ;241< J28K ;RESTORE TRAP VECTOR ;RESTORE TRAP STATUS JCOMMENCE: PROGRAM ISET UP MAIN CORE CURRENT .SET UP ~AX CORE MOVE JMOVE WORD JMOVE COMPLETE? ;MOVE ANOTHER WORI() JMOVE COMPLETE JSTARr 281< TRANSF[R JSTART 24K MODIFY DET~5 %7,XFER24 %7,~10D212! DET3 JSTART 241< TRANSFIER .START 2"'1< MODIF"Y "7,XFER2~ "7,~10D16 DE T~~ .START 201< TRANSF"IER JSTART 161< MOOIF"Y "7, )'FER16 "7, ~WD12 ;START 16K TRANSF"IER .START 12K MODIFY DET~I ,,7,XFER12 %7'~'OD8 OEnl %7, )(FER8 "7,~10D4 DEn) #140000,"1 "7,~10VE JSTA~T 12K TRANSFER JSTART 81( MODIF"Y JSTART 8K TRANSF"EI~ ;START 4K MODIFY JSET UP MOVE START LOCATION JGO TO MOVE SUBROUTINE #1200210,%1 "7, ~'OVE #HH'000, %1 %7, ~10VE #60~'00, %1 %7,~IOVE #40~'00, %1 %7,MOVE #221000,%1 %7,~10VE %7 :RETURN I="ROM TRANSFERS #BEGIN+140006,TRPA+120002 #NOP.SKPBEL+120000 #BEGIN+120006,TRPA+le0002 #~ap,SKPBEL·1000~0 PAL Xli V003 017414 V17422 V,17430 012767 012767 012767 012767 012767 012767 012767 012767 0002e7 000001 ~~17436 ?17444 j'17452 Z1746~ v)17466 017474 14-rE8-71 13:""6 PAGE 1-5' MOD16: MOV MOV MOV MOV MOV MOV MOV MOV 1213756 2156116 ~0e240 ~56~34 ?63756 036102 eJ36e.20 MOD12: e0~';?43 l43756 ~16e66 MOD8: N:P~40 2!162!eJ4 17612152 175770 1"23756 00e240 MQD4: RTS .END #8rGIN+1~0006,TRPA+60~02 #NOP,SKP9EL+621000 #8EGIN+6~0~6,TRPA+40002 #NOP,SKPSEL+40000 ~8EGIN+4021e.6,TRPA+20~02 #NOP,SKPBEL+20000 #BEGIN+221006,TRPA+2 #NOP,SKPBEL %7 JRETURN rROM MODIfY ~LX11 A AC I AOSU Bi AR IE Nio ARITS:T ASCNT ASH 8 BEGIN BELL sINeT SR BUFF C cc CCT1 CLI~CT CMPl CMP2 COMPAR CURPAT 0 l)ATAl DATA2 OATA3 QATA4 OECML DELAY OETl DET2 OET3 oET4 DIV DO EAESRT EIGHT ENDEAE F FEND1 !="ENOZ! FIN FUNCTI HOFHM ~LT HPCSR HPDBR HPOUT f-iPOUTl HPOUT2 r-iPOUTR i--1RCSR rlRD8R V0e!3 14-FEB-71 e!16622 2100266 2113440 ~SRINl ~13502 ICOU\!T IE !NTCNT IRF LIST LKl LK2 LK3 LK4 LKCSR LLIMIT LP1 LP2 LP3 LP4 LP5 LP6 LPCSR LPDBR LPINTR LSH MAINLI MINUS MKNUM MOADO MOO12 M0016 MOD2eJ M0024 MOD4 2113414 2116322 r2!003~4 2116612 003750 12115504 12116320 itH'le!002 0167?6 2116634 177776 12114270 0022152 012740 2112762 012734 002046 016654 2HH32e! 001366 001452 12101554 016314 12Hi)15 6 0 2116762 017102 12117154 017010 000276 0021001 ,,15056 017034 11'15446 00210210 0flJ2230 ~02206 016756 002170 016300 104000 0021234 000236 001454 0211462 001536 0211472 000230 12l0r?l232 ~SRI\J2 ~SRI"JR M008 Movr MQ MUL N NOEAE NOP NOR NUMA PFAIL PRFLAG PRINT PRINTl PRTAB R Rtl RO REF REFF 13106 210137121 001376 001404 016420 2112112110121 21211556 01212104 016324 01211562 00161212 2101604 0211622 00121240 01212172 21121171212 12101710 2101770 1212120021 00212136 211211736 21021242 000244 211211726 210121302 12'01206 12116122 016152 016234 017430 017414 017400 017364 017460 017444 12117166 0021264 00121274 0002101 000366 2100240 21003210 013500 ~H6464 015614 015616 016006 01612142 ~040eJ0 eJeJ21~02 00001214 013126 013126 !'AGE 1 .. 5e REG1 RENOl REN02 RESTAR RETURN RF1 RFCAR RFCSR RFCSRH RFOAE RFDAR RFOBR RFSTAR RFWC ROT ALL ROTBE ROTBD ROTEN1 SAVCC SAVPC SAVR2 SAVR3 SAVR4 SAV!R6 SC SCOPE SCOPEB SCOI=>EC SCOPEF SCOPEG SEVEN SKPBEL SOLPAT SR SRE STl ST2 ST3 SJ4 5T5 5T6 ST7 ST8 ST Af~ STAf~T STAI~T2 STATUS STRT12 STRT16 STRT20 STRT24 STRT28 01211224 002434 002404 2116544 016424 e!eJ2e!6~ 000256 ~e!eJ26e! 000262 012121246 0121121252 00212521 212122154 00121254 2113016 013166 013276 01340121 016!2!40 016036 016~24 2116026 016030 016542 0210270 104412'0 016336 016350 016422 2116406 11'16312 015464 "02050 177570 "00272 0210"636 0210654 00217210 "210732 12100754 001020 01211052 001142 2116130 e!21040e! 0e10440 177776 017256 017244 017232 ~17;?2e! 017206 STRT8 SUBR1 SUBR2 SU8R3 SUBR4 SUBR5 SU8R6 SWABA SXTEEN TC TCl fC2 rCBA TCBlK TCCM TCDT TCEXPE TCF1 TCF1A TCF2 iCF3 TCF4 TCFIRS TCIv rCLAST TCOM TCOM2 TCOM3 TCRl TCR1A rCR2 'fCR3 TCR4 TCR81 TCRBi< TCR8UF TCSR TeST reW81 iCWeK TCWBUF TCWC TD8R TDSR TEMP TEST TIME TJSRl TJSR2 'TJSR3 TOODLE TRCSR ~1727e! 2116426 2'16430 2116434 Q'16442 QI16450 2116456 12114224 211705121 1.77340 0121121322 0100342 021121316 121022212 01212131216 12112121312 0121221214 21022621 m02252 0212312 211212326 0212374 21212176 0121121320 002200 1313514 013562 2113630 002532 211t'l2566 "02574 002610 "'02656 002722 0"2664 002750 016034 000310 002504 002452 02'2750 000314 016032 0162134 'H6644 e!13130 e!I2l1700 C?J12340 012342 012354 016310 0002221 PALX11 V003 TRDR TRPA TRPB TRTRAP TSCOM8 TSROT TSROT2 TSRT2A TSTARI TTCSR TTDSR TTYIN1 TTVIN2 TTVIN3 TTYIN4 TTYINR TWELVE TWENTY TWOEIG TWOFOR TYOUT TVOUT1 TVOUTR USER WAIT1 WAIT2 WAIT3 WAIT4 wD WGTCT wORDeT wRTOC xFENDi! xFER12 xFER16 xFER20 xFER24 xFER28 xFER8 XLIST vESRT V[STR vESTR1 VESTR2 000222 01-5536 015542 015520 e13672 2112774 01314~ 013132 211341712 000224 0021226 2101226 0"'1234 2101302 12101306 12101242 12117042 2117056 12117072 017064 001322 l2!eJ1330 21"'1340 01676'" 01610121 (lJ16256 211411'" 014140 210012114 2116316 1211212174 016172 002402 2117342 017332 017322 017312 017302 017352 016250 1211561'" 015544 0156i'4 0156116 [RRORS OETECTECI 0 FlU~-TIME: ~) K 22 C0 .~ E USE D SECO~I)S 14-r[8-71 13106 PAGE 1-59
Source Exif Data:
File Type : PDF File Type Extension : pdf MIME Type : application/pdf PDF Version : 1.3 Linearized : No XMP Toolkit : Adobe XMP Core 4.2.1-c043 52.372728, 2009/01/18-15:56:37 Create Date : 2013:11:27 20:37:16-08:00 Modify Date : 2013:11:27 20:47:19-08:00 Metadata Date : 2013:11:27 20:47:19-08:00 Producer : Adobe Acrobat 9.55 Paper Capture Plug-in Format : application/pdf Document ID : uuid:d2eb6217-11d0-43a2-95b5-9df8eebff5db Instance ID : uuid:c5857baf-4b94-4f01-804f-184f112ac0e9 Page Layout : SinglePage Page Mode : UseNone Page Count : 72EXIF Metadata provided by EXIF.tools