DR11A DEV REG TST AH-8669B-MC SEP. 1979

CZDRIBO COPYRIGHT 76-79 dl ill ital!

“FICHE T OFT MADE IN USA

MAIN. MACY11 3 1B.P11 06

a se ns et OOO NAWE GINO ODNOU BW =

OA(10 -MAR~

52) 79 1

O6-MAR=79 14:52 PAGE 2 4:47

«REM %

IDENTIFICATION

PRODUCT CODE: AC-86688-MC

PRODUCT NAME: CZDRIBO DR11A DEV REG TEST DATE: MARCH 1979

MAINTAINER: DIAGNOSTIC GROUP

THE INFORMATION IN THIS DOCUMENT IS SUBJECT TO CHANGE WITHOUT NOTICE AND SHOULD NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL EQUIPMENT CORPORATION. DIGITAL EQUIPMENT CORPORATION ASSUMES NO RESPONSIBILITY FOR ANY ERRORS THAT MAY APPEAR IN THIS DOCUMENT.

THE SOFTWARE DESCRIBED IN THIS DOCUMENT IS FURNISHED UNDER A LICENSE Save 1 atieae BE USED OR COPIED IN ACCORDANCE WITH THE TERMS OF

DIGITAL EQUIPMENT CORPORATION ASSUMES NO RESPONSIBILITY FOR THE USE Oe amaatiel OF ITS SOFTWARE ON EQUIPMENT THAT IS NOT SUPPLIED BY

COPYRIGHT (C) 1976,1979 BY DIGITAL EQUIPMENT CORPORATION MAYNARD ,MASSACHUSE TTS

SEQ 0001

MAIN. MACY11 eth 4 O6=MAR=79 14:52 PAGE 3 CZDRIB.P11 O06-MAR=79 14:47

ABSTRACT

tiolate Otte SNE Ril RS 2 nacre (M980). THIS TEST WILL CHECK UP TO 32 SEQUENTIAL DR11A°S. THIS PROGRAM HAS BEEN RENAMED FROM D8L TO DZDRI. REQUIREMENTS

EQUIPMENT

PDP-11 STANDARD COMPUTER

DR11A

M980 FOR EACH DR11A

STORAGE

PROGRAM STORAGE = THE ROUTINE USES MEMORY FROM 0000 10 5000.

LOADING PROCEDURE

ME THOD

PROCEDURE FOR NORMAL BINARY TAPES SHOULD BE FOLLOWED. STARTING PROCEDURE

CONTROL SWITCH SETTING

STARTING AT SA 200 ALL SWITCHES SHOULD BE DOWN OR ZERO. (IF NOT ZERO, BIT 0 TO 8 WILL BE STARTING VECTOR.)

STARTING ADDRESS OR ADDRESSES (A) 200 = START OF TEST PROGRAM AND/OR OPERATOR ACTION

LOAD PROGRAM INTO MEMORY. SET SWITCH REGISTER TO STARTING ADDRESS. LOAD ADDRESS. SET SWITCH REGISTER EQUAL TO FIRST DR11A INTERRUPT VECTOR. PRESS START. THE PROGRAM WILL STAY IN SECTION AND LOOP. IF SWITCH REGISTER EQUALS ZERO, 300 IS SELECTED AS THE VECTOR. ON A RESTART, THE PREVIOUSLY SELECTED VECTOR WILL BE USED.

OPERATING PROCEDURE OPERATIONAL SWITCH SETTINGS

-MAIN. MACY11 Pee O6-MAR=79 14:52 PAGE 4 CZDRIB.P11 06=MAR=79 14:47

5.1.1 AT_SA 200..THE INSTRUCTION AND LOGIC TEST. a en tence rae DOWN THE PROGRAM WILL PRINT

OR UP ... HALT ¥ ERROR oP

OR

OR PRINTOUT

OR --.- INHIBIT TRACE TRAPPING

OR .-- INHIBIT ITERATION LOOP

WILL BE USED AS VECTOR ADDRESS IF NOT ZERO.

SUBROUTINE ABSTRACTS BEGIN SA 200

THIS SUBROUTINE CALL IS PLACED BETWEEN EACH SUBTEST

IN THE INSTRUCTION SECTION. IT RECORDS THE STARTING ADDRESS OF EACH SUB-TEST AS IT IS BEING > tats

IF A SCOPE LOOP IS REQUESTED, IT WILL JUMP TO THE

START OF THE SUBTEST THAT THE SCOPE LOOP IS REQUESTED FOR.

HALT

1 1 1 1 1 1 1 1 1 1 1 1 1

Non a SS oS SO -OVOWDNAUESWN-OO

IS_A_ ROUTINE THAT PRINTS-OUT AN ADDRESS THAT TAGS THE FAILING SUBTEST, AND THE INCORRECT DATA AT THE TIME OF THE FAILURE.

PROGRAM AND/OR OPERATOR ACTION

LOADING AND STARTING AT 200 WITH ALL SWITCHES DOWN

IS THE INSTRUCTION AND LOGIC TEST. IF AN ERROR

IS DETECTED HERE, THERE WILL BE 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.

ERRORS ERROR PRINTOUT

ARE IN A FOUR WORD FORMAT. THE 1ST IS THE PC+2 OF THE DETECTED ERROR. THE 2ND IS THE PROCESSOR STATUS REGISTER. THE 3RD IS DEVICE ADDRESS. THE 4TH IS VECTOR ADDRESS.

ERROR RECOVERY

RAKUNLS

—_— SV eS es oes oe ot St lw “—

2598

-MAIN. MACY11 30A(1052) O6=MAR=79 14:52 PAGE 5 CZDRIB.P11 O6-MAR-79 14:47

DEPRESS CONTINUE TO RESTART SECTION

RESTRICTIONS

STARTING RESTRICTION

NONE

OPERATIONAL RESTRICTION

Ha Bayt Ba HAVE THE M980 MAINTENANCE MODULE TO RUN

NOTE THAT THE DR11A HAS FLOATING VECTORS:

THE BELOW IS THE ASSIGNMENT OF FLOATING VECTORS, THE ASSIGNED SEQUENCES ARE:

1. STARTING AT 300 ALL DC11"S WILL BE ASSIGNFD.

THEN ANY KL11 CALLED FOR (VT05, VTO6, LC11)

THEN ANY DP11 CALLED FOR.

THEN ANY DM11 CALLED FOR.

THEN ANY DN11 CALLED FOR.

THEN ANY DM11BB CALLED FOR.

THEN ANY DR11A CALLED FOR. THE _DR11A DEVICE ADDRESS WILL BE ASSIGNED IN THE USER AREA OF 767776 TO 764000. THE ASSIGNMENT OF ADDRESS WILL START AT THE HIGH ADDRESS |.IMIT AND PROCEED DOWNWARD. USERS AND SPECIAL SYSTEMS SHOULD START THEIR ASSIGNMENT OF SPECIAL DEVICES AT THE LOW ADDRESS LIMIT AND WORK UP.

767776 TO 767770 DR11A #0 767766 TO 767760 DR11A #1

767706 TO 767700 DR11A #7

767606 TO 767600 DR1I1A #15 MISCELLANEOUS

EXECUTION TIME

FOR EACH DR11A ABOUT 2 MINUTES UNTESTED LOGIC

-MAIN. MACY11 ae sthg

CZDRIB.P11 205

3333

ronrnny —_

Nononenonon non ad cath ad ae ch ed a col WONAWUSWR oO

06-MAR~79

06-MAR-79 4:47

14:52 PAGE 6

10. TT.

THERE ARE TWO FUNCTIONS NOT TESTED.

PROGRAM DESCRIPTION

THIS PROGRAM WHEN STARTED AT 200 CHECKS THE SWITCH

REGISTER FOR ALL_ ZEROS, IF NOT ZEROS THE BITS 0-8 ARE USED AS THE FIRST VECTOR ADDRESS OF THE DR11A°S.

THE PROGRAM THEN PERFORMS AN INCREMENTAL LOGIC CHECK FOR THE SELECTED DR11A.

THE DATA REGISTER IS TESTED TO SEE IF ‘RESET’’ CLEARS IT. IF IT WILL HOLD ALL COMBINATIONS OF NUMBERS.

THE READ/WRITE BITS OF THE STATUS REGISTER ARE ALSO TESTED.

BOTH THE ‘‘A'' AND ‘B’' INTERRUPTS ARE TESTED TO SEE IF THEY INTERRUPT AT THE CORRECT BUS REQUEST LEVEL BR-5.

ONE FULL TEST OF THE DR11A_ IS MADE WITH THE T BIT OFF. THE SECOND PASS IS MADE WITH THE T BIT ON.

AT THE END OF THE SECOND PASS THE DEVICE ADDRESS IS INCREMENTED BY 10, AND THE VECTOR POINTER IS DECREMENTED

Y 10. THEN A TEST IS MADE TO SEE IF THERE ARE ANY MORE DRIIA’ S_ AND THE PROGRAM WILL RESTART AND RESET THE VECTOR AND ADDRESS FOR RETESTING THE SERIES OF DK11A.

IF A POWER FAIL OCCURS THE PROGRAM WILL REPORT IT AND RESTART AT THE BEGINNING OF THE PROGRAM.

LISTING FLOW CHART (S) %

SEQ 0005

-MAIN, C7DRIB.P11

MACY11 ee ve

06-MAR-79

177776

O6-MAR=79 4:47

14:52 PAGE 7

GENERAL REGISTER LOGIC TEST STATUS=177776

NOP=240

SCOPE = rth oad

: TRAPPED ; TRAPPED ; TRAPPED ; TRAPPED 3 TRAPPED ; TRAPPED ; TRAPPED ; TRAPPED ; TRAPPED ; TRAPPED ; TRAPPED ; TRAPPED ; TRAPPED ; TRAPPED ; TRAPPED ; TRAPPED ; TRAPPED ; TRAPPED ; TRAPPED ; TRAPPED ; TRAPPED ; TRAPPED 3; TRAPPED

PREVIOUS PFEVIOUS PREVIOUS PREVIOUS PR-VIOUS PREVIOUS PREVIOUS PREVIOUS PREVIOUS PREVIOUS PREVIOUS PREVIOUS PREVIOUS PREVIOUS PREVIOUS PREVIOUS PREVIOUS PREVIOUS PREVIOUS PREVIOUS PREVIOUS PREVIOUS PREVIOUS

LOCATION LOCATION LOCATION LOCATION LOCATION LOCATION LOCATION LOCATION LOCATION LOCATION LOCATION LOCATION LOCATION LOCATION LOCATION LOCATION LOCATION LOCATION LOCATION LOCATION LOCATION LOCATION LOCATION

-MAIN. MACY11_ 30A(1052) 06-MAR-79

CZDRIB.P11

298 299

301 302 303

SSSsss

WNWAWWG USWN oO

009000 000142 000000 000146 000000 000152 000000 000156 000C00 000162 000000 000166 000600 000172 000000 000176 000009 000202 000000 000206 000000 000212 000000 000216 000000 000222 000000 000226 000000 000232 000000 000236 000000 000242 000000 000246 000000 000252 000000 000256 000000 000262 000000 000266 000000 000272 000000 000276 000000

O6=MAR=79 14:52 fFAGE 8 14:47

; TRAPPED ; TRAPPED 3 TRAF ED ; TRAPPED ; TRAPPED ; TRAPPED >; TRAPPED ; TRAPPED >; TRAPPED ; TRAPPED ; TRAPPED

TRAPPED 1

; TRAPPED ; TRAPPED ; TRAPPED ; TRAPPED ; TRAPPED ; TRAPPED ; TRAPPED ; TRAPPED ; TRAPPED ; TRAPPED ; TRAPPED ; TRAPPED ; TRAPPED ; TRAPPED ; TRAPPED ; TRAPPED

TO PREVIOUS

PREVIOUS PREVIOUS PREVIOUS PREVIOUS PREVIOUS PREVIOUS PREVIOUS PREVIOUS PREVIOUS PREVIOUS PREVIOUS PREVIOUS PREVIOUS PREVIOUS PREVIOUS PREVIOUS PREVIOUS PREVIOUS PREVIOUS PREVIOUS PREVIOUS PREVIOUS PREVIOUS PREVIOUS PREVIOUS PREVIOUS PREVIOUS

LOCATION LOCATION LOCATION LOCATION LOCATION LOCATION LOCATION LOCATION LOCATION LOCATION LOCATION LOCATION LOCATION LOCATION LOCATION LOCATION LOCATION LOCATION LOCATION LOCATION LOCATION LOCATION LOCATION LOCATION LOCATION LOCATION LOCATION LOCATION

-MAIN. CZDRIB

MACY11 30A(1052) O6=MAR=79 14:52 PAGE 9 P11 O6-MAR=79 14:47

000000 000322 000000 000326 000000

; TRAPPED ; TRAPPED ; TRAPPED 3 TRAPPED ; TRAPPED ; TRAPPED ; TRAPPED 3 TRAPPED ; TRAPPED ; TRAPPED ; TRAPPED ; TRAPPED 3 TRAPPED ; TRAPPED ; TRAPPED ; TRAPPED ; TRAPPED ; TRAPPED ; TRAPPED ; TRAPPED ; TRAPPED ; TRAPPED ; TRAPPED ; TRAPPED ; TRAPPED ; TRAPPED ; TRAPPED ; TRAPPED

PREVIOUS PREVIOUS PREVIOUS PREVIOUS PREVIOUS PREVIOUS PREVIOUS PREVIOUS PREVIOUS PREVIOUS PREVIOUS PREVIOUS PREVIOUS PREVIOUS PREVIOUS PREVIOUS PREVIOUS PREVIOUS PREVIOUS PREVIOUS PREVIOUS PREVIOUS PREVIOUS PREVIOUS PREVIOUS PREVIOUS PREVIOUS PREVIOUS

LOCATION LOCATION LOCATION LOCATION LOCATION LOCATION LOCATION LOCATION LOCATION LOCATION LOCATION LOCATION LOCATION LOCATION LOCATION LOCATION LOCATION LOCATION LOCATION LOCATION LOCATION LOCATION LOCATION LOCATION LOCATION LOCATION LOCATION LOCATION

-MAIN.

CZDRIB.P11

000502 000506

cee |

MACY11 30A(1052) O6=MAR=79 14:52 PAGE 10 06-MAR=79 14:47

; TRAPPED ; TRAPPED ; TRAPPED ; TRAPPED ; TRAPPED ; TRAPPED ; TRAPPED 3 TRAPPED ; TRAPPED ; TRAPPED ; TRAPPED ; TRAPPED ; TRAPPED ; TRAPPED ; TRAPPED ; TRAPPED ; TRAPPED ; TRAPPED ; TRAPPED ; TRAPPED ; TRAPPED ; TRAPPED ; TRAPPED ; TRAPPED ; TRAPPED

TRAPPED

; TRAPPED ; TRAPPED

TO TO TO TO

PREVIOUS PREVIOUS PREVIOUS PREVIOUS PREVIOUS PREVIOUS PREVIOUS PREVIOUS PREVIOUS PREVIOUS PREVIOUS PREVIOUS PREVIOUS PREVIOUS PREVIOUS PREVIOUS PREVIOUS PREVIOUS PREVIOUS PREVIOUS PREVIOUS PREVIOUS PREVIOUS PREVIOUS PREVIOUS PREVIOUS PREVIOUS PREVIOUS

LOCATION LOCATION LOCATION LOCATION LOCATION LOCATION LOCATION LOCATION LOCATION LOCATION LOCATION LOCATION LOCATION LOCATION LOCATION LOCATION LOCATION LOCATION LOCATION LOCATION LOCATION LOCATION LOCATION LOCATION LOCATION LOCATION LOCATION LOCATION

SEQ 0009

-MAIN. MACY11 a i pei 14:52 PAGE 11

CZDRIB.P11 06-MaR-79 SEQ 0010 466 000656 000000 HALT ; TRAPPED TO PREVIOUS LOCATION 467 000660 000662 +2 468 000662 000000 HALT TRAPPED TO PREVIOUS LOCATION 469 000664 000666 .+2 470 000666 000600 HALT TRAPPED TO PREVIOUS LOCATION 471 000670 000672 +2 472 000672 000000 HALT ; TRAPPED TO PREVIOUS LOCATION 473 000674 000676 .+2 474 000676 000000 HALT ; TRAPPED TO PREVIOUS LOCATION 475 000700 000702 .+2 476 000702 000000 HALT ; TRAPPED TO PREVIOUS LOCATION 477 000704 000706 +2 478 000706 900000 HALT ; TRAPPED TO PREVIOUS LOCATION 479 000710 000712 .+2 480 000712 000000 HALT ; TRAPPED TO PREVIOUS LOCATION 481 00071% 0600716 .+2 482 000716 000000 HALT ; TRAPPED TO PREVIOUS LOCATION 483 000720 000722 .+2 484 000722 000000 HALT ; TRAPPED TO PREVIOUS LOCATION 485 000724 000726 +2 486 000726 (00000 HALT TRAPPED TO PREVIOUS LOCATION 487 000730 (00732 .+2 488 000732 600000 HALT ; TRAPPED TO PREVIOUS LOCATION 489 000734 000736 .t+2 490 000736 000000 HALT TRAPPED TO PREVIOUS LOCATION 491 000740 000742 .+2 492 000742 000000 HALT ; TRAPPED TO PREVIOUS LOCATION 493 000744 000746 .+2 494 000746 000000 HALT ; TRAPPED TO PREVIOUS LOCATION 495 000750 000752 .+2 496 000752 000000 HALT 7 TRAPPED TO PREVIOUS LOCATION 497 000754 000756 .+2 498 000756 000000 HALT 7 TRAPPED TO PREVIOUS LOCATION 499 000760 000762 .+2 500 000762 000000 HALT TRAPPED TO PREVIOUS LOCATION 501 000764 000766 .+2 502 000766 000000 HALT 7 TRAPPED TO PREVIOUS LOCATION 503 000770 000772 .+2 504 000772 000000 HALT ; TRAPPED TO PREVICUS LOCATION 505 000774 000776 .+2 206 000776 000000 HALT ; TRAPPED TO PREVIOUS LOCATION 208 ; TRAPPED TO PREVIOUS LUCATION ay ; TRAPPED TO PREVIOUS LOCATION 512 30 = 513 30 003510 PRINT 514 000032 0 40 515 34 004220 SCOPEC 516 000036 000340 517 518 519 000046 .=46 20 000046 003464 $SENDAD

MACY11 wid Pil 0o

000052

—MAR-79 000052 040000

000200 000167 001000

167770

167772 000300 000302 000304

000000 000240

06-MAR-79 14:47

003236

14:52 PAGE 12 »=52 40000

-=200 JMP BEGINA -=1000

: THESE ADDRESSES AND VECTORS ARE MODIFIED BY THE PROGRAM.

: 147770

10: : 167772

: 300 : 302 304

0 240 ADDRESS AND VECTORS

HBLFF ,.%6 #BEGIN,RETURN SAVR6

cd

17674C #12,10 176726 46,4

177710

177670

177630 DR11B:

177604 177600

090006 176560 000100 003036

177576

TRPB #CSR,GRSTAT #CSR+2,GRD10 #CSR+4,GRDAI #CSR+3,GRBHIO oh

a¥sR,

x0

DR11B #177000,%0 %0,DR11B+2 (0) + %0,DR11B+10 (05+ %0,DR11B+16

#300,GRIVA #302.GRIVSA #304; GRIVB

DR11C: MOV MEJFF ,%6 DOES RESET CLEAR REGISTER? BEGIN: SCOPE GRIVSA,@GRIVA @GRIVSA

#6,4 #100, ICOUNT

sSTATUS (DONE)

DATA REGISTER

FROM OUTSIDE WORLD TO DATA REGISTER HIGH BYTE OF DATA REGISTER

DATA REGISTER

: INTERRUPT VECTOR OF UNIT UNDER TEST : INTERRUPT STATUS ADDRESS : INTERRUPT VECTOR

COUNT LOCATION sPRIORITY LEVEL

SET UP STACK

: SAVE ok STACK ON OVERLAY :FOR T TRAP

FOR ig OUT

:"'T'' FLAG

:VECTOR ADDRESS FROM S :1F ZERO USE 300 ON PREVIOUS VALUE

USE ONLY BIT 0 TO 8

SET UP FROM SWITCH REGISTER

SET UP STACK

SET UP FOR FALSE INTERRUPT

CLEAR DATA REGISTER

SEQ 0011

MAIN. MACY11 ees O6=MAR=79 14:52 PAGE 13

€ZDRIB.P11 O6-*MAR=79 14:47 SEQ 0012

578 001234 017700 177550 MOV @GRDAIO, %0 379 001240 001401 BEQ +4 581 001242 104000 HLT :DATA REGISTER NOT CLEAR 282 ;REGISTER NOT ZERO 584 001244 104400 SCOPE 585 001246 012/67 000 003014 MOV #4000, I COUNT

001254 012777 177777 177520 MOV #-1, aGRDIO ZALL ONES TO REGISTER 587 001262 017700 177514 MOV @GRD10, %0

66 022700 177777 CMP #-1,%0

589 001272 001401 BEQ +4 390 001274 104000 HLT ;REG WILL NOT HOLD ONES 592 001276 104400 SCOPE 593 001300 012767 000100 002762 MOV #100, 1 COUNT 594 001306 012777 177777 177466 MOV #-1,aGRDIO 595 001314 000005 RESET :SET DATA TO ALL ONES 596 001316 005777 177466 TST @GRDAIO SSHOULD CLEAR REGISTER 597 001322 001401 BEQ +4 598 001324 104000 HLT :REG FAILED TO CLEAR 600 001326 104400 SCOPE 601 001330 012767 004000 002732 MOV #4000, ICOUNT 602 001336 012777 052525 177436 MOV #52503, @GRDIO 603 001344 017700 177432 MOV GRDIO.%0

001350 022700 052525 CMP #2523, 20 605 001354 001401 BEQ 606 001356 104000 HLT SDATA WOT=52525 608 001 104400 SCOPE 609 001362 012777 125252 177412 MOV #125252, aGRDIO 610 001370 017700 177406 MOV @GRDIO, £0 611 001374 022700 125252 CMP #125252, %0 612 001400 001401 BEQ +4 613 001402 104000 HLT :DATA NOT=125252 614 ; INTERRUPT ENABLE BIT TEST 615 001404 052767 000340 176364 BIS , #340, STATUS ;LOCK OUT INTERRUPTS 617 001414 012777 000140 177356 MOV ' #140, aGRSTAT : INTERRUPT ENABLE FOR A+B 618 001422 017700 177352 MOV QGRSTAT, %0 619 001426 022700 100340 CMP #100340, %0 ;ENABLE BITS PLUS READY BITS 620 001432 001401 BEQ +4 621 001434 104000 + HLT 623 001436 104400 SCOPE 624 001440 012767 000010 002622 MOV #10, 1COUNT 625 001446 012777 000140 177324 MOV #140, aGRSTAT SET INTERRUPT ENABLE FLOPS 626 001454 000005 RESET *CLEAR THOSE FLOPS 627 001456 017700 177316 MOV @GRSTAT,%0 “TST % OR 628 001462 001401 BEQ +4

001464 104000 HLT ;RESET DID NOT CLEAR INTERRUPT ENABLE BITS

632 001470 005067 002574 CLR I COUNT 633 001474 005067 177320 CLR COUNT

-MAIN. MACY11 30A(1 06-MAR

CZDRIB.P11

BESRSRREEES

016 1

777

017700 0067

177314 177270 177302

177272

177777

177130

177134

177122 177071 000340

004000 177024 177022

052). O6=MAR-79 14:52 PAGE 14 -79 14:47

177302 =TST1:

177240

002500

177202

177144

177100

176034

002316 177016

TEST FOR ALL NUMBERS (WORD) ;GOOD=COUNT, BAD=%0

+4

TST1 #-1,aGRDIO a@GRbIO @GRDIO, %0 #177400, %0

+4

CLEAR LOW BYTE

sBYTE LOW FAILED TO CLEAR #4000, ICOUNT

#-1 ,aGRDIO @GRBH10

@GRDIO, %0 #377.20

+

:CLEAR HIGH BYTE

HIGH BYTE CLEAR FAILED

: INCREMENT LOW ORDER BYTE : INCREMENT REFERENCE BYTE COUNT

:BAD DATA IN DATA REGISTER

: INCREMENT HIGH BYTE

HIGH BYTE HAS BAD DATA _— +

TST3 #340, STATUS

; TEST EXTERNAL TRANSFERS = CABLE MUST BE CONNECTED #4000, 1 COUNT @GRDIO OGRDAI ,@GRD1O :TEST TRANSFER OF ZERO +

SEQ 0013

-MAIN.

CZDRIB.P11

001766

001770 001772 002000

MACY11 30A(1052) 06-MAR-79 1

104000

06-MAR=79 4:47

177777 177000 177777

002242

176746 176744 176734

176720

004000

000200

176630 002176 0000

176600

176564 000140 176552 176542

177002 176774 176766

176740

002174

176700 176660

176644

176636 176612

176554

TST6:

TST7¢:

ABC:

TST8:

TST9:

14:52 PAGE 15

#~1 ,aGRDIO aGRbAT. @GRDIO my , GRD 10

I COUNT %0

%0,aGRDIO @GRDAI , AGRDIO 0 DIO

eo

x0

TST7

@GRDIO

TST6 #4000, 1 COUNT @GRD1O STATUS #ABC,AGRIVA #100. aGRSTAT acrDio

TST8

#200, @GRDIO +4

@GRDIO ADEF ,aGRIVB 440, aGRSTAT aGRBHIO TST9

@GRDIO

+4

aGRDIO #140 ,aGRSTAT @GRDIO

@GRSTAT

sPICKED UP A BIT

MOV ALL ONES

:DROPPED A BIT

TEST ALL NUMBERS

sERROR - CHECK %0 FOR GOOD :GRDIO FOR BAD

sTEST INTERRUPT A

INTERRUPT A FAILED ;CHECK = WORD OR BYTE

:TEST INTERRUPT B

; INTERRUPT B FAILED CHECK WORD OR BYTE

TEST COMBINED INTERRUPTS

SEQ 0014

MAIN.

CZDRIB.P11

MACY11 30A(1052) 06-MAR-79

012777

005977

06-MAR-79 14:47

177777 176532 176530 177777

176502

176470

000100 175426

176420 176430

004650 000340 002430 000040 000377

176344

176536

176534

175452

176454 176434

177776

14:

52 PAGE 16

#-1,aGRDIO

MOV : TEST oa BLACK BOX (NOT CONNECTED)

MOV @GRDAI , AGRDAIO MOV 8

sREADY BIT IS IN A ONE STATE

SCOPE TST @GRSTAT BMI +4

HLT

SCOPE

TSTB @GRSTAT BMI +4

HLT

:CAN WE RAISE INTERRUPT ‘‘A’' SCOPE

BIS rea STATUS #BUFF ,

MOV #TST4,aGRIVA

MOV #100, aGRSTAT CLR STATUS

TST4: CLR @aGRSTAT MOV GRIVSA,@GRIVA RAISE INTERRUPT 'B"' SCOPE

MOV F,%6 BIS #340 STATUS MOV #7ST5,aGRIVB

MOV #40, aGRSTAT BIC #377, AASTATUS NOP HLT TSTS: CLR @GRSTAT 1VA=GRIVA CSR=GRSTAT IVS=GRIVSA

TEST FOR INTERRUPT Rin DEVICE MOV a”

vs

BIC #340, STATUS

MOV #TINT1 alVA #BUF F

UF F BIC #100,aCSR BIS #100, aCSR

sREG 0 SHOULD

STATIC LINES EQUAL ONES sDATA REGISTER TO %0

= ALL ONES

TEST BIT 15 3NO READY BIT 0

TEST BIT 7

sNO READY BIT A

:LOCK OUT INTERRUPTS

INTERRUPT RETURN POINTER : INTERRUPT ENABLE

3NO ‘‘A'' INTERRUPT

V .+2 TO ‘'A'' INTERRUPT VECTOR

3NO B INTERRUPT

PROCESSOR LEVEL ZERO

STACK POINTER :CLEAR INTERRUPT ENABLE 7SET INTERRUPT ENABLE~

NO DEVICE INTERRUPT OCCURED

SEQ 0015

-MAIN. MACY11 30A(1052) 06-MAR-79 252 PAGE 17 CZDRIB.P11 06-MAR~79 14:47 SEQ 0016

TINT1: SCOPE : TEST FOR INTERRUPT FROM THE DEVICE BIC #340,STATUS

#040, STATUS SET TO PRIORITY LEVEL 1 ATINT2,a1VA : INTERRUPT VECTOR ADDRESS FF, ;SET UP STACK POINTER #100,aCSR [CLEAR INTERRUPT ENABLE #100,@CSR 7SET INTERRUPT ENABLE-

NO DEVICE INTERRUPT OCCURRED

#340, STATUS

#100, STATUS SET TO PRIORITY LEVEL 2 ATINT3,QI1VA : INTERRUPT VECTOR ADDRESS BUFF ,%6 SET UP STACK POINTER #100,aCSR :CLEAR INTERRUPT ENABLE #100,aCSR 7SET INTERRUPT ENABLE-

NO DEVICE INTERRUPT OCCURED

TINT3: SCOPE :TEST FOR INTERRUPT FROM THE DEVICE BIC #340, STATUS

#140, STATUS SET TO PRIORITY LEVEL 3 #TINTS IVA INTERRUPT VECTOR ADDRESS #BUFF ,%6 SET UP STACK POINTER #100,a@CSR ;CLEAR INTERRUPT ENABLE

#100,aCSR SET INTERRUPT ENABLE-

sNO DEVICE INTERRUPT OCCURED TINT4:

TEST FOR INTERRUPT FROM DEVICE 175074 BIC #340,STATUS 175066 #200, STATUS RAISE PROCESSOR PRIORITY TO LEVEL 4 176074 #TINTS ,@IVA UPT

MOV BUFF ,%6 176050 #100,aCSR 176042 ats #100,aCSR

:LET INTERRUPT OCCUR 176032 ais #100,aCSR

NO DEVICE INTERRUPT OCCURED

TINTS: SCOPE ; TEST FOR NO INTERRUPT FROM DEVICE (HIGHEST PROCESSOR PRIORITY) BIS #340, STATUS ;RAISE PROCESSOR PRIORITY TO HIGHEST LEVEL

ATINT6, IVA SIN CASE OF INTERRUPT #BUFF , £6 'SET STACK POINTER #100, aCSR [CLEAR INTERRUPT ENABLE #100. aCSR #100. aCSR :DON'T LEAVE IT SET

+4 WITH NO INTERRUPT, BRANCH OVER HALT : INTERRUPT OCCURED

-MAIN. MACY11 eta O6=MAR=79 14:52 PAGE 18 C2DRIB.P11 06-MAR-79 14:47 SEQ 0017

858 859 TEST FOR NO INTERRUPT FROM DEVICE BIC 40, STATUS #240, STATUS +RAISE PROCESSOR PRIORITY TO LEVEL 5 ATINT7,@IVA RRUPT BUFF ,%6 #100,aCSR #100,aCSR #100,aCSR :DON'T LEAVE IT SET

BR +4 WITH NO INTERRUPT, BRANCH OVER HALT TINT?: : : INTERRUPT OCCURED

TEST FOR NO INTERRUPT FROM DEVICE 174662 BIC #340,STATUS 174654 #300,STAIUS RAISE PROCESSOR PRIORITY TO LEVEL 6 175662 aTINTS @IVA SIN CASE OF INTERRUPT ABUFF , SET STACK POINTER 175636 #100,aCSR :CLEAR INTERRUPT ENABLE 175630 #100,aCSR +38 al re ENABLE 175622 aks #100,aCSR T LEAVE IT SET

+4 sWITH NO INTERRUPT, BRANCH OVER HALT ; INTERRUPT OCCURED

175616 GRIVSA,@GRIVA ;FOR FALSE INTERRUPT aGRIVA MYESRT,14 TRPB

:GO TO BEGIN ON TIME QUT

CHANGE TO LAST VECTOR FOR OVERLAY

@ABEGINA SAVR6, %6 sRESTORE OLD STACK CHANGE TO RTI ON OVERL @GRSTAT ‘rome OUT IF NON EXISTENT-RESTART PROGRAM rh att ;FOR POWER FAIL SET UP L

—W NOM Neo FS

BELL: ;BELL ON PASS COMPLETE MOV #207, aTDBR aTCcSR

000000 MOV #0, aTDBR oNe7 arcsR

-MAIN. MACY11 wrath

CZDRIB.P11

06-MAR-79 100375 012767 006701 000240 012767 000403 012767

921 003420 012767

g oO MN

Ww “N An

ReSORe = -2 S8oR ay MOMn

Pie alin 14: 4:47

003412

000006 000002 000012

010000 000036 000020 000042

001202 174054

009160 000156

000144

174412 000074

000064 174362

174132

020000

000116

000056

52 PAGE 19 BPL 7-4

SBELL: MOV #BEG20,10 - :SET_UP_ RESERVED INSTRUCTION oy sATTEMPT TO EXECUTE SIGN EXTEND MOV #6,YESRT NO TRAP, PROCESSOR IS NO =20 BR BEGANY

BEG20: MOV #2,YESRT ; TRAP OCCURED

BEGANY: MOV #12,10 RESTORE HALT FOR RESERVED INC ROUTINE TO CHECK FOR TRACE TRAP’ TO BE RUN WITH PROGRAM

;SAVE OLD CONTENTS, SET UP FOR TRACE TRAP YESTR: CLR (6) BIT #10000, SR

BNE YESTR COM Rea BPL +10 MOV #20, (6) :SET TRACE TRAP YESTR1 MOV a#42,R0 EQ YESTR1 RESET SENDAD: JSR 7, (RO) NOP NOP NOP YESTR1: MOV #BEGIN,-(6) ZSTART OF TEST WITH TRACE ON YESTR2: RTI TRPB: 0 YESRT: vty sRETURN TO PROGRAM FROM TRAP

HALT sRTI FAILED sENTERED WITH SYSTEM TRAP CALL (HLT) :PRINT OUT THE ERROR PC AND STATUS REGISTER PRINT: BIT SR 420000 TEST FOR INHIBIT PRINT OUT

BEQ +6 ‘BRANCH TO PRINT RTI T INHIBIT, RETURN TO MAIN STREAM MOV (6) +, SAVPC [PC OF FAILING ROUTINE MOV (6) +, SAVCC =CC OF ERROR CONDITION CMP -(6).=(6) TREPOSITION THE STACK TSTB ~— aTCSR ‘WAIT FOR FLAG BPL a4 ‘IF NOT UP. V #215, aTDBR :CR TSTB. ~— aTCSR BPL ad MOV #212, aTDBR ZLINE FEED -TSTB-~—Ss TCR

BPL . -4 MOV %2, SAVR2 :SAVE R2 MOV %3. SAVR3 “SAVE R3

gy %4° SAVR4 SSAVE R4 MOV “~~ SAVPC,%2 JSR %17.PRTAB :PRINT OCTAL NUMBER MOV #240, aTDBR TSTe arcsk :SPACE BETWEEN WORDS

MOV SAVCC, %2 JSR %7,PRTAB :PRINT OCTAL NUMBER

SEQ 0018

-MAIN. MACY11 abc iy O6=-MAR=79 14:52 PAGE 20 CZDR1B.P11 06-MAR-79 14:47 SEQ 0019

004767 000472 %7 ,MORE ID DEVICE ADDRESS AND VECTORS 016702 000022 SAVR2,%2 RESTORE REGISTERS

016703 000020 SAVR3,%3 016704 000016 SAVRG ,%4 005767 173702 SR sTEST FOR HALT SWITCH 100001 +4

sHALT ON ERROR SET SRETURN TO MAIN STREAM

BINCT

WGTCT

MLIST 24 GET LIST ADDRESS 000236 #5 ,ASCNT 000220 #7, SEVEN 000214 #1 ,DECML

aTCSR

_

NEG SIGN PRINT 1 PQS SIGN PRINT 0

MINUS 177712 #260, aTDBR TAR

BR S 177702 : #261, aTDBR : SEVEN, %3 zPUT MASK IN R3 of 2 -TOODLE GET READY TO DOODLE NUMBER IN TOODLE

eS ie ere FOR COMPLEMENT DURING BIC

8

at cat ced ced nh ca ce cand ced end a lelelelelelelealelele) ab oh oh od nd oe eh eh dd WONAUSWR—O

000136

000120

000102

000050

000044

TOODLE. 243 DECML ,WGTCT BINCT WGTCT,%3 MKNUM

#260, ,BINCT BINCT,(4)+ SEVEN, DE CML WGTCT

BINCT

ASCNT

XLIST

#3 ,%3 SEVEN, SEVEN 23

MOADD

STAR

#5 ,ASCNT

ID IN OCTAL CHARACTER

i JERO, WRITE 0 IN LIST ; t UP

> COUN TO

AND RECORD

SAME BINARY WEIGHT

KEEP COUNTN

sADD_ASCII PREFIX

WRITE ASCII CHAR IN LIST EXPAND BINARY WEIGHT

35 CHAR IN LIST :SET X3 FOR ADD LOOP SMAKING SEVENTY BY SEVEN

NX SEVEN SET a A OCTAL :SEND 5 CHAR TOT

ENRSSRVR

000005 : MOV 177552 : Z he: WAI 014477 177542 -(4) ,aTDBR

MAIN. MACY1; 30A(1052) O6=MAR=79 14:52 PAGE 21 CZDRIB.P11 O6-MAR-79 14:47 SEQ 0020

004140 005367 000026 DEC 004144 1 BEQ FINISH PRINTING GET NXT NUM 004146 BR

105777 177530 HDFHM: TSTB @TCSR 100375 BPL Pe

000207 RTS 47 sHEAD FOR HOME 000000 TOODLE :

VSARNORERSERS

LOOP ROUTINE ENTERED BY USER TRAP B: CMP (6)+,%6 REPOSITION THE STACK 173562 MOV (6)+,CC 000054 @RE TURN SCOPE RETURN OR/AND ITERATION LOOP FOR EACH TEST 4000 TIMES 040000 173342 SCOPEC: BIT #40000,SR sess eo SCOPE

BN SCOPEB 004000 173332 #4000,SR sNO = TEST FOR ITERATION : INHIBIT ITERATION

~ DONE

SCOPEA 000026 000022 SCOPEF ICOUNT sad 000016 SCOPEF + INCREMENT COUNT

BR se :LOOP SOME MOR 000010 SCOPEG: 000006

SCOPEF :CLEAR COUNT SCOPEA: @%6,,RETURN SAVE SCOPE RETURN POINTER sRETURN INLINE-NEXT TEST

:COUNT LOCATION FOR ITERATION LOOP : sADDRESS OF LAST TEST 173676 MP 200

OF NESTED SUBROUTINES

: RTS %7 ONE INSTRUCTION 47 :ONE DEEP 177770 : oat TWO DEEP 177766 : aaa : THREE DEEP 177766 : 55° Sua FOUR DEEP 177766 : - %7,,SUBRS FIVE DEEP sPRINT DEVICE ADDRESS AND VECTOR 240 177334 MOREID: MOV #240, aTDBR

000 177332 TSTB aTCSR BPL 274

-MAIN. 1 ates Ps petaaln 14:52 PAGE 22

CZDRIB.P11 1082 1083 1084 1085

1086 1087

1 1089 1090 1091 1092 1093 1094 1095 1096 1097

$3

RARAVISYSBVAGRAVVS SHVRARAVASSSLRARALLS

1 1 1 ] 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1

a hd kk a ed ad od wo

WN N

-MAR-79

016702 174420 GRSTAT ,%2 004767 177326 %7,PRTAB 012777 000240 177310 #240, aTDBR

105777 177306 aTCSR 174406 GRIVA, %2

177302 %7,,PRTAB

%7 ;BACK TO PRINT

ENTER HERE OR POWER FAIL

PFAIL: ;SAVE REGISTER OR STACK MO WHEN POWERING DOWN

000010 STORE STACK POSITION 004450 173360 HALT ON POWER 7 NORMAL SAVR6: STACK IS SAVED H 177772 RESTART :MOV SAVR6 , %6 SRESTORE REGISTER OFF STACK 173344 MO 2 [WHEN POWERING UP

MOV MOV MOV MOV 173372 MOV MOV %6, SAVR6 MOV #RESTART ,24 rr

(6)+,%0 BEGIN

sPOWER FAIL OCCURRED RETURN TO MAIN LINE

125252 B: 125252 :FIXED VALUES FOR USE IN TEST

004504 B 052525 052525 .=B+10 A:

ADDRESS OF B

-=At4 ;ADDRESS OF A+10

sADDRESS OF C

sADDRESS OF TEMP

SEQ 0021

s

Je

~

—2Z .

os = I Lj Po)

ed a a al cl al cd SRE AW RW OOe

MACY11 30A(1052) O6-MAR=79 14:52 PAGE 23

P11 Q6-MAR=79 14:47 SEQ 0022 004544 .=TEMP+6

004544 004546 TEMP+10 ;ADDRESS OF TEMP+10 OR ‘D''

004546 000000 D: 004650 .=.4100

004650 BUFF :

004650 000000 FIN: 0 BUFFER FOR SP

000001 . END

K 2 -MAIN. MACY11 30A(1052) O6=MAR=79 14:52 PAGE CZDRIB.P11 O6-"AR=79 14:47

25 CROSS REFERENCE TABLE -- USER SYMBOLS SEQ 0023 1126 1128 1022* 1026* 10384 1122

939 1063 1114 889 0

1014s 797

9884 1083 1105 1047 1059* 10634 968 9864

8 963 9854 971 9804

-MAIN. MACY11 30A(1052)_ O6=MAR=79 14:52 PAGE CZDRIB.P11 O06-MAR=79 14:47 SAVR3 003676 961* 973 9814 SAVR4 003700 962* 974 9824 SAVR6 004446 549* 901 1101* SBELL 003370 905 9154 SCOPE = 1044 2464 572 584 685 692 6 823 833 846 SCOPEA 004262 1053 10594 SCOPEB 0042 10454 051 1057 SCOPEC 004220 515 10504 SCOPEF 004272 1054 1056* 1058* SCOPEG 004256 1055 10584 SEVEN 004162 992* 1001 101e R = 177570 2498 558 926 AR 004 999 10014 1021 STATUS= 177776 2444 248 615* 815* 825* 826* SUBR1 004302 10674 SUBR2 004 10684 1070 SUBR3 004310 10704 1072 SUBR4 004316 10724 1074 SUBRS 004324 10744 1076 SUBR6 004332 10764 TCSR 0037 910 913 952 TDBR 003702 909* 912* 954* TEMP 5 11354 1136 1138 TINT? 002502 796 8024 TINT2 002552 807 8134 TINTS 002622 816 8234 TINTS 002672 827 8334 TINTS 002752 838 8464 TINT6 3022 849 8564 TINT? 003102 862 8594 TINTS 003162 875 8824 TOODLE 0041 1002* 1003* 1004 TRPB 003502 552* 887 928* Toi? 001500 6344 641 TST2 1636 6634 670 TST3 001702 6744 681 TST4 002354 771 777# TST5 002430 783 7884 TST6 002030 7024 710 TST7 002074 708 7144 TST8 002146 720 7284 TST9 002212 733 7414 WAIT1 003750 9944 995 WAIT2 004126 10234 1024 1028 WGTCT 004166 989* 1006* 1008 WRT 004042 1005 10104 MLIST 004120 1016 10224 YESRT 003504 886 918* 920* YESTR 3426 9254 YESTR1 003474 927 931 933 YESTR2 003500 9404 ND 0034 520 9354 ° = 004652 251 253 255

L 2

26 CROSS REFERENCE TABLE == USER SYMBOLS

10334 9414

1013*

9424 9394

257

1105

600 608 616 623 631 642 727 740 748 757 762 768 870 883

10344 975 1050 1052

715* 7694 773* 782* 785* 795* 837* 848* 860* 861* 873* 874*

958 966 9844 994 965* 9834 998s 1000*

2a oo Mr VIG

1030 * 1079*

10364

259 261 263 265 267 269

651 780

8C5*

1089 1084*

271

802

806*

1086

273

SEQ 0024

814%

275

M 2 -MAIN. MACY11 ee = 14:52 PAGE 27 CZDRIB.P11 06-MAR=79 14:47 CROSS REFERENCE TABLE == USER SYMBOLS SEQ 0025

764 855 68 81 899 911 914 929 947 976 1031 11224 11264 11344 113584 11414

N «MAIN. MACY11 30A(1052) Q6=MAR=79 14:52 PAGE CZDRIB.P11 06=MAR-79 14:47

29 CROSS REFERENCE TABLE == MACRO NAMES SEQ 0026

B 3 -MAIN. MACY11 eet “ape 14:52 PAGE

30 CZDRIB.P11 O6-MAR-79 14:4 CROSS REFERENCE TABLE == MACRO NAMES SEQ 0027

- ABS. 004652 000

ERRORS DETECTED: 0

CZDRIB.BIN, CZDRIB. SEQ/CRF/SOL/NL : TOC=SYSMAC.SML,CZDRIB.P11 RUN-TIME: 8 9 .4 SECONDS

RUN-TIME RATIO: 359/18=19.8

CORE USED: 31K (61 PAGES)