Digital PDFs

AH-9178D-MC

May 1978

204 pages

Original

12MB

view download

OCR Version

10MB

view download

Document:	CZRHBD0 RH11,RH70 MASSBUS I-O CONTROLLER DEC 1978 bw
Order Number:	AH-9178D-MC
Revision:	000
Pages:	204
Original Filename:	CZRHBD0__RH11,RH70__MASSBUS_I-O__CONTROLLER__AH-9178D-MC__DEC_1978_bw.pdf

OCR Text

RH11,RH70

G
.
.
r
o
u
G
"
M
T
M
T
s
e
&Ri
FICHE 1 OF 1

MADE IN USA

MASSBUS RH70 AND RH11 DIAGNQSTIC
CZRHBD.P11
02-MAY-78 10:01
1

2
3

MACY11

30A(1052)

02-MAY-78

10:03

PAGE

1
SEQ 0001

.REM _

6
7

IDENTIFICATION

..............

PRODUCT CODE:

AC=9176D=-MC

1§

PRODUCT NAME:

CZRHBDO MASSBUS 1/0 AND CONTROLLER DIAGNOSTIC

DATE CREATED:

1-MAY-78

MAINTAINER:

DIAGNOSTIC GROUP

AUTHOR

REVISED BY:

BILL SCHLITZKUS

25
26
27
28
gg

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 MANUAL
.

31
32
gz

DIGITAL EQUIPMENT CORPORATION ASSUMES NO RESPONSIBILITY
FOR THE USE OR RELIABILITY OF ITS SOFTWARE ON EQUIPMENT
THAT IS NOT SUPPLIED BY DIGITAL.

37
%g

THE FOLLOWING ARE TRADEMARKS OF DIGITAL EQUIPMENT CORPORATION

DIGITAL

41
42

DEC

PDP

DECUS

UNIBUS

DEC TAPE

MASSBUS

MASSBUS RH70 AND RH11_DIAGNOSTIC

CZRHBD.P11

02-MAY-78 10:01

MACY11 30A(1052)

02-MAY-78

10:03

TABLE OF

PAGE 2

CONTENTS

1.0

ABSTRACT

2.0

REQUIREMENTS

2.1

HARDWARE

2.2

SOF TWARE

3.0

PROGRAM DESCRIPTION

3.1

SWITCH OPTIONS

3.2

SYSMAC ROUTINES

4.0

TEST DESCRIPTIONS

ABSTRACT

THIS PROGRAM WAS CREATED TO TEST RH11 AND RH70 MASSBUS
%8N}¥OLLERS WITH AN RH11-TB (MASSBUS SIMULATOR) ATTACHED

TO GET MAXIMUM RESULTS FROM THE TEST ALLOW PASS1 TO BE
COMPLETED SO THAT ALL INFORMATION POSSIBLE HAS BEEN RE-

PORTED ABOUT ANY ERROR,

THEN LOOP ON DESIRED ERRORS.

IN THE EVENT OF AN ERROR,INORDER TO GIVE COMPLETE
INFORMATION ALL ERROR BITS ARE CHECKED TO SEE THAT
NO OTHER ERROR OCCURED. IF AN ERROR OCCURED IT WILL
BE REPORTED BY 'WHYFO'' AND 'WWATBIT''

WHYFO TELLS WHAT REGISTER THE ERROR BIT WAS FOUND IN AND
WATBIT TELLS WHAT THE NUMBER OF THE ERROR BITS

WHERE.

:
EXAMPLE
RHCS1

HAS AN ERROR BIT SET

{gESE12RE THE NUMBER OF THE EXTRA BITS
RHCS2 HAS AN ERROR BIT SET

{gESE ARE THE NUMBER OF THE EXTRA BITS
END EXAMPLE

THIS PRINTOUT SAYS THAT TRE AND SC IS SET IN RHCS1
AND THAT DATA LATE WAS SET IN RHCSZ.

SEQ 0002

MASSBUS RH70 AND RH11 DIAGNOSTIC

CZRHBD.P11

02-MAY-78 10:01

MACY11 30A(1052)

103

104

10:03

PAGE 3

THIS IS DONE TO GIVE ONLY VALID DATA(ERROR)

105

2.0

}8;

2.1

109

NOT A COMBINATION OF GOOD AND BAD DATA.

REQUIREMENTS
HARDWARE

THIS PROGRAM ASSUMES THE FOLLOWING IS IN PROPER WORKING

T ION:
CONDI

110
|

112

113
11
116

02-MAY-78

2.
3.
2.2

CPU

16K _OF CORE MEMORY
RH11-TB MASSBUS SUMULATOR

SOFTWARE

118
119

USING STARTING ADDRESS 200 ASSUMES A BASE ADDRESS OF
160100 AND A VECTOR OF 774.
THE PROGRAM WILL CHECK FOR

121
122
123
124

RESPECTIVELY.
IF ANY OF THESE EXIST. THE PROGRAM
WILL DO MULTIPLE RH TESTING. MULTIPLE RH TESTING_ (SEE
TEST 77) IS NOT POSSIBLE AT ADDRESSES CTHER THAN THE
FOUR ADDRESSES AT 160100 THRU 160400.

120

ADDITIONAL RH'S AT ADDRESSES 160200, 160300, AND 160400

126
127
128
129
130
131
132
133
134
135
136
137
138

139

IF NO CHANGES IN ADDRESS ARE MADE AN ALTF-NATE STARTING
ADDRESS OF 204 CAN BE USED BUT THE PROGRAM MUST HAVE BEEN
STARTED AT LEAST ONCE AT ADDRESS 200 OR 210.
STARTING ADDRESS 210 ALOWS YOU 10 SPECIFY THE BASE
ADDRESS,VECTOR ADDRESS, AND HOW MANY REGISTERS YOU
ARE JUMPERED FOR.
THE NUMBER OF REGISTERS JUMPERED

REFERS TO THE NUMBER OF DEVICE REGISTERS (OCTAL)

BEGINNING WITH RHCS1 UP TO BUT NOT INCLUDING RHBAE.
ONLY ONE_RH AT A TIME CAN BE TESTED USING STARTING
ADDRESS 210.

3.0

141

PROGRAM DESCRIPTION
THIS PROGRAM WAS ASSEMBLED WITH MACY11 USING PDP-11 MAINDEC

142

SYSMAC PACKAGE (DZQAC-3).

144
145
146

IN TESTING ONE CONTROLLER, THE FIRST PASS TAKES ABOUT
5 SECONDS AND SUBSEQUENT PASSES TAKE ABOUT 10 MINUTES
IF ITERATIONS ARE NOT INHIBITED.

148
150
31
152

153
154
155
156
157
158

3.1

SWITCH OPTIONS
SWITCH
2

15
14
13
1
10
9

USE
---

HALT ON
LOOP ON
INHIBIT
INHIBIT
BELL ON
LOOP ON

ERROR
TEST
ERROR TYPEOUTS
ITERATIONS
ERROR
ERROR

SEQ 0003

MASSBUS RH70 AND RH11

CZRHBD.P11
159
160
161
162
163
164
165
166

167
168
169

170
171
172
173
174
175
176
177
178
179
180
181
182

183

184
185
186

187

188
189
190
191
192
193
194
195
196
197
198
199

200
201
202
203

DIAGNOSTIC

02-MAY-78 10:01

02-MAY-78

MACY11 30A(1052)

10:03

PAGE 4

SEQ 0004

LOOP ON TEST IN SWR<7:0>

8
1

222220

TO BE USED IF DUAL PORT

USED
INHIBITS THE PRINTING OF WATBIT

2322233233322 2222222222232 2022233308223 282d0f2830 280020 RdRsdds

13,8,AND 0

INHIBIT WATBIT PRINTOUT

(2233222232323 22232233322 22232 20222 2322222222802 20002 200020ttt Rtttdnl sl

3.2

SYSMAC ROUTINES (USED)

EQUATE, CATCH, COMMON TAGS, SWRHI, SWRLO, SETUP SCOPE,
TYPE, TRAP, READ, ERROR, TYPE OCTAL, TYPE DECIMAL, POWER,
EOP, KT11, HEADER, ERROR TYPE, READ OCTAL, ACT11 HOOKS.
gzigE ARE THE SYSMAC ROUTINES INCORPCRATED IN THIS PRO4.0

TEST DESCRIPTIONS

TEST 1 = THIS 1S THE RH ADDRESS DECODE TEST.

THIS PROGRAM

WILL CHECK THAT AN RH IS ON THE BUS AND THAT A TESTER
IS CONNECTED TO IT. IF NO RH IS FOUND THE OPERATOR
WILL BE ALLOWED TO KEY IN THE ADDRESS FOR THE RH HE
HAS CONNECTED TO THE BUS.

TEST 2 - CLEAR TEST.
THIS TEST CHECKS THAT ALL ERROR BITS
ARE CLEARED AFTER THE CLEAR BIT WAS LOADED INTO
RHCS2 REGISTER.
THIS TEST IS ALSO ENTERED AT THE

LABLE CLEER AT THE END OF ALL THE ERROR BIT TESTS
TO SEE THAT A CLEAR WILL CLEAR THE ERROR BIT SET.
THE TEST 1S ENTERED HERE IF THE ERROR BIT BEING

g??CE?DSEETDID NOT SET TO SEE IF ANY OTHER ERROR
TEST 3 = THIS TEST SEES IF THE TESTER IS CONNECTED.
THIS
TEST SEES IF THE DEVICE CODE IS A 40 TO SAY AN
RH SIMULATOR IS ATTACHED.

TEST 4 - WC CLEAR TEST.

THIS TEST WILL SEE THAT WHEN A

gkg?R IS GIVEN THE WORD COUNT REGISTER REMAINS THE

TEST S - RHBA CLEAR TEST.

THIS TEST SEES THAT WHEN A CLEAR

IS GENERATED THE BUS ADDRESS REGISTER IS CLEARED.

TEST 6 - RHBAE CLEAR TEST.
THIS TEST CHECKS THAT WHEN A
CLEAR IS GENERATED THE BUS ADDRESS EXTENSION REGISTER 1S CLEARED.

TEST 7 - RHDB CLEAR TEST.

THIS TEST CHECKS THAT WHEN A
CLEAR IS GENERATED OUTPUT READY IS NEGATED.

TEST 10 - PROM REGISTER DECODE TEST.
THIS TEST CHECKS
THAT THE PROM CAN ACCESS ALL REGISTERS.
TEST 11 - RHCS3 TEST.

THIS TEST CHECKS THE READ/WRITE BITS
IN THE RHCS3 REGISTER CAN BE CLEARED AND SET.

MASSBUS RH70 AND RH11 _DIAGNOSTIC
CZRHBD.P11
02-MAY-78 10:01
215

MACY11 30A(1052)

02-MAY-78

10:03

TEST 12 = RHWC BIT TEST.

PAGE 5

SEQ 0005

THIS TEST CHECKS THE WORD COUNT

REGISTER TO SEE IF ALL BITS CAN BE SET AND CLEARED
AND CHECKS THE REGISTER USING ALTERNATE BITS SET
(52525) AND USING (125252) TO MAKE SURE IT WORKS
WITH ALTERNATE PATTERN.

TEST 13 ~ RHBAE BIT TEST.

THIS TEST TESTS THE RHBAE REGRH11'S DO NOT
ISTER ONLY IF THE RH IS AN RH70.

HAVE AN RHBAE REGISTER.
TEST 14 -~ RHBA BIT TEST.

THIS TEST TESTS THE BUS ADDRESS
REGISTER BY FIRST ALTERNATLY SETTING AND CLEARING
BITS IN THE BA REGISTER AND THEN BY USING AN
ALTERNATE BIT PATTERN (52525) AND AN OPPOSITE
BIT PATTERN (125252).

TEST

15 - RHDB BIT TEST.
THIS TEST TESTS THE RH DATA BUFFER REGISTER BY FIRST ALTERNATLY SETTING AND RE-~

SETTING BITS IN THE RHDB REGISTER AND THEN BY USING
AN ALTERNATE BIT PATTERN (52525) AND AN OPPOSITE
ALTERNATE BIT PATTERN (125252).

TEST 16 - RHWC OPERATIONAL

TEST.
THIS TEST CHECKS THAT
WHEN THE WORD COUNT REGISTER IS INCREMENTED IT IS
CARRIED TO THE HIGHEST BIT AND IS RETURNED TO ZERO.

TEST

THIS TEST CHECKS THAT
THE BUS ADDRESS REGISTER WILL CARRY THROUGH TO
THE HIGHEST BIT IN THE BUS ADDRESS EXTENSION REGISTER OR BIT A17 IN THE RHCS1 REGISTER AFTER IT IS

17 - RHBA OPERATIONAL TEST.

INCREMENTED.

TEST 20 - NEM,

TRE, SC BIT TEST.
THIS TEST WILL CHECK
THAT NON-EXISTING MEMORY WILL SET THE TRE AND SC
BIT IN RHCS1 REGISTER.

TEST 21

- WCE, TRE, SC BIT TEST.
THIS TEST WILL CHECK
EG?E)TRE AND SC SET WHEN A WRITE CHECK ERROR OCCURS

TEST 22 - MDPE,

TRE AND SC BIT TEST.
THIS TEST CHECKS
THAT MDPE CAN BE SET IN RH(CS2, AND THAT MDPF SETS
TRE AND SC IN THE RHCS1 REGISTER.

TEST 23 - UPE,

TRE, SC ERROR TEST (RH11).

THE UPE BIT IN RHCSZ TO SEE IF

THIS TEST CHECKS

IT SETS AND WHEN IT

IT SETS IS TRE AND SC BITS SET IN RHCS1.

TEST 24 - UPE,

TRE, SC ERROR TEST (RH70).

THE UPE BIT IN RHCSZ TO SEE IF

THIS TEST CHECKS

IT SETS AND WHEN

IT SETS IS TRE AND SC BITS SET IN RHCS1.

TEST 25 - NED BIT

TEST.
THIS TEST WILL CHECK THAT NED
(NON-EXISTANT DRIVE) SETS TRE AND SC BITS IN RHCS1.

MASSBUS RH70 AND RH11_DIAGNOSTIC
CZRHBD.P11
02-MAY-78 10:01

6 1
02-MAY-78 10:03

MACY11 30A(1052)

PAGE 6

SEQ 0006

THIS TEST WILL (HECK
TEST 26 - MXF, TRE AND SC BIT TEST.
g?Aéj?gF (MISSED TRANSFER ERROR) WILL SET TRE AND

271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289

TEST 27 - PGE ERROR BIT TEST.

THIS TEST FORCES PGE TO
gEES%N RHCSZ2 AND VERIFYS TRE AND SC IS SET IN

THIS TEST
TRE AND SC BIT TEST (RH11 ONLY).
SEES IF MXF CAN BE SET BY A MOVE INSTRUCTION AND

TEST 30 - MXF,

THAT TRE AND SC ARE SET IN RHCS1.
MXF CAN BE SET
THIS WAY IN AN RH11 BIT CAN NOT BE SET THIS WAY
IN AN RH70.

TEST 31 - MCPE AND SC ERROR TEST.

THIS TEST CHECKS THAT

TCPS qu BE SET IN RHCS1 AND THAT MCPE SETS SC
N

RHCS1.

TEST 32- 52 - DOUBLE TESTS.

THESE TESTS

CHECK DBL IN RHCS3 WITH READ FWD AND REV, WRITE
FWD AND REV AND WITH BAI SET IN RHCSZ2. OPERATION
BEING PERFORMED WILL BE PRINTED OUT IN ERROR
MESSAGE .
RH70 ONLY.

TEST 53 - WCE EW ERROR TEST.

THIS TEST CHErKS THAT WCELO
WILL SET IN RHCS3 AND THAT WCE SETS IN RHCS1.
IT
ALSO CHECKS THAT WCEHI DOES NOT SET WITH WCELO
IN RHCS3......... RH70 ONLY.

THIS TEST CHECKS THAT
SETS IN RHCS1, IT
WCE
THAT
AND
RHCS3
WCEHI SETS IN
ALSO TESTS THAT WCELO DOES NOT SET WITH WCEHI.

TEST 54 - WCE OW ERROR TEST (WCEHI).

(RH70 ONLY)

THIS TEST VERIFYS THAT
IE WILL SET IN RHCS1 AND IT WILL CAUSE AN INTERRUPT

TEST 55 - INTERRUPT ENABLE TEST.
WHEN RDY

IS SET.

TEST 56-75 - READ AND WRITE OPERATIONAL TESTS.
THESE TESTS
VERIFY ALL READ AND WRITE CODES WHETHER IT BE A
READ REV. OR FWD OR A WRITE REV. OR FWD.
DURING
THESE TESTS THE TESTER TIMING IS MARGINED AND
NO ERRORS SHOULD OCCUR.

TEST 76 - THIS 1S THE LARGE TRANSFER TEST

, IT TESTS
g:gogg 70 OR 11 DOING A 671 WORD TRANSFER FOR

TEST 77 - THIS

IS NOT A TEST BUT IS THE ROUTINE THAT

ALLOWS THE DIAGNOSTIC TO TEST 4 RH'S IF PRESENT.

.TITLE

MASSBUS RH70 AND RH11

;*COPYRIGHT (C) 1976
;*DIGITAL EQUIPMENT CORP.

DIAGNOSTIC

MASSBUS RH70 AND RH11 DIAGNOSTIC
CZRHBD.P11
02-MAY-78 10:01

02-MAY-78

MACY11 30A(1052)

PAGE 7

10:03

"MAYNARD MASS. 01754
*PROGRAM BY WN D'ENTREMONT

'THIS PROGRAM WAS ASSEMBLED USING THE PDP-11 MAINDEC SYSMAC
tPACKAGE (MAINDEC-11-DZQAC-C3), JAN 19, 1977.
SBTTL

OPERATIONAL SWITCH SETTINGS

i
k|

eeeeee

i
i
D
i
i
P>
i

15
14
13
11
10
9
8

.SBTTL

SWITCH

750
EMT,ERROR
1OT.SCOPE

000011
000012

HT=

177776

PS=
.EQUIV

177776
PS,PSW

PIRQ=
DSWR=
DDISP=

177772
177570
177570

HALT ON ERROR
LOOP ON TEST
INHIBIT ERROR TYPEOUTS
INHIBIT ITERATIONS
BELL ON ERROR
LOOP ON ERROR
LOOP ON TEST IN SWR<7:0>

;*INITIAL ADDRESS OF THE STACK POINTER w## 750 s«

000750

177774

USE

ecoesceeceeccecaaaeeeeee

3ASIC DEFINITIONS

STACK=
.EQUIV
.EQUIV

000015
000200

::BASIC DEFINITION OF ERROR CALL
:SBASIC DEFINITION OF SCOPE CALL

: *MISCELLANEOUS DEF INITIONS

LF=
CR=
CRLF=

12
15
200

STKLMT= 177774

::CODE FOR HORIZONTAL TA8

::CODE FOR LINE FEED
::CODE FOR CARRIAGE RETURN
::CODE FOR CARRIAGE RETURN~LINE FEED
::PROCESSOR STATUS WORD

::STACK LIMIT REGISTER

* 'PROGRAM INTERRUPT REQUEST REGISTER
: 'HARDWARE SWITCH REGISTER
. HARDWARE DISPLAY REGISTER

:*GENERAL PURPOSE REGISTER DEFINITIONS

RO=
R1=
R2=
R3=
R4 =
RS=
Ré=

20
1
12
13
1%
15
16

; ;GENERAL
- :GENERAL
. :GENERAL
: SGENERAL
. SGENERAL
: :GENERAL
: SGENERAL

SP=
PC=

16
X7

13 STACK POINTER
: :PROGRAM COUNTER

R7=

000000
000140

000240

¥4

:*«PRIORITY LEVEL

PRO=
PR1=
PR2=
PR3=
PR4=
PRS-

0
40
100
140
200
240

- :GENERAL REGISTER

DEFINITIONS

::PRIORITY
::PRIORITY
SSPRIORITY
;:PRIORITY
*PRIORITY
“PRIORITY

LEVEL
LEVEL
LEVEL
LEVEL
LEVEL
LEVEL

0
1
2
3
&
S

SEQ 0007

MASSBUS RH70 AND RH11

CZRHBD.P11

383
384
385
386
387
388
389
390
391
392
393
394
395
396
397
398
399

400
401
402
403
404
405
4«06
407
408
409
410

DIAGNOSTIC

02-MAY-78 10:01

000300

000340

100000

040000
020000
010000
004000
002000
001000
000400
000200
000100
000040
000020
000010
000004
000002
000001

411

412

613

100000

040000
020000

004000
002000
001000
000400
000200
000100
000020
000010
000004
000002
000001

MACYTY 30A(1052)
02-MAY-78
BASIC DEFINITIONS

PR6=
PR7=

300
340

10:03

PAGE 8

;;PRIORITY LEVEL 6
;;PRIORITY LEVEL 7

;%" 'SWITCH REGISTER'' SWITCH DEF INITIONS
100000
SW15=
40000
SWil4é=
20000
swi13=
1000C
swi2=
Swil=

4000

Sw02=
Swo1=
SW00=

4
2
1

swi0=
Sw09=
Sw08=
sw07=
Swo6=
Sw05=
Swi4=
swo3=

2000
1000
400
200
100
40
20
10

.EQUIV SW09,SWw9
.EQUIV SW08,Sw8
.EQUIV SWO7,SwW7
.EQUIV SWO06,SwW6
.EQUIV SWO5,Sw5
LEQUIV SWO4, SWé
LEQUIV SWO3,Sw3
EQUIV SW02, SW2
.EQUIV SWO1,Sw1
.EQUIV SWO00,SW0

:*DATA BIT DEFINITIONS (BITOO TO BIT15)

BIT15=
BIT14=
8IT13=
B8IT12=
BIT11=
BIT10=
BIT09=
BIT08=
BIT07=
BITO6=
BIT05=
BITO04=
BIT03=
BIT02=
BITO1=
BITO0=
.EQulv
.EQuiv
.EQUIV
.EQUIV
.EQUIV
.EQUIV

.EQuUIV
.EQUIV

100000
40000
20000
10000
4000
2000
1000
400
200
100
40
20
10
4
2
1
BIT09,BIT9
BIT08,B178
BITO07.BIT7
BIT06,BITé
BITO05,BITS
BIT04.BIT4

BIT703,8BIT3
BIT02.BIT?

SEQ 0008

MASSBUS RH70 AND RH11 DIAGNOSTIC

(ZRHBD.P11

02-MAY-78 10:01

439

.EQulv

662
663
[
Y
666
667
448
49
450
651
452
453
656

PAGE 9

BIT01.BIT1

B8IT700,BITO

TKVEC=
TPVEC=

60
64

.SBTTL

TRAP CATCHER

TRAPVE(C=34

;" TRAP'' TRAP

;. TTY KEYBOARD VECTOR
;;TTY PRINTER VECTOR

PIRQVE(C=240

;;PROGRAM INTERRUPT REQUEST VECTOR

.=0

;*ALL UNUSED LUCATIONS FROM &4 - 776 CONTAIN A ‘'.+2 HALT"'

459

;*SEQUENCE TO CATCH ILLEGAL TRAPS AND INTERRUPTS

460

470

10:03

000060
000064

000000

458

;*BASIC ''CPU"" TRAP VECTOR ADDRESSES
ERRVEC= 4
;. TIME OUT AND OTHER ERRORS
RESVEC= 10
;;RESERVED AND ILLEGAL INSTRUCTIONS
TBITVEC=14
;0T BIT
TRTVEC= 14
;. TRACE TRAP
BPTVEC= 14
; ;BREAKPOINT TRAP (BPT)
IOTVEC= 20
;o INPUT/0UTPUT TRAP (10T) ««SCOPE**
PWRVE(C= 26
; ;POWER FAIL
EMTVEC= 30
;;EMULATOR TRAP (EMT) *+ERROR**

000240

457

02-MAY-78

000004
000010
000014
000014
CO0C14
00001
000024
000030

000034

422

462
463
464
465
466
467
468
469

BASIC DEF INITIONS
.EQuIv

22?

461

MACY11 30A(1052)

0001746
000176

000200
000204

000210

;*LOCATION O CONTAINS O TO CATCH IMPROPERLY LOADED VECTORS

000174

000000
000000

000137
000204

000137
000210
0060137

004176
004144

00.152

.=174
DISPREG: .WORD 0
SWREG:
.WORD 0
.SBTTL
STARTING ADDRESS(ES)
JWP
a#BEGINT
.=204
JMP
a#BEGIN
.=210
JMP
SNBEGIN3
S 2T TSI

STTTL2S2 2322223222222

;;SOF TWARE DISPLAY REGISTER
;. SOFTWARE SWITCH REGISTER

;:JUMP
TO STARTING ADDRESS OF PROGRAM

2 2R 222220 d0dRRR Rt RRRdtdd

2;;

.SBTTL

MEMORY MANAGEMENT DEFINITIONS

2;2

;*KT11

VECTOR ADDRESS

MMVEC=

250

;*KT11

STATUS REGISTER ADDRESSES

2;2

000250

2;;

479
4«80
481
Zgg

177572
177574
177576
172516

J*KERNEL ‘°l'* PAGE DESCRIPTOR REGISTERS

2%%
486
487
488
489
490
491
492
493

SRO=
SR1=
SR2=
SR3=

172300
172302
172304
172306
172310
172312
172314
172316

KIPDRO=
KIPDR1=
KIPDR2=
KIPDR3=
KIPDR4=
KIPDRS5=
KIPDR6=
KIPDR7=

172300
172302
172304
172306
172310
172312
172314
172316

SEQ 0009

MASSBUS RH70 AND RH11 DIAGNOSTIC

(ZRHBD.P11

02-MAY-78 10:01

232

MACY11 30A(1052)

02-MAY-78

MEMORY MANAGEMENT DEF INITIONS

10:03

PAGE 10

SEQ 0010

;*KERNEL ''I'" PAGE ADDRESS REGISTERS

497
498
<99
S00
501
502
503
282

172340
172342
172344
172346
172350
172352
172354
172356

KIPARO=
KIPAR1=
KIPAR2=
KIPAR3=
KIPAR4=
KIPARS=
KIPARG6=
KIPAR7=

172340
172342
172344
172346
172350
172352
172354
172356

S06

RN RN R

28;

.SBTTL

509

510
S1
512

JHOOKS REQUIRED BY ACT11
$SVP(=.
.=46

513

000046

515
516

000052

574

000214
000046

046334

000052

000000
000214

E NN

RN RN

NN RN RN

NN R NN AR

RRR

ACT11 HOOKS
AR

AR R

AR AR

T AR AR R

AR AR AR AR AR NN

AN RN AR AR R R RRRARRR

;SAVE PC

$ENDAD

;:1)SET LOC.46 TO ADDRESS OF SENDAD IN .$EOP

.WORD
O
.=$SVP(

;:2)SET LOC.52 TO ZERO
;2 RESTORE PC

.=52

MASSBUS RH70 AND RH11 DIAGNOSTIC
CZRHBD.P11
02-MAY-78 10:01
517
518
519
520
521
522
523
524
525
526

527
528
529
530
531
532
533
534
535
536
537

COMMON TAGS

.SBTTL

10:03

PAGE 11

SEQ 0011

COMMON TAGS

;*THIS TABLE CONTAINS VARIOUS COMMON STORAGE LOCATIONS

;*USED IN THE PROGRAM.
001100
001100
001102
001103
001104
001106
001110
001112
001114
001115
001116
001120
001122
0011264

001100

$CMTAG:
$PASS:
$TSTNWM:
S$ERFLG:
SICNT:
SLPADR:
SLPERR:
$ERTTL:
SITEMB:
$SERMAX:
$ERRPC:
$GDADR:
$BDADR:
$GDDAT:
$8DDAT:

000000
000
000
000000
000000
000000
GO0000
000
001
000000
000000
000000
000000

SWR:

.=1100

.WORD
.BYTE
.BYTE
.WORD
.WORD
.WORD
.WORD
.BYTE
.BYTE
.WORD
.WORD
.WORD
.WORD
.WORD
MORD

0
0
O
0
0
0
O
O
1
C
0
0
0
0
0

;;START CF COMMON TAGS
;;CONTAINS PASS COUNT
;;CONTAINS THE TEST NUMBER
;. CONTAINS ERROR FLAG
;;CONTAINS SUBTEST ITERATION COUNT
;- CONTAINS SCOPE LOOP ADDRESS
2, CONTAINS SCOPE RETURN FOR ERRORS
;. CONTAINS TOTAL ERRORS DETECTED
;. CONTAINS ITEM CONTROL BYTE
;;CONTAINS MAX. ERRORS PER TEST
;;CONTAINS PC OF LAST ERROR INSTRUCTION
:;CONTAINS ADDRESS OF 'GOOD®' DATA
;; CONTAINS ADDRESS OF 'BAD' DATA
;;CONTAINS 'GOOD*' DATA
;;CONTAINS °'BAD' DATA
; ;RESERVED~-NOT TO BE USED

.BYTE
.86;5

O
8

;;AUTOMATIC MODE INDICATOR
;. INTERRUPT MODE INDICATOR

DSWR

;;ADDRESS OF SWITCH REGISTER
: ADDRESS OF DISPLAY REGISTER

WORD

.WORD

DISPLAY: .WORD
$TKS:
177560

$TKB:
$TPS:
$TPB:

$NULL:
$FILLS:

177562
177564
177566

001210
001212
001214

000000
000000
000000

000377

DDISP

;;TTY KBD STATUS
;:TTY KBD BUFFER
::TTY PRINTER STATUS REG.

ADDRESS

;:TTY PRINTER BUFFER REG. ADDRESS
2, CONTAINS NULL CHARACTER FOR FILLS

.BYTE
.BYTE

O
2

$REGAD:

.WORD

$REGO:
$REG1:
$REG2:
$REG3:
$REG4:
$REG5:
$TMPO:
$TMP1:
$TMP2:

.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD

$8ELL:

.ASCIZ

;; CONTAINS ((SREGAD)
+2)
;;CONTAINS ((SREGAD)
+4)
;;CONTAINS ((SREGAD)+6)
:; CONTAINS ((SREGAD)+10)
2 ;CONTAINS ((SREGAD)+12)
:sUSER DEF INED
2 sUSER DEF INED
;sUSER DEF INED
O
2 ;USER DEF INED
O
:-USER DEF INED
O
2 ;USER DEFINED
;sMAX. NUMBER OF ITERATIONS
:sESCAPE ON ERROR ADDRESS
<207><377><377> ;:CODE FOR BELL

$CRLF:

.ASCII

<15

$FILLC: .BYTE
$TPFLG: .BYTE

569

::it"t't'.titttt'i'tttttttttfitttttttt*tttttttitttttlfittttfittt*tt

$AUTOB:
$INTAG:

567

02-MAY-78

MACY11 30A(1052)

$TMP3:
_WORD
$TMP4:
WORD
$TMPS5:
_WORD
$TIMES: 0
$ESCAPE:0
$QUES:

L.ASCII

12
0
0
O
0
O
0
O
O
O
0

;. CONTAINS # OF FILLER CHARACTERS REQUIRED

;2 INSERT FILL CHARS. AFTER A 'LINE FEED'
;o 'TERMINAL AVAILABLE'' FLAG (BIT<07>=0=YES)
;- CONTAINS THE ADDRESS FROM

;;WHICH (SREGO) WAS OBTAINED
;s CONTAINS ((SREGAD)
+0)

2 :QUESTION MARK

: ;CARRJAGE RETURN

MASSBUS RH70 AND RH11

(ZRHBD.P11
573

574

001224

_DIAGNOSTIC

02-MAY-78 10:01
000012

MACY11 30A(1052)
COMMON TAGS

$LF:

LASCIZ

02-MAY-78
A2

;:t.ttttit'ttfiittttfifit

10:03

PAGE 12

;;LINE FEED

1228222222032 220 3222222220202

SEQ 0012
002t dddtRsdd)

MASSBUS RH70 AND RH11 DIAGNOSTIC

C(ZRHBD .P1N

02-MAY-78 10:01

MACY11 30A(1052)

02-MAY-78

ERROR POINTER TABLE

10:03

PAGE 13

2;2

.SBTTL

577
578

:*THIS TABLE CONTAINS THE INFORMATION FOR EACH ERROR THAT CAN OCCUR.
;*THE INFORMATION 1S OBTAINED BY USING THE INDEX NUMBER FOUND IN

gg;

;wNOTEZ:

583
584
585
gg?

b
ow
o
o

579
580

588

589

590

591

:*LOCATION SITEMB. THIS NUMBER INDICATES WHICH ITEM IN THE TABLE IS PERTINENT.
;*NOTE1:
IF SITEMB IS O THE ONLY PERTINENT DATA IS (SERRPC).

001226

055032

001230
001232
001234

067574
071742
072305

598
599
600

001236

055072

601
602
603
604
605

0012640
001242
001244

067714
071754
072312

001246

055132

607
608
609

001250
001252
001254

070035
071766
072316

611
612

001256

055206

001260
001262
001264

070155
072000
072322

001246

055246

619
620
621

001270
001272
001274

070275
072012
072326

623
624

001276

055317

626
627
628
629
630

001300
001302
001304

070275
072012
072326

001306

055533

606

610

613
614
615

616
617

618

622

625

]

EACH ITEM IN THE TABLE CONTAINS & POINTERS EXPLAINED AS FOLLOWS:

EM
DH
DT
DF

:;POINTS
::POINTS
:;POINTS
;:POINTS

TO
TO
TO
TO

THE
THE
THE
THE

ERROR MESSAGE
DATA HEADER
DATA
DATA FORMAT

$ERRTB:

001226

592
593
594
595
596
567

ERROR POINTER TABLE

JITEM 1

JITEM 2

JITEM 3

JITEM 4

JITEM

JITEM 6

JITEM 7

EM1
DH1
DT
DF1

EM2
DH2
DT2
DF2

EM3
DH3
DT3
DF3

EMS
CH4
DT4
DF4
5
EMS

DHS
DTS
DFS

EM6

DHS
DTS
DFS
EM7

:CORRECT BIT DID NOT SET
JIN RH WORD COUNT REGISTER

;CORRECT BIT DID NOT SET
;IN BUS ADDRESS EXTENTION
JREGISTER

;CORRECT BIT DID NOT SET
:IN BUS ADDRESS REGISTER

;CORRECT BIT DID NOT SET
;IN RHDB REGISTER

:NED DID NOT SET IN
;RHCS2 REGISTER

JNEM LOGIC TO SET TRE
;AND SC BITS IN RHfS1

;1S NOT WORKING

;NEM BIT DOES NOT READ AS SET

SEQ 0013

MASSBUS RH70 AND RH11 DIAGNOSTIC
CZRHBD.P11
02-MAY-78 10:01

631
632
g%z

001310
001312
001314

070275
072012
072326

635

001316

055601

637
638
639

001320
001322
001324

070275
072012
072326

641

001326

055635

644

001330

001332
001334

072024
072332

648

001336

055676

651
652
653

001340
001342
001344

070275
072012
072326

656

001346

055716

661
662
663

001350
001352
001354

070275
072012
072326

666

001356

055765

001360

JITEM 10

JITEM

SITEM

001362
001364

072012
072326

676

001366

056011

678
679
¢80

001370
001372
001374

070275
072012
072326

683

001376

056035

8 2
02-MAY-78
10:03

PAGE 14

SEQ 0014

DH5
DTS
DF5

EM10

;TRE BIT

SET BUT NEM

JAND SC ARE NOT?

DH5
DTS
DFS
1

EM11
DH11
DT
DF11
12
EM12

DHS

2SC BIT SET BY ATTN OR MCPE
JERROR OR SC

IS SHORTED

s SHOULD HAVE BEEN SET BY NEM AND TRE

:TRE BIT SET BY NEM BUT SC
;DID NOT SET, LOGIC BETWEEN

;TRE AND SC NOT WORKING

DTS
DF5

SITEM

13
EM13

DH5
DT5
DF5S

SITEM

070275

670
671

30A(1052)

ERROR POINTER TABLE

070402

645
646

66S:

MACY11

;TRE BIT IS SET BUT SC
JREADS AS CLEARED. SC
cLOGIC ASSOCIATED WITH TRE
;BIT IS NOT WORKING OR SC

;HAS AN OPEN GOING TO THE BUS

EM14

cWCE BIT DID NOT SET,

JRHCS2

BIT

DH5
DT5
DF5

JITEM

EM15

;WCE BIT DID NOT SET BUT

:ggg AND SC IN RHCS1 ARE

DH5
DTS
DF5

JITEM

16
EM16

;WCE AND SC ERROR BITS ARE
sSET TRE ERROR BIT SHOULD ALSO
;BE SET BUT IT READS AS CLEARED
;THERE MIGHT BE AN OPEN BETWEEN

MASSBUS RH70 AND RH11_DIAGNOSTI(
02-MAY-78 10:01
CZRHBD P11
687
688
689
690
6N
692

693

694
695
696
697
698
699
700
701
702
703
704
705
706
707
708
709

710
1
712
713
714
715
716
7217
718
719

720

02-MAY-78
MACY11 30A(1052)
ERROR POINTER TABLE

10:03

PAGE 15

;TRE AND THE BUS

001400
001402
001404

070275
072012
072326

001406

056055

JITEM

DH5
DTS
DF5
17
EM17

;WCE AND TRE ARE SET BUT
2SC BIT READS AS CLEARED
;LOGIC BETWEEN TRE AND SC
;DOES NOT SEEM TO BE WORKING
;BUT IT WORKED OK ON THE
;NON-EXISTENT MEMORY TEST
;WHICH PRECEDED THIS TEST

001410
001412
001414

070275
072012
072326

001416

056124

001420
001422
001424

070275
072012
072326

001426

056155

001430
001432
001434

070275
072012
072326

001436

056204

DH5
DTS
DF5S
JITEM

20
EM20

;UPE DID NOT SET IN RHCSZ2

DHS
DTS
DF5
JITEM

21
EM21

;TRE AND SC BITS ARE SET

JEITHER UPE HAS AN OPEN GOING
;7O BUS OR TRE AND SC WAS
;SET BY ANOTHER ERROR

DHS
DTS
DF5
JITEM

22
EM22

;TRE BIT IS SET, UPE AND SC
;SHOULD ALSO BE SET BUT THEY
JREAD AS CLEARED

001440
001442
001444

070275
072012
072326

001446

056237

001450
001452
001454

070275
072012
072326

001456

056256

DH5
DTS
DF5
JITEM

23
EM23

;UPE AND TRE ARE SET BUT
;SC DID NOT SET, LOGIC TO
;SET SC DOES NOT SEEM TO
;BE WORKING

DH5
DTS5
DF5
JITEM

24
EM24

;NED DID NOT SET IN RH(CSZ

SEQ 0015

MASSBUS RH70 AND RH11_DIAGNOSTIC
CZRHBD P11
02-MAY-78 10:0
743
744
745
746
747

001460
001462
001464

D 2
8
2)
02-MAY-7
30A(105
MACY11
TABLE
ERROR POINTER

056307

001470
001472
001474

070275
072012
072326

001476

056341

001500
001502
001504

070275
072012
072326

001506

056367

001510
001512
001514

070275
072012
072326

001516

056422

001520
001522

001524

070275
072012
072326

001526

056457

001530
001532
001534

070275
072012
072326

001536

056516

PAGE

DH5
DT5
DF5

070275
072012
072326

001466

:03

;1TEM

25
EM25

JTRE AND SC ARE SET
;BUT THEY SHOULD HAVE BEETM“
;SET BY NED WHICH READS
;AS CLEARED

DH5
DTS
DFS
JITEM

26
EM26

;TRE BIT SET BUT NED
JAND SC BITS READ AS
;CLEARED. NED SHOULD
JHAVE SET CAUSING TRE
;TO SET WHICH IN TURN
LOGIC NOT WORK
JSET SC.
CTLY
s ING CORRE

DH5
DT5
DF5

JITEM

EM27

;TRE BIT WAS NOT SET

DH5
DT5
DFS

;NOT WORKING

30
EM30

;BY NED. TRE SET LOGIC

;MXF BIT DID NOT SET
2 IN RHCS2

DH5
DT5
DF5
JITEM

EM31

;MXF BIT SHOULD BE SET
;IN RHCSZ BUT 1T READS AS
JCLEARED. TRE AND SC ARE SET
:IN RHCS1.

DHS
DTS
DF5
SI1TEM

32
EM32

;TRE BIT IS SET BUT MxF

JAND SC READ AS CLEARED

SEQ 0016

MASSBUS RH70 AND RH11_DIAGNOSTIC
CZRHBD.P11
02-MAY-78 10:01
001540
001542
001544

070275
072012
072326

001546

056545

02-MAY-78
MACY11 30A(1052)
TABLE
ERROR POINTER
DH5
DTS
DF5
JITEM

EM33

10:03

PAGE 17

JMXF AND SC BITS ARE INCORRECT

;TRE LOGIC ASSOCIATED WITH
;MXF

IS NOT WORKING

;TRE READS AS CLEARED
;OR TRE HAS AN OPEN GOING
:TO THE BUS

001550
001552
001554

070275
072012
072326

001556

056615

DHS
DTS
DF5
JITEM

EM34

JTESTER IS NOT CONNECT
;TO THE MASSBUS DEVICE

001560

070470

DH34

;CODE SHOULD BE A 40
;PC TEST NO. DEVICE CODE

001562

072034

DT34

;SERRPC,S$TSTNM,DT,0

001564

072335

DF34

;0,0,0

001566

056665

35
EM35

;BIT IN RHCS3 WILL NOT ET

001570
001572
001574

071623
072264
072332

001576

056717

001600

070550

DH36

;PC TEST NO. FAILING ADDRESS

001602

072050

DT36

;$SERRPC,$TSTNM_RH(CS1.,0

001604

072341

DF 36

:0,0,0

001606

056755

37
EM37

;DLT DID NOT SET IN RHCSZ2

001610

070545

DH35

001612

072044

D735

001614

072340

DF 35

001616

057006

JITEM

DH171
DT171
DF11
JITEM

JITEM

36
EM36

EM4O

;DLT IS NOT SET IN RHCSZ2 BUT
;TRE AND SC READ AS SET.TRE

JAND SC MUST HAVE BEEN SET BY A DIFFERENT ERROR

SEQ 0017

MASSBUS RH70 AND RH11 _DIAGNOSTIC
02-MAY-78 10:01
CZRHBD P11

(2-MAY-78

ERROR POINTER TABLE

PAGE 18

10:03

DH35
DT35
DF 35

001620
001622
001624

070545
072044
072340

001626

057146

001630

070631

DHé1

;PC

001632

072060

DT41

0
;$ERRPC,$TSTNM,

001634

072344

DF41

JITEM

EM41

;OUTPUT READY IN RHCS?Z

;DID NOT SET
TEST NO.

JITEM

000000
000000
000000

001666

057460

001670
001672
001674

000000
000000
000000

001676

057533

001700
001702
001704

000000
000000
000000

001706

057614

001710

000000

;RHWC

JITEM

:SOME BITS CLEARED AFTER CLEAR
;WAS LOADED INTO RH(CS?

JITEM

001660
001662
001664

;RHWC DID NOT LOAD ANY BITS (177777)

JITEM

057366

A77777)

OO0

001656

JITEM

2w
>~

057322
000000
000000
000000

001646
001650
001652
001654

OO0

000000
000000
000000

001642
001644

i~Lo

001440

JALL BITS DID NOT LOAD INTO RHWC

OO0

057251

JNON-EXISTANT MEMORY BIT
;SET IN RHCS2

JRHBA DID NOT CLEAR AFTER (LR
;WAS LOADED INTO RH(CS?2

001636

»H

855

856
857
858

MACY11 30A(1052)

EM47

JALL BITS DID NOT LOAD INTO
;RHBA REGISTER (1/7776)

SEQ 0018

MASSBUS RH70 AND RH11_DIAGNOSTIC
CZRHBD P11
02-MAY-78 10:01
91
912
913
914
915
916
917
918
919
920
921
922
923
924
925
926
927
928
929
930
931
932
933
934
935

001712
001714

MACY11 30A(1052)
02-MAY-78
TABLE
ERROR POINTER

10:03

PAGE 19

000000
000000

001716

057665

001720
001722
001724

000000
000000
000000

001726
001730
001732
001734

057744
000000
000000
000000

001736

057775

JITEM

JLOADING TRE AFER ITS SET DOES NOT
s CLEAR ERRORS

;PGE DID NOT SET IN RHCSZ2

;THE PROM WHILE ACCESSING A
JREGISTER WHICH YOUR TESTER

;CANNOT SUPPLY INFORMATION FOR
;SAYS INFORMATION IS PRESENT

001740

070655

;PC TEST NO. ADDRESS CONT

001742

072066

;$SERRPC,$TSTNM,
BAE, SREGO

001744

072346

001746
001750
001752
001754

060150
000000
000000
000000

001756
001760
001762
001764

060156
000000
000000
000000

001766
001770
001772
001774

060163
000000
000000
000000

001776
002000
002002
002004

060170
000000
000000
000000

002006
002010
002012

060176

JITEM

JRHCS1

JRHWC

;RHBA

;RHMRZ

;RHCS?2

SEQ 0019

MASSBUS RH70 AND RH11_DIAGNOSTIC
CZRHBD.P11
02-MAY-78 10:01

967
968
9%9
970
971
972
973
974
975
976
977
978
979
980
981
982
983

984
985
986
987
988

989
990
991
992
993
994

995
996
997
998
999
1000

1001
1002
1003
1004
1005
1006

b =D puerd
k)
b md
2
d

ele RNTe RV, P NP N o

b md
—

)

eolelelelolelolele] o

1007
1008

002014

000000

002016
002020
002022
002024

060204
000000
000000
000000

002026
002030
002032
002034

060211
000000
000000
000000

002036
002040
002042
002044

060216
000000
00000
00000C

002046
002050
002052
002054

060223
000000
000000
000000

002056

060231
000C00
000000
000000

060236
000000
000000
000000
060244
000000
000000
000000

060251
000000
000000
000000

060257
000000
000000
000000

gsg5;1pg?fi;ggS%fiBLgZ-MAY-;S 210:03 PAGE 20
0

JITEM

EM60

JRHST

0
0
0
JITEM

61
EM6T
0
0
0

JITEM

62
EM62
0
0
0

JITEM

63
EM63

;RHTDB

JITEM

64
EM64

;RHDB

JITEM

65
EM65

;RHMR1

JITEM

66
EM66

JRHDT

JITEM

67
EM67

s RHBAE

JITEM

EM70

JRHER

;RHAS

;RHCS3

SEQ 0020

MASSBUS RH70 AND RH11 DIAGNOSTIC
CZRHBD P11
02-MAY-78 10:01
1023
1024
1025
1026
1027
1028
1029
1030
1031
1032
1033
1034
1035

MACY11 30A(1052)

1
2
02-MAY-78 10:03

ERROR POINTER TABLE
JITEM

EM71

002126

060265

002130

071651

DH172

002132

072274

DT172

002134

072400

DF172

002136

060354

002140

JITEM

PAGE 21

;DEVICE NO DOES NOT EQUAL

;A 7 IN RHMRZ AFTER A (CLEAR

EM72

;JRHCS1 HAS AN ERROR BIT
;SET AFTER CLEAR OPERATION

071033

DH72

;PC TEST NO. CONTENTS OF REGISTER

002142

072102

DT71

002144

072353

71
DF

002146

060411

002150

071033

DH72

002152
002154

072102
072353

D171
DF71

002156
002160
002162
002164

060440

JITEM

SJITEM

060466

002170
002172
002174

071033
072102
072353

002176

060516

002200
002202
002204

071122
072112
072356

002206

060623

002210
002212
002214

067574
071742
072306

EM74
DH7?2
D171
DF71

071033
072102
072353

002166

EM73

JITEM

EM75

;ERROR BIT SET IN RH(CSZ2

;AFTER A CLEAR OPERATION

JERROR BIT SET IN RHER,

;TESTER ERROR REGISTER,AFTER

;A CLEAR OPERATION

JERROR BIT SET IN RHST

JAFTER A CLEAR OPERATION

DH72
D171
71
DF
76

EM76
DH76
D176
DF 76
77

EM77

DHA

DT
DF1

;JRHBA INCREMENTED BUT DID NOT CARRY
;OVER TO THE RHBAE REGISTER

JREADY DID NOT SET ANv RHW(

;DID NOT INCREMENTM DOING A WRITE OPERATION

SEQ 0021

MASSBUS RH70 AND RH11 DIAGNOSTIC
02-MAY-78 10:01
CZRHBD P11
1079
1080
1081
1082
1083
1084
1085
1086

060735

002220
002222
00222¢4

067714
071754
072312

002226
002230
002232
002234

061022
067714
071754

002236
002240
002242
002244

061067
000000
000000
000000

002246

061120

002250
002252
002254

067574
071742
072306

002256

061276

002260
002262
002264

000000

002266

061467

002270
002272
002274

071160
072124
072362

072312

JITEM

100

EM100
DH2

JITEM

;ITEM

OO0

SJITEM

JITEM

106

JRHBAE IS MESSED UP IT SHOULD

;EQUAL 40,1T DOES NOT = 37(0LD)
JAND IT DOES NOT = 0

JRHBAE DID NOT GET

EM107

JREAD REV.

INCREMENTED

OPERATIONS DID NOT

:?SSDssROM TESTER TO STORAGE LOCATION
;

—

061763

;RHBA DID NOT CLEAR AFTER (LR
;WAS LOADED INTO RHCS?2

EM106
DH105
DT105
DF105

002326

JITEM

DH105
DT105
DF105

-~O

000000
000000
000000

JITEM

EM105

(RBU

JRHBAE = 0 [T SHOULD = 40
JAFTER A ONE WORD WRITE

—

002320
002322
002324

JITEM

—

061671

SEQ 0022

;DOING A WRITE OPERATION RDY
;DID NOT SET AND WC WAS NOT INCREMENTED
JAND INFO WAS NOT WRITTEN TO TESTER
;(WRITE OPERATION DID NOT WORK)

——

002316

PAGE 22

;DOING A WRITE OPERATION RDY
;DID NOT SET AND WC DID NOT INCREMENT
;BUT INFO WAS WRITTEN TO TESTER

M-a=0O000

002314

061562
000000
000000
000000

10:03

;READY DID NOT SET IN RH(CS1

flwf\)-‘gom\lO*\thNN—!OwD@\JO\V\.I\WN—'OO

061534
071160
072124
072362

JITEM

luilelels)

)
)
b
——d bl b el cd b e cd el ) b e b end el ) wd b oD ) e ed ed b D
—ad b md b e e e oD d e ed b o amd b and b d e e ad b d D D )
WWWN

000000
000000

0°-MAY-78

ERROR POINTER TABLE

) o
) e

d
b

D d
b

b
D D

1098

002216

MACY11 30A(1052)

;A17 DID NOT SET AFTER BA WAS INCREMENTCD

MASSBUS RH70 AND RH11 DIAGNOSTIC

CZRHBD.P11

02-MAY-78 10:0°%

1135
1136
1137
1138
1139
1140
1141
1142
1143
11644

002330
002332
002334

071225
072140
072362

002336
002340

062036
071225

002346

062063

1146
1147
1148
1149
1150

002350
002352
002354

071225
072140
072362

002356

062160

1152
1153
1154

002360
002362
002364

000000
000000
000000

1157

002366
002370

062256
000000

1161

002376

062370

1163
1164
1165
1166
1167
1168
1169
1170
1171
1172
1173
1174
1175
1176
1177

002402
002404

000000
000000

002406

062422

002410
002412
002414

071537
072242
072356

002416

062520

002420
002422
002424

070402
072024
072332

002426

062561

002430
002432
002434

071272
072154
072356

002436
002440
002442
002444

062644
071272
072154
072356

002446

062676

1145

1151

1155
1156

1158
1159
1160
1162

1178

1179
1180
1181
1182
1183

1184
1185
1186
1187
1188
1189
1190

002342
002344

002372
002374

002400

072140
072362

000000
000000

MACY11 30A(1052)

02-MAY-78

ERROR POINTER TABLE

JITEM

DH111
DT111
DF105
112
EM112
DH111
DT111
DF105
113
EM113
DHIM

JITEM

DT111
DF105
114
EM114

JITEM

0
0
0
115

JITEM

0
0
116

000000

PAGE 23

;BA DID NOT INCREMENT

JRHBA INCREMENTED BUT IT DID
sNOT CARRY TO A16 + A17 IN RHCS1

;OUTPUT READY WAS NOT NEGATED
SJAFTER CLR WAS LOADED INTO RHCSZ2

EM116

;MDPE DID NOT SET IN RHCS2

0
0
117
EM117

JITEM

DH11
DT11
DF
11
121

JITEM

10:03

;ALL BITS DID NOT READ TO STORAGE
;JLOCATION (RBUF) DURING A READ REV. OPERATION

DH147
DT147
DF76
120

JITEM

EM115
0

JITEM

EM120

EmM121
DH121
DT121
DF76
122
EM122
DH121
DT121
DF76
123
EM123

JINFO DID NOT WITE TO TESTER
;DOING A WRITE REV. OPERATION

;TRE AND SC DO NOT SEEM TO HAVE
;BEEN SET BY MDPE

;TRE IS ONLY BIT SET ,MDPE AND
;SC SHOULD ALSO BE SET

;SC NOT SET AFTER MDPE AND TRE SET

;TRE AND SC WERE SET EITHER BY
;AN ERROR OTHER THAN PGE,OR PGE

SEQ 0023

002476

063140

002500
002502
002504

000000
000000
000000

002506

063231

002510
002512
002514

000000
000000
000C00

002516
002520
002522
002524

063327
071330
072166
072341

002526
002530
002532
002534

063401
071330
072166
070550

002536
002540
002542
002544

063433

002546

063467

002550
002552
002554

071356
072176
072367

002556

063570

002560
002562
002564

071356
072176
072367

caed
e

—

b
) )
b ed

(9, S UWN=OVONOWVEWN=2000NONESUWN=O VONOWNESWN=O

D
b e
D
d d
)
d ad e —d amd b

b — wnd cad
)
b
b
b
d
d
d
med o
)
b
b
b
b
b cd i
D d
d
i
- b

N DS LS,

1246

071356
072176
072367

JITEM

SITEM

JITEM

000000
000000
000000

5
M125

6
126

)

002470
002472
002474

JITEM

M127

—-O
W
o

063044

M-a2O0O00O

) e

002466

MmMoaOoOooOo
N

000000
000000
000000

k1,8

002460
002462
002464

M124

M=OO0O

062751

JITEM

PAGE 24

;HAS AN OPEN GOING TO THE BUS

M-=00O0O
~n

002456

L 2
02-MAY-78 10:03

ERROR POINTER TABLE

NRRRRNRRRS22S »ogoc
NS
NN

000000
000000
000000

b —d D —

002450
002452
002454

ST, N 1oV oS 1oV 1,8 1,0)
LN LN LN ST ST R STS ST S LN TS IS S LS SIS IS S I ST S I\ LASTANTANT
b ad =D ) d D D
—d 3

1IN

MACY11 30A(1052)

ulelele

MASSBUS RH70 AND RH11_DIAGNOSTIC
CZRHBD .P11
02-MaY-78 10:01

DH130
DT130
DF 36

;DBL NOT SET AFTER A 4 WORD WRITE
;FROM AN EVEN ADDRESS

;DBL SET AFTER DOING A 1 WORD WRITE
;FROM AN EVEN ADDRESS

;DBL SET ON A 3 WORD WRITE
;FROM AN EVEN ADDRESS

;DBL DID NOT SET AFTER A 2 WORD
;JWRITE FROM AN EVEN ADDRESS

;MCPE SET BUT SC READS AS CLEARED

EM131
DH130
DT130
DH36

JMCPE DID NOT SET

EM132

JWCE LO (EW) DID NOT SET IN RH(CS3

DH132

DT132
SJITEM

DF132

EM133
DH132

sWCE HI (OW) SET ALONG WITH
JWCE LO IN RHCS3

DT132
JITEM

JITEM

DF132

EM134
DH132
DT132
DF132
135

;WCE LO IS SET IN RHCS3 BUT
sWCE IS NOT SET IN RHCS2

SEQ 0024

MASSBUS RH70 AND RH11 DIAGNOSTIC
CZRHBD.P11
02-MAY-78 10:01
1247
1248
1249
1250
1251
1252
1253
1254
1255
1256
1257
1258
1259
1260
1261

002566
002570
002572

002574

063651

071356

072176
072367

002600
002602
002604

063705
071356
072176
072367

002606
002610
002612
002614

063766
071356
072176
072367

002576

MACY11 30A(1052)
02-MAY-78
ERROR POINTER TABLE

JITEM

10:03

PAGE 25

EM135
DH132
DT132
DF132

;WCE HI DID NOT SET IN RH(CS3

EM136
DH132
DT132
DF132
137
EM137
DH132
DT132
DF132

;WCE HI SET BUT WCE DID NOT SET IN RHCS?

136

140

JWCE LO SET WITH WCE HI IN RHCS3

SEQ 0025

MASSBUS RH70 AND RH11 DIAGNOSTIC
CZRHBD .P11
02-MAY-78 10:01

002616
002620
002622
002624

064067
000000
000000
000000

002626
002630
002632
002634

064164
000000
000000
000600

002636
002640
002642
002644

064220
071434
072216
072356

002646

064272

002656
002660
002662
002664

064346
000000
000000
000000

1287
1288
1289
1290
1291
1292

002666
002670
002672
002674

064434
071434
072214
072356

002676

064501

1294

002700
002702
002704

071472
072226

002706

064552

002710
002712
002714

071537
072242
072356

002716
002720
002722
002724

064643
071537
072242
072356

1262
1263
1264
1265

1266
1267

1268
1269
1270
1271
1272
1273
1274
1275
1276
1277

1278
1279
1280
1281
1282
1283
1284
1285

W=
ONO

NOWNMEBSWN=O

b
b
el
—

QU G

U QU W

383

1293

002650
002652
002654

000000
000000
000000

072362

064775
071537
072242
072356
065077

071537
072242

MACY11 30A(1052)

ERROR POINTER TABLE

EM140

JITEM

0
0
0

141

02-MAY-78

10:03

PAGE 26

SEQ 0026

WRITE OPERATION DID NOT INC W(C

EM141
0

;BA WAS NOT INC AF ER A WRITE

EM142
DH142
DT142
DF 76

;INFO WAS NOT WRITTEN TO TESTER

EM143

JREAD OPERATION DID NOT

0
0
142

143

144

EM144

145
EM145
DH142
DT142
DF76
146

INC WC

;BA WAS NOT INC AFTER A READ

JINFO DID NOT READ FROM TESTER

EM146

;THIS

DH146
DT146
DF105
147
EM147

;JALL BITS DID NOT GET TRANSFERED

DH147
DT147
DF76
150
EM150
DH147
DT147
DF76
151

IS FOR PRINTED CONTENTS

;OF THE RH REGISTERS

;DURING A READ OPERATION

JREAD OPERATION DID NOT SEEM TO WORK

EM151
DH147
DT147
DF76

JALL BITS DID NOT WRITE TO TESTER

EM152

;WRITE OPERATION DID NOT WRITE
;TO TESTER

DH147
DT147

003000
003002
003004

000000
000000
000000

003006

065503

003010
003012
003014

000000
000000
000000

003016

065577

003020
003022
003024

000000
000000
000000

003026

065666

003034

=200

000000
000000
000000

066044

003050
003052
003054

003056

066122

WNWNINWN
NNNN

JITEM

000000
000000
000000

065755
000000
000000
000000

1363

JITEM

156

JITEM

;DBL SET ON A 1 WORD READ FROM
;AN EVEN ADDRESS

;DBL SET ON A 2 WORD WRITE REV
;WITH BAI SET

;DBL SET ON A 2 WORD WRITE fROM

;FROM AN ODD ADDRESS

157

;DBL DID NOT SET ON A 2 WORD

JWRITE REV FROM AN EVEN ADDRESS

M160

161

M162

M163

;DBL SET ON A 2 WORD WRITE REV
;FROM AN ODD ADDRESS

;DBL SET ON A 3 WORD WRITE REV

;FROM AN ODD ADDRESS

;DBL DID NOT SET ON A 2 WORD

;DBL SET ON A 2 WORD READ

;FROM AN ODD ADDRESS

OOOC

003030

JITEM

SET

N
(%,

065412

002776

M155

000000
000000
000000

m= OO0

002770
002772
002774

SITEM

3\’1

065324

m - OO0

002766

3\n

000000
000000
000000

;WITH BAI

154

EM154

M-oao0Oo

002760
002762
002764

JITEM

;DBL SET ON A 2 WORD TRANSFER

o
o

065233

[ o =Y lelele]

002756

0
0
0

3c>

000000
000000
000000

EM153

ubdelols)

002750
002752
002754

PAGE 27

DF76
153

OOOM;OOO

065147

JITEM

M=
o
W

002746

003032

ERERIRAR

072356

:03

£H

002744

pay

1318
1319

B 3
MACY11 30A(1052)
02-MAY-78
ERROR POINTER TABLE

MASSBUS RH70 AND RH11_DIAGNOSTIC
CZRHBD. PN
02-MAY-78 10:01

EM164

;DBL SET ON A 2 WORD READ REV

SEQ 0027

MASSBUS RH70 AND RH11_DIAGNOSTIC
CZRHBD P11
02-MAY-78 10:01

1411

1412
1413
1414

1415
1416
1417
1418
1419
1420
1421
1422
1423
1424
1425
1426
1427
1428
1429

10:03

PAGE 28

000000
000000
000000

003076

066307

003100
003102

003104

000000
000000
000000

003106

066366

003110
003112
003114

000000
000000
000000

003116
003120
003122
003124

000000

003126

066465

071575
072254
072375

003130
003132
003134

000000
000000
000000

003136

066537

003140
003142
003144

000000
000000
000000

003146

066560

003150
003152
003154

000000
000000
000000

003156
003160
003162
003164

066644
000000
000000

003166
003170
003172

066675
000000
000000
000000

003174

000000

;DBL DID NOT SET ON A 2 WORD
JREAD REV FROM AN EVEN ADDRESS

JITEM

;DBL SET ON A 3 WORD READ FROM

;AN EVEN ADDRESS

JITEM

:DBL DID NOT SET ON A 3 WORD
JREAD REV FROM AN EVEN ADDRESS

JITEM

;ITEM

JITEM

;TRE READS AS SET,PGE AND SC
;READ AS CLEARED.PGE AND SC
;SHOULD ALSO BE SET

M172

7
M173

;PGE AND TRE READ AS SET SC
;READS AS CLEARED

1410

003070
003072
003074

;ITEM

74
M174

\Nn

1403

1404
1405
1406
1407
1408
1409

003066

066211

m-20O leole

1400
1401
1402

000000
000000
000000

ulelelela

1387
1388
1389
1390
1391
1392
1393
1394
1395
1396
1397
1398
1399

;FROM AN ODD ADDRESS

003060
003062
003064

QOO Ma2OOOM-=2000

1374
1375
1376
1377
1378
1379
1380
1381
1382
1383
1384
1385
1386

MACY11 30A(1052)
02-MAY-78
ERROR POINTER TABLE

4
M175

JREADY DID NOT CAUSE AN INTRUPT

JWITH IE SET IN RHCS1

;1E WILL NOT SET IN RHCS1

;IE HAS AN OPEN GOING TO THE BUS

SEQ 0028

MASSBUS RH70 AND RH11_DIAGNOSTIC
CZRHBD PN
02-MAY-78 10:01
1430
1431
1432
1433
1434
1435
1436
1437
1438
1439
1440
1441
1442
1443
1464
1445
1446
1447
1448
1449
1450
1451
1452
1453
1454
1455
1456
1457
1458
1459
1460
1461
1462
1463
1464
1465
1466

1467
1468
1469
1470
1471
1472
1473
1474
1475
1476
1477
1478
1479
1480
1481
1482
1483
1484
1485

003176
003200
003202
003204

066735
071272
072154
072356

003,96
003210
003212
003214

066770
071272
072154
072356

003216
003220
003222
003224

067035
070631
072060
072344

003226
003232
003234

067117
070631
072060
072344

003236
003240
003242
003244

067201
070631
072060
072344

003246
003250
003252
003254

067263
070631
072060
072344

003256
003260
003262

003264

067343
070631
072060
072344

003266
003270
003272
003274

067430
070631
072060
072344

003276
003300
003302
003304

067514
070631
072060
072344

003306
003310
003312
003314

067540
000000
000000
000000

003316

000774

003230

MACY11 30A(1052)

D 3
02-MAY-78 10:03

ERROR POINTER TABLE

CITEM

JITEM

176
EM176
DH121
DT121
DF76

177

EM177
DH121
DT121

200
EM200
DH41
DT41
DF 41

201

;DLY AND TRE ARE SET ,SC READS AS CLEARED

JHIBITE LOBYTE GATE FOR WC NG

EM201
DH41
DT41
DF41

JHIBYTE LOBYTE GATE FOR DB NG

EM202

JHIBYTE LOBYTE GATE FOR BA IS NG

202

DH&1
DT41
DF 41

203

EM203
DH41
DT41
DF41

204

ITEM

DH41
DT41
DF41
205

JITEM

;JTRE IS SET DLT AND SC SHOULD ALSO BE SET

DF76

JITEM

PAGE 29

;RHBA HAS WRONG ADDRESS

EM204

;TESTER DATA BUFFER HAS WRONG INFO

EM205

JRH DID NOT INTERUPT

DH41
DT41
DF41

206

EM206
DH41
DT41

DF 41
207
5M207

;RHWC SHOULD BE ZERO

;TRANSFER WAS DONE ON PORT B

0
0

JRH REGISTERS

RHVEC:774

;RH VECTOR ADDRESS

;"t*tttt*t*tttttt*tttttt*it*tt*t*tttlttl’tttttttfiiitttfi't*'fittfittt

SEQ 0029

MASSBUS RH70 AND RH11 DIAGNOSTIC
CZRHBD.P11
02-MAY-78 10:01

SN N=OVONOWVEWN-O

NN =S
D
a2
RORO w\nv\\nmmmmmmmmm

b
) wmd
d
)
b
b =D emd
b md o

SEQ 0030

;CONTROL AND STATUS REGISTER 2 (RH(SZ2)
usi1=

us2=
US4=
BAl=

2
4
10

CLR=
IR=
OR=
MPE =
MXF =

40
100
200
400
1000

PAT=

PGE=
NEM=

NED=
UPE=
WCE=
DLT=

2000
4000
10000
20000
40000
100000

JUNIT SELECT
JUNIT SELECT
JUNIT SELECT
:BUS ADDRESS

(BIT #0)

(BIT #1)
(BIT #2)

INCREMENT INHIBIT (BIT #3)

s INVERT PARITY CHECK FOR MCPE

;CLEAR (BIT #5)
;INPUT READY (BIT #6)
:OUTPUT READY (BIT #7)
*MASS BUS PARITY ERROR (BIT #8)
:MISSED TRANSFER ERROR (BIT #9)
;PROGRAM ERROR (BIT #10)
sNON EXISTANT MEMORY (BIT #11)
;NON EXISTANT DRIVE (BIT #12)
;UNIBUS PARITY ERROR (BIT #13)

SWRITE CHECK ERROR (BIT #14)

;DATA LATE

(BIT #15)

;CONTROL AND STATUS REGISTER 3 (RHCS3)
000001
000002
000004
000010
000100

1525

SNNNN
fole
- IaNTe N

PAGE 30

;BUS ADDRESS REGISTER (RHBA)
;EACH BIT IS CALLED BY BIT NUMBER

1493
1494
1495
1496
1497
1498
1499
1500
1501

- —

ERROR POINTER TABLE

JEACH BIT IS CALLED BY BIT NUMBER

1488
1489
1490
149
1492

wVivivhuvwn

3
E
02-MAY-78 10:03

;WORD COUNT REGISTER (RHW(C)

1486
1487

MACY11 30A(1052)

100000

IPCKO=
IPCK1=
IPCK2=
IPCK3=
1E3=
DBL=
WCELO=
WwCEHI=
DPELO=
DPEHI=
APE=

1
2
4
10
100
2000
4000
10000
20000
40000
100000

PARITY,ON LOW BYTE OF EVEN WORD (BIT #0)
PARITY,ON Hl BYTE OF EVEN WORD (BIT #1)
PARITY,ON LOW BYTE OF ODD WORD(BIT #2)
PARITY,ON HI BYTE OF ODD WORD(BIT #3)

: INTERUPT ENABLE, SAME AS BIT 6 OF RHCS1 (BIT #6)
:DOUBLE WORD
*WRITE CHECK
*WRITE CHECK
;DATA PARITY
;DATA PARITY

OPERATION,SET WHEN LAST MEMORY TRANSFER WAS
ERROR EVEN WORD (BIT #11)
ERROR ODD WORD (BIT #12)
ERROR EVEN WORD (BIT #13)
ERROR ODD WORD (BIT #14)

*ADDRESS PARITY ERROR (BIT #15)

;DATA BUFFER REGISTER (RHDB)
JEACH BIT IS CALLED BY BIT NUMBER

;CONTROL AND STATUS 1 REGISTER.
000001
000100
000200
000400
001000

;INVERT
;INVERT
;INVERT
s INVERT

GO=
1E=
RDY=
Al6=
A17=

1
100
200
400
1000

(#00)

;GO (BIT 40)
s INTERRUPT ENABLE (BIT #6)
*READY (BIT #7)
*HIGH ORDER UNIBUS BITS (BIT #8)
;HIGH ORDER UNIBUS BITS (BIT #9)

MASSBUS RH70 AND RH11 DIAGNOSTIC

CZRHBD.P11
1542
1543
1544
1545
1546
1547
1548
1549
1550

1551
1552
1553
1554
1555

1556
1557

1558
1559
1560
1561
1562
1563
1564
1565
1566

02-MAY-78 10:01
002000
004000
020000
040000
000100
100000

02-MAY-78
MACY11 30A(1052)
ERROR POINTER TABLE
PSEL=

4000
20000

SC=

100000

000001

000004
000010
000020
000040
000100
010000
020000

DRY=
DPR=

MOL =
PIP=
ERR=
ATA=

;JTRE BIT FOR A BYTE OPERATION

;SPECIAL CONDITION (BIT #15)

40000

JATTENTION ACTIVE

100000

RFAIL=
DTE=

100
10000

OPl=

:DRIVE READY (BIT #7)
;DRIVE PRESENT (BIT #8)
JMEDIUM ON-LINE (BIT #12)
;POSITIONING OPERATION IN PROGRESS (BIT #13)
;COMPOSIT ERROR. (BIT #414)

20000

RMR=

(PE=
DPE=
RMBEX=

(#01)

200
400
10000

LF=

10
20
40

20000

SEQ 0031

; TRANSFER ERROR (BIT #14)

40000
100

iE?ROR R%GISTER #01

PAGE 31

;PORT SELECT (BIT #10)
;DEVICE AVAILABLE (BIT #11)
JMASSBUSS PARITY ERROR (BIT #13)

;STATUS REGISTER (RHST)
000200
000400
010000
020000
040000

10: 03

2000

DVA=
MCPE=

TRE=
TREB=

(RHER)

(#02)

(BIT #15)

sILLEGAL FUNCTION (BIT #0)
JREGISTER MODIFICATION REFUSED (BIT #2)
;CONTROL PARITY ERROR(BIT 43)
;DATA PARITY ERROR(BIT #4)
;MASSBUS EXCEPTION ,WHEN SET CAUSES AN ABORT OF A DATA T
JMASSBUS POWER FAIL(BIT #6)
;DRIVE TIMING ERROR (BIT #12)
;OPERATION INCOMPLETE (BIT #13)

MASSBUS RH70 AND RH11_DIAGNOSTIC

CZRHBD.P11

02-MAY-78 10:01

MACY11 30A(1052)

02-MAY-78

ERROR POINTER TABLE

10:03

PAGE 32

SEQ 0032

;DIAGNOSTIC REGISTER (RHMR1) (#03)

}ggg
1570
1571
1572
1573
1574
1575
1576

000001
000002
000004
000010
000020
000040
000100

DMD=
MCLK=
FERR=
ICPA=
IDPA=
DPCA=
NEBL=

1
2
4
10
20
40
100

;DIAGINOSTIC MODE (BIT #0)
IMAINTAINCE CLOCK (BIT #1)
;FORCE ERROR (BIT #2)
;INVERT CONTROL PARITY,CAUSES PARITY TO BE EVEN WHEN SET
: INVERT DATA PARITY, CAUSES DATA PARITY TOBE EVEN WHEN SE
:DISABLE PARITY CHECK, INHIBITS PARITY CHECK ON BOTH C AN
;NO END OF BLOCK, INHIBITS TESTER FROM GENERATING END OF

1578
1579
1580
1581
}gg%

000400
001000
002000
004000
010000

pDoCC=
SLkKM=
ISLk=

400
1000
2000

;DISSABLE OCCUPY (BIT #8)
;SYNC CLOCK MINIMUM WIDTH ,WHEN SET CHANGES SYNC CLOCK T
2 INVERT SYNC CLOCK,WHEN SET INVERTS SYNC CLOCK,NO EFFECT

8MD18=

10000

000200

1577

ENPS=

JWHEN SET DELAYS TRA FROM BEING ASSERTED FOR 500NS (BIT

200

4000

:ENABLE PATTERN SHIFT,WHEN SET CAUSES A 16 OR 18 BIT ROT
118 BIT MODE (BIT #12)

;ATTENTION SUMMARY PSEUDO-REGISTER (RHAS) (#04)

}ggé
1586
1587
1588
1589
1590
1591
1592
}ggz

000001
000002
000004
000010
000020
000040
000100
000200

}ggg

ATO=
AT1=
AT2=

1
2
4

;DEVICE O (BIT #0)
;DEVICE 1 (BIT #1)
;DEVICE 2 (BIT #2)

AT4=
ATS=
AT6=

20
40
100

;DEVICE 4 (BIT #4)
;DEVICE 5 (BIT #5)
;DEVICE 6 (BIT #6)

AT3=

AT7=

;DEVICE 3 (BIT #3)

;DEVICE 7 (BIT #7)

200

;TRANSFER CONTROL REGISTER (#5)

1597
1598
1599
1600
1601
1602
1603
1604
}ggg

000001
000002
000004
000010

DNO=
DN1=
DN2=
SCLk=

1
2
4

000020
000040
000100
000200

GAP=
BLO=
BL1=
BLZ2=

20
40
100
200

}285

;DRIVE NUBER BIT #0 (BIT #0)
;DRIVE NUMBER BIT #1 (BIT #1)
;:DRIVE NUMBER BIT #2 (BIT #2)
JSYNC CLOCK RANGE BIT ,WHEN CLEAR SYNC CLOCK IS 0.4-2.6
;WHEN SET 2.0-10.6 MICRO SECONDS (BIT #3)
;GAP SIZE BIT,SETS GAP SIZE TO 5 MICROSECONDS WHEN CLEAR
:BLOCK SIZE BIT 0 (BIT #5)
;BLOCK SIZE BIT 1(BIT #6)
;BLOCK SIZE BIT 2(BIT #7)

;RH70 1/0 REGISTERS LOCATED IN RH

1609
1610
1611
1612

003320
003322
003324
003326

1614
1615
1616
1617
1618
1619
1620
1621
1622
1623

003332
003334
003336
003340
003342
003344
003346
003350
003352
003354

1613

DTRM=

003330

160100
160200
160300
160400

ADD1:
ADD2:
ADD3:
ADD4:

000000
000000
000000
000000
000000
000000
000000
000000
000000
000000

RHWC:
RHBA:
RHMR2:
RHCS2:
RHST:
RHER:
RHAS:
RHTDB:
RHDB:
RHMR1:

000000

RHCS1:

160100
160200
160300
160400

0
0
0
O
0
0
0
0
0
O

;BASE
;BASE
;BASE
;BASE

ADDRESS
ADDRESS
ADDRESS
ADDRESS

RH
RH
RH
RH

#1
#2
#3
#4

;CONTROL AND STATUS 1

*WORD COUNT
:BUS ADDRESS
s TRANSFER CONTROL REGISTER
;CONTROL AND STATUS 2
;JTESTER STATUS
;ERROR REGISTER
JATTENTION SUMMARY REG
;TESTER DATA REGISTER
;DATA BUFFER
;DIAGNOSTIC (MAINTENCE) REGISTER

MASSBUS RH70 AND RH11_DIAGNOSTIC

CZRHBD.P11

02-MAY-78 10:01

MACY11 30A(1052)

02-MAY-78

ERROR POINTER TABLE

10:03

PAGE 33

SEQ 0033

1626
1625
1626

003356
003360
003362

000000
000000
000000

RHDT:
RHBAE:
RHCS3:

0
0
0

;DRIVE TYPE REGISTER
;BUS ADDRESS EXTENTION
;CONTROL AND STATUS 3

1629
1630
1631
}ggg

003366
003370
003372
003374

000000
000000
000000
000000

DEVIC1:
DEVICZ2:
DEVIC3:
DEVIC4:

O
O
0
O

;ADDRESS OF
;ADDRESS OF
;ADDRESS OF
;ADDRESS OF

1634
}2%2

003376
003400

000000
000000

DEVCNT: 0
DEVICS5: O

}ggg

003364

000000

003402

003404
003406
003410

000000
177740
177742
177744
000000
000000
000000

1647

;DEVICE COUNTER
;USED TO CONSTRUCT REG. ADDRESSES

OFF11:
LERADD=
HERADD=
MEMERR=
REGEND:
VECADD:
RETAIN:

O
177740
177742
177744
O
0
O

;REG. CALCULATION LOCATION
;LOW ERROR ADDRESS REG.
;HIGH ERROR ADDRESS REG
;MEMORY SYSTEM ERROR REG
;REGISTER ENDING ADDRESS
;VECTOR ADDRESS

AR AR RN RN R AR R AR

1648

1649

1650

RH #1
RH #2
RH #3
RH #4

:OFF11 WILL BE USED AS A CALCULATION LOCATION

}2_;’,173
1639
1640
1641
1642
1643
1644
}222

JHIGH BYTE OF RHCS1 REG.

RHCS1B: O

AR RRARA RN R AR AR

AR RAANANANR AR AR

RN AR

;REGISTER STORAGE ADDRESSES

AR AR

RN RN

AR R AR RRRNRRAANARARARRRAANNANANRRANRA
R RS

1651
1652
1653
1654

003412
003414
003416
003420

000000
000000
000000
000000

AS:
BA:
BAE:
€s1:

0
0
0
0

JATTENTION SUMMARY
;BUS ADDRESS
;BUS ADDRESS EXTENTION
:CONTROL AND STATUS 1

1657
1658
1659
1660
1661
1662
1663

003426
003430
003432
003434
003436
003440
003442

000000
000000
000000
000000
000000
000000
000000

DB:
DR:
DS1:
DT:
ER1:
TC:
TDR:

0
0
0
0
0
0
0

;DATA BUFFER
;DIAGNOSTIC REGISTER
;TESTER STATUS
;DRIVE TYPE
;ERROR REGISTER
; TRANSFER CONTROL
;1ESTER DATA REGISTER

1655
1656

}222

003422
003424

003444

000000
000000

000000

1666

1668

1670
1671
1672
1673
1674

1675
1676
1677
1678

1679

WwC:
IR

1667

1669

(se:
(S3:

052525
125252
000000
000001
000002

000001

NOOP=

AR R

0
0

;CONTROL AND STATUS 2
;CONTROL AND STATUS 3

JWORD COUNT

A RARR AR R AR

AR AN R R AR AN

R AN NN

JBITS AND BIT PATTERNS

AR AR

AB=
OAB=
JERO=
ONE=
TWO=

NANNRNN AR R

52525
125252
0
1
2

AR AR AR R AR RNNRNNARA AR AR

AR RN AR RN KRR A AR R AN AR

R AR NN

RN RRNNNNRNRAAR

JALTERNATE BIT PATTERN
;OPPOSITE ALTERNATE BIT PATTERN
;CONSTANT Z2ERO
;CONSTANT 1
;CONSTANT 2

AR AR AR RN RN NN NN N RR AR AN AR RNRS

JFUNCTION CODES
AR AR AR AR R R AR RN AR AR AR RN AR

RN AR

RN RN

R AR RN RN R AR RN RN

;NO OPERATION,RESETS GO BIT

MASSBUS RH70 AND RH11 _DIAGNOSTIC
CZRHBD.P11
02-MAY-78 10:01
1680
1681
1682
1683
1684
1685
1686
1687
1688
1689
1690
1691
1692
1693
1694
1695
1696
1697
1698
1699
1700
1701
1702
1703

MACY11 30A(1052)

3
1
02-MAY-78 10:03

ERROR POINTER TABLE

PAGE 34

SEQ 0034

::ttttfittttttt*tttt*ttQ'tt'ttttttttt'tt*fiittfittt!ttlttttttitttttt

000051
000052
000053
000054
000055
000056
000057

WRCHO=
WRCH1=
WRCH2=
WRCH3=
WRCH4=
WRCHS5=
WRCH6=

51
52
53
54
55
56
57

;THESE WRCH BITS ARE WRITE/CHE(K
:CODES ,IF THE CODE IS AN ODD
INUMBER THE GO BIT IS INCLUDED
IF THEY ARE EVEN GO BIT IS NOT INCLUDED

::tttitttt*ttttttt'tttit'tttt*ttttttittttttt*litfitttttttt*tt***tt

000071
000072
000073
000074
000075
000076
000077

READO=
READ1=
READ2=
READ3=
READ4=
READS=
READ6=

71
72
73
74
75
76
77

;READ CODES
;IF THE CODE IS AN ODD NUMBER
;THE GO BIT IS INCLUDED

e e
I e e

000061
000062
000063
000064
000065
000066
000067

WRITEO= 61

WRITE1=
WRITE2=
WRITE3=
WRITE4=
WRITES=
WRITEG=

;WRITE CODES

62
63
64
65
66
67

;IF THE CODE IS AN ODD NUMBER
;THE GO BIT IS INCLUDED
JIF IT IS EVEN THE GO BIT
;1S NOT INCLUDED

WN—=O
NSOV

D
b
b
D cnd e
b o) wnd
)
b
)
—

~N N ~N NN NNNNNNNNY
N ~nN N =d =D ed d =d d —d b =D

;;ttt!tttt*ttittttttttitt*ittittt'fitttttt**tfittttttttttitfittttttt

000011

DRCLR-

;CLEARS ALL ERROR BITS IN THE DRIVE
JAND SETS THE DRIVE READY BIT

;:tttfittttttttfitttttttttttiifitfitt'tttttfi.ttitttttti*tt**tttiifitti

000031

SEARCH= 31

;SETS A ONE SHOT WHICH SETS
;ATA AFTER 100USEC + OR MINUS 20%

;;ttttttttttttittfiittttttti'tt*tltttttl**itfiitfi.t!*tttttfiitt'titt

;WATBIT STORAGE LOCATIONS

:;tttt!tt*ttttttittfitt*titttttttttitfittfifi‘tt*tt'tt'tittttittt*fitt

003446
003450
003452

000000
000000
000000

BITCNT: 0O
LOOCNT: 0
PASS:

;BIT COUNTER
;LOOP CPUNT

;PASS COUNT FOR THE LARGE

TRANSFER TEST

:;*ttttt*ttttttt*ttttttttitt'ttit*tififi'ttti!t'tittfittfi.ttfitittt't

;THIS IS WHERE

THE

TEST NUMBER IS STORED JUST

JBEFORE IT IS PRINTED OUT....civvieeennennnnn

::tttt'tittttttttttttttittiti*tttttttttttttt*ttt'ttfi.tt.ttfittttlt

003454
003456
003460

000000
000000
000000

TSTNM:
0
OFFSET: 0
HEDDAD: 0

s TEST NO. STORAGE
;JOFFSET FOR ERROR HEADER
;JUSE TO FIND HEADER ERROR MESSAGE

;;tttttt't'tttttittttttttttiifit*ilttitfitttfiittttlttt'tttttttttllt

;THESE ARE

THE READ WRITE BUFFERS

:;ttttttttttttttttttttiti'ttttttttfii.ttttlt'tttttfiitt.titttt!tfiti

004000
004002

EVENAD:
ODDAD:

004100

:
RBUF

.=4100

1:
RBUF

FRRBRRR

RBUF 2:

RBUF 3:

RBU4F:
RBUF5:
RBUF6:
RBU7F:

ERROR POINTER TABLE
.=4000

RRRRRER

PAGE 35

JEVEN ADDRESS
;0DD ADDRESS

::Q'ttttttfitttttt.t'ttti"ttt*ttt"tfiitttitfittttfi't.ttti.fittfit.fl'

THESE ARE FOR THE CLEARS TEST
MINUS:
BEFORE:

000000

$CS1:
$CS2:
$CS3:
$ST:

$ER:

$RHBA:
$RHDB:
:
SRHW(

177777
000000

—

::'tttttttttt'ttlt*tttQt't"ttitfittfitttfifittttttifi'ttttttttt*iit*t

OOO0OO0OOO0OO0O

1736
1737
1738
1739
1740
1741
1742
1743
1744
1745
1746
1747
1748
1749
1750
175
1752
1753
1754
1755
1756
1757
1758
1759
1760
1761
1762
1763

3
J
02-MAY-78 10:03

OO0 O0OOO0O

MASSBUS RH70 AND RH11 _DIAGNOSTIC
CZRHBD P11
02-MAY-78 10:01

MACY11 30A(1052)

SEQ 0035

1764
1765
1766

1767
1768
1769
1770
1771
1772
1773
17764
1775
1776
1777
1778
1779

1780

ERROR POINTER TABLE

02-MAY-78 10:01

CZRHBD.P11

K 3
02-MAY-78 10:03

MACY11 30A(1052)

®.SS8US RH70 AND RH11 DIAGNOSTIC

PAGE 36

. "tiittttt*tfitfititfiit*t'itttttti*tttti*tt! RANRRARANARARRA AN

004144

004146
004150
004152
004154
00410
004164
004166
004170
004172
004176
004204
004212

BEGIN:

005000

005100
000421
005000
005037
005137
000413
005000
005100
000137
012737
012737
005000

(LR

COM
BR

001174
001174

MOV

#774 ,3#VECADD

BEGINZ: CLR
coM
JMP
BEGIN1: MOV

004546
000074
000774

CLR

JGET SKIP FLAG READY
JCLR ALTERNATE START FLAu
;SET FOR ALTERNATE START
;START PROGRAM

RO
RO
HTST
#74 ,HREGEND

;GET RO READY
27O BE COMPLIMENTED
JENTER DIAG. FOR NEXT PASS

:CLEAR THE SKIP FLAG

.'.'tttttttttttttttti'ttt'tiiiitt**ttttttttfittttttifitttttttifititttt

1781
1782
1783
1784
1785
1786
1787

004214

START:

004214
004220

:;CLEAR THE COMMON TAGS ($CMTAG) AREA
MOV
#S$CMTAG,R6
;oFIRST LOCATION TO BE CLEARED
MEMORY LOCATION
;;CLEAR
+
(R6)
CLR

1790

004234
004242

012737
012737
012737
012737
012737
012737
005037
005037

112737
012737
012737

013746

012737
012737
012737
022777
001012

004434

005700

004422
004430

000403
012712
00000
012737
012737
012637

004404
004406

072602
000340

000750

#SWR_R6 ; ;DONE?
.=6
;.LOOP BACK IF NO
;;SETUP THE STACK POINTER
ASTACK,SP

JoINITIALIZE A FEW VECTORS
MOV
#$SCOPE ,a#10TVEC ;;IOT VECTOR FOR SCOPE ROUTINE
#340,a#]I0TVEC+2 ;;LEVEL 7
MOV
MOV
#SERROR ,FEMTVEC .,EMT VECTOR FOR ERROR ROUTINE
MOV
#340,FEMTVEC+2 ;;LEVEL 7
MOV
#STRAP ,@#TRAPVE(C ;.TRAP VECTOR FOR TRAP CALLS
MOV
#340,a#TRAPVEC+2;LEVEL 7

074256
000340
075006
000340
073052
000340
001212
001214

MOV

000001
004332

004340

#SPWRDN ,a#PWRVEC ;.POWER FAILURE VECTOR

MOV
CLR
CLR
MOvV8
MOV
MOV

#340,@¥PWRVEC+2
STIMES
SESCAPE
#1 ,SERMAX
#.,3LPADR
#..SLPERR

;.;LEVE. 7
;2INITIALIZE NUMBER UF ITERATIONS
::CLEAR THE ESCAPE ON ERROR ADDRESS
2:AlLLOW ONE ERROR PER TEST
;:INITIALIZE THE LOOP ADDRcSS FOR SCOPE
::SETUP THE ERROR LOOP ADDRESS

MOV
MOV
MOV
MOV
CMP
BNE

@W#ERRVEC ,-(SP)
#648 ,a#ERRVEC
#DSWR, SWR
#DDISP,DISPLAY
#-1,aSWR
663

;,SAVE ERROR VECTOR
;:SET UP ERROR VECTOR
;:SETUP FOR A HARDWARE SWICH REGISTER
;:;AND A HARDWARE DISPLAY REGISTER
::TRY TO REFERENCE HARDWARE SWR
;;BRANCH IF NO TIMEOUT TRAP OCCURRED
2.BRANCH IF NO TIMEOUT
2.SET UP FOR TRAP RETURN

::SI2E FOR A HARDWARE SWITCH REGISTER. IF NOT FOUND OR IT IS
:2EQUAL TO A *=1'', SFTUP FOR A SOFTWARE SWITCH REGISTER.

000004

004406
177570
177570
177777

;;AND

THE HARDWARE SWR IS NOT = -1

004414

648 :

BR
S?Y

65%
#65%,<SP)

000176
000174
000004

65%:

MOV

#SWREG, SWR

;;POINT TO SOF TWARE SWR

66%:

MoV

(SP)+ ,a#ERRVEC

;;RESTORE ERROR VECTOR

004366
004374
004402

012737
012737

INITIALIZE THE COMMON TAGS

cwe
BNE
MOV

g
g

004352

001140

-_——

004346

022706
001374
012706

—

004314
004320
004324
004332
004340

»H

b
b
b
b
)
o
=3

NNV
W =O

b
d
bk
)
D
—d md o

00 00 0o 0o 00 00 00 00 0O 00

CEEEGE

WA
=

8
g

004250
004256
004264
004272
004300

001100

1788

004222
004226
004230

.SBTTL

012706
005026

AAR

;GET SKIP FLAG READY
;SET SKIP FLAG
;GO TO START

RO
START

RO
$REGS
$REGS
START

BEGIN3: CLR
CLR
COM

SEQ 0036

MOV

TST

#D]SPREG,DISPLAY

JWAS IT A RESTART

100443
104401

1820
1821
1822

004436
004440
004444

000427

1824
1825
1826

004524
004524
004530

000406

1823

1827
1828

1829
1830
1831
1832
1833
1834
1835
1836
1837
1838
1839
1840
1841
1842
1843
1844
1845
1846
1847
1848
1849
1850
1851
1852
1853
1854
1855
1856
1857
1858
1859
1860
1861
1862
1863
1864
1865
1866

1867
1868
1869
1870
1871
1872
18’3
1874
1875

104401

L 3
02-MAY-78 10:03

MACY11 30A(1052)

MASSBUS RH70 AND Ri:11_DIAGNOSTIC
CZRHBD.P11
02-mAY-78 10:01

INITIALIZE THE COMMON TAGS

éégSS:

AROUND

B8R
JASCIZ

675
:GET OVER THE ASCI?
<15><12>/RKH 11 AND 701 O AND CONTROLLER DIAGNOSTIC/

TYPE

004532
::708:
69%:

004546
004546

:YES,SKIP TYPING

BM]

TYPE

004446

PAGE 37

LASCIZ

,68%

,,TYPE ASCIZ STRING

,70%

;s TYPE ASCIZ STRING

69%

::GET OVER THE ASCIZ

<15><12>/CZRHB-D /

:
AROUND
R

22822233 823222323222223

ansr 1

33232333223323232222332323232823332222323232322233:§:2]1

THIS IS THE RH ADRESS DECODE TEST

;*THIS PROGRAM WILL ALLOW THE OPERATOR TO SAY

$+WHICH RH IS ON THE BUS AND WHAT [TS BASE
THE RH IS THEN TESTED FOR A
;*ADDRESS IS.
s *RESPONSE AND CHECKED FOR A TESTER BEING
s*CONNECTED.

:;tttQi*fit'fittfittittt.'itt't.fiiittt't.fiitttfltfit*ttttti'tttttttt't

000004
012737
012737
012706
012737
012737

012737

005700
001403
005000
000137
005001

005737
001402
000137
000137
005037
104401
000416

004724
004760

004772
005050
005050
005052
005056
005062

104410
012637
104401
000415
104410
012637
104401

000426

104410
012637

006137
000137

000001
047172
000750
000340

0466740

000340

001212
000114

TST1:

SCOPE

MOV

#1 ,3STIMES

MOV

#STACK,SP

MOV

MOV
MOV
MOV
TST

000116
000004
000006

BEQ

006552

0011~
004644
005066
001174
004656

#340,a#116
#TIEOUT ,a#ERRVEC
#340,a#ERRVEC+?
RO
SKIPIN

::D0 1

ITERATION

JSET UP TIMEOUT
;SETUP PRIORTY
;SKIP TYPOUT ?
;NO

CLR
JMP

RO
a#TST?

TST
BEQ
JMP
SLEUTH: JMP
KONG:
CLR
TYPE

$REGS
SLEUTH
KONG
AD1ERR
$REGS
,65%

éi25$:

<15><12>/TYPE BASE ADDRESS FOR RH /

SKIPIN: CLR

B8R

LASCIZ

RDOCT

003366
004726
33275:

MOV
TYPE
BR
JASCIZ
RDOCT

MOV
TYPE

003406
004774

éégQS:
003404
003404
005402

APARITY ,a#114

B8R

LASCIZ

RDOCT

MOV

ROL
JMP

;CLEAR SKIP FLAG
:GET OUT OF TEST
:GET R1 READY
;IS IT AN ALTERNATE START
:NO

;YES DO ALTERNATE SETUP
;DO REGULAR SETUP
JRESET ALT. START FLAG

,.TYPE ASCIZ STRING

;GET OVER THE ASCIZ

(SP)+,DEVICI
;GET BASE ADDRESS
,67%
,,TYPE ASCIZ STRING
663
:GET OVER THE ASCI2
<15><12>/TYPE RH VECTOR ADDRESS /
(SP) + ,VECADD
,69%

68%

:GET VECTOR ADDRESS
;:TYPE ASCIZ STRING

::GET OVER THE ASCIZ

<15><12>/HOW MANY REGISTERS ARE YOU JUMPERED FOR /
(SP) + ,REGEND

REGEND
6N

:GET NUMBER OF REG

:MULT BY 2
;GO CREATE ADDRESSES

SEQ 0037

MASSBUS RH70 AND RH11 DIAGNOSTIC

CZRHBD.P11
1876
1877

005066
005074

1879
1880
1881
1882

005106
005114
005122
005126

1878

1883
1884
1885

005134

005142
005146

0051564

1889

005172

1887
1888

1890
1891

02-MAY-78 10:01

005102

1886

022626
000137

005222
005226

005212
005220
005232
005240
005242
005246
005252
005254

005260
005266
005270

1906
1907
1908

005274
005274
005300

1910
1911

005342
005342

1909

1912
1913
1914
1915
1916
1917
1918
1919
1920
1921
1922
1923
1924
1925
1926
1927
1928
1929
1930
1931

012737

005200
005202

1895
1896

1903
1904
1905

005777
013737
000137
005037

005206

1897
1898
1899
1900
1901
1902

013737
012737
005777
013737
012737
005777
013737
012737

005162
005166

1892

1893
1894

MACY11 30A(°052)

005344
005350
005354
005356
005362
005364
005370
005374
005376
005402
005410
005416
005422
005426
005430
005434
005434
005440
005502

012737

005037

012737
022626

000137
005037

012737
022626
000137
005737
101402
000137

022737
001402
000137
104401
000420
104410
012637
105737
001405
005737
001007
000137
005737
001012
000137
013737
012737
000137
005737
001402
000137

104401
000420

003320
005166
176214
003322
005206
176176
003324
005226
176160
003326

046740
006054
003370

046740

003366
000004
00337C
000004

003372
000004

000004

006054

003372

046740

006054
003374

046740

000004

006054
000042
046144

160100

TST
MOV

MOV

JMP
AD2ERR: CLR

MOV

cMP
JMP

003366

004644

SA200:

005302

;.65%:

648:

003366
001103
003366
005260
003366
005260
003366
005246
006146
000042

046144
005442

GO1:

003400
003410

GJ1:
GIGO1:
GIG2:
;.658:
64%:

ADD1,DEVICY
#AD2ERR ,ERRVEC

adADD2

ADD2,DEVICZ
#AD3ERR,ERRVE(
aADD3
ADD3,DEVIC3

#ADSLERR ,ERRVE C
aADD4
ADD4 ,DEVICS

#TIEOQUT ,ERRVEC
RESTAR
DEVIC2

#TI1EOUT ,ERRVEC

;SETUP DEVICE 1
;FOR TIMEOUT
;1S THFRE A DEVICE
JYES
;FOR TIMEOUT
;IS THERE A DEVICE
JYES
;FOR TIMEOUT

;1S THERE A DEVICE
JYES

JREPLACE TIMEOUT

;TEST DEVICES
sNO DEVICE 2

sREPLACE TIMEOUT

:CORRECT STACK
;TEST DEVICES

MOV
CMP

NTIEOUT ,ERRVEC
(SP)+,(SP)+

;REPLACE TIMEOUT
sCORRECT STACK

MOV
cMP
JMP
TST
8EQ
JMP

#TIEOUT ,ERRVEC
(SP)+,(SP)+
RESTAR
a6l
6161
SEOP

JMP
AD4ERR: (LR

GIGl:

PAGE 38

(SP)+,(SP)+
RESTAR

AD3ERR: CLR

GIGO:

10:03

THIS 1S THE RH ADRESS DECODE TEST

ADTERR: MOV
MOV
TST
MOV
MOV
TST
MOV
MOV

003374

Oc-MAY-78

(MP
BEQ
JWP
TYPE
BR

_ASCIZ

DEVIC3
RESTAR
DEVIC4

#160100,DEVICT
SA200
KONG

sTEST DEVICES
;NO DEVICE ¢4

JREPLACE TIMEOUT
s CORRECT STACK
;TEST DEVICES
;1S THERE A MONITOR
:NO
JYES EXIT

JARE WE HERE AFTER 210
:NO, 200
;GET NEW ADDRESS FOR 210

.65%
648

;. TYPE ASCIZ STRING
;.GET OVER THE ASCI2Z
<15><12>/TYPE BASE ADDRESS FOR RH #1 /

RDOCT
MOV
(SP)+,DEVICT
1ST8
SERFLG
BEQ
GO1
TST
DEVIC1
BNE
GI1
JMP
GIG1
TST DEVICI
BNE
G1GO1
JMP
GIG1
MOV
DEVIC1,DEVICS
MoV
#GIGO,RETAIN
JMP
GI1GO4
TST
Y {4
BEQ
G162
JMP
$EOP

TYPE
BR
_ASCIZ

:NO DEVICE 3

;GET BASE ADDRESS FOR RH1
JARE WE HERE BECAUSE OF AN ADDRESS ERROR
sNO,GET READY FOR NEXT ADDRESS
IS IT A ZERO
:NO
;NEED FIRST ADDRESS
;DID HE CORRECT WITH A 0
;GET BASE FOR RH # 2
;NEED ADDRESS
;GET READY TO CREATE REG. ADDRESS
;SAVE RETURN ADDRESS
sCONSTRUCT REGISTER ADDRESSES
;1S THER A MONITOR
:NO
JEXIT

.65%
;. TYPE ASCIZ “TRING
648
;.GET OVER THE ASCIZ
<15><12>/TYPE BASE ADDRESS FOR RH #2 /

SEQ 0038

MACY11 30A(1052)

MASSBUS RH70 AND RH11 DIAGNOSTIC

CZRHBD.P11
1932
1933
1934

1935
1936
1937
1938
1939
1940
1941
1942
1943
1944
1945

1946
1947
1948
1949
1950
1951
1952
1953

1954
1955
1956
1957
1958
1959
1960
1961
1962
1963
1964
1965
1966
1967
1968
1969
1970
1971

1972

1973
1974

1975
1976

1977

1978
1979
1980

1981
1982
1983
1984
1985
1985
1987

02-MAY-78 10:01

005502
005504
005510

005514
005516
005522
005524
005530
005534
005536
005542
005550
005556
005562

005566
005570
005574
005574
005600
005642
005642

005644
005650
005654
005656
005662
005664
005670
005674
005676
005702
005710
005716
005722
005726
005730

005734
005734
005740
006002
006002

104410
012637
105737

001405
005737
001007

000137
005737

001012
000137
013737
012737
000137
005737
001402
000137
104401
000420
104410

003370

045366
003370
006054
003370
005422
006146
000042

Go2:
003400
003410

GI2:
GIGO2:

046144

G163:

005602

::658:

648

003372
001103

104401
000420

005742

003372
045366
003372

006054
003372

005562

006146
000042

603:
003400
003410

GI3:
GIGO3:

046144

GIG4:

::658:

648

10:03

PAGE 39

THIS 1S THE RH ADRESS DECODE TEST

RDOCT
MOV
T1STB

003370
001103

012637
105737
001405
005737
001007
000137
005737
001012
000137
013737
012737
000137
005737
001402
000137

104410

02-MAY-78

(SP)+,LEVIC2
SERFLG

BEQ
TST
BNE

G02
DEVIC2
GI2

BNE
JMP
MOV
MOV
JMP
TST
BEQ
NP

GIGO2
RESTAR
DEVIC2,DEVICS
#GIGOT.RETAIN
GIGO4
a2

JMP
TST

TYPE
BR
.ASCIZ
RDOCT

RESTAT
DEVIC2

GIG3
SEOP

;GET VALUE
:SAVE ADDRESS
:ARE WE HERE BECAUSE OF ERROR
iNO
(1S 1T 0
:NO
SET UP FOR RH #1
1S 1T 0
*NO,GET NEXT ADDRESS
:CREATE ADDRESS FOR RHA1
:GET READY TO CREATE
:SAVE RETURN ADDRESS
:CREATE REG. ADDRESSES
:1S THERE A MONITOR
:NO
EXIT

658
::TYPE ASCIZ STRING
643
::GET OVER THE ASCIZ
<15><12>/TYPE BASE ADDRESS FOR RH #3 /

MOV
1STB
BEQ
TST
BNE
JMP
TST
BNE
JMP
MOV
MOV
JMP
TST
BEQ
W

(SP)+,DEVIC3
SERFLG
O3
DEVIC3
GI3
RESTAT
DEVIC3
GIGO3
RESTAR
DEVIC3.DEVICS
#GIGO2.RETAIN
GIGO4
a2
GIGé
SEOP

TYPE
BR
.ASCIZ

658
;:TYPE ASCIZ STRING
643
::GET OVER THE ASCIZ
<15><12>/TYPE BASE ADDRESS FOR RH #4 /

RDOCT

:SAVE ADDRESS
:ARE WE HERE DO TO ERROR
iNO
1S 1T 0
:NO
:RESTART PASS
GIS 1T 0
:GET NEXT ADDRESS
*CREATE RHA1 ADDRESSES
:SETUP TO CREATE ADDRESS
:SAVE RETURN ADDRESS
:CREATE ADDRESSES
:IS THERE A MONITOR
iNO
EXIT

006004
006UtV

02637
105737

003374
001103

MOV
T1STB

(SP)+,DEVIC4
SERFLG

;SAVE ADDRESS
:ARE WE HERE BECAUSE OF ERROR

006016
006022
006024

005737
001004
000137

003374

TST
BNE
JMP

DEVIC4
Gl4
RESTAT

SIS 1T 0
iNO
*RESTART PASS

006014

006030
006034
006042
006050
006054
006062
006070

001405

000137
013737
012737
000137
013737
012737
104401

BEQ

045366

006054
003374
005722
006146
003366
005246
006076

003400
003410
003400
003410

GO4:
Gl4:

JMP
MOV
MOV
JMP
RESTAR: MOV
MOV

TYPE

GO&

RESTAR
DEVIC4.DEVICS
#GIGO3.RETAIM
GIGO4
DEVIC1,DEVICS
#GIGO,RETAIN
.65%

iNO

G0 SET UP REG. ADDRESSES
:GET READY TO CREATE REG. ADDRESSES
*STORE_RETURN ADDRESS
GO CREATE ADDRESSES
:GET READY TO CREATE REG. ADDRESSES
:SAVE RETURN ADDRESS
;. TYPE ASCIZ STRING

SEQ 0039

M?CY11 30A(1052)

2001
2002
2003
2004
2005
2006
2007
2008
2C2S
2010
2011
2012
2013
2014
2015
2016

2017
2018

2019
2020
2021
2022
2023
2024
2025
2026
2027
2028
2029
2030
2031
2032
2033
2034

006074

006140
006140
006144
006146
006154
006160
006164
006172
006176
006200
006202
006210

000421
013746

003366

013737
012702
013722
062737
022702
001401
000767
013737
063737
013737
062737
013737
013737
005237
013746
012737
012777
005777
022777
001403

003400
003330
003402
000002
003360

000137

006340
000067

104402

104034

122777
001403
104071

000137
005726

000406
022626
012637
104036

000040

000004

104401

006414

005001
000137
013746
012737
012777

003402

003402
003402
003360
003402
003362
003364

175052

175014

000004

012637

2037
2038
2039
2040
2041
2042
2043

003402

006340

175036
000004

000413

:.65%:
64%:

000004
175046

000177
012637
005701
001433
013746
012737
012777

2035

2036

003400

000004
006540
000117

GIG04:
4%:

3%:

BR
LASCIZ

64%

;GET OVER THE ASCIZ

MOV
TYPOC
MOV
MOV
MOV
ADD
(MP
BEQ
BR
MOV
ADD
MOV
ADD
MOV
MOV

DEVICT,-(SP)

; :SAVE DEVIC1 FOR TYPEOUT
::GO TYPE--OCTAL ASCII(ALL DIGITS)
:SETUP FOR ADDRESSES

INC
TSTADD: MOV

MOV
MOV

TST
CMP
BEQ
ERROR
JMP
1%:
CMP8B
BEQ
ERROR
JMP
TST
2%:
BR
ADDERR: CMP
MOV

RHTEST:

ERROR
JMP

MOV
TST

BEQ
MOV
MOV
MoV

000004
174760
RH11BA:

;:65%:
64%:

006546
000004
006474
000117

02-MAY-78 10:03 PAGE 40
THIS IS THE RH ADRESS DECODE TEST

MASSBUS RH70 AND RH11 _DIAGNOSTIC
CZRHBD. P11
02-MAY-78 10:01
1988
1989
1990
1991
1992
1993
1994
1995
1996
1997
1998
1999
2000

000004
174672

<15><1“>/TESTING RH #1

11
DEVICS,a#0FF

#RHCS1,R2

ANOFF11,(R2)+
#TWO,IN0FF
11

ggHBAE.RZ
4%

DEVICS ,a#0FF11
REGEND ,a#OFF 11
a#OFF
11 ,RHBAE

AT BASE ADDRESS /

:SET UP WHERE TO PUT THEM
:SETUP ADDRESS
“SETUP NEXT ADDRESS

“ARE ALL ADDRESSES SEt UP
;1S INFORMATION CORRECT?

*NO SETUP NEW ADDRESS

;WITH CORRECT ADDRESS

#2,aN0FF11

;SETUP RH(CS3 ADDRESS

RHCS1,RHCS18
RHCS18B
SH#ERRVEC,~(SP)

;SAVE TIOUT VALUE

WOFF11,RHCS3

#ADDERR ,a#ERRVEC
#7 ,8RHCS2
@RHCS1
#40,3RHDT
1%
34
ADDERR+2
#7 ,3RHMR?
2%
71
ADDERR+2
+
(SP)
RHTEST
+
(SP)+,(SP)
(SP)+ I#ERRVE(

aRETAIN
é?P)*.a#ERRVEC

RH70TT
HERRVEC ,~(SP)
#RH11, GHERRVEC

;WITH CORRECT ADDRESS
;SETUP RHCS1B WITH

sHIGH BYTE ADDRESS OF RH(S1

;SETUP NEW TIOUT VALUE
;SETUP UNIT NO.
;WILL RH RESPOND
;IS A TESTER THERE
JYES ,CONTINUE

JTESTER IS NOT CONNECTED

;BAD ADDRESS

;1S THERE ALSO A 7 FOR UNIT NO.

s YES,CONTINUE

;BAD ADDRESS

;CORRECT STACK
;YES AN RH IS THERE

;CORRECT STACK
;REPLACE OLD TIOUT VALUE
;RH DID NOT RESPOND
;GET CORRECT BASE ADDRESS
JREPLACE TIEOUT VALUE
;IS IT A 70
:YES,LETS MAKE SURE
;SAVE TIME OUT VALUE
:CHECK FOR AN RH

#1PCKOIPCK1
T IPCK2 ! IPCK3TIE3, BRHCS3

sSET ALL BITS IN RHCS3
:REPLACE TIMEOUT

MoV

(SP) + ,a#ERRVEC(

TYPE
B8R
.ASCIZ

,,TYPE ASCIZ STRING
,65%
:.GET OVER_THE ASCIZ
64%
<15><12>/TESTING FOR AN RH70/

CLR
JMP

R1
RH11+6
A#ERRVEC ,-(SP)

RH70TT: MOV

MOV
MoV

#FAKE7Z0, a#ERRVEC

sSET UP RH70 FLAG
JEXIT
;SAVE LOCATION 4

sREPLACE ADDRESS

#1PCKO! IPCKT! IPCK2! IPCK3TIE3,@RHCS3

;SET ALL BITS

SEQ 0040

CZRHBD.P11
2044
2045
2046
2047
2048
2049
2050
2051
2052

006536

000137
022626
012637
005001
005101
104401
00041

2053

006536

000403

2056

006546

004737

2054
2055

2057

006540
006542

022626
012637

006542

JMP
FAKE70: CMP
MOV
RH70BA: (LR
coM
TYPE
BR
::65%:
_ASCIZ

000004
006514

648:

2062

2068

2073
2074
2075
2076

2077

006552
006554
006562
006566

000004
012737
005037
005137

000001
001210
001210

001212

006572
006600
006606
006614

012777
012777
122777
001107

000040
000007
000007

2084
2085
2086
2087
2088
2089
2090
2091
2092
2093
2094
2095
2096
2097
2098
2099

TST2:

174540
174532
174522

SEQ 0041

RH11+2
SJEXIT TEST
(SP)+, . SP)+
;CORRECT STACK
;CORRECT TIMEOUT
(SP) + ,a#ERRVEC
;GET FLAG READY
R1
;SET FOR RH11
R1
.65%
;:TYPE ASCIZ STRING
648
;;GET OVER THE ASCIZ
<15><12>/TESTING AN RH11/
ERR1

;CORRECT STACK POINTER
;JREPLACE TIMEOUT VALUE

(SP)+,(SP)+
(SP) + ,a#ERRVEC

R7 ,ERRTST

A AN

RN A AR AR

CLEAR TEST

AR RN

RARR AR

RANRRAAARR

s*THIS TEST CHECKS THAT ALL
:*ERROR BITS ARE CLEARED AFTER
;*THE CLEAR BIT WAS LOADED INTO
SCOPE
MoV
CLR
com

#1,STIMES
$TMPS
$TMPS

;:D0 1 ITERATION
;GET READY TO
;SET UP FOR JSR ROUTINE

L e

;*THIS TEST IS ALSO ENTERED AT THE LABLE CLEER
;*AT THE END OF ALL THE ERROR BIT TESTS TO SEE
;*THAT A CLEAR WILL CLEAR THE ERROR BIT SET

R L
e
L L
e T

CLEER:

MOV
MOV
(MPB
BNE

#CLR,3RHCS?
#7,8RHCS?
#7 ,aRHMR?
18

JTELL IT TO CLEAR
;SETJP UNIT NO.
;HAS DEVICE BEEN SET 7O 7
;NO,FIND WHAT BIT WAS NOT SET

LR
I
e
DR L L R

;*THE TEST IS ENTERED HERE IF THE ERROR BIT BEING
;*FORCED SET DID NOT SET TO SEE IF ANY OTHER ERROR

2080

2082
2083

PAGE 41

;*RHCS2 REGISTER.......ccutvnnn.

2078
2079
2081

10:03

e I L
P

2069
2070
2071
2072

JSR

RRR AR

J*TEST 2

2058

2064
2065
2066
2067

(MP
MOV

ERR1:

2059
2060
2061

2063

RH11:

000004
050202

THIS 1S THE RH ADRESS DECODE TEST

02-MAY-78 10:01

006470
006474
006476
006502
006504
006506
006512

02-MAY-78

MACY11 30A(1052)

MASSBUS RH70 AND RH11_DIAGNOSTIC

;*BIT DID SET..ccvvennen..

006616
006620

006622
006626
006630
006636
006640
006644

006652
006654
006660
006664
006666
006674
006676
006700
006706

005701
100417

005737
001406
033777
001410
000137
032777

001412
000137
005737
001405
033777
001070
000404
032777
001063

I REERR AR

12%:
004122

004130
007174

174000

TST
BEQ

174524

174510

007174
004122

14%:

15%:

0046124

174434

160000

174422

TST
8M]

5$:

BIT
BEQ
JMP
BIT
BEQ
JMP
TST
BEQ
BIT
BNE
BR
BIT
BNE

AR AR

R1
15%

AR TR RAAA AR

AREAN KRR

AN RANRRR RN

RRRRRAR

;IS IT AN 11 OR A 70
;JIT'S A 70

BEFORE
;ARE WE HERE FOR SHORTS
14%
;NO
$CS3,aRHCS3
;JANY EXTRA ERROR BITS
15%
:NO
138
WE FOUND AN ERROR
MJICELO!'WCEH] !DPELO!DPEHI ! APE ,3RHCS3
;TEST ERROR BITS
5%
;NO ERROR BITS SET
13$
;60 REPORT ERROR BITS
BEFORE
;JARE WE HERE FOR SHORTS
5%
:NO
$CS1,aRHCST
JYES SEE IF THERE ARE ANY
2%
;sNONE FOUND
16%
;GO CHECK THE NEXT ONE
#TRE ! SC!MCPE ,aRHCST
JANY ERROR BITS SET IN (ST
2%
;YES,FIND THEM

MASSBUS RH70 AND RH11_DIAGNOSTIC

CZRHBD.P11
2100

2101
2102
2103

2104
2105

2106

02-MAY-78 10:01

006710

006714
006716
006724

006726
006730

005737

001405
033777
001065

000404
032777

177400

2107
2108

006736
006740

001060
005737

2110
2111
2112
2113
2114
2115

006746
006754
006756
006760
006766
006770

033777
001076
000404
032777
001071
005737

004132

174366

140000

174354

006776
007004
007006
007010

033777
001046
000404
032777

004134

174340

030175

174326

2109

2116

2117
2118
2119
2120
2121
2122
2123
2126
2125
2126

006744

006774

001405

2127
2128

007016
007020
007024
007026
007032
007034
007040

001041
005737
001501
005037
000477
004737
017737

2130
2131
2132
2133
2134
2135
2136

007050
007054
007056
007062
007070
007072
007076

004737
000660
004737
017737
104072
004737
000704

2129

2137
2138
2139

2140
2141
21642
2143
2144
2145
2146
2147

2148
2149

2150
2151
2152
2153

2154

2155

007046

007100
007104
007112

007114
007120
007122
007126
007134
007136
007142
007146

007150
007152

007156
007164
007166
007172

007174

007200

104071

004737
017737
104073

004737
000707
004737
017737
104074
004737
005737
001430

000430
004737
017737
104075
004737
000676

004737

017737

004122

001210

004100

6%:

sNO, CONT INUE
17%
HMPE !MXF .PGE !NEM!NED . UPE 'WCE !DLT,a3RHCS2

17%:

BNE
TST

3$
BEFORE

JYES ,FIND THEM
;ARE WE HERE FOR SHORTS

18%:

BIT
BNE
BR
BIT
BNE
TST

$ST,aRHST
9%
18%
HERR!ATA,QRHST
9%
BEFORE

JANY SHORTS ?
;YES
; CONTINUE
;ARE ANY ERROR BITS SET IN ER1
JYES ,GO FIND THEM
;ARE WE HERE FOR SHORTS

8$%:

BIT
BNE
BR
BIT

JYES ,SEE IF THER ARE ANY
$ER,QRHER
48
;WE FOUND SOME
19%
. CONTINUE
#ILF!RMR'CPE.DPE'RMBEX'!RFAIL!DTE!OPI
,aRHER
;ANY ERRORS IN RHER REG.
4%
JYES,GO FIND THEM
$TMPS
;IS IT BEING USED AS A SUBROUTINE
LEAVE
JYES
$TMP5
;SETUP SUB ROUTINE FLAG
ERRZ
;WAS THERE ANY ERRORS

7%:

1$:

004100

2%:

3s:

046354
047756
174212

004100

4%:

046354
001210

050002
174160

004100

9%:

046354

050052

174156

004100

BEQ
BIT
BNE

BEQ

BNE
TST
BEQ
CLR
BR
JSR
MOov

ERROR

046354

047732
174230

JARE WE HERE FOR SHORTS

BR
BIT

046354

047706
174242

PAGE 42

;NO
JANY SHORTS
;YES

19%:

004100

10:03

6%
$CS2,aRHCS2
33

001210
050026
174274

BEFORE

174414

174402

CLEAR TEST

02-MAY-78

TST

16%:

004122
004126

MACY11 30A(1052)

13%:

JSR
BR
JSR
MoV
ERROR
JSR
BR

JSR
MoV

ERROR
JSR
BR
JSR
MOV
ERROR
JSR
TST
BEQ
BR
JSR
MOV
ERROR
JSR
BR

JSR

Mov

;ARE ANY ERROR BITS SET IN (S2
;NO

:NO

R7 ,FOUND
aRHCSZ ,RBUF

;DEVICE NO. ERROR
JGET CONTENTS

R7 ,WATBIT
12%
R7,FINDIT
@RHCS1,RBUF
72
R7 ,WATBIT
16%

JFIND BIT NOT SET
;TEST REST OF ERROR BITS
;RHCS1 IN ERROR
JGET CONTENTS
ZERROR BIT SET IN CS1
JWHAT BIT IS SET
;TEST REST OF REGISTERS

R7,LOOKFOQ
aRHCSZ2 ,RBUF
73
R7 ,WATBIT
17%
R7,LOOKED
aRHER ,RBUF
74
R7 ,WATBIT
$TMPS
LEAVE

ERRZ2
R7,FIND

aRHST ,RBUF
75
R7 ,WATBIT
18%

R7.,CS3ERR

@RHCS3,RBUF

;DEVICE NO. NOT =7

JERROR IN RHCSZ2
;GET CONTENTS
;BIT SET IN CS2

JTELL WHAT BIT
sCONTINUE TEST
JRHER HAS A BIT SET
JGET CONTENTS
JERT HAS AN ERROR BIT SET
JTELL WHAT BIT
;1S 1T BEING USED AS A SUBROUTINE
;YES

;WAS THERE ANY ERRORS
JRHST HAS AN ERROR BIT SET
JGET CONTENTS
;ERROR IN RHST
JTELL WHAT BIT
sCONTINUE TEST

s CLEAR UNWANTED BITS
;GET REG. CONTENTS

SEQ 0042

MACY11 30A(1052)

MASSBUS RH70 AND RH11_DIAGNOSTIC
02-MAY-78 10:01
CZRHBD.P11

2156
2157
2158
2159
2160
2161
2162
2163

007206
007210
007214
007220
007224
007230
007232

046354
005660
006616
007220
050202

2169
2170
2171
2172
2173
2174
2175
2176
2177
2178
2179

2180
2181
2182
2183
2184

2185

2186
2187
2188
2189
2190
21N
2192
2193
2194
2195
2196
2197
2198
2199
2200
2201
2202
2203
2204

2205
2206
2207
2208
2209
2210
221

CLEAR TEST

WHYFO:
LEAVE:
ERRZ2:

ERROR
JSR
JMP
JMP
JMP
RTS
JSR

;*TEST 3

2165

2166
2167
2168

2164

007236
007240
007246
007254
007262
007270
007272
007274

000004
012777
012777
017737
022737
001401
104034
004737

000040
000007
174076

000040

174072
1746064

176
R7 ,WATBIT
158
128
.4
R7
R7,ERRTST

AARRRR R RARAR RN

10:03

PAGE 43

SEQ 0043

JRHCS3 HAS AN ERROR BIT SET
;TELL WHAT BITS
s CONT CHECK
;START JSR WHYFO
;FIND ERROR BITS SET
;GO BACK TO PROGRAM THAT SENT YOU HERE
E RO

RRAR AR R RN

R RRNRRRRRRRRAR

THIS TEST SEES IF THE TESTER IS CONNECTED

;*THIS TEST SEES IF

THE DEVICE CODE

;*A 40 TO SAY AN RH SIMULATOR IS ATTACHED

22222233232 3323 328232332323 2223323282328 233833203203200ttt
tl

7$T3:

001172
001172

ERR4:

050202

02-MAY-78

SCOPE

MOV
MOV
MOV
CMP
BEQ
ERROR
JSR

;CLEAR TESTER
JUNIT SEVEN
;GET DRIVE TYPE
;1S IT THE TESTER
;WAS
THERE AN ERROR
JTESTER NOT CONNECTED
;

#CLR,aRHCS2
#7 ,8RHCS?
aRHDT , SREG4
#40,SREG4
ERR4
34
R7,ERRTST

::fittttt*fit*tttt*tfifitfi'tttitttfittt*fitttt*t*t*i'tfitt'fifi*fi'ttt‘t*tt

STEST 4

WC CLEAR TEST
;*THIS TEST WILL SEE THAT WHEN A CLEAR IS GIVEN
:«THE WORD COUNT REGISTER REMAINS THE SAME

::t'tt"*ttt*itfitt*Qfi'tti'tQfit*kiQtttfiitfi'ttttfittfit't*i*itfii*ttt'

000004
012737

012777
022777
001056
012777
017737
017737
017737
005701
001406
005037
005037
000137
017737
017737
017737
017737
017737
017737
017737
005777
001434
000137
005777
001416
012737
017737
104042

TST4:

000001
177777
177777

001212

000040
173770
173764
173760

174004
003420
003444
003414

HERE:

003416
003424
003422
003432
003436
003442
003440

87%:

003416
003424
007412
173756
173752
173722
173716
173712
173710
173670
173656

174014
174006

@RHCS1,CS1
aRHWC ,WC
aRHBA .BA
R1
87%
BAE
cS3
86%
aRHBAE ,BAE

MOV
MOV

@RHST,DS1
aRHER,ER1

MOV
TST

aRHMR2,
TC
aRHW(

MOV
MOV

MOV

WCERR1:
001162
003444

#1,$TIMES

MOV
CMP
BNE
MOV
MOV
MOV
MOV
TST
8EQ
CLR
CLR
JMP
MOV

BEQ

007576
173644
177777
173630

86%:

SCOPE

MOV

#-1,3RHWC
#-1.3RHWC
WCERR1

#CLR,@RHCS2

@RHCS3,(CS3
aRHCS2,(S2
aRHTDB, TDR

WCERRZ2

;:00 1

ITERATION

:MAKE WC NEGITIVE
*WAS IT LOADED CORRECTLY
NO,ALL BITS DID NOT SET
:TELL DEVICE TO CLEAR

s SAVE RHCS1
;SAVE WORD COUNT
;SAVE BUS ADDRESS
;IS IT AN RH11
:NO IT'S A 70
:CLEAR BAE
;CLEAR (S3
s CONT INUE
:SAVE BUS ADDRESS EXTENSION

;SAVE
;SAVE
;SAVE
;SAVE
;SAVE
;SAVE

RH(CS3
(€S2
TESTER STATUS
ERROR REGISTER

TESTER DATA REG.
MR2 TESTER REG.
;DID IT CLEAR

;YES,CLEAR SHOULD NOT CLEAR W(C

JMP

a#DOoIT

;GO TO NEXT CHECK

MOV
MOV
ERROR

#-1,8REGO
aRHW(C ,W(
42

:SAVE WHAT W(C SHOULD HAVE BEEN
;SAVE CONTENTS OF Ww(
;JALL BITS DID NOT SET

TST
BEQ

aRHW(
13

.DID ANY BITS LOAD
;NO

2212
2213
2214
2215
2216
2217
2218
2219
2220

007506
007514
007520
007524
007532
007540
007542
007546
007554
007562
007570
007572
007576
007602

013737
004737
000137
013737
017737

003444
0646354
007326
177777

000137
012737
017737
013737

007576

004737
004737
004737

046354
006572
050202

104043

104044

173574

177777
173552

003444

MACY11 30A(1052)

MASSBUS RH70 AND RH11_DIAGNOSTIC
02-MAY-78 10:01
CZRHBD .P11

001162
003444
001162
003444
001200

WC CLEAR TEST

MOV
JSR

001200
1%:

JMP

MOV

ERROR

JMP
WCERR2: MOV
MOV
MOV
ERROR
JSR

DOIT:

02-MAY-78

JSR
JSR

wC,$TMP1
R7 ,WATBIT
a#HERE

-1,S8REGO

, WC
3RHWC

a#D0oIT
#-1,8REGO
aRHWC
, WC
wC,$TMP1
44
R7,WATBIT

R7,CLEER
R7 ,ERRTST

10:03

PAGE 44

;SETUP FOR WATBIT

;FIND THE BIT(S)

;SEE IF BITS SET CLEAR
;SETUP FOR ERROR
;GET BAD DATA
;WC DID NOT LOAD ANY BITS
;GO TO NEXT REG. TEST
;SETUP GOOD DATA
;GET BAD DATA
;SETUP FOR WATBIT
;SOME BITS CLEARED IN W(C
JFIND THE BITS THAT CLEARED
;CLEAR ERRORS

SEQ 0044

MASSBUS RH70 AND RH11 DIAGNOSTIC

CZRHBD.P11

MACY11 30A(1052)
IR

:*TEST S

gggg

2232

007606
007610

007616
007624

2237 007626

000004
012777

022777
001066

007634
007642
007650
007656
007660

017737
017737
017737
005701
001406

2264

007666

005037

224S
2246
2247
2248

2249
2250
2251
2252
2253
2254
2255
2256
2257
2258
2259
2260

2261

2262

2263

2264
2265

2266

007662

007672
007676
007704
007712

007720
007726
007734
007742
007750
007754
007756
007762
007770
007772
007776
010002

010010
010016

010020

010020
010024

177776
177776

173470
173464
173460

173516
173510

173504

005037

003416

000137
017737
017737
017737

007712
173456
173452
173422

003416
003424
003422

001162
173346

001200

046354
010020
177776

001162

017737
017737
017737
017737
005777
001421
005037
017737
104045
004737
000137
012737

017737
104046

004737
004737

173416
173412
173410
173370
173360

173320

NN AR

RNN RN

ARARRAN AN

SEQ 0045
RN

RN A AR

AAR

#-2 ,aRHBA
#-2 ,3RHBA
1%

:SET ALL SITS IN RHBA
:ARE THEY ALL SET
:ALL THE BITS DID NOT SET

MOV
MOV
MOV
TST
BEQ

@RHCS1,CS1
SRHWC , WC
®RHBA ,BA
R1
87%

:SAVE RHCS1
:SAVE WORD COUNT
:SAVE BUS ADDRESS
(IS IT AN RH1
:NO IT'S A 70

€S3

:CLEAR (S3

CLR

BAE

JMP
MOV
MOV
MOV

86%
aRHBAE ,BAE
@RH(CS3,CS3
@RH(CS2.,(S2

MOV

@BRHBA, $TMP1

CLR

003432
003436
003442
003440

001200

87%:
86%:

1$:

MOV
MOV
MOV
MOV
TST
BEQ
CLR
MOV
ERROR
JSR
JMP
MOV

TOIT:

006572
050202

#CLR,aRHCS?2

ERROR
JSR
JSR

@RHST,DS1
3RHER,ER1
aRHTDB, TDR
BRHMR2, TC
3RHBA
TOIT
$REGO
3RHRA,$TMP1
45
R7.WATBIT
NTOIT
#-2.8REGO
46

R7.CLEER
R7,ERRTST

:TELL IT TO CLEAR

:CLEAR BAE

: CONT INUE
:SAVE BUS ADDRESS EXTENSION
:SAVE RHCS3
:SAVE (S2
:SAVE TESTER STATUS
:SAVE ERROR REGISTER
:SAVE TESTER DATA REG.
:SAVE MR2 TESTER REG.
;1S IT ZERO
:TEST IS GOOD
;CREATE GOOD DATA
:SETUP FOR WATBIT
:RHBA DID NOT CLEAR
;FIND BITS STILL SET
:GO TO NEXT REG. TEST
:SETUP GOOD DATA

;SETUP FOR WATBIT

;BITS DID NOT SET IN RHBA
:CLEAR ERRORS

;"'ttttttttttttttttttttttt'tttttttttttQfitttttttttttttttttitttttt'

RHBAE CLEAR TEST
:«THIS TEST CHECKS THAT WHEN A CLEAR IS GENERATED
:«THE BUS ADDRESS EXTENSION REGISTER 1S CLEARED

";ttttttttttttttttttttttttttttttttttttttitttfittttttfittttttt'ttntt

010030

000004

010032
010034
010036
010044
010052

005701
100510
012777
022777
001066

2278

010062

017737

2280
2281

A AR AR

RHBA CLEAR TEST

PAGE 45

CMP
BNE

;*TEST 6

2272
2273
2274
2275
2276

2279

SCOPE
MOV

MOV

003424

2270

2277

TSTS:
1TDO:

003420
003444
003414

2267
2268
2269
2271

10:03

;.-ttttttttttttt'ttttttttttttttttttttttttttttttfittttt*tttttttttttt

012777 000040

2238
2239
2240
2241
2262
2243

;*THIS TEST SEES THAT WHEN A CLEAR IS GENERATED
:*THE BUS ADDRESS REGISTER IS CLEARED

2229
ggg?

2235
2236

02-MAY-78

RHBA CLEAR TEST

02~-MAY-78 10:01

2226

2233
2234

010054

010070

010076
010104

TST6:

000077
000077

012777

000040

017737

173236

017737
005701

173314
173306

173256

173242

003420

173232

003414

003444

SCOPE

TST
BM]
WATFOR: MOV
CMP
BNE

R1
1ST7
#77 , aRHBAE
#77 ,aRHBAE
1%

MOV

aRHCS1,CS1

MOV

MOV
TST

#CLR,3RH(CS?
SRHWC , WC

aRHBA ,BA
R1

;IS ITA70 0R AN N
:;SKIP OVER TEST FOR RH11
:SET ALL BITS IN RHBAE
ARE THEY ALL SET
:ALL THE BITS DID NOT SET

:TELL IT TO CLEAR
:SAVE RHCS1

;SAVE WORD COUNT

:SAVE BUS ADDRESS
;1S IT AN RH1

MACY11 30A(1052)
02-MAY-78
RHBAE CLEAR TEST
T6

MASSBUS RH70 AND RH11_DIAGNOSTIC
CZRHBD P

2282
2283
2284
2285
2286
2287
2288
2289
2290
2291
2292

2293
2294
2295

2296
2297
2298
2299

2300

2301
2302

2303

2304
2305
2306
2307
2308
2309

2310
2311
2312
2313
2314
2315
2316
2317
2318
2319
2320
2321
2322
2323
2324

02-MAY-78 10:01

010106
010110
010114
010120
010124
010132
010140
010146
010154
010162
010170
010176
010202
010204
010210
010216
010220
010224
010230
(10236
0 D244

BEQ

001406
005037
003416
003424
003422
003432
003436
003442
003440
001162
173144

87%:

86$:

10246

JMP
MOV

86%
aRHBAE ,BAE

001162
001200

@RH(CS3,CS3
ORH(CS2,CS2
@RHST,DS1

MOV

aRHTDB, TDR

TST

aRHBAE

1$:

050202

TC
IRHMRZ,

WATF1V

JMP
MOV
MOV

MWATFIV
#77 ,SREGO

WATF IV:

006572

aRHER ,ER1

8EQ

CLR
MOV
ERROR
JSR

001200

(S3

MOV
MOV
MOV
MOV

046354

010246
000077
173116

010246
010252

BAE

MOV

10:03

87%

CLR

$REGO
E
, $TMP1
aRHBA
100
R7,WATBIT

ERROR

E
, $TMP1
aRHBA
101

JSR
JSR

R7,CLEER
R7 ,ERRTST

PAGE 46

SEQ 0046

:NO IT'S A 70
:CLEAR BAE
:CLEAR (S3

; CONT INUE
:SAVE BUS ADDRESS EXTENSION

:SAVE RH(CS3
:SAVE (S2

;SAVE TESTER STATUS
:SAVE ERROR REGISTER
;SAVE TESTER DATA REG.

;SAVE MRZ2 TESTER REG.
;1S IT ZERO
;TEST

1S GOOD

:CREATE GOOD DATA
JSETUP FOR WATBIT
;RHBAE DID NOT CLEAR
JFIND BITS STILL SET
;GO TO NEXT REG. TEST
;SETUP GOOD DATA
:SETUP FOR WATBIT
:BITS DID NOT SET IN RHBAE
:CLEAR ERRORS

;:tt*'tfitttttt'tttt'tt't't'tt.tittfittttfi'ttttti'ttttit*tttttttttt

J*TEST 7

RHDB CLEAR TEST

;*THIS TEST (HECKS THAT WHEN A CLEAR IS GENERATED

;*OUTPUT READY IS NEGATED

';t'QQititttt..QtQfitt.t't'tiit!tt.fitttttttfittttfiiifitttttfitt*tfittt

010256
010260
010266
010272
010300
010302
010306
010310
010314
010322
010324
010330
010332
010334
010334
010342
010350

000004
012777
005037
032777
001015
005237
001371
005037
032777
001004
005237
001401
000770

017737
017737
017737
005701

017737

177777

003446
000200

173064

173040

TST7:
18%:

003446
003446
000200

003476
003424
010412
172756
172752
172722
172716
172712

#-1,3RHDB
BITCNT
#OR,aRH(CS?2
DBMG
BITCNT

CLR
BIT
BNE
INC
BEQ

BITCNT
#OR ,aRHCS?2
DBMG
BIT(NT
DBMG

MOV

@RHCS1,CS1

8EQ

87%

BNE

173016

19%:

003446

172770
172764
172760

SCOPE
MOV
CLR
BIT
BNE
INC

003420
003444
003414

DBMG:

MOV
MOV
TST

CLR

003416
003424
003422
003432
003436

87%:

86$%:

CLR
JMP
MOV
MOV

MOV

MOV
MOV

18%

19%

, WC
aRHW(
aRHBA BA
R1

BAE

€s3
86%
aRHBAE ,BAE
adRH(CS3,(S3

dRHCS2,CS2

@RHST,DS1
aRHER,ER1

;SET ALL BITS IN RHDB
;CLEAR BIT COUNTER
;IS OR SET
;BIT 1S SET
;COUNT UP
sNOT FINISHED COUNTING
:GET READY TO DO IT AGAIN
:IS IT SET YET?
JYES
;COUNT UP
:BIT IS NOT GOING TO SET
; JAVE RHCS1

;SAVE WORD COUNT
;SAVE BUS ADDRESS

;1S IT AN RH1
;NO IT'S A 70
;CLEAR BAE
;CLEAR (S3
:CONT INUE
:SAVE BUS ADDRESS EXTENSION
. SAVE RH(CS3
;SAVE (S2
:SAVE TESTER STATUS
:SAVE ERROR REGISTER

MACY11 30A(1052)

MASSBUS RH70 AND RH11 DIAGNOSTIC
CZRHBD P

02-MAY-78 10:01

010434
010442
010450
010456
010460
010462
010470
010474
010502
010504
010510

010512

010516
010524
010526
010532
010534
010536

010536

010544
010550
010556
010560
010564
010566
010574
010576

010600
010604
010610

017737
017737
032777
001001
104041
022777
005037
032777
001015
005237
001371
005037
032777
001004
005237
001401
000770

003442
003440

177777

172662

HURTS:

172636

188:

000200

003446
000200

172662

003446
003446
000200

172614

198:

003446

012777
005037
032777
001403
005237
001371
032777
001403

000040
003446
000200

004737
004737
004737

007224
006572
050202

172574

DBMSG:

1S OUTPUT READY SET
IYES ,CONTINUE TEST
*OUTPUT READY DID NOT SET
*DID TNFO GET LOADED TO DB
*CLEAR BIT COUNTER

BNE
CLR

188
BITCNT

INOT FINISHED COUNTING
*GET READY TO DO IT AGAIN

BIT
BNE
INC

#OR , BRHCS2
DBMSG
BITCNT

BIT
BNE
INC

#OR , BRHCS2
DBMSG
BITCNT

198

MOV
CLR
BIT
BEQ
INC

188:

172544

SNAFOO: BIT
BEQ
ERROR

BNE

18:

;SAVE TESTER DATA REG.
*SAVE MR2 TESTER REG.

#OR ,BRH(S2
HURTS
41
#-1,3RHDB
BITCNT

172562

104114

@RHTDB, TDR
aRHMR2 . T(

PAGE 47

BIT
BNE
ERROR
(MP
CLR

BEQ

003446
000200

RHDB CLEAR TEST

MOV
MOV

172710
172670

&4
I
02-MAY-78 10:03

JSR
JSR
JSR

IS OR SET
:BIT IS SET
$COUNT UP

(1S IT SET YET?
:YES
:COUNT UP

DBMSG

BIT IS NOT GOING TO SET

#CLR,RHCS2
BITCNT
#OR, BRHCS2
SNAF 00
BITCNT

:TELL IT TO CLEAR
:CLEAR THE COUNTER
:DID OUTPUT READY CLEAR
:YES GET OUT OF LOOP
* INCREMENT COUNT LOOP

183

#OR , BRH(S2
1$
114
R7,WHYFO
R7.CLEER
R7.ERRTST

:CONTINUE LOOP IF NO CARRY
1S OUTPUT READY CLEARED
YES,EXIT TEST
:0UTPUT READY NOT CLEARED
:BY SETTING CLR IN RHCS2
ANY ERROR BITS SET
:CLEAR ERRORS

.','tfifiQttfifitttt.tfi.tfit.ttt""fifi'tt*iliittfitifitt'tfi*ittti.ttfi'filtt

S*TEST 10
PROM REGISTER DECODE TEST
;*THIS TEST CHECKS THAT THE PROM

:#CAN ACCESS ALL REGISTERS

""t.t*'ttl*itfifi*'t.ttfit"iiitt.*ttiififit'tilt'ttttfittt.*t".ittttt

003366

160100

003356

TST10:

SCOPE

18:

BNE
MOV

13
RHDT R4

WE ARE OK
:SETUP TO TEST RH11

28:

CMP
BEQ
ST

RHBAE , Ré
ERR3
(R4)+

:ARE ALL REGISTERS CHECKED
:WERE THERE ANY ERRORS
TEST REGISTER

CMP
BEQ

RHBAE ,R4
ERR3
23
-(R4)
R4 ,BAE
(R4) , SREGO
aRHAS ,AS
52
R3
RHCS1,CS1
aCS1,$REGO

003360

010710

027737

38:

003416
001162
172452

003412

003330

003420

172504

001162

29%:

CMP
TST

BNE

BR
TST
MOV
MOV
MOV
ERROR
CLR
MOV
(MP

DEVIC1.,#160100
(RG) +

:CHECK FOR WHAT REG END
*CORRECT ADDRESS

:SOME INFORMATION WAS FOUND

:ARE ALL REGISTERS CHECKED
:WAS THERE ANY ERRORS
STEST NOT COMPLETED
:CORRECT ADDRESS
:SAVE ADDRESS
:GET CONTENTS
:GET ATTENTION SUMMARY
:FALSE INFO IN FAKE REGISTER
:CET OFFSET READY
*GET ADDRESS TO START CHECKING
*HAS A REGISTER BEEN FOUND THAT COMPARES

SEQ 0047

MACY11 30A(1052)

MASSBUS RH70 AND RH11 _DIAGNOSTIC
CZRHBD.P11
02-MAY-78 10:01

011060

001412
023737
001473
062737
062703
000762
032737
001024
104401

000421

000163
104053
000732

003356

003420

000002
000004

003420

020000

177570

30%:

BEQ

CMP

BEQ
ADD
ADD
BR

G
G
Qo gaurd

b b d b
N

JYES,PRINT IT OUT

ERR3
#TW0,CS1
#4 ,R5
29%

;WAS THERE ANY ERRORS
;NO,CORRECT FOR NEXT CHECK
;CORRECT OFFSET
;CONTINUE TEST

;IS IT LAST REG IN RH11

;SKIP ERROR PRINTOUT

JMP

273(R3)

;PRINT REGISTER

ERROR
BR
ERROR
BR
ERROR
BR
ERROR
BR

56
308
57
308
60
308
61
308

JRHMR2
sCONTINUE
;RHCS2
;CONTINUE
JRHST
;CONTINUE
;RHER
;CONTINUE

104054

104056

000724
104057
000722
104060

000720
104061

000716

ERROR
BR
ERROR
BR
ERROR
BR

ERROR
BR
ERROR
BR
ERROR
8R

104064

elelelolele]

28%

RHDT, (51

55%:

27%:

000710
104065
000706
104066
000704

ERROR
BR
ERROR
BR
ERROR
BR
ERROR
JSR
JSR

104067

ERR3:

050202
006572

SEQ 0048

':255:

000730
104055
000726

000702
104070
004737
004737

PAGE 48

A#SW13,a#177570

000714
104063
000712

10:03

PROM REGISTER DECODE TEST

BIT

010762

011030

BNE
TYPE
B8R
LASCIZ

28%:

104062

55%
;SKIP MESSAGE
.65%
;. TYPE ASCIZ STRING
64%
;;GET OVER THE ASCIZ
<15><12>/REGISTER CONTENTS COMPARES TO:/
53
30%
54
308
55
308

JRHCS1
;CONTINUE TEST
;RHWC
;CONTINUE TEST
;RHBA
;CONTINUE TEST

TEST

TEST
sRHAS
;CONTINUE TEST
;RHTDB
;CONTINUE TEST
;RHDB
;CONTINUE TEST

62
308
63
308
64
308

JRHMR1
;CONTINUE TEST
JRHDT
sCONTINUE TEST
;RHBAE
;CONTINUE TEST
;RHCS3

65
30%
66

308
67
308
70
R7,ERRTST
R7,CLEER

R AR AR AR AR AR RN AR

TEST

:CLEAR ERRORS
R R AR AR AN

RN AR RN AN RN R

RN R

RHCS3 TEST
J*TEST 1N
;*THIS TEST CHECKS THE READ/WRITE BITS
;*IN THE RHCS3 REGISTER CAN BE CLEARED AND SET.

%WMJ\J\&WN
RO
OOO

b
b
b

b —d
b

Gour Guwr-Ghar

S . 222222223222 23223 2332222322322

2410
2611
2412
2413
2414
2415
2416
2417
2418
2419
2420
2621
2422
2423
2424
2425
2426
2427
2428
2429
2430
2431
2432
2433
2434
2435
2436
2437

—d

2409

b e

2407
2408

011024
011024
011030
011032
011034
011036
011040
011042
011044
011046
011050
011052
011054
011056

[e]elelelelolele)

24606

010716
010720
010726
010730
010736
010742
010744
010752
010754
010760

PasrQour Qs G

2394
2395
2396
2397
2398
2399
2400
2401
2402
2403
2604
2605

110

02-MAY-78

000004
012777
012777
005701
001122
012737
012737
013777

000040
000007

000004
000001
001162

172202
172174

003450
001162
172170

TST11:

1$:

SCOPE

MOV
MOV
TST

#CLR, aRHCS?
#7 ,@RHCS2
R1

MOV

SREGO,aRH(S3

BNE
MOV
MOV

1ST12
#4 ,LOOCNT
#1,SREGO

2322223232830

802003

AR RN RN RN

0000ttt st

;CLEAR TESTER
sSETUP UNIT SEVEN
;IS IT AN RH70

;. THIS IS A RH11
;SETUP LOOP COUT OF FOUR
JSETUP BIT TO BE TESTED
;SET THE BIT

MACY11 30A(1052)

MASSBUS RH70 AND RH11 DIAGNOSTIC
CZRHBD.P11
G2-mMAY-78 10:01

017737
013737
123777

2450
2451
2452
2453
2454
2455
2456
2457
2458
2459
2460
2461
2462
2463

001356
012737
013777
017737
023777
001451
017737
017737
017737
005701
001406
005037

2464
2465
2466
2467
2468
2469
2470
2471
2472

2473
2474
2475
2476
2477
2478
2479
2480
2481
2482
2483

2484
2485
2486
2487
2488
2489
2490
24N
2492
2493
2494
2495
2496
2497
2498
2499

2500
2501
2502
2503
2504
2505

011376
011400
011404
011410

172164
003424
001162

172042
172036
172032

003416
003424
011340
172030
172024
171774
171770
171764
171762
171742

RHCS3 TEST

172146

MOV
MOV
CMP8
BNE
ROL

@RHCS3,CS3
€S3.$TP]
$REGO.@RHCS3
2
$REGO

001162

BNE
MOV
MOV

18
#1E3, SREGO
$REGO, aRHCS3

003424
001200

001162
003450
000100
001162
172112
001162

02-MAY-78

DEC

172116

MOV

003424

cMP

172102

003420
003444
003414

003416
003424
003422
003432
003436
003442
003440

046354
050202
006572

2%:

87%:

86%:

@RHCSS.CS3

$RES0,IRHCS3

ERRS

MOV

aRHCS1,CS1

BEQ

87%

, WC
BRHWC
aRHBA _BA
R1

CLR

BAE

MOV

868
aRHBAE
, BAE
@RHCS3.CS3

CLR
JMP

MOV
MOV

MOV
MOV
MOV

MOV
ERROR

ERRS:

LOOCNT

BEQ

MOV
MOV
ST

JSR
JSR
JSR

Cs3

SRHCS2.CS2
aRHST,DS1
@RHER _ER1

aRHTDB, TDR

. TC
aRHMR2
35

R7.WATBIT
R7.ERRTST
R7.CLEER

10:03

PAGE 49

;SAVE CONTENTS OF RHCS3

;SETUP FOR WHAT BIT IF NEEDED
;IS THE BIT SET?
:NO,GO TO ERROR
;SETUP TO TEST NEXT BIT
;=1 TO THE LOOP COUNT
sTEST NEXT BIT

;SET INTERRUPT BIT
;SET BIT
;SAVE CONTENTS
;1S BIT SET?
AN ERROR
THERE
JWAS

;SAVE RHCS1
;SAVE WORD COUNT
;SAVE BUS ADDRESS
;IS IT AN RH11
sNO IT'S A 70
:CLEAR BAE
;CLEAR (S3
s CONT INUE
;SAVE BUS ADDRESS EXTENSION
;SAVE RHCS3
;SAVE (S2
;SAVE TESTER STATUS
;SAVE ERROR REGISTER
;SAVE TESTER DATA REG.
;SAVE MR2 TESTER REG.
;BIT DID NOT SET
;TELL WHAT BIT POSITION IS NO GOOD

;CLEAR ERRORS

';tttttt**tttfi*tttttfittttttttfitttttttitttttt*tttttiit*ttttti***tt

TRTEST 12

RHWC BIT TEST

;*THIS TEST CHECKS THE WORD COUNT REGISTER

;«TO SEE IF ALL BITS CAN BE SET AND CLEARED
s*AND CHECKS THE REGISTER USING ALTERNATE BITS
;~SET (52525) AND USING (125252) TO MAKE SURE
;*]T WORKS WITH ALTERNATE PATTERN.

:;itttfitttt*itttttttlttttt'ttfitfittttitt*'tfittfittfitifittiittttttttt

011414
011416
011424
011432
011440
011442
011450
011454
011462
011470
011476
011500
011502
011506
11512

000001
001162
001162

001162
171700
171672

003444
046354

001200

171650
171644
171640

003416
003424
011532

003420
003444
003414

TST12:
RHW(CT:

SCOPE
MoV
MOV
CMP
BEQ
MOV

JSR

MOV
MoV
MoV
TST

8EQ
CLR
CLR
JMP

#ONE
, SREGO
$REGO, aRHWC

¥§EG0.0RHUC

WC,S$TMP1
R7 ,WATBIT
aRHCS1,CS1
aRHW( ,W(
aRHBA ,BA
R1

87%

BAE

(S3
863

;SET UP REFERANCE WORD
;MOVE BIT INTO WORD COUNT REGISTER
;IS BIT SET?

JYES,CONTINUE BIT TEST

:SETUP FOR WATBIT PROG.

;GO TO WATBIT PROGRAM
;SAVE RHCS1
:SAVE WORD COUNT
;SAVE BUS ADDRESS
;IS IT AN RHI1
:NO IT'S A 70
;CLEAR BAE

;CLEAR (CS3
; CONT INUE

SEQ 0049

MACY11 30A(1052)

MASSBUS RH70 AND RH11 DIAGNOSTIC

CZRHBD .P11

2506
2507

2508

2509
2510
2511
2512
2513
2516
2515
2516

2517
2518
2519
2520
2521
2522
2523
2524
2525
2526
2527
2528
2529
2530
2531
2532
2533
2534

02-MAY-78 10:01

011516
011524

017737
017737

011560
01156
011554
011562
011570
011572
011576
011600

017737
017737
017737
017737
104001
005737
100403
006137

011532

011604
011606
011614
011622
011630
011636
011640
011646
011652
011660
011666
011674
011676
011700
011704
011710
011714
011722
011730
011736
011744
011752
011760
011766
011770
011776
012004
012012
012020
012022

012030
012034

017737

000707
012737
013777
017737
023777
001457
013737
004737
017737
017737
017737
005701
001406
005037
005037
000137
017737
017737
017737
017737
017737
017737
017737
104001

012737
013777
017737
023777
001454
013737
004737

017737
017737
017737
005701

171576
1

003416
003424
003422

003432
003436

112

RHWC BIT TEST

87%:

MOV
MOV
MOV

86%:

003442
003440
1%:

001162
052525
001162
171504
001162

001162
171510
003444
171474

003444
046354
171452

001200

171446
171442

003416
003424
011730

MOV

CMP
BEQ
MOV
JSR
MOV
MOV
MOV
TST

1
1
}

003432
003436
003442
003440

003422

001162
171326
003444
171312

003444
046354

001200

171270
171264
171260

003420
003444
003414

87%:

86%:

:
GOOF

017737

87%:

86$%:

aRHWC ,W(

$REGO, aRHW(
1%
wC,$TMP1
R7 ,WATBIT
@RHCS1,CS1
aRHWC ,WC
aRHBA ,BA
R1

87%

JMP
MOV
MOV

863
aRHBAE ,BAE
@RH(CS3,(S3

MOV
MOV

aRHST, DS
aRHER, ER1

ERROR
MOV
MOV

1
#0AB, $SREGO
$REGO, aRHWC

MOV

(S3

@dRH(S2,(CS?2

aRHTDB, TDR
aRHMR2,
TC

ARHWC
, W(

cMP
BEQ
MOV
JSR

$REGO, aRHW(
ERR6
WC.$TMP]
R7 ,WATBIT

MOV

aRHCS1,CS1

MOV
MOV
TST

aRHWC
, WC
aRHBA ,BA
R1

CLR

BAE

BEQ

003416
003424
003422
003432
003436

@aRHST,DS1
aRHER ,ER1
aRHTDB, TDR
TC
dRHMRZ,
1
$REGO
RHWCA
$REGO
RHWCT
#AB, SREGO
$REGO, aRHWC

BAE

MOV
MOV

18:

aRHBAE ,BAE
@RHCS3,(S3
@RH(S2,CS2

CLR

003416

012126

MOV
MOV
MOV
MOV
ERROR
TST
BMI
ROL
BR
MOV
MOV

BEQ

003416
003424

RHWCA:

003420
003444
003414

171440
171434

L &
02-MAY-78 10:03

CLR
JMP
MOV
MOV

MOV

MOV
MOV

87%

€S3
86%
@aRHBAE ,BAE
@RHCS3,CS3

@RH(S2,(S2

aRHST,DS1
aRHER,ER1

PAGE 50

SEQ 0050

:SAVE BUS ADDRESS EXTENSION
. SAVE RHCS3
s SAVE cse
;SAVE TESTER STATUS
; SAVE ERROR REGISTER
s SAVE TESTER DATA REG.
;SAVE MR2 TESTER REG.
;BIT WAS NOT SET IN RHWC REG

JWAS IT BIT 15 THAT WAS LAST TESTED

JYES

, GO TO NEXT PART OF

;NO,THEN TEST NEXT BIT

TEST

;DO BIT TEST AGAIN
JSET UP ALTERNATE BIT PATTERN
;SET ALTERNATE BITS
s SAVE RHWC CONTENTS
JARE THEY ALL SET?
JYES,CONTINUE TEST
;SETUP FOR WATBIT PROG.
;GO TO WATBIT PROGRAM
s SAVE RHCS1
s SAVE WORD COUNT

; SAVE BUS ADDRESS
;IS IT AN RH11

;NO IT*'S A 70
;CLEAR BAE

;CLEAR (S3

s CONTINUE
: SAVE BUS ADDRESS EXTENSION
; SAVE RHCS3
:SAVE cse
. SAVE TESTER STATUS
: SAVE ERROR REGISTER
; SAVE TESTER DATA REG.

: SAVE MR2 TESTER REG.
JTEST FAILED

;SET UP ALTERNATE OPPISITE BITS
JSET OPPISITE ALTERNATE BITS
s SAVE CONTENTS OF RHWC
JARE CORRECT BITS SET?
;WAS THERE AN ERROR

;SETUP FOR WATBIT PROG.
;GO TO WATBIT PROGRAM
s SAVE RHCS1

; SAVE WORD COUNT
s SAVE BUS ADDRESS

SIS IT AN RHM

JNO IT'S A 70
;CLEAR BAE
;CLEAR (S3

. CONT INUE
s SAVE BUS ADDRESS EXTENSION
: SAVE RHCS3

;SAVE €S2
; SAVE TESTER STATUS

:SAVE ERROR REGISTER

MACY11 30A(1052)

MASSBUS RH70 AND RH11 DIAGNOSTIC
02-MAY-78 10:01
CZRHBD .P11

2576
2577

2578
2579

171210
171170

003442
003440

013737
012777
113777
022777
001401

003332
000000
004120
000377

004142

104200

004737
012777
004737

050202
000000
006572

24,

-2
e

~N—
=

177400

MOV

MOVB
MP
BEQ

ERROR

171060

RHWC BIT TEST

MOV
MOV
ERROR
ERR6:
MOV
MOV
MOVB
CMP
BEQ
ERROR
HIBYTE: INC

[0,

022777
001401

004121

—_

113777

004142
000000

171746
171130

104200
005237
012777

171144

104001

2571
2572
2573
2574
2575

012150
012152
012160
012166
012174
012202
012204
012206
012212
012220
012226
012234
012236
012240
012264
012252

017737
017737

NNN

2566
2567
2568
2569
2570

012134
012142

—

2562
2563
2564
2565

T12

02-MAY-78

ALRIGT: JSR
MOV
JSR

10:03

PAGE 51

SEQ 0051

@RHTDA, TDR
BRHMR2 . TC
1
RHWC , SRHWC
#2ERD, aRHW(
MINUS,@SRHW(
#377, 3RHWC
HIBYTE
200
SRHW(

;SAVE TESTER DATA REG.
“SAVE MR2 TESTER REG.
*OPPISITE BIT TEST FAILED
*GET READY TO TEST BYTES
:CLEAR WC FIRST
*CHECK LOBYTE
*ANY EXTRA BITS
10K SO FAR
*HIBYTE GATE NOT WORKING PROPERLY
*GET READY FOR NEXT BYTE

MINUS+1,aSRHW(
#177400 . 3RHWC
ALRIGT

*CHECK THE HI BYTE
2IS IT OK
$1TS 0K

#ZERO, RHWC

:CLEAR WC

*LOBYTE GATE NOT WORKING PROPERLY

200

R7 ERRTST
#ZERO, aRHWC
R7,CLEER

;CLEAR WORD COUNT
:CLEAR ERRORS

;;t.itttttQQ.QQt.t.ttt.t"itittfit'.tfittifittfiititittttttttfittttfifit

STEST

RHBAE BIT

TEST

;*THIS TEST TESTS THE RHBAE REGISTER
J*ONLY [F THE RH IS AN RH70,RH11'S
;*DO NOT HAVE AN RHBAE REGISTER

SR 2232223222322 3223332322222

TST13:

012256
012260

012262
012264
012272
012300
012306
012314
012316
012324

012330
012336
012344
012352
012354
012356
012362

012406
012414
012422
012430
012436
012444
012446
012454
012456
012462

012737
013777
017737
023777

000001
001162
171054
001162

001162

013737
004737
017737
017737
017737

003416
046354
170774
170770
170764

001200

005037
005037
000137
017737
017737
017737
017737
017737
017737
017737

003416
003424
012406
170762
170756
170726
170722
170716
170714
170674

022737

000040

006137

001162

171060

003416
171044

SCOPE

TST
BNE

MOV
BAETST: MOV
MOV

cMP

003420
003444
003414

003424
003422
003432
003436
003442
003440
001162

87%:

86$%:

1%:

#1,S8REGO
$REGO, aRHBAE
aRHBAE ,BAE
$REGO, IRHBAE

Rttt

SIS IT SET?

JYES CONTINUE TEST
;SETUP FOR WATBIT PROG.
;GO TO WATBIT PROGRAM
;SAVE RHCS1
;SAVE WORD COUNT
;SAVE BUS ADDRESS
;IS IT AN RH11
:NO IT'S A 70

CLR

CS3

;CLEAR (S3

JMP
MOV

86%
aRHBAE ,BAE

MoV
MOV
MOV
MOV
ERROR
cMP
BEQ
ROL
BR

@RHST,DS1
aRHER,ER1
aRHTDB, TDR
aRHMRZ, TC
2
#40, SREGO
ERR7
$REGO
BAETST

MOV
MOV

@RH(CS3,CS3
®RHCSZ2,(S2

JSET UP BIT TEST
JSET BIT IN RHBAE REGISTER
;SAVE CONTENTS OF RHBAE REGISTER

13
BAE ,$TMP1
R7,WATBIT
@RHCS1,CS1
aRHWC , WC
aRHBA ,BA
R1
87%
BAE

;IS RH AN RH70
;.NO PASS OVER TEST

BEQ
MOV
JSR
MOV
MOV
MOV
TST
BEQ
CLR

003416

R1
TST14

20202

;CLEAR BAE

- CONTINUE
;SAVE BUS ADDRESS EXTENSION

;SAVE RHCS3
;SAVE (CS¢2

;SAve TESTER STATUS
;SAVE ERROR REGISTER
;SAVE TESTER DATA REG.
;SAVE MR? TESTER REG.
;BIT DID NIT SET
;IS IT LAST BIT TO BE TESTED
;WAS THERE AN ERROR
;JNO,SET UP FOR NEXT BIT
sCONTINUE TEST

MASSBUS RH70 AND RH11

CZRHBD.P11

2618

2619
2620
2621

02-MAY-78 10:01

012464

012470

004737
004737

006572
050202

2669
2670
2671
2672
2673

02-MAY-78

T13

RHBAE BIT TEST

ERR7:

JSR

2622

2623
2624
2625
2626
2627
2628
2629
2630
2631
2632
2633
2634
2635
2636
2637
2638
2639
2640
2641
2642
2643
2644
2645
2646
2647
2648
2649
2650
2651
2652
2653
2654
2655
2656
2657
2658
2659
2660
2661
2662
2663
2664
2665
2666
2667
2668

MACY11 30A(1052)

DIAGNOSTIC

JeTEST

JSR

10:03

PAGE 52
;CLEAR ERRORS

R7,CLEER

R7 ,ERRTMST

AR AR R AR AR AN RN AN R E

14
;*THIS

AR AN AR AR RN

RN R AR AR RN R AR RN R AR R NN RN RS

RHBA BIT TEST
TEST TESTS THE BUS ADDRESS REGISTER

;=BY FIRST ALTERNATLY SETTING AND CLEARING

012474

000004

012476
012504
012512
012520
012526
012530
012536
012544
012552
012560
012562
012564
012570
012574
012600
012606

012737
013777
017737
023777
001454
013737
017737
017737
017737
005701
001406
005037
005037
000137
017737
017737
017737
017737
017737
017737
017737
104003
004737
005737

000002
001762
170616
001162

001162
170622
003414

003414
170566
170562
170556

001200
003420
003444
003414

006137
000704
012737
042737
013777
017737
023777
001454
013737
017737

001162

012614
012622
012630
012636
012644

012652
012654
012660
012664
012666
012672
012674
012702
012710
012716
012724
012732
012734
012742
012750

012756
012764
012766
012770
012774
013000

100403

017737
017737
005701
001406
005037
005037
000137

003416
003424
012614

170554
170550
170520
170514
170510
170506
170466

046354
001162

003414
170362
170356
170352

001200
003420
003444
003414

003416
003424
013020

SCOPE

BATST:

MOV
MOV
MOV

#TWO, SREGO
SREGO, aRHBA
aRHBA ,BA

JSET UP BIT TEST
JSET BIT IN RHBA REGISTER
;SAVE CONTENTS OF BA REGISTER

MOV

BA,$TMP1

;SETUP FOR WATBIT PROG.

MOV

aRHBA ,BA

[0 4
8eQ
MOV
MOV
TST

87%:

86$:

SREGO, aRHBA
13
@RHCS1,(S1
aRHWC , WC
R1

BEQ
CLR
CLR

87%
BAE
cs3

MOV

aRHBAE ,BAE

JMP

MOV
MOV
MoV

MOV
MOV
MOV

ERROR
JSR
TST
B8MI
ROL

001162

170412

TST14:

1$:

001162
001162
170416
003414
170402

052525
000001
001162

AR RARRANNRAANANRNANRAANA
RN AANNANARANRAANNANNANAANRNANSA AN AN A RN
RN

170606

003416
003424
003422
003432
003436
003442
003440

;*BITS IN THE BA REGISTER AND THEN BY USING
:*AN ALTERNATE BIT PATTERN (52525) AND AN
;*OPPOSITE BIT PATTERN (125252).

BR
BATSTA: MOV
8IC
MOV
MOV
cMP
BEQ
MOV
MOV
MOV
MOV
TST
BEQ
CLR
CLR
JMP

86%

;ARE CORRECT BITS SET
JYES,CONTINUE TEST
s SAVE RH(S1
s SAVE WORD COUNT

. SAVE BUS ADDRESS

;IS IT AN RH1

;NO IT'S A 70
;CLEAR BAE
;CLEAR (S3
. CONT INUE

;SAVE BUS ADDRESS EXTENSION

@RH(CS3,(S3
aRH(CS2,CS2
@RHST,DS1

;SAVE RH(CS3
;SAVE (S2
;SAVE TESTER STATUS

;NO,CORRECT BITS ARE NOT SET
;GO TO WATBIT PROGRAM
JWAS BIT 15 THE LAST BIT TESTED
JYES,GO TO ALTERNATE BIT TEST

BATST
#AB, SREGO
#ONE , SREGO
$REGO, aRHBA
aRHBA ,BA
$REGO, aRHBA
1%
BA,$TMP1
aRHCS1T,CS1
aRHWC , WC
aRHBA ,BA
R1
87%
BAE
(S3
86%

;CONTINUE BIT TEST
;SET UP BIT PATTERN
;CLEAR BIT O POSITION
;SET BITS IN RHBA REGISTER
;SAVE CONTENTS OF BA REGISTER
;ARE CORRECT BITS SET
JYES,CONTINUE TEST
;SETUP FOR WATBIT PROG.
:SAVE RH(CS?
;SAVE WORD COUNT
;SAVE BUS ADDRESS
;IS IT AN RH11
sNO IT'S A 70
;CLEAR BAE
;CLEAR (S3
s CONT INUE

aRHER,ER1
aRHTDB, TDR
aRHMR2, TC
R7 ,WATBIT
$REGO
BATSTA
$REGO

;SAVE ERROR REGISTER
;SAVE TESTER DATA REG.
;SAVE MR2 TESTER REG.

sNO,SET UP TO TEST NEXT BIT

SEQ 0052

MACY11 30A(1052)

MASSBUS RH70 AND RH11_DIAGNOSTIC
CZRHBD.P11
02-MAY-78 10:01

013004
013012
01302C
013026
013034
013042

013050
013056
01

017737
017737
017737
017737
017737
017737
017737

001454
013737

017737
017737
017737
005701
001406
005037
005037
000137
017737
017737
017737
017737
017737
017737
017737

170350
170344
170314
170310
170304
170302
170262

003416
003424
003422
003432
003436
003442
003440

046354
125252
001162
170230
001162

001162
170234
003414

003414

001200

170200

003420
003444
003414

170174
170170

046354
003334
000000
004120
000376

004136
000000
004121
177400

004737
004737

T14

RHBA BIT TEST

87%:

MOV

86%:

006572
050202

MOV
MOV
MOV
MOV

MOV

MoV
1%:

GOOFED:

004136

ERR10:

170052
170646
170036

170020
170614
170004

86%:

aRHBA ,BA

Mov

BA,$TMP1

MOV

@RH(CS1,CST
aRHWC
, WC
aRHBA,BA
R1

87%

CLR

BAE

MOV

aRHBAE ,BAE

CLR
JMP

cs3
86%

MOV
MOV
MOV

adRHCS3,CS3
aRHCS2,(S2
@RHST,DS1

MOV
ERROR
JSR
MOV

aRHMRZ,
TC
3
R7 ,WATBIT
RHBA, SRHBA

@RHER,ER1
aRHTDB,
TDR

MOV
MovB

#ZERO, IRHBA
MINUS
, 3$RHBA

8EQ

99%

cMP

98%:

aRHMRZ,
TC

$REGO, aRHBA
ERR10

MOV
MOV

99%:

aRHTDB, TDR

MP
BEQ

BEQ

87%:

dRHCS3,C53
@RHCS2,CS2
@RHST,DS1
aRHER,ER1
3
R7 ,WATBIT
#0AB, $REGO
$REGO, IRHBA

MoV
MOV
TST

003416
003424
003422
003432
003436
003442
003440

aRHBAE ,BAE

ERROR
JSR
MoV
MOV
MOV

170220

003416
003424

013202
170166
170162
170132
170126
170122
170120
170100

B 5
02-MAY-78 10:03

ERROR
INC

MOV
MOVB

cMP
BEQ
ERROR
JSR
JSR

#376,aRHBA
202
$RHBA

#ZEROQ,aRHBA
MINUS+1,a$RHBA

#177400,3RHBA
98%
202
R7,CLEER
R7,ERRTST

PAGE 53

:SAVE BUS ADDRESS EXTENSION
JSAVE RH(CS3
sSAVE (S2

;SAVE TESTER STATUS
;SAVE ERROR REGISTER
;SAVE TESTER DATA REG.
;SAVE MR2 TESTER REG.
;NO,CORRECT BITS ARE NOT SET
;GO TO WATBIT PROGRAM
JSET UP OPPOSITE ALTERNATE BIT TEST
;SET BITS IN RHBA REGISTER
:SAVE CONTENTS OF BA REGISTER
JARE CORRECT BITS SET
;WAS THERE AN ERROR

;SETUP FOR WATBIT PROG.

:SAVE RHCS1
;SAVE WORD COUNT
. SAVE BUS ADDRESS
;1S IT AN RH1M
:NO IT'S A 70

;CLEAR BAE
;CLEAR (S3
; CONT INUE
;SAVE BUS ADDRESS EXTENSION
:SAVE RH(CS3
:SAVE (S2
;SAVE TESTER STATUS
:SAVE ERROR REGISTER
;SAVE TESTER DATA REG.

:SAVE MR2 TESTER REG.
:NO,CORRECT BITS ARE NOT SET
;GO TO WATBIT PROGRAM
:GET READY TO TEST BYTES
;ZERO THE BUS ADDRESS
:MOVE THE BYTE
:DID IT GET THERE ALRIGHT
:YES,CHECK NEXT BYTE
:HIGH BYTE DOES NOT SEEM TO BE WORKING
:GET READY FOR NEXT BYTE
;ZERQ THE BUS ADDRESS
:MOVE TO UPPER BYTE
;DID IT GET THERE ALRIGHT
JYES,EXIT TEST
JLOBYTE IS NOT WORKING PROPERLY
; CLAER ERRORS

SEQ 0053

MASSBUS RH70 AND RH11_DIAGNOSTIC

CZRHBD .P11

MACY11 30A(1052)

T14

02-MAY-78 10:01

2722

2723

02-MAY-78

RHBA BIT TEST

IINRRAARKAARRNNRRRANRR

10:03

PAGE 54

SEQ 0054

AR R R RAAAA RN AAARAARRARR
AR RR AR R RANNS

2724
2725
2726

RHDB BIT TEST
;*TEST 15
:*THIS TEST TESTS THE RH DATA BUFFER REGISTER
:*BY FIRST ALTERNATLY SETTING AND RESETING BITS

2728
2729

;*ALTERNATE BIT PATTERN (52525) AND AN OPPISITE
:*ALTERNATE BIT PATTERN (125252

2727

:*IN THE RHDB REGISTER AND THEN BY USING AN

2730

2731
2732
2733

2734
2735
2736
2737
2738
2739
27640
27641
27642

2743

D AR

013344

000004

013346
013352
013360
013366
013372

005037
012737
013777
005037
032777

013400
013402
013406
013410

013414

2744
2745
27646
2747
2748

013422
013424
013430
013432
013434

2754
2755
2756
2757

013462
013466
013472

2749
2750
2751
2752
2753

2758
2759

2760
2761
2762
2763
2764
2765
2766
2767

2768

2769
2770
2771

2772
2773
2776
2775
2776
2777

013434
013442
013450
013456
013460

013476

013504
013512

013520
013526
013534
013542
013550
013556
013560
013562

013566
013574
013576
013604

013606
013614
013622
013624
013632
013634

001015
005237
001371
005037

032777

001004
005237
001401
000770

017737
017737
017737
005701
001406

005037
005037
000137
017737

017737
017737

017737
017737
017737
017737
032777
001003
104102
004737

032777
001004
017737
104041

017737
023737
001406
013737
104004
004737

003450
000001
001162
003446
000200

TST15:

SCOPE

001162
167764

DBTST:

167730

18s:

CLR
MOV
MOV
CLR
BIT

167706

19%:

003446
003446
000200
003446

167670
167664
167660
003416
003424
013512

167656

167652
167622

167616
167612
167610
167570
000200

007224

003420
003444
003414

003416

003424
003422

003432
003436
003442
003440
167552

000200

167544

167550

003426

167540
001162

003426
003426

003426

001200

046354

AR R R

ABLE:

87%:

86%:

BNE
INC
BNE
CLR

LOOCNT
#ONE , SREGO
SREGO,aRHDB
BITCNT
#RDY ,aRHCS1

BNE
INC
BEQ
B8R

BIT

ABLE
BITCNT
18%
BITCNT
#RDY ,aRH(CS1
ABLE
BITCNT
ABLE
19%

MOV
MOV
MOV
TST
BEQ

aRH(CS1,CS1
aRHW(C ,W(
aRHBA ,BA
R1
87%

CLR
CLR
JMP

BAE
¢s3
863

MOV
MOV

dRH(CS3,(S3
aRH(SZ2,(S2

MOV

MOV
MOV
MOV
MOV
BIT
BNE
ERROR
JSR

RDYSET: BIT

BNE
MOV

ORSET:

R AR AR AN A AR R AR

ERROR

MOV
CMP
BEQ
MOV
ERROR
JSR

AR AR AR R AR

ARRRAANRAAR AR

RN RR

;CLEAR LOOP COUNT
JSET UP BIT TESH
;JSET BIT IN RHDB REGISTER
;CLEAR BIT COUNTER
;1S RDY SET

;BIT IS SET
;COUNT UP
JNOT FINISHED COUNTING
:GET READY TO DO IT AGAIN

JIS IT SET YET?

JYES
sCOUNT UP
;BIT IS NOT GOING TO SET

;SAVE RHCS1
;SAVE WORD COUNT
;SAVE BUS ADDRESS
;IS IT AN RH11
JNO IT'S A 70

aRHBAE ,BAE

;CLEAR D+F
;CLEAR CS,
: CONTINUE
:SAVE BUS ADDRESS EXTENSION

@RHST,DS1
@RHER ,ER1
aRHTDB, TDR
3RHMRZ, TC
#RDY ,aRHCS1
RDYSET
102
R7 ,WHYFO

;SAVE TESTER STATUS
;SA'TM ERROR REGISTER
; St
TESTER DATA REG.
:;SAVE MRZ TESTER REG.
;1S READY SET
;SKIP ERROR
JREADY DID NOT SET
;JANY ERRORS SET

#0R ,aRH(CS?2

;SAVE RH(CS3
JSAVE (S2

;1S OR SET?

ORSET
aRHDB, DB

JYES,IT'S SET
;SAVE CONTENTS OF RHDB REGISTER

aRHDB, DB
$REGO,DB
1%
DB,$TMP1
4
R7 ,WATBIT

;SAVE CONTENTS OF REGISTER
;IS CORRECT BIT SET?
JYES,CONTINUE TEST
;SETUP FOR WATBIT PROG.
;JNO,CORRECT BIT IS NOT SET
;GO TO WATBIT PROGRAM

;OUTPUT READY DID NOT SET

013640
013644
013646
013654
013656
013662
013666
013672
013676
013700
013706
013710
013714
013720
013726
013734
013740
013746
013750
013754
013756
013762
013770
013772
013776
014000
014002
014002
014010
014016
014024
014026
014030
014034
014040
014044
014052
014060
014066
014074
014102
014110
014116
014124
014126

014130
014136
014140
014146
014154
014156
014162
014170
014176
014202
014210

005737

RHDB BIT TEST

1%:

SREGO

;WAS BIT 15 THE LAST BIT TESTED

003450

#ONE ,LOOCNT

003450

LOOCNT
DBTST
LOOCNT
$REGO
DBTST
quE.LOOCNT

;IS IT FIRST TIME
JNO, IT'S SECOND
JYES,
;CONTINUE TEST
;CLEAR LOOP COUNT
JNO,SET UP TO TEST NEXT BIT
;GO AND TEST BIT
;IS IT FIRST TIME

LOOCNT
DBTST

;DO _AGAIN

003450
013360
003450
001162
000001
003450
013360
052525
001162
003446
000200

DBTSTA

2%:
DBTSTA:

001162

1$:

167372

18%:

167416

#AB, SREGO

$REGO,aRHDB

BITCNT

#OR ,aRHCS?2

DBOUT
BITCNT
18%
BITCNTY
#OR ,aRHCS?2
DBOUT
BITCNT
0BOUT
19%

003446
032777
001004
005237
001401
000770

017737
017737
017737

003446
000200

167312

19%:

003420
003444
003414

:
DBOUT

003416
003424
003422
003432
003436
003442
003440
167214

87%:

001162

167214

2%:

167206

003426
001200

046354

125252

001162
003446
000200

@RHCS1,CS1
aRHWC ,WC
@aRHBA ,BA
R1

003416
003424
014060
167310
167304
167254
167250
167244
167242
167222
000200

003426

001015

167350

003446

167322
167316

PAGE 55

T15

001162
000001

D 5
02-MAY-78 10:03

MACY11 30A(1052)

MASSBUS RH70 AND RH11 DIAGNOSTIC
02-MAY-78 10:01
CZRHBD P11

86%:

BAE

MOV
MoV
MOV
MOV
MOV
MoV
MOV

aRHBAE ,BAE

1%:

167130

18%:

(s3
86$

dRHCS3,CS3
@RHCSZ2,(S2
@RHST ,DS1
aRHER ,ER1
aRHTDB, TDR

aRHMR2,
T(

BIT

ggR.aRHCSZ

ERROR
CMP
BEQ

MOV
MOV

001162
167154

87%

CLR
CLR

ERROR
JSR

MoV
MOV

CLR
BIT
BNE

?QEGO.SRHDB
aRHDB,
DB

EB.STMP1

R7 ,WATBIT
#0AB, SREGO
$REGO,aRHDB
BITCNT
#OR,3RHCS2
OABTST

SEQ 0055

JYES,GO TO ALTERNATE BIT PATTERN TEST

:NO

2 INCREMENT LOOP COUNTER

sSET UP BIT PATTERN TEST
;SET BITS IN REGISTER
;CLEAR BIT COUNTER
;1S OR SET
JBIT IS SET
JCOUNT UP

;NOT FINISHED COUNTING
;GET READY TO DO IT AGAIN
;IS IT SET YET?
S YES
sCOUNT UP
;BIT IS NOT GOING TO SET
2SAVE RHCS1
;SAVE WORD COUNT

;SAVE BUS ADDRESS

;IS IT AN RH1
;NO IT'S A 70
;CLEAR BAE
;CLEAR (CS3
s CONT INUE
:SAVE BUS ADDRESS EXTENSION
;SAVE RHCS3
sSAVE (S2
;SAVE TESTER STATUS
;SAVE ERROR REGISTER
;SAVE TESTER DATA REG.
:SAVE MR2 TESTER REG.
;1S OUTPUT READY ?
JYES CONTINUE TEST
;OUTPUT READY DIDaNOT SET
;ARE CORRECT BITS SET?
JYES,CONTINUE TESTS
;SAVE CONTENTS OF REGISTER
;SETUP FOR WATBIT TEST
sNO,CORRECT BITS ARE NOT SET
;GO TO WATBIT PROGRAM
sSET UP OPPISITE ALTERNATE BIT PATTERN TEST
JSET BITS IN REGISTER
;CLEAR BIT COUNTER
;1S OR SET
;BIT IS SET

2834
2835
2836
2837
2838
2839
2840
2841
2842
2843
2844
2845
2846
2847
278
2o~9
2850
2851
2852
2853
2854
2855
2856
2857
2858
2859
2860
2861
2862
2863
2864
2865
2866
2867
2868
2869

014212
014216
014220
014224
014232
014234
014240
014242
014244
014244
014244
014252
014260
014266
014270
014272
014276
014302
014306
014314
014322
014330
014336
014344
014352
014360
014366
014370
014372
014400
014406
014410
014416
014420
014424
014430

005237
001371
005037
032777
001004
005237
001401
000770

RHDB BIT TEST

T15

003446

003446
000200

S
E
02-MAY-78 10:03

MACY11 30A(1052)

MASSBUS RH70 AND RH11_DIAGNOSTIC
CZRHBD .P11
02-MAY-78 10:01

167106

167060
167054
167050

005037
005037
000137
017737
017737
017737
017737
017737
017737
017737
032777

003416
003424
014322
167046
167042
167012
167006
167002
167000
166760
000200

017737
023737

166754
001162

003426
003426

013737

003426

001200

004737
004737
004737

046354
006572
050202

003420
003444

BITCNT

INC
BEQ
BR

BITCNT
OABTST

BNE
CLR
BIT
BNE

19%:

003446

017737
017737
017737
005701

INC

OABTST:
MYSTIC:

aSRHW( ,W(
aRHBA ,BA
R1

cs3

86%

aRHBAE ,BAE
@dRHCS3,CS3

MOV

aRHCSZ2,(S2

MOV
MOV
MOV

@RHST ,DS1
@RHER,ER1
aRHTDB, TDR

BNE

MOV
BIT

166752

2%:

ERR11:

JSR

AR AR

J*TEST 16

2879
2880
2881
2882
2883
2884
2885
2886
2887
2888
2889

014434
014436
014444
014452
014454
014456
014464
014472
014500
014504
014512

000004

012777
012777
005701

177777
000007

166666
166666

012777
012777
012777
005037
032777
001015

000000
001204
000061
003446
000200

166674
166642
166630

1$:

166616

18%:

100403

;SAVE TESTER STATUS

;SAVE ERROR REGISTER
;SAVE TESTER DATA REG.
:SAVE MR2 TESTER REG.

;1S OUTPUT READY SET

:YES

;OUTPUT READY DID NOT SET
;SAVE CONTENTS OF REGISTER
;ARE CORRECT BITS SET?
;WAS THERE AN ERROR
;SETUP FOR WATBIT PROG.
;CORRECT BITS ARE NOT SET
;GO TO WATBIT PROGRAM
;CLEAR ERRORS

41
aRHDB, DB
$REGO.DB
ERR1
DB, $TMP1
&
R7,WATBIT
R7,CLEER

R7 ,ERRTST

AR AR RN

RN AN

AN AN RN

NRRA RN

RN RN

AR RN RN

SCOPE

RRRR RN RS

RHWC OPERATIONAL TEST

;*THIS TEST CHECKS THAT WHEN THE WORD COUNT
;*REGISTER IS INCREMENTED IT IS CARRYED TO THE
J*HIGHEST BIT AND IS RETURNED TO ZERO

AR NN R R

TST16:

;SAVE (52

aRHMR?2, TC
#OR,aRHCS?2

ERROR
MOV
CMP
BEQ
MOV
ERROR
JSR
JSR

AR RN

;IS IT AN RH11
JNO IT'S A 70
. CLEAR BAE
;CLEAR (S3
s CONT INUE
sSAVE BUS ADDRESS EXTENSION
;SAVE RH(CS3

BAE

CLR
JMP
MOV
MOV

86%:

;SAVE BUS ADDRESS

87%

CLR

87%:

;SAVE RHCS1
;SAVE WORD COUNT

aRHCST,CS

BEQ

003416
003424
003422
003432
003436
003442
003440

sNOT FINISHED COUNTING
:GET READY TO DO IT AGAIN
;IS IT SET YET?
JYES
s COUNT UP
;BIT IS NOT GOING TO SET

19%

MOV

SEQ 0056

s COUNT UP

18$
BITCNT
#OR,aRH(CS?2
OABTST

MOV
Mov
TST

003414

PAGE 56

AR RRA N

RN R AR AR RN AN

RN RN

AR RN

RRRN AN

MOV
MOV
ST

#-1,3RHWC
#7 ,aRHCS?
R1

;SETUP FOR 1_WORD
JSETUP UNIT 7

MOV

#7ERO, aRHBAE

*SETUP BUS ADDRESS EXTENSION

MoV

#WRITEQ,aRHCST

BM]

MOV

CLR
BIT
BNE

#$STMPS , aRHBA

BITCNT
#RDY ,aRHCS1
6%

YIS IT AN RH11

SYES

*SETUP BUS ADDRESS

;CLEAR BIT COUNTER
;1S RDY SET
;BIT IS SET

MACY11 30A(1052)

MASSBUS RH70 AND RH11 DIAGNOSTIC
CZRHBD P11

2890
2891
2892
2893
2854

2895
2896
2897

02-maY-78 10:01

014814
014520
014522
014526
014534
014536
014542
014544
014546
014546
014554
014562
014570
014572
014574

014600
014604
014610
014616
014624

014632
014640
014646
014654

014662
014670
014672
014676
014700
014706
014710
014714
014716
014722
014724
014730
014736
014740
014744
014746
014752
014760
014762

005237
001371
005037
032777

T16

003446
000200

166574

19%:

003446

017737
017737
017737
005701
001406
005037
005037
000137
017737
017737
017737
017737
017737
017737
017737
032777
001007
005777
001425
022777
001410
005777
001435
005037

104077
004737
023777
001414
005037
104123
000137
023777
001010

166556
166552
166546

003420
003444
003414

6%:

166504

166500
166476
166456

000200

003416
003424
003422
003432
003436
003442

MoV
MOV
MoV
TST

87%:

#RDY ,aRHCS1

6%
BITCNT
6$
19%

@RHCS1, (ST
aRHWC ,WC
aRHBA ,BA
R1

2%:

166412

¥
A

166370

3%:

R7 ,WHYFO
$TMP3,aRHTDB
5%
$REGO
123

8%
$TMP3 ,aRHTDB
ERROR

014764
014770
014774

000137
005037

015010
001162

014776

000137

015010

015002

104104

JYES

;COUNT UP
;BIT IS NOT GOING TO SET

;SAVE RHCS1

:SAVE WORD COUNT
;SAVE BUS ADDRESS

JYES
JYES

:YES,SEE IF DATA WAS WRITTEN
;DID WC INCREMENT ?

001162

015010
001204

:GET READY TO DO IT AGAIN
;IS IT SET YET?

;IS IT EQUAL TO OLD

001162

007224
001204

;NOT FINISHED COUNTING

;DOES WC=0

166424

166416

;COUNT UP

aRHW(

€S3
86%

3RHMRZ2,
TC

166440

SEQ 0057

#RDY ,8RH(CS1

BAE

aRHER ER1
aRHTDB, TDR

003440

PAGE 57

;1S IT AN RHI1
JNO IT'S A 70
. CLEAR BAE
;CLEAR (S3
;CONTINUE
;SAVE BUS ADDRESS EXTENSION
:SAVE RHCS3
;SAVE (S2
;SAVE TESTER STATUS
;SAVE ERROR REGISTER
;SAVE TESTER DATA REG.
;SAVE MR2 TESTER REG.
;1S READY SET

87%

@®RHCS3,(CS3
@aRHCS2,(CS2
@RHST,DS1

166434
177777

BITCNT
18$
BITCNT

aRHBAE ,BAE

86%:

104102

104103

BNE
CLR
BIT
BNE
INC
BEQ

BEQ
CLR

003416
003424

14624
166544
166540
166510

RHWC OPERATIONAL TEST
INC

003446

F
5
02-MAY-78 10:03

5%:

7%:

CLR
ERROR

7%
102

8$
$REGO
103

JMP

ERROR

104

JYES,EXIT TEST
;SETUP GOOD DATA
JRDY DID NOT SET, WC DID NOT CLEAR
;ARE ANY ERROR BITS SET
:WAS INFO WRITTEN TO TESTER
JINFO WAS WRITTEN TO TESTER
JSETUP GOOD DATA
:WRITE OPERATION DID NOT WORK
;RH DID NOT START OPERATION
JRDY BIT NOT

SET

;INFORMATION WAS WRITTEN TO TEST DB

;SETUP GOOD DATA
;DURING A WRITE CPERATION RDY
;DID NOT SET, WC DID NOT INCREMENT
;BUT CORRECT INFO DID GET WRITTEN
;TO TESTER

;RDY BIT DID NOT SET AFTER

A WRITE OPERATION, WC WAS INC

JAND INF WAS NOT WRITTEN TO
;TESTER

MACY11 30A(1052)

MASSBUS RH70 AND RH11_DIAGNOSTIC
CZRHBD P11
02-MAY-78 10:01
2946

2947
2948
2949

015004
015010
015014

004737
004737
004737

007224
006572
050202

02-MAY-78

T16

RHWC OPERATIONAL TEST

8%:

JSR
JSR
JSR

10:03

PAGE 58

SEQ 0058

JWAS AN ERROR SET
;CLEAR ERRORS
;WAS THER ANY ERRORS

R7 ,WHYFO
R7.CLELR
R7 ,ERRTST

BE22322322322322222
3233333332233 23823282233 323232223220 d02020222020 2000t ddtdl

2950
2951

J*TEST 17

RHBA OPERATIONAL

TEST

;*THIS TEST CHECKS THAT THE BUS ADDRESS REGISTER

2952
2953
2954
2955

;*WILL CARRY THROUGH TO THE HIGHEST BIT
;*IN THE BUS ADDRESS EXTENSION REGISTER OR BIT A17
;*IN THE RHCS1 REGISTER AFTER IT IS INCREMENTED

';ttttttttttttittfitttt*'t'*itQtkttt*ttittttfi'ttt*tfiltttttttlttttt

015020
015022

015030

015032
015034
015042
015050
015056
015060
015062

015070
015072
015100

015100
015104

015112
015114
015120
015122
015126

015134
015136
015142
015144
015146
015146
015154
015162
015170
015172
015174
015200
015204
015210
015216
015224
015232
015240
015246
015254

015262
015264
015266
015274

000004

012737
005701
100403
012777
012777
012777
005701
001404
012777
000403
112777

000001

001212

000037

177776
177777

166316
166264
166254

000461

166240

000061

166230

005037
032777
001015
005237
001371
005037
032777
001004
005237
001401
000770

003446
000200

017737
017737
017737
005701
0014606
005037

166156
166152
166146

166216

TST17:

1%:

ggg:

18%:

166174

19%:

003446

003416
003424
015224

#1,8TIMES

TST
BMI
MOV
MOV
MOV
TST
BEQ

R1
18
#37 ,8RHBAE
#177776,3RHBA
#-1,3RHW(
R1
348

;IS IT AN 11 OR A 70
;I1T'S AN RH1
;SETUP BAE IN RH70
;SETUP BA
;SETUP WORD COUNT
;1S IT A RH70
cYES

MOVB

MIRITEQ,aRHCST

JTELL

MOV
B8R

003420
003444
003414

166144
166140
166110
166104
166100
166076
166056

003416
003424
003422
003432

001000

166034

003436
003442
003440

87%:

86%:

#ATS'WR]ITEOD,aRHCST
358

ITERATION

STELL IT TO WRITE
:SKIP OVER 70 CODE
IT TO WRITE

BITCNT
#RDY ,aRH(CS1
23

;CLEAR BIT COUNTER
;1S RDY SET
;BIT IS SET

BNE
CLR

18%
BITCNT

:GET READY TO DO IT AGAIN

INC

BITCNT

19%

BIT
BNE

BITCNT

#RDY ,aRHCS1
2%

JCOUNT UP

:NOT FINISHED COUNTING
JIS IT SET YET?
;YES

;COUNT UP

pd 3

;BIT IS NOT GOING TO SET

MOV
MOV
MOv
TST
BEQ
CLR
CLR
JMP
MOV

aRHCS1,CS1
BRHW( ,W(
aRHBA ,BA
R1
87%
BAE
(S3
86$
aRHBAE ,BAE

:SAVE RHCS1
:SAVE WOR[D COUNT
;SAVE BUS ADDRESS
;1S IT AN RH11
:NO IT'S A 70
;CLEAR BAE
:CLEAR (S3
;CONT INUE
;SAVE BUS ADDRESS EXTENSION

MOV
MOV
MOV

aRHST,DS1
aRHER,ER1
aRHTDB, TDR

:SAVE TESTER STATUS
;SAVE ERROR REGISTER
:SAVE TESTER DATA REG.

B8EQ
2%:

::D0 1

CLR
8IT
B8NE
INC

003446
003446
000200

SCOPE

MOV

MOV
MOV

MOV
TST
8EQ
BIT
BNE

@RH(CS3,CS3
®RH(CS2,(S2

SRHMRZ, T(
R1
12%
#A17,3RHCST
(3

;SAVE RH(CS3
;SAVE (S2

:SAVE MR2 TESTER REG.
;IS IT AN11 ORA 70
;D0 RH7Q PART OF TEST
:DID A17 GET SET
S YES

3002
3003

T17

000137
022777
001414
022777
001420
005777
001425

015410
000040

166050

000037

166040

004737
000137
005777
001443

007224
015426

004737
000137

007224
015456

004737
000137

007224
015456

015376
015402
015404
015410
015416
015420

000137

015456

015422
015426
015432
015434
015436
015442
015444
015446

000137
005777
001403
104112
000137
005701
100403

015456

015450
015454

000137

015456

015456
015462

004737
004737

006572
050202

015276
015302
015310
015312
015320
015322
015326
015330
015332
015336
015342
015346
015350
015352

015356
015362
015364
015370
015374

104105

104112

104106

104107

104110
000137

033777
001003
1041M

12%:

166032

4%:

3%:

6%:

SEQ 0059

;CONT. FOR RHT

43
#37 ,aRHBAE
3%

;BAE INCREMENTED
;1S BAE OLD VALUE
:BAE DID NOT INCREMENT

105
figinYFO

;BAE GOT MESSED UP DOING A WRITE
:DID AN ERROR OTHER THAN NEM CAVSIT

TST
BEQ
ERROR
JSR
JMP
ERROR
JSR

aRHBA
8%

;DID BA INCREMENT ?
JYES LEXIT TEST

ERROR

107

JEXIT TEST

CMP

#40 ,3RIBAE

TST
BEQ

oRHBAE
9%

BEQ
MP
BEQ

JMP

;1S BAE ZERO
JBAE IS ZERO

;BA DID NOT INCREMENT
;WAS AN ERROR BIT SET
JEXIT TEST
;BAE DID NOT INCREMENT
;WAS AN ERROR BIT SET

112
R7 .WHYFO
8s
106
R7 ,WHYFO

JMP

;DID BAE INC

:BAE INCREMENTED OK BUT A17 +
:A16 DID NOT INC PROPERLY IN RHCS1

SEXIT TEST
JRHBAE IS ZERO

8IT
BNE

A16,3RHCST
108

:BIT S IN BAE SHOULD BE SET
;IS A 16 SET
;YES, BA DID NOT INCREMENT
:?1% DID NOT SET WHEN BA WAS

JMP
TST

8%
aRHBA

SEXIT TEST
;DOES BA =0

13%:

JMP
ERROR

83
113

;BA INCREMENTED BUT IT DID NOT

8%:

JSR

R7,.CLEER

5%:

11%:

104076
104113

PAGE

8s
110

10%:

015456

10:03

JMP

ERROR

165702

JMP
ERROR

9% :
165712

02-MAY-78

RHBA OPERATIONAL TEST

ERROR
JSR

165766

015456
000400

MACY11 30A(1052)

MASSBUS RH70 AND RH11 DIAGNOSTIC
CZRHBD.P11
02-MAY-78 10:01

BEQ
ERROR
JMP
TST
8M]
ERROR

1%
112
8s
R1
13%
76

JSR

AR AR

2IN

JYES, BA INCREMENTED
;BA DID NOT INCREMENT
SEXIT TEST
IS ITA70 0R 1
;GO TO CORRECT ERROR
;BA INCREMENTED BUT DID NOT
;CARRY TO BAE
;GET OUT OF TEST

:CARRY OVER TO A17 + Al6
;CLEAR ERRORS

R7 ,ERRTST
AR

AR R

;WAS THERE ANY ERRORS

E RN R

R AR AR RN RAR AR AR

NN RN

RN RN RN

NEM,TRE,SC BIT TEST
s*TEST 20
;*THIS TEST WILL CHECK THAT NON EXISTING MEMORY
JWILL SET THE TRE AND SC BIT IN RHCS! REGISTER
232222323

015466
015470
015472
015474
015502

000004
005701
001404
013777
000403

015504
015512
015514

012777
005701
100403

TST20:

003362

165632

177702

165622

40%:

418:

RR RN

3333222322223 8223282 3220220 RRdRRRRRRRtRRRRRtaRRRR
Rl

SCOPE
TST

BEQ
MoV
BR

408
RHCS3,aRHBA
413

MoV

#177702 ,3RHBA

TST
8MI

R1
9%

:SET UP BUS ADDRESS

:1S IT AN RH70
;NO SKIP RH11 PORTION

MASSBUS RH70 AND RH11 DIAGNOSTIC

CZRHBD.P1

02-mMaY-78 10:01

3058
3059

015516
015524

012777
012777

3061
3062
3063
3064
3065
3066
3067
3068

015540
015546
015552
015560
015562
015566
015570
015574

012777
005037
032777
001015
005237
001371
005037
032777

3060

3069
3070

3071

3072

3073

015532

015602
015604

015610

015612

015614

012777

001004
005237

001401

000077
177777

165634
165600

001471
003446
000200

165562

000007

165600

000200

003422

3076

015630

042737

027777

001162

017737
017737
017737
005701
001406
005037
005037
000137
017737
017737
017737
017737
017737
017737
017737
032777
001003
104102
004737

165466
165462
165456

3077
3078
3079
3080
3081

3082

3083

3084
3085
3086
3087
3088
3089
3090
3091

3092

3093
3094
3095
3096
3097
3098
3099
3100
3101
3102
3103
3104

3105

3106
3107
3108
3109

3110
3111
3112

3113

015622

015636
015644
015652
015660
015662
015664
015670
015674
015700
015706
015714
015722
015730
015736
015744
015752
015760
015762
015764

015770
015776
016000
016006
016010
016016
016020
016026

016030

016032
016034
016042
016044

016052
016060
016066

016074

017737

032777
001016
022737
001460
032737
001060
032737
001060

;SET UP BAE REGISTER
;SET WORD COUNT TO ONE WORD

MOV
CLR
BIT
BNE
INC
BNE
CLR
BIT

#A16!A17'READO,@RHCST
BITCNT
#RDY,3RHCST
DELTA
BITCNT
18%
BITCNT
#RDY ,3RHCS1T

TELL IT TO READ
JCLEAR BIT COUNTER
;1S RDY SET
;BIT IS SET
s COUNT UP
JNOT FINISHED COUNTING
;GET READY TO DO IT AGAIN

BEQ

DELTA

;BIT IS NOT GOING TO SET

003446

165520

3075

#77 ,8RHBAE
#-1,aRNWC

19%:

017737

165502

DELTA:

001162

003420
003444
003414

003416

003424
003422

000200

003432
003436
003442
003440
165350

007224
004000

165342

140000

001162

040000

001162

100000

001162

165406

165366

87%:

86%:

99%:

104005

140000

001162

020000

004124

012737

000000

004132

012737

BNE
INC
BR

173400
174000

030175

004126
004130
004134

18:

#7 ,aRHCS?2

DELTA
BITCNT
19%

;SET UNIT NUMBER

;IS IT SET YET?
JYES
s COUNT UP

MOV

aRH(CS2,CS2

BIC

#GO!1E'RDY'!A16'A17!PSEL
!DVA!MCPE !READG, SREGO

MOV
MOV
MOV
TST
BEQ
CLR
CLR
JMP
MOV
MOV
MoV
MOV
MOV
MoV
MOV
BIT
BNE
ERROR
JSR

@RHCS1,$REGO

@RHCS1,CS1
3RHWC ,W(
aRHBA,BA
R1
87%
BAE
cS3
86%
@aRHBAE ,BAE
@RHCS3,CS3
@RH(CS2,CS?2
@RHST,DS1
aRHER,ER1
@RHTDB, TDR
aRHMRZ2, T(
ARDY ,aRHCS1
99%
102
R7 ,WHYFO

;SAVE CONTENTS OF RHCS?2

;SET UP NEEDED BITS ONLY
;CLEAR BITS NOT NEEDED
sSAVE RHCS1
s SAVE WORD COUNT
:SAVE BUS ADDRESS
;IS IT AN RHI

:NO IT'S A 70
;CLEAR BAE

;CLEAR (S3
s CONTINUE
;SAVE BUS ADDRESS EXTENSION
;SAVE RHCS3
sSAVE (S2
;SAVE TESTER STATUS
;SAVE ERROR REGISTER
;SAVE TESTER DATA REG.

;SAVE MR2 TESTER REG.

HNEM,aRHCS?
1%
#SC!TRE,$REGO
2%
#TRE ,SREGO
3s
#SC,$REGO
43

;IS READY SET
JYES CONTINUE TES)
JREADY NOT SET
;ANY ERRORS SET
;1S NEM SET
JYES CHECK TRE AND SC
;1S THE SC AND TRE BITS SET
;YES NEM IS IN ERROR
;1S JUST THE TRE BIT SET
:TRE BIT MUST BE IN ERROR
;1S JUST THE SC BIT SET
;SC BIT SET ERRONIOUSLY

BR
cMP
BNE
MOV

8%
#SC!TRE,$REGO
22%
AMCPE ,$(S1

;SET UP TO TEST AGAIN
;1S SC AND TRE SET
sFIND THE ERROR
;TEST FOR SHORTS

MOV

#0,8ST

BIT
BNE
cMP
BEQ
BIT
BNE
BIT
BNE

ERROR

000467
022737
001030
012737

012737
012737

MOV

003416

003424
015714
165454
165450
165420
165414
165410

PAGE 60

MOV
MoV

165526

015614

10:03

9%:
18$:

3074

NEM,TRE,SC BIT TEST

165550

000770

02-MAY-78

120

003446
003446

MACY11 30A(1052)

MOV
MOV
MOV

JNEM NOT SET IN RHCSZ2

#MPE ! MXF ! PGE !NED ! UPE 'WCE !DLT,$CS?2
#MJCELO!WCEHi .DPELO!DPEHI !APE ,$CS3

#ILF!RMR!CPE'!DPE 'RMBEX'RFAIL!DTE!OP],S$ER

SEQ C060

3116
3115
3116
3117
3118
3119
3120
3121
3122
3123
3124
%}gg

016102
016110
016114
016120
016124
016132
016134
016142
016144
016146
016150
016152

012737
004737
005037
000137
032737
001022
032737
001022
104006
000421
104007
004737

3127
3128
3129
3130
3131
3132
3133
g}gé

016156
016160
016162

000415
104010
004737

016166
016170

016172

000411
104011

004737

3136
3137
3138
3139
3140
3141
3142
3143
3144
3145
3146
3147
3148
3149
3150
3151
3152
3153
3154
3155
3156
3157
3158
3159

016176
016200
016202
016206
016210
016212
016220
016222
016226
016230
016236
016244
016246
016250
016254

000405
104012
004737
000401
104013
032737
001003
105737
001010
112777
032777
001401
104050
004737
004737

3160
3161
3162
3163
3164
3165
3166
3167
3168
3169

NEM,TRE,SC BIT TEST

120

177777
007224
004122
016212
040000

004122

100000

001162

Mov
JSR

BEFORE
8%
#TRE , SREGO
6%
#SC,$REGO
7%
6
8%
7
R7 ,WHYFO

3s:

BR
ERROR
JSR

8%
10
R7 ,WHYFO

4%:

BR
FAROR
JSR

8%
11
R7,WHYFO

BR
ERROR
JSR
BR
ERROR

8%
12
R7 ,WHYFO
8s
13

22%:

0072264

007224

6%:

007224
177570

7%:

8%:

001103
000100
004000

21$:

006572
050202

9%:

BIT
BNE
TST8
BNE
movs
81T
8EQ
ERROR
JSR
JSR

PAGE 61

#-1,BEFORE
R7 ,WHYO

CLR
JMP
BIT
BNE
BIT
BNE
ERROR
BR
ERROR
JSR

2%:

007224

041400

5
J
02-MAY-78 10:03

MACY11 30A(1052)

MASSBUS RH70 AND RH11 DIAGNOSTIC
02-MAY-78 10:01
CZRHBD.P11

sJTELL WHYFO ITS FOR SHORTS
;TEST FOR SHORTS
;WE HAVE CHECKED FOR SHORTS
JLEAVE THE TEST
JTHEN IS THE TRE BIT SET
;SC BIT DID NOT SEE TRE BIT
;1S THE SC BIT SET
;TRE HAS AN OPEN GOING TO BUS
JTRE SET LOGIC NOT WORKING
JSET UP TO TEST AGAIN

;NEM HAS OPEN IN LINE GOING TO BUS
;SEE IF ANY OTHER ERROR BIT IS
;SET OTHER THAN NEM
;SET UP TO TEST AGAIN
;SOMTHING WRONG WITH TRE BIT
;SEE IF AN ERROR BIT IS SET
;OR BOTH NEM IN RHCS2 AND SC IN
;RHCS1 HAS AN OPEN BETWEEN IT AND THE BUS
JSET UP TO TEST AGAIN
;SC BIT WAS SET BY EITHER ATTN OR
JFIND WHAT ERROR BIT IS SET

JMCPE ERROR OR SC IS SHORTED TO +5 VOLTS

#SW14!SW9!SW8,a#177570
21%
$ERFLG
9%
#TREB,IRHCS1B
ANEM,aRH(CS2
9s
50
R7,CLEER
R7 ,ERRTST

RRRNRA R AR

AR RTRAE RN

SEQ 0061

RA R AR

;SETUP TO TEST AGAIN
;TRE WAS SET BY OTHER THAN NEM
;FIND ERROR BIT THAT SET TRE
;SETUP TO TEST AGAIN
;TRE HAS AN OPEN GOING TO THE BUS

;ANY LOOPING BEEING DONE
JYES,LOAD TRE NO MATTER WHAT
:WAS THERE AN ERROR
;SKIP TRE CHECK
;LOAD TRE

;DID ERROR CLEAR

JYES EXIT TEST
JLOADING TRE DID NOT CLEAR ERROR
;SEE IF ERRORS ARE CLEARED

RN R

AR RN R RNR AR AR

AN KRR

WCE,TRE,SC BIT TEST
J*TEST 21
;*THIS TEST WILL CHECK THAT TRE AND SC SET
S

016260
016262
016270
016276
016300
016302
016310

016316
016324
016332
016336
016344

000004
012777
012777
005701
001003
012777
012777

012737
012777
005037
032777
001015

177777
000007

000000
001172
052525
000061
003446
000200

165042
165042

165050
165016
001172
164776
164764

;*WHEN A WRITE CHECK ERROR OCCURS (WCE)

2223232223232

7ST21:

MOV
MOV

TST

9%:

3223323333238 2322 2223222832222

22t

;ONE WORD TRANSFER
;7O UNIT ONE

#RDY ,aRHCS

;IS RDY SET

CLR

BNE

WCETST

BIT

23 2022

#-1,8RHW(
#7 ,8RHCS?

R1
os
#ZERO,3RHBAE
#SREG4 ,aRHBA
#AB , SREG4
#JRITEOD,aRH(CS
BITCNT

BNE
Mov
MOV
MOV

MOV

18%:

2832182

SCOPE

Rttt S

;IS IT AN RH70
sNO .
;SETUP RHBAE REGISTER
;SETUP BUS ADDRESS
;CREATE INFORMATION
JTELL IT TO WRITE
;CLEAR BIT COUNTER
;BIT IS SET

MACY11 30A(1052)

MASSBUS RH70 AND RH11_DIAGNOSTIC

CZRHBD.P11
3170
nn
3172
3173
3174
3175
3176
3177
3178

02-MAY-78 10:01

016346
016352
016354
016360

3179

3180
N
3182

3183

3184
3185
3186
3187
3188
3189
3190
3N
3192

3193

3194
3195
3196
3197
3198
3199

016446

005237
001371
005037
032777
001004
005237
001401
000770

003446

052777
005037
005237
001375
012777
005037
032777
001015
005237
001371
005037
032777

000040
003446
003446

164732

000007
003446
000200

164712

005237
001401
000770

003446

032777
001003

000200

001004

003446
000200

19%:

003446
WCETST:

17%:

164670

003446
003446
000200

007224
177777
001172

125252
000051
003446
000200

164646

164626

164612
164606

CLR
BIT
BNE
INC
BEQ
BR

BIS
CLR
INC
BNE

MoV

18%:

19%:

CLR
BIT
BNE
INC
BNE
CLR
BIT
BNE
INC
BEQ

WCTST:

017737
017737
042737
017737
017737
017737
005701
001406
005037

003446
000200

003422
001162
001162

164472

003420
003444
003414

003416

aRHCS?2

dRHCS?2

#RDY ,aRHCS1
WCTST
BITCNT
18%
BITCNT
#RDY ,3RH(S1
WCTST
BITCNT
WCTST
193

aRHCS1
WHYFO

19%:

BITCNT
18$
BITCNT
#RDY ,aRHCS1

WCETRE

BITCNT

164524
164506

164466
164462

#40,
BITCNT
BITCNT
17$
N,
BITCNT

18%:

003446

027777

19%

#WRCHO,aRHCST
BITCNT
#RDY ,8RH(S1

164566

164532

BITCNT

WCETST

#-1,aRHW(C
#SREGS ,aRHBA
#0AB, SREG4

003446
032777
001004
005237
001401
000770

WCETST

208
102
R7,

208:

WCETRE
19%

WCETRE:

10:03

BITCNT
18%
BITCNT
#RDY ,3RHCS1

#RDY,

001172
164554

WCE,TRE,SC BIT TEST

INC
BNE

164742

02-MAY-78

PAGE 62

SEQ 0062

;COUNT UP
:NOT FINISHED COUNTING
;GET READY T0O DO IT AGAIN
;1S IT SET YET?
:YES
JCOUNT UP
;BIT IS NOT GOING TO SET
;DO A CONTROLER CLEAR
;SET UP FOR DELAY
;COUNT UP

JSELECT UNIT #
;CLEAR BIT COUNTER
;IS RDY SET
JBIT IS SET
;COUNT UP

;NOT FINISHED COUNTING

;GET READY TO DO IT AGAIN
;IS IT SET YET?
:YES
;COUNT UuP
;BIT IS NOT GOING TO SET
;1S READY SET
JYES

JREADY NOT SET
JANY ERRORS

SET

;RESET WORD COUNT

JRESET BUS ADDRESS
;CREATE WRITE CHECK ERROR
:MAKE THE ERROR
;CLEAR BIT COUNTER
;1S RDY SET
;BIT IS SET
cCOUNT UP
;NOT FINISHED COUNTING
;GET READY TO DO IT AGAIN
;IS IT SET YET?
JYES
;COUNT UP
;BIT IS NOT GOING TO SET

@RHCSZ2,CS2
;SAVE CONTENTS
ARHCS1,$REGO
;SET UP NEEDED BITS ONLY
#GO!IE'RDY!A16!A17
!PSEL !DVA!MCPE !READ6, SREGO
MOV

aRHCS1,CS1

TST

aRHWC ,W(
aRHBA ,BA
R1

CLR

BAE

BEQ

87%

;CLEAR BITS NOT NEEDED
sSAVE RHCS1
;SAVE WORD COUNT
:SAVE BUS ADDRESS
;IS IT AN RH11
:NO IT'S A 70
;CLEAR BAE

3226
3227

003424
016710
164460
164454

016664
016670
016674
016702
016710
016716
016724
016732
016740
016746
016754
016756
0°6760
016764
016772
016774
017002
017004
017012
017014
017022
017024
017026
017030
017036
017040
017046
017054
017062
017070
017076
017104
017110
017114
017120
017126
017130
017136
017140
017142
017144
017146
017152
017154
017156

164424
164420
164414
164412
164372
000200

003416
003424
003422
003432
003436
003442
003440
164354

87%:
86%:

aRHMR?2,
TC

#RDY ,@RHCS1

000405

104017

004737
000401

99%
102
R7 ,WHYFO
qgcs.anncsz

001162

#TRE ,$REGO

100000

001162

#SC,$REGO
43
14

001162

020000

004124
004126
004130
004132
004134
004122

007224

017172
017174
017176
017202

@RHST,DS1
aRHER,ER1

040000

100000

004737

dRHCS3,CS3
@RHCS2,CS2

ggC!TRE.sREGO

004132
004134
177777
007224
004122
017206
040000

000411
104011

aRHBAE ,BAE

001162

140000

007224

001162

PAGE 63

€S3
86%

140000

137400
160000

017162
017164
017166

WCE,TRE,SC BIT TEST

aRHTDB, TDR

840506 164346 99%:

000415
104016
004737

L S
02-MAY-78 10:03

MACY11 30A(1052)

MASSBUS RH70 AND RH11_DIAGNOSTIC
02-MAY-78 10:01
CZRHBD.P11

1%:

#SC!TRE ,$REGO

229

SEQ 0063

;CLEAR (S3

; CONTINUE
:SAVE BUS ADDRESS EXTENSION
:SAVE RHCS3
;SAVE (S2
;SAVE TESTER STATUS
;SAVE ERROR REGISTER
;SAVE TESTER DATA REG.

:SAVE MR2 TESTER REG.
;IS READY SET
JYES CONTINUE TEST
;READY NOT SET
;ANY ERRORS SET

;1S WCE SET
JYES CHECK TRE AND SC
;1S THE SC AND TRE BITS SET
;YES WCE IS IN ERROR
;1S JUST THE TRE BIT SET
:TRE BIT MUST BE IN ERROR
;1S JUST THE SC BIT SET
:SC BIT SET ERRONIOUSLY
;WCE NOT SET IN RHCS2

;SET UP TO TEST AGAIN
;IS SC AND TRE SET
;FIND THE ERROR

JTEST FOR SHORTS
#MPE 'MXF ! PGE !NEM!NED !UPE !DLT,$CS2
AMCPE ,$CS1

#DPELO!DPEHI !APE,$(CS3
$ST,8ST
$ER,SER

#-1,BEFORE
R7 ,WHYFO
BEFORE

22%:

001162

2%:

3%:

4%:

6%:

#TRE ,$REGO
6%
#SC,SREGO
7%
6
8$
15
R7,WHYFO

8%
16
R7 ,WHYFO
8%

1
R7 ,WHYFO

8%
17
R7 ,WHYFO
8%

;JTELL WHYFO ITS FOR SHORTS
sTEST FOR SHORTS

;WE HAVE CHECKED FOR SHORTS
;LEAVE THE TEST
sTHEN IS THE

TRE BIT SET

:SC BIT DID NOT SEE TRE BIT
;1S THE SC BIT SET
;TRE HAS AN OPEN GOING TO BUS
;TRE SET LOGIC NOT WORKING

;SET UP TO TEST AGAIN
;WCE HAS OPEN IN LiNE GOING TO BUS
;SEE IF ANY OTHER ERROR BIT IS
;SET OTHER THAN WCE
;SET UP TO TEST AGAIN
;SOMTHING WRONG WITH TRE BIT
;SEE IF AN ERROR BIT IS SET

;OR BOTH WCE IN RHCS2 AND SC IN

sRHCS1 HAS AN OPEN BETWEEN IT AND THE BUS
;SET UP TO TEST AGAIN
:SC BIT WAS SET BY EITHER ATTN OR
;FIND WHAT ERROR BIT IS SET

JMCPE ERROR OR SC IS SHORTED TO +5 VOLTS
:SETUP TO TEST AGAIN
;TRE WAS SET BY OTHER THAN W(CE
;FIND ERROR BIT THAT SET TRE

sSETUP TO TEST AGAIN

MASSBUS RH70 AND RH11 DIAGNOSTIC

CZRHBD.P11
3282
3283
3284

017204
017206
017214

3288
3289
3290
3291
§gg§

017232
017240
017242
017246
017250

3285
3286
3287

MACY11 30A(1052)

02-MAY-78 10:01

017216
017222
017226

104013
032737
001003

105737
001010
112777
032777
001401
104050
004737
004737

041400

177570

T21

WCE,TRE,SC BIT TEST

78:
8S$:

ERROR
BIT
BNE

001103
000100

040000

164132

164100

006572
050202

M5
02-MAY-78 10:03

21$:

98 :

TSTB
BNE
MOVB
BIT
BEQ
ERROR
JSR
JSR

PAGE 64

13
#SW14!5W9!SW8,a#177570
218
SERFLG
98
#TREB,aRH(S1B
#WCE,aRHCS2
98
50
R7.CLEER
R7.ERRTST

SEQ 0064

;TRE HAS AN OPEN GOING TO THE BUS
;ANY LOOPING BEEING DONE
:YES,LOAD TRE NO MATTER WHAT
:WAS THERE AN ERROR
:SKIP TRE CHECK
:LOAD TRE

:DID ERROR CLEAR
SYES EXIT TEST
:LOADING TRE DID NOT CLEAR ERROR
:SEE IF ERRORS ARE CLEARED

3294

:.'lt*ttitttttt.ti'fi*tt'tt'**ttt*ttt*it**t*ttttttttti*ttitttttttt*

3295
3296
3297
3298

TRTEST 22
MDPE ,TRE AND SC BIT TEST
;*THIS TEST CHECKS THAT MDPE CAN BE SET IN
:*RHCS2,AND THAT MDPE SETS TRE AND SC
:«IN THE RHCS1 REGISTER.............

32%

3 ;ttttfit*titttittttttt*ittifit*kfitfitttifittttt*t.tttt*ttttttt*itttt

3300
3301
3302
3303
3304
3305
3306
3307

017254
017256
017264
017272
017274
017276
017304
017312

000004
012777
012777
005701
001003
012777
012777
012777

3309
3310
3311

017326
017334
017340

017737
005037
032777

000007
177774

164054
164040

000000
004100
000071

164054
164022
164010

164006
003446
000200

003422

3308 017320 012777 000027
3312
3313

3314
3315

3316
3317
3318
3319
3320
3321
3332

3323
3324
3325

3306

3307
3328
3329
3330

3331
3332
3333

333
3335
3336
3337

017346
017350

017354
017356

017362
017370
017372
017376
017400
017402
0176402

017410

017416
017424
017432
017440
017442
017444

017450
017454

017460

017466
017474
017502
017510

001015
005237

001371
005037

163762

003446
000200

017737

042737

163722

027777

001162

017737
017737
017737
005701
001406
005037

163706
163702
163676

003420
003444
003414

017737
017737
017737
017737

163740

18%:

19%:

UPETRE:

001162

163674

163670
163640
163634
163630

#7 ,8RHCS2
#-4 , aRHWC
R
98
#ZERO, BRHBAE
#RBUF , aRHBA
#READQ, aRHCS1

;SET UNIT #
:SET UP WORD COUNT
;1S IT AN RH70
INO ITS AN RH11
:SET UP BAE REGISTER
:SET UP BUS ADDRESS
:TELL IT TO READ

MOV
CLR
BIT

aRHCS2,CS2
BITCNT
#RDY , BRHCS1

:SAVE CONTENTS
:CLEAR BIT COUNTER
:1S RDY SET

BNE
INC

BIT
BNE
INC
BEQ
BR

MOV

@RHCS1, SREGO

BNE
CLR

MOV
MOV
MOV
TST
BEQ
CLR

CLR

003416

003424
003422
003432
003436

87%:

86%:

#PAT ! 7 ,@RHCS?2

UPE TRE
BITCNT
18$
BITCNT
#RDY ,@RHCS1
UPE TRE
BITCNT
UPE TRE
198

BIC

003416

003424
017474

SCOPE
MOV
MOV
TST
BNE
MOV
MOV
MOV

MOV

003446

017737

9%:

164012

032777
001004
005237
001401
000770

005037
000137

1$T22:

JMP
MOV
MOV
MOV
MOV
MOV

: INVERT PARITY
:BIT IS SET
:COUNT UP

:NOT FINISHED COUNTING
:GET READY TO DO IT AGAIN
:IS IT SET YET?
SYES
:COUNT UP
:BIT IS NOT GOING TO SET

;SET UP NEEDED BITS ONLY
#GO'1E {RDY'A16'A17!PSEL
'DVA!MCPE 'READ6 , SREGO
:CLEAR BITS NOT NEEDED
@RHCS1,CS1
:SAVE RHCS?
SRHWC , WC

aRHBA ,BA
R1
87
BAE

CS3

86$
aRHBAE , BAE
@RHCS3.CS3
aRH(S2,CS2
@RHST,DS1
aRHER,ER1

:SAVE WORD COUNT

:SAVE BUS ADDRESS
:1S IT AN RH11
INO IT'S A 70
:CLEAR BAE

:CLEAR (S3
: CONTINUE

:SAVE BUS ADDRESS EXTENSION

*SAVE
;SAVE
*SAVE
;SAVE

RHCS3
(S2
TESTER STATUS
ERROR REGISTER

MASSBUS RH70 AND RH11 DIAGNOSTIC

CZRHBD.P11
3338

3339

3340
3341
3342
3343
3344
3345
336
3347
3348
3349
3350
3351
3352
3353
3354
3355
3356
3357
3358

3359
3360

3361
3362
3363
3364
3365
3366
3367
3368
3369
3370
3371
3372
3373
3374
3375
3376
3377
3378
3379
3380
3381
3382
3383
3384
3385
3386
3387
3388
3389
3390
3391
3392

3393

MACY11 30A(1052)

122

02-MAY-78 10:01

02-MAY-78

10:03

MDPE ,TRE AND SC BIT TEST

PAGE 65

;SAVE TESTER DATA REG.

017516

017737

163626

003442

MOV

aRHTDB, TDR

017532
017540
017542
017544
017550
017556
017560
017566
017570
017576
017600
017606
017610
017612
017614
017622
017624
017632
017640

032777
001003
104102
004737
032777
001016
022737
001460
032737
001060
032737
001060
104116
000467
022737
001030
013737
012737
012737

000200

163570

BIT
BNE
ERROR
JSR
BIT
BNE
cMP
BEQ
BIT
BNE
BIT
BNE
ERROR
BR
cMP
BNE
MOV
MOV
MOV

;IS READY SET
#RDY ,@RHCST
99%
JYES CONTINUE TEST
102
SREADY NOT SET
R7 ,WHYFO
;ANY ERRORS SET
MMPE ,3RHCS2
;1S MPE SET
19
JYES CHECK TRE AND SC
#SC!TRE ,SREGO
;1S THE SC AND TRE BITS SET
2%
;YES MPE IS IN ERROR
;1S JUST THE TRE BIT SET
#TRE , SREGO
33
:TRE BIT MUST BE IN ERROR
;1S JUST THE SC BIT SET
#5C,SREGO
43
;SC BIT SET ERRONIOUSLY
116
;MPE NOT SET IN RH(CSZ2
8s
sSET UP TO TEST AGAIN
#SC! TRE ,$REGO
;IS SC AND TRE SET
228
;FIND THE ERROR
$CS1,8CS1
;TEST FOR SHORTS
#MXF ' PGE !NEM!NED ! UPE 'WCE!DLT,$CS2
#WCELO!WCEHI !DPELO!DPEHI !APE ,$CS3

017662
017670
017674
017700
017704
017712
017714
017722
017724
017726
017730
017732

012737
004737
005037
020137
032737
001022
032737
001022
104006
000421
104120
004737

MOV
JSR
CLR
JMP
BIT
BNE
BIT
BNE
ERROR
BR
ERROR
JSR

#-1_BEFORE
R7,WHYFO
BEF ORE
8%
#TRE ,$REGO
63
#5C,SREGO
7%
6
8s
120
R7 ,WHYFO

017524

017646
017654

017737

013737
013737

017736
017740
017742

000415
104121
004737

017746
017750
017752

000411
104011
004737

017756
017760
017762
017766
017770
017772
020000
020002
020006

000405
104122
004737
000401
104013
032737
001003
105737
001010

020010
020016

112777
032777

163606

003440

007224
000400

163562

140000

001162

040000

001162

100000

001162

140000

001162

004124
177000
174000

0046124
004126
004130

177777
007224
004122
017772
040000

004122

004132
004134

100000

99%:

1%:

004132
004134

001162

MOV
MOV

22%:

001162

2%:

007224

0072264

007224

177570

163346
163314

$ST.857
$ER,SER

BR
ERROR
JSR

8%
121
R7 ,WHYFC

4%:

BR
ERROR
JSR

8s
11
R7 ,WHYFO

BR
ERROR
JSR
BR
ERROR
BIT
BNE
1ST8
BNE

8%
122
R7 ,WHYFO
8%
13
#SW14!SWI!SW8,a#177570
21%
$ERFLG
9%

7$:
8$:

001103

000100
000400

aRHMR?2, T(

3s:

6$%:

007224

041400

MOV

218:

MOvB
BIT

#TREB,aRH(CS1B
#MPE , aRHCS?2

;SAVE MR2 TESTER REG.

;TELL WHYFO ITS FOR SHORTS
:TEST FOR SHORTS
:WE HAVE CHECKED FOR SHORTS
;LEAVE THE TEST
;THEN IS THE TRE BIT SET
;SC BIT DID NOT SEE TRE BIT
;1S THE SC BIT SET
;TRE HAS AN OPEN GOING TO BUS
;TRE SET LOGIC NOT WORKING
;SET UP TO TEST AGAIN
:MPE HAS OPEN IN LINE GOING TO BUS
;SEE IF ANY OTHER ERROR BIT IS
;SET OTHER THAN MPE
:SET UP TO TEST AGAIN
;SOMTHING WRONG WITH TRE BIT
;SEE IF AN ERROR BIT IS SET
;OR BOTH MPE IN RHCS2 AND SC IN
JRHCS1 HAS AN OPEN BETWEEN IT AND THE BUS
;SET UP TO TEST AGAIN
;SC BIT WAS SET BY EITHER ATTN OR
;FIND WHAT ERROR BIT IS SET
:MCPE ERROR OR SC IS SHORTED TO +5 VOLTS
;SETUP TO TEST AGAIN
sTRE WAS SET BY OTHER THAN MPE
;FIND ERROR BIT THAT SET TRE
;SETUP TO TEST AGAIN
:TRE HAS AN OPEN GOING TO THE BUS
;ANY LOOPING BEEING DONE
;YES,LOAD TRE NO MATTER WHAT
;WAS THERE AN ERROR
;SKIP TRE CHECK
;LOAD TRE

:DID ERROR CLEAR

SEQ 0065

3394
3395
3396
3397
3398

020024
020026
020030
020034

001401
104050
004737
004737

B 6
02-MAY-78 10:03

MACYT1 30A(1052)

MASSBUS RH7C AND RH11_DIAGNOSTIC
02-MAY-78 10:01
CZRHBD P

122

9% :

006572
050202

MDPE

,TRE AND SC BIT TEST

PAGE 66

SEQ 0066

BEQ

JYES EXIT TEST

JSR

R7,CLEER
R7,ERRTST

;SEE

ERROR
JSR

JLOADING TRE DID NOT CLEAR ERROR
IF ERRORS ARE (LEARED

';tttttttt'.'ttfififit.QQQt"ifit'tQ'ttt..'.t't.'tt't.tt.tttttttttfitt

TRTEST 23

,SC ERROR TEST (RH11)
UPE,TRE

;*THIS TEST CHECKS THE UPE SIT IN RH(S?2
;*TO SEE IF 1T SETS AND WHEN IT SETS IS
;*TRE AND SC BITS SET IN RH(ST.........

BE2222232X233X3 2223232322222

3o NNV

PN LELELELY

3410

3421

1$T23:

020040

000004

020042
020050
020052
020054
020060
020066
020074

012777
005701

000007

163270

000137
012777
017737
042737

020524
020007
163236
027777

163252
001162
001162

020102
020110
020116
020124
020126
020130
020134
020140
020144

017737
017737
017737
005701
001406
005037
005037
000137
017737

163222
163216
163212

003420
003444
003414

020152
020160
020166
020174
020202

020332

100402

017737
017737
017737
017737
017737
017737
032777

013737

003416
003424
020160
163210
163204
163154
163150
163144
163142
163122
000200

003416

003424
003422
003432
003436
003442

FITIT:

87%:
86%:

003440
163104

SCOPE

Rldd)

#7 ,aRHCS2
R1
FITIT
FIT

JSET UP UNIT 7
;IS IT AN RH1M
;IT'S AN RH11,D0 THE TEST
;IT'S AN RH70, EXIT TEST

ARHCS 1, SREGO

*SET UP NEEDED BITS ONLY

MOV
Mov
MOV

aRHCS1T, (ST

s SAVE RHCS1

87%

sJNO IT*'S A 70

cS3
86%
aRHBAE ,BAE
aRH(CS3,CS3
dRHCS2,(CS2
aRHST,DS1
@RHER ,ER1
®RHTDB, TDR
aRHMR2, TC

;CLEAR (S3
s CONTINUE
;SAVE BUS ADDRESS EXTENSION
JSAVE RHCS3
sSAVE (€S2
;SAVE TESTER STATUS
;SAVE ERROR REGISTER
;SAVE TESTER DATA REG.
;SAVE MR2 TESTER REG.

TST
BEQ
CLR
CLR
JMP

MoV

MOV

MOV
MOV
(01"
MOV
BIT
BNE

ERROR
JSR
8IT
BNE
CMP

HUPE ! 7 ,aRHCS?

aRHWC ,W(
aRHBA BA
R1

BAE

#RDY ,aRHCST

99%
102
R7 ,WHYFO

140000

001162

040000

001162

#TRE, SREGO

100000

001162

#SC,$REGO

140000

001162

004124
157400
004130
004132

004124
004126
004130
004132

CMP

SE1 PARITY ERROR IN RH11'S (S2 REG

#GO'1ETRDY'A16'A17
! PSEL 'DVA!MCPE ' READ6, SREGO
:CLEAR BITS NOT NEEDED

163076

1%:

R0 RRdRRRRdR

MOV
TST
B8MI]
JMP
MOV
MoV
BIC

007224
020000

99%:

3222222222222

#UPE ,aRHCS?2

1$
#SC!TRE,$REGO

s SAVE WORD COUNT
;SAVE BUS ADDRESS
;1S IT AN RH11
:CLEAR BAE

;1S READY SET

;YES CONTINUE TEST
;READY NOT SET
;ANY ERRORS SET

;IS UPE SET

;'ES CHECK TRE AND SC
;IS THE SC AND TRE BITS SET

JYES UPE IS IN ERROR

;TRE BIT MUST BE IN ERROR

4%
20
8$

;SC BIT SET ERRONIOUSLY
;UPC NOT SET IN RHCSZ2
;SET UP TO TEST AGAIN

#SC!TRE,SREGO

;1S

JUST THE TRE BIT SET

;1S JUST THE SC BIT SET

;IS SC AND TRE SET

;FIND THE ERROR
22%
$CS1,8$CS1
;TEST FOR SHORTS
AMPE 'MXF ! PGE !NEM!NED !WCE !DLT,$CS2
$CS3,$CS3
$ST.8ST

CZRHBD .P11

UPE,TRE,SC ERROR TEST (RH11)

02-MAY-78 10:01

3450
3451
3452
3453
3454
3455

020340
020346
020354
020360
020364
020370

013737
012737
004737
005037
000137
032737

004134
177777
007224
004122
020456
040000

006134
004122

3457

020400

032737

100000

001162

3462

020416

004737

007224

3466

3471

020426

020436

004737

001162

004737

007224

3478

020456

032737

041400

3480

020466

105737

001103

3482
3483

020474
020502

112777
032777

000100
020000

3486
3487

020514
020520

004737
004737

006572
050202

3489

020524

22%:

3s:

4%:

007226

020446

MOV

2%:

0072264

3475

c
6
02-MAY-78 10:03

¢S§Y11 30A(1052)

MASSBUS RH70 AND RH11_DIAGNOSTIC

6%:

177570

162662
162630

7%:

8%:

21%:

9%:

PAGE 67

$ER,SER

MOV
JSR
CLR

#-1_,BET ORE
R7 ,WHYFO
BEFORE

;TELL WHYFO ITS FOR SHORTS
JTEST FOR SHORTS
;WE HAVE CHECKED FOR SHORTS

BIT
BNE
BIT
BNE
ERROR
BR
ERROR
JSR

#TRE ,SREGO
6%
#SC,SREGO
7%
6
8%
21
R7,WHYFO

8R
ERROR

8%
23
R7.,WHYFO

:THEN IS THE TRE BIT SET
;SC BIT DID NOT SEE TRE BIT
;1S THE SC BIT SET
:TRE HAS AN OPEN GOING TO BUS
JTRE SET LOGIC NOT WORKING
;SET UP TO TEST AGAIN
;UPE HAS OPEN IN LINE GOING TO BUS
;SEE IF ANY OTHER ERROR BIT IS
:SET OTHER THAN UPE
JSET UP TO TEST AGAIN
;SOMTHING WRONG WITH TRE BIT
JSEE IF AN ERROR BIT IS SET

JMP

JSR

BR
ERROR

JSR

B8R
ERROR
JSR
BR
ERROR
8IT
BNE
TST18
BNE
MovB
BIT
BEQ
ERROR
JSR
JSR

JLEAVE THE TEST

:OR BOTH UPE IN RHCS2 AND SC IN

;RHCST HAS AN OPEN BETWEEN IT AND THE BUS

8s
1

;ST UP TO TEST AGAIN
;SC BIT WAS SET BY EITHER ATTN OR

:FIND WHAT ERROR BIT IS SET

R7 ,WHYFO
8%
22
R7 ,WHYFO
8%
13
#SW14!SW9!SW8,a#177570
21%
$ERFLG
9%
#TREB,aRH(CS1B
#UPE ,aRHCS?2
9%
50
R7,CLEER
R7 ,ERRTST

;MCPE ERROR OR SC IS SHORTED TO +5 VOLTS
JSETUP TO TEST AGAIN
:TRE WAS SET BY OTHER THAN UPE
;FIND ERROR BIT THAT SET TRE
;SETUP TO TEST AGAIN
;TRE HAS AN OPEN GOING TO THE BUS
;ANY LOOPING BEEING DONE
JYES.LOAD TRE NO MATTER WHAT
;WAS THERE AN ERROR
;SKIP TRE CHECK
;LOAD TRE
;DID ERROR CLEAR
JYES EXIT TEST
;LOADING TRE DID NOT CLEAR ERROR
;SEE IF ERRORS ARE CLEARED

FIT:

::Qttttt'ttt*tt*fi*t*t*fit*tt*tt*t***i*ti*i*tfififififliitt*tifi.'titfiifii

UPE,TRE,SC ERROR TEST (RH70)
JxTEST 24
;*THIS TEST CHECKS THE UPE BIT IN RH(CS2
;«TO SEE IF IT SETS AND WHEN IT SETS IS
;*TRE AND SC BITS SET IN RH(CS1.........

::tt*tit*ttfitttttitttttt*ttttt!*t**fiittttt*ttfititttfittfifiitittttti

TST24:

3496

020524

000004

3498

020526

012777

000007

3501
3502
3503
3504
3505

020540
020544
020552
020560
020566

000137
012777
012777
012777
012777

021306
000004
177776
000000
001162

PLACE:

SCOPE

MOV
TST
BEQ
JMP
MOV
MOV

#7 ,aRHCS2
R1
PLACE
FANGIE
#IPCK2,dRHCS3
#=2,3RHW(

;SETUP UNIT 7
;1S IT AN RH11
;IT'S AN RH70
;IT'S AN RH11, EXIT TEST
;SETUP FOR PARITY ERROR
;SETUP WORD COUNT TO TWO WORDS

MOV

#$REGO , 3RHBA

;SETUP ADDRESS

MOV

#ZERO, IRHBAE

:SETUP BAE

SEQ 0067

3506
3507
3508
3509
3510
3511
3512
3513
3514
3515
3516
3517
3518
3519
3520
3521
3522
3523
3524
3525
3526
3527
3528
3529
3530
3531
3532
3533

020574
020602
020606
020614

012777
005037
032777
001015

000061
003446
000200

T24

162526

162514

8%:

003446

003446
000200

162472

19%:

003446

017737
042737

162454
027777

001162
001162

017737
017737
017737
005701

1624640
162434
162430

003420
003444
003414

DYNO:

MOV
CLR

BIT
BNE
INC

MIRITEO,dRHCST

BITCNT

#RDY ,3RHCS1

MOV
8IC

3RH(CS1,$REGO

;SET UP NEEDED BITS ONLY

MOV

aRHCST,CS1T

:SAVE RHCS1

87%

JNO IT'S A 70

aRHWC ,W(
@aRHBA ,BA
R1

87%:

007224
020000

162314

99%:

140000

001162

1%
#SC!TRE,SREGO

040000

001162

ATRE ,SREGO

004124
157400
134100
004132

004124
004126
004130
004132
004134
0046122

021240

86%
aRHBAE ,BAE

@RH(CS3,CS3
aRHCS2,(S2
@®RHST,DS1

aRHER,ER1
aRHTDB, TDR

aRHMR2, TC

#RDY ,aRHCS1

;SAVE WORD COUNT
;SAVE BUS ADDRESS
;1S IT AN RH11
:CLEAR BAE

;CLEAR (S3

s CONTINUE
;SAVE BUS ADDRESS EXTENSION

;SAVE RHCS3
;SAVE CS2
;SAVE TESTER STATUS

;SAVE ERROR REGISTER
;SAVE TESTER DATA REG.

;SAVE MR2 TESTER REG.
;1S READY SET

99%
102

JYES CONTINUE TEST
JREADY NOT SET

#UPE ,@RHCS?2

;IS UPE SET

R7 ,WHYFO

#5C,SREGO

48
1%:

;IS IT SET YET?
JYES

#GO!IE'RDY'A16!A17!PSEL
!DVA!MCPE !READG , SREGO
;CLEAR BITS NOT NEEDED

003416
003424
003422
003432
003436
003442
003440
162322

001162

;1S RDY SET

JCOUNT UP
:BIT IS NOT GOING TO SET

#RDY ,aRHCS1
DYNO

CS3

140000

:CLEAR BIT COUNTER

BITCNT
DYNO
19%

BNE
CLR
BIT
BNE
INC
BEQ
BR

BAE

001162

IT TO WRITE

;BIT IS SET
JCOUNT UP
:NOT FINISHED COUNTING
;GET READY TO DO IT AGAIN

86%:

TELL

DYNO
BITCNT
18%
BITCNT

003416
003424
020742
162426
162422
162372
162366
162362
162360
162340
000200

100000

021146

D 6
02-MAY-78 10:03 PAGE 68
UPE,TRE, SC ERROR TEST (RH70)

MACY11 30A(1052)

MASSBUS RH70 AND RH11_DIAGNOSTIC
CZRHBD.P11
02-MAY-78 10:01

20
8s

#SC ! TRE , SREGO

228
$CS1.8CS1

;ANY ERRORS SET

JYES CHECK TRE AND SC
;1S THE SC AND TRE BITS SET

;YES UPE IS IN ERROR

;1S JUST THE TRE BIT SET

;TRE BIT MUST BE IN ERROR
;1S JUST THE SC BIT SET

2SC BIT SET ERRONIOUSLY

JUPE NOT SET IN RHCS?2
‘SET UP TO TEST AGAIN
*1S SC AND TRE SET

*FIND THE ERROR
‘TEST FOR SHORTS

#MPE 'MXF ' PGE 'NEM'NED 'WCE ' DLT,$CS2
#APE 1 DPELO'WCEH]
iWCELO! IE3,$CS3
$ST,8ST
SER,SER

#-1 ,BEFORE
R7 ,WHYFO
BEFORE
8%

;TELL WHYFO ITS FOR SHORTS
sTEST FOR SHORTS
;WE HAVE CHECKED FOR SHORTS
JLEAVE THE TEST

SEQ 0068

MASSBUS RH70 AND RH11_DIAGNOSTIC

CZRHBD.Pi1
3562
3563
3564
3565
3566
3567
3568
3569
3570
3571
3572
3573
3574
3575
3576
3577
3578
3579
3580
3581
3582
3583
3584
3585
3586

032737
001022
032737
001022
104006
000421
104021
004737

021204
021206
021210

000415
104023
004737

021214
021216
021220

000411
104011
004737
000405
104022
004737
000401
104013
032737
001003
105737
001010
112777

3591
3592
3593
gggg

0212246
021226
021230
021234
021236
021240
021246
021250
021254
021256
021264
021272
021274
021276
021502

gggg

021306

3587
3588
3589

3590

?3£Y11 30A(1052)

032777

001401
104050
004737
004737

040000

001162

100000

001162

22%:

007224

177570

3%:

BR
ERROR
JSR

8%
23
R7 ,WHYFO

4%:

BR
ERROR
JSR

8s
M1
R7 ,WHYFO

BR
ERROR
JSR
B8R
ERROR
BIT
BNE
TSTB
BNE
MovBe

8s
22
R7 .WHYFO
8s
13
ASW14'SWI!'SW8,a#177570
213
$ERFLG
9
#TREB,aRH(S1B

B8EQ
ERRCR
JSR
JSR

9
50
R7,CLEER
R7 ,ERRTST

7%:
8s:

001103

020000

162100

162046

006572
050202

PAGE 69

#TRE ,SREGO
63
#SC,SREGO
7%
6
8s
21
R7 ,WHYFO

6%:

007224

000100

10:03

BIT
BNE
BIT
BNE
ERROR
BR
ERROR
JSR

2%:

007224

041400

02-MAY-78

UPE,TRE,SC ERROR TEST (RH70)

02-MAY~-78 10:01

021152
021160
021162
021170
021172
0211746
021176
021200

218:

BIT

9% :

#UPE ,aRH(CS?2

SEQ 0069

JTHEN IS THE TRE BIT SET
;SC BIT DID NOT SEE TRE BIT
;1S THE SC BIT SET
;TRE HAS AN OPEN GOING TO BUS
;TRE SET LOGIC NOT WORKING
;SET UP TO TEST AGAIN
JUPE HAS OPEN IN LINE GOING TO BUS
;SEE IF ANY OTHER ERROR BiT IS
;SET OTHER THAN UPE
JSET UP TO TEST AGAIN
;SOMTHING WRONG WITH TRE BIT
;SEE IF AN ERROR BIT IS SET
;OR BOTH UPE IN RHCSZ2 AND SC IN
JRHCS1 HAS AN OPEN BETWEEN IT AND THE BUS
JSET UP TO TEST AGAIN
;SC BIT WAS SET BY EITHER ATTN OR
JFIND WHAT ERROR BIT IS SET
;MCPE ERROR OR SC IS SHORTED TO +5 VOLTS
;SETUP TO TEST AGAIN
:TRE WAS SET BY OTHER THAN UPE
JFIND ERROR BIT THAT SET TRE
JSETUP TO TEST AGAIN
;TRE HAS AN OPEN GOING TO THE BUS
ANY LOOPING BEEING DONE
JYES,LOAD TRE NO MATTER WHAT
;WAS THERE AN ERROR
:SKIP TRE CHECK
;LOAD TRE

;DID ERROR CLEAR

JYES EXIT TEST
;LOADING TRE DID NOT CLEAR ERROR
;SEE IF ERRORS ARE CLEARED

FANGIE:

2508

3599
3600
3601

;=TEST 25
NED BIT TEST
:*THIS TEST WILL CHECK THAT NED (NON-EXISTANT DRIVE)
J%SETS TRE AND SC BITS INRHCST. .. ... iiiiiennnnanns

3602

3603

021306

000004

3605
3606
3607

021310
021316
021320

012777
005701
100403

000000

162022

3611

021344

012777
012777
012777

012777

000000
177777
001172

005037
032777
001015
005237
001371
005037

000061

162030
161774
161770

003446
000200

3608
3609
3610
3612
3613
3614
3615
3616
3617

021322
021330
021336
021352
021356
021364
021366
021372
021374

TST2S:

003446
003446

AN NN AR

MOV
NEDERR: MOV

RRRARRRAN AR

ERRANNRA AN

AN RN AR AR AR AR R R RRRRRRRRANNRRANNRAR
RN
RNRS

#ZERO,BRHCS?2
R1
NEDERR

;SETUP NED
;JRH11 OR RH70
JIT'S AN RH11

MIRITEQO,aRHCST

JTELL IT TO WRITE

MOV

#ZERO, aRHBAE
#-1,aRHW(
#SREG4 ,aRHBA

CLR
8IT
BNE
INC
BNE
(LR

BITCNT
#RDY ,aRHCS1
BAKER
BITCNT
18%
BITCNT

MOV
18%:

A R AR RRR R AR

SCOPE

MOV
TST
BM]

161756
161744

AR RN AN

;SETUP BA EXTENSION
;FOR A 1 WORD TRANSFER
;SETUP BA
;CLEAR BIT COUNTER
;IS RDY SET
;BIT IS SET
;COUNT UP
JNOT FINISHED COUNTING
;GET READY TO DO IT AGAIN

MASSBUS RH70 AND RH11 DIAGNOSTIC
02-MAY-78 10:01
CZRHBD.P11
021400
021406
021410
021414
021416
021420
021420
021426

032777

021434
021442
021450
021456
021460
021462

017737
017737
017737
005701
001406
005037

021466

021472
021476
021504
021512
021520
021526
021534
021542
021550
021556
021560
021562
021566

021574
021576

021604
021606
021614
021616
021624

021626
021630
021632

021640
021642

021650

000200

000770
161704

027777

001162
001162

161670
161664
161660

003420
003444
003414

NED BIT TEST

19%:

BIT
BNE
INC
BEQ
BR

BAKER:

HRDY ,dRHCS1

BAKER
BITCNT

BAKER
19%

87%

:NO IT'S A 70

€S3
86%
aRHBAE ,BAE
aRHCS3,CS3
aRHCS2,(CS2
@RHST,DS1

86%:

MOV

000200

007224
010000

161544

99%:

140000

001162

1%
#gC!TRE.SREGO

040000

001162

#TRE . SREGO

100000

001162

#SC,SREGO

aRHER ER1
aRHTDB, TDR
aRHMRZ, TC

#RDY ,aRHCS1

BIT

99
102
R7 ,WHYFO

ANED ,3RHCS2

100000

001162

tMP

;1S 1T AN RHI
;CLEAR BAE

;CLEAR (S3
; CONT INUE
;SAVE BUS ADDRESS EXTENSION
;SAVE RHCS3
;SAVE (S2
;SAVE TESTER STATUS
;SAVE ERROR REGISTER
;SAVE TESTER DATA REG.
;SAVE MR2 TESTER REG.
;1S READY SET

;YES CONTINUE TEST
sREADY NOT SET
;ANY ERRORS SET
;1S NED SET
JYES CHECK TRE AND SC
;1S THE SC AND TRE BITS SET

;YES NED IS IN ERROR

;1S JUST THE TRE BIT SET

;TRE BIT MUST BE IN ERROR

2SC BIT SET ERRONIOUSLY

004124
004126
004130
004132
004134
004122

:BIT IS NOT GOING TO SET

;CLEAR BITS NOT NEEDED
2 SAVE RHCS1
;SAVE WORD COUNT
;SAVE BUS ADDRESS

MOV

000000
167400
174100

IT SET YET?

JYES
s COUNT UP

@dRHCST,CST
aRHWC ,WC
@RHBA ,BA

87%:

1%:

;1S

SEQ 0070

MOV
MOV
MOV
TST

8IC

003416
003424
003422
003432
003436
003442
003440
161552

001162

PAGE 70

:SET UP NEEDED BITS ONLY
IRHCS1,$REGO
#GO!IE'RDY'!A16!A17!PSEL
!DVA!MCPE !READ6, SREGO

BAE

140000

10:03

MOV

003416

004132
004134
177777
007224
004122
022070
040000
021732
021740
021742
021744
021746

161722

02-MAY-78

125

003446

017737
042737

MACY11 30A(1052)

#SC!TRE,SREGO

22%

#ZERO,$CS1

;1S JUST THE SC BIT SET

sNED NOT SET IN RHCSZ2

;SET UP TO TEST AGAIN
;1S SC AND TRE SET

;FIND THE ERROR

;TEST FOR SHORTS

AMPE ! MXF ! PGE !NEM! UPE 'WCE !DLT,$CS2
#APE ! DPEH] 'DPELO!WCEH]
!WCELO! IE3,$CS3
$ST7,8ST
$ER,SER

#-1_,BEFORE

sJTELL WHYFO ITS FOR SHORTS

BEF ORE
8%

;WE HAVE CHECKED FOR SHORTS
JLEAVE THE TEST

;SC BIT DID NOT SEE TRE BIT

7$
6
8%
25

:TRE
;TRE
JSET
INED

R7 ,WHYFO

22%:

BIT

#TRE ,SREGO
#SC,SREGO

001162

2%:

ERROR

;TEST FOR SHORTS
JTHEN IS THE

TRE BIT SET

;1S THE SC BIT SET

HAS AN OPEN GOING TO BUS
SET LOGIC NOT WORKING
UP TO TEST AGAIN
HAS OPEN IN LINE GOING TO BUS

MACY11

MASSBUS RH70 AND RH11 DIAGNOSTIC
CZRHBD PN
02-MAY-78 10:01

3674
3675
3676

021750

004737

021754
021756
021760

000415

021764
021766
021770

00041

021774
021776
022000
022004

000405

022006
022010
022016
022020
022024
022026
022034
022042
022044
022046
022052

104026

004737

104011

004737
104027

004737
000401

104013
032737
001003
105737

001010

112777

032777
001401
104050
004737
004737

125

G 6
02-MAY-78 10:03

30A(1052)

NED BIT TEST

007224

JSR

R7 ,WHYFO

007224

3%:

BR
ERROR
JSR

8$
26

4%:

BR
ERROR
JSR

007224

6%:

007224

041400

177570

7%:

8%:

001103
000100
010000

161330
161276

21s:

9%:

006572
050202

BR
ERROR
JSR
BR
ERROR
8IT
BNE
1ST8B
BNE
mMovs
BIT

BEQ
ERROR
JSR
JSR

PAGE 71

R7 ,WHYFO

8%
11

R7 ,WHYFO

;SEE IF ANY OTHER ERROR BIT IS
:SET OTHER THAN NED
:SET UP TO TEST AGAIN

;SOMTHING WRONG WITH TRE BIT
;SEE IF AN ERROR BIT IS SET
;OR BOTH NED IN RHCSZ AND SC IN
:RHCS1 HAS AN OPEN BETWEEN IT AND THE BUS
;SET UP TO TEST AGAIN
:SC BIT WAS SET BY EITHER ATTN OR

;FIND WHAT ERROR BIT IS SET

:MCPE ERROR OR SC IS SHORTED TO +5 VOLTS
:SETUP TO TEST AGAIN

:TRE WAS SET BY OTHER THAN NED

;FIND ERROR BIT THAT SET TRE
:SETUP TO TEST AGAIN

:TRE HAS AN OPEN GOING TO THE BUS

;ANY LOOPING BEEING DONE
:YES.LOAD TRE NO MATTER WHAT
;WAS THERE AN ERROR

#TREB,aRH(CS1B

ANED ,aRH(S2
9%
50
R7,CLEER
R7 ,ERRTST

:SKIP TRE CHECK
;LOAD TRE
:DID ERROR CLEAR

;YES EXIT TEST
JLOADING TRE DID NOT CLEAR ERROR
:SEE IF ERRORS ARE (CLEARED

SR 2222222222323 3222322223232 2222222822222ttt
Rt
Rl

TRTEST 26

MXF ,TRE AND SC BIT TEST
s*THIS TEST WIL! CHECK THAT MXF

;*(MISSED TRANSFZR ERROR) WILL
;*SET TRE AND SC BITS

SR 2222323233222
2 2222223222822
220200 RtRRRRRd Rl

15T26:

000004

012777
012777
012777

012777
012777
005037
032777
001015
005237
001371
005037
032777
001004
005237
001401
000770
022164
022172

017737
042737

18%:

161156

161140

027777

001162
001162

19%:

CHARLE:

SCOPE

:SET MXF BIT
;SET UP WORD COUNT
JSETUP BA
:SET MXF ERROR
STELL IT TO WRITE
;CLEAR BIT COUNTER
;1S RDY SET
;BIT IS SET
;COUNT UP

MOV
MOV
MOV
MOV
MOV

WPAT!7 ,38RHCS2

INC
BNE
CLR

BITCNT
18%
BITCNT

MOV

adRHCS1,$REGO
;SET UP NEEDED BITS ONLY
#GO!IE.RDY.A16.A17!PSEL.DVA!MCPE
!READG, SREGO

CLR
BIT
BNE

BIT
BNE
INC
BEQ
BR
BIC

#-1,3RHWC
#RBUF
, aRHBA
#ZERO,aRHTDB

MIRITEOD,BRHCST
BITCNT
#RDY ,@RHCS1
CHARLE

#RDY ,a3RH(CS1T
CHARLE
BITCNT
CHARLE
19%

;NOT FINISHED COUNTING
:GET READY TO DO IT AGAIN
JIS IT SET YET?
JYES
;COUNT UP
«BIT IS NOT GOING TO SET

sCLEAR BITS NOT NEEDED

SEQ 0071

MASSBUS RH70 AND RH11 DIAGNOSTIC

CZRHBD.P11
3730
3731
3732
3733
3734
3735
3736
3737
3738
3739
3740
3741
37642
3743
3744
3745
3746
3747
3748
3749

3750
3751
3752
3753
3754
3755
3756

3757
3758
3759
3760
3761
3762
3763
3764
3765
3766
3767
3768
3769
3770
3771
3772
3773
3774
3775
3776
3777
3778
3779
3780
3781

3782

3783
3784
3785

MACY11 30A(1052)

02-MAY-78 10:01

022200
022206
022214
022222
0222246
022226
022232
022236
022242
022250
022256
022264
022272
022300
022306
022314
022322
022324
022326
022332

022340
022342
022350
022352
022360
022362
022370

022372
022374
022376
022404
022406

022414

022422
022430

022436
022444

022452
022456
022462
022466
022474
022476
022504
022506
022510
022512
022514

017737
017737
017737
005701
001406
005037
005037
000137
017737
017737
017737
017737
017737
017737
017737
032777
001003

104102
004737
032777
001016
022737
001460
032737
001060
032737
001060
104030
000467
022737
001030
012737
012737
013737

013737

012737
012737

004737
005037
000137
032737
001022

032737
001022

104006
000421
104031
004737

022520
022522
022524

000415
104032
004737

022530
022532

000411
104011

161126
161120
161114

161044
161026

000200
007224
001000

161000

140000

001162

040000

001162

100000

001162

140000

001162

020000
176400
004130

004124
004126
004130

030165
177777

004134
004122

004132

007224
004122
022554
040000

87%:

100000

007224

86$:

99%:

1$:

004132

001162

10:03

MOV
MoV
MOV
TST
8EQ
CLR
CLR
JMP
MOV
MOV
MOV
MOV
MOV
MOV
MOV
BIT
BNE

003420
003444
003414

003416
003424
003422
003432
003436
003442
003440
161006

MXF ,TRE AND SC BIT TEST

003424

161106
161056
161052
161046

02-MAY-78

126

003416
022256
161112

22%:

001162

2%:

6$:

ERROR
JSR
BIT
BNE
cMP
BEQ
BIT
BNE
BIT
BNE
ERROR
BR
cMP
BNE
MOV
MoV
MOV
MOV
MOV
MOV
JSR
CLR
JMP
BIT
BNE
BIT
BNE
ERROR
BR
ERROR
JSR

aRHCS1, (ST
aRHWC ,W(
aRHBA ,BA
R1
87%
BAE
CS3
86%
aRHBAE ,BAE
@RHCS3,CS3
@RHCS2,(S2
aRHST,DS1
aRHER,ER1
aRHTDB, 1DR
aRHMRZ, T(
ARDY ,@RHCS1T
99%

PAGE 72
;SAVE RH(CS1
;SAVE WORD COUNT
;SAVE BUS ADDRESS
;IS IT AN RH11
:NO IT'S A 70
;CLEAR BAE
;CLEAR (S3
; CONTINUE
;SAVE BUS ADDRESS EXTENSION
JSAVE RH(CS3
;SAVE (€S2
;SAVE TESTER STATUS
;SAVE ERROR REGISTER
;SAVE TESTER DATA REG.
;SAVE MR?2 TESTER REG.
;1S READY SET
;YES CONTINUE TEST

102
JREADY NOT SET
R7 ,WHYFO
;ANY ERRORS SET
AMXF ,3RHCS?
;1S MXF SET
1%
JYES CHECK TRE AND SC
#SC!TRE,SREGO
;1S THE SC AND TRE BITS SET
23
JYES MXF IS IN ERROR
#TRE , $REGO
;IS JUST THE TRE BIT SET
3s
;TRE BIT MUST BE IN ERROR
#SC,SREGO
;IS JUST THE SC BIT SET
43
;SC BIT SET ERRONIOUSLY
30
JMXF MOT SET IN RHCS?2
8$
sSET UP TO TEST AGAIN
#SC!TRE,$REGO
;1S SC AND TRE SET
22%
;FIND THE ERROR
AMCPE ,$CS1
;TEST FOR SHORTS
AMPE | PGE !NEM!NED ! UPE !WCE !DLT,$CS2
$CS3,8CS3
$ST,857

#ILF !RMR!DPE 'RMBEX!RFAIL.DTE!OPI,
SER
#-1,BEFORE
JTELL WHYFO ITS FOR SHORTS
R7 ,WHYFO
BEF ORE
8s
#TRE ,SREGO
63
#SC,S$REGO
7$
6
8$
31
R7 ,WHYFO

;TEST FOR SHORTS
;WE HAVE CHECKED FOR SHORTS
JLEAVE THE TEST
JTHEN IS THE TRE BIT SET
;SC BIT DID NOT SEE TRE BIT

;1S THE SC BIT SET
;TRE HAS AN OPEN GOING TO BUS

BR
ERROR
JSR

8%
32
R7 ,WHYFO

sTRE SET LOGIC NOT WORKING
;JSET UP TO TEST AGAIN
;MXF HAS OPEN IN LINE GOING TO BUS
;SEE IF ANY OTHER ERROR BIT IS
;SET OTHER THAN MXF
;SET UP TO TEST AGAIN
;SOMTHING WRONG WITH TRE BIT
JSEE IF AN ERROR BIT IS SET

BR
ERROR

8%
M

;RHCS1 HAS AN OPEN BETWEEN IT AND THE BUS
;SET UP TO TEST AGAIN
;SC BIT WAS SET BY EITHER ATTN OR

;OR BOTH MXF IN RHCSZ2 AND SC IN

SEQ 0072

MASSBUS RH70 AND RH11 DIAGNOSTIC

CZRHBD.P1

02-MaY-78 10:01

3786

022534

004737

3788
3789
3790
3791
3792
3793
3794
3795
3796
3797

020540
022542
022544
022550
022552
022554
022562
022564
022570
022572

000405
104033
004737
000401
104013
032737
001003
105737
001010
112777

3799
3800
3801
3802

022606
022610
022612
022616

001401
104050
004737
004737

3787

3798

2803

022600

032777

126

007224
6$%:

007224
0416400

.
177570

7%:
8¢:

160564
160532

21%:

001103

000100
001000
006572
050202

9%:
IR

3804

3808

3809

3810
3811
3812
3813
3814
3815
3816
3817
3818
3819
3820
3821
3822
3823
3824
3825
3826
3827

3828
3829

022622

022624

022632
022640
022642
022644
022652
022660
022666
022672
022700
022702
022706
022710
022714
022722
022724
022730
022732
022734

000004

012777

012777
005701
100403
012777
012777
012777
005037
032777
001015
005237
001371
005037
032777
001004
005237
001401
000770

160506

000000
000061
000061
003446

160506
160450
160442

JuMP:

160430

18$:

160406

19%:

004000

000200

160474

003446
003446
000200
003446

022734
022742

017737
042737

160370
027777

001162
001162

3831
3832

022750
022756

017737
017737

160354
160350

003420
003444

3835

022774

001406

3830
3833
3834
3836

3837
3838
3839
3840

3841

022764
022772
022776

023002

023006
023012
023020

023026

017737
005701

160344

005037

003416

000137
017737
017737

(023026
160342
160336

005037

017737

TST27:

000007

PGETST:

003414

160306

86%:

PAGE 73

:FIND WHAT ERROR BIT IS SET

B8R
ERROR
JSR
BR
ERROR
BIT
BNE
TST8B
BNE
MOovB

8%
33
R7 ,WHYFO
8%
13
#SW14!SW9!SW8,a#177570
213
$ERFLG
9%
#TREB,’RH(CS1B

;SETUP TO TEST AGAIN
;TRE WAS SET BY OTHER THAN MXF
;FIND ERROR BIT THAT SET TRE
;SETUP TO TEST AGAIN
:TRE HAS AN OPEN GOING TO THE BUS
ANY LOOPING BEEING DONE
JYES.LOAD TRE NO MATTER WHAT
;WAS THERE AN ERROR
;JSKIP TRE CHECK
;LOAD TRE

BEQ
ERROR
JSR
JSR

9
50
R7,CLEER
R7,ERRTST

BIT

#MXF ,aRHCS?2

AN AR AR

;MCPE ERROR OR SC IS SHORTED TO +5 VOLTS

;DID ERROR CLEAR

JYES EXIT TEST
JLOADING TRE DID NOT CLEAR ERROR
;SEE IF ERRORS ARE CLEARED

AR AR A AN AR AR RNN R AN RN RANARRANANRRRANRA
RN ARAR

PGE ERROR BIT TEST

;*THIS TEST FORCES PGE TO SET IN RHCS2
:«AND VERIFYS TRE AND SC IS SET IN RHCS1
R AR AN RN RN RN

SCOPE

AR AR AR RANNRRRARA AR RN ANNANNRR AW

MOV

#7,3RHCS?2

MOV
8IC

aRH(CS1,SREGO
JSET UP NEEDED BITS ONLY
#GO'!'IE'RDY'A16'A17!PSEL
'DVA'MCPE 'READ6, SREGO

MOV
MOV

aRH(CS1,(S1
aRHW(C ,WC

MOV
TST
aM]
MOV
MOV
MOV
CLR
B8IT
BNE
INC
BNE
CLR
BIT
BNE
INC
BEQ
B8R

#EVENAD ,aRHBA
R1
JUMP
#7ERO, 3RHBAE
MIRITEO,aRHCST
MIRITEQ,aRHCST
BITCNT
#RDY ,’aRH(CS1
PGETST
BITCNT
18%
BITCNT
#RDY ,aRHCS1
PGETST
BITCNT
PGETST
19%

aRHBA,BA
R1

87%

(LR

BAE

JMP
MOV
MOV

86%
aRHBAE ,BAE
BRH(S3,(S3

CLR

87%:

10:03

R7 ,WHYFO

BEQ

003416
003424
003422

JSR

MOV
TST

003424

02-MAY-78

MXF ,TRE AND SC BIT TEST

J*TEST 27

3805
3806

2807

MACY11 30A(1052)

MOV

(s3

aRH(S2,(S2

JSET UNIT NUMBER

;SETUP BUS ADDRESS
;IS IT AN 11 OR A 70
JITS AN RH11
;SETUP BAE
JTELL IT TO WRITE
;CREATE THE ERROR
;CLEAR BIT COUNTER
;1S RDY SET
;JBIT IS SET
;COUNT UP
JNOT FINISHED COUNTING
;GET READY TO DO IT AGAIN
;IS IT SET YET?
;YES
JCOUNT UP
;BIT IS NOT GOING TO SET

;CLEAR BITS NOT NEEDED

;SAVE RH(S1
;SAVE WORD COUNT

;SAVE BUS ADDRESS
;IS IT AN RHI1

JNO IT'S A 70
;CLEAR BAE

;CLEAR (S3

s CONT INUE
;SAVE BUS ADDRESS EXTENSION
;SAVE RH(CS3

JSAVE (S2

SEQ 0073

MASSBUS RH70 AND RH11 _DIAGNOSTIC
CZRHBD.P11
02-MAY=-78 10:01

023034
023042
023050
023056
023064
023072
023074
023076
023102
023110
023112
023120
023122
023130
023132
€°3140
023142
023144
023146
023154
023156
023164
023172
023200
023206
023214
023222
023226
023232
023236
023244
023246
023254

017737
017737
017737
017737
032777

160302
160276
160274
160254

000200

127

003432
003436
003442
003440
160236

140000

001162

040000

001162

100000

001162

140000

001162

004124

004124
004126
004130
004132
004134
004122

004130
004132
030175
177777
007224
004122
023324
040000
100000

023256
023260
023262
023264

001162

007224

023300
023302
023304

007224

023310
023312
023314
023320
023322
023324

041400

001010

001103

177570

MOV
MOV
MOV
MOV
MOV
MOV
JSR
CLR
JMP

#RDY ,dRHCS1

99%
102
R7 ,WHYFO
::GE.QRHCSZ
#SC!TRE,SREGO

#TRE ,$SREGO
3%
#5C,$REGO
43
51
8%
#SC!TRE,SREGO

#-1,BEFORE
R7,WHYFO
BEFORE

8%
171
R7 ,WHYFO

BR
ERROR
JSR

BR
ERROR
JSR
BR
ERROR
BIT
BNE

8%
172
R7 ,WHYFO

1STB

BNE

;SAVE TESTER STATUS
;SAVE ERROR REGISTER
;SAVE TESTER DATA REG.
;SAVE MR2 TESTER REG.
;1S READY SET
JYES CONTINUE TEST
JREADY NOT SET

JANY ERRORS SET

;1S PGE SET
JYES CHECK TRE AND SC
;1S THE SC AND TRE BITS SET
;YES PGE IS IN ERROR
;1S JUST THE TRE BIT SET
:TRE BIT MUST BE IN ERROR
2IS JUST THE SC BIT SET
:SC BiT SET ERRONIOUSLY

;PGE NOT SET IN RHCS2

$ST,8$ST
#ILF!CPE!RMR!DPE !RMBEX!'RFAIL!DTE!OPI,SER

BR
ERROR
JSR

8$%:

SEQ 0074

;SET UP TO TEST AGAIN
;1S SC AND TRE SET
22%
;FIND THE ERROR
$CS1,8CS1
;TEST FOR SHORTS
HMPE 'MXF !NEM!NED ! UPE !WCE !DLT,$CS2
$CS3,8CS3

3%:

7%:

PAGE 74

aRHMRZ,
T(

2$:

BIT
BNE
BIT
BNE
ERROR

10:03

aRHST,DS1
aRHER,[R1
aRHTDB, TDR

BR
ERROR
JSR

6%:

007224

BIT
BNE
ERROR
JSR
BIT
BNE
cMP
BtQ
BIT
BNE
BIT
BNE
ERROR
BR
MP
BNE

TEST

8s
#TRE
, SREGO
63
#SC,$REGO
7%
6
8%
123
R7 ,WHYFO

22%:

001162

007224

023270
023272
023274

18:

02-MAY-78

PGE ERROR BIT

MoV
MOV
MOV
MOV

802000 160230 99%:

175400

MACY11 30A(1052)

1
R7 ,WHYFO

8$
13

g?:14!$U9!SUB.3#177570
SERFLG
9%

sTELL WHYFO ITS FOR SHORTS
sTEST FOR SHORTS

;WE HAVE CHECKED FOR SHORTS

;LEAVE THE TEST

sTHEN IS THE TRE BIT SET

;SC BIT DID NOT SEE TRE BIT
;IS THE SC BIT SET

:TRE HAS AN OPEN GOING TO BUS

JTRE SET LOGIC NOT WORKING

;SET UP TO TEST AGAIN

;PGE HAS OPEN IN LINE GOING TO BUS
;SEE IF ANY OTHER ERROR BIT IS
;SET OTHER THAN PGE
sSET UP TO TEST AGAIN
;SOMTHING WRONG WITH TRE B1T
;SEE IF AN ERROR BIT IS SET
;OR BOTH PGE IN RHCS2 AND SC IN
;RHCS1 HAS AN OPEN BETWEEN IT AND THE BUS
;SET UP TO TEST AGAIN
:SC BIT WAS SET BY EITHER ATTIN OR
sFIND WHAT ERROR BIT

IS SET

JMCPE ERROR OR SC IS SHORTED TO +5 VOLTS

;SETUP TO TEST AGAIN
;TRE WAS SET BY OTHER THAN PGE
JFIND ERROR BIT THAT SET TRE
;SETUP TO TEST AGAIN

s TRE HAS AN OPEN GOING TO THE BUS

JANY LOOPING BEEING DONE
JYES,LOAD TRE NO MATTER WHAT
;WAS THERE AN ERROR

:SKIP TRE CHECK

3898
3899
3900
3901
3902
3903

023342
023350
023356
023360
023362
023366

112777
032777
001601
104050
004737
004737

MACY11 30A(1052)

MASSBUS RH70 AND RH11 DIAGNOSTIC
CZRHBD.P11
02-MAY-78 10:01

127

000100
002000

21s:

006572
050202

9% :

02-MAY-78

PGE ERROR BIT TEST

MOvB

BIT
BEQ
ERROR
JSR
JSR

10:03

PAGE 75

#TREB,aRH(CS18B

#PGE ,aRHCS2
9%
50
R7,CLEER
R7 ,ERRTST

;LOAD TRE
;DID ERROR CLEAR
JYES EXIT TEST
;LOADING TRE DID NOT CLEAR ERROR
sSEE IF ERRORS ARE CLEARED

:;tttttiittttttfi*tttttitttitttttttttttt*fi**tttttttfifitttt*tttttt.t

;*TEST 30
MXF,TRE AND SC BIT TEST (RH11 ONLY)
;*THIS TEST SEES IF MXF CAN BE SET BY A MOVE

s*INSTRUCTION AND THAT TRE AND SC ARE SET IN
;*RHCS1.MXF CAN BE SET THIS WAY IN AN RH11 BUT (N

;*NOT BE SET THIS WAY IN AN RH70

SR 2222322333223 23233232¢8233 3233223222222 232282388223232220228232328230¢20222d0

TST30:

3911
3912
3913
3914
3915
3916
3917
3918

023372
023374
023376
023400
023404
023412
023420
023424

000004
005701
100402
000137
012777
052777
005037
032777

024124
000007
001000
003446
001000

3920

023434

005237

003446

3922
3923
3924
3925
3926
3927

023442
023446
023454
023456
023462
023464

005037
032777
001004
005237
001401
000770

003446
001000

3929
3930

023466
023474

017737
042737

157636
027777

001162
001162

3932
3933
3934
3935
3936
3937
3938
3939
3940

023502
023510
023516
023524
023526
023530
023534
023540
023544

017737
017737
017737
005701
001406
005037
005037
000137
017737

157622
157616
157612

003420
003444
003414

3941
32
3943
394
3945
3946
3947
3950
3951
3952
3953

023552
023560
023566
023574
023602
023610
023616
023630
023634
023642
023644

017737
017737
017737
017737
017737
017737
032777
004737
032777
001016
022737

157726
157720

LEAP:

157706

18%:

157664

19%:

003446

003416
003424
023560
157610

157604
157554
157550
157544
157542
157522
000200

MIXIT:

SCOPE

TST
BMI
JMP
MOV
8IS
CLR
8IT
BNE
INC
BNE
CLR
BIT
BNE
INC
BEQ
B8R

007224
001000

157476

140000

001162

86%:

MIXIT
BITCNT

18%
BITCNT
#MXF ,aRHCS2
MIXIT

BITCNT

MIXIT

19%

JSETUP UNIT 7

JSET MXF
;CLEAR BIT COUNTER

;1S MXF SET
;BIT IS SET
;COUNT UP

;NOT FINISHED COUNTING

;GET READY TO DO IT AGAIN
;1S IT SET YET?
:YES
;COUNT UP
;BIT IS NOT GOING TO SET

MoV
(01"
MOV
TST
BEQ
CLR

aRHCS1,CS1
aRHWC ,WC
aRHBA ,BA
R1

JMP

MOV

MOV
MOV

BIT

99% :

BITCNT
MMXF ,BRHCS?

;RH70,EXIT TEST

@RHCS1,$REGO
;SET UP NEEDED BITS ONLY
#GO!IE'RDY!A16!A17!PSEL
!DVA!MCPE !READ6, SREGO

8IC

87%:

FROG

#7,3RHCS?
AMXF ,aRH(CS2

;IS IT A 70 0R N
:IT'S AN RH11 DO THE TEST

MOV

CLR

003416
003424
003422
003432
003436
003442
003440
157504

R1
LEAP

ERROR
JSR
BIT

o
(0,

87%

BAE

cS3
86%

aRHBAE ,BAE

@dRHCS3,CS3
aRHCS2,CS2
aRHST ,DS1
aRHER,ER1

3RHTDB, TDR

,
aRHMR?2T(

#RDY ,aRHCS1
99%
102
R7 ,WHYFO

JQXF.BRHCSZ
1

#SC!
TRE ,$REGO

;CLEAR BITS NOT NEEDED

:SAVE RHCS1

;SAVE WORD COUNT
;SAVE BUS ADDRESS

;1S IT AN RH11
:NO IT'S A 70
;CLEAR BAE
;CLEAR (CS3
; CONT INUE
;SAVE BUS ADDRESS EXTENSION
:SAVE RH(CS3
:SAVE (€S2
;SAVE TESTER STATUS
;SAVE ERROR REGISTER
;SAVE TESTER DATA REG.
;SAVE MR2 TESTER REG.
;1S READY SET
JYES CONTINUE TEST
;READY NOT SET
;ANY ERRORS SET

;1S MXF SET
JYES CHECK TRE AND SC
:1S THE SC AND TRE BITS SET

SEQ 0075

MASSBUS RH70 AND RH11_DIAGNOSTIC

CZRHBD.P11

02-MAY-78 10:01

3954
3955
3956
3957
3958

023652
023654
023662
023664
003672

3961
3962
3963
3964
3965
3966

023700
023706
023710
023716
023724
023732

3959
3960

023674
023676

001460
032737
001060
032737
001060
104030
000467
022737
001030
013737
012737
013737

023746
023754
023760
023764
023770
023776

013737
013737
012737
004737
005037
000137
032737
001022

3975
3976
3977
3978
3979
3980
3981
3982
3983
3984
3985
3086
3987
3988
3989
3990
3991
3992
3993
3994
3995
3996
3997
3998
3999

024006
024010
024012
024014
024016

001022
104006
000421
104031
004737

024022
024024
024026

000415
104032
004737

024032
024034
024036

000411
104011
004737

024042
024044
024046
024052
024054
024056
024064
024066
024072
024074

000405
104033
004737
000401
104013
032737
001003
105737
001010
112777

4001
4002
4003
4004

024110
024112
024114
024120

001401
104050
004737
004737

3967

3968
3969
3970
3971
3972
3973

MACY11 30A(1052)

023740

130

040000

001162

100000

001162

140000

001162

004124
176400
004130
004132

004124
004126
004130
004132

004134

177777
007224
004122
024056
040000

18:

004122

001162

228:

3974 024000 032737 100000 001162

007224

041400

4005

4“)6

4007

4008
4009

024124

006572
050202

MOV
JSR
CLR
JMP
BIT
BNE

#-1,BEFORE
R7,WHYFO
BEF ORE
8s
#TRE , SREGO
6$

:TELL WHYFO ITS FOR SHORTS
:TEST FOR SHORTS
:WE HAVE CHECKED FOR SHORTS
:LEAVE THE TEST
*THEN IS THE TRE BIT SET
*SC BIT DID NOT SEE TRE BIT

BNE
ERROR
BR
ERROR
JSR

78
6
8s
31
R7 ,WHYFO

:TRE HAS AN OPEN GOING TO BUS
*TRE SET LOGIC NOT WORKING
*SET UP TO TEST AGAIN
MXF HAS OPEN IN LINE GOING TO BUS
*SEE IF ANY OTHER ERROR BIT IS
:SET OTHER THAN MXF
:SET UP TO TEST AGAIN
*SOMTHING WRONG WITH TRE BIT
SEE IF AN ERROR BIT IS SET
*OR BOTH MXF IN RHCS2 AND SC IN
RHCS1 HAS AN OPEN BETWEEN IT AND THE BUS
*SET UP TO TEST AGAIN
SC BIT WAS SET BY EITHER ATTN OR
*FIND WHAT ERROR BIT IS SET
MCPE ERROR OR SC IS SHORTED TO +5 VOLTS
*SETUP TO TEST AGAIN
*TRE WAS SET BY OTHER THAN MXF
:FIND ERROR BIT THAT SET TRE
:SETUP TO TEST AGAIN
:TRE HAS AN OPEN GOING TO THE BUS
:ANY LOOPING BEEING DONE
YES,LOAD TRE NO MATTER WHAT
:WAS THERE AN ERROR
:SKIP TRE CHECK
:LOAD TRE

$ST,$ST
. SER
$ER

#5C ., SREGO

8s
32
R7 . WHYFO

4$:

BR
ERROR
JSR

8s
11
R7.WHYFO

BR
ERROR
JSR
BR
ERROR
BIT
BNE
TSTB
BNE
MOVB

8s
33
R7 . WHYFO
as
13
#5W14!SW9!SWB, 34177570
21%
$ERFLG
98
#TREB,aR.ICS1B

BEQ
ERROR
JSR
JSR

9s
50
R7.CLEER
R7.ERRTST

7$:
8$:

157262

21$:

001103
000100

23
;YES MXF IS IN ERROR
#TRE , SREGO
1S JUST THE TRE BIT SET
3$
:TRE BIT MUST BE IN ERROR
#SC, SREGO
1S JUST THE SC BIT SET
4$
SC BIT SET ERRONIOUSLY
30
MXF NOT SET IN RHCS2
8s
*SET UP TO TEST AGAIN
#SC ! TRE, SREGO
:1S SC AND TRE SET
228
*FIND THE ERROR
$CS1,$CS1
:TEST FOR SHORTS
#MPE | PGE |NEM!NED ' UPE 'WCE !DLT,$CS2
$CS3,8CS3

BR
ERROR
JSR

177570

2000 024102 032777 001000 157230

PAGE 76

38:

6$:

007224

10:03

BEQ
BIT
BNE
BIT
BNE
ERROR
BR
cMP
BNE
MOV
MOV
MOV

BIT

2%:

007224

MXF,TRE AND SC BIT TEST (RH11 ONLY)

MOV
MOV

004134

02-MAY-78

9s:
FROG:

BIT

#MXF , 3RHCS?2

1S THE SC BIT SET

:DID ERROR CLEAR

:YES EXIT TEST
:LOADING TRE DID NOT CLEAR ERROR
:SEE IF ERRORS ARE CLEARED

M .‘fittttttt!’ttttttttttttttitittfiitttititfi*fi*t*tttttfi"ttttt*tl’t*fit

SRTEST 31

MCPE AND SC ERROR TET

;*THIS TEST CHECKS THAT MCPE CAN BE SET IN RHCS1
;*AND THAT MCPE SETS SC INRHCS1....cceveennnns

SEQ 0076

MASSBUS RH70 AND RH11 DIAGNOSTIC

CZRHBD.P11
4010

4011
4012
4013
40146
4015
4016
4017
4018
4019
4020
4021
4022

4023
40246

4025

4026
4027
4028
4029
4030

4031
4032
4033
4034

4035
4036

4037
4038
4039
4040
4041

4042

024124
0264126
024134
0241642
024150
024156
024162
024170
026172
024176
024200
024204
024212
024214

024220

024222
024224
024224
024232
024240

024246
024250
024252
024256

024262
0264266

024274
024302

024310
024316
024324

024332

4043
4044
4045
4046
4047
4048
4049
4050
4051
4052
4053
4054

024340
024346
(24350
024352
024356
024364
024366
024374
024376
024404
024412
024420

4056
4057
4058
4059
4060
4061
4062
4063
4064
4065

024430
024432

4055

MACY11 30A(1052)

02-MAY-78 10:01

024424

024434
024440
024442
024446
024452

000004
012777
012777
013777
013777
005037
032777
001015
005237
001371
005037
032777

001004
005237

001401

017737
017737

017737
017737
017737

017737

032777
001003
104102
004737
032777
001425
032777
001416
012737
012737
012737
004737
005037

000406
104130

000137
104131
004737
004737
004737

02-MAY-78

MCPE AND SC ERROR TET

10:03

PAGE 77

. .'tttt*ttittt'fiitfiiQfiti'ttttfi'tiltfitttffifitttfi't*tttttti*tttttttti

000007
000010
001162
001162
003446
000200

157204
157212
157200
157172

TST31:

157140

18%:

157116

19%:

003446
003446
000200
003446

000770

017737
017737
017737
005701
001406
005037
005037
000137
017737

157100
157074
157070

003420
003444
003414

003416
003424
024302
157066

003416

157062
157032

157026
157022
157020

157000

000200

003424
003422

003432
003436
003442

003440
156762

007224
020000

156744

100000

156734

040000
177400

004124
004126

177777
007224
004122

004122

MCPET:

87%:

86$:

007224
006572
050202

#7 ,aRHCS2
#1CPA,aRHMR1
$REGO,aRHTDB
$REGO,aRHTDB
BITCNT
#RDY ,aRHCST
MCPET
BITCNT
18%
BITCNT
#RDY ,3RHCS1T

;SETUP UNIT NO.
2INVERT CONTROL PARITY
; TRANSFER INFO TO TESTER
;DO IT FOR SECOND TIME
;CLEAR BIT COUNTER
;1S RDY SET
;BIT IS SET
s COUNT uP
sNOT FINISHED COUNTING
;GET READY TO DO IT AGAIN
SIS IT SET YET?

BEQ

MCPET

;BIT IS NOT GOTNG TO SET

BNE
INC
BR

2SAVE RHCS1
;SAVE WORD COUNT
:SAVE BUS ADDRESS
;1S IT AN RH11
;JNO IT'S A 70
:CLEAR BAE
;CLEAR (S3
2 CONT INUE
;SAVE BUS ADDRESS EXTENSION

MOV
MOV
MoV

aRHST, DS
aRHER ,ER1
aRHTDB, TDR

;SAVE TESTER STATUS
;SAVE ERROR REGISTER
:SAVE TESTER DATA REG.

MoV
MOV

CLR

ERR30:

19%

JYES
;COUNT UP

@RHCS1,CS1
aRHWC ,WC
aRHBA ,BA
R1
87%
BAE
CS3
86%
aRHBAE ,BAE

BIT
BNE
ERROR
JSR
MPETST: BIT
BEQ
BIT
BEQ
MoV
MoV
MOV
JSR

1$:

MCPET
BITCNT

MoV
MOV
MOV
TST
8EQ
CLR
CLR
JMP
MoV

MoV

22%:

024446

SCOPE
MOV
MOV
MOV
MOV
CLR
BIT
BNE
INC
BNE
CLR
BIT

BR
ERROR

JMP
ERROR
JSR
JSR
JSR

@dRHCS3,CS3
@aRH(S2,CS2

aRHMRZ2, TC

;SAVE RHCS3
sSAVE (S2

;SAVE MR2 TESTER REG.

HRDY ,@RHCST
;1S READY SET
MPETST
;YES,TEST MCPE
102
JREADY IS NOT SET
R7 ,WHYFO
;ANY ERRORS SET
HMCPE ,aRHCS1
;1S MCPE SET
1%
#SC,aRHCST
;IS SC SET
22%
;SC NOT SET
ATRE ,$CST
:GET READY TO TEST FOR SHORTS
#MPE ! MXF | PGE !NEM!NED ! UPE 'WCE !DLT,$CS2
#-1,BEFORE
R7 ,WHYFO
;SEE IF ANY SHORTS
BEFORE

ERR30
130

ERR30
131
R7,WHYFO
R7,CLEER
R7 ,ERRTST

;GET OUT OF TEST
;MCPE ERROR OK BUT SC DID
sNOT SET SC HAS OPEN TO
;BUS OR MCPE GOING TO OR
;GATE FOR SC WAS NOT SEEN
;MCPE DID NOT SET
;WAS THERE ANOTHER ERROR
;CLEAR ERRORS
;WAS THERE AN ERROR

SEQ 0077

MACY11 30A(1052)

MASSBUS RH70 AND RH11 _DIAGNOSTIC
CZRHBD .P11
02-MAY-78 10:01

DIRNRARRRRRRRAANNERNNE

4067

4069
4070
4071
4072
4073
4075
4075
4076
4077
4078
4079
4080
4081
4082
4083
4084
4085
4086
4087
4088
4089
4090
4091
4092
4093
409
4095
4096
4097
4098
4099
4100
4101
4102
4103
4104
4105
4106
4107
4108
4109
4110
4111
4112
4113
4114
4115
4116
4117

4118
4119
4120
4121

10:03

AR AR

PAGE 78

NAA RN

SEQ 0078
AR

A AR RN

DOUBLE TRANSFER TEST,1 WORD FROM AN ADDRESS BASE 4

JaTEST 32

4068

MCPE AND SC ERROR TET

131

4066

02-MAY-78

;*THIS TEST CHECKS THAT A ONE WORD TRANSFER

024456
024460
024462
024464
024472
024500
024506
024514
024522
024526
024534
024536
024542
024544
024550
024556
024560
024564
024566
024570
024570
024576
024804
024612
024614
024616
024622
024626
024632
024640
024646
024654
024662
024670
024676
024704
024712
024714
024716
024722
024730
024732
024734
024740
024744

000004
005701
100532
012777
012777
012777
012777
012777
005037
032777
001015
005237
001371
005037
032777
001004
005237
001401
000770
017737
017737
017737
005701
001406
005037
005037
000137
017737
017737
017737
017737
017737
017737
017737
032777
001003
104102
004737
032777
001403
104125
004737
004737
004737

TST32:

177777
004000
000000
000007
000061
003446
000200

156640
156634
156652
156624
156606
156574

18%:

156552

19%:

003446

003446
000200
003446

156534
156530
156524

003416
003424
024646
156522
156516
156466
156462
156456
156454
156434
000200
007224
002000
007224
006572
050202

;*FROM AN ADDRESS DIVISIBLE BY 4 WILL NOT SET
;«DBL IN RHCS3...... RH70 ONLY...ccoeenvonnnne
AR

SCOPE

3s:

INC

BITCNT

19%

BNE

156432

19:

86%:

R AR

RANRRRRRRRAR RN

;IS IN AN RH1
;:GET OUT OF TEST
;SET UP WC FOR ONE WORD
;SETUP BUS ADDRESS
JSETUP BUS ADDRESS EXTENSION
;DEVICE 7
;TELL IT TO WRITEO
;CLEAR BIT COUNTER
;1S RDY SET
;BIT IS SET
;COUNT UP
;NOT FINISHED COUNTING
;GET READY 70O DO IT AGAIN
;IS IT SET YET?

JYES

;COUNT UP

3RHCS1,CS1
aRHW(C ,W(
aRMBA,BA
R1

;SAVE RHCS1
;SAVE WORD COUNT
;SAVE BUS ADDRESS
;1S 1T AN RH11

CLR

BAE

;CLEAR BAE

JMP

86%

MOV
MOV
MOV
MOV
MOV

87%
(S3

SRHBAE ,BAE
@RH(CS3,(CS3
aRH(SZ2,(S2
@RHST,DS1
@RHER,ER1
aRHTDB, TDR

aRHMR?2, TC

;NO IT'S A 70
;CLEAR (CS3
; CONTINUE

:SAVE BUS ADDRESS EXTENSION
;SAVE RHCS3
;SAVE (€S2
JSAVE TESTER STATUS
;SAVE ERROR REGISTER
;SAVE TESTER DATA REG.

:SAVE MR2 TESTER REG.

BIT
BNE
ERROR
JSR
BIT
BEQ

#RDY ,aRHCS1
19
102
R7 .WHYFO
#DBL ,dRHCS3
2%

;1S READY SET
;RDY SET CONT. TEST
:READY DID NOT SET
;ANY ERRORS SET

JSR

R7 ,WHYFO

JTELL WHY NOT

JSR

R7 ,ERRTST

ERROR

MOV
MOV
MOV
TST

MOV

2%:

;BIT IS NOT GOING TO SET

MOV

156416

R AN

CLR

87%:

A AN

R1
TST33
#-1,3RHW(
#EVENAD ,aRHBA
#ZERO, aRHBAE
#7 ,38RHCS?2
MIRITEOQ,BRHCST
BITCNT
#RDY ,a8RHCSI
33
BITCNT
18%
BITCNT
#RDY ,aRHCS1

BEQ

003416
003424
003422
003432
003436
003442
003440

AR RN

TST
B8MI
MOV
MOV
MoV
MOV
MOV
CLR
8IT
BNE
INC
BNE
CLR
BIT

BEQ
003420
003444
003414

RRAR R AN

JSR

125

R7.,CLEER

;1S DOUBLE SET
;DBL SET

:DBL DID SET ON A 1 WORD TRANSFER

;CLEAR ERRORS

22232222223 3223223 232333332833 222 2320232323022 80 0228222200000 8d0

LaTEST 33

DOUBLES TEST FOR TWO WORD BASE & ADDRESS

;*THIS TEST CHECKS THAT DOUBLE WILL SET FOR A
;*TWO WORD TRANSFER STARTING FROM AN ADDRESS

MASSBUS RH70 AND RH11_DIAGNOSTIC

CZRHBD.P11

133

02-MAY-78 10:01

4122

4123

4126

024750

000004

t§733:

005701
100524

4128
4129
4130
4131
4132
4133
413
4135
4136
4137
4138
4139
4140

026764
024772
025000
025006
025012
025014
025020
025022
025026
025034
025036
025042
025044

012777
012777
005037
032777
001015
005237
001371
005037
032777
001004
005237
001401
000770

004000
000061
003446
000200

4142
4143
4164
4145
4146
4147
4148
41649
4150
4151
4152
4153
41564

025046
025054
025062
025070
025072
025074
025100
025106
025110
025116
025124
025132
025140

017737
017737
017737
005701
001406
005037
005037
000137
017737
017737
017737
017737
017737

156256
156252
156246

025156

017737

4127 024756 012777 177776 156346

025046

156342
156330
156316

188:

156274

19%:

003446

003446
000200
003446

003420
003444
003414

DBLWDS:

003416

003424

025124
156244
156240

003416
003424

156204
156200

003432
003436

156210

003422

87$:

868:

4155 025146 017737 156176 003442
4157
4158
4159
4160
4161
4162

4163
4164
4165

4166

4167

025162
025170
025172
025174
025200
025206

025210

025212
025216
025222

156156

003440

007224
002000

156154

032777
001003
104102
004737
032777
001003

000200

004737
004737

007224
006572

104127

004737

SCOPE

TST
BM]

PAGE 79

FOOEY:

ERIR:

050202

(2222223222232 3322222222223 2222222222282 0

R1
TST34

;1S 1T AN 11 OR A 70
;:GET ouT OF TEST

MOV

#=-2, BRHWC

MOV
MOV
MOV
TST
BEQ
CLR
CLR
JMP
MOV
MOV
MOV
MOV
MOV

BRHCST,CS1
BRHWC , WC
SRHBA . BA
R1
87%
BAE
€S3
863
SRHBAE , BAE
BRHCS3.CS3
ARHCS2. (52
aRHST,DS1
@RHER . ER1

;SAVE RHCS1
*SAVE WORD COUNT
*SAVE BUS ADDRESS
IS IT AN RH11
*NO IT'S A 70
CLEAR BAE
*CLEAR CS3
> CONT INUE
*SAVE BUS ADDRESS EXTENSION
*SAVE RHCS3
“SAVE €S2
*SAVE TESTER STATUS
*SAVE ERROR REGISTER

MOV

aRHMR2 . TC

*SAVE MR2 TESTER REG.

MOV
MOV
CLR
BIT
BNE
INC
BNE
CLR
BIT
BNE
INC
BEQ
BR

BIT
BNE
ERROR
JSR
BIT
BNE

ERROR
JSR
JSR

JSR

WEVENAD , 3RHBA
MJRITEO,BRHCS1
BITCNT
#RDY , BRHCS1
DBLWDS
BITCNT
188
BITCNT
FRDY , BRHC S
DBLWDS
BITCNT
DBLWDS
198

SRHTDB, TDR

#RDY , BRHCS1
FOOEY
102
R7,WHYFO
#DBL ,3RHCS3
ERIR

127

R7,WHYFO
R7.CLEER

R7.ERRTST

;SETUP WORD COUNT FOR DOUBLE TRANSFER
*CORRECT BA
TELL IT TO WRITE
*CLEAR BIT COUNTER
IS RDY SET
*BIT IS SET
*COUNT UP
NOT FINISHED COUNTING
*GET READY TO DO IT AGAIN
IS IT SET YET?
*YES
*COUNT UP
BIT IS NOT GOING TO SET

*SAVE TESTER DATA REG.
1S READY SET
RDY IS SET
*RDY DID NOT SET
ANY ERRORS SET
1S DOUBLE SET
*DBL IS SET

*DBL DID NOT SET IN RHCS3
ANY OTHER ERROR SET
*CLEAR ERRORS

ttt't*tfit*t*fitttttt*ttt*i*i*****'tfittttfittttttitttt*tt*ttttt*tt

STEST 34
DOUBLE TEST .3 WORD TRANSFER FROM A BASE 4 ADDRESS
;%THIS TEST CHECKS THAT DBL WILL NOT SET
*«IN RHCS3 AFTER A 3 WORD TRANSFER STARTING
;FROM AN ADDRESS DIVISABLE BY 4
. RH70 ONLY - TM' emeeernnnnnnnns

4173

4177

10:03

DOUBLES TEST FOR TWO WORD BASE 4 ADDRESS

MOV

156140

4168
4169
4170
4171
4172

4174
4175
4176

;*DIVISABLE BY &........ RH70 ONLY..euuvennnnn.

026752
024756

4156

02-MAY-78

it*ttttfit'tfittttt*tt

4125
4126

4141

MACY11 30A(1052)

*ttit*fit***'*t*t*t*tit'*tt*tfii**it*tt*****tt*tifi*t***tttit**ttt

025226
025230
025232

02523

000004
005701
100524

012777

T§734:

177775

156070

SCOPE
TST
BM]

MOV

TSI35

#-3, BRHWC

;IS IT AN 11 OR A 70

:GET out OF TEST

;SET UP FOR A 3 WORD TRANSFER

SEQ 0079

?§£Y11

MASSBUS RH70 AND RH11 _DIAGNOSTIC
CZRHBD.P11
02-MAY-78 10:01
4178
679
4180
4181
4182
4183

4184

4185
4186
4187
4188
4189
4190
419
4192
4193
4194
4195

025242
025250
025256
025262
025270
025272
025276
025300
025304
025312
025314
025320
025322
025324
025324

4196

012777

005037
032777
001015
005237
001371
005037
032777
001004

004000
000061
003446
000200

156040

18%:

003446
003446
000200

005237
001401
000770

003446

017737
017737
017737
005701

156000
155774
155770

4197

156064
156052

003416
003424
025402
155766
155762
155732
155726
155722
155720
155700
000200

007224
002000

30A(1052)
02-MAY-78 10:03 PAGE 80
DOUBLE TEST ,3 WORD TRANSFER FROM A BASE & ADDRESS
MOV
MOV
(LR
BIT
BNE
INC

#EVENAD ,dRHBA
MWRITEQD,aRHCST
BITCNT
#RDY ,a8RHCS1
THREE
BITCNT

;CORRECT BA
;TELL IT TO WRITE
JCLEAR BIT COUNTER
;1S RDY SET
;BIT IS SET
;COUNT UP

CLR
BIT
BNE
INC
BEQ
BR

BITCNT
#RDY ,8RHCST
THREE
BITCNT
THREE
19%

;GET READY TO DO IT AGAIN
;IS IT SET YET?

MOV

aRHCS1,CS1

BEQ

87%

BNE

156016

003420
003444
003414

19%:

:
THREE

MOV
MOV
TST
CLR

003416
003424
003422

003432
003436
003442
003440

87%:

86%:

CLR
JMP
MOV
MOV
MOV
MOV
MOV
MOV

18%

155676

102
R7 ,WHYFO

#DBL ,dRHCS3

ERROR
JSR
JSR
JSR

126
R7 ,WHYFO
R7.,CLEER
R7 ,ERRTST

ERPIP:
B

;1S IT AN RH11
INO IT'S A 70
;CLEAR BAE
;CLEAR (33
; CONTINUE
:SAVE BUS ADDRESS EXTENSION
:SAVE RHCS3
:SAVL (S2
;SAVE TESTER STATUS
;SAVE ERROR REGISTER
;SAVL TESTER DATA REG.
:SAVE MRc TESTER REG.
;1S READY StT
;RDY IS SET
;RDY DID NOT SET

aRHTDB, TDR

ERROR
JSR
BIT

007224
006572
050202

;SAVE RHCS1

:SAVE WORD COUNT
;SAVE BUS ADDRESS

(S3
86%
aRHBAE ,BAE
®RH(CS3,CS3
@RH(CS2,(S2
aRHST,DS1
aRHER,ER1

155662

BEQ

;COUNT UP
;BIT IS NOT GOING TO SET

BAE

TC
aRHMR?2,
#RDY ,3RH(CS1

ERRIP:

cYES

aRHWC
, WC
@RHBA ,BA
R1

MOV
BIT
BNE

;NOT FINISHED COUNTING

ERRIP

;ANY ERRORS SET

;1S DOUBLE SET
;DBL IS SET

ERPIP

:DOUBLE SET ON A 3 WORD TRANSFER
:SEE IF ANY ERROR BITS ARE SET
;CLEAR ERRORS

2222322322232 232222323283 2382323332233

LeTEST 35

323802222222 22f22 822380030020 0R0 2t

DOUBLE TEST ,4 WORDS FROM A BASE & ADDRESS

;*THIS TEST CHECKS THAT DBL WILL SET IN RHCS3
J*AFTER A 4 WORD TRANSFER STARTING WITH AN
;wADDRESS

DIVISABLE

P, RH70 ONLY
3

000004
005701
100524

025550

012777
012777
012777
005037
032777
(21015
0us237

2222222222333

TST35:

177774
004000
000061
003446
000200

003446

BMI

155612
155606
155574
155562

SCOPE
TST

MOV

18%:

2223333823323 2322222223233232323820382233
2823232233202 22223%/]

TST36

#-4 ,3RHWC

MOV

, aRHBA
#EVENAD

CLR
BIT
BNE
INC

BITCNT
#RDY ,3RHCS1T
DBLED
BITCNT

MOV

4aaanaanaanatansnttns

ooooooooooooooooooooooo

#WRITEOQ,3RHCST

;IS IT AN 11 OR A 70

;.GET OUT OF TEST
;SET UP FOR 4 WORD TRANSFER
;CORF.ECT BA
STELL IT TO WRITE
JCLEAR BIT COUNTER
;1S RDY SET
JBIT IS SET
;COUNT UP

SEQ 0080

D 7
MACY11 30A(1052)
02-MAY-78 10:03 PAGE 81
135
DOUBLE TEST ,4 WORDS FROM A BASE & ADDRESS

MASSBUS RH70 AND RH11_DIAGNOSTIC
02-MAY-78 10:01
CZRHBD P11

155540

—_—

003416
003424
025660

003420
003444
003414

DBLED:

BNE
CLR

DBLED
19%

:BIT IS NOT GOING TO SET

MOV
MOV
MOV
TST
BEQ
CLR
CLR
JMP
MOV

@RHCST,CS1
ARHWC ,WC
3RHBA ,BA
R1
87%
BAE
(S3
86%
aRHBAE ,BAE

:SAVE RHCS1
;SAVE WORD COUNT
;SAVE BUS ADDRESS
;1S IT AN RH11
;NO IT'S A 70
;CLEAR BAE
;CLEAR (CS3
;CONTINUE
;SAVE BUS ADDRESS EXTENSION

MOV
Mov
MOV

@RHST . DS1
aRHER,ER1
aRHTDB, TDR

:SAVE TESTER STATUS
;SAVE ERROR REGISTER
;SAVE TESTER DATA REG.

BEQ
BR

87%:

007224
002000

155420

DAYAMS: BIT
BNE

MOV
MOV

MOV

BIT
BNE
ERROR
JSR

ERR29:

050202

;NOT FINISHED COUNTING
;GET READY TO DO IT AGAIN

#RDY ,aRHCS1
DBLED
BITCNT

003416
003424
003422
003432
003436
003442
003440
155404

868%:

18%
BITCNT

8IT
BNE
INC

155510
155504
155454
155450
155444
155442
155422
000200

007224
006572

025756

19%:

003446

nROONN

017737
017737
017737

003446
000200

[V AV, IV, |

001371
005037
032777
001004
005237
001401
000770

4237
4238
4239
4240
4241
42642
6243
4244
4245
4266
4247
4248
4249
4250
4251
4252
4253
4254
4255
4256
6257
4258
4259
4260
4261

025554
025556
025562

b
b —

4234
4235
4236

ERROR
JSR
JSR
JSR

@RH(CS3,CS3
@RH(CS2,CS?2

aRHMR?2,T(

;IS IT SET YET?
JYES
;COUNT UP

:SAVE RH(CS3
;SAVE (S2

;SAVE MR2 TESTER REG.

#RDY ,aRHCS1
DAYAMS
102
R7.WHYFO

;1S READY SET
;JRDY IS SET
JRDY DID NOT SET
:WHAT ERRORS ARE SET

124
R7 ,WHYFO
R7,CLEER

;DOUBLE DID NOT SET AFTER A 4 WORD
;SEE IF ANY ERROR ARE SET
;CLEAR ERRORS

#DBL ,aRH(CS3
ERRZ29

R7 ,ERRTST

;1S DOUBLE SET
JTEST IS OK

;:ttt*ttt*tt**tttttttiititt*tttttt*t*t*tfittfiifi*tfittttttttittt*ttt

DOUBLE TEST 1WORD TRANSFER READ
;*TEST 36
;*THESE TEST CHECK DBL IN RHCS3 WITHREAD FWD AND REV

J*WRITE FWD AND REV AND WITH BAI SET IN RH(CSZ2

025762
025764
025766
025770
025776
026004
026012
026020
026026
026032
026040
026042
026046

000004
005701
100532
012777
012777

012777
012777
012777
005037
032777
001015
005237
001371

TST36:

177777
004000
000000
000007
000071
003446
000200
003446

155270

18%:

:*OPERATION BEING PREFORMED WILL BE PRINTED OUT
;*IN ERROR MESSAGE.
¥* X ieeinccancanans RH70 ONLY......c0vveecncccaccons

LL
R L

SCOPE

TST
BMI
MoV
MOV
MOV
MOV
MoV
CLR
BIT
BNE
INC
BNE

R1
1ST37
#-1,aRHWC
#EVENAD ,aRHBA
#ZERO, aRHBAE

#7 ,dRHCS2
#READO,aRHCS1
BITCNT
#RDY ,aRH(CS1
33
BITCNT
188

;IS IN AN RH11
;;GET OUT OF TEST
;SET UP WC FOR ONE WORD
;SETUP BUS ADDRESS
;SETUP BUS ADDRESS EXTENSION
;DEVICE 7
;TELL IT TO READO
;CLEAR BIT COUNTER
;1S RDY SET
;BIT IS SET
;COUNT UP
;NOT FINISHED COUNTING

SEQ 0081

4290
4291
4292
4293
4294
4295
4296
4297

4298
4299
4300

4301
4302
4303

026050
026054
026062
026064
026070
026072
026074
026074
026102
026110
026116
026120
026122
026126
026132
026136

005037
032777
001004
005237
001401
000770

003446
000200

003420
003444
003414

19%:

CLR
BIT
BNE
INC

BITCNT
#RDY ,aRHCST

;GET READY TO DO IT AGAIN
;IS IT SET YET?

3s
19%

;BIT IS NOT GOING TO SET

Mov
MOV
MOV
TST
BEQ
CLR

3RHCS1,CST
aRHWC ,W(C
aRHBA ,BA
R1
87%
BAE

:SAVE RHCS1
:SAVE WORD COUNT
;SAVE BUS ADDRESS
;1S IT AN RH11
:NO IT'S A 70
;CLEAR BAE

JMP

863

; CONTINUE

MOV
MOV

@RH(CS3,CS3
BRH(CS2,(S2

B8EQ
BR

3%:

CLR

000200

003416
003424
003422
003432
003436
003442
003440
155112

87%:

007224
002000

155126

1%:

026144
026152
026160
026166

026174
026202
026210
026216
026220
026222
026226
026234
026236
026240
026244
026250

155246

003446

017737
017737
017737
005701

007224
004737

02-MAY-78 10:03 PAGE 82
MACY11 30A(1052)
136
DOUBLE TEST TWORD TRANSFER READ

MASSBUS RH70 AND RH11 DIAGNOSTIC
CZRHBD.P11
02-MAY-78 10:01

86%:

050202

Mov
MOV
MOV

MOV
BIT
BNE
ERROR
JSR
BIT

BEQ

ERROR
JSR
JSR

2$:

006572

MOV

JSR

38
BITCNT

(sS3

aRHBAE ,BAE

aRHST,DS1
aRHER,ER1
aRHTDB, TDR

aRHMRZ, TC
#RDY ,8RHCS1
13
102
R7 ,WHYFO

#DBL ,8RHCS3

154
R7 ,WHYFO
R7,CLEER

R7,ERRTST

JYES
;COUNT UP

:CLEAR (S3

:SAVE BUS ADDRESS EXTENSION

;SAVE RH(CS3
;SAVE (S2

;SAVE TESTER STATUS
:SAVE ERROR REGISTER
;SAVE TESTER DATA REG.

;SAVE MRZ TESTER REG.
;1S READY SET
;RDY SET CONT. TEST
;READY DID NOT SET
;ANY ERRORS SET
;1S DOUBLE SET

;DBL SET
:DBL DID SET ON A 1 WORD TRANSFER
JTELL WHY NOT
;CLEAR ERRORS

22222233323333233X2T2X222222X2222
2222322232323 22228238223228232322%0%022]

SATEST 37

DOUBLE TEST WITH 2 WORD TRANSFER AND BAI SET
;*THESE TEST CHECK DBL IN RHCS3 WITHREAD FWD AND REV
*+WwRITE FWD AND REV AND WITH BAI SET IN RHCS2
:*OPERATION BEING PREFORMED WILL BE PRINTED OUT
;*IN ERROR MESSAGE.
JXeeeososonnacscvas RH?O ONLY...oceereecccnaccaccnsns

*fit'*‘**"*'fi**t.fififi""'*t."fi'***fi*'*fi***'t***"t"'fiQ*'fii'fit

026254
026256
026260
026262
026270

026354

000004
005701
100532

012777
012777
012777
012777
012777
005037
032777
001015
005237
001371
005037
032777
001004

TST37

177776

000200

154776

18%:

003446
003446
000200

154754

19%:

SCOPE

TST
BM]
MOV
MOV
MOV

R1
TST40
#-2 ,8RHW(
#EVENAD ,aRHBA
#2ERO,aRHBAE

MOV
MoV
CLR

#7'BA] ,8RHCS2
MJRITEO,IRHCST
BITCNT

BNE
CLR

18%
BITCNT

8IT
BNE
INC

8IT
BNE

#RDY ,aRHCS1
3s
BITCNT

#RDY ,aRHCS1
33

;IS IN AN RH11
;;GET OUT OF TEST
:SET UP WC FOR TWO WORD
;SETUP BUS ADDRESS
;SETUP BUS ADDRESS EXTENSION

;DEVICE 7
STELL IT TO WRITEQ
JCLEAR BIT COUNTER
;1S RDY SET
;BIT IS SET
JCOUNT UP

;NOT FINISHED COUNTING
;GET READY TO DO IT AGAIN
;IS IT SET YET?
JYES

SEQ 0082

MACY11 30A(1052)

MASSBUS RH70 AND RH11 DIAGNOSTIC
CZRHBD.P11
02-MAY-78 10:01
4346

6347

4348
4349
4350
4351
4352
4353
4354
4355
4356
4357
4358
4359

026356
026362

005237
001601
000770

003446

017737
017737
017737
005701

154736
154732
154726

4361
4362
4363
4364
4365
4366
4367
4368
4369
4370
4371
4372
4373
4374
4375
4376

3%:

003416
003424

4360

026444
154724
154720
154670
154664
154660
154656
154636
000200

003416
003424
003422
003432
003436
003442
003440
154620

87%:

007224
002000

154634

1%:

007224
006572
050202

026542

86%:

10:03

PAGE 83

INC
BEQ
BR

BITCNT
33
19%

;COUNT UP
:BIT 1S NOT GOING TO SET

MOV
MOV
MOV
TST
BEQ
CLR
CLR
JMP
MOV

aRHCS1,C
ARHWC , WC
SRHBA ,BA
R1
87%
BAE
(S3
863
aRHBAE , BAE

;SAVE RHCS1
;SAVE WORD COUNT
;SAVE BUS ADDRESS
;1S IT AN RH11
JNO IT'S A 70
;CLEAR BAE
;CLEAR (€S3
; CONT INUE
:SAVE BUS ADDRESS EXTENSION

MOV
MOV
MOV

@RHST,DST
3RHER,ERT
aRHTDB, TDR

:SAVE TESTER STATUS
:SAVE ERROR REGISTER
;SAVE TESTER DATA REG.

R7 .WHYFO

;ANY ERRORS SET

MOV
MOV

MOV
BIT

@RH(CS3,CS3
@RH(S2.,CS2

BNE
ERROR

3RHMRZ, T(C
#RDY ,a8RHCS1
18
102

BIT

#DBL ,dRH(CS3

JSR

BEQ

2s:
; R

DOUBLE TEST WITH 2 WORD TRANSFER AND BAI SET

137

003420
003444
003414

02-MAY-78

ERROR
JSR
JSR
JSR

153
R7 ,WHYFO
R7,CLEER
R7 ,ERRTST

;SAVE RHCS3
:SAVE (S2

:SAVE MR2 TESTER REG.
;1S READY SET
;RDY SET CONT. TEST
JREADY DID NOT SET
;1S DOUBLE SET
.DBL SET

:DBL DID SET ON A 2 WORD TRANSFER

;TELL WHY NOT
;CLEAR ERRORS

Z22223 223232223223 23222238 2323222322233 22328223223220 0320002002000 220d2dst)

S*TEST 40
DBL TEST 2 WORD TRANSFER WITH BAI AND WRITE REV
;*THESE TEST CHECK DBL IN RHCS3 WITHREAD FWD AND REV
J*WRITE FWD AND REV AND WITH BAI SET IN RHCSZ2
;*OPERATION BEING PREFORMED WILL BE PRINTED OUT
'IN ERROR MESSAGE.

................ RH70 ONLY....cocveennvencnracanns

tiit'ttittfittttt*tttttttttttt*fit'*ttttfit"ttfltt'fit*tttt*'ttt'tt

TST40

4383
4384
4385
4386
4387
4388
4389
4390
4391
4392

(026546
026550
026552
026554
026562
026570
026576
026604
026612
026616

000004
005701
100532
012777
012777
012777
012777
012777
005037
83?5{;

4394
4395

026626
026632

003446

4397

026640

005237
001371
005037
032777

4399

026650

003446

4401

026656

005237
001401
000770

177776
004000
000000
000017
000067
003446
000200

003446
000200

154550
154544
154562
154534
154516

SCOPE

TST
BMI

MOV

R1
TST41
#-2 ,3RHW(C

MOV

#ZERO,aRHBAE

MOV

154504

18%:

154462

19%:

#EVENAD ,aRHBA

;IS IN AN RH11
;.GET OUT OF TEST

;SET UP WC FOR TWO WORD
;SETUP BUS ADDRESS

;SETUP BUS ADDRESS EXTENSION

MOV
MOV
CLR

#7!BA],3RHCS2
MRITEG,BRHCST
BITCNT

;DEVICE 7
JTELL IT TO WRITEG
;CLEAR BIT COUNTER

BNE
INC
BNE
CLR

38
BITCNT
18%
BITCNT

;BIT IS SET
s COUNT UP
sNOT FINISHED COUNTING
;GET READY TO DO IT AGAIN

INC
BEQ
BR

BITCNT
33
19%

;COUNT UP
;BIT IS NOT GOING 10 SET

BIT

BIT
BNE

#RDY ,3RHCS1

#RDY ,aRHCST
33

;IS RDY SET

IS IT SET YET?
JYES

SEQ 0083

4402
4403
44604
4405
44606
4407
4408
4409
44610
4611
44612
4613
4414
44615
4416
L4617
4418
4419
4420
4421
4422
4423
4424
4425
64626
4427
4428

026660
026660
026666
026674

026702
026704
026706
026712
026716
026722
026730

017737
017737
017737
005701

154444
154440
1546434

003420
003444
003414

154432

154426
154376
154372
154366
154364

154344
000200
007224
002000

003416
003424
003422
003432
003436
003442
003440

154342

007224
006572
050202

TDR
sRHTDB,

BIT

B8EQ

ERROR
JSR
JSR
JSR

aRHMRZ2,
TC
#RDY ,aRHCS1

13
102
R7 ,WHYFO

;READY DID NOT SET

;ANY ERRORS SET
;1S DOUBLE SET
;DBL SET
:DBL DID SET ON A 2 WORD TRANSFER
;TELL WHY NOT

#DBL ,aRH(CS3

pid3

155
R7.,WHYFO
R7,CLEER
R7.ERRTST

;CLEAR ERRORS

T N
S T L L L L

;*OPERATION BEING PREFORMED WILL BE PRINTED OUT

;*IN ERROR MESSAGE.

I® et eeeeanaeenens RH70 ONLY

. tQtttt"fitttti*ttttli"t"tttttfitfitflt***'t'tittttt*ttt***ttttti

012777
012777
012777
012777
012777
005037
032777
001015
005237
001371
005037
032777
001004
005237
001401
000770

017737
017737

TST41

177776

004002
QU000
000007
000061
003446
000200

154212

003446
000200

154170

MOV
MoV

MOV
MOV
18%:

19%:

003446

003420
003444

SCOPE
TST

8MI]
MOV

154256
154252
154270
154242
154224

003446

ONFO

000004
005701
100532

—

027040
027042
027044
027046
027054
027062
027070
027076
027104
27110
027116
027120
027124
027126
027132
027140
027142
027146
027150
027152
027152
027160

&Hon

4456
6457

MOV

(S3
86%
aRHBAE ,BAE
@RH(CS3,(S3
aRH(CS2,(S2
aRHST DS
aRHER ,ER1

J*UR]TE FWD AND REV AND WITH BAI SET [N RH(CSZ

4454

4455

1%:

87%

BAE

MOV
BIT
B8NE
ERROR
JSR

;SAVE BUS ADDRESS

;IS IT AN RHI
:NO IT'S A 70
. CLEAR BAE
;CLEAR (S3
: CONT INUE
:SAVE BUS ADDRESS EXTENSION
:SAVE RHCS3
:SAVE (S2
;SAVE TESTER STATUS
:SAVE ERROR REGISTER
;SAVE TESTER DATA REG.
;SAVE MR2 TESTER REG.
;IS READY SET
;RDY SET CONT. TEST

DBL TEST 2 WORD TRANSFER ODD ADD.
;*THESE TEST CHECK DBL IN RHCS3 WITHREAD FWD AND REV

4453

86%:

;SAVE WORD COUNT

ARHWC ,W(C
aRHBA ,BA
R1

CLR

CLR
JMP
MOV
MOV
MOV
MoV
MOV

;SAVE RHCS1

aRH(CS1,CS1

'TEST 41

—

4445
44646
4447
4448
4449
4450
4451
4452

87%:

2%:

43¢
4433
44634

4444

MOV
MOV
TST

154326

0‘030
%31

4436
4437
4438
4439
4440
4441
4442
4443

MOV

BEQ

L429

4435

3%:

003416
003424

026736

02-MAY-78 10:03 PAGE 84
MACY11 30A(1052)
140
DBL TEST 2 WORD TRANSFER WITH BAI AND WRITE REV

MASSBUS RH70 AND RH11 DIAGNOSTIC
CZRHBD.P11
02-MA* -78 10:01

TST4?2
#-2 ,aRHW(
, aRHBA
#0DDAD
#ZERO, aRHBAE

#7 ,aRHCS2
MIRITEOQ,IRHCST

CLR
BIT

BITCNT
#RDY ,aRH(CS1

INC

BITCNT

BNE

BNE
CLR
BIT

18%
BITCNT

#RDY ,aRHCS

BNE
INC
BEQ
BR

3s
BITCNT
3s

MOV

@RHCS1,CS

MOV

19%

aRHW( ,WC

;IS IN AN RHI
;.GET OUT OF TEST
;JSET UP WC FOR TWO WORD
;SETUP BUS ADDRESS
;SETUP BUS ADDRESS EXTENSION
;DEVICE 7
sTELL IT TO WRITEO
;CLEAR BIT COUNTER
;1S RDY SET
;BIT IS SET
s COUNT UP
;NOT FINISHED COUNTING

;GET READY TO DO IT AGAIN
IS IT SET YET?
JYES
s COUNT UP
;BIT IS NOT GOING TO SET

s SAVE RH(CS1T
;SAVE WORD COUNT

SEQ 0084

4458
4459
4460
4461
4662
4463

4464
4465
44666

4667
4468
4469
4470
4671
4472
4473
4474
4475
4476
4477
4478
4479

027166
027174
027176
027200
027204
027210
027214
027222
027230
027236
027244
027252
027260
027266
027274
027276
027300

4480
4481
4482
4483
44684
4485
4486
4487

027326

4489
4490
449
4492

027332
027334
027336
027340
027346
027354
027362
027370
027376
027402
027410
027412
027416
027420
027424

4488

4493
4494
4495
4496
4497
4498
4499
4500
4501
4502
4503
4504
4505
4506
4507
4508
4509
4510
4511
4512
4513

017737
005701
001406

005037

1564142

003414

154140
154134
154104
154100
154074
154072
154052
000200

007224
002000

MoV
TST

aRHBA,BA
R1

CLR

BAE

MOV

aRHBAE ,BAE

BEQ

003416
003424

027230

MACY11 30A(1052)
02-MAY-78 10:03 PAGE 85
T41
DBL TEST 2 WORD TRANSFER ODD ADD.

MASSBUS RH70 AND RH11 _DIAGNOSTIC
CZRHBD P11
02-MAY-78 10:01

003416
003424
003422
003432
003436
003442
003440

87%:

B6$:

007224
006572
050202

MOV
MOV

1%:

2%:

87%

CS3
86%

;CLEAR (S3
s CONTINUE

;CLEAR BAE

;SAVE BUS ADDRESS EXTENSION

:SAVE RH(CS3
JSAVE (S2
;SAVE TESTER STATUS

aRH(CS3,(S3
@aRHCSZ2,(CS2

aRHST,DS1
aRHER,ER1

MOV
BIT

ARHMR2,
T(
:QDY.GRHCS1

ERROR
JSR
BIT
BEQ
ERROR
JSR
JSR
JSR

102
R7,WHYFO
#DBL ,3RHCS3
2%
156
R7,WHYFO
R7,CLEER
R7 ,ERRTST

BNE

;SAVE BUS ADDRESS

;IS IT AN RHI
JNO IT'S A 70

MOV
MOV
MOV

154034

154050

CLR
JMP

SEQ 0085

;SAVE ERROR REGISTER

;SAVE TESTER DATA REG.

aRHTDB, TDR

;SAVE MR? TESTER REG.
;1S READY SET
JRDY SET CONT. TEST

JREADY DID NCT SET
;ANY ERRORS SET

;1S DOUBLE SET

;DBL SET
;DBL DID SET ON A 2 WORD TRANSFER
sTELL WHY NOT
s CLEAR ERRORS

;;tttt*tttttttttttti'tfitttttt*tttttttttt*ttttttttttttttttttttttti

J*TEST &2

DBL

TEST EVEN ADD.

WRITE FWD

;«THESE TEST CHECK DBL IN RHCS3 WITHREAD FWD AND REV

:*WRITE FWD AND REV AND WITH BAI SET IN RH(CSZ2

:*OPERATION BEING PREFORMED WILL BE PRINTED OUT
;*IN ERROR MESSAGE.

T RH70 ONLY....coeieereeccnaceancns

SR 2322222323233

027432
027434
027440
027442
027444
027444
027452
027460
027466
027470

000004
005701
100532

012777
012777
012777
012777
012777
005037
032777
001015
005237
001371
005037
032777
001004
005237
001401
000770

017737
017737
017737
005701
001406

TST42:

177776

153760
153776
153750
153732
153720

18%:

003446
003446
000200

153676

19%:

003446

153660
153654
153650

003420
003444
003414

3s:

222088222

R0ttt

MOV
Mov
MOV
MOV
MOV
CLR
BIT
BNE
INC
BNE
CLR
BIT
BNE
INC
BEQ
BR

#-2 ,3RHWC
#EVENAD ,aRHBA
#1ERO,aRHBAE
#7 ,8RHCS?2
MWRITEG ,aRH(CST
BITCNT
#RDY ,8RH(CS1
3s
BITCNT
18%
BITCNT
#RDY ,aRHCST
3s
BITCNT
33
19%

MOV

@dRHCS1, (ST

;SAVE RHCS1

BEQ

87%

JIS IT AN RH
JNO IT'S A 70

8MI1

153764

2323 3222232303223 2230222232

SCOPE
TST

MOV
MOV
TST

TST43

aRHWC ,W(
aRHBA ,BA
R1

;1S IN AN RH11
;.GET OUT OF TEST
;SET UP WC FOR TWO WORD
s SETUP BUS ADDRESS
;SETUP BUS ADDRESS EXTENSION
;DEVICE 7

JTELL IT TO WRITEG
;CLEAR BIT COUNTER

;1S RDY SET
;BIT IS SET
s COUNT UP

sNOT FINISHED COUNTING
;GET READY TO DO IT AGAIN
;IS IT SET YET?
JYES
;sCOUNT UP
;BIT IS NOT GOING TO SE1T

;SAVE WORD COUNT
;SAVE BUS ADDRESS

MASSBUS RH70 AND RH11 DIAGNOSTIC

CZRHBD.P11

027472
027476
027502

4518
4519
4520
4521
4522
4523
4524

027514
027522
027530
027536
027544
027552
027560

4517

4525
4526
4527
4528
4529
4530
4531
4532
4533
4534
4535

4536
4537
4538
4539
4540
4541
4542
4543
4544

4545

4546
4547
4548
4549

4550
4551
4552
4553
4554
4555

142

02-MAY-78 10:01

4514
6515
6316

005037

027506

003416
003424
027522

153646

153642
153612
153606
153602
153600
153560
000200

027566
027570
027572
027576
027604
027606
027610
027614
027620

007224
002000

02-MAY-78

MACY11 30A(1052)

10:03
PAGE 86
DBL TEST EVEN ADD. WRITE FWD

CLR

BAE

;CLEAR BAE

JMP
MOV

86%
oRHBAE ,BAE

; CONT INUE
:SAVE BUS ADDRESS EXTENSION

MOV
MOV
MoV

@RHST,DS1
@RHER,ER1
aRHTDB, TDR

CLR

003416
003424
003422
003432
003436
003442
003440

87%:

86%:

153556

007224
006572

1%:

(S3

@RHCS3,(CS3
aRH(CS2,CS2

:SAVE RHCS3
:SAVE (S2

;SAVE TESTER STATUS
;SAVE ERROR REGISTER
;SAVE TESTER DATA REG.

;SAVE MRZ2 TESTER REG.
;1S READY SET

#DBL ,a8RH(CS3

;1S DOUBLE SET

ERROR
JSR

BEO

ERROR
JSR
JSR
JSR

:CLEAR (CS3

SRHMRZ2, TC
#RDY ,’aRHCS1
1%
102
R7 ,WHYFO

BIT

2%:

050202

MOV
MOV

MOV
8IT
BNE

153542

157
R7 .WHYFO
R7,CLEER
R7 ,ERRTST

A AR AN RRANNARAR

JRDY SET CONT. TEST
JREADY DID NOT SET
;ANY ERRORS SET
;DBL SET

:DBL DID SET ON A 2 WORD TRANSFER
;TELL WHY NOT
;CLEAR ERRORS

TR TAAARRANNRRRAARRARAAAARRNNNNNNRRRARARAR

%TEST 43
DBL TEST 2 WORD ODD ADD. WRITE REV
;*THESE TEST CHECK DBL IN RHCS3 WITHREAD FWD AND REV

:*WRITE FWD AND REV AND WITH BAI SET IN RH(CS?Z
:*0OPERATION BEING PREFORMED WILL BE PRINTED OUT
;*IN ERROR MESSAGE.
c¥ e eecccacssscnnns RH70 ONLY....covieeencesencanoocs

fi’..*t"’*“*'fi**".**"'**fi“***k.***t*'**.*t.t*'*'*'***‘**"“fi

027624
027626

027630
027632

027640
027646
027654
027662
027670
027674
027702

027704
027710
027712
027716
027724
027726
027732
027734
027736
027736
027744
027752
027760
027762
027764
027770
027774

000004
005701
100532
012777
012777
012777
012777
012777
005037
032777
001015
005237
001371
005037
032777
001004
005237
001401
000770

017737
017737
017737
005701
001406
005037
005037
000137

TST43
177776
004002
000000
000007
000067
003446
000200

153404

18%:

19%:

003446

153366
153362
153356

003416
003424
030014

003420
003444
003414

R1
TST44

MOV
MOV

#0DDAD , aRHBA
#2ERO, aRHBAE

MOV
MOV

003446
003446
000200

TST
8M]

MOV

153472
153466
153504
153456
153440

153426

SCOPE

3%:

#-2 ,aRHW(

#7.,38RHCS2
#MWRITEG ,dRHCST

;1S IN AN RH11
::GET OUT OF TEST

JSET UP WC FOR TWO WORD

;SETUP BUS ADDRESS
;SETUP BUS ADDRESS EXTENSION

;DEVICE 7
JTELL IT TO WRITES

;CLEAR BIT COUNTER
;1S RDY SET
;BIT IS SET
;COUNT UP

CLR
81T
BNE
INC
B8NE
CLR
BIT
BNE
INC
8EQ
B8R

BITCNT
#RDY ,aRH(CS1
3s
BITCNT

188
BITCNT
#RDY ,aRH(CS1
3s
BITCNT
is
19%

;NOT FINISHED COUNTING
;GET READY TO DO IT AGAIN
;IS IT SET YET?
:YES
JCOUNT ‘P
;BIT IS NOT GOING TO SET

MOV
MoV
MOV

aRHCS1,CS1
aRHWC ,W(C
aRHBA ,BA

:SAVE RH(CS1
;SAVE WORD COUNT
;SAVE BUS ADDRESS

BEQ

87%

:NO IT'S A 70

TST

CLR

CLR
JMP

BAE

(S3
86%

;IS IT AN RH1M

;CLEAR BAE

:CLEAR (S3
: CONT INUE

SEQ 0086

MASSBUS RH70 AND RH11 DIAGNOSTIC
CZRHBD.P11
02-MAY-78 10:01
4570
Y4
4572
4573
4574

017737
017737
017737
017737
017737
017737
017737
032777
001003

4575
4576
4577
4578
4579
4580
4581
4582
4583
4584

4585
4586
4587
4588

153354
153350
153320
153314
153310
153306
153266
000200

003416
003424
003422
003432
003436
003442
003440
153250

007224
002000

153264

007224
006572

030106
030112

MOV

86%:

MOV

1%:

050202

MOV
MOV
MOV
MOV
MOV

8IT
BNE
ERROR
JSR
81T
BNE
ERROR
JSR
JSR
JSR

;SAVE BUS ADDRESS EXTENSION

aRHBAE ,BAE

:SAVE
;SAVE
;SAVE
;SAVE
:SAVE

@RHCS3,(S3
adRH(CS2,(S2

@RHST,DS1
aRHER,ER1
aRHTDB, TDR

RH(CS3
(€S2
TESTER STATUS
ERROR REGISTER
TESTER DATA REG.

;SAVE MR2 TESTER REG.
;1S READY SET
;RDY SET CONT. TEST
;READY DID NOT SET
;ANY ERRORS SET
.1S DOUBLE SET
;DBL SET
:DBL DIDN'T SET ON A 2 WORD TRANSFER
;TELL WHY NOT
;CLEAR ERRORS

aRHMRZ2,
TC

#RDY ,3RH(S1
18
102
R7 ,WHYFO
#DBL ,3RHCS3

160
R7 ,WHYFO

R7,CLEER

R7 ,ERRTST

AR AR AR ARRNNNRNNR

SEQ 0087

AR ARARRARRRNRRRRNRRARRRARRRARNRNARARRRRAS

DBL TEST 3 WORD ODD ADD. WRITE REV
;*THESE TEST CHECK DBL IN RH(CS3 WITHREAD FWD AND REV

*TEST 44

;*WRITE FWD AND REV AND WITH BAI SET IN RHCSZ
;*OPERATION BEING PREFORMED WILL BE PRINTED OUT
:'IN ERROR MESSAGE.

RH70 ONLY

tttfitttttttQtfitt*tttttit'ttttttttttitittttl't.tfittttt'ttt*tltfit

030116
030120
030122
030124

030132
030140

030146
030154
030162
030166

030174
030176

000004
005701
100532
012777
012777

012777
012777
012777
005037
032777
001015
005237
001371
005037
032777
001004
005237
001401
000770
017737
017737
017737
005701

4625

87%:

2%:

4589
4590
4591
4592

4593
4594
4595
4596
4597

10:03 PAGE 87
02-MAY-78
MACY11 30A(1052)
T43
DBL TEST 2 WORD ODD ADD. WRITE REV

017737

TST44

177775
004002
000000
000007
000067
003446
000200

153200
153174
153212
153164
153146
153134

18%:

003446
003446
000200

153112

19%:

003446

153074
153070
153064

003416
003424
030306
153062
153056
153026

003420
003444
003414

003416
003424
003422

3s:

SCOPE
TST
aMI
MOV
MOV
MOV
MOV
MOV
CLR
BIT

BNE
INC
BNE
CLR
BIT
BNE
INC
BEQ
BR

MOV

MOV
MOV

87%:

86%:

TST
BEQ
CLR
CLR
JMP

MOV

R1
TST45
#-3,3RHWC

#0DDAD
, aRHBA
#ZERO, aRHBAE

#7 ,aRHCS2
MWRITEG ,BRHCST
8ITCNT
#RDY ,ARHCST

BITCNT
18%
BITCNT
#RDY ,@RHCS1
3s
BITCNT

19%

@aRHCS1T,CS1
aRHW( ,W(
aRHBA ,BA
R1

87%

BAE

(S3

86%

aRHBAE ,BAE

@RH(CS3,CS3
aRH(CSZ,(S2

;1S IN AN RH11
;.GET OUT OF TEST
;SET UP WC FOR THREE WORD
;SETUP BUS ADDRESS
;SETUP BUS ADDRESS EXTENSION
;DEVICE 7
JTELL IT TO WRITES
;CLEAR BIT COUNTER
;1S RDY SET
;BIT IS SET
;COUNT UP
;NOT FINISHED COUNTING
;JGET READY TO DO IT AGAIN
;IS IT SET YET?
JYES
;COUNT UP
;BIT IS NOT GOING TO SET

:SAVE RHCS1

;SAVE WORD COUNT
;SAVE BUS ADDRESS

;1S IT AN RH11
:NO IT'S A 70
;CLEAR BAE

;CLEAR (S3

s CONTINUE
;SAVE BUS ADDRESS EXTENSION

;SAVE RH(CS3
;SAVE (S2

4626

4627
4628

030314

030322
030330

017737
017737
017737
017737
03c/777
001003

153022
153016
153014
152774
000200

007224
002000

02-MAY-78
10:03 PAGE 88
MACY11 30A(1052)
T44
DBL TEST 3 WORD ODD ADD. WRITE REV

MASSBUS RH70 AND RH11 DIAGNOSTIC
CZRHBD.P11
02-MAY-78 10:01

003432
003436
003442
003440
152756

152772

007224
006572
050202

1%:

aRHST,DS1
aRHER,CR1
aRHTDB, TDR
aRHMRZ2,
TC
#RDY ,aRH(CST
1
102
R7 ,WHYFO
#DBL ,’8RHCS3
$
161
R7 ,WHYFO

JSR

R7,ERRTST

JSR

2%:
AR

MOV
Mov
MOV
MOV
BIT
BNE
ERROR
JSR
BIT
BEQ
ERROR
JSR
AR

;SAVE TESTER STATUS
;SAVE ERROR REGISTER
;SAVE TESTER DATA REG.
;SAVE MR2 TESTER REG.
;1S READY SET
JRDY SET CONT. TEST
JREADY DID NOT SET
JANY ERRORS SET
;1S DOUBLE SET
.DBL SET

;DBL DID SET ON A 3 WORD TRANSFER
JTELL WHY NOT
;CLEAR ERRORS

R7,CLEER

AN AARAANAANR R AR

SEQ 0088

TR ARAARRNRRRRNRRRAARRANARANNARRRRARRRN

*TEST 45
DBL TEST 2 WORD READ FWD
:*THESE TEST CHECK DBL IN RHCS3 WITHREAD FWD AND REV

;*WRITE FWD AND REV AND WITH BAI SET IN RH(CSZ
*OPERATION BEING PREFORMED WILL BE PRINTED OUT
;*IN ERROR MESSAGE.

e RH70 ONLY

000004
005701
100532

012777
012777
012777
012777
012777
005037
032777
001015
005237
001371
005037
032777
001004
005237
001401
000770

TST45

177776
004000
000000
000007
000071
003446
000200

152706
152702
152720
152672
152654
152642

Mov
MOV

18%:

003446

003446
000200

152620

19%:

003446
3s:

017737

152522

#7 ,8RHCS?2
#READO,aRHCST

BITCNT

BNE
CLR
8IT

18%
BITCNT
ARDY ,aRHCS1

INC

BITCNT

B8R

19%

BNE

MOV
MOV
MOV

3RHCS1,CT
aRHWC
, WC
aRHBA ,BA
R1

87%

CLR

BAE

JMP
MOV
MOV

86%
oRHBAE ,BAE
@RH(CS3.CS3

CLR

869%:

#EVENAD ,aRHBA
#7ERO,aRHBAE

INC

BNE

TST

87%:

TST46
#-2 ,aRHWC

BITCNT
#RDY ,a8RHCS1

BEQ

003416
003424
003422
003432
003436
003442

CLR
8IT

8EQ

003420
003444
003414

017737
017737
017737
005701

SCOPE
TST
Ml
MOV
MOV
Mov

(S3

MOV

8RH(CS2,(S2

MOV

aRHTDB, TDR

MOV
MOV

@RHST,DS1
aRHER,ER1

;IS IN AN RH11
;.GET OUT OF TEST
;JSET UP WC FOR TWO WORD
;SETUP BUS ADDRESS
;SETUP BUS ADDRESS EXTENSION
JDEVICE 7
;TELL IT TO READO
sCLEAR BIT COUNTER
;1S RDY SET
;BIT IS SET
;COUNT UP
sNOT FINISHED COUNTING
;GET READY TO DO IT AGAIN
IS IT SET YET?
s YES
;COUNT UP
:BIT IS NOT GOING TO SET

;SAVE RHCS1
;SAVE WORD COUNT
;SAVE BUS ADDRESS
;IS IT AN RH11
:NO IT'S A 70
;CLEAR BAE
;CLEAR (S3
; CONT INUE
:SAVE BUS ADDRESS EXTENSION
:SAVE RH(CS3

;SAVE (CS2

;SAVE TESTER STATUS
:SAVE ERROR REGISTER
;SAVE TESTER DATA REG.

7
L
02-MAY-78 10:03
MACY11 30A(1052)
T45S
DBL TEST 2 WORD READ FWD

MASSBUS RH70 AND RH11 DIAGNOSTIC
CZRHBD .P11
02-MAY-78 10:01
4682
4683
4684
4685
4686
4687
4688
4689
4690
4691
4692
4693
4694
4695
4696
4697
4698
4699
4700
4701
4702
4703
4704
4705
4706
4707
4708
4709
4710

4711
4712
4713

4714
4715
4716
4717
4718
4719
4720
4721
4722
4723
4724
4725
4726
4727
4728
4729
4730

4731
4732
4733
4734
4735
4736
4737

017737
032777
001003

152502
000200

007224
002000

003440
152464

152500

1%:

MOV
BIT
BNE
ERROR
JSR
BIT
BNE

ERROR

007224
006572
050202

2s:

JSR
JSR
JSR

#RDY ,aRHCST
1$

102
R7 ,WHYFO
#DBL ,aRH(S3

;1S DOUBLE SET
.DBL SET

22232222223 32322 2233232223232

’-resr 46

SEQ 0089

;SAVE MR2 TESTER REG.
;1S READY SET
JRDY SET CONT. TEST
JREADY DID NOT SET
JANY ERRORS SET

TC
aRHMRZ,

162
R7 ,WHYFO
R7,CLEER
R7 ,ERRTST

PAGE 89

;DBL DIDN'T SET ON A 2 WORD TRANSFER
;TELL WHY NOT
;CLEAR ERRORS

232322323 2232228 8280222000 RR

R st ddRsd]

DBL TEST 2 WORD ODD ADD. READ FWD
;*THESE TEST CHECK DBL IN RHCS3 WITHREAD FWD AND REV

;*WRITE FWD AND REV AND WITH BAI SET IN RHCSZ2
:*OPERATION BEING PREFORMED WILL BE PRINTED OUT
*IN ERROR MESSAGE.
RH70 ONLY

-----------------------

tttittttfit*ttlttt*tttttt*tttt**tt*tt*tt*ttttfitt*lti*ttt*ttt*ttt

030702
030704
030706
030710
030716

030724
030732
030740
030746
030752
030762

000004
005701
100532

012777
012777
012777
012777
012777
005037
032777
001015
005237
001371
005037
032777
001004
005237
001401
000770
017737
017737
017737

TST46

177776

004002
000000
000007
000071
003446
000200

152614
152410
152426
152400
152362

152350

18%:

003446
003446
000200

152326

19%:

003446

152310
152304
152300

003416
003424
031072
152276
152272
152242
152236
152232
152230
152210
000200

003420
003444
003414

003416
003424
003422
003432
003436
003442
003440
152172

3s:

87%:

86%:

SCOPE
TST
B8MI
MOV
MOV
MOV
MOV
MOV
CLR

BIT
BNE

INC
BNE
CLR

BIT
BNE
INC
BEQ
BR

R1
1ST47
#-2 ,aRHW(C
#0DDAD
, aRHBA
#ZERO, aRHBAE
#7 ,8RHCS2
#READO,aRHCS1
BITCNT
#RDY ,3RHCS1

BITCNT
18%

BITCNT
#RDY ,38RHCS1

BITCNT

3%
19%

MOV
Mov
Mov
TST
BEQ

aRHCS1,CS1

MOV
MOV
MoV
MOV
MOV

aRHBAE ,BAE

CLR
CLR
JMP

MOV
BIT
BNE

aRHWC ,WC
a3RHBA ,BA

@RHCS3,CS3
aRH(CSZ2,CS2
@dRHST,DS1

@RHER, ER1
aRHTDB, TDR

,
aRHMRZ2T(

1§DY.8RHCS1

;IS IN AN RH11
OF TEST
OUT
;:GET
JSET UP WC FOR TWO WORD
;SETUP BUS ADDRESS
:SETUP BUS ADDRESS EXTENSION
:DEVICE 7
:TELL IT TO READO
;CLEAR BIT COUNTER
;IS RDY SET
JBIT IS SET
;COUNT UP
JNOT FINISHED COUNTING
:GET READY TQO DO IT AGAIN
;1S IT SET YET?
;YES
;COUNT UP
;BIT IS NOT GOING TO SET

:SAVE RHCS1
;SAVE WORD COUNT
;SAVE BUS ADDRESS
;IS IT AN RH11
:NO IT'S A 70
;CLEAR BAE
;CLEAR (S3
s CONTINUE
:SAVE BUS ADDRESS EXTENSION
:SAVE RH(CS3
;SAVE (€S2
:SAVE TESTER STATUS
;SAVE ERROR REGISTER
;SAVE TESTER DATA REG.
;SAVE MR2 TESTER REG.
;1S READY SET
;RDY SET CONT. TEST

m 7
02-MAY-78 10:03 PAGE 90
MACY11 30A(1052)
T46
DBL TEST 2 WORD ODD ADD. READ FWD

MASSBUS RH70 AND RH11_DIAGNOSTIC
02-MAY-78 10:01
CZRHBD.P11
4738
4739
4740
4741
4742
4743
4744
4745
4746
4747
4748
4749
4750
475
4752
4753
4754
4755
4756
4757
4758
4759
4760
4761

4762
4763

031140
031142
031146
031154
031156
031160
031164
031170

007224
002000

152206

007224
006572
050202

1%:

2%:

ERROR
JSR
BIT
BEQ
ERROR
JSR

JSR

102
R7 ,WHYTO
#DBL ,aRHCS3
2%
163
R7 ,WHYFO
R7,CLEER
R7 ,ERRTST

JREADY DID NOT SET
JANY ERRORS SET
;1S DOUBLE SET
;DBL SET
;DBL DID SET ON A 2 WORD TRANSFER
sTELL WHY NOT
;CLEAR ERRORS

2222323232333 232323233 3233382232232 23232323233242228482233322383822822
32800000 E)

DBL TEST 2 WORD EVEN ADD. READ REV
;*THESE TEST CHECK DBL IN RHCS3 WITHREAD FWD AND REV
;*WRITE FWD AND REV AND WITH BAI SET IN RHCSZ
;*OPERATION BEING PREFORMED WILL BE PRINTED OUT

tTEST 47

*IN ERROR MESSAGE.

ttttttit*tfittfit**tttfit*ttttltttfi*fittfittttt*ttt*ltttt*tfititttttt

031174
031176
031200
031202
031210
031216
031224
031232
031240

4764
4765
4766

4767
4768

4769
4770
477
4772
4773
4774
4775
4776
4777
4778
4779
4780
4781
4782
4783

000004
005701
100532

TST47

012777
012777
012777
012777
012777
005037
032777
001015
005237
001371
005037
032777

177776
004000
000000
000007
000077
003446
000200

005237
001401
000770

003446

017737
017737
017737

152016
152012
152006

001004

000200

TST
BM]
MOV

MOV
MOV
MOV
MOV

18%:

003446

SCOPE

152034

003420
003444
003414

19%:

3s:

CLR
BIT
BNE
INC
BNE
CLR
BIT
BNE
INC
BEQ
BR
MOV

R1
TSTS50
#-2 ,aRHW(C

#EVENAD ,aRHBA
#ZERO, aRHBAE

#7 ,aRHCS2
#READG ,@RHCS1
BITCNT
#RDY ,3RHCS1

BITCNT
18%
BITCNT
#RDY ,3RHCS1

38
BITCNT
3%
19%

@RHCS1,CS1
aRHW( ,WC
aRHBA BA

003416
003424

031364

152004
152000
151750
151744
151740
151736
151716
000200

031440

032777

007224
002000

003416
003424
003422
003432
003436
003442
003440
151700

151714

87%:

MOV

86$%:

MOV

aRHBAE ,BAE

aRHCS3,CS3
@RH(CS2,CS2
@RHST,DS1
aRHER ER1
aRHTDB, TDR

aRHMR2,
TC

quY.aRHCS1

1%:

BIT

102
R7 ,WHYFO
#DBL ,3RHCS3

;IS IN AN RH11
;;GET OUT OF TEST
:SET UP WC FOR TWO WORD
;SETUP BUS ADDRESS

;SETUP BUS ADDRESS EXTENSION
;DEVICE 7
:TELL IT TO READ6
JCLEAR BIT COUNTER
;1S RDY SET
;BIT IS SET
;s COUNT UP

:NOT FINISHED COUNTING
:GET READY TO DO IT AGAIN
;IS IT SET YET?
JYES
;COUNT UP

;BIT IS NOT GOING TO SET

;SAVE RHCS1
;SAVE WORD COUNT
;SAVE BUS ADDRESS
;1S IT AN RHIM
:NO IT'S A 70
;CLEAR BAE
;CLEAR (S3
. CONT INUE
:SAVE BUS ADDRESS EXTENSION
:SAVE RH(CS3
:SAVE (€S2
:SAVE TESTER STATUS
;SAVE ERROR REGISTER
;SAVE TESTER DATA REG.
:SAVE MR2 TESTER REG.
;1S READY SET
;RDY SET CONT. TEST
JREADY DID NOT SET
;ANY ERRORS SET

:1S DOUBLE SET

SEQ 0090

4794
4795

4796
4797
4798
4799
4800
4801
4802
4803
4804
4805
4806
4807
4808
4809
4810
4811
4812
4813
4814
4815

031446
631450
031452
031456
031462

147

001403
104164

004737
004737
004737

7
N
02-MAY-78 10:03 PAGE 91
DBL TEST 2 WORD EVEN ADD. READ REV

MACY11 30A(1052)

MASSBUS RH70 AND RH11 DIAGNOSTIC
CZRHBD.P11
02-MaY-78 10:01

007224
006572
050202

2s:

BEQ
ERROR
JSR

JSR

164
R7 ,WHYFO
R7,CLEER
R7 .ERRTST

;DBL SET
;DBL DID SET ON A 2 WORD TRANSFER
;TELL WHY NOT

;CLEAR ERRORS

tQttttttiitfifit't*ttfit*fi'tttttittfi*t*ittttt*t.t*t*ttttttttttt*tt

DBL TEST 2 WORD ODD ADD. READ REV
;*THESE TEST CHECK DBL IN RHCS3 WITHREAD FWD AND REV

*TEST 50

:*WRITE FWD AND REV AND WITH BAI SET IN RH(S2

;*OPERATION BEING PREFORMED WILL BE PRINTED OUT
*IN ERROR MESSAGE.
................ RH70 ONLY

tttttt*tttfitttt*tttttttfit*tttttttfi.i*tt*ttttlit*ttttttttttttttt

000004
005701
100532
012777
012777
012777
012777
012777
005037
032777
001015
005237
001371
005037
032777
001004

005237
001401
000770

TSTSO

177776
004002
000000
000007

18%:

003446
151542

19%:

003446

017737
017737
017737
005701
001406
005037
005037
000137
017737
017737
017737
017737
017737
017737
017737
032777
001003

CLR
BIT
BNE
INC
BNE
CLR
BIT
BNE

INC

BEQ

003420
003444
003414

3s:

TST51
#=2 ,aRHW(
, aRHBA
#0DDAD

#ZERO, 3RHBAE

#7 ,a8RHCS2

#READG ,aRHCST
BITCNY
#RDY ,aRHCS1

BITCNT
18%
BITCNT
#RDY ,a8RHCS1

3$
BITCNT
33
198

@RHCS1,CS1

aRHWC ,WC
aRHBA,BA
R1

87%

BAE

007224
002000

031744

MOV
MOV
Moy
MOV
MOV

000077
003446
000200

003446
000200

SCOPE
TST
BM]

007224

003416
003424
003422
003432
003436
003442
003440
151406

87%:

MOV

86%:

MOV

151422

1$:

CS3
86$

@RHBAE ,BAE

@RH(CS3,CS3
@RHCS2,(CS2
aRHST,DS1
aRHER ,ER1
aRHTDB, TDR

aRHMRZ,
TC

BIT

#RDY ,aRHCST
1%
102
R7 ,WHYFO
#DBL ,aRHCS3

2%
165

R7 ,WHYFO

;IS IN AN RH1
;.GET OUT OF TEST
;SET UP WC FOR TWO WORD
;SETUP BUS ADDRESS
;SETUP BUS ADDRESS EXTENSION
;DEVICE 7
;TELL IT TO READ6
;CLEAR BIT COUNTER
;IS RDY SET

;BIT IS SET
;COUNT UP
sNOT FINISHED COUNTING
;GET READY TO DO IT AGAIN
cIS IT SET YET?
JYES
;COUNT UP
;BIT IS NOT GOING TO SET

;SAVE RHCS1

;SAVE WORD COUNT
;SAVE BUS ADDRESS

;IS IT AN RH11
JNO IT'S A 70
;CLEAR BAE
;CLEAR (S3
2 CONT INUE
:SAVE BUS ADDRESS EXTENSION
:SAVE RH(CS3
;SAVE (S2
;SAVE TESTER STATUS
;SAVE ERROR REGISTER

;SAVE TESTER DATA REG.
:SAVE MR2 TESTER REG.
;1S READY SET
;RDY SET CONT. TEST
;READY DID NOT SET
;ANY ERRORS SET
;1S DOUBLE SET
;DBL SET
:DBL DIDN'T SET ON A 2 WORD TRANSFER
;TELL WHY NOT

SEQ 0091

MACY11 30A(1052)

MASSBUS RH70 AND RH11_DIAGNOSTIC
CZRHBD .P11
02-MAY-78 10:01

4850
4851
4,852
4853
4854
4855
4856
4857
4858
4859
4860
4861
4862

031750
031754

004737
004737

10:03

PAGE 92

150

DBL TEST 2 WORD ODD ADD. READ REV

2$:

JSR

J*TEST 51

;CLEAR ERRORS

R7,CLEER

R7 ,ERRTST

SEQ 0092

DBL TEST 3 WORD EVEN ADD. READ FWD

;*THESE TEST CHECK DBL IN RHCS3 WITHREAD FWD AND REV
J*WRITE FWD AND REV AND WITH BAI SET IN RHCSZ

;*OPERATION BEING PREFORMED WILL BE PRINTED OUT
;*IN ERROR MESSAGE.
2 * ................ RH?O mLY .......................

;:tfiiti‘****ti**fi***fi'*""fi***fiifi*fi*fi***fififi"fi*fi*'*t*'*‘fiflttififi'

TSTS51:
177775

/863

486~

18%:

032777
001004

005237
001401
000770

003446
000200

017737
017737
017737
005701
001406
005037

032246

004737
004737

151250

19%:

003446

003420
003444
003414

OWU’!U!O*%
onnS~O

4865
4866
4867
4868
4869
4870
4871
4872
4873
4874
4875
4876
4877
4878
4879
4880
4881
4882
4883
4884
4885
4886
4887
4888
4889
4890
4891
4892
4893
4894
4895
4896
4897
4898
4899
4900
4901
4902
4903
4904
4905

006572
050202

02-MAY-78

007224
006572
050202

3s:

003416
003424
003422
003432
003436
003442
003440

87%:

151130

1%:

86%:

151114

SCOPE
TST
8MI
mMov

MOV
MOV
MOV
MOV
CLR
BIT

#7 ,8RHCS?2
#READO,aRH(CS1
BITCNT
#RDY ,8RHCS1

;1S IN AN RH11
;:GET QUT OF TEST
;SET UP WC FOR THREE WORD
;SETUP BUS ADDRESS
:SETUP BUS ADDRESS EXTENSION

;DEVICE 7
;TELL IT TO READO
JCLEAR BIT COUNTER
;1S RDY SET

BNE
INC
BNE
CLR
BIT
BNE

38
BITCNT
18%
BITCNT
#RDY ,aRHCS1
3s

;BIT IS SET
sCOUNT UP
:NOT FINISHED COUNTING
J;GET READY TO DO IT AGAIN
;IS IT SET YET?
:YES

MOV

®RH(CS1,CS1

:SAVE RHCS1

INC
BEQ
BR

B8ITCNT
3%
19%

MOV
MOV
TST
BEQ
CLR
CLR
JMP
MOV
MoV
MOV
MOV
MO\
MOV
MOV
BIT
BNE
ERROR
JSR
BIT
BEQ

aRHW(C ,WC
aRHBA ,BA
R1
87%
BAE
(S3
86%
aRHBAE ,BAE
@RHCS3,CS3
aRHCS2,(S2
aRHST,DS1
@RHER,ER1
aRHTDB, TDR
aRHMRZ2, TC
#RDY ,’RHCS1
1%
102
R7 ,WHYFO
#DBL ,dRHCS3
2%

JSR
JSR
JSR

R7 ,WHYFO
R7,CLEER
R7 ,ERRTST

ERROR

2%:

R1
TSTS?
#-3 ,3RHWC
H#EVENAD ,aRHBA
#ZERO,3RHBAE

166

;COUNT UP
:BIT IS NOT GOING TO SET

;SAVE WORD COUNT
:SAVE BUS ADDRESS
;IS IT AN RH11

:NO IT'S A 70
;CLEAR BAE

;CLEAR (S3

; CONTINUE
;SAVE BUS ADDRESS EXTENSION

:SAVE RH(CS3
:SAVE (S2
;SAVE TESTER STATUS

:SAVE ERROR REGISTER
;SAVE TESTER DATA REG.

:SAVE MR?2 TESTER REG.

;1S READY SET
JRDY SET CONT. TE<T
;READY DID NOT SE.
:ANY ERRORS SET
;1S DOUBLE SET
;DBL SET

:DBL DID SET ON A 3 WORD TRANSFER
;TELL WHY NOT
;CLEAR ERRORS

:;ttttttt*tfit*tittt*ttt*t*tt*ttttfitt*fittttttttt*tt*ttt*it'ttt"ti

8
C
10:03 PAGE 93
C2-MAY-78
MACY11 30A(1052)
152
DBL TEST 3 WORD EVEN ADD. READ REV

MASSBUS RH70 AND RH11_DIAGNOSTIC

CZRHBD. P11
4906
4907
4908
4909
4910
49
4912
4913
4914
4915
4916
497
4918
4919
4920
4921
4922
4923
4924
4925

02-MAY-78 10:01

DBL TEST 3 WORD EVEN ADD. READ REV
;*THESE TEST CHECK DBL IN RHCS3 WITHREAD FWD AND REV

;*TEST 52

:+WRITE FWD AND REV AND WITH BAI SET IN RH(CS2
:*OPERATION BEING PREFORMED WILL BE PRINTED OUT

*IN ERROR MESSAGE.

................ RH70 ONLY

t*ifitt*tt*ttt**i**t**ttttttttttttt*tttttttittttt***ttt*flttt*fitt

032252
032254
032256
032260

000004
005701
100532
012777
012777
012777

012777
012777
005037
032777
001015
005237
001371
005037
032777

4926
4927
4928
4929
4930
4931
4932
4933

001004

4934
4935

4936
4937
4938
4939
4940
4941

TST52

177775
004000
000000
000007
000077
003446
000200

003446

003446
000200

005237
001401
000770

003446

017737
017737
017737
005701
001406

150740
150734
150730

003416
003424
032442
150726
150722

150640
000200

007224
002000

032540

18%:

007224
006572
050202

150756

19%:

SCOPE
TST
BMI

MOV
MOV
MoV
MOV
MOV
(LR
BIT
BNE

INC
BNE
CLR
8IT
BNE
INC

BEQ

003420
003444
003414

003416
003424
003422
003432
003436
003442
003440
150622

150636

3s:

87%:
86%:

MoV
MOV
MOV
TST

BEQ
CLR
CLR
JMP

MOV

MOV
MOV
MOV
MOV

1%:

2%:

8IT
BNE
ERROR
JSR
BIT
BNE
ERROR
JSR

JSR

TST53
#-3,3RHWC

#EVENAD ,aRHBA
#ZERO, IRHBAE

;1S IN AN RH11
OF TEST
OUT
:;GET
:SET UP WC FOR THREE WORD
;SETUP BUS ADDRESS

;SETUP BUS ADDRESS EXTENSION

;DEVICE 7
:TELL IT TO READ6
;CLEAR BIT COUNTER
;1S RDY SET
;8IT IS SET
;COUNT UP
JNOT FINISHED COUNTING
:GET READY TO DO IT AGAIN
;1S IT SET YET?
:YES
;COUNT UP
;BIT IS NOT GOING TO SET

@RHCS1,CS1

s SAVE RHCS1

#7 ,8RHCS2
#READG ,aRHCS1
BITCNT
#RDY ,aRHCST
3$
BITCNT
18%
BITCNT
#RDY ,8RHCS1T

BITCNT

19%

, WC
3RHWC
@RHBA ,BA
R]

87%

BAE

€S3
86%

aRHBAE ,BAE

aRHCS3,(CS3
@dRH(CSZ,(CS2
8RHST,DS1
aRHER,ER1
aRHTDB, TDR
aRHMRZ,
TC

quY.BRHCS1
102
R7 ,WHYFO
lgBL.QRHCSS

2
167
R7,WHYFO
R7,CLEER
R7 ,ERRTST

;SAVE WORD COUNT
;SAVE BUS ADDRESS

;1S IT AN RH11
JNO IT'S A 70
;CLEAR BAE
;CLEAR (S3
s CONTINUE
:SAVE BUS ADDRESS EXTENSION
;SAVE RHCS3
JSAVE (S2
;SAVE TESTER STATUS
;SAVE ERROR REGISTER
;SAVE TESTER DATA REG.
;SAVE MR2 TESTER REG.
;1S READY SET
;RDY SET CONT. TEST
;READY DID NOT SET

;ANY ERRORS SET
;1S DOUBLE SET
;DBL SET

;DBL DIDN'T SET ON A 3 WORD TRANSFER

sTELL WHY NOT

;CLEAR ERRORS

;;tt*tttttttttttttfitfi*t'tttttt*tfi*ttttttttfitfittttttttitttitttittt

WCE EW ERROR TEST
;J*TEST S3
;*THIS TEST CHECKS THAT WCELO WILL SET IN
J*RHCS3 AND THAT WCE SETS IN RHCS1

SEQ 0093

MASSBUS RH70 AND RH11_DIAGNOSTIC

CZRHBD.P11

4966

4967
4968
4969
4970
4971
4972
4973
4974
4975
4976
4977

4978
4979

4980
4981
4982

4983
4984

4985
4986

4987

4988

4989
4990
4991
4992
4993
4994
4995
4996

4997

4998
4999
5000
5001
5002
5003
5004
5005
5006
5007
5008
5009
5010
5011
5012
5013
5014
5015
5016

5017

153

02-MAY-78 10:01

4962
4963
L =
‘.%S

MACY11 30A(1052)

032546
032554
032556
032560
032564
032572
032600
032606
032614
032622
032626

032634
032636

032642
032644
032650

032656
032660

032664
032666
032670

032670

032676
032704
032712
032714
032716
032722
032726
032732

032740

032746
032754
032762
032770
032776
033004
033012
033014
033016
033022
033026
033034
033042
033050
033054
033062
033064
033070
033072

033076

000004

012737
005701
001402
000137
012777
012777
012777
012777
012777
005037
032777
001015
005237

001371
005037
032777
001004
005237

001401
000770

017737

017737
017737
005701
001406
005037
005037
000137
017737

017737

017737
017737
017737
017737
017737
032777
001003
104102
004737
005137
012777
012777
012777
005037
032777
001015
005237
001371
005037

032777

000001

033330
000007
000000
004000
177776
000061
003446

000200

001212

150430
150424

150546
150560
150526

1%:

150474

18%:

19%:

BNE
CLR
BIT

150516
150506

150452

003420

MITE:

003444
003414

003416

003424
032746
150422
150416
150366
150362
150356
150354
150334
000200
007224
004000
004000
177776
000051
003446
000200

003416

87%:

003422
003432
003436
003442
003440
150316

86%:

003424

150300
150270
150260

vous:

150246

18%:

150224

19%:

003446
003446

000200

SCOPE

MOV
TST
BEQ
JMP
MOV
MoV
MoV
MoV
MOV
CLR
BIT

003446

150434

10:03

PAGE 94

t't*tfittt***"*t*t*t'tt'ttt.t*tt**fitt*t*tt*ttfi**fitfit*tfittitttt*

TST53

003446

003446
000200

WCE EW ERROR TEST

;*]T ALSO CHECKS THAT WCEHI DOES NOT SET
*HITH WCELO IN RHCS3........covvunnnn.
P RH70 ONLY....cccvvvenacnnnn

032544

02-MAY-78

#1,$TIMES
R1
1%
FANG
#7 ,8RHCS2
#ZERO, IRHBAE
#EVENAD ,aRHBA
#-2 ,BRHWC
#WRITEO,aRHCST
BITCNT
#RDY ,aRHCS1

BEQ
BR

18$
BITCNT
#RDY ,aRH(CS1
MITE
BITCNT
MITE
19%

MOV

@aRHCS1,CS1

;SAVE RHCS1

adRHCS3,CS3

:SAVE RH(CS3

BNE
INC

MITE
BITCNT

MOV
MOV
TST
BEQ
CLR
CLR
JMP
MOV

aRHWC ,W(
aRHBA ,BA
R1
87%
BAE
€S3
86%
aRHBAE ,BAE

MoV
MOV
MOV
MOV
MOV
BIT
BNE
ERROR
JSR
COM
MOV
MoV
MoV
CLR
BIT
BNE
INC
BNE
CLR

aRHCS2,CS2
aRHST,DS1
aRHER ,ER1
aRHTDB, TDR
aRHMR2, TC
#RDY ,aRHCS1
VOUS
102
R7 ,WHYFO
EVENAD
#EVENAD , aRHBA
#=2, 3RHWC
#WRCHO,3RHCS
BITCNT
#RDY ,aRHCS1
FAST
BITCNT
18%
BITCNT

MOV

BIT

#RDY ,3RH(S1T

;.D0O 1 ITERATION
;IS _IT AN RH11
;IT'S AN RH70
;IT'S AN RH11, EXIT TEST
JSET DEVICE 7
;SETUP BUS ADDRESS EXT.
;SETUP BUS ADDRESS
;FOR TWO WORD TRANSFER
JTELL IT TO WRITE
;CLEAR BIT COUNTER
;1S RDY SET
;BIT IS SET
;COUNT UP

;NOT FINISHED COUNTING
;GET READY TO DO IT AGAIN
;IS IT SET YET?
JYES
;COUNT UP

;BIT IS NOT GOING TO SET

s SAVE WORD COUNT
s SAVE BUS ADDRESS
;1S IT AN RH11
:NO IT'S A 70
:CLEAR BAE
;CLEAR (S3
2 CONTINUE
;SAVE BUS ADDRESS EXTENSION

;SAVE (S2
;SAVE TESTER STATUS
;SAVE ERROR REGISTER
;SAVE TESTER DATA REG.
:SAVE MR2 TESTER REG.
;1S READY SET
sRDY IS SET
JRDY DID NOT SET
;ANY ERRORS SET
s INVERT BITS FOR WCELO
;FIX BUS ADDRESS
sFIX WORD COUNT
JTELL IT TO WRITE CHECK
;CLEAR BIT COUNTER
;1S RDY SET
;BIT IS SET
;COUNT UP
sNOT FINISHED COUNTING
:GET READY TO DO IT AGAIN

IS IT SET YET?

SEQ 0094

5018
5019
5020
5021
5022
5023
5024
5025
5026
5027
5028
5029
5030
5031
5032
5033
5034
5035

033104
033106
033112
033114
033116
033116
033124
033132
033140
033142
033144
033150
033154
033160
033166
033174
033202
033210
033216
033224
033232
033240
033242
033244
033250
033256
033260
033262
033266
033272
033274
033302
033304
033306
033314
033316
033320
033324
033330

001004
005237
001401
000770

017737
017737
017737
005701

WCE EW ERROR TEST

T53

003446

150206
150202

150176

003416
003424
033174

E 8
O02-MAY-78 10:03

MACY11 30A(1052)

MASSBUS RH70 AND RH11_DIAGNOSTIC
CZRHBD .P11
02-MAY-78 10:01

003420

FAST:

003444
003414

BNE
INC
BEQ
BR

FAST
BITCNT

:YES
;COUNT UP

MOV
MOV
MOV
TST

aRHCS1,CST
SRHW( ,W(
aRHBA ,BA
R1

;SAVE RHCS1
;SAVE WORD COUNT
;SAVE BUS ADDRESS
;IS 1T AN RH1

BEQ
CLR
CLR,

150174
150170
150140
150134
150130
150126
150106
000200

003416
003424
003422
003432
003436
003442
003440
150070

87%:

007224
004000

150104

SUPER:

86%:

aRHBAE ,BAE

;SAVE BUS ADDRESS EXTENSION

BRH(CS3.CS3
@RHCS2,(S2

MOV
MOV
MOV

MOV
BIT

BNE
ERROR
JSR
BIT
BNE
TSTB

010000

150060

BNE
RITEON: BIT
BEQ

040000

150024

TWANG:

ERROR
B8IT
BNE

ERROR

TWANGY: JSR
JSR

FANG'
R

€s3

:NO IT'S A 70
:CLEAR BAE
;CLEAR (CS3

MoV
MOV

JSR

006572
050202

87%

BAE

86%

MOV

s CONTINUE

;SAVE RH(CS3
:SAVE (S2

aRHST,DS1
aRHER,ER1
aRHTDB, TDR

;SAVE TESTER STATUS
:SAVE ERROR REGISTER
:SAVE TESTER DATA REG.

3RHMR?2 , T(C
#RDY ,aRH(CS1

;SAVE MRZ TESTER REG.
;1S READY SET

SUPER
102
R7 ,wHYFO
MICELO,3RHCS3
RITEON

;RDY IS SET
JRDY DID NOT SET
;ANY ERRORS SET
;IS WCELO SET
JWCELO IS SET

R7 ,WHYFO

;ANY ERRORS SET

132

:WCELO DID NOT SET IN RH(CS3

$ERFLG

;WAS THERE AN ERROR

TWANG
MWCEH] ,aRHCS3
TWANGY

cYES
;IS WCEHI SET
;WCEHI DID NOT SET

133
MICE ,aRHCS?2

JWCEH] SET WITH WCELO
:DID WCE SET IN CS2
JYES,IT SHOULD BE
JWCE DID NOT SET IN RHCSZ

TWANGY

134

R7,CLEER
R7 ,ERRTST

2242233222322

*TEST 54

;BIT IS NOT GOING TO SET

FAST
19%

JMP

ERROR

007224
001103

PAGE 95

;CLEAR ERRORS

3222222222222 23 322222222282 2d22 2822022288008 384

WCE OW ERROR TEST

(WCEHI)

:*THIS TEST CHECKS THAT WCEHMI SETS IN RHCS3
:*AND THAT WCE SETS IN RHCS1 ,IT ALSO TESTS
;*THAT WCELO DOES NOT SET UITH WCEHI........
IM e ieanoanes RH70 ONLY...oveereeecaccannns

ttttt*i*titt't*fitt.t*t'fi*ittiti***it*i't*ttfi*'*fi*'.t*tfifi*tittt'

033330
033332

TST54

034134
000007
177776
004000
004002
000061
003446

147770
147754
147750

004000
147730

1%:

SCOPE

TST
8EQ
JMP
MOV

R1
13
FANGY
#7 ,8RHCS?

MOV
MOV

N#EVENAD ,aRHBA
, EVENAD
ODDAD

CLR

BITCNT

MOV

#-2 ,3RHW(C

AWRITEQD,aRHCS

;IS IT AN 11 ORA 70
;1TSS AN
RH70
;IT'S AN RH11, EXIT TEST
;SET DEVICE 7
. TWO WORD TRANSFER
;SETUP BUS ADDRESS
:DUP ODDAD
JTELL IT TO WRITE
;CLEAR BIT COUNTER

SEQ 0095

MACY11

MASSBUS RH70 AND RH11 _DIAGNOSTIC
CZRHBD .P11
02-mMay-78 10:01
5074
5075

033404
033412
033414
033420

032777
001015
005237
001371
005037
032777
001004
005237
001401
000770

000200

017737
017737
017737
005701

147656
147652
147646

003446
000200

000200

007224
000040
003446
003446

OV NAWNS
NN —

5121

b b —d

d
d
d
b
ek

b b ecd md o
=

mh o
o

(W IV LV, LV LU LV, LV, LV LV, IV, ]

000007
004002

033710
033712
033716
033720
033722
033722
033730
033736
033744
033746

18%:

147674

19%:

003446

147610
147604
147600
147576
147556

033702

147716

003446

003416
003424
033524
147644
147640

001015
005237
001371
005037
032777
001004

154

003420
003444

005237
001401
000770

003446

017737
017737
017737
005701
001406

147402
147376
147372

BIT
BNE
INC
BNE
CLR
BIT
BNE
INC
BEQ

WCEOWT:

#RDY ,aRHCS

WCEOWT

BITCNT
18%
BITCNT

#RDY ,aRHCS1
WCEOWT

BITCNT

WCEOWT

19%

aRHWC ,WC
3RHBA ,BA
R1

87%

BAE

(s3

003416
003424
003422
003432
003436
003442
003440

87%:
86%:

86%
MOV

147532

@RHCS3,CS3
adRHCS2,(CS2
aRHST,DS1
aRHER ,ER1
aRHMRZ,
TC

#RDY ,a8RHCS1
BEAU
102
R7 ,WHYFO
#40,
aRHCS?2

8EAU:

BITCNT
BITCNT
178

17%:

N7,
ODDAD

147512
147474
147464
147454

147420

SRHBAE ,BAE

3RHTDB, TDR

147540

adRHCS2

;GET READY TO DO IT AGAIN
;IS IT SET YET?

JYES

;COUNT UP
;BIT IS NOT GOING TO SET

:SAVE RHCS1

;SAVE WORD COUNT
;SAVE BUS ADDRESS

;IS IT AN RHI1
:NO IT'S A 70
;CLEAR BAE
;CLEAR (S3
; CONTINUE
;SAVE BUS ADDRESS EXTENSION
:SAVE RH(CS3
:SAVE (S2
;SAVE TESTER STATUS

;SAVE ERROR REGISTER
;SAVE TESTER DATA REG.
:SAVE MR2 TESTER REG.
;1S READY SET
JRDY IS SET
;RDY DID NOT SET
; ANY

ERRORS SET

:DO A CONTROLLER CLEAR
;SET UP FOR DELAY
;COUNT UP

JSELECT UNIT #7

aRHCS1,CST
, W(
aRHWC

sSAVE RHCS1
;SAVE WORD COUNT

;IS IT AN RH1
:NO IT'S A 70

18%:

BITCNT
ARDY ,3RHCST

19%:

BITCNT
18%
BITCNT
#RDY ,aRHCS1

WCEERR

19%

TST
BEQ

;1S RDY SET
;BIT 1S SET
;COUNT UP

WCEERR

#=2 ,aRHW(
#WRCHO ,aRHCST

BITCNT

003420
003444
003414

SEQ 0096

JREVERSE BITS IN ODDAD
2 CORRECT BUS ADDRESS
;CORRECT W(C
JTELL IT TO WRITE CHECK
sCLEAR BIT COUNTER
;1S RDY SET
;BIT IS SET
;COUNT UP
sNOT FINISHED COUNTING
;GET READY TO DO IT AGAIN
;IS IT SET YET?
JYES
;COUNT UP
;BIT IS NOT GOING TO SET

#EVENAD
, aRHBA

WCEERR:

PAGE 96

:NOT FINISHED COUNTING

@RHCS1T,CS1

003414

147442

003446
000200

F
8
02-MAY-78 10:03
3 0A(1052)
WCE OW ERROR TEST (WCEHI)

87%

s SAVE BUS ADDRESS

MACY11 30A(1052)

MASSBUS RH70 AND RH11 _DIAGNOSTIC
CZRHBD.P11
02-MAY-78 10:01

5130
5131
5132
5133
5134
5135
5136
5137
5138
5139
5140

5141
5142
5143
5144
5145
5146
5147
5148
5149

033750
033754
033760

005037
005037
000137
017737
017737
017737
017737
017737
07737
017737
032777

003416
003424
034000
147370
147364
1647334
147330
147324
147322
147302
000200

007224
010000

154

003416
003424
003422
003432
003436
003442
003440

87%:
86%:

147264

147300

ERTIP:

007224
001103

5150
5151
5152
5153
5154

004000

147254

040000

147220

006572
050202

BUSH:

G 8
02-MAY-78
10:03

WCE OW ERROR TEST

(WCEHI)

PAGE 97

SEQ 0097

CLR
CLR
JMP

BAE

;CLEAR BAE

86$

MOV

@RHCS3,(S3
aRHCSZ2,(CS2
dRHST,DS1
aRHER ,ER1

; CONT INUE
:SAVE BUS ADDRESS EXTENSION

MOV

MOV
MOV
MOV
MOV

BIT
BNE
ERROR
JSR
BIT
BNE
ERROR
JSR
TSTB
BNE

BIT
BEQ

ERROR
LEFOUT: BIT
BNE
ERROR
LEAGUE: JSR
JSR
FANGY
:

;CLEAR (S3

CS3

@aRHBAE
, BAE

aRHTDB, TDR

aRHMR2,
T(

#RDY ,aRHCS1
ERTIP
102
R7 ,WHYFO
#WCEHI ,aPHCS3
BUSH
135
R7 ,WHYFO
SERFLG
LFAGUE
MWCELO,IRHCS3
LEAGUE

137
MICE ,aRHCS?2
LEAGUE
136
R7,CLEER
R7 ,ERRTST

;SAVE RHCS3
;SAVE (CS2
;SAVE TESTER STATUS

;SAVE ERROR REGISTER

;SAVE TESTER DATA REG.
:SAVE MRZ TESTER REG.
;1S READY SET
JRDY IS SET
;RDY DID NOT SET
;ANY ERRORS SET

;1S WCEHI SET
JWCEH]I IS SET

:WCEH] DID NOT SET IN RH(CS3

;ANY OTHER ERRORS SET

:UAg THERE AN ERROR
. 'E
;1S WCELO SET
JNO,WCELO IS OK
;WCELO SET WITH WCEHI
;DID WCE SET

;WCE IS SET IN RHCS?
:WCE DID NOT SET IN RH(CS2
;CLEAR ERRORS

':tt*lttt'tttttttttt**Qt't*t*fi*tttt*tttIfitttttt"ii*ittitttttttt*

T*TEST 55

INTERUPT ENABLE TEST

;*THIS TEST VERIFYS THAT IE WILL SET IN RHCS1
J*AND IT WILL CAUSE AN INTERUPT WHEN RDY IS SET

SR 2222222322233 23232323233

000004
012777

012777
005701
100403

012777
012777
012737
012777
012777
032777
001001
104174
005037
005037

032777
001015
005237
001371
005037
032777
001004

000007
004000

147174
147162

000000
034446
000340
177777
000161
000100

147174
147214
177776
147124
147114
147106

177776

003446
000200

TST55:

READY:

2%:
147064

18%:

003446
003446
000200

147042

19%:

SCOPE

MOV
MOV
TST
BM]
MOV
MOV
MoV
MOV
MOV
BIT
BNE

ERROR
CLR
CLR
8IT
BNE
INC
BNE
CLR
BIT
BNE

3238232232323¢8 222382222

#7 ,8RHCS2
;EVENAD.SRHBA
READY
#ZERO, aRHBAE
RIETST ,aVECADD

#340,PS

#-1,3RHWC

AWRITEQ!
IE ,@RHCS1
g%E.QRHCS1
174
177776
BITCNT

#RDY ,aRHCS1
TSTIE
BITCNT
18%
BITCNT
#RDY ,aRHCS1
TSTIE

208822808 2dR20 8020t

2Rt

sSETUP UNIT NUMBER
;SETUP BUS ADDRESS
;RH11 OR RH70 ?

;ITS AN RH1
;JERO THE BAE
;SET UP VECTOR ADDRESS
;SET PRIORTY 7
;SET FOR ONE WORD
JTELL IT TO WRITE
;1S 1E SET
;YES CONTINUE TEST
;1E WILL NOT SET
;CLEAR BIT COUNTER
;1S RDY SET
;BIT IS SET
;COUNT UP

JNOT FINISHED COUNTING
;GET READY TO DO IT AGAIN
:IESIT SET YET?
Y

MACY11

MASSBUS RH70 AND RH11_DIAGNOSTIC
CZRHBD.P11
02-MAY-78 10:01
5186

034270

005237
001401
000770

017737
017737
017737
005701
001406
005037
005037
000137
017737
017737
017737
017737
017737
017737
017737
032777
001003
104102

000137
105737

001010
104173
000137
022626

155

H 8
3 0A(1052)
02-MAY-78 10:03
INTERUPT ENABLE TEST
INC
BEQ

003446

003420
003444
003414

TSTIE:

; COUNT UP
;BIT IS NOT GOING TO SET

aRHCS1,CS1

s SAVE RHC(S1
:SAVE WORD COUNT

TSTIE
19%

ARHWC
, WC
aRHBA ,BA
R1

000200
034460
001103

034460

87%:
86%:

cS3
86%

@RHBAE ,BAE

dRHCS3,CS3
aRHCS2,(S2
@RHST,DS1

aRHER,ER1
aRHTDB, TDR
BRHMRZ,
TC

#RDY ,aRHCS1
1%

146706

1%:

IETST:

SEQ 0098

BITCNT

87%
BAE

003416
003424
003422
003432
003436
003442
003440

PAGE 98

102
SPLIT
$ERFLG
SPLIT
173
SPLIT
(SP)+,(SP)+

;SAVE BUS ADDRESS

;IS IT AN RH11
;NO IT'S A 70
;CLEAR BAE

JCLEAR (S3
; CONTINUE
;SAVE BUS ADDRESS EXTENSION
:SAVE RHCS3
;SAVE (S2
:SAVE TESTER STATUS

;SAVE ERROR REGISTER
;SAVE TESTER DATA REG.
;SAVE MR2 TESTER REG.
;1S READY SET ?
JYES

JREADY DID NOT SET
JEXIT TEST
;WAS

SET

sNO,EXIT TEST

JRDY DID NOT CAUSE AN INTERUPT

JEXIT TEST
;CORRECT STACK

MASSBUS RH70 AND RH11 DIAGNOSTIC
CZRHBD.P11
02-MAY-78 10:01

5214
5215
5216
5217
5218

034450
034454
034456
034460
034464

105737

001401

104175

004737
004737

8
1
02-MAY-78
10:03
MACY11 30A(1052)
155
INTERUPT ENABLE TEST
TST8

001103
006572
05020¢

SPLIT:

BEQ
ERROR
JSR
JSR

$ERFLG
SPLIT
175
R7,CLEER
R7 ,ERRTST

PAGE 99

;DID IE SET
JYES,EXIT TEST
:1E HAS OPEN GOING TO BUS
;CLEAR ERRORS

SEQ 0099

MASSBUS RH70 AND RH11 DIAGNOSTIC

CZRHBD .P11

MACY11 30A(1052)

02-MAY-78 10:01

156

02-MAY-78

10:03

PAGE 100

READ OPERATIONAL TEST (NORMAL) #1

5219

5220
5221
5222
5223
gggé

J*TEST 56
READ OPERATIONAL TEST (NORMAL) #1
;«THESE TESTS VERIFY ALL READ AND WRITE CODES
;*WHETHER IT BE A READ REV. OR FWD OR A WRITE REV. OR FWD
;*DURING THESE TESTS THE TESTER TIMING IS MARGINED AND
;*NO ERRORS SHOULD OCCUR

5226

5227

5228

5229
5230
5231
5232
5233
5234
5235
5236
5237
5238
5239
5260
5261
5242
5243
5244
5245

5266
5247
5248

5249

5250
5251
5252
5253
5254
5255
5256
5257

5258
5259

5260
5261
5262
5263
5264
5265
5266
5267
5268
5269
5270

5271
5272
5273
5274

034470

000004

034500
034506
034514
034522
034530
034532
034534
034542
034550
034554
034562
034564
034570
034572
034576

012777
012777
012737
012777
005701
100403
012777
012777
005037
032777
001015
005237
001371
005037
032777

034472

034604
034606

034612
034614
034616

034616

034624
034632
034640
034642
034644
034650
034654
034660

034666
034674

034702
034710
034716
034724
034732
034740
034746
034750
034752
034756
034764

034766
034772
034774

012777

001004
005237

001401
000770

017737

017737
017737
005701
001406
005037
005037
000137
017737

017737
017737

017737
017737
017737
017737
017737
032777
001003
104102
004737
023777
001407

005737
001403
104147

000007

146640

TSTS56:

177777
004100
000000
125252

146624
146620
004100
146620

000000

146616

003446
000200

146560

1$:

146546

188%:

146524

19%:

000071

003446
003446
000200
003446

146506

146502
146476

003420

2%:

003444
003414

003416

003424
034674
1464746

146470
146440

146434
146430
146426
146406
146412
000200
007224
004100

004100

003416

003424
003422

003432
003436
003442
003440
001162
146362

146364

87%:

86S$:

3%:

AR R AR

SCOPE

R AR R

ANRARN R

SEQ 0100

AR AR AR AR AR AN AR AN AN RN A ARR AR AR A AR

NN R AR RN

AAN R RN AR AR AR

AN RAARARAARNA AN RS

MOV

#7 ,aRHCS?2

JSETUP UNIT SEVEN

BNE
INC

23
BITCNT

JYES
;COUNT UP

MOV
MOV
MOV
MOV
TST
BMI
MOV
[0}
(LR
BIT
BNE
INC
BNE
CLR
BIT
BEQ
BR

MOV

#-1,3RHWC
#RBUF ,dRHBA
#1ERO,RBUF
#0AB,aRHTDB
R1
18
#ZERO, aRHBAE
#READQ ,aRHCS1
BITCNT
#RDY ,aRHCS1
23
BITCNT
18%
BITCNT
#RDY ,aRHCS1
2%
19%

;SAVE RHCS1

aRHCS3,(S3
@RH(S2,(S2

;SAVE RH(CS3
;SAVE (S2

aRHWC ,W(
aRHBA ,BA
R1
87%
BAE
(S3
863
aRHBAE ,BAE

MOV
MOV
MOV
MOV
MOV
BIT
BNE
ERROR
JSR
tmep
BEQ

@RHST,DS1
aRHER ,ER1
aRHTDB, TDR
aRHMR2, TC
aRHTDB, $REGO
#RDY ,aRHCS1
3%
102
R7 ,WHYFO
RBUF ,aRHTDB
43

TST
BEQ
ERROR

;BIT IS NOT GOING TO SET

aRH(S1,(CS1

MoV
MOV
TST
BEQ
CLR
CLR
JMP
MOV

MOV
MOV

;FOR ONE WORD
;SRTUP BA
;SETUP DATA
;SETUP TESTER DB
JIS IT AN 11 OR A 70
JIT'S AN RH11
;ZERO BAE
JTELL IT TO READO
;CLEAR BIT COUNTER
;1S RDY SET
;8IT IS SET
;COUNT UP
sNOT FINISHED COUNTING
;GET READY TO DO IT AGAIN
JIS IT SET YET?

RBUF
5%
147

;SAVE WORD COUNT
;SAVE BUS ADDRESS
;1S IT AN RH11
JNO IT'S A 70
. CLEAR BAE
;CLEAR (S3
s CONT INUE
;SAVE BUS ADDRESS EXTENSION
;SAVE
;SAVE
;SAVE
;SAVE

TESTER STATUS
ERROR REGISTER
TESTER DATA REG.
MR TESTER REG.
.GET DATA
;IS OR SET
JYES RDY IS SET
JREADY CID NOT SET
;JARE ANY ERRORS SET
;:DID INFO GET WRITTEN OR READ
JINFO GOT LOADED
;DOES RBUF = 0
JYES INFO DID NOT LOAD
;ALL BITS DID NOT LOAD DURING
;AN READO OPERATION

MASSBUS RH70 AND RH11 DIAGNOSTIC

CZRHBD .P11
5275
5276
5277
5278

5279
5280
5281
5282
5283
5284
5285
5286
5287
5288
5289
ggg?

MACY11 30A(1052)

02-MAY-78 10:01

034776
035002

000137
104150

035004

035004
035010
035014
035016
035020
035022
035026

004737
105737
001402
104146
104170
004737
004737

007224
001103

02-MAY-78

10:03

PAGE 101

156

READ OPERATIONAL TEST (NORMAL) #1

5%:

JMP
ERROR

43
150

JEXIT TEST
JREADO OPERATION DID NOT WORK
JNO BITS WHERE LOADED TO RBUF
;ANY ERRORS SET
;ANY ERRORS ?
sNOEXIT TEST
JPRINT REGISTERS

JSR
R7 ,WHYFO
TST8
$ERFLG
BEQ
63
ERROR
146
ERROR
170
6%:
JSR
R7,CLEER
;CLEAR ERRORS
R7 ,ERRTST
JSR
.. (2222223222233 2233223223233 33 222283383328 222223322232223802232322323%4%3}
;*TEST 57
RH OPERATIONAL WRITE TEST #1
;*THESE TESTS VERIFY ALL READ AND WRITE CODES
s*WHETHER 1T BE A READ REV. OR FWD OR A WRITE REV. OR FWD
s*DURING THESE TESTS THE TESTER TIMING IS MARGINED AND
;*NO ERRORS SH~ULD OCCUR

006572
050202

5292

. .'ttfitfi't.ttt.titfitt***tfi't*i*tt*tt**fitt'fiittttfittttttfiti*tt*t*t*t

5293
5294
5295
5296
5297
5298
5299
5300
5301
5302
5303
5304
5305
5306
5307
5308
5309
5310
5311
5312
5313
5314
5315
5316
5317
5318
5319
5320
5321
5322
5323

035032
035034
035042
035050
035056
035064
035066
035070
035075
035104
035112
035120
035126
035130
035136
035140
035146
035154
035162
035170
035176
035202
035210
035212
035216
035220
035224
035232
035234
035240
035242

000004
012777
012737
012777
012777

5325
5326
5327
5328
5329
5330

035244
035252
035260
035266
035270
035272

017737
017737
017737
005701
001406
005037

5324

035244

005701
100403

012777
012777
012777
012777
005037
005237

022737

001372
012777
012777
012777
012777
012777
005037
032777
001015
005237
001371
005037
032777
001004
005237
001401
000770

000007
125252
000003
177777

146276
004000
146276
146246

000000
004000
000061
000001
003446

146262
146230
146216
146234

003446
000015
000003
000001
000003
000001
000000
003446
000200

003446

TST57:

1$:

2%:

146206
146200
146172
146164
146156
146120

18S$:

146076

19%:

003446
003446
000200

003446

146060
1460546
146050
003416

003420
003444
003414

7%:

SCOPE
MOV
MOV
MOV
MoV
TST
BMI
MOV
MoV
MOV
MOV
CLR
INC
cMP
BNE
MOV
MOV
MOV
MOV
MOV
CLR
BIT
BNE
INC
BNE
CLR
BIT
BNE
INC
BEQ
BR

#7 ,aRHCS2
#0AB, EVENAD
#DMD !MCLK ,aRHMR1
#=1,3RHWC
R1
1%
#ZERO, IRHBAE
#EVENAD ,aRHBA
#WRITEQ,QRHCS1
#DMD , 3RHMR1
BITCNT
BITCNT
#15,BITCNT
2%
#DMD !MCLK ,8RHMR1
#DMD ,aRHMR1
#DMD 'MCLK ,3RHMR1
#DMD , 3RHMR1
#ZERO,aRHMR1
BITCNT
#RDY ,@RHCS1
7$
BITCNT
18$
BITCNT
#RDY ,aRHCS1
73
BITCNT
7%
198

JSETUP UNIT SEVEN
;SETUP INFORMATION
;SETUP DIAG. MODE
:FOR ONE WORD
;IS IT A 11 0R 70
JIT'S AN T
s ZERO BAE
;SETUP BA
;TELL IT TO WRITETO
JMANIPULATE CLOCK
;CLEAR LOOP COUNTER
: INCREMENT LOOP COUNTER
;1S IT THIRD LOOP FOR 5USEC WAIT
:NO LOOP AGAIN
s START CHANGING CLOCK
;CHANGE CLOCK AGAIN
. CHANGE CLOCK AGAIN
;CHANGE CLOCK AGAIN
;GET OUT OF DIAG MODE
;CLEAR BIT COUNTER
;1S RDY SET
;BIT IS SET
;COUNT UP
sNOT FINISHED COUNTING
;GE’ READY TO DO IT AGAIN
;IS IT SET YET?
;YES
;COUNT UP
;BIT IS NOT GOING TO SET

MOV
MOV
MOV
TST
BEQ
CLR

aRHCS1,CS1
aRHWC ,W(
aRHBA,BA
R1
87%
BAE

sSAVE RHCS1
;SAVE WORD COUNT
;SAVE BUS ADDRESS
;1S IT AN RH1N
:NO IT'S A 70
;CLEAR BAE

SEQ 0101

L 8
MACY11 30A(1052)
02-MAY-78 10:03 PAGE 102
RH OPERATIONAL WRITE TEST #1
157

MASSBUS RH70 AND RH11 _DIAGNOSTIC
CZRHBD .P11
02-MAY~78 10:01

5331
5332
5333
5334
5335

003424
035322

035276

035302
035306
035314
035322
035330

cS3

863

@RHBAE ,BAE

146046
146042
146012
146006
146002
146000
145760
145764
000200

003416
003424
003422
003432
003436
003442
003440
001162

177777

145724

8%:

#-1,3RHW(C

004002

145714

3%:

#0DDAD
, aRHBA
43

004000

145716

4%:

86%:

MOV
MOV
MOV
MOV

aRHTDB, $SREGO
#RDY ,3RHCS

102

3s
140

6%:

006572

@RHST,DS1
aRHER ,ER1

, TC
aRHMR?

5%:

050202

@RHCS3,CS3
aRHCS2,(S2
aRHTDB, TDR

145734

007224
001103

035460

87%:

CLR
JMP

JSR

141
EVENAD ,aRHTDB
5%
142
R7 ,WHYFO
$ERFLG
63
146
170
R7,CLEER
R7 .ERRTST

;CLEAR (S3

; CONT INUE
:SAVE BUS ADDRESS EXTENSION

:SAVE RHCS3
:SAVE (CS2
:SAVE TESTER STATUS

., SAVE ERROR REGISTER

;SAVE TESTER DATA REG.
;SAVE MR2 TESTER REG.
JGET DATA
;1S READY SET
;YES,CONTINUE TEST
JREADY DID NOT SET
:DID WC INCREMENT
;YES,CONT TEST
WRITETO OPERATION DID NOT INC WC
:DID BA INCREMENT
;YES CONT TEST

:BA DID NOT INCREMENT AFTER AN WRITETO OPERATION
:DID INFO WRITETO TESTER
SYES,CONT

:INFO DID NOT WRITETO TESTER
;ARE ANY ERROR BITS SET
;WAS THER AN ERROR

;NO EXIT TEST

:THESE ARE THE CONTENTS OF ALL RH70 REG.

:THIS 1S TO COMMPLETE ERROR PRINTOUT
;CLEER ERRORS IF ANY

2222223222323 3222233 3222333223323 2233 30222282028ttt

TXTEST 60

SEQ 0102

dtt

sttt

READ OPERATIONAL TEST (NORMAL) #2

s*THESE TESTS VERIFY ALL READ AND WRITE CODES

J*WHETHER IT BE A READ REV. OR FWD OR A WRITE REV. OR FWD
s*DURING THESE TESTS THE TESTER TIMING IS MARGINED AND
:*NO ERRORS SHOULD OCCUR
S

035464
035466
035474
035502
035510
035516
035524
035526
035530
035536
035544
035550
035556
035560
035564
035566
035572
035600
035602

000007
177777
125252

000000
000073
003446
000200

165644
145630
145624

222232323223 2233 2333232322322 3333 2322238328822 d000R0d0R8

TST60:

004100
145624

145622
145564

1%:

145552

18%:

003446

001004
005237

003446
000200

003446

145530

19%:

SCOPE
MOV
MOV
MOV
MOV
MOV

#7 ,@RHCS2
#-1,3RHWC

ARBUF
, aRHBA
#ZERO,RBUF

#0AB ,aRHTDB
R1
18
#ZERO,aRHBAE

AREAD2
, RHCS1

BITCNT
#RDY ,3RHCS1
2%
BITCNT
18$
BITCNT
#RDY ,@RH(S1
2%
BITCNT

202220 2tRdd

;SETUP UNIT SEVEN
;FOR ONE WORD
;SRTUP BA
;SETUP DATA
:SETUP TESTER DB

;IS IT AN 11 OR A 70
JIT°S AN RH11
;ZERO BAE
:TELL IT TO READZ
;CLEAR BIT COUNTER
;IS RDY SET
;BIT IS SET
;COUNT UP

JNOT FINISHED COUNTING

:GET READY TO DO IT AGAIN
;IS IT SET YET?
JYES

;COUNT UP

MASSBUS RH70 AND RH11 _DIAGNOSTIC

CZRHBD.P11
5387
5388

5389

5390
5391
5392
5393
5394
5395
5396
5397
5398

5399
5400
5401
56402
5403

5404
5405

02-MAY-78 10:01

035606
035610

0014601
000770

035612
035620
035626
035634
035636
035640
035644
035650
035654

017737
017737
017737
005701
001406
005037
005037
000137
017737

035612

035962
035670

035676
035704
035712

035720
035726

5406
5407
5408
5409
5410
5411

035734
035742
035744
035746
035752
035760

5413
S414
5415

035766
035770

56412

5616
5417
5418
5419
5420
5621
5422

5423
5424
5425
5426

MACY11 30A(1052)

035762

017737
017737

017737
017737
017737

017737
017737

032777
001003
104102
004737
023777
001407

145512
145506
145502

160

003420
003444
003414

2%:

003416

003424

035670
145500

145474
145444

145440
145434
145432

145412
145416
000200
007224
004100

003416

003424
003422

003432
003436
003442

87%:

86%:

003440
001162

145370

3%:

005737

004100

035772
035776

000137
104150

036000

036000
036004
036010
036012
036014
036016
036022

004737
105737
001402
104146
104170
004737
004737

007224
001103

4%:

006572
050202

6%:

001403
104147

DRI

10:03

PAGE 103

BEQ
B8R

23
19%

;BIT IS NOT GOING TO SET

MOV
MOV
MOV
TST
8EQ
CLR
CLR
JMP
MOV

aRHCS1,CS1
aRHWC ,WC
aRHBA ,BA
R1
87%
BAE
(S3
86
aRHBAE ,BAE

;SAVE RHCS1
;SAVE WORD COUNT
;SAVE BUS ADDRESS
;IS IT AN RH11
JNO IT'S A 70
;CLEAR BAE
;CLEAR (S3
s CONTINUE
;SAVE BUS ADDRESS EXTENSION

MOV
MOV
MOV

aRHST, DS
aRHER,ER1
aRHTDB, TDR

:;SAVE TESTER STATUS
:SAVE ERROR REGISTER
;SAVE TESTER DATA REG.

MOV
MOV

@RH(CS3,(CS3
@RH(CS2,(CS2

aRHMR?, TC
aRHTDB, SREGO

BIT
BNE
ERROR
JSR
CMP
BEQ

#RDY ,@RHCS1
3s
102
R7 ,WHYFO
RBUF ,aRHTDB
43

BEQ
ERROR

5%
147

TST

5%:

02-MAY-78

READ OPERATIONAL TEST (NORMAL) #¢2

MOV
MOV

145366

RBUF

;SAVE MRZ2 TESTER REG.
;GET DATA

;IS OR SET
;YES RDY IS SET
;READY DID NOT SET
;ARE ANY ERRORS SET
:DID INFO GET WRITTEN OR READ
;INFO GOT LOADED

;DOES RBUF = 0

:YES INFO DID NOT LOAD
;ALL BITS DID NOT LOAD DURING
;AN READ2 OPERATION

JMP
ERROR

43
150

JSR
TSTB
B8EQ
ERROR
ERROR
JSR
JSR

R7 ,WHYFO
$ERFLG
63
166
170
R7,CLEER
R7,ERRTST

NN RN

:SAVE RHCS3
;SAVE (S2

RAN

JEXIT TEST
JRE~.?2 OPERATION DID NOT WORK
:NO BITS WHERE LOADED TO RBUF
;ANY ERRORS SET
;ANY ERRORS ?
JNOEXIT TEST
JPRINT REGISTERS
:CLEAR ERRORS

AR RN ARRARRARRRANARNRANRCANNARRRARAARRANRR

5427
5428
5429
5430
gz;;

J*TEST 61
READ OPERATIONAL TEST #1
;*THESE TESTS VERIFY ALL READ AND WRITE CODES
;*WHETHER IT BE A READ REV. OR FWD OR A WRITE REV. OR FWD
;*DURING THESE TESTS THE TESTER TIMING IS MARGINED AND
;*NO ERRORS SHOULD OCCUR

5433

5434

5435

5436
5437
5438
5439
5440
5441
5442

036026

036030

036036
036044
036052
036060
036062
036064
036072

000004

012777

012777
012777
012777
005701
100403
012777
012777

000007

145302

000000
004000

145266
145234

052525
000003
177777

TST61:

145304
145302
145252

1%:

AR
ARAR
RARARANRAANAAAAR
RRRRAR
AR AR
AA AR ARRRAARAARIA

SCOPE

MOV

MOV
MOV
MOV
TST
BM]
MOV
MOV

#7 ,8RHCS?2

#AB ,aRHTDB
#DMD 'MCLK ,aRHMR1
#-1,aRHWC
R1
19
#1ERO, aRHBAE
#EVENAD ,aRHBA

JSETUP UNIT SEVEN

;SETUP INFORMATION
;SETUP DIAG. MODE
sFOR ONE WORD
;IS IT A 11 0R 70
JIT'S AN 1
;JERO BAE
;SETUP BA

SEQ 0103

MACY11 30A(1052)

MASSBUS RH70 AND RH11_DIAGNQOSTIC
CZRHBD P11

5443

5444
5445
5446
5447

5448

5449
5450
5451
5452

5453
5454
5455
5456
5457

02-MAY-78 10:01

036100
036106
036114
036120
036124

036132

012777
012777
005037
005237
022737
001372
012777
012777
012777
012777
012777
005037
032777
001015
005237
001371
005037
032777
001004
005257
001401
000770

000071
000001
003446
003446
070015

017737
017737
017737
005701
001406
005037

145064
145060
145054

000003
000001
000003
000001
000000
003446
000200

161

003446

2%:

145124

18%:

145102

19%:

003446

003420
003444
003414

7%:

145052
145046
145016
145012

000200

#READO ,aRHCS1
#DMD
, 3aRHMR1
BITCNT
BITCNT
#15,BITCNT

#DMD
, aRHMR1
#DMD !MCLK ,aRHMR1
#DMD
, 3RHMR
#ZERO,3RHMR1
BITCNT
#RDY ,@RHCS1
7%
BITCNT
18%
BITCNT
#RDY ,@RHCS1
7%
BITCNT
7%
19%

@3RHCS1,CS1
aRHWC ,WC
aRHBA ,BA
R1

87%

003416

003424
036316

READ OPERATIONAL TEST #1

2$
#DMD !MCLK ,aRHMR1

145212
165204
165176
145170
145162

003446
003446
000200

N 8
02-MAY-78 10:03

BAE

cS3

003416
003424
003422
003432
003436
003442
003440
001162

87%:

86%:

86%

@RHBAE ,BAE

SRHCS3,CS3
@RH(CSZ2,CS2
@dRHST,DS1
@RHER,ER1
aRHTDB, TDR

aRHMRZ,
TC
@RHTDB, $REGO

#RDY ,aRHCST

144740

8%
102

177777

144730

8%:

004002

144720

3%:

004000

144722

4%:

144
§¥ENAD.8RHTDB

5%:

145
R7 ,WHYFO

00722+
001103

#-1,3RHWC

3s
143

#0DDAD
, aRHBA
48

PAGE 104

SEC 0104

SJTELL IT TO READFROM
sMANIPULATE CLOCK
;CLEAR LOOP COUNTER
2 INCREMENT LOOP COUNTER
;IS IT THIRD LOOP FOR 5USEC WAIT
;NO LOOP AGAIN
;START CHANGING CLOCK
;CHANGE CLOCK AGAIN
: CHANGE CLOCK AGAIN
;CHANGE CLOCK AGAIN
;GET OUT OF DIAG MODE
;CLEAR BIT COUNTER
;1S RDY SET
;BIT IS SET
s COUNT UP
sNOT FINISHED COUNTING
;GET READY TO DO IT AGAIN
;IS IT SET YET?
JYES
s COUNT UP
;BIT IS NOT GOING TO SET

;SAVE RHCS1
;SAVE WORD COUNT
;SAVE BUS ADDRESS
;1S 1T AN RH11
:NO IT'S A 70
;CLEAR BAE

;CLEAR CS3

> CONT INUE
:SAVE BUS ADDRESS EXTENSION

;SAVE RH(CS3
;SAVE (S2
:SAVE TESTER STATUS
;SAVE ERROR REGISTER
;SAVE TESTER DATA REG.
;SAVE MR2 TESTER REG.
:GET DATA
;IS READY SET

JYES,CONTINUE TEST
JREADY DID NOT SET
;:DID WC INCREMENT
JYES,CONT TEST
:READFROM OPERATION DID NOT INC WC
;DID BA INCREMENT
;YES CONT TEST
:BA DID NOT JNCREMENT AFTER AN READFROM OPERATIO
:DID INFO READFROM TESTER
JYES,CONT
:INFO DID NOT READFROM TESTER
:ARE ANY ERROR BITS SET
;WAS THER AN ERROR

JNO EXIT TEST
:THESE ARE THE CONTENTS OF ALL RH70 REG.

:THIS IS TO COMMPLETE ERROR PRINTOUT

MASSBUS RH70 AND RH11 DIAGNOSTIC

CZRHBD.P11
5499
5500

5501

02-MAY-78 10:01

036450
036454

004737
004737

006572
050202

036460

000004

036462

012777

5515
5516

036520
036522

005701
100403

036470
036476
036504
036512
036524

5518

036532

5520
5521

036544
036552

5519

5522
5523
5526
5525
5526
5527
5528
5529
5530

036540

036554
036560
036562
036566
036574
036576
036602
036604
036606

012777
012777
012737
012777

005037

003446

032777
001015

005037

036644

5540
5541

036656
036664

5545

5546

5547
5548
5549
5550
5551
5552
5553
5554

036650

036672
036700
036706

036714

036722

036730
036736
036740
036742
036746
036754
036756
036762

017737
017737
005701
001406
005037
000137

017737

R7,CLEER
R7 ,ERR7TST

PAGE 105

SEQ 0105

;CLEER ERRORS IF ANY

R R AR AR R AR A AR R AR AN A AT AR AR AR AR RN

144626

003446
000200

144534

19%:

003446

144512
144506

00340

A AR

ARAANNNNRAANARRA AR

SCOPE

2%:

003444
003414

AN AN AR

A AN AN

ARANRAN RN

MOV

#7 ,3RHCS?2

JSETUP UNIT SEVEN

TST
BMI
MOV

R1
1%

;IS IT AN 11 OR A 70
JIT*S AN RH1

MOV
MOV
MOV
MOV

18%:

Mov

#-1,dRHWC
#RBUF , 3RHBA
#7ERO,RBUF
#0AB,aRHTDB

#1ERO , aRHBAE

#READ4 ,dRH(CS1

(LR

BITCNT

BIT
BNE

;ZERO BAE

;TELL IT TO READ4

;CLEAR BIT COUNTER

INC
BNE
CLR
BIT
BNE
INC
BEQ
BR

H#RDY ,aRH(CS1
2’3

BITCNT
18%
BITCNT
#RDY ,aRHCS1
2%
BITCNT
’$
19%

;1S RCY SET
;BIT IS SET

MoV

aRHCS1.,CS1

;SAVE RHCS1

;COUNT UP
JNOT FINISHED COUNTING
;GET READY TO DO IT AGAIN
JIS IT SET YET?
JYES
;COUNT UP
;BIT IS NOT GOING TO SET

003416

ARHWC ,W(
aRHBA ,BA
R1
87%
BAE

036664

JMP

86%

s CONT INUE

MOV
MOV

aRH(CS3,CS3
aRH(SZ2,(S2

;SAVE RH(CS3
;SAVE (S2

003424

144504

144416

14646444
144440
144436
144422

000200

007224
004100

004100

CLR

003416

003424
003422

003432
003436
003442

87%:

86%:

003440

MOV
MOV
MOV

MOV

001162

MOV

144372

144374

MOV

3%:

BIT
BNE
ERROR
JSR
CMP
BEQ
TST
BEQ

(S3

aRHBAE ,BAE

aRHST,DS1
@RHER ,ER1
aRHTDB, TDR

aRHMR?2,T(C

3RHTDB, SREGO

#RDY ,dRH(CS1
33
102
R7 ,WHYFO
RBUF ,aRHTDB
4%
RBUF
5%

AN AR

;FOR ONE WORD
JSRTUP BA
;SETUP DATA
;SETUP TESTER DB

MOV
MOV
TST
BEQ
CLR

017737

032777
001003
104102
004737
023777
001407
005737
001403

144634
144630
004100
144630

144556

144500
164450

017737

TST62:

000200

017737
017737

017737
017737
017737

144650

1%:

144516

036640

5542
5543
5544

JSR
JSR

144570

003446

5537

5539

6$:

000075

005237
001371
005037
032777
001004
005237
001401
000770

017737

5538

177777
004100
000000
125252
000000

012777

036606

036614
036622
036630
036632
036634

000007

012777

5531

5532
5533
5534
5535
5536

10:03

READ OPERATIONAL TEST #1

5510

5517

;*TEST 62
READ OPERATIONAL TEST (NORMAL) #3
;*THESE TESTS VERIFY ALL READ AND WRITE CODES
;*WHETHER IT BE A READ REV. OR FWD OR A WRITE REV. OR FWD
:*DURING THESE TESTS THE TESTER TIMING IS MARGINED AND
;*NO ERRORS SHOULD OCCUR

5508

5S11
5512
5513
5514

02-MAY-78

161
IR

5502
5503
5504
5505
2289
5509

MACY11 30A(1052)

;s SAVE WORD COUNT
;SAVE BUS ADDRESS
;IS IT AN RH11
INO IT'S A 70
;CLEAR BAE

;CLEAR (S3

;SAVE BUS ADDRESS EXTENSION
;SAVE TESTER STATUS
;SAVE ERROR REGISTER
;SAVE TESTER DATA REG.

;SAVE MR2 TESTER REG.
;GET DATA

;IS OR SET
;YES RDY IS SET
JREADY DID NOT SET
;JARE ANY ERRORS SET
;DID INFO GET WRITTEN OR READ
;INFO GOT LOADED
;DOES RBUF = 0
;YES INFO DID NOT LOAD

MASSBUS RH70 AND RH11_DIAGNOSTIC

CZRHBD.P11
5555
5556
5557
5558
5559
5560
5561
5562
5563
5564
5565
5566

02-MAY~78 10:01

MACY11 30A(1052)

162

036764

104147

036766
036772

000137
104150

036774

036774
037000
037004
037006
037010
037012
037016

004737
105737
001402
104146
104170
004737
004737

007224
001103

4%:

006572
050202

6%:

5%:

02-MAY-78

10:03

PAGE_106

READ OPERATIONAL TEST (NORMAL) #3
ERROR

147

JMP
ERROR

31
150

JSR
1IN
BEQ
ERROR
ERROR
JSR
JSR

R7 ,WHYFO
$ERFLG
63
146
170
’
R7,CLEER
R7 ,ERRTST

JALL BITS DID NOT LOAD DURING
;AN READ4 OPERATION
JEXIT TEST
JREAD4 OPERATION DID NOT WORK
;NO BITS WHERPE LOAD"D TO RBUF
;ANY ERRORS SET
JANY ERRORS ?
:NOEXIT TEST
JPRINT REGISTERS
;CLEAR ERRORS

SEQ 0106

MASSBUS RH70 AND RH11 _DIAGNOSTIC
CZRHBD.P11
02-MAY-78 10:01

9567
5568
5569
5570
5571
5572
5573
5574
5575

D 9
02-MAY-78 10:03 PAGE 107
MACY11 30A(1052)
763
RH NPERATIONAL WRITE TEST #2
AR

;*TEST 63

AR AR RN AR AN RN

AR AR AR

AR R

RNA RN RN R AR AR

RH OPERATIONAL WRITE TEST #2

SEQ 0107
AR

s*THESE TESTS VERIFY ALL READ AND WRITE CODES
;*WHETHER IT BE A READ REV. OR FWD OR A WRITE REV.

RN RS

OR FWD

;*DURING THESE TESTS THE TESTER TIMING IS MARGINED AND
;*NO ERRORS SHOULD OCCUR
BE

037022

000004

232223333323323233233282332822288323
8328232028328
00002 R0RRRd0Rdnd

1ST63:

SCOPE

MASSBUS RH70 AND RH11_DIAGNOSTIC
CZRHBD.P11
02-MAY-78 10:01

5576
5577
5578
5579

037024
037032
037040

5580
5581
5582
5583
5584
5585
5586
5587
5588
5589
5590
5591
5592
5593
5594
5595
5596
5597
5598
5599
5600
5601
5602
5603
5604
5605
5606
5607
5608
5609
5610
5611
5612

012777
012737
012777

000007
125252
001003
177777

000000
004000
000063
001001
003446
003446
000015
001003
001001
001003
001001
000000
003446
000200

144306

MOV

004000
144306
144256

MOV
MOV
MOV

164272
144240
144226
144244

MOV
MOV
Mov
MoV

003446

TST
BMI

1%:

2%:

144216
144210
144202
16446174
144166
144130

144106

5613

5614
5615
5616
5617
5618
5619
5620
5621

5622
5623
5624

037412

144070
144064
144060

003420
003444
003414

#ZERO, aRHBAE
#EVENAD ,3RHBA
MWIRITE2 ,dRH(CST

#DMD ! SLKM,3RHMR1
BITCNT
BITCNT
5;5.BITCNT

#1ERO,3RHMR1

18%:

19%:

003446

017737
017737
017737
005701
001406
005037

CLR

#7 ,8RHCS2
#0AB,EVENAD
#DMD 'MCLK ! SLKM, 3RHMR1
#-1,3RHW(
R1
18

#DMD 'MCLK ! SLKM, 3RHMR1
#DMD ! SLKM, aRHMR 1
#DMD 'MCLK ' SLKM, 3RHMR 1
#DMD ! SLKM, aRHMR 1

003446
003446
000200

10:03
PAGE 108
02-MAY-78
MACY11 30A(1052)
T63
RH OPERATIONAL WRITE TEST #2

7%:

BITCNT

#RDY ,3RHCS1
7%

BITCNT
18%
BITCNT

#RDY ,8RHCS1

7$
BITCNT
7%
19%

003416
003424
003422
003432
003436
003442

177777

143734

8%:

004002

143724

3s:

87%:
86%:

143744

;IS IT A 11 0R 70
JIT'S AN 1

;JERO BAE
;SETUP BA
JTELL IT TO WRITETO
;MANJPULATE CLOCK
;CLEAR LOOP COUNTER
: INCREMENT LOOP COUNTER

;IS IT THIRD LOOP FOR SUSEC WAIT
:NO LOOP AGAIN

;START (CHANGING CLOCK
;CHANGE CLOCK AGAIN
;s CHANGE CLOCK AGAIN
;CHANGE CLOCK AGAIN
:GET OUT OF DIAG MODE
;CLEAR BIT COUNTER
;IS RDY SET
;BIT IS SET
;COUNT UP
;NOT FINISHED COUNTING
;GET READY TO DO IT AGAIN
;IS IT SET YET?
JYES
;COUNT UP
;BIT IS NOT GOING TO SET

;SAVE RHCS1

BAE

;CLEAR BAE

€s3
86%

@RHBAE ,BAE

dRH(CS3,(S3
@RHCS2,(S2
@RHST,DS1
aRHER ,ER1

3RHMRZ,
TC
RHTDB, $REGO

001162

;FOR ONE WORD

;SAVE WORD COUNT
:SAVE BU> ADDRESS
;IS IT AN RH11

aRHTDB, TDR

003440

JSETUP UNIT SEVEN
;SETUP INFORMATION
;SETUP DIAG. MODE

aRHCS1,CS1
3RHWC
, WC
aRHBA ,BA
R1

87%

003416
003424
037312
144056
144052
144022
144016
144012
144010
143770
143774
000200

SEQ 0108

:NO IT'S A 70

;CLEAR (S3
> CONT INUE
;SAVE BUS ADDRESS EXTENSION
:SAVE RH(S3
;SAVE (S2
;SAVE TESTER STATUS
;SAVE ERROR REGISTER
;SAVE TESTER DATA REG.
;SAVE MR2 TESTER REG.

;GET DATA
;1S READY SET
JYES,CONTINUE TEST
JREADY DID NOT SET
;DID WC INCREMENT
JYES,CONT TEST

#0DDAD ,aRHBA

;DID BA INCREMENT

HRDY ,aRHCS1

8%
102

#-1,3RHWC

140

43
141

;WRITETO OPERATION DID NOT
JYES CONT

TEST

INC WC

;BA DID NOT INCREMENT AFTER AN WRITETO OPERATION

5632
5633
5634
95635
5636
5637
5638
5639
5640
5641
5642
5643
5644
5645
5646

5647
5648
5649
5650
5651
5652
5653
5654
5655
5656
5657
5658
5659
5660
5661

5662
5663
5664

5665
5666
5667
5668
5669
5670
5671
5672
5673
5674
5675
5676
5677
5678

037414
037422
0374264
037426
037432
037436

037440
037442
037444
037450

023777
001401
104142
004737
105737
001402

004000

004737
004737

006572
050202

104146
104170

MACYT1 30A(1052)
02-MAY-78 10:03 PAGE 109
T63
RH OPERATIONAL WRITE TEST #2

MASSBUS RH70 AND RH11 DIAGNOSTIC
CZRHBD.P11
02-MaY-78 10:01
163726

007224
001103

(%:

5%:

6%:
A A A AR

CMP
BEQ
ERROR
JSR
TSTB
BEQ
ERROR
ERROR
JSR
JSR

LATEST 66

AN AR

;DID INFO WRITETO TESTER

EVENAD ,aRHTD8B
5%
142
R7 ,WHYFO
SERFLG
6$

JYES,CONT

;INFO DID NOT WRITETO TESTER
;ARE ANY ERROR BITS SET
;WAS

THER AN ERROR

:NO EXIT TEST

;THESE ARE THE CONTENTS OF ALL RH70 REG.

146
170
R7,CLEER
R7 ,ERRTST

AR NR AN AR

SEQ 0109

sTHIS IS TO COMMPLETE ERROR PRINTOUT

;CLEER ERRORS [f ANY
AR AR

AR RN

RRNNAN R

NN AR RN

READ OPERATIONAL TEST (NORMAL) #4
;*THESE TESTS VERIFY ALL READ AND WRITE CODES
;J*WHETHER IT BE A READ REV. OR FWD OR A WRITE REV.

OR FWD

;*DURING THESE TESTS THE TESTER TIMING IS MARGINED AND
;*NO ERRORS SHOULD OCCUR

037454
037456
037464
037472
037500
037506
037514
037516
037520
037526
037534
037540
037546
037550
037554
037556
037562
037570
037572
037576

000004
012777
012777
012777
012737
012777
005701
100403

000007
1727777
004100
000000
125252

012777
012777
005037
032777
001015
005237

000000
000077
003446
000200

005037
032777

003446
000200

005237
001401
000770

003446

017737
017737
017737
005701
001406
005037
005037

143522
143516
143512

001371

001004

017737

143632
143574

1%:

143562

18%:

143426

143540

003420
003444
003414

003416
003424
003422
003432
003436
003442
003440
001162

SCOPE
MOV
MOV
MoV
MoV
MoV
TST

003446

037644
037652
037660
037666

037674
037702
037710
037716

143654
143640
143634
004100
143634

222223222323 2232 2233223233423

TST64:

19%:

2%:

87%:
86%:

8MI
MOV
MoV
CLR
81T
BNE
INC
BNE
CLR
BIT
BNE
INC
BEQ
BR
L 01Y)
MOV
MOV
TST
BEQ
CLR
CLR
JMP

MOV

MOV
MOV
MOV
MoV
MOV

22288323380

#7 ,8RHCS?2
#-1,3RHWC

#RBUF
, 3RHBA
#ZERO,RBUF
#0AB,aRHTDB

R1
1%

#ZERO,aRHBAE

#READG ,aRHCS1
BITCNT
#RDY ,3RHCS1T

BITCNT
18%
BITCNT

#RDY ,3RH(CS1

@RHCS1,CS1

0RR00RdtRRRiit

;SETUP UNIT SEVEN
;FOR ONE WORD
;SRTUP BA
:SETUP DATA
;SETUP TESTER DB

;IS IT AN 11 OR A 70
JIT'S AN RH11
; ZERO BAE
;TELL IT TO READ6
;CLEAR BIT COUNTER
;IS RDY SET
;BIT IS SET
s COUNT UP
;NOT FINISHED COUNTING
;GET READY TO DO IT AGAIN
IS IT SET YET?
JYES
;COUNT UP
;BIT IS NOT GOING TO SET
:SAVE RH(CS1

aRHW(C
, W(
aRHBA ,BA
R1

;SAVE WORD COUNT

€s3
86%

;CLEAR (S3

87%
BAE

;SAVE BUS ADDRESS
;IS IT AN RH11
:NO IT'S A 70
. CLEAR BAE

3RHBAE ,BAE

; CONT INUE
:SAVE BUS ADDRESS EXTENSION

aRH(S3,CS3
adRHCS2,(CS2
@dRHST,DS1
aRHER ,ER1
aRHTDB, TDR

TC
3RHMR?2,
aRHTDB, $REGO

:SAVE RH(CS3
;SAVE (S2
:SAVE
:SAVE
;SAVE
:SAVE

TESTER STATUS
ERROR REGISTER
TESTER DATA REG.
MR?2 TESTER REG.
;GET DATA

MASSBUS RH70 AND RH11 DIAGNOSTIC

CZRHBD.P11
5688

5689
5690
5691
5692
5693
5696
5695
5696
5697
5698
5699
5700

5701
5702
5703
5704
5705
5706
5707

5708

MACY11 30A(1052)

02-MAY-78 10:01

037724

037732
037736
037736
037742
037750
037752
037756
037760

032777

001003
104102
004737
023777
001407
005737
001403
104115

T64

000200

143376

007224
004100

143400

037770

037770
037774

004737
105737

007224
001103

4%:

006572
050202

69%:

040000
040002
040004
040006
040012

001402
104146
104170
004737
004737

5%:

5709

000004
012777
012777
012777
012777

000007
052525
001003
177777

143312
143314
143312
143262

5723
5724

040054
040062

012777
012777

000000
004000

143276
143244

005037
005237

003446
003446

5729
5730

5731
5732
5733
5734
§735
5736
5737
5738
5739
5740
5741
§742
5743

JMP
ERROR

4%
107

JSR
1S18B

R7 ,WwHYFO
$ERFLG

8EQ
ERROR
ERROR
JSR
JSR

;IS OR SET

33
102
R7 .WHYFO
RBUF ,aRHTDB
43
RBUF
5%
115

6%
146
170
R7,CLEER
R7 ,ERRTST

ARRR AR

AN AR AR AR

:YES RDY IS SET
JREADY DID NOT SET
JARE ANY ERRORS SET
:DID INFO GET WRITTEN OR READ
;INFO GOT LOADED
;DOES RBUF = 0
JYES INFO DID NOT LOAD
;ALL BITS DID NOT LOAD DURING
;AN READG6 OPERATION
JEXIT TEST
;READ6 OPERATION DID NOT WORK
;NO BITS WHERE LOADED TO RBUF

;ANY ERRORS SET
;ANY ERRORS ?

sNO,EXIT TEST
JPRINT REGISTERS

:CLEAR ERRORS
AR AARAARAAARAANANARARNNARRANR
KA X K

RH OPERATIONAL READ TEST #2

040050
060052

040070
04640076

040104
040110

040114

040122

040124
040132
040140
040146
040154
040162
040166
040174
040176
040202
040204
040210
040216

005701
100403

012777
012777

022737
001372

012777
012777
012777
012777
012777
005037
032777
001015
005237
001371
005037
032777
001004

RNRNRRRRRRR AR

040016
040020
040026
040034
040042

5727
5728

PAGE 110

:*DURING THESE TESTS THE TESTER TIMING IS MARGINED AND
;*NO ERRORS SHOULD OCCUR

5716
5717
5718
5719
5720

5725
5726

10:03

;*THESE TESTS VERIFY ALL READ AND WRITE CODES
:*WHETHER IT BE A READ REV. OR FWD OR A WRITE REV. OR FWD

5712
g;}z

5721
5722

#RDY ,8RH(CS1T

;*TEST 65

5710
5711

5715

BIT

BNE
ERROR
JSR
CMP
B8EQ
TST
BEQ
ERROR

004100

000137
104107

READ OPERATIONAL TEST (NORMAL) #4

3%:

037762
037766

02-MAY-78

000073
001001

143232
1463250

000015

003446

001003
001001
001003
001001
000000
003446
000200

143222
143214
143206
143200
143172

TST65:

SCOPE
MOV
MOV
Mov
MOV

#7 ,8RHCS?
AAB,aRHTDB
#DMD 'MCLK ! SLKM, aRHMR1
#-1,aRHWC

JSETUP UNIT SEVEN
:SETUP INFORMATION
;SETUP DIAG. MODE
;FOR ONE WORD

1$%:

MOV
MOV

#1ERO,3RHBAE
#EVENAD ,aRHBA

. ZERO BAE
;SETUP BA

2%:

CLR
INC

BITCNT
BITCNT

TST
)

MOV
MOV

BNE

143134

18%:

143112

19%:

003446
003446
000200

AR RRRRRRRARAARRR AR AR AR ARNNARNANNRRNR

MOV
MOV
MOV
MOV
MOV
CLR
BIT
BNE
INC
BNE
CLR
BIT
BNE

R1
1%

#READ?2 ,aRH(CS1
#DMD ! SLKM,aRHMR1

#15 ,BITCNT
23

#DMD !MCLK ' SLKM, aRHMR1
#DMD ! SLKM,aRHMR1
#DMD !MCLK ! SLKM, aRHMR 1
#DMD ! SLKM,aRHMR1
#ZERO,aRHMR1
BITCNT
#RDY ,8RHCS
7%
BITCNT
18%
BITCNT
#RDY ,3RHCS1
7$

;IS IT A 11 0R 70
JIT'S AN 11

JTELL IT TO READFROM
JMANIPULATE CLOCK
;CLEAR LOOP COUNTER
; INCREMENT LOOP COUNTER

;1S IT THIRD LOOP FOR SUSEC WAIT
;NO LOOP AGAIN

;START CHANGING CLOCK
;CHANGE CLOCK AGAIN
s CHANGE CLOCK AGAIN
;CHANGE CLOCK AGAIN
;GET OUT OF DIAG MODE
;CLEAR BIT COUNTER
;IS RDY SET
;BIT IS SET
. COUNT UP
;NOT FINISHED COUNTING
JGET READY TO DO IT AGAIN
JIS IT SET YET?
;YES

SEQ 0110

MACY11 30A(1052)

MASSBUS RH70 AND RH11_DIAGNOSTIC

CZRHBD.P11
57644
5745
57646

02-MAY-78 10:01

040220
040224
040226

005237
001401
000770

003446

040230

017737

143074

57647

040230

5749
5750
5751
5752
5753
5754
5755
5756
5757

040236
040244
040252
040254
040256
040262
040266
040272
040300

57648

5758

5759
5760
5761

5762

5763
5764
5765
5766
5767
5768
5769
5770
5771
5772
5773
5774
5775
5776
5777
5778

5779
5780
5781
5782

5783

040306

040314
040322
040330

040336

040344
040352
040360
0640362
040364
040372
040374
040376
040404
040406
040410
040416
040420
0640422
040426
040432

040434
040436
040440
040444

017737
017737
005701
001406
005037
005037
000137
017737
017737

143070
143064

003416
003424
040306
143062

017737

143056
143026

017737

142774

017737
017737
017737

143022
143016
143014

017737
032777
001001
104102
022777
001001
104143
022777
001401
104144
023777
001401
104145
004737
105737
001402

143000
000200

004737
004737

006572
050202

104146
104170

165

003420
003444
003414

003416
003424

003422

003432
003436
003442

5791

040450

000004

0640452

012777

5797
5798

040510
040512

005701
100403

5799

86%:

001162
142750

177777

142740

8%:

004002

142730

3%:

004000

142732

4%:

007224
001103

5%:

6%:

10:03

RH OPERATIONAL READ TEST 42

PAGE 111

SEQ 0111

INC
BEQ
ER

BITCNT
7%
19%

;COUNT UP
JBIT IS NOT GOING TO SET

MOV

aRH(CS1,(91

;SAVE RH(CS1

aRH(CS2,(S2

;SAVE (S2

MOV
MOV
TST
BEQ
CLR
CLR
JMP
MOV
MOV

ARHW{ ,WC
aRHBA ,BA
R1
87%
BAE
€S3
86%
aRHBAE ,BAE
@RH(S3,(S3

MOV
MOV
MoV

@RHST ,DS1
aRHER ,ER1
aRHTD8B, TDR

MOV

aRHMR?2, T(C

ERROR
ERROR

146
170

MOV
BIT
BNE
ERROR
cMpP
BNE
ERROR
MP
BEQ
ERROR
(MP
BEQ
ERROR
JSR
TSTB
BEQ
JSR
JSR

aRHTDB, SREGO
#RDY ,aRHCS1
8%
102
#-1,aRHWC
3%
143
#0DDAD , dRHBA
A
144
EVENAD ,3RHTDB
5%
145
R7 ,WHYFO
$ERFLG
6%
R7,CLEER
R7 ,ERRTST

AR AN AR RN AR RA R

AR RN A R

;SAVE WORD COUNT
;SAVE BUS ADDRESS
;1S IT AN RH11
JNO IT'S A 70
;CLEAR BAE
;CLEAR (CS3
; CONTINUE
;SAVE BUS ADDRESS EXTENSION
;SAVE RH(CS3
;SAVE TESTER STATUS
;SAVE ERROR REGISTER
;SAVE TESTER DATA REG.

;SAVE MR2 TESTER REG.

;JGET DATA
;1S READY SET
JYES,CONTINUE TEST
JREADY DID NOT SET
;DID WC INCREMENT
JYES,CONT TEST
;READFROM OPERATION DID NOT INC WC
;DID BA INCREMENT
JYES CONT TEST
:BA DID NOT INCREMENT AFTER AN READFROM QOPERATIO
;DID INFO READFROM TESTER
JYES,CONT
:INFO DID NOT READFROM TESTER
JARE ANY ERROR BITS SET
;WAS THER AN ERROR
JNO EXIT TEST

:THESE ARE THE CONTENTS OF ALL RH70 REG.
;THIS IS TO COMMPLETE ERROR PRINTOUT
;CLEER ERRORS [F ANY

RR RN RAARRRARARRRRRARARAARANNNANRRRA
RS

;«TEST 66
WRITE OPERATIONAL TEST (NORMAL) #1
;*THESE TESTS VERIFY ALL READ AND WRITE CODES
;*WHETHER IT BE A READ REV. OR FWD OR A WRITE REV. OR FWD
;*DURING THESE TESTS THE TESTER TIMING IS MARGINED AND
;*NO ERRORS SHOULD OCCUR

5792

5793
5794
5795
5796

87%:

003440

5784
5785
5786
5787
g;gg

5790

7%:

02-MAY-78

040460
040466
040474
040502
040514

012777
012777
012737
012777
012777

RN AR AR RAARA R AR AR RRRRRRARRARR RN N AR RN RRARNNR AR

000007

142660

177777
004100
125252
000000

142644
142640
004100
142640

000000

142636

TST66:

SCOPE

MOV

#7 ,8RH(CS?2

JSETUP UNIT SEVEN

TST
BM]
MoV

R1
1%

JIS IT AN 11 OR A 70
JIT'S AN RHIN

MOV
MOV
MOV
MOV

#-1,3RHW(
#RBUF , dRHBA
#0AB , RBUF
#7ERO,aRHTDB
#ZERO, dRHBAE

;FOR ONE WORD
;SRTUP BA
;SETUP DATA
JSETUP TESTER DB
;JERO BAE

AAN AR

MACY11 30A(1052)
02-MAY-78 10:03 PAGE 112
166
WRITE OPERATIONAL TEST (NORMAL) #1

MASSBUS RH70 AND RH11_DIAGNOSTIC
CZRHBD.P11
02-MAY-78 10:01
5800
5801
5802
5803

040522
040530
040534
040542
040544
040550
040552
040556
040564
040566
040572
040574
040576
040576
040604
040612
040620
040622
040624
040630
040634
040640
040646
040654
040662

012777
005037
032777
001015
005237
001371
005037
032777
001004
005237
001401
000770

000061
003446
000200

017737
017737
017737
005701

142526
142522
142516

142600

1%:

142566

18¢%:

162544

19%:

003446
003446
000200

003446

003420
003444
003414

2%:

007224
004100

87%:

1642404

3s:

86%:

1462402

5%:

007224
001103

4%:

006572
050202

6$%:

;TELL IT TO WRITEO

BITCNT
#RDY ,aRHCST
2%
BITCNT
18%
BITCNT

;CLEAR BIT COUNTER
;1S RDY SET
;8IT IS SET
;COUNT UP
;NOT FINISHED COUNTING
JGET READY TO DO IT AGAIN

BEQ

Pt 3

;BIT IS NOT GOING TO SET

BIT
BNE
INC

#RDY ,3RHCS1
2%
BITCNT

19%

;1S IT SET YET?
:YES
;COUNT UP

MOV

aRHCST,CS1

;SAVE RHCS1

TST

;SAVE BUS ADDRESS
;IS IT AN RH11

CLR

BAE

;CLEAR BAE

JMP

86%

MOV

@RHST ,DS1

CLR
003416
003424
003422
003432
003436
003442
003440
001162

AMJRITEQ ,aRHCST

CLR
BIT
BNE
INC
BNE
CLR

BEQ

142376

040764

MOV

9%
MOV

003416

000200

MoV
MoV
MOV
MOV
MOV
MoV
MOV
BIT
BNE
ERROR
JSR
cMP
BEQ
TST
BEQ
ERROR

aRHW( ,WC
adRHBA ,BA

87%
€S3

aRHBAE ,BAE
aRHCS3,(S3
@RH(CS2,(S2
@aRHER ,ER1
aRHTDB, TDR
aRHMRZ2, TC
aRHTDB, $REGO
#RDY ,aRHCS1
38
102
R7 ,WHYFO
RBUF ,aRHTDB
4%
aRHTDB
5%
151

JMP

JSR
1ST8

R7 ,WHYFO
$ERFLG

ERROR

8EQ
ERROR
ERROR
JSR
JSR

152

6%
146
170
R7.CLEER
R7 ,ERRTST

;SAVE WORD COUNT

JNO IT'S A 70
;CLEAR (S3
s CONT INUE

;SAVE BUS ADDRESS EXTENSION
:SAVE RH(CS3
;SAVE (S2
;SAVE TESTER STATUS

;SAVE ERROR REGISTER

;SAVE TESTER DATA REG.

;SAVE MRZ2 TESTER REG.
:GET DATA
;IS OR SET
;YES RDY IS SET
JREADY DID NOT SET
;ARE ANY ERRORS SET
;DID INFO GET WRITTEN OR READ
;INFO GOT LOADED
;DOES aRHTDB = 0
JYES INFO DID NOT LOAD
SALL BITS DID NOT LOAD DURING
AN WRITEO OPERATION
JEXIT TEST
JWRITEOQ OPERATION DID NOT WORK
;NO BITS WHERE LOADED TO aRHTDB
;ANY ERRORS SET
;ANY ERRORS ?

sNO,EXIT TEST
sPRINT REGISTERS

;CLEAR ERRORS

.‘"t'tfifittttttttt.ttttttitttt'ttttitittitttittttt*tittit*tttttt'tt

RH OPERATIONAL WRITE TEST #3
;*TEST 67
;*THESE TESTS VERIFY ALL READ AND WRITE CODES
;*WHETHER 1T BE A READ REV. OR FWD OR A WRITE REV. OR FWD
;*DURING THESE TESTS THE TESTER TIMING IS MARGINED AND
;*NO ERRORS SHOULD OCCUR

SEQ 0112

CZRHBD.P11
5856
5857
5858
5859
5860
5861
5862
5863
5864
5865

167

02-MAY-78 10:01

RH OPERATIONAL WRITE TEST 43

PAGE 113

SEQ 0113

52 [T2T2222322223322233
238022222328 282 2303 8222222222222 2 02000200 s2d)

5866
5867
Soo8
5869
5870
5871
5872
5873
5874
5875
5876
5877
5878
5879
5880
5881
5882
5883
5884
5885
5886
5887

041012
041014
041022
041030
041036
041044
041046
041050
041056
041064
041072
U41100
041704
0411.0
04111¢
041120
041126
041134
041142
041150
041156
041162
041170
041172
041176
041200
041204
041212
0412164
041220
041222

000004
012777
012737
012777
012777
005701
100403
012777
012777
012777
012777
005037
005237
022737
001372
012777
012777
12777
012777
012777
005037
032777
001015
005237
001371
005037
032777
001004
005237
001401
000770

5889
5890
5891
5892

041224
041232
041240
041246

017737
017737
017737
005701

142100
1462074
142070

589
5895
5896
5897
5898
5899
5900
5901
5902
5903
5904
5905
5906
5907
5908
5909
5910

041252
041256
041262
041266
041274
041302
041310
041316
041324
041332
041340
041346
041354
041356
041360
041366
041370

005037
005037
000137
017737
017737
017737
017737
017737
017737
017737
017737
032777
001001
104102
022777
001001
104140

003416
003424
041302
142066
142062
142032
142026
142022
142020
142000
142004
000200

5911

9
J
02-MAY-78 10:03

MACY11 30A(1052)

MASSBUS RH70 AND RH11_DIAGNOSTIC

041372

022777

000007
125252
003003
177777

142316
004000
142316
142266

000000
004000
000065
003001
003446
003446
000015

142302
1462250
142236
142254

003003
003001
003003
003001
000000
003446
000200

003446

T8T67:

MoV

#DMD 'MCLK !'SLKM! ISLK,a3RHMR1

MOV

1%:

2%:

TST
BMI
MOV
MOV
MOV
(01"

CLR
INC

CMP

BNE
MOV
MOV

142226
142220
142212
142204
142176

MOV

142140

18%:

142116

19%:

003446

003420
003444
003414

#7 ,8RHCS?2

MoV

003446
003446
000200

SCOPE

MOV

7%:

177777

141744

8$:

004002

141734

3%:

141754

;SETUP DIAG. MODE

#-1,3RHW(

<FOR ONE WORD

#EVENAD ,aRHBA
MIRITES ,ARHCST
#DMD ! SLKM! ISLK ,aRHMR1

JSETUP BA
JTELL IT TO WRITETO
;MANIPULATE CLOCK

R1
1%
#ZERO,aRHBAE

BITCNT
BITCNT

#15 BITCNT

;IS IT A 11 0R 70
JIT'S AN 11
:2ERO BAE

;CLEAR LOOP COUNTER
; INCREMENT LOOP COUNTER

:1S IT THIRD LOOP FOR SUSEC WAIT

2%
;NO LOOP AGAIN
#DMD 'MCLK ! SLKM! ISLK ,aRHMR1
;START CHANGING CLOCK
#DMD ! SLKM! ISLK ,3RHMR1
;CHANGE CLOCK AGAIN

#DMD 'MCLK!'SLKM! ISLK ,3RHMR1

;CHANGE CLOCK AGAIN

;CHANGE CLOCK AGAIN
;GET OUT OF DIAG MODE
;CLEAR BIT COUNTER

BNE
INC
BNE
CLR

7%
BITCNT
18%
BITCNT

;BIT IS SET
;COUNT UP
:NOT FINISHED COUNTING
:GET READY TO DO IT AGAIN

BNE
INC

7%
BITCNT

SYES
;COUNT UP

MOV

@RHCS1,CS1

;SAVE RHCS1

TST

;IS IT AN RH11

BIT

BEQ
B8R

#RDY ,aRHCS1

#RDY ,3RHCST

7%
19%

ARHWC ,WC
aRHBA ,BA

87%

CLR

BAE

JMP

86%

MOV
MOV

BRH(CS3,CS3
aRH(CS2,(S2

CLR

86%:

;SETUP INFORMATION

#DMD ! SLKM! ISLK,3RHMR1
#2ERO,aRHMR1
BITCNT

B8EQ

87%:

JSETUP UNIT SEVEN

MOV
MOV
CLR

MOV
MOV

003416
003424
003422
003432
003436
003442
003440
001162

#0AB,EVENAD

Mov

MOV
MOV
MOV

MOV
MOV
BIT
BNE
ERROR

CMP
BNE
ERROR
(MP

(S3

aRHBAE ,BAE

aRHST,DS1
aRHER ,ER1
aRHTDB, TDR

BRHMRZ2,TC
aRHTDB, $SREGO
#RDY ,aRH(CS1
8%
102

#-1,3RHWC
3%
140
#0DDAD , 3RHBA

;1S RDY SET

;IS

IT SET

YET?

:BIT IS NOT GOING TO SET

;SAVE WORD COUNT
;SAVE BUS ADDRESS

JNO IT*'S A 70
;CLEAR BAE

;CLEAR (S3
: CONTINUE

;SAVE BUS ADDRESS EXTENSION

;SAVE RHCS3
;SAVE (S2

:SAVE TESTER STATUS
;SAVE ERROR REGISTER
;SAVE TESTER DATA REG.

:SAVE MR2 TESTER REG.
;GET DATA
;1S READY SET
JYES,CONTINUE TEST
JREADY DID NOT SET

;DID WC INCREMENT
JYES,CONT TEST
;WRITETO OPERATION DID NOT
;DID BA INCREMENT

INC WC

K 9
MACY11 30A(1052)
0Q2-MAY-78 10:03 PAGE 114
167
RH OPERATIONAL WRITE TEST 43

MASSBUS RH70 AND RH11 DIAGNOSTIC
CZRHBD.P11
02-MAY-78 10:01

5912
5913
9914
5915
5916
5917
5918
9919
5920
5921
5922
5923
5924
5925
5926
5927
5928
5929
5930
5931
5932
5933
5934
5935
5936
5937
5938
5939
5940
5941

5942
5943
5944
5945
5946

5947
5948
5949
5950
5951
5952
5953
5954
5955
5956

5957
5958
5959
5960
5961
5962
5963
5964
5965
5966
5967

041400
041402
041404
041412
0414614
041416
041422
041426
041430
041432
041434
041440

001401
104141

023777
001401

004000

141736

007224
001103

4%:

S$:

006572
050202

6%:
AR

141

EVENAD ,aRHTDB
5%
142

R7 ,WHYFO
SERFLG

TST8

BEQ
ERROR
ERROR
JSR
JSR
AR AR

T2TEST 70

JYES CONT TEST
;BA DID NOT INCREMENT AFTER AN WRITETO OPEPATION
;DID INFO WRITETO TESTER
JYES,CONT
JINFO DID NOT WRITETO TESTER
JARE ANY ERROR BITS SET
;WAS THER AN ERROR
sNO EXIT TEST
;THESE ARE THE CONTENTS OF ALL RH70 REG.
;THIS IS TO COMMPLETE ERROR PRINTOUT
;CLEER ERRORS IF ANY

BEQ
ERROR
MP
BEQ
ERROR
JSR

146

170
R7,CLEER
R7 ,ERRTST
RN

R AR AN R

SEQ 0114

AN RAAARNAN AN RN AN AR RR AN AR

AR R RN RN

WRITE OPERATIONAL TEST (NORMAL) #¢

;*THESE TESTS VERIFY ALL READ AND WRITE CODES

:*WHETHER 1T BE A READ REV. OR FWD OR A WRITE REV. OR FWD

;*DURING THESE TESTS THE TESTER TIMING IS MARGINED AND
;*NO ERRORS SHOULD OCCUR

S . 2232232232333

000004
012777
012777
012777
012737
012777
005701
100403

012777
012777
005037
032777
001015
005237
001371
005037
032777
001004
005237
001401
000770

017737
017737
017737

017737

000007
177777
004100
125252
000000

000000
000063
003446
000200

141664
141650
141644

TST70:

004100
141644

141642
141604

1%:

141572

18%:

141550

19%:

003446

003446
000200
003446

003420
003444
003414

003416
003424
003422
003432
003436
003442

2%:

87%:
86%:

233323 333222323232 23223 2833223222032

SCOPE

MOV
MOV
MOV
MOV
MOV
TST
BMI
MOV
MOV
CLR
BIT

#7 ,8RHCS2

#-1,3RHWC
#RBUF
, aRHBA
#0AB ,RBUF
#ZERO,aRHTDB
R1
19
#ZERO, aRHBAE
AWRITEZ ,aRHCS1

BITCNT

#RDY ,aRH(CS1

BNE
INC
BNE
CLR
BIT
BNE
INC
BEQ
B8R

2%
BITCNT
18%
BITCNT
#RDY ,aRHCS1

MOV
MOV
MOV
TST

@RHCS1,CS1

BEQ
CLR
CLR
JMP

MOV

MOV
MOV
MoV

BITCNT

19%

aRHWC ,WC
aRHBA ,BA
R1

87%

BAE

CS3
86%

aRHBAE ,BAE

@RH(S3,CS3
aRHCS2,(S2

@RHST,DS1
aRHER ,ER1
aRHTDB, TDR

080300f 0ttt

JSETUP UNIT SEVEN
;FOR ONE WORD
:SRTUP BA
;SETUP DATA
;SETUP TESTER DB

;IS IT AN 11 OR A 70
JIT'S AN RHI

s ZERO BAE
STELL IT TO WRITEZ2
;CLEAR BIT COUNTER
;IS RDY SET
;BIT IS SET
s COUNT UP
sNOT FINISHED COUNTING
;GET READY TO DO IT AGAIN
;IS IT SET YET?
JYES
s COUNT UP
;BIT IS NOT GOING TO SET

:SAVE RHCS1
;SAVE WORD COUNT
s SAVE BUS ADDRESS
;IS IT AN RH11
:NO IT'S A 70
;CLEAR BAE
;CLEAR (S3
s CONTINUE
:SAVE BUS ADDRESS EXTENSION
JSAVE RHCS3
;SAVE (€S2
;SAVE TESTER STATUS
:SAVE ERROR REGISTER
;SAVE TESTER DATA REG.

CZRHBD.P11
5968
5969
5970
5971
5972
5973
5974
5975
5976
5977
5978
5979
5980
5981

041700
041706
041714
041722
041724
041726
041732
041740
041742
041746
041750

017737
017737
032777
001003
104102
004737
023777
001407
005777
001403
104151

141432
1461436
000200

041752
041756

000137
104152

041760

5983
5984
5985
5986
5987
5988

041760
041764
041770
041772
041774
041776

004737
105737
001402
104146
104170
004737

007224
001103

4%:

006572
050202

6%:

5982

5989
5990
5991
5992
5993
5994
5995
5996
5997
5998

5999
6000
6001
6002
6003
6004
6005
6006
6007
6008
6009
6010
6011
6012
6013
6014
6015
6016
6017
6018
6019
6020
6021
6022

6023

042002

004737

PAGE 115

WRITE OPERATIONAL TEST (NORMAL) #2

02-MAY-78 10:01

007224
004100

L 9
02-MAY-78 10:03

?96Y11 30A(1052)

MASSBUS RH70 AND RH11_DIAGNOSTIC

003440
001162
161406

141410

3s:

141402

5$:

MoV
MoV
BIT
BNE
ERROR
JSR
CMP
8EQ
TST
BEQ
ERROR

aRHMR2, T(
aRHTDB, $REGO
#RDY ,@RHCS1
3s
102
R7 ,WHYFO
RBUF ,aRHTDB
43
aRHTDB
S$
151

JMP

;AN WRITE2 OPERATION
JEXIT TEST

JSR

R7 ,WHYFO

;ANY ERRORS SET

BEQ
ERROR
ERROR
JSR
JSR

63
146
170
R7,CLEER
R7,ERRTST

ERROR
TST8

SEQ 0115

152

;WRITE2 OPERATION DID NOT WORK
;NO BITS WHERE LOADED TO @RHTDB

$ERFLG

RN AR RN RN

;*TEST 71

;SAVE MR2 TESTER REG.
;GET DATA
;IS OR SET
JYES RDY IS SET
JREADY DID NOT SET
;ARE ANY ERRORS SET
;DID INFO GET WRITTEN OR READ
s INFO GOT LOADED
;DOES aRHTDB = 0
JYES INFO DID NOT LOAD
JALL BITS DID NOT LOAD DURING

AN AN RNRA NN

JANY ERRORS ?

JNOEXIT TEST
;PRINT REGISTERS
;CLEAR ERRORS
AR RN AR AT ARARRRRRERRRNRRCRNRR

RH OPERATIONAL READ TEST #3

;*THESE TESTS VERIFY ALL READ AND WRI'E CODES

;*WHETHER IT BE A READ REV. OR FWD OR A WRITE REV.

OR FWD

:*DURING THESE TESTS THE TESTER TIMING IS MARGINED AND
;*NO ERRORS SHOULD OCCUR
(R

42006
042010
042016
042024
042032
042040
042042
042044
042052
042060
042066
042074
042100
042104
042112
042114
042122
042130
042136
042144
042152
042156
042164
042166
042172

042174

000004
012777
012777
012777
012777
005701
100403
012777
012777
012777
012777
005037
005237
022737
001372
012777
012777
012777
012777
012777
005037
032777
001015
005237
001371

005037

[

TST71:

000007
052525
003003
177777
000000
004000
000075
003001
003446
003446
000015
003003
003001
003003
003001
000000
003446
000200

003446

2222322232333 22 23223222323 2220222223 8203322302223 0

SCOPE

003446

2%:

141232
141224
141216
141210
141202
141144

18%:

Rd0ddtst

MOV

#7 ,dRHCS?2

;SETUP UNIT SEVEN

MOV
MOV

#ZERO, aRHBAE
#EVENAD ,aRHBA

: ZERO BAE
;SETUP BA

BITCNT
#15 ,BITCNT

s INCREMENT LOOP COUNTER
;1S IT THIRD LOOP FOR 5SUSEC WAIT

MOV
MOV
MOV
TST
BM]
1%:

322030000

#AB,aRHTDB
:SETUP INFORMATION
#DMD ! SLKM! ISLK !MCLK,3RHMR1
;SETUP DIAG. MODE
#-1,3RHWC
;FOR ONE WORD
R1
JIS IT A 11 0R 70
1%
JIT'S AN 1

MOV
MOV
CLR

#READS ,aRHCS1
#DMD ! SLKM! ISLK, 3RHMR1
BITCNT

BNE
MOV
MOV

MOV
MOV
MoV
CLR

2%
:NO LOOP AGAIN
#DMD ! SLKM! ISLK !MCLK ,aRHMR1
. START CHANGING CLOCK
#DMD ! SLKM! ISLK, 3RHMR1
s CHANGE CLOCK AGAIN
#DMD ! SLKM! ISLK!MCLK ,3RHMR1
. CHANGE CLOCK AGAIN
#DMD ! SLKM! ISLK,3RHMR
s CHANGE CLOCK AGAIN
#ZERO,3RHMR1
;GET OUT OF DIAG MODE
;CLEAR BIT COUNTER
BITCNT

BNE
INC
BNE
CLR

7%
BITCNT
18$
BITCNT

INC
cMP

BIT

#RDY,3RHCST

sTELL IT TO READFROM
sMANIPULATE CLOCK
;CLEAR LOOP COUNTER

;1S RDY SET

;BIT IS SET
: COUNT UP
sNOT FINISHED COUNTING
;GET READY TO DO IT AGAIN

MASSBUS RH70 AND RH11_DIAGNOSTIC

CZRHBD .P11
6026
6025
6026
6027
6028

6029

6030
6031
6032
6033
6034
6035
6036
6037
6038

6039
6040
6041

6042
6043
6044
6045
6046
6047
6048
6049
6050
6051
6052
6053
6054
6055
6056
6057
6058
6059
6060

6061

6062
6063

6064

MACY11 30A(1052)

02-MaY-78 10:01

042200
042206
042210
042214
042216

032777
001004
005237
001401
000770

000200

042220
042226
042234
042242
042244
042246
042252

017737
017737
017737
005701
001406
005037
005037

1461104
141100
141074

042220

042256
042262

042270
042276
042304

000137
017737

017737
017737

042312
042320
042326
042334
042342
042350
042352
042354
042362
042364
042366
042374
042376
042400
042406
042410
042412
042416
042422

017737
017737
017737
017737
017737
032777
001001
104102
022777
001001
104143
022777
001401
104144
023777
001401
104145
004737
105737
001402

042426
042430

104170
004737

042424

042434

141122

19%:

BIT
BNE
INC
BEQ
BR

#RDY ,aRHCS1
7$
BITCNT
7%
19%

;IS IT SET YET?
JYES
s COUNT UP
;BIT IS NOT GOING TO SET

MOV
MOV
MoV
TST
BEQ
CLR
CLR

®RHCS1,CS1
aRHWC ,WC
adRHBA ,BA
R1
87%
BAE
cS3

;SAVE RHCS1
;SAVE WORD COUNT
;SAVE BUS ADDRESS
;1S IT AN RH11
:NO IT'S A 70
:CLEAR BAE
;CLEAR (S3

MoV

aRHCS3,CS3
adRHCSZ2,(CS2
@RHST,DS1

;SAVE RHCS3
;SAVE (S2
;SAVE TESTER STATUS

7$:

003424

141066
141036
141032

003416
003424

003422

87%:

86%:

141026
141024
141004
141010
000200

003432
003436
003442
003440
001162
140760

177777

140750

8%:

004002

140740

3$:

004000

140742

4$:

007224
001103

5%:

104146

004737

JMP
MOV
MOV

MOV
MOV
MoV
MOV
MOV
BIT
BNE
ERROR
CMP
BNE
ERROR
P
BEQ
ERROR
cMP
BEQ
ERROR
JSR
1STB
BEQ

ERROR

006572
050202

PAGE 116

RH OPERATIONAL READ TEST 43

003416
042276
141072

10:03_

003446

003420
003444
003414

mo9

02-MAY-78

6$:

ERROR
JSR
JSR

86%
ARHBAE ,BAE

@RHER,ER1
@RHTDB, TDR
aRHMR2, TC
aRHTDB, $REGO
ARDY ,aRHCS1T
8%
102
#=1,3RHWC
38
143
#0DDAD , aRHBA
43
144
EVENAD ,aRHTDB
5%
145
R7 ,WHYFO
$ERFLG
6$

146

170
R7,CLEER

R7 ,ERRTST

SEQ 0116

s CONT INUE
;SAVE BUS ADDRESS EXTENSION

:SAVE ERROR REGISTER
;SAVE TESTER DATA REG.
;SAVE MR2 TESTER REG.
;GET DATA
;IS READY SET
JYES,CONTINUE TEST
JREADY DID NOT SET
;DID WC INCREMENT
;YES,CONT TEST
JREADFROM OPERATION DID NOT INC WC
;DID BA INCREMENT
JYES CONT TEST
;BA DID NOT INCREMENT AFTER AN READFROM OPERATIO
:DID INFO READFROM TESTER
JYES,CONT
JINFO DID NOT READFROM TESTER
;ARE ANY ERROR BITS SET
;WAS THER AN ERROR
;NO EXIT TEST

;THESE ARE THE CONTENTS OF ALL RH70 REG.
sTHIS IS TO COMMPLETE ERROR PRINTOUT
;CLEER ERRORC IF ANY

MACY11 30A(1052)

MASSBUS RH70 AND RH11_DIAGNOSTIC

CZRHBD.P11

02-MaY-78 10:01

172

6066

6092
6093
6094
6095

6096

6097
6098
6099
6100

6101

6102
6103
6104
6105
6106
6107
6108
6109
6110
6111
6112
6113
6114
6115
6116
6117
6118
6119
6120

SEQ 0117
0 3200 80228800808l s

WRITE OPERATIONAL TEST (NORMAL) #3

:*NO ERRORS SHOULD OCCUR

6072

6090
6091

PAGE 117

s*THESE TESTS VERIFY ALL READ AND WRITE CODES
;*WHETHER 1T BE A READ REV. OR FWD OR A WRITE REV. OR FWD
;*DURING THESE TESTS THE TESTER TIMING IS MARGINED AND

28;9
6075
6076
6077
6078
6079
6080
6081
6082
6083
6084
6085
6086
6087
6088
6089

10:03

WRITE OPERATIONAL TEST (NORMAL) #3

;*TEST 72

6067
6068
6069

6074

e IT2Z2T2X233X323232323 23223822328 23223 2323223282232

6%5

6073

02-MAY-78

.o (2223322322323 3332233223232 2323232333232 22323823238023¢32322323 283820008t 0nt

042440

000004

042450
042456
042464
042472
042500
042502
042504
042512
042520
042524
042532
042534
042540
042542
042546

012777
012777
012737
012777
005701
100403
012777
012777
005037
032777
001015
005237
001371
005037
032777

0426442

042554
042556

042562
042564
042566
042566

012777

001004
005237

001401
000770

042602
042610
042612
042614
042620
042624
042630
042636
042644
042652
042660

017737
017737
017737
005701
001406
005037
005037
000137
017737
017737
017737
017737
017737

042674
042702
042710
042716

017737
017737
032777
001003

042574

042666

042720

042722
042726
042734
042736
042742
042744

017737

104102
004737
023777
001407
005777
001403
104151

000007

140670

T$172:

177777
004100
125252
000000

140654
140€¢50
004100
140650

000000
000065
003446
000200

140646
140610

1$:

140576

18$:

140554

19$:

003446

003446
000200
003446

140536
140532
140526

003420
003444
003414

2$:

003416

003424

042644
140524
140520
140470
140464
140460
140456
140436
140442
000200

007224
004100

140406

003416
003424
003422
003432
003436
003442
003440
001162
140412

87%:

86%:

SCOPE

MOV

#7 ,aRHCS?2

JSETUP UNIT SEVEN

8NE
INC

BEQ
BR

2%
BITCNT
2%
19%

s YES
;COUNT UP

MOV
MOV
MoV
TST
BEQ
CLR
CLR
JMP
MOV
MOV
MOV
MOV
MoV

@RHCS1,CS1
aRHWC ,W(C
aRHBA ,BA
R1
87%
BAE
cs3
86%
@RHBAE ,BAE
@RHCS3,CS3
aRHCS2,CS2
aRHST,DS1
aRHER ,ER1

sSAVE RHCS1
sSAVE WORD COUNT
¢ SAVE BUS ADDRESS
;IS IT AN RH11
sNO IT'S A 70
;CLEAR BAE
;CLEAR (S3
s CONTINUE
;SAVE BUS ADDRESS EXTENSION
:SAVE RH(CS3
:SAVE (CS2
:SAVE TESTER STATUS
:SAVE ERROR REGISTER

MOV
MOV
BIT
BNE

aRHMR2, TC
aRHTDB, $REGO
#RDY ,3RHCS1
33

;SAVE MR2 TESTER REG.
:GET DATA
;1S OR SET
JYES RDY IS £°T

MOV
MOV
MOV
MOV
TST
8MI
MOV
MoV
CLR
BIT
BNE
INC
BNE
CLR
BIT

MoV

ERROR

1404146

3$:

JSR
cMP
BEQ
TST
8EQ
ERROR

#-1,aRHW(
#RBUF ,aRHBA
#0AB ,RBUF
#2ERO,aRHTDB
R1
18
#ZERQO, 3RHBAE
MWRITEL ,BRHCST
BITCNT
#RDY ,3RHCS
2%
BITCNT
18%
BITCNT
#RDY,BRHCST

aRHTDB, TDR

102
R7 ,WHYFO
RBUF ,aRHTDB
43
aRHTDB
5%
151

;FOR ONE WORD
;SRTUP BA
:SETUP DATA
sSETUP TESTER DB
IS IT AN 11 OR A 70
sIT'S AN RH1
; ZERO BAE
sTELL IT TO WRITES
:CLEAR BIT COUNTER
;1S RDY SET
;BIT IS SET
;COUNT UP
;NOT FINISHED COUNTING
;GET READY TO DO IT AGAIN
;IS IT SET YET?
;BIT IS NOT GOING TO SET

;SAVE TESTER DATA REG.

;READY DID NOT SET

JARE ANY ERRORS SET
:DID INFO GET WRITTEN OR READ
¢ INFO GOT LOADED
;DOES @RHTDB = 0
;YES INFO DID NOT LOAD
;ALL BITS DID NOT LOAD DURING
;AN WRITES4 OPERATION

6121
6122
6123
6124
6125
6126
6127
6128
6129
6130
6131
6132
6133

6134
6135
6136
6137
6138
6139
6140
6141
6142

6143
6144
6145

6152

6159

042746
042752

000137

042754

042754
042760
042764
042766
042770
042772
042776

004737

007224

104152

105737
001402

104146
104120

004737
004737

B 10
02-MAY-78 10:03

MACY11 30A(1052)

MASSBUS RH70 AND RH11_DIAGNOSTIC
CZRHBD .P11
02-MAY-78 10:01

172

5%:
A ¥

001103

006572
050202

6%:

PAGE 118

SEQ 0118

WRITE OPERATIONAL TEST (NORMAL) #3
JMP

ERROR

43
152

JSR
TSTB

R7 ,WHYFO
SERFLG

B8EQ
ERROR
ERROR
JSR
JSR

SR 2223223233233

TRTEST 73

146
170
R7,CLEER
R7 ,ERRTST

JEXIT TEST

WRITE4 OPERAION DID NOT WORK

;NO BITS WHERE LOADED TO IKHTDB
;ANY ERRORS SET
;ANY ERRORS ?
sNO,EXIT TEST

;PRINT REGISTERS

;CLEAR ERRORS

8222223232232 22332323232232802 223330202002 28003 0200t 0RtRlnldl

RH OPERATIONAL WRITE TEST #4

;*THESE TESTS VERIFY ALL

READ AND WRITE CODES

J*WHETHER IT BE A READ REV. OR FWD OR A WRITE REV. OR FWD
:*DURING THESE TESTS THE TESTER TIMING IS MARGINED AND
;*NO ERRORS SHOULD OCCUR
';itttttfittfit'tfifi'tttt'i*ttit*t*t**tt**ttttttt*t'itttt*tttttitttt

043002
043004
043012
043020
043026
043034
043036

043100

043146

012777

177777

012777
012777
012777
012777
005037
005237
022737

000000
004000
000067
000001
003446
003446
000015

012777
012777
012777
012777
012777
005037
032777

000003
000001
000003
000001
000000
003446
000200

005237

003446

705037
(32777
001004
005237
001401
000770

003446
000200

017737
017737
017737
005701
001406
005037

160326
004000
140326
140276
140312
140260
140246
140264

003446

TST73:

1%:

2%:

140236

140230
140222
140214
140206

140150

18%:

140126

19%:

003416

003420
003444
003414

INC

CMP
BNE
MOV
MOV
MOV
MOV
MOV

003446

140110
140104
140100

SCOPE

MoV
NIV
MOV
MOV
TST
8MI
MOV
MOV
MOV
MOV
CLR

7%:

CLR
BIT
BNE
INC
BNE
CLR
BIT
BNE
INC
BEQ
B8R
MOV
MOV
MoV

TST
BEQ
CLR

#7 ,dRHCS2

#0AB, EVENAD

#DMD 'MCLK ,aRHMR1

#=1,3RHWC
R1
1%
#ZERO, aRHBAE
#EVENAD ,aRHBA

AWRITEG ,aRHCST
#DMD
, 3RHMR 1
BITCNT
BITCNT
#15,BITCNT

#DMD !MCLK ,3RHMR1
#DMD
, aRHMR1
#DMD !MCLK ,aRHMR1
#DMD ,3RHMR
#ZERO,3RHMR1
BITCNT
#RDY ,aRHCS1
7$
BITCNT
18%
BITCNT
#RDY ,’RHCS1

7%
BITCNT
7%
19%

@RH(CS1,CS1

SRHWC ,WC
quBA.BA

87%

BAE

JSETUP UNIT SEVEN
;SETUP INFORMATION
;SETUP DIAG. MODE
;FOR ONE WORD

;IS ITA110R 70
JIT'S AN 11
;ZERO BAE
;SETUP BA

JTELL IT TO WRITETO

;MANIPULATE CLOCK

;CLEAR LOOP COUNTER

:INCREMENT LOOP COUNTER
;1S IT THIRD LOOP FOR SUSEC WAIT
:NO LOOP AGAIN

;START CHANGING CLOCK

;CHANGE CLOCK AGAIN
;CHANGE CLOCK AGAIN

;CHANGE CLOCK AGAIN
;GET OUT OF DIAG MODE
;CLEAR BIT COUNTER
;1S RDY SET
;JBIT IS SET
;COUNT UP
:NOT FINISHED COUNTING
;GET READY TO DO IT AGAIN
;IS IT SET YET?
JYES
;COUNT UP
;BIT IS NOT GOING TO SET

2SAVE RH(CS1
s SAVE WORD COUNT
;SAVE BUS ADDRESS
;IS IT AN RH11
;NO IT'S A 70
;CLEAR BAE

MASSBUS RH70 AND RH11 DIAGNOSTIC

CZRHBD.P11

02-MAY-78 10:01

173

6177
6178
6179
6180

043246
043252
043256
043264

005037
000137
017737
017737

003424
043272
140076
140072

003416
003424

6182
6183
6184
6185
6186
6187

043300
043306
043314
043322
043330
043336

017737
017737
017737
017737
017737
032777

140036
140032
140030
140010
140014
000200

003432
003436
003442
003440
001162
137764

043346
043350

104102
022777

6181

6188

6189
6190

6191

6192
6193
6194
6195
6196
6197
6198
6199
6200
6201
6202
6203
6204
6205
6206

043272

043344

0643356

043360
043362
043370
043372
043374
043402
043404
043406
043412
043416
043420
043422
043424
043430

017737

001001
001001

104140
022777
001401
104141
023777
001401
104142
004737
105737
001402
104146
104170
004737
004737

1640042

177777

003422

137754

87%:

86%:

8$:

137744

3$:

004000

137746

4$:

007224
001103

5%:

006572
050202

6% :

PAGE 119

CLR
JMP
MOV
MOV

€S3
86%
aRHBAE ,BAE
ARHCS3,(S3

;CLEAR (S3
; CONTINUE
:SAVE BUS ADDRESS EXTENSION
:SAVE RH(CS3

MOV
MOV
MOV
MoV
MOV
BIT

aRHST ,DS1
@RHER,ER1
@RHTDB, TDR
ARHMR2, TC
@RHTDB, $REGO
#RDY ,3RHCS1

;SAVE
:SAVE
:SAVE
:SAVE

MOV

aRH(CS2,CS2

ERROR
cMP

102
#-1,3RHWC

ERROR
CMP
BEQ
ERROR
CMP
BEQ
ERROR
JSR
TSTB
BEQ
ERROR
ERROR
JSR
JSR

140
#EVENAD-2 ,aRHBA
43
141
EVENAD ,3RHTDB
5%
142
R7 ,WHYFO
$ERFLG
6%
146
170
R7.CLEER
R7,ERRTST

BNE

;*TEST 74

TESTER STATUS
ERROR REGISTER
TESTER DATA REG.
MR2 TESTER REG.
:GET DATA
;IS READY SET

:YES,CONTINUE TEST

:READY DID NOT SET
:DID WC INCREMENT

:YES.CONT TEST

:WRITETO OPERATION DID NOT INC WC
:DID BA INCREMENT
:YES CONT TEST
:BA DID NOT INCREMENT AFTER AN WRITETO OPERATION
:DID INFO WRITETO TESTER
:YES,CONT
;INFO DID NOT WRITETO TESTER
:ARE ANY ERROR BITS SET
:WAS THER AN ERROR
:NO EXIT TEST
:THESE ARE THE CONTENTS OF ALL RH70 REG.
:THIS IS TO COMMPLETE ERROR PRINTOUT
:CLEER ERRORS IF ANY

WRITE OPERATIONAL TEST (NORMAL) #4

:*NO ERRORS SHOULD OCCUR

6213

:'-ttttt**tttttt*ttt*ttttttfi**ttttt*ittttttt*tttttttttt*ttttt*tttt

043434

000004

043444
043452
043460
043466
043474
0643476

012777
012777
012737
012777
005701
100403

6215

043436

6222

043500

043506
043514
043520
043526
043530
043534
043536
043542
043550
043552

012777

000007

177777
004100
125252
000000

137660
137654
004100
137654

012777

000000

137652

012777
005037
032777
001015
005237
001371
005037
032777
001004
005237

000067
003446
000200

137674

TST?4:

003446

MOV

#7 ,38RHCS2

;SETUP UNIT SEVEN

MOV

#1ERQC, aRHBAE

;ZERD BAE

MOV
MOV
MOV
MOV
TST
BM]

137614

1%:

137602

18%:

137560

19%:

003446
003446
000200

SCOPE

MOV
CLR
BIT
BNE
INC
BNE
CLR
BIT
BNE
INC

#-1,3RHWC
#RBUF ,3RHBA
#0AB ,RBUF
#ZERO,aRHTDB
R1
1%

#WRITEG,ARHCST
BITCNT
#RDY ,aRHCS1
2%
BITCNT
18%
BITCNT
#RDY ,aRH(S1
P 3
BITCNT

SEQ 0119

:SAVE (S2

:«THESE TESTS VERIFY ALL READ AND WRITE CODES
:*WHETHER IT BE A READ REV. OR FWD OR A WRITE REV. OR FWD
:*DURING THESE TESTS THE TESTER TIMING IS MARGINED AND

gg};

6223
6224
6225
6226
6227
6228
6229
6230
6231
6232

10:03

:'-ttt*ttttttttttttttttttt*tttttt*tttttt*tttttttttttttttttttttt**t

6207

6216
6217
6218
6219
6220
6221

02-MAY-78

RH OPERATIONAL WRITE TEST #4

BNE

003776

6208
6209
6210

6214

¢ 10

MACY11 30A(1052)

:FOR ONE WORD
:SRTUP BA
;SETUP DATA
;SETUP TESTER DB
;IS IT AN 11 OR A 70
;IT'S AN RH11

:TELL IT TO WRITE6G
;CLEAR BIT COUNTER
;IS RDY SET
;BIT IS SET
;COUNT UP
:NOT FINISHED COUNTING
:GET READY TO DO IT AGAIN
;IS IT SET YET?
;YES
;COUNT UP

MASSBUS RH70 AND RH11_DIAGNOSTIC

CZRHBD.P11
6233
6234

02-MAY-78 10:01

043556
043560

001401
000770

043562

017737

6235

043562

6237
6238
6239
6240
6241
6242
6243
6264

043570
043576
043604
043606
043610
043614
043620
043624

6236

6245
6266

6247
6248

6249

6250

6251
6252
6253
6254
6255
6256
6257
6258
6259
6260
6261
6262
6263
6264
6265
6266
6267
6268
6269
6270
6271
6272

043632
043640

043646
043654
043662

0643670

017737
017737
005701
001406
005037
005037
000137
017737

017737
017737

017737

174

137542

003420

003416
003424
043640
137530

003416

137536
137532

137526
137474

137470
1376464
137462

137442

003444
003414

003424
003422

0034632
003436

043742

000137

043750

043750
043754
043760
043762
043764
04376€
043772

004737
105737
001402
104146
104170
004737
004737

007224
001103

4%:

006572
050202

6%:

043746

104101

001162
137416

137420

3%:

137412

5%:

10:03

PAGE 120

SEQ 0120

BEQ
BR

2%
19%

;BIT IS NOT GOING TO SET

MOV

aRH(CS1,(S1

;SAVE RHCS1

aRH(S3,(S3
aRH(S2,(CS2

;SAVE RH(CS3
;SAVE (S2

MOV
MOV
TST
BEQ
CLR
CLR
JMP
MOV

aRHWC , W(
aRHBA ,BA
R1
87%
BAE
(S3
863
aRHBAE ,BAE

MOV
MOV

aRHST,DS1
aRHER,ER1

MOV
MOV

MoV

137446
000200

02-MAY-78

WRITE OPERATIONAL TEST (NORMAL) #4

MOV

017737
032777
001003
104102
004737
023777
001407
005777
001403
104117

MOV
BIT
BNE
ERROR
JSR
(MP
BEQ
TST
BEQ
ERROR

aRHTDB, TDR

aRHMRZ, T(C

ARHTDB, $REGO
#RDY ,aRHCS1
3%
102
R7 ,WHYFO
RBUF ,aRHTDB
43
aRHTDB
5%
117

JMP

JSR
1ST8
8EQ
ERROR
ERROR
JSR
JSR

R7 ,WHYFO
SERFLG
6%
146
170
R7,CLEER
R7.,ERRTST

ERROR

101

;SAVE WORD COUNT
;SAVE BUS ADDRESS
JIS IT AN RH1
JNO IT'S A 70
;CLEAR BAE
;CLEAR (S3
; CONT INUE
;SAVE BUS ADDRESS EXTENSION
;SAVE TESTER STATUS
;SAVE ERROR REGISTER

;SAVE TESTER DATA REG.

;SAVE MR?2 TESTER REG.

:GET DATA
;1S OR SET
JYES RDY [S SET
JREADY DID NOT SET
;ARE ANY ERRORS SET
;DID INFO GET WRITTEN OR READ
;INFO GOT LOADED
;DOES @RHTDB = O
JYES INFO DID NOT LOAD
;ALL BITS DID NOT LOAD DURING
JAN WRITE6 OPERATION
SEXIT TEST
JWRITES OPERATION DID NOT WORK
;NO BITS WHERE LOADED TO aRHTDB
;ANY ERRORS SET
;JANY ERRORS ?
JNOLEXIT TEST
JPRINT REGISTERS
;CLEAR ERRORS

IR AR ARAAARN AR AR RARNRR AR RRRARRRARNNRNRRRRAAARRN

;*TEST 75
RH OPERATIONAL READ TEST #4
;*THESE TESTS VERIFY ALL READ AND WRITE CODES
J*WHETHER IT BE A READ REV. OR FWD OR A WRITE REV. OR FWD
;*DURING THESE TESTS THE TESTER TIMING IS MARGINED AND
;*NO ERRORS SHOULD OCCUR
AR AR AN AR

043776

000004

6281

044000

012777

6285
6286

044030
044032

005701
100403

6287
6288

86%:

003440

6279

6282
6283
62846

87%:

003442

6273
6274
6275
6276
25;;
6280

2%:

043676
043704
043712
(43714
043716
043722
043730
043732
043736
063740

007224
004100

D 10

MACY11 30A(1052)

044006
044014
0644022

044034
044042

012777
012777
012777
012777
012777

000007

052525
000003
177777
000000
004000

137332

TST75:

137334
137332
137302
137316
137264

SCOPE

RARAANRRRRRE RN

MoV

#7 ,aRH(CS?2

;JSETUP UNIT SEVEN

TST
BMI
MOV
MOV

R1
1$

JIS IT A 11 0R 70
JIT'S AN 1

MOV
MOV
MOV

18:

AR AR AR AR RN ARRRRARR AR

#AB ,3RHTDB
#DMD !MCLK , aRHMR1
#-1,3RHWC
#ZERO, aRHBAE
#EVENAD ,aRHBA

;SETUP INFORMATION
;SETUP DIAG. MODE
;FOR ONE WORD
; JERO BAE
;SETUP BA

E 10
02-MAY-78 10:03 PAGE 121
MACY11 30A(1052)
175
RH OPERATIONAL READ TEST #4

MASSBUS RH70 AND RH11_DIAGNOSTIC
CZRHBD.P11
02-MAY-78 10:01

6289

044050
044056
044064
044070
044074
044102
044104
044112
044120

012777
012777
005037
005237
022737
001372
012777
012777
012777
012777
012777
005037
032777
001015
005237
001371
005037
032777
001004
005237
001401
000770

017737
017737
017737
005701
001406
005037
005037
000137
017737
017737
017737
017737
017737
017737
017737
017737
032777
001001
104102
022777
001001
104143
022777
001401
104144
023777
001401
104145
004737
105737
001402
104146
104170

000077
000001
003446
003446
000015

000003
000001
000003
000001
000000
003446
000200

137252
137270

003446

2%:

137242
137234
137226
137220
137212

MOV
MOV

137154

18%:

137132

19%:

003446
003446
000200

003446

003420
003444
003414

003416
003424
003422
003432
003436
003442
003440
001162

7%:

87%:
86%:

CLR
BIT
BNE
INC
BNE
CLR
BIT
BNE
INC
BEQ
B8R
MOV
MOV
MOV
TST

BEQ
CLR
CLR
JMP

MOV
MoV
MOV
MOV
MOV

MoV
MoV
MoV

BIT

136770

177777

136760

8%:

003776

136750

3%:

004000

136752

4%:

007224
001103

MOV
MOV
CLR
INC
cMP
BNE
MOV
MOV
MOV

5%:

ERROR
CMP
BNE
ERROR
CMP
BEQ
ERROR
MP
BEQ
ERROR
JSR
TSTB
BEQ
ERROR
ERROR

WREADG ,aRHCS1

#DMD
, aRHMR

BITCMT
BITCNT
#15,BITCNT

#DMD !MCLK ,aRHMR1
#DMD
, 3RHMR
#DMD !MCLK ,@RHMR1
#DMD
, 3RHMR1
#ZERO,3RHMR1
BITCNT
#RDY ,aRHCS1
7%
BITCNT
18%
BITCNT
#RDY ,aRHCS1
78
BITCNT
7$
19%

@aRHCS1,CS1
aRHWC ,WC
aRHBA ,BA
R1

87%

BAE

cs3
86%

@RHBAE ,BAE

@RHCS3,(S3
@RHCS2,(S2
®RHST,DS1

aRHER,ER1
TDR
3RHTDB,

TC
aRHMR2,
3RHTDB, $REGO
#RDY ,aRHCS?

8%
102

SEQ 0121

sTELL IT TO READFROM
JMANIPULATE CLOCK
;CLEAR LOOP COUNTER
s INCREMENT LOOP COUNTER

;IS IT THIRD LOOP FOR 5SUSEC WAIT

;NO LOOP AGAIN
:START CHANGING CLOCK
s CHANGE CLOCK AGAIN

. CHANGE CLOCK AGAIN

s CHANGE CLOCK AGAIN

;GET OUT OF DIAG MODE

;CLEAR BIT COUNTER
;1S RDY SET
;BIT IS SET
;COUNT UP
sNOT FINISHED COUNTING
;GET READY TO DO IT AGAIN
;IS IT SET YET?
JYES
s COUNT UP
;BIT IS NOT GOING TO SET

:SAVE RHCS1
;SAVE WORD COUNT

;SAVE BUS ADDRESS

;1S 1T AN RH11
;NO IT'S A 70
;CLEAR BAE
;CLEAR (S3
;CONTINUE
:SAVE BUS ADDRESS EXTENSION
;SAVE RH(CS3
;SAVE (S2

TESTER STATUS
ERROR REGISTER
TESTER DATA REG.
MRZ2 TESTER REG.
:GET DATA
:1S READY SET

:SAVE
:SAVE
:SAVE
:SAVE

JYES,CONTINUE

TEST

:READY DID NOT SET
;DID WC INCREMENT
JYES,CONT TEST

144
EVENAD ,aRHTDB

:DID BA INCREMENT
:YES CONT TEST
;BA DID NOT INCREMENT AFTER AN READFROM OPERATIO
:DID INFO READFROM TESTER

#-1,3RHWC

143
Z§VENAD-2,SRHBA

5%
145

R7 ,WHYFO
$ERFLG

6%
146

170

:READFROM OPERATION DID NOT

INC WC

JYES,CONT

:INFO DID NOT READFROM TESTER
;ARE ANY ERROR BITS SET
:WAS THER AN ERROR

:NO EXIT TEST

:THESE ARE THE CONTENTS OF ALL RH70 REG.
:THIS

IS TO COMMPLETE ERROR PRINTOUT

6345

6346
6347
6348
6349
6350
6351
6352
6353
6354
6355
6356
6357

6358
6359
6360
6361
6362
6363
6364
6365
6366
6367
6368
6369
6370
6371
6372
6373
6374
gg;g
6377
6378
6379
6380
6381
6382
6383
6384
6385
6386
6387
6388
6389
6390
6391
6392
6393
6394
6395
6396
6397
6398
6399
6400

044420

044424

004737
LI4737

F 10

MACY11 30A(1052)

MASSBUS RH70 AND RH11 DIAGNOSTIC
CZRHBD.P11
02-MAY-78 10:01

006572
050202

02-MAY-78

10:03

175

RH OPERATIONAL READ TEST #4

6%:

JSR

PAGE 122
;CLEER ERRORS [F ANY

R7,CLEER

R7 ,ERRTST

RRE RN

R AR AR

SEQ 0122

R R

A RN

RN A RN

R RN AR

J*TEST 76
LARGE TRANSFER TEST
;THIS TEST DOES A 4K (OCTAL) WORD TRANSFER
;THE SECOND TIME THROUGH THE TEST SYNC CLOCK
BX

044430

000004

044432
044440
044444
044450
044454
044456
044460
044466
044474
044502

012777
005037
005037
005037
005701
100403
012777
012777
012777
012777

044510
044512
044514
044520
044522
044530
044532
044536
044540

005701
001412
005737
001407
032737
001571
004737
000434
012777

044546
044552
044560
044562
044566
(044570
(044574
044602
044604
044610
044612
044614
044614
044622
044624
044626
044630
044630
044636
044644
044652
044654
044656
044662

1$T76:
000007
177776
003452
003450

136700

000000
005000
1746000
050326

136672
136640
136630
136676

;1S MARGINED TO MAKE SURE NO ERRORS OCCUR

2222222222323 3 282322233238 2323 2822222222222

BLITZ:
IN:
1%.

SCOPE

MOV
CLR
CLR

(LR
TST
BM]
MOV

MoV

MOV
MOV
TST

B8EQ

003452
000002
047616

000161

136562

BLIP:

005037
032777
001015
005237
001371
005037
032777
001004
005237
001401
000770

003446
000200

136550

18%:

032777
001001
104102
104205

000200

017737
017737
017737
005701
001406
005037
005037

136474
136470
136464

003446
003446
000200

136526

19%:

003446

003416
003424

003420
003444
003414

til

LOOCNT
R1
18
#7ERO, aRHBAE

;CLEAR THE LOOP COUNTER
;IS IT AN 11 OR 70
;1T IS AN 1
;1T'S A 70 ZERO THE 3AE

#--6000,aRHWC
#BLA1ST ,aVFCADD

JUSE 17

#5000, aRHBA

;SET THE BUS ADCRESS

IN INTERUPT MODE

BLIP

BEQ
JSR
BR

80TTOM
R7 ,DUPORT
RHNINT

MIRITEOD! IE,aRH(CST

JSET INTERUPT AND TELL IT TO WRITE

CLR

BITCNT

JCLEAR E

BNE
INC
BNE
CLR

2%
BITCNT

18%
BITCNT

;BIT IS SET
;COUNT UP
JNOT FINISHED COUNTING
;GET READY T0O DO IT AGAIN

BNE
INC
BEQ

s 3
BITCNT
23

JYES
;COUNT UP
;BIT IS NOT GOING TO SET

BIT

#RDY ,a8RHCS1
258
102
205

;DID READY SET

;YES READY SET
;READY DID NOT SET
;1T DID NOT INTERUPT

MOV

aRH(CST,CST

;SAVE RH(CS1

8EQ

87%

:NO IT'S A 70

MOV
8IT

BIT

B8R

25%:

BNE
ERROR
ERROR

RHNINT:

SRt

PASS
8LIP

28
136506

TST
BEQ

BIT

177570

#7,3RHCS?
aNPSW
PASS

20802

MOV
MOV
1ST
CLR

CLR

#BITT,aw177570

#RDY ,aRHCS1

#RDY ,3RHCST

19%

aRHWC ,WC
aRHBA ,BA
R1

BAE

€s3

T COUNTER

;IS RDY SET

;IS IT SET YET?

;SAVE WORD COUNT
;SAVE BUS ADDRESS
;IS IT AN RH11
;CLEAR BAE

;CLEAR (S3

MASSBUS RH70 AND RH11 DIAGNOSTIC
CZRHBD.P11
02-MAY-78 10:01
6401
6402
6403
6404
6405
6406
6407
6408
6409
6410
6411
6412
6413
6414
6415
6416

6417

6418
6419
6420
6421
6422

6423
6424

6425
6426
6427
6428
6429
6430
6431
6432

044666
044672
044700
044706
044714
044722
044730
044736
044744
044752
044754
044762
044764
044766
044774
044776
045000
045006
045010
045012
045016
045020
045022
045026
045030
045036
045040
045042

001001
104102
022777
001401
104203
023777
0014601
104204
005777
001401
104206
105737
001407
032777
001401
104207
104146
104170
005737

001007
005237
012777

6433
6434

000137
005037
005737
001004
005237
000137
004737
004737
004737

6435
6436
6437
6438
6439
6440
6441
6442

6443
644k
6445
6446
6447
6448
6449
6450
6451
6452
6453
6454
6455
6456

000137
017737
017737
017737
017737
017737
017737
017737
032777
001033
032777

044706

176

136462
136456
136426
136422
136416
136414
136374
140000

003416
003424
003422
003432
003436
00344¢
003440

000200

136346

136370

87%:

86%:

9%:

6%:

014776

136342

5%:

136314

6%:

001103

7%:
136272

38:

003450
000017

8%:
136250

044454
003450
003452

JMP

11%:

SEQ 0123

MOV
BIT
BNE

@RHST.DS1
aRHER,ER1
aRHTDB, TDR
3RHMR?, TC
#ATA'ERR ,QRHST
38

;SAVE TESTER STATUS
;SAVE ERROR REGISTER
;SAVE TESTER DATA REG.
;SAVE MR2 TESTER REG.
;IS ATTEN OR ERROR SET
;YES THERE WAS A PROBLEM

BNE

MOV
MOV
MoV
MOV

E~ROR

aRHBAE ,BAE
aRHCS3,(S3
@RHCS2,(S2

#RDY ,a8RH(S1
102

;SAVE BUS ADDRESS EXTENSION
;SAVE RH(CS3
JSAVE (S2

;DID RDY SET
JYES IT SET

JRDY DID NOT SET

MP
BEQ
ERROR
MP
BEQ
ERROR
TST
8EQ
ERROR
T1STB

#5000+<4700+2>, aRHBA
:DID BA INC PROPERLY
JYES
5%
;BA DID NOT INC PROPERLY
203
146776 ,dRHTDB
;WAS CORRECT INFO WRITTEN
6%
JYES

ERROR
ERROR
ERROR
TST
BNE
INC
MOV

207
146
170
LOOCNT
118
LOOCNT
#SCLK!7 ,aRHMR?

BEQ
BIT
8EQ

JMP
CLR
TST

JMP
BOTTOM: JSR
JSR
JSR
RN

PAGE 123
. CONT INUE

BNE
INC

003452
044450
007224
006572
050202

TRANSFER TEST

86%

BIT

136340

003450

LARGE

MOV
MOV

015000

002000

G 10
02-MAY-78 10:03

MACY11 30A(1052)

204
aRHW(
4]
206
SERFLG

8%
#PSEL ,aRHCS1
3%

IN
LOOCNT

PASS

;CORRECT INFO NOT IN RHTDB
;IS WC O
JYES
JRHWC IS NOT ZERO
;WAS THERE ANY ERRORS
:NO

;OUTPUT THE REGISTERS

;1S IT FIRST PASS IN TEST
;NO
JMAKE IT SECOND PASS

;SET THE SYNC CLOCK BIT AND 441 BLK SIZE
;DO THE TEST AGAIN
:CLEAR THE COUNTER

BOTTOM
PASS

BLITZ
R7 ,WHYFO
R7,CLEER
R7,ERRTST

RANAR AR AR AN RR AR

;7O SEE WHY

IT DIED

;CLEAR THE REGISTERS
JUNDERL INE ERROR MESGES
;1F NEEDED

A RN RN RN AN RN RN AR RN AR R RRNNRRRRRRRRAKRRNRE

HERE 1S WHERE [ HANDLE 4 RH'S
J*TEST 77
;*THIS 1S THE ROUTINE THAT ALLOWS THE
;*THE DIAGNOSTIC TO TEST FOUR RH'S

. "*ttttttttttttttt**tfi*ttitt*t**ttttit*t*tttt**itl*ttttittit"ttt

045130

000004

045132
045136
045144
045146
045154

005237
022737
001552
022737
001002

003376
000001

003376

000002

003376

TST77:

SCOPE

ENDPAS:

INC
cMP

DEVCNT
#1,DEVCNT

s INCREMENT THE DEVICE COUNT

CMP

#2 ,DEVCNT

IS IT DEVICE 3

BEQ
BNE

CLEVER
1%

:1S IT DEVICE 2
JYES

MACY11 30A(1052)

MASSBUS RH70 AND RH11_DIAGNOSTIC
CZRHBD.P11
02-MAY-78 10:01

6457
6458
6459
6460
6461
6462
6463
6464
6465
6466
6467
6468
6469
6470
6471
6472
6473
6474
6475

6476

6477
6478
6479
6480
6481
6482
6483
6484
6485
6486
6487
6488
6489
6490
6491
6492
6493
6494
6495
6496
6497
6498
6499
6500
6501
6502
6503
6504
6505
6506
6507
6508
6509
6510
6511
6512

045156
045162
045170
045172
045176
045204
045206
045212
045256
045256
045262
045340
045340
045344
045346
045354
045362
045366
045372
045374
045402
045406
045452
045452
045456
045460
045466
045472
045476
045500
045506
045514
045520
045564
045564
045570

045572
045576
045602
045604
045612
045620
045624
045670
045670
045674
045676
045702

000137
022737
001002
000137
022737
001470
104401

000421
104401

000426

177

045576
000003

003376

1%:

045702
000004

003376

2%:

045214
;:65%:
:
648

045264

::67%:
66%:

013746

003366

013737
012737
000137
005037
005726
013737

003366
005246
046006
003376

003400
003410

003366
045410

003400

104402

104401

000421
013746

003366

012737
000137
005737
001733
013737
012737

005246
046006

104402

104401

000421
013746
104402
000137
005737
001671
013737
012737
104401

000421
013746
104402
000137
005737
001627
013737
012737

003370
003370
005422
045522

003400
003410

046006
003372

003372
005562
045626

ROTEEN:

003400
003410
;.65%:
64%:

003372
046006
003374

003374
005722

IS:

003400
003410

ROTEEN
#3,DEVINT

SEQ 0124

649

23
IS
#6 ,DEVCONT

JYES
;1S IT DEVICE &

:NO,CONTINUE SEARCH
;YES
;HAVE WE TESTED ALL 4 RW'S

TYPE

RESTAT
,65%

LASCIZ

<15><12>/PROGRAM ERROR ON TESTING & RH'S/

TYPE
B8R

.ASCIZ

BR
.ASCIZ

MOV
TYPOC
Mov
JMP
R:
TST
CLEVE
BEQ

64%:

PAGE 124

[ HANDLE &4 RH'S

JMP
CMP
BNE
JMP
cMP
BEQ

TYPE

;:65%:

003370

IS WHERE

MOV
TYPOC
MOV
MoV
JMP
RESTAT: CLR
TST
MOV

;1659
64%:

003410

HERE

H 10
02-MAY-78 10:03

L6738

JYES
;s TYPE ASCIZ STRING

;:GET OVER THE ASCIZ

66%

,,TYPE ASC1Z STRING
;JGET OVER THE ASCIZ

DEVIC1,~(SP)

;;SAVE DEVIC1 FOR TYPEOUT

<15><12>/RESTARTING TO TEST RH #1

DEVICI1,DEVICS
#GIGO,RETAIN

;G0 TYPE--QCTAL ASCII(ALL DIGITS)
;FOR REG. ADDRESS CREATION
;GET ADDRESS ERROR RETURN

CORREG
DEVCNT

;CORRECT REG. ADDRESSES
;CLEAR DEVICE COUNTER

(SP)+

DEVIC1.,DEVICS
,65%
643

;CORRECT STACK

:SET UP TO CREATE ADDRESSES

;s TYPE ASCIZ STRING
;:GET OVER THE ASCIZ

<15><12>/TESTING RH #1

DEVICT,-(SP)
#GIGO,RETAIN

AT BASE ADDRESS /

AT BASE

ADDRESS /

:;SAVE DEVICY FOR Typr~'~

::GO TYPE==OCTAL ASCIi(A.'

DIGITS)

:SAVE RETURN ADDRESS

CORREG

GO CREATE ADDRESSES

RESTAT

JYES,END PASS

DEVIC?2

JISIT O

;GET READY TO CONSTRUCT

MOV
Mov
TYPE

DEVIC2.DEVICS

LASC1Z

<15><12>/TESTING RH #2 AT BASE ADDRESS /

#GIGO1,RETAIN

;SAVE RETURN ERROR ADDRESS

,65%
643

::TYPE ASCIZ STRING
::GET OVER THE ASCIZ

MoV
TYPOC
JMP
TST

DEVICZ,-(SP)
DEVIC3

. SAVE DEVIC2 FOR TYPEQUT
;.60 TYPE--OCTAL ASCII(ALL DIGITS)
;CREATE REG. ADDRESSES
SIS IT O

MOV
MoV
TYPE

DEVIC3,DEVICS
#GI1GO2,RETAIN
.65%

;GET BASE ADDRESS
;SAVE RETURN ADDRESS
..TYPE ASCIZ STRING

CORREG

8EQ

RESTAT

BR
ASLIZ

MoV
TYPOC

JMP
TST
BEQ
MOV
MOV

JYES

LEND PASS

.GET OVER THE ASCIZ

<15><12>/TESTING RH #3 AT BASE ADDRESS /

DEVIC3,-(SP)
CORREG
DEVIC4

RESTAT

DEVIC4,DEVICS

#GIGO3,RETAIN

;;SAVE DEVIC3 FOR TYPEOUT
;.G0 TYPE--OCTAL ASCII(ALL DIGITS)
;CORRECT REG. ADDRESSES
;IS IT O
JYES LEND PASS

;GET BASE ADDRESS

;SAVE RETURN ADDRESS

MACY11 30A(1052)

MASSBUS RH70 AND RH11 DIAGNOSTIC
CZRHBD .P11
02-MAY-78 10:01

6513
6514
6515
6516
6517
6518
6519
6520
6521
6522
6523
6524
6525
6526
6527
6528
6529
6530
6531
6532
6533
6534
6535
6536
6537
6538
6539
6540
6541
6542
6543
6544
6545
6546
6547
6548
6549
6550
6551
6552
6553
6554
6555
6556
6557
6558
6559

045724
045730
045774
045774
046000
046002
046006

104401

000421

013746

012737
005737
001402
000137

HERE

éigSS:

TYPE
BR
LASCIZ

,65%
:TYPE ASCIZ STRING
64%
*GET OVER THE ASCIZ
<15><12>/TESTING RH #4 AT BASE ADDRESS /

MoV
TYPOC
JMP

DEVIC4,-(SP)

003374

000002
046020
003400
003404
003402
000002
003402
003330
003364
001102
001102
000001
003376

003402

003402
003402
003402

CORREG: MOV

MoV
BEHIND: MOV
cMp
BEQ
ADD
JMP
MOV
AHEAD:

ADD
MOV

003360
003402
003362
003364

ADD
MOV
MOV
INC

001212

006252

1S WHERE

PAGE 125

177

045732

046006
003400
003330
00340¢
003360

110
02-MAY-78 10:03

.SBTTL

CLR
INC
MOV
TST
BEQ
JMP

1 HANDLE 4 RH'S

CORREG

DEVICS.,O0FF11

#RHCS1,R2

;s SAVE DEVIC4 FOR TYPEOUT
;.G0 TYPE--OCTAL ASCII(ALL DIGITS)
;CORRECT REG. ADDRESSES
;GET BASE ADDRESS

2GET ADDRESS TO START STORING
;STORE ADDRESS

OFE11,(R2)+
#RHBAE ,R2
AHEAD
#TWO,0FF11
BEHIND
F
DEVICS,a#0F11

;WAS IT LAST ADDRESS
JYES
;CREATE NEXT ADDRESS
;GO STORE IT

REGEND ,OFF 11
OFF11,RHBAE

;SETUP BAE ADDRWESS
;STORE ADDRESS

$TSTNM
$TSTAM
#1,$TIMES
DEVCNT
$EOP
TSTADD

;CLEAR TEST NUMBER
;SET TO TEST 1
sFOR ONE ITERATION
JARE WE AT END OF PASS
;YES DO END OF PASS
;NO,SEE IF RH IS PRESENT

#2,0FF11
OFF11,RHCS3
RHCS1,RHCS1B
RHCS18B

;SETUP (S3 ADDRESS
;SAVE THE ADDRESS
;SETUP HIGH BYTE
;FOR RHCS1

END OF PASS ROUTINE

. 1222232283233 2322333232223 323 3282822338380 0R 2320003202ttt tadtlldll

:*INCREMENT THE PASS NUMBER ($PASS)

;*TYPE "END PASS #XXXXX TOTAL NUMBER OF ERRORS SINCE LAST REPORT YYYYY'
J*WHERE XXXXX AND YYYYY ARE DECIMAL NUMBERS
;*]F THERES A MONITOR GO TO IT

;*IF THERE ISN'T JUMP TO BEGINZ

000004
005037
005037
005237
042737
005327
000001
003063
012737
000001
046172
104401

000407

013746
104405
104401

$EOP:

001102
001212
001100

100000

001100

SCOPE

CLR
CLR
INC
BIC

DEC
.WORD
BGT
MOV
$ENDCT: .WORD

$EOPCT:

$EOPCT
TYPE

046272

$TSTNM
$TIMES
$PASS
#100000, $PASS
(PC)+
1
$DOAGN
(PC)+,a(PC)+
1
.655

:;ZERO THE TEST NUMBER
;:IERO THE NUMBER OF ITERATIONS
:; INCREMENT THE PASS NUMBER
;:DON'T ALLOW A NEG. NUMBER
. .LOOP?
:IYES
;;RESTORE COUNTER
;TYPE ASCIZ STRING

649

001100

MOV

$PASS,-(SP)

;:SAVE SPASS FOR TYPEOUT

046244

TYPDS
TYPE

.67%

;GO TYPE--DECIMAL ASCI] WITH SIGN
;. TYPE ASCIZ STRING

éigSS:

JASCIZ

GET OVER THE ASClZ

<12><15>/END PASS R/

;. TYPE PASS NUMBER

SEQ 0125

J 10
10: 03
02-MAY-78
MACY11 30A(1052)
END OF PASS ROUTINE

MASSBUS RH70 AND RH11 DIAGNOSTIC
02-MAY-78 10:01
CZRHBD.P11

6569
6570
6571
6572
6573
6574
6575
6576
6577
6578
6579
6580
6581
6582
6583
6584
6585
6586
6587
6588
6589

046262

000421

046306
046306

013746

046312
046314
046320
046324
046330
046332
046334
046336
046340
046342
046344
046344
046346
046350

104405
10440

005037
013700
001405

::67%:
66%:

001112

MOV

SERTTL ,~(SP)

CLR

$GET42: MOV

000042

377

66%

LASCIZ

1YPDS
TYPE

001223
001112

000005
004710
000240
000240
000240

000137
004166
377
046354

000

BEQ
RESET
SENDAD: JSR
NOP
NOP
NOP
$DOAGN:
JMP
: .WORD
$SRTNAD
: .BYTE
$ENULL
.EVEN

PAGE 126

SEQ 0126

;.GET OVER THE ASCIZ

TOTAL ERRORS SINCE LAST REPORT /

.SCRLF

$ERTTL
¥4l RO
$DOAGN
PC. (RO)

a(PC)+

BEGINZ
-1,-1.0

;sSAVE SERTTL FOR TYPEOQUT
;. TOTAL NUMBER OF ERRORS
;.60 TYPE--DECIMAL ASCII WITH SIGN
;;TYPE CARRIAGE RETURN,

;;CLEAR ERROR TOTAL
;.GET MONITOR ADDRESS
;;BRANCH IF NO MONITOR
;. CLEAR THE WORLD
2;G0 TC MONITOR
..SAVE ROOM

LINE FEED

s sRETURN

;JNULL CHARACTER STRING

':tttttttttt*ttttt*tt'ttttittittttt***tfitt*fitttttttt*ittttttttttt

;THIS

IS THE WATBIT PROGRAM

::tttfifitfitt*ti*tttt.t**ttttttttitfifitttttt*t*tfittfitttt**ttt*tttt**

032737
001155
033737
001151
033737
001145
005037
013737
013737
043737
005737
001447
104401

000427
032737

020000

177570

000400

177570

000001

177570

003446
001162
001200
001162
001204

001202
001204
001204

WATBIT:

MOV
MOV

046446

;65%:

000001

001204

001204
000017

003446

003446
001200
001202

0V1202

BIT
BNE
BIT
BNE
BIT
BNE
CLR

645.

BIT8,a#177570
RITURN

BITO,a#177570
RITURN
BITCNT

NEXTST

LASCIZ

:GET OVER THE ASCIZ
643
<15><12>/THESE ARE THE BIT NO. OF THE EXTRA BITS./<15><12>

TYPE
BR

,65%

#17 ,BITCNT
NEXTST
BITCNT
MOAR
BITCNT

ROR

TST

sFIND OUT

:NO,FIND OUT WHAT BITS WHERE NOT SET

;TYPE ASCIZ STRING

JFIND THE EXTRA
;GO TO PRINT BIT NO.
;SETUP FOR NEXT BIT

PRIBIT

$TMP3

$TMP]1,$TMP?
$TMP2

;1S IT BIT 15 LAST TESTED
;YES,SEE IF ANY BITS WHER NOT SET
sNO NOT LAST BIT YET
;GO TO TEST NEXT BIT
;ZERO BIT COUNTER
;FIND WHAT BITS WHER NOT SET

;WAS ALL BITS SET THAT SHOULD HAVE BEEN
:YES,AND TEST FINISHED
..TYPE ASCIZ STRING

BEQ

RETURN

BR
LASCIZ

<15><12>/BIT NO. "OF

TYPE

;SAVE GOOD DATA IN SREGO
;SAVE CONTENTS OF BAD DATA
;JWHERE EXTRA BITS SET ?

8IC
TST
BEQ

MP
BEQ
INC
BR
NEXTST: CLR
BIC

046604

;CLEAR BIT COUNTER

$REGO, $TMP2
$TMP1 ,$TMP3
$REGO,$TMP3
$TMP3

HONE
, $TMP3

MOOR:

JYES

RITURN

BIT
BNE

:
MOAR

;SKIP ERROR PRINTOUT ?

A#SW13,a#177570

.65%
643

;GET OVER THE ASCIZ

THE BITS THAT WHERE NOT SET/<15><12>

MASSBUS RH70 AND RH11

CZRHBD.P11

MACY11 30A(1052)

DIAGNOSTIC

02-MAY-78 10:01

046660

032737

000207

013746

104405
000760

013746

104405
000676

PAGE 127

END OF PASS ROUTINE

000001

001202

001202
000017

003446

MOREZ:
MORE:

001223

BIT
BNE
ROR

HONE ,$TMP2
PRTBIT
$TMP2

JFIND BIT NOT SET
;ERROR BIT FOUND
;SETUP TO FIND MORE

BITCNT
MORE?

;CONTINUE TEST

MP
BEQ
INC

003446
104401

K 10
02-MAY-78 10:03

RETURN:

TYPE

RITg??: RTS
:

PRT

003446

PRIBIT:

003446

#17 ,BITCNT
RETURN
.SCRLF

MOV
TYPDS
BR

BITCNT,-(SP)

MOV
TYPDS

BITCNT ,~(SP)

B8R

;WAS LAST BIT BIT 15
JYES AND TEST FINISHED
sJNO SETUP FOR NEXT BIT

MOOR

JRETURN TO MAIN PROG.
2 :SAVE BITCNT FOR TYPEOUT
;G0 TYPE--DECIMAL ASCII WITH SIGN
; 00K FOR MORE
;2SAVE BITCNT FOR TYPEOUT
;G0 TYPE--DECIMAL ASCII WITH SIGN

;LOOK FOR MORE

;;*ttttttttttttttttttt*tttttttt.tfit'*tittttfiittitt*tfii'tttfitttt*t

;THIS ROUTINE HANDLES TIMEOUT ERRORS
;;tttttt*tttttt**tttt**ttt't'**t'*'t'tt*tit*ittttt**ttttttttfitt't

104401

000434

047044

012637

001206
000002
001206

013746
104402
104401

000406

047170

gigss:

104401
000422

162737

012637
013746
104402
013716
000002

TIEOUT:

046746

)
33273:

001206

658
648

;:TYPE ASCIZ STRING
" GET OVER THE ASCIZ

TYPE
BR

,67%
66%

;5 TYPE ASCIZ STRING
“GET OVER THE ASCIZ

LASCIZ

mov

SUB
MOV

TYPOC
TYPE

047136
é§g9s:

001206
001206

TYPE
BR

B8R

LASCIZ

mov

<15><12>/ADDRESS WHICH CAUSED TIMEOUT WAS /

(SP)+,$TMP4

#TWO, $TMPS
$TMPS , - (SP)
.69%

<15><12>/PSW WAS

(SP)+,$TMP4

MOV

$TMP4 .- (SP)

MOV

$LPADR, (SP)

TYPOC

001106

<15><12><12>/PROGRAM INSTRUCTION OR ADDRESS HAS CREATED A TIMEOUT/

RTI

:MOVE ADDRESS TO STORAGE

*CORRECT ADDRESS
::SAVE $TMP4 FOR TYPEOUT

1160 TYPE--OCTAL ASCIICALL DIGITS)
1:TYPE ASCIZ STRING

" GET OVER THE ASCIZ
"/

;GET OLD PSW

- :SAVE $TMP4 FOR TYPEOUT

1160 TYPE--OCTAL ASCIICALL DIGITS)

SFAKE RETURN

;;t*tttt*ifi*t*tttk*ttt*tt*t*****titt*fi**fiittti*tti*it'ttt'tt'fiit'

:THIS ROUTINE HANDLES PARITY ERRORS

;:ttt**t*ttfittt**titttttt**it*ttttfittt**ttttfi*i*'ttt't**itittttit

047172
047172
047176

000422

047244
047244
047250

104401
000420

104401

047200

PARI]ITY:

ézgss:
047252

’
;:678:

TYPE

BR
ASCIZ

TYPE

B8R

_ASCIZ

,65%

;:TYPE ASCIZ STRING

,67%

::TYPE ASCIZ STRING

64%
““GET OVER THE ASCIZ
<15><12>/PARITY TRAP TO VECTOR ADDRESS 114/

66%

"GET OVER THE ASCIZ

<15><12>/ADDRESS THAT CAUSED TRAP WAS /

SEQ 0127

MASSBUS RH70 AND RH11 _DIAGNOSTIC

CZRHBD.P11
6681

6682

6683
6684
6685
6686
6687
6688
6689

02-MAY-78 10:01

047312

047316
047324
047330
047332
047336

047354

012637

162737
013746
104402
104401
000406

004100

000002
004100

012637
013746
104402

004100
004100

6695
6696
6697
6698

047372
047376

104401
000417

047400

047436
047436

013737

177742

047456

000416

6699

6700
6701
6702

6703
6704
6705
6706

6707
6708

6709
6710
6711
6712
6713
6714
6715
6716
2;%;

047366
047370

047444
047450
047452

005701
100507

013746
104402
104401

047514
047514

013737

047530
047534

104401
000417

047522
047526

047574
047574

047602
047606
047610
047614

013746
104402

013737

013746
104402
013716
000002

66$:

004100

68%:

004100

;.73%:

177740

004100

::758:

177744
004100

004100

001106

74%:

047616
047624
047630
047636
047640
047644
(047646
047652
047660
047662
047666
047670
047672
047672
047700

012777
005037
032777
001015
005237
001371
005037
032777

002161
003446
000200

005237
001401
000770

(003446

032777
001001

000200

001004

133504
133472

003446

003446
000200

133450

133430

PAGE 128

(SP) + ,NBUF

JGET PC+2

#TWO,RBUF
RBUF ,-(SP)

MOV
MoV
TYPOC

(SP) + ,RBUF
RBUF ,=(SP)

:CORECT PC
;:SAVE RBUF FOR TYPEQUT
;.60 TYPE--OCTAL ASCIIC(ALL DIGITS)
.69%
;. TYPE ASCIZ STRING
68%
;:GET OVER THE ASCIZ
<15><12>/PSW WAS /

TYPE
BR
(ASCIZ

718
708
<15><12>/HIGH ERROR ADDRESS REG. = /

TST
BM]

R1
TRAPED

MOV

HERADD
, RBUF

;GET OLD PSW
;:SAVE RBUF FOR TYPEOUT
;.60 TYPE--OCTAL ASCII(ALL DIGITS)
;ARE WE ON AN 11/70
INO,ITS A 11/05-11/45
;. TYPE ASCIZ STRING
:.GET OVER THE ASCIZ

MOV
TYPOC
TYPE

RBUF ,-(SP)

BR
_ASCIZ

.73$
72%
;:GET OVER THE ASCIZ
<15><12>/L0W ERROR BDDRESS REG. = /

MOV

LERADD ,RBUF

;;SAVE RBUF FOR TYPEOUT
;:G0 TYPE--QOCTAL ASCII(ALL DIGITS)
;. TYPE ASCIZ STRING

MOV
TYPOC

RBUF ,-(SP)

TYPE
BR
LASCIZ

.75%
2, TYPE ASCIZ STRING
74%
;:GET OVER THE ASCIZ
<15><12>/MEMORY S“STEM ERROR REG. = /

MOV

MEMERR
, RBUF

MoV
TYPOC
TRAPED: MOV
RT1

10:03

suB
MOV
TYPOC
TYPE
BR
_ASCIZ

6720

6731
6732
6733
6734
6735
6736

72%:

047536

6721

6730

;.71%8:
70%:

047460

6719

6722
6723
6724
6725
6726
6727
6728
6729

MoV

004100

;.69%:

047354
047360
047364

L 10

02-MAY-78

END OF PASS ROUTINE

047340

6690
6691
6692

6693
6694

MACY11 30A(1052)

RBUF ,-(SP)

$LPADR, (SP)
AR AR

AR E R AR AR

;;SAVE RBUF FOR TYPEOUT
;:GO TYPE--OCTAL ASCII(ALL DIGITS)

;2SAVE RBUF FOR TYPEOUT
;GO TYPE--OCTAL ASCII(ALL DIGITS)
;FAKE RETURN
JRETURN WHERE LEFT OFF
KRR ARRRARRRARRRANNRRA
RN
ARA RS

;THIS IS THE DUAL PORT ROUTINE

DUPORT: MOV
CLR
18%:
BIT
BNE
INC
BNE
CLR
19%:
BIT
BNE
INC
BEQ
BR
BULL:
BIT
BNE

ARRARR RN

R ARR AN

RNA AR R AN AR RANAR AR NNNNE AR AANR AR AN,

AWRITEO!PSEL!IE ,@RHCS1
BITCNT
#RDY ,@RHCS1
BULL
BITCNT
18%
BITCNT
#RDY ,@RHCS1
BULL

BITCNT
BULL
19%
#RDY ,dRHCS1
CUTE

;CLEAR BIT COUNTER
;IS RDY SET
;8IT IS SET
;COUNT UP
sNOT FINISHED COUNTING
JGET READY TO DO IT AGAIN
c1S IT SET YET?
JYES

sCOUNT UP
;BIT IS NOT GOING TO SET

SEQ 0128

MASSBUS RH70 AND RH11 _DIAGNOSTIC

CZRHBD.P11
6737

6738

6739

02-MAY~-78 10:01

047702

047704

104102

000207

ERROR

CUTE:

RTS

6741

012737
017737
042737

000000
133410
007777

001162
001200
001200

FINDIT: MOV
MOV
BIC

047730
047732

000207
012737

000000

001162

RTS
LOOKFO: MOV

6750
6751
6752
6753
6754
6755
6756

047746

042737

000377

001200

BIC

017737

047754

000207

047764
047772

017737
042737

047756

133374

001200
001162

LOOKED: MOV

000000
133326
030600

001162
001200
001200

FIND:

050000
050002
050010
050016

000207
012737
017737
042737

050024
050026

000207
012737

000007

001162

FOUND:

6767
6768
6769
6770
6771
2;;%

050050
050052
050060
050066

000207
012737
017737
042737

000000
133276
000117

001162
001200
001200

RTS
CS3ERR: MOV
MOV
BIC

050074

000207

6764
6765
6766

050034
050042

017737
042737

133300
177770

001200
001200

RTS
MOV
MOV
BIC

6776

6777

6778
6779
6780
6781
6782
6783

67846
6785
6786

6787
6788
6789
6790
6791
6792

050076
050104
050110

050116
050120
050126

050130
050136
050142

050150
050156
050164
050170
050172
050174

013737
105037
032737

001026
122737
001022

013737
006137
012737
063737
017737
104401
104401
000000
004737

001102
003455
020000

003454

000001

001103

003454
003456
072404

003456

003456
133276
001223

074122

177570

003460
003460
050172

RRAA AR AR
AN AR RN

R AR AR AN

R AR AR RN RNNN

;GET COMPARE READY

;RETURN TO PROGRAM
;GET READY TO FIND ERROR
;GET COMPARE READY

;CLEAR BITS NOT NEEDED
JRETURN TO PROGRAM
:GET READY TO FIND ERROR
aRH(CS2,$TMP1
;GET COMPARE READY
#BA] 'PAT!CLR!'IR.OR!'MPE
'MXF 'PGE 'NEM!NED'UPE 'WCE'DLT,$TMP]
JCLEAR BITS NOT NEEDED
R7
JRETURN TO PROGRAM
#0,3REGO
;GET READY TO FIND ERROR
aRHCS3,$TMP1
;GET COMPARE READY
#IE3!'IPCKO'IPCKT!IPCKZ!IPCK3,STMP]
;CLEAR BITS NOT NEEDED
R7
;RETURN TO PROGRAM

R7
#7 ,8REGO

MOV
8IC

NNRRRA NN AR AR AR R R AR AN NN NN

R7
#0,SREGO
aRHST ,$TMP]
#DRY!DPR!MOL !PIP,$TMP1

RTS
MOV

6774

AN RN N

#UST1'US2 . US4 !'BAI'PAT!CLR!IR!OR,STMP1
;CLEAR BITS NOT NEEDED
R7
JRETURN TO PROGRAM
#0,S$REGO
;GET READY TO FIND ERROR
aRHER, $TMP1
JGET COMPARE READY
#ZERO,$TMP1
;CLEAR BITS NOT NEEDED

RTS

6775

BRHCSZ.,$TMPT

MOV
BIC

6757
6758
6759
6760
6761
6762
6763

SEQ 0129

#0,$REGO
sGET READY TO FIND ERROR
SRHCS1,8TMPT
;GET COMPARE READY
#READG6'GO'IE'RDY!A16!'A17
! PSEL!DVA,STMP]
;CLEAR BITS NOT NEEDED
R7
;RETURN TO PROGRAM
#0,$REGO
;GET READY TO FIND ERROR

RTS

000000

001200
001200

AR AR R RA AN AN AN AR R AN

MOV

012737

133354
000000

PAGE 129

102

047706
047714
047722

047740

10:03

;THESE ARE THE CLEARS ROUTINES

67643
67644
6745
6746
6747
6748

6749

02-MAY-78

END OF PASS ROUTINE

6740
6742

M 10

MACY11 30A(1052)

AR AN AR

AR KRR

R AR ANRR AN

ANANNR

;% THIS ROUTINE IS THE TEST NUMBER CORRECTION ROUTINE

RRRAAARRN R

RRARRRAAR RN R RN A A RAARAAARAARRNANAAAANANARANRA
A

TSTNMB: MOV
CLRB
BIT

STSTNM, TSTNM
TSTNM+1
#SW13,a#177570

;GET THE TEST NUMBER
;CLEAR UPPER BYTE
INHIBIT TYPEOUT

MOV
ROL
MOV

TSTNM,OFFSET
OFFSET
#HEADER ,HEDDAD
OFFSET ,HEDDAD
aHEDDAD ,HEDADD
.SCRLF

SGET TEST NUMBER
;CREAT OFFSET
:GET BEGINING OF TABLE

BNE
(MPB
BNE

ADD
MoV
TYPE
TYPE
HEDADD: 0
TSTNMA: JSR

TSTNMA
#1,8ERFLG
TSTNMA

R7 ,3#SERRTYP

YES
IS IT FIRST ERROR
;NO

;CREATE MES ADDRESS
JSET UP FOR MESSAGE

;GO TO ERROR TYPE ROUTINE

N 10

MACY11 30A(1052)
02-MAY-78
END OF PASS ROUTINE

MASSBUS RM70 AND RH11 _DIAGNOSTIC

CZRHBD.P11

02-MAY-78 10:01

RTS

000207

6793
6794
6795
6796
6797

050200

6800
6801
6802
6803
6804
6805
6806
6807

050202
050206
050210
050216
050220
050226
050232
050236

001446
032737
001042
013737
105037
104401
000406

6809
6810
6811
6812
6813

050254
050254
050260
050262
050266

013746
104402
104401
0004616

6815
6816

050324
050326

000207

10:03

PAGE 130

JRETURN TO ERROR ROUTINE

;:t.tfifittitl'ttfittt.tti"'..titttttfifittttt'tl..t.ti.t.tt'tttttttt

;THIS PROGRAM WHILL DEVIDE

sPRINTOUT BETWEEN TESTS

THE ERROR

;;tQ't.ttttilttt.ttt'fifi'."'i.ttt.ttttltfifi'ttti'itt.tttt'ittttttt

105737

001103
020000

177570

001102
003455
050240

003454

ERRTST: TSTB
BEQ
BIT
MOV
CLRB

SERFLG
OUTOF
#SW13,a#177570
OUTOF
S$TSTNM, TSTNM
TSTNM+1

B8R

643

MOV

TSTNM, - (SP)

BNE

TYPE

éigSS:

003454
050270

éggrs:

OUTOF:

LASCIZ

.65%

JYES

GET TEST NO.
;CLEAR UPPER BYTE

;. TYPE ASCIZ STRING

;:GET OVER THE ASCIZ

<15><12>/%%*~TEST /

TYPOC
TYPE
BR

.67%
66%

RTS

LASCIZ

;WAS THERE AN ERROR FOUND
;JNO ,GO TO NEXT TEST
s INHIBIT TYPEOUT ?

:;SAVE TSTNM FOR TYPEOUT

;:GO TYPE--OCTAL ASCII(ALL DIGITS)
;. TYPE ASCIZ STRING
" GET OVER THE ASCIZ

(S) “%44/<15><12><12><12>
/ ERROR MESSAGE

;:!Qtttfitt.tttt"filtti'i.'tit..t!'..Qtfi.flt...t.'tfiitt".i'Ql..."

;THIS IS THE INTERUPT ROUTINE
;FOR THE LARGE TRANSFER TEST

;;QQ!..tttt.'.ttt'tt.'ttttt.tt.tlfi'ttttifii.tti.".tt.fitl..tt.'ttt

6823
6824

050326
050332

012716
000002

044630

BLKTST: MOV
RTI

#RHNINT, (SP)

JSET THE CORRET RETURN

;AND RE TURN

SEQ 0130

MACY11 30A(1052)

MASSBUS RH70 AND RH11 DIAGNOSTIC
CZRHBD P11
02-MAY-78 10:01

8 11

02-MAY-78

END OF PASS ROUTINE

6825
6826

10:03

PAGE 131

::ittfit*t*ttttttt‘ttttt'tt.'fi***ttttt'Qttfi'ttt"'.tflt'*tt'tt"itQ

; ;HEADER MESSAGES FOR ERROR PRINT OUTS

::tttttttfitfitt*ttttt*t*i'ttttitttfiittfittfit'fittfi'.tt'ttfit'i.ittttt

044122
042522
041505
042524
042524

040440
051523
042117
052123
052123

042104
042040
020105
024040
030440

HED1:

.ASCIZ/RH ADDRESS DECODE TEST (TEST 1)/

046103
052040
052050
024462

040505
51505
051505
000
051505
047503
042524
052123
052123

020122
020124
020124

HEDZ:

LASCIZ/CLEAR

042524
047116

HED3:

LASCIZ/TESTER CONNECTED TEST (TEST 3)/

042122
052116
051101
020124
020124

041440
041440
052040
052050
024464

HED4 :

.ASCIZ/WORD COUNT CLEAR TEST (TEST 4)/

041110
040505
052123
052123

020101
020122
024040
032440

HEDS:

LASCIZ/RHBA CLEAR TEST

040502
040505
052123
052123

020105
020122
024040
033040

HEDG:

.ASCIZ/RHBAE CLEAR TEST (TEST 6)/

041104
051101
020124
020124

041440
052040
052050
024467

HED7:

.ASCIZ/RHDB CLEAR TEST

047522
044507
042040
020105
024040
030440

020115
052123
041505
042524
042524
024460

HED10:

_ASCIZ/PROM REGISTER DECODE TEST (TEST 10)/

041570
052111
020124
020124

031523
052040
052050
030461

HED11:

_ASCIZ/RHCS3 BIT TEST (TEST 11)/

041527
052040
052050

041040
051505
051505

HED12:

.ASCIZ/RHWC BIT TEST (TEST 12)/

020122
041505
042524
042524

047527
052517

050704
050712
050720
050726
050730

050736
050744

020124

TEST

(TEST 2)/

020104
024040

031440

(TEST 5)/

(TEST 7)/

SEQ 0131

MACY11 30A(1052)

MASSBUS RH70 AND RH11_DIAGNOSTIC
02-MAY-78 10:01
CZRHBD.P11

050752
050760
050766
050774
051002
051010
051011
051016
051024
051032

000051
020105
042524
042524
024463

122

041110
020124
024040
030440

122
044502
052123
052123
000
122
050117
047511
042524
042524
024466
122
050117
047511
042524
042524
024467

044502

052123
052123
000
044502
052123
052123
000

116

042522
051440
020124
024040
031040
127
042522
051440
020124
024040
031040
115
051124

052111
020124
020124
050125

020105

10:03

PAGE 132

HED13:

.ASCIZ/RHBAE BT TEST (TEST 13)/

020101

HED14:

ASCIZ/RHBA BIT TEST (TEST 14)/

042110
020124
024040
030440

020102
042524
042524
024465

HED15:

.ASCIZ/RHDB BIT TEST (TEST 15)/

053510
051105

020103
052101
020114
024040
030440

HED16:

.ASCIZ/RHWC OPERATIONAL TEST (TEST 16)/

020101
052101
020114
024040
030440

HED17:

.ASCIZ/RHBA OPERATIONAL TEST (TEST 17)/

052054
042116
044502
052123
052123

HEDZ20:

LASCIZ/NEM,TRE AND SC BIT TEST (TEST 20)/

HEDZ21:

LASCIZ/WCE,TRE AND SC BIT TEST (TEST 21)/

HEDZ2?Z:

LASCIZ/MDPE,TRE AND SC BIT TEST (TEST 22)/

HEDZ23:

LASCIZ/UPE,TRE AND SC BIT TEST (TEST 23) RH11 ONLY/

HEDZ24:

.ASCIZ/UPE,TRE AND SC BIT TEST (TEST 24)/

040516

052123
052123

000
041110
051105
040516
052123
052123
000
046505
040440
020103

0642524
042524
024464

000
052054

026105
047101
041040
051505
051505
020051
047440

042116
044502
052123
052123
000
026105
047101
041040
051505
051505
000051
051124
020104
052111
020124
020124
044122
046116

026105
047101

051124
020104

Nn20104

051422

END OF PASS ROUTINE

031061
040502
020124
026040
030440

020124
044122

cNn

02-MAY-78

SEQ 0132

MASSBUS RH70 AND RH11_DIAGNOSTIC

CZRHBD.P11

MACY11 30A(1052)

02-MAY-78 10:01

END OF PASS ROUTINE

6937
6938
6939
6940

051430
051436
051444
051452

041523
052040
052050
032062

041040
051505
051505
000051

052111
0201264
020124

6942
6943
6944
6945
6946

051464
051472
051500
051506
051514

020105
041523
052040
052050
032462

047101
041040
051505
051505
000051

020104
0521
020124
020126

6948
6949
6950
6951
6952

051526
051534
051542
051550
051556

020105
041523
052040
052050
033062

047101
041040
051505
051505
000051

020104
052111
0201264
020124

6941

6947

6953

6954
6955
6956
6957
6958

6959

6960
6961
6962
6963
6964

6965

6966
6967
6968
6969
6970
6971

6972

6973
6974
6975
6976
6977
6978
6979
6980

6981

6982
6983
6984
6985
6986
6987
6988

6989

6990
6991
6992

051456

051520

051562

051570
051576
051604
051612
051620

051624

051632
051640
051646
051654
051662

051666

051674
051702
051710
051716
051724
051732

051733

042516

054115

043520

020105
041523
052040
052050
033462

054115

020105
041523
052040
052050
030063

041515

PAGE 133

051126

HED2S5:

.ASCIZ/NED,TRE AND SC BIT TEST (TEST 25)/

026106

051124

HED26:

.ASCIZ/MXF,TRE AND SC BIT TEST (TEST 26)/

020105

051124

HED27:

.ASCIZ/PGE TRE AND SC BIT TEST (TEST 27)/

026106

051124

HED30:

.ASCIZ/MXF,TRE AND SC BIT TEST (TEST 30)/

042520

047101
041040
051505
051505
000051

020104
052111
020124
020124
020104
052111
020124
020124

SEQ 0133

04064460

020103
020122
042524
042524
024461

HED31:

.ASCIZ/MCPE AND SC ERROR BIT TEST (TEST 31)/

106

046102

052040

HED32:

.ASCIZ/DBL TEST,1 WORD FROM A BASE 4 ADDRESS (TEST 32)/

106

046102

052040

HED33:

.ASCIZ/DBL TEST,2 WORD FROM A BASE 4 ADD.

(TEST 33)/

041104

020114

042524

HED34:

.ASCIZ/DBL TEST,3 WORD FROM A BASE & ADD.

(TEST 34)/

051505
047527
047522
040502
040440
051523
052123
000

052020
052026
052034
052042
052050
052056
052064

051505
047527
047522
040502
040440
052050
031463

052076
052104
052112

052123
051117
046517

052070

10:03

051440
047522
020124
024040
031440

042116
051105
044502
052123
052123
000

051740
051746
051754
051762
051770
051776
052004
052012

052013

026104

02-MAY-78

026124
042122
020115
042523
042104
024040
031440

026124
042122
020115
042523
042104
051505
000051
031454
020104
040440

020061
043040
020101
032040
042522
042524
024462

020062
043040
020101
032040
020056
020124
053440
051106
041040

MASSBUS RH70 AND RH11_DIAGNOSTIC

CZRHBD.P11

MACY11 30A(1052)

02-MaY-78 10:01

END OF PASS ROUTINE

6993
6994
6995
6996

052120
052126
052134
052142

051501
042101
042526
024464

020105
027104
052123
000

020064
026040
031440

6998
6999
7000
7001
7002
7003
7004

052152
052160
052166
052174
052202
052210
052216

051505
047527
051106
041040
020064
024040
031440

026124
042122
046517
051501
042101
042524
024465

020064
020123
040440
020105
027104
052123
000

052230

051505

7008

052244

047522

7012

052274

6997

7005

7006

7007
7009
7010
7011

7013

7014
7015
7016
7017
7018
7019
7020
7021

7022

7023

7024
7025
7026
7027
7028
7029
7030
7031
7032
7033
7034
7035
7036
7037

7038

7039
7040
7041
7042
7043
7044

7045

7046

7047
7048

052145

052223

052236

052252
052260
052266

052277

104

106

047527
040502
040440
042524

024466

052376
052404
052412
052420
052426
052434
052442
052450
052456
052464
052472
052500
052506
052514

051505
047527
052111
020111
047101
052111
020126
020124
041104
052123
040440
020105
020104
020124

052530
052536
052544
052552
052560
052566

052123
020105
027104
042524
024040
032040

052522

052573

052600

052606
052614

.ASCIZ/DBL TEST,4 WOURDS FROM A BASE 4 ADD. (TEST 35)/

0646102

052040

HED36:

.ASCIZ/DBL TEST,1 WORD FROM A BASE 4 ADD.(TEST 36)/

HED37:

.ASCIZ/DBL TEST,2 WORD FROM A BASE 4 ADD. WITH BAI SET (TEST 37)/

HED4O:

.ASCIZ/DBL 1cST,2 WORD WITH BAI SET AND WRITE REV )TEST 40)/

HED4T:

.ASCI1Z/DBL TEST,NOT A BASE 4 ADD (TEST 41)/

042526

HED42:

.ASCIZ/DBL TEST BASE 4 ADD. WRITE FWD (TEST 42)/

052040

HED43:

_ASCIZ/DBL TEST ,2 WORD ,NOT A BASE &4 ADD.

026124

042122
020115

042523
042104
052123

000

024467

104

061104

1064

051505

053440
047054

SEQ 0134

HED35:

031440

052371

052364

PAGE 134

052040

046102

051505
047527
047522
040502
040440
(44527
044501
024040

10:03

046102

104

052304
052312
052320
052-2€
05¢324
052342
052350
052356

02-MAY-78

026124
042122
020115
042523
042104
044126
051440
042524

046102

026124
042122
020110
042523
020104
020105
052051
030064
020114
047054
041040
020064
052050
030464

020114

041040
020064
053440
043040
042524
024462

046102
020124

051117
052117

020061

043040
020101

032040
024056
031440

052040

020062
043040
020101
(32040
020056
041040
052105
052123

000

052040

020062
053440
040502
020124
051127
0425¢2
051505
000051
0425246
052117
051501
042101
051505
000051
051501
042101
044522
042127
052123
000

031054

020104
040440

(TEST 43)/

MACY11 30A(1052)

MASSBUS RH70 AND RH11 DIAGNOSTIC
CZRHBU P11
02-MAY-78 10:01
7049

7050

7051
7052
7053

7054

7055
7056
7057
7058
7059
7060
7061
7062
7063
7064
7065
7066
7067
7068
7069
7070
7071
7072
7073

052622
052630
052636
052644
052651
052656
052664
052672
052700

05270¢
052714
052722
052730
052736
052740

052746
052754
052762
052770
052776
053003
053010
053016
053024
053032
053040
053046
053054
053062
053070

053076
053104
053112
053120
053126
053134
053142
053147
053154
053162
053170
053176
053204
053212
053220
053226
053234
053242
053250
053256
053264
053272
053300
053306
053313
053320

041040
020064
024040
032040
104

051505
047527
047516
040502
040440
051127
042522
051505
000051
041104
052123
051117
042101
024040
032040
104

051505
047527
040505
026104
020101
032040
020056
020124
041104

052123
051117
042101
041054

020064
024040
032040
104
051505
047527
040505
026126
020101

032040
020056
020124
041104
052123
051117
042101
041054
020064
024040
032440
104
051505

END OF PASS ROUTINE

051501
042101
042524
026463
046102
026124
042122
020124
042523
042104
052111
020126
020124

020105
027104
052123
000
052040
020063
026040
020101
032040
026056
020105
052050
032064

020114
031054

042524

020104

043040
042524
024465
046102
026124
042122
020104
047516
040502
040440
052050

033064
020114
031054
020104
051040
051501
042101
042524
026467
046102
026124
042122
020104
047516
040502
040440
052050
030065
020114
031454
020104
043040
051501
042101
042524
024461
046102
026124

053440

F1N

02-MAY-78

10:03

PAGE 135

SEQ 0135

_NOT A BASE 4 ADD.,WRITE REV

(TEST 44)/

:
HED&S

.ASCIZ/DBL TEST,3 WORD

HEDA4S:

.ASCIZ/DBL

TEST,2 WORD READ FWD

HED46:

.ASCIZ/DBL

TEST,2 WORD READ FWD,NOT A BASE 4 ADD.

HED47:

.ASCI1Z2/DBL

TEST,2 WORD READ REV,BASE

HEDSO:

.ASCIZ/DBL

TEST.2 WORD READ REV.NOT A BASE 4 ADD.

HED51:

.ASC1Z2/DBL TEST.3 WORD READ FWD,BASE 4 ADD.

(TEST 51)/

HEDS?:

.ASC12/DBL TEST,3 WORD READ REV,BASE &4 ADD.

(TEST 52)/

(TEST 45)/

042522
042127

052123

000
052040
020062
051040
053506
020124
042523
042104
051505
000051
042524
053440
042522
053105
020105
027104
052123
000
052040
020062
051040
042522
020124
042523
042104
051505
000051
042524
053440
042522
042127
020105
027104
052123
000
052040
020063

& ADD.

(TEST 46)/

(TEST 47)/

(TEST 50)/

MACY11 30A(1052)

MASSBUS RH7C AND RH11_DIAGNOSTIC
CZRHBD.P11
02-MAY-78 10:01
7105

053326
053334

047527
040505

051040
042522
042523
042104
051505
000051
053505
051117
020124
047514
051505
000051
053517
051117
020124
044510
051505
000051
052522

040505
051105
040516
024461

052123

7159
7160

053730
053736
053737
053744
053752
053760
053766
053774
054002
054005
054012

END OF PASS ROUTINE

042122
020104
040502
040440
05205n
03106>
020105
051122
051505
042503
052050
031465
020105
051122
051505
042503
052050
032065
042524
042440
020105
024040
032440

052123
046522
0 00
020110
052101
020114
020105
021440
051505
000051
042101
040522
046101
020124
040515
024051
033040

020110
052101
020114
052040
030443

052123
000
040505
051105

6N
02-MAY-78 10:03

PAGE 136

SEQ 0136

HEDS3:

LASCIZ/WCE EW ERROR TEST ‘WLELO'' (TEST 53)/

HEDS4:

LASCIZ/WCE Ow ERROR TEST 'WCEHI'' (TEST 54)/

HEDSS:

LASCIZ/INTERUPT ENABLE TEST (TEST 55)/

020104
052101
020114
024040
046101
024040
032440

HEDS6:

.ASCIZ/READ OPERATIONAL TEST {NORMAL #1)

050117
047511
051127
042524
020061
020124

HEDS7:

.ASCIZ/RH OPERATIONAL WRITE TEST #1

047440
044524
052040
047050
020114
042524
024469

HEDGO:

.ASCIZ/READ OPERATIONAL TEST (NORMAL #2)(TEST 60)/

050117
047511
042522
051505
024040
033040

:
HED61

.ASCIZ/RH OPERATIONAL READ TEST #1

020104
052101

HEDG6Z:

.ASCIZ/READ OPERATIONAL TEST (NORMAL #3)(TEST 62)/

040516
042524
042524
024465

(TEST 56)/

(TEST 57)/

(TEST 61)/

MACY11 30A(1052)

MASSBUS RH70 AND RH11_DIAGNOSTIC
CZRHBD .P11
02-MAY-78 10:01
7161
7162

7163

7164
7165
7166
7167
7168
7169
7170
7N

7172
7173
7174
7175
7176
7177
7178
7179

7180
7181
7182
7183
7184
7185
7186
7187
7188
7189
7190

7191
7192
7193
194
7195
7196
7197
7198
7199

054020
054026
054034
054042
054050
054056
054060
054066
054074
054102
054110
054116
054124

054127
054134
054142
054150
054156

054164
054172
054200
054202
054210
054216
054224

054232

054240
054246
054250
054256
054264
054272

054300
054306
054314

054322
054324

054332
054340
054346
054354
054362
054370
054373
054400
054406
054414
054422

054430
054436
054444
054447
054454
054462
054470
054476

047511
042526
047516
021440
051505
000051
044122
040522
046101
042524
020124
042524
024463
122
050117
04,51
042524
047516
021440
051505
000051
044122
040522
046101
020104
021440
051505
000051
051127
050117
047511
042524
047516
021440
051505
000051
044122
040522
046101
042524
020124
042524
024467
127
047440
044524
052040
047050
020114
042524
024460
122
051105
040516
042101
020124

H 1

02-MAY-78

END OF PASS ROUTINE

10:03

PAGE 137

040516
052123
046522
024463
020124

020114
024040
046101
052050
031066

047440
044524
053440
052040
031043
052123
000
040505
051105
040516
052123
046522

042520
047117
044522
051505
024040
033040

HED63:

.ASCIZ/RH OPERATIONAL WRITE TEST #2 (TEST 63>/

HEDG64:

.ASCIZ/READ OPERATIONAL TEST (NORMAL #4)(TEST 64)/

020124

020104
052101
020114
024C+0
046101
052050
032066

047440
044524
051040
042524
020062
020124

042520
047117
040505
052123
052050
032466

HEDG65:

.ASCIZ/RH OPERATIONAL READ TEST #2 (TEST 65)/

052111
051105
040516
052123
046522
024461
020124

020105
052101
020114
024040
046101
052050
033066

HEDG66:

ASCIZ/WRITE OPERATIONAL TEST (NORMAL #1)(TEST 66)/

047440
044524
053440
052040
031443
052123
000
044522
042520
047117
051505
051117
031443
052123
000
020110
052101
020114
052040
031443

042520
047117
044522
051505
024040
033040

HED67:

.ASCIZ/RH OPERATIONAL WRITE TEST #3 (TEST 67)/

042524
040522
046101
020124
040515
024051
033440

HED70:

LASCIZ/WRITE OPERATIONAL TEST (NORMAL #3)(TEST 70)/

050117
047511
042522
051505
024040

HED71:

.ASCIZ/RH OPERATIONAL READ TEST #3 (TEST 71)/

024464

SEQ 0137

MACY11 30A(1052)

MASSBUS RH70 AND RH11_DIAGNOSTIC
CZRHBD.P11
02-Mav-78 10:01
7217
7218
7219
7220
7221
7222
7223
7224
7225
7226
7227
7228
7229
7230
7231
7232
7233
7234
7235
7236
7237
7238
7239
7240
72461
7242
7243
7244
7245
7246
7247
7248
7249
7250
7251
7252
7253
7254
7255

054504
054512
054515
054522
054530
054536
054544
054552
054560
054566
054571
054576
054604
054612
056620
054626
054634
054640

054646

054654
054662
054670
054676
054704
054712
054714
054722
054730
054736
054744
054752
054760
054762
054770
054776
055004

055012
055020
055026

042524
024461

127

047440
044524
052040
047050
020114

042524
024462
122

051105
040516
05211
052123
052050
031467
051127
050117
047511
042524
047516
021440
051505
000051
044122
040522
046101
020104
021440

051505
000051
040514
051124
051105
020124
047527
052050
033067

052123
000
044522
042520
047117
051505
051117
031443
052123
000
020110
052101
020114
020105
021440
051505

020124

047440
044524
051040

042524
020064
020124

043522
047101
052040
033466
042122
051505
007,051

I N
02-MAY-78 10:03

END OF PASS ROUTINE

PAGE 138

033440
HED7?:

LASCIZ/WRITE OPERATIONAL TEST (NORMAL #3)(TEST 72)/

050117
047511
051127
042524
020064
020124

HED?73:

.ASCIZ/RH OPERATIONAL WRITE TEST 44 (TEST 73)/

020105
052101
020114
024040
046101
052050
032067

HED74:

LASCIZ/WRITE OPERATIONAL TEST (NORMAL #4)(TEST 74)/

042520
047117
040505
052123
052050

HED7S:

.ASCIZ/RH OPERATIONAL READ TEST #4 (TEST 75)/

020105
043123
051505
020061
020123
020124

HED?76:

.ASCIZ/LARGE TRANSFER TEST 671 WORDS (TEST 76)/

042524
040522
046101
020124

040515

024051
033440

032467

SEQ 0138

MASSBUS RH70 AND RH11_DIAGNOSTI(

CZRHBD.P11

MACY11 30A(1052)

0c-MAY-78 10:0

7256

SINERRRRARARRANCRNRNNR

7258

7259

SRR

7262
7263

055032
055040

047503
020124

7267

055070

000103

7264
7265
7266

7268
7269
7270
7271
7272
7273

055046
055054
055062

055072
055100
055106

055114
055122
055130

7274

055132

7280

055176

7275
7276
7277
7278
7279
7281

7282
7283
7284
7285
7286
7287

055140
055146
055154
055162
055170
055204

055206
055214
055222
055230
055236
055244

7288

055246

7293
7294

055304
055312

7289
7290
7291
7292

7295

7296
7297
7298
7299
7300
7301

7302
7303

7304
7305
7306
7307
7308
7309

7310
7311

02-MAY-78

END OF PASS ROUTINE

7257

7260
7261

J 1

055254
055262
055270
055276

055317

AR RN

AR RN R RN R AR AR NN RN

SEQ 0139
AR

RR AR

EM1:

.ASCIZ/CORRECT BIT DID NOT SET IN RHW(C/

047503
020124
044504

051122
044502
020104

041505
020126
047516

EMZ2:

LASCIZ/CORRECT BIT DID NOT SET IN RHBA/

047503

051122

041505

EM3:

.ASCIZ/CORRECT BIT DID NOT SET IN BUS ADDRESS REG./

051523

051040

043505

044504
020124
047111

020124
047111
000101

020124
044504
020124
047111
040440
000056

020104
042523
051040

042523
051040
044502
020104
042523
041040
042104

AN AR

AR RN R AR RN RN NN RN RN A AR AR RN N RRRNRRRRN RN

041505
020124

047516
020124
053510

020124
041110
020124
047516
020124
051525
042522

047503
020124
044504
020124
047111

051122
044502
020104
042523
051040

041505
020124
047516
020124
042110

EM4:

.ASCIZ/CORRECT BIT DID NOT SET IN RHDB/

047516

026516

054105

EMS:

.ASCIZ/NON-EXISTANT MEMORY DID NOT SET IN RH(CSZ2/

020124
041510

047111
031123

051040
000

EM6:

LASCII/ LOGIC TO SET TRE BIT IN RHCS1 REGISTER/<15><12>

000102

051511
046440
020131
047516

040

020103
052105
041040
020116
020061
052123

055404
055412
055420
055426
055434
055442

043516
047524
041122
047111
020106
005015

055444
055452

PAGE 139

051122
044502

055324
055332
055340
055346
055354
055362

055370
055376

.EVEN

;ERROR MESSAGES

A AR

10:03

051511
053440

051117
041124

0405246
046505
044504
020124

047514

047524
052040
052111
044122
042522
051105

047040
051117
043454
024040
020051
051526
044122

024040
020051

052116
051117
020104
042523

044507

051440
042522
044440
051503
044507
005015

052117
044513

LASCII/1S NOT WORKING,GO TO (CSRB) PRINTS IF RH11/<15><12>

051503
051120

LASCIZ/0R (CSTB) PRINTS IF RH70 IN LOCATION B7 ON BOTH PRINTS/

020117
051503
051120
044440
030461

MACY11 30A(1052)

MASSBUS RH70 AND RH11 DIAGNQSTIC
CZRHBD P11

7312
7313
7314
7315
7316
7317
7318
7319
7320
7321
7322
7323
7324
7325
7326

7327
7328

7329
7330

7331

7332
7333
7334
7335
7336
7337
7338
7339
7340
7341
7342
7343
7344
7345
7346
7347
7348
7349
7350
7351
7352
7353
7354

7355
7356
7357
7358
7359
7360
7361
7362
7363
7364
7365
7366
7367

02-MAY-78 10:01

055460
055466
055474
055502
055510
055516
055524
055532
055533
055540
055546
055554
055562
055570
055576
055601
055606
055614
055622
055630
055635
055642
055650
055656
055664
055672
055676
055704
055712
055716
055724
055732
055740
055746
055754
055762
055765
055772
056000
056006
056011
056016
056024
056032
056035
056042
056050
056055
056062

056070
056076
056104
056112
056120
056124
056132

047111

K 11

02-MAY-78

END OF PASS ROUTINE

10:03

PAGE 140

051524
044122
020116
044524
020067
052117
04711

044440
030067
047514
047117
047117
020110
051524

046505
042040
047516
042101
042523
051048
00
046505
051440
020124
047111
030523
020103
042523
040440
051117

041040
042517
020124
040440
020124
041510

EM?7:

.ASCIZ/NEM BIT DOES NOT READ AS SET IN RHCSZ/

040440
020103
042523
051040
000
044502
020124
052124
046440
051105

EM10:

LASCIZ/NEM AND SC NOT SET IN RHCS1/

EM11:

LASCIZ/SC BIT SET BY ATTIN OR MCPE ERROR/

044504
020124

EM12:

LASCIZ/ SC DID NOT SET/

044502
051440
052125
042522
051501
051101

EM13:

.ASCIZ/TRE BIT

041040
042111
051440

EM14:

.ASCIZ/WCE BIT DID NOT SET/

041040
042111
051440

EM15:

LASCIZ/uWCE BIT DID NOT SET/

041040
052117
000
040440
042522
051440
052125
044502
020124

EM16:

.ASCIZ/TRE BIT NOT SET/

EM17:

LASCIZ/WCE AND TRE ARE SET BUT SC BIT NOT SET/

044504
020124

EM20:

.ASCIZ/UPE DID NOT SET

047516

IS SET BUT SC READS AS CLEARED/

IN RH(CSZ2/

SEQ 0140

L 1
MACY11 30A(1052)
02-MAY-78
10:03
END OF PASS ROUTINE

MASSBUS RH70 AND RH11_DIAGNOSTIC
02-MAY-78 10:01
CZRHBD.P11
7368
7369
7370
7371
7372
7373
7374
7375
7376
7377
7378
7379
7380
7381
7382
7383
7384
7385
7386
7387
7388
7389
7390
7391
7392
7393
7394
7395
7396
7397

7398

7399
7400
7401
7402
7403
7404
7405
7406
7407
7408
7409
7410
7411
74612
7613
7414
7415
7416
76417
7418
7419
74620
7421
7422
7423

056140
056146
056154
056155
056162
056170
056176
056204
056212
056220
056226
056234
056237
056244
056252
056256
056264
056272
056300
056306
056307
056314
056322
056330
056336
056341
056346
056354
056362
056367
056374
056402

056410
056416

056422
056430
056436
056444
056452
056457

056464
056472
056500
056506
056514
056516
056524
056532
056540
056545
056552
056560
056566
056574
056602
056610

042523
051040
000
124
042116

020124
041510

047111
031123

042522
051440
051524
051440
020105
041523
042040
052117
000
020103
047516

040440
020103
040440
052105
047101
041040
042111
051440

EM21:

LASCII/TRE AND SC BITS ARE SET/

EMZ2?2:

LASCIZ/UPE AND SC BIT DID NOT SET/

044502
020124

EM23:

.ASCIZ/SC BIT NOT SET/

044504
020124
047111
031123

EM24:

.ASCIZ/NED DID NOT SET IN RHCSZ/

042522
051440
052517
052117
000
042522
046125
020124
052105
042522
053440
052117
041040
000104
020106
044504
020124
047111
031123
043130
051440
020104
052105
044122

040440
020103
042114
051440

EM25:

LASCIZ/TRE AND SC SHOULD NOT SET/

051440
020104
042502
000
041040

EM26:

.ASCIZ/TRE SHOULD NOT BE SET/

EM27:

.ASCIZ/TRE BIT WAS NOT SET BY NED/

044502
020104
042523
051040
000
041040
047510
042502

EM30:

LASCIZ/MXF BIT DID NOT SET IN RH(CSZ/

EM31:

LASCIZ/MXF BIT SHOULD BE SET IN RH(S2/

020106
041523
047040
052105
042522
051504
046103
026104
047101
040440
052105

047101
040440
052117
000
051040
040440
040505
054115
020104
042522
000

EM32:

.ASCIZ/MXF AND SC ARE NOT SET/

EM33:

.ASCIZ/TRE READS AS CLEARED ,MXF AND SC ARE SET/

000124
020104

051040
000
124
042116
044123
047040
052105
124
047510
047516
051440
124
05211
047040
052105
042516
054115
020124
047516
020124
041510
115
052111
046125
051440
020116
000062
054115
020104
042522
051440
124
040505

020123
042522
020106
041523
051440

PAGE 141

047516
020124
041510

051501

051440
020131

044440
051503

SEQ 0141

MACY11 30A(1052)

MASSBUS RH70 AND RH11 DIAGNOSTIC
CZRHBD.P11
02-MaY-78 10:01
7424
7425
7426
7627
7428
7429
7430
7631
7432
7433
7434
7435
7436
7437
7438
7439
7440
7441
7442
7443
7444
7445
7446
7447
7448
7449
7450
7451
7452

056615
056622
056630
056636
056644
056652

124

020122

7454
7455
7456
7457
7458
7459
7460
7461
7462
7463
7464
7465
7466
7667
7468
7469

7470

7471
7472
7473
7474
7475
7476
74677
7478
7479

057132
057140
057146
057154
057162
057170
057176
057204
057212
057220
057226
057234
057242
057250
057251
057256
057264
057272
057300

052116

10:03

PAGE 142

.ASCIZ/TESTER DOES NOT READ AS BEING CONNECTED/

EM35:

LASCIZ/BIT IN RHCS3 WILL NOT SET/

044504
020124
047117
040440
051523

EM36:

.ASCIZ/RH DID NOT RESPOND TO ADDRESS/

052114
047040
052105
0464122

042040
052117
044440
051503

EM37:

LASCIZ/DLT DID NOT SET IN RH(CSZ2/

020124
052117
044440

051511
051440
020116
026062
051124
020104
042522
005015
047101
041440
044040
042502
052105
047101

EM4O:

LASCII/DLT 1S NOT SET IN RHCSZ2.BUT TRE AND SC ARE SET/<15><12>

051503
020124
047101
040440
052105
020105
041523
042114
020105
051440
020131
042510
047522
050124
040505
042111
051440
042510
047506
046040
020104
052040
052101
043106

057074
057102
057110
057116
057124

END OF PASS ROUTINE
EM34:

051505
047504
052117
020104
044505
047117
042105
05211
044122
044527
052117

000
020110
047516
050123
047524
042522

7453

MmN

02-MAY-78

046114
020123
047516
042101
020117

042524
051505
051040
051501
043516
042516

000
044440
051503
046114
051440

LASCIZ/TRE AND SC COULD HAVE BEEN SET BY ANOTHER ERROR/

EM4T:

LASCIZ/0UTPUT READY DID NOT SET WHEN INFO WAS LOADED INTO THE DATA BUFFER/

EMG2:

LASCIZ/ALL BITS DID NOT LOAD INTO RHWC (177777)/

051105
041040
044504
020124
044440
044122

SEQ 0142

MASSBUS RH70 AND RH11 DIAGNOSTIC

CZRHBD .P11

MACY11 30A(1052)

02-MAY-78 10:01

057306
0573146

041527
033467

0264040
033467

033461
000051

7483
7484
7485
76486
7487

057330
057336
057344
057352
057360

042111
046040
047101
051524
033467

047040
040517
020131
024040
033467

052117
020104
044502
033461
000051

7482

7488

7489
7490
7491
7492
7493
7494
76495
7496
7497

7498

7499
7500
7501
7502
7503
7504
7505

057322

057366

057374
057402
057410
057416
057424
057432
057440

057446
057454

057460

057466
057474
057502
057510
057516
057526
057532

7506

057533

7509

057554

7507
7508
7510
7511
7512
7513
7514

7515

7516
7517
7518
7519
7520
7521
7522
7523
7524
7525
7526
7527
7528

7529
7530
7531
7532
7533
7534

7535

044122

047523

052111
040505
047111
020103
020122
040527
042101

052116
051503

047516

057775

EM43:

_ASCIZ/RHWC DID NOT LOAD ANY BITS (177777)/

041040

EM44:

ASCIZ/SOME BITS CLEARED IN RHWC AFTER CLR WAS LOADED INTO RH(SZ2/

046103
020104
053510
042524
020122
047514
044440
044122

_ASCIZ/NON-EXISTANT MEMORY BIT SET IN RH(SZ2 (NEM)/

122

041110

020101

EM46:

.ASCIZ/RHBA DID NOT CLR AFTER (LR WAS LOADED INTO RH(SZ2/

043101

042524

020122

EM47:

ASCIZ/ALL BITS DID NOT LOAD INTO RHBA (177776)/

EMSO:

.ASCIZ/LOADING TRE AFTER ITS SET DOES NOT CLEAR ERROR/

EMS1:

_ASCIZ/PGE DID NOT SET IN RH(CSZ2/

EMS52:

ASCII/THE PROM WHILE ACCESSING A REGISTER/<15><12>

000

046103
020123
042105
020117

057736
057744
057752
057760
057766
057774

020117
000062

042040

EMLS:

057562
057570
057576
057604
057622
057630
057636
057644
057652
057660
057665
057672
057700
057706
057714
057722
057730

020123
042522
051040
063101
046103
020123
042105

PAGE 143

054105

044504
020124

0576146

042515

10:03

026516

051511
046440
020131
042523
051040
0264040

057540
057546

057612

04i527

02-MAY-78

END OF PASS ROUTINE

76480
7481

000062

046101

051526
047040
040517
047524
020101
033467
114
043516
040440
044440
052105
020123
046103

051105
043520
020104
042523
051040
000

124

040524
046505
044502
020124
041510
042516

020104
046103
020122
047514
044440
044122

020114

042040
052117
020104
051040
030450
024466
040517
052040
052106
0515246
042040
047516
040505

047522
020105
047516
020124
041510

0642510

052116
051117
020124
047111
031123
024515

047516
020122
040527
042101
052116
051503

044502

042111
046040
047111
041110
033467
000
044504
042522
051105
051440
042517
020124
020122

000122
044504
020124
047111
031123

050040

SEQ 0143

B 12
10:03
02-MAY-78
30A(1052)
MACY11
ROUTINE
END OF PASS

MASSBUS RH70 AND RH11 DIAGNOSTIC
CZRHBD P
02-MaY-78 10:01

7536

7537

7538
7539

7540
7541
7542

7543
7544
7545
75646
7547
7548
7549
7550
7551
7552

7553

7554
7555
7556
7557
7558
7559
7560
7561
7562
7563
7564
7565
7566
7567
7568
7569
7570
7571
7572
7573
7574
7575
7576

060002
060010
060016
060024
060032
060040
060042
060050
060056
060064
060072
060100
060106
060114
060117
060124

047522
046111
042503
020107
044507
005015

044127
047531
051505
040503
051440
020131
046522
006516
06

060132
060140
060146
060150
060156
060163

020115
020105
051523
020101
052123

044127
041501
047111
042522
051105

041511
051125
042524
047116
050125
047111
052101
012
051117
020123
044440
051505

020110
052040
020122
052117
046120
047506
047511

LASCII/WHICH YOUR TESTER CANNOT SUPPLY INFORMATION/<15><12>

051440
047111
020123
047105

LASCIZ/FOR SAYS INFO IS PRESENT/

051503
041527
041110
051115
051503
052123
042510
051501
052110

000061
000
000101
000062

042110
051115

EMS3:
EMS4:
EMSS:
EM56:
EM5?7:
EM60:
EM6T:
EM62:
EM6O3:

.ASCIZ/RHCS1/
-ASCIZ/RHW(C/
.ASCI1Z/RHBA/
.ASCIZ/RHMR2/

052104
041110

000123
000061
000
042501

EMG4:
EM6S:
EM66:

EM67:

.ASCIZ/RHDS/
.ASCIZ/RHMR1/
.ASCIZ/RHDT/
.ASCIZ/RHBAE/

041510

031523

EM70:

.ASCIZ/RHCS3/

053105
052516

EM71:

.ASCIZ/DEVICE NUMBER IN RHMR2 DOES NOT EQUAL A 7AFTER A CLEAR/

051115
051505
042440
040440
042524
046103

041511
041115
020116
020062
047040
052521
033440
020122
040505

051503
020123
051122
052111
005015
051122
0521
044440
051503
047522

020061
047101
051117
051440
000
051117
051440
020116
000062
020122

EM72:

.ASCIZ/RHCS1 HAS AN ERROR BIT SET/<15><12>

EM73:

.ASCIZ/ERROR BIT SET IN RHCSZ2/

EM74:

.ASCIZ/ERROR BIT SET IN RHER/

044440

7577
7578

051105

PAGE 144

00
041104

.ASCIZ/RHCS2/

.ASCIZ/RHST/
-ASCIZ/RHER/
.ASCIZ/RHAS/
.ASCIZ/RHTDB/

SEQ@ 0144

MACY11 30A(1052)

MASSBUS RH70 AND RH11 _DIAGNOSTIC
CZRHBD .P11
02-MAY-78 10:01
7592
7593
7594
7595
7596
7597
7598
7599

7600
7601
7602

7603

7604
7605
7606
7607
7608
7609
7610
7611
7612

7613

7614
7615

060446

044502
020124
042510
051105
044502
020124
051510
044122
041516
052116

020124
047111
000122
047522
020124
047111
006524
040502
042522
042105
044440
020104
040503
053117
020117
026105
020105
042114

000
054504
047040
052105
053440
047503
044504
020124
046505
012
044517
053440
047440
044524

041110
042111
041440
040440

041440

051501
042504

END OF PASS ROUTINE

020122
042523
051040
000012
044440
042515
041040
020124
047516
051122
051105
044122
044122
044123
036440

EM7S:

.ASCIZ/ERROR BIT SET IN RHST/<15><12>

EM76:

LASCIZ/RHBA INCREMENTED BUT IT DID NOT CARRY OVER TO RHBAE ,RHBAE SHOULD

042040
052117
040454
051117
047125
020104
042111
047105

EM77:

.ASCII/RDY DID NOT SET,AND WORD COUNT DID NOT INCREMENT/<15><12>

.ASCIZ/DOING A WRITE OPERATION/

043516
044522
042520

047117
042501
047040
042514
052106
051114
046040
006504

047527
054504
047040
052105
044122

042040
052117
044440
051503

020104

PAGE 145

SEQ 0145

042523
051040

020117
000062
020105
051522
051105
020116
047516
045522

052116

c 12
02-MAY-78 10:03

EM100:

.ASCII/RHBAE DID NOT CLEAR AFTER CLR WAS LOADED/<15><12>

LASCIZ/INTO RHCS2/

EM101:

_ASCIZ/WRITE REVERSE OPERATION DID NOT WORK/

EM102:

.ASCIZ/RDY DID NOT SET IN RHCS1/

40/

MACY11 30A(1052)

MASSBUS RH70 AND RH11_DIAGNOSTIC

CZRHBD.P11

END OF PASS ROUTINE

02-MAY-78 10:01

7648
7649
7650
7651
7652
7653
7654
7655
7656
7657
7658
7659
7660
7661
7662
7663
7664
7665
7666
7667
7668
7669
7670
7671
7672
7673
7674
7675
7676
7677
7678
7679
7680

061120
061126
061134
061142
061150
061156
061164
061172
061200
061206
061214
061222
061230
061236
061244
061250
061256
061264
061272
061276
061304
061312
061320
061326
061334
061342

D 12
02-MAY-78 10:03

EM103:

PAGE 146

SEQ 0146

LASCII/DURING A WRITE OPERATION RDY DID NOT SET/<15><12>

044522
053440
047440
044524
054504
047040
052105
042122
052116
047040
041516
052116
044440
040515
005015
020123
0425264
052040
000122
044522
053440
047440
044524
054504
047040
052105

043516
044522
042520
047117
. 2040
052117
005015
041440
042040
052117
042522
041054
063116
064524

061414

052504
040440
042524
040522
051040
042111
051440
047527
052517
042111
044440
042515
052125
051117
047117
040527
052111
047524
042524
052504
040440
042524
040522
051040
042111
051440
047527
052517
042111
044440
042515
042116
051117

047040
041516
052116
044440

052117
042522
040454
043116

7682
7683
7684
7685
7686

061426
061434
061442
061450
061456

040527
020124
043123
052040
020105

020123
051124
051105
020117
042388

047516
047101
062105
044124
052123

7688
7689
7690
7691
7692
7693

061467
061474
061502
061510
061516
061524

102
020123
042105
052111
046125
040525

042501
042515
052440
051440
020104
020114

044440
051523
026120
047510
050505
030064

EM105:

.ASC1Z/BAE 1S MESSED UP,IT SHOULD EQUAL 40,/

7695
7696
7697
7698
7699
7700
7701
7702
7703

061534
061542
061550
061556
061562
061570
061576
061604
061612

040502
020104
047111
047105
042522
053105
040522
042040
052117

020105
047576
051103
000124
042101
047440
044524
042111
051040

044504
020124
046505

EM106:

.ASCIZ/BAE DID NOT INCREMENT/

051040
042520
047117
047040
040505

EM107:

.ASCIZ/READ REV OPERATION DID NOT READ FROM TESTER TO STORAGE LOCATION (RBUF)/

061350
061356

061364
061372
061400
061406

042122
052116

040515

LASCII/WORD COUNT DID NOT INCREMENT,BUT INFORMATION/<15><12>

aunss +&

.ASCIZ/WAS WRITTEN TO TESTER/

051127
020116
051505

043516
044522
042520
067117
042040
052117
005015

EM104:

LASCII/DURING A WRITE OPERATION RDY TID NOT SET/<15><12>

LASCII/WORD COUNT DID NOT INCREMENT ,AND INFORMATION/<15><12>

0461440
042040

064524

.ASCIZ/WAS NOT TRANSFERED TO THE TESTER/

MACY11 30A(1052)

MASSBUS RH70 AND RH11_DIAGNQSTIC
CZRHBD.P11
02-May-78 10:01
7704
7705
7706
7707
7708
7709
7710
7711
7712
713
7714
7715
7716
717
7718
7719
7720
7721
7722
7723
7724
7725
7726
727
7728
7729
7730
7731
7732
7733
7734
7735
7736
7737
7738
7739
7740
7741
7742
7743
7744
7745
7746
7747
7748
7749
7750
7751
7752
7753
7754
7755

061620
061626
061634
061642
061650
061656
061664

061671
061676
061704
061712
061720
061726
061734
061742
061750
061756
061763
061770
061776

020104
052040
020122
047524
046040
047511
052502

122
042440

020123
051440
020104
020114
043101
020101

047527
044522

END OF PASS ROUTINE

046517
042524
051440
042507
052101
051050
000
042501
046101
052111
046125
040525
005015
020122
020105
053440

000
042040
052117
040440
041040
020123
046505
006504

101

042111
051440
052106
020101
047111
047105

EM110:

SEQ 0147

.ASCII/RHBAE EQUALS 0,IT SHOULD EQUAL 40/<15><12>

EM111:

_ASCIZ/A17 DID NOT SET AFTER BA WAS INCREMENTED/<15><12>

042111
044440
042515

EM112:

.ASCIZ/BA DID NOT INCREMENT/

047111
047105
052502
042040
052117
054522

EMi13:

.ASCII/Bn INCREMENTED BUI IT DID NOT CARRY T0/<15><12>

012

051440

PAGE 147

.ASCIZ/AFTER A ONE WORD WRITE/

LASCIZ/A16 AND A17 IN RHCS1/

040440
033461
044122

7756
7757
7758
7759

051106
051505

E 12
02-MAY-78 10:03

040505
051501
047040
042105
051105
053440

052125
054504
047040
043505
040440
041440
051501

042101
052116
051503
020114
042040
052117
020104
047524

042105
020117
000062
044502
042111
051040
047524
040522

EM114:

_ASCII/OUTPUT READY WAS NOT NEGATED AFTER CLR WAS/<15><12>

.ASCIZ/LOADED INTO RH(CSZ2/

EM115:

_ASCIZ/ALL BITS DID NOT READ TO STORAGE LOC.

(RBUF) DURING A READ REV. OPERATION

MACY11 30A(1052)

MASSBUS RH70 AND RH11 DIAGNOSTIC
CZRHBD P11
02-MAY-78 10:01
7760
7761
7762
7763
7764
7765
7766
7767
7768
7769
7770
77
7772
7773
7774
7775
7776
7777
7778
7779
7780
7781
7782
7783
7784
7785
7786
7787
7788
7789
7790
7791

062314

042507
020056
024506
047111
042522
053105
051105
000116
042115
042111
051440
020116
000062
047111
042111
053440
052040
052123
044517
005015
051127
042522
020105
052101
051124
020104
042510
052117
041040
042520
124
020123
047111
030523
020105
041523
123

020104
047040
000124
042115
042116
044123
041040
000124
051124
020104
042522

000
104
042111
051440

F 12

02-MAY-78

END OF PASS ROUTINE

10:03

PAGE 148

041517
052502

046040
051050
042040
020107
042101
020056
052101

020101
051040
050117
047511

042520
047040
052105
044122

042040
052117
044440
051503

EM116:

.ASCIZ/MDPE DID NOT SET IN RH(CSZ/

047506
047040
044522
020117
051105
043516

042040
052117
042524
042524
042040
040440

EM117:

LASCII/INFO DID NOT WRITE TO TESTER DOING A/<15><12>

052111
042526
050117
047511
020105
041523
042522
051440
020131
000
042522
042523
051040
046454
047101
000
047510
046101
020105

020105
051522
051105
000116
047101
053440
047040
052105
042115

EM120:

.ASCIZ/TRE AND SC WHERE NOT SET BY MDPE/

044440

EM121:

LASCIZ/TRE IS SET IN RHCS1,MDPE AND SC/

042520
051440
052517
020105

040440
020103
042114
042523

EM122:

.ASCIZ/MDPE AND SC SHOULD BE SET/

020105
041523
051440
043520
052517
051514
051440

047101
040440
052105
020105
042114
020117
052105

EM123:

.ASCIZ/TRE AND SC ARE SET, PGE SHOULD ALSO BE SET/

046102
047040
052105

042040
052117
040440

EM124:

LASCII/DBL DID NOT SET AFTER A 4 WORD WRITE FROM/<15><1¢>

051125

020124
041510
050104
020104

LASCIZ/WRITE REVERSE OPERATION/

.ASC1Z/SHOULD ALSO BE SET/

046125
047523
042523

SEQ 0148

MASSBUS RH70 AND RH11 DIAGNOSTIC

CZRHBD.P11

MACY11 30A(1052)

02-MAY-78 10:01

062772
063000
063006
063014
063022
063024
063032
063040

052106
032040
020104
020105
005015
047101
020116
051505

051105
053440
051127
051106

0406440
051117
052111
046517

042440
042101
000123

042526
051104

7825

063052

020126

047111

051040

7824

0630446

7826
7827
7828

063060
063066
063074

7832

063120

041104

041510

7834

063134

044517
030440
020106
020105
005015
047101
020116
051505

7836
7837

063146
063154

020124
041510

7829
7830
7831
7833

7835

7838
7839
7840
7841
7842
7843
7844

7845

7846

063102
063110
063116

063126

063140

063162
063170
063176
063204
063211
063216
063224

063231

063236

061104

020116
047527
044522
047522
101
047105
042522

104

042111

020114

031523
043516
053440

042440

042526

000123

042523

020101
042122
042524
006515
020116
040440
051523

020063
053440
043040
012
053105
042104
000

046102

047040

063244
063252
063260
063266
063274
063302
063310
063316
063324
063327
063334
063342
063350

051440
020116
020063
020122
047527
051106
020116
040440
051523
115
042523
051040
041040

052105
044122
043101
020101
042122
046517
053105
042104
000
050103
020124
041510
052125

7861
7862
7863
7864

063364
063372
063400
063401

020123
042514
000
115

051501
051101

7865
7866

7867
7868

7869
7870
7871

063356

063406
063414
063422
063430

063433
063440
063446

020103

044504
020124

047111
030523

127
020117
041510

042522

050103
020104
042523
051040
000
042503
047111
031523

PAGE 149

.ASCIZ/AN EVEN ADDRESS/

EM125:

.ASCII/DBL SET IN RHCS3 DOING A 1 WORD WRITE FROM/<15><12>

.ASCIZ/AN EVEN ADDRESS/

051104

020114

047111
031523

10:03

042040

051127
051106

7847
7848
7849
7850
7851
7852
7853
7854
7855
7856
7857
7858
7859

7860

042523

040440
051117
052111
046517

042101

02-MAY-78

END OF PASS ROUTINE

7816
7817
7818
7819
7820
7821
7822
7823

G 12

051040
047440

042040

052117

EM126:

.ASCII/DBL SET IN RH(S3 ON A 3 WORD WRITE FROM/<15><12>

.ASCIZ/AN EVEN ADDRESS/

EM127:

044440
051503
042524
020062
005015
040440
047105
042522

L.ASCII/DBL DID NOT SET IN RHCS3 AFTER A 2 WORD/<15><12>

.ASCIZ/FROM AN EVEN ADDRESS/

020105
047111
030523
051440
042101
041440
042105

EM130:

.ASCIZ/MCPE SET IN RHCS1 BUT SC READS AS CLEARED/

020105
047516
020124
041510

EM131:

_ASCIZ/MCPE DID NOT SET IN RHCS1/

046040
051040
042040

EM132:

_ASCIZ/WCE LO IN RHCS3 DID NOT SET/

SEQ 0149

MASSBUS RH70 AND RH11 DIAGNOSTIC

CZRHBD .P11
7872
7873

042111
051440

0647040
052105

052117
000

063474
063502
063510
063516
063524
063532

020117
042114
020131
052105
044122
052502

044123
047440
042502
044440
051503
006524

052517
046116
051440
020116
020063
012

063566

000124

063467

7881
7882
7883
7884

063537
063544
063552
063560

7885

7886

063570

7888
7889
7890
7891
7892

063604
063612
063620

7893

063626
063634
063642

7895

063651

7900

063705

7887

7896
7897
7898
7899
7901
7902
7903
7904
7905
7906
7907

7909

7910
7911
7912
7913
7914
7915
7916
7917
7918

7919

7921
7922
7923
7924
7926

063576

127

127
020111
051040
040440

047514

020116
020063
041527

044122
052502
020105

051503
020124
044504

127

062503

127

042503

020104
042523
051040
000

063712
063720
063726
063734
063742
063750
063756

020111
047111
031523
053440
042111
051440
020116
00006

064060
064067
064076
064102
064110
064116
064124
064132

041527

051440
020104
041040
020126
041510
052125
041527
040440
042522

051383
127
047640
044524
042111

044440
042515
051117

EM133:

044040
047523
051504
042523

020105

051440

020111
047516
020124
041510

063774
064002
064010
064016
064024
064032
064036
064044
064052

042503
046101
040505
020123

046040

041527

063656
063664
063672
063700

063766

042503

02-MAY-78

END OF PASS ROUTINE

063454
063462

7874

7875
7876
7877
7878
7879
7880

MACY11 30A(1052)

02-MAY-78 10:01

H 12

10:03

PAGE 150

_ASCII/WCE LO SHOULD ONLY BE SET IN RH(CS3 BUT/<15><12>

.ASCIZ/WCE HI ALSO READS AS SET/

EM134:

_ASCIZ/WCE LO SET IN RHCS3 BUT WCE DID NOT SET IN RH(CS2/

064040

EM135:

.ASCIZ/WCE HI DID NOT SET IN RH(CS3/

064040

EM136:

.ASCIZ/WCE HI SET IN RHCS3 BUT WCE DID NOT SET IN RH(CSZ2/

020105

044510

EM137:

.ASCII/WCE HI SHOULD ONLY BE SET IN RH(S3 BUT/<15><12>

051440

047514
020117
020123
052105

0464522
042520
047117
047040
041516
052116
020104

042524
040522
042040
052117
042522
053440
047503

052105

047516
020126
041510

044504
020124
047111
031523
042523
051040
041040
042503
047040
052105
044122
047510
047117
020105
047111
031523
005015
020105
051514
042101

044440

020124
047111
031123

020104
042523
051040
000
020124
041510
052125
042040
052117
044440
051503
046125
054514
042523
051040
041040

LASCIZ/WCE LO ALSO READS AS SET/

EM140:

ASCIZ/WRITE OPERATION DID NOT INCREMENT WORD COUNT/

SEQ 0150

[ 12
10:03
02-MAY-78
MACY17 30A(1052)
END OF PASS ROUTINE

MASSBUS RH70 AND RH11_DIAGNOSTIC
CZRHBD.P11
02-MAY-78 10:01
7928
7929
7930
7931
7932
7933
7934
7935

064140
064144
064152
064160
064166
0646174
064202
064210
064216
064220
064226
064234
064242
064250

047125
052502

000124
020123
051505
020104
047111
047105
042524
051127

PAGE 151

042101
020123
047516
051103
020124
020122
052111

EM141:

.ASCI1Z2/BUS ADDRESS DID NOT INCREMENT AFTER A WRITE/

046522
020116
047516
020124
042524
052040
000122
047440
044524
042111
044440
042515
051117
047125

EM142:

LASCIZ/INFORMATION DID NOT GET WRITTEN TO TESTER/

EM143:

.ASCIZ/READ OPERATION DID NOT INCREMENT WORD COUNT/

020123
051505
020104
047111
047105
042524
042522

042101
020123
047516
051103
020124
020122
042101

EM144:

LASCII1/BUS ADDRESS DID NOT INCREMENT AFTER A READ/<15><12>

051105

052101
EM145:

.ASCIZ/INFORMATION DID NOT READ FROM TESTER/

052123

046522
020116
047516
04210
020115
051105
020123
042510
042524
043117
051040
044507
000123
044502
04211
043440
040522
042522
044522
005015
047440

EM146:

.ASCIZ/THIS IS THE CONTENTS OF

047506
047511
020104

042507
052111
047524
042524

044510
052040
047117
020123

042101

.ASCIZ/0PERATION/

EM147:

THE RH REGISTERS/

\SCIIZALL BITS DID NOT GET TRANSFERED DURING A/<15><12>

.ASCIZ/READ OPERATION/

SEQ 0151

J 12

MACY11 30A(1052)
02-MAY-78
END OF PASS ROUTINE

MASSBUS RH70 AND RH11_DIAGNOSTIC
CZRHBD PN
02-MAY-78 10:01
7984
7985
7986
7987
7988
7989

064632

042520
047117
122

050117
047511
020104
042523
020117
047054
047111
052101
040527
047101
042105
052123
020105
051050
000
101

052111
051105
020124
043123
052040
052123
052504

PAGE 152

040522

044524

040505
051105
020116
047516
046505

020104
052101
044504
020124
052040
045522
005015
046522
020116
051124
051105
0c0117
04350
027103
024506

EM150:

046114
020123
020105
051124
051105
020117
051105
044522
053440
047440

041040
044127
047516
047101
042105
042524
005015
043516
044522

EM151:

044522
042520
047117
047040
044522
020117
051105
046102
047440
020062
052040
042506
044124
005015
020124
041510

042524
040522
042040
052117
042524
042524

EM1S2:

LASCIZ/WRITE OPERATION DID NOT WRITE TO TESTER/

EM153:

LASCII/DBL SET ON A 2 WORD TRANSFER WITH BAI/<15><12>

046102
044440
051503
040440
051117
042101
006515
042440
042101

051440
020116
020063
030440
020104
043040
000012

000

052502

044524

042522
047522
047101
020116

10:03

.ASCII1/READ OPERATION DID NOT SEEM TO WORK,NO /<15><12>

LASCIZ/INFORMATION WAS TRANSFERED TO STORAGE LOC.(RBUF)/

LASCII/ALL BITS WHERE NOT TRANSFERED TO TESTER/<15><1?2>

.ASCIZ/DURING A WRITE OPERATION/

042520
047117

000
051440
020116
047527
040522
020122
041040

LASCIZ/SET

047111
031123

042526
051104

EM154:

IN RH(CSZ2/

LASCJZ/DBL SET IN RHCS3 ON A 1 WORD READ FROM/<15><12>

.ASCIZ/AN EVEN ADDRESS/

SEQ 0152

MASSBUS RH70 AND RH11 DIAGNOSTIC

CZRHBD.P11
8040

8041

02-MAY-78 10:01

065320

065324

051505

000123

041104

020114

8042
8043
8044
8045
8046
8047
8048

065332
065340
065346
065354
065362
065370
065376

020124
031040
020104
020105
053440
040502
006524

047117
053440
051127
042522
052111
020111
012

8050

065406

051503

000062

8049

MACY11 30A(1052)

065401

111

040440
051117
052111
027126
020110
042523

020116

044122

8051

065412

065420
065426
065434
065442
065450

020124
031040
020104
043123
044522

020114

047117
053440
051124
051105
042524

0642523

8058
8059
8060
8061

065457
065464
065472
065500

106
047101
040440
051523

047522
047440
042104
000

020115
042104
042522

8063
8064
8065
8066
8067
8068
8069
8070
8071

065510
065516
065524
065532
065540
065546
065554
065562
065567

042111
051440
020116
047527
044522
053105
020115
042526
101

047040
052105
020101
042122
042524
043056
047101
006516
042104

052117
047440
020062
053440
051040
047522
042440
012
042522

8052
8053
8054
8055
8056

8062

8073

8074
8075
8076
8077
8078
8079
8080
8081

8083

8084
8085
8086
8087
8088
8089
8090
8091

8093

8094
8095

065503

065577

041106

END OF PASS ROUTINE

042523

106

065604
0€5612
065620
065626
065634
065642
065650
065656

052105
020101
042122
042524
051105
051106
020116
042101

065666

041104

065674
065702
065710
065716
065724
065731
065736
065744

065755

065762
065770

020124
031440
020104
020105
051522
106
047101
040440

106

042111
051440

046102

000

046102

047440
020062
053440
051040
042523
046517
042117
051104

020114

047117
053440
051127
042522
006505
047522
047440
042688

046102

047040
052105

040440
051117
047101
053450
006451

042040

051440

020116
047527
044522
053105
005015
040440
020104
051505

042523

040440
051117
052111
042526
012
020115
042104
042522

042040

052117
047440

EM15S:

K 12

02-MAY-78

10:03

PAGE 153

_ASCII/DBL SET ON A 2 WORD WRITE REV. WITH BAl SET/<15><12>

LASCIZ/IN RH(CSZ2/

EM156:

.ASCI1/DBL SET ON A 2 WORD TRANSFER(WRITE)/<15><12>

.ASCIZ/FROM AN ODD ADDRESS/

EM157:

_ASCII/DBL DID NOT SET ON A 2 WORD WRITE REV.FROM AN EVEN/<15><12>

.ASCIZ/ADDRESS/

EM160:

.ASCII/DBL SET ON A 2 WORD WRITE REVERSE/<15><12>

.ASCIZ/FROM AN ODD ADDRESS/

EM161:

.ASCII/DBL SET ON A 3 WORD WRITE REVERSE/<15><12>

.ASCIZ/FROM AN ODD ADDRESS/

EM162:

.ASCII/DBL DID NOT SET ON A 2 WORD READ FROM AN/<15><12>

SEQ 0153

L 12
02-MAY-78 10:03
MACY11 30A(1052)
END OF PASS ROUTINE

MASSBUS RH70 AND RH11 DIAGNOSTIC
CZRHBD.P11
02-MAY-78 10:01
8096
8097
8098
8099
8100

020116
047527
040505
046517
012
105
042107

000123
041104
020124
031040
020104
043040
012
101

020104
051505
041104
020124
031040
020104
051040
042523
051106
020116
040440
051523
104

042111
051440
020116
047527
040505
042526
012
106

047101
040440
051523
104

052105
020101
042122
020104
005015

020101
042122
020" 9%

020062
051040
051106
006516

042526
051104

020116
051505

020114
047117
053440
042522
047522

042523
040440
051117
042101
006515

020116
042107
000123
020114
047117
053440
042522
053105
005015
046517
053105
042104
000
046102
047040
052105
020101
042122
020104
051522

0462117
051104

047522
047440
042104
000
046102
047440
020063
051040
051106

020115
042104

042440

042526
051104

046517

042523
040440
051117
042101
051105

.ASCIZ/EVEN ADDRESS/

EM163:

LASCII/DBL SET ON A 2 WORD READ FROM/<15><12>

.ASCIZ/AN ODD ADDRESS/

EM164:

LASCII/DBL SET ON A 2 WORD READ REVERSE/<15><12>

.ASCIZ/FROM AN EVEN ADDRESS/

040440
047105
042522
042040
052117
047440
020062
051040
042522
006505

PAGE 154

EM165:

LASCI1/DBL DID NOT SET ON A 2 WORD READ REVERSE/<15><12>

.ASCIZ/FROM AN ODD ADDRESS/

042522
051440
020116
047527
040505
046517

044504
020124
047117
053440
042522
053105
005015
040440

EM166:

LASCII/DBL SET ON A 3 WORD READ FROM/<15><12>

.ASCIZ/AN EVEN ADDRESS/

EM167:

LASCII/DBL DID NOT SET ON A 3 WORD READ REVERSE/<15><12>

.ASCIZ/FROM AN EVEN ADDRESS/

SEQ 0154

MACY11 30A(1052)

MASSBUS RH70 AND RH11 DIAGNOSTIC
02-MAY-78 10:01
CZRHBD P

8152
8153
8154
8155
8156
8157
8158
8159

020116
040440
051523
124
040505
020123
043520
020104
047510
042502
000
123
052517
020105
062122

Mm12

02-MAY-78

END OF PASS ROUTINE

10:03

PAGE 155

053105
042104
000
042522
051504
042523
020105
041523
046125
051440

047105
042522

051040
040440
020124
047101
051440
020104
052105

EM177:

.ASCIZ/TRE READS AS SET PGE AND SC SHOULD BE SET/

020103
042114
042523
020131
041510
042111
041440
040440
042524
020124
044440
000124
053440
047516
020124
041510

044123
0461040
000124
047111
030523
047040
052501
020116
051122
044527
020105

EM172:

.ASCIZ/SC SHOULD BE SET/

EM173:

.ASCIZ/RDY IN RHCST DID NOT CAUSE AN INTERRUPT WITH IE SET/

046111
020124
047111
030523

EM174:

LASCIZ/IE WILL NOT SET IN RHCS1/

020105
047101
020116
020107
042510
000
041510

040510
047440
047507

EM175:

LASCIZ/]E HAS AN OPEN GOING TO THE BUS/

051501
051105
044502

031523
040440
047522
020124

EM176:

.ASCIZ/RHCS3 HAS AN ERROR BIT SET/

EM177:

LASCIZ/DLT AND TRE ARE SET,SC SHOULD BE SET/

046125
051440

047101
020105
042523
051440
020104
052105

052131
041117
040507
051117
020103
047527
020107
051105

EM200:

LASCIZ/HIBYTE

,LOBYTE GATE FOR RHWC NOT WORKING PROPERLY/

052131

EM201:

LASCIZ/HIBYTE

,LOBYTE GATE FOR RHDB NOT WORKING PROPERLY/

041111
046054
020105
043040
053510
020124
047111
050117
000
04111

047524
041040

SEQ 0155

MASSBUS RH70 AND RH11 DIAGNOSTIC

CZRHBD .P11

MACYT1 304(1052)

02-MAY-78 10:01

END OF PALS ROUTINE

8208
8209
8210
8211
8212
8213
8214
821,

067124
067132
067140
067146
067154
067162
467170
067176

020105
052131
042524
0510640
047516
045522
051120
054514

046054
020105
043040
042110
020124
047111
050117
000

041117
040507
051117
020102
047527
020107
051105

8217
8218
8219
8220
8221
8222
8223
8224

067206
067214
067222
067230
067236
067244
067252
067260

020105
052131
042524
051040
047516
045522
051120
054514

046054
020105
043040
041110
020124
047111
050117
000

0641117
040507
051117
020101
047527
020107
051105

067270
067276
067304
067312
067320
067326
067334
067342
067343
067350
067356
067364
067372
067400
067406
067414
067422
067630
067436
067444
067452
067460
067466
067474
067502
067510
067514
067522
067530
067536

051525
042522
020123
051122
052111
046125
030440
000
126
020122
0641040
020122
047040
047117
052040
051117
044440
044122
047040
052116
020124
040440
020061
042505
042511
042523
064122
047510
042502
000117

040440
051523
047111
041505
051440
020104
030065

042104
044440
047503
020124
047510
042502
030060

067540
067546
067554
067562
067570

051124
051105
042040
047117
020124

8216

8225

8226
8227
8228
8229
8230
8231
8232
8233
8234
8235
8236
8237
8238
8239
8240
8241
8242
8243
8244
8245
8246
8247
8248
8249
8250
8251
8252
8253
8254
gggg
8257
8258
8259
8260
8261

8262
8263

067201

067263

067574
067602

110

126

041520
020040

041111

N 12

02-MAY-78

10:03

PAGE 156

052131

EM202:

.ASCIZ/HIBYTE ,LOBYTE GATE FOR RHBA NOT WORKING PROPERLY/

042510

061040

EM203:

.ASCIZ/THE BUS ADDRESS IS INCORRECT IT SHOULD BE 15000/

051505

0642524

EM204:

_ASCIZ/TESTER DATA BUFFER DOES NOT CONTAIN THC CORRECT INFO/

042040
052117
051105
047514
020126
047524
064440
044440
000124
061527
046125
055040

042111
044440
050125
045517
051503
051440
020106
020123

EM205:

.ASCIZ/RH DID NOT INTERUPT LOOK AT CS1 TO SEE IF IE IS SET/

051440
020104
051105

EM206:

.ASCIZ/RHWC SHOULD BE ZERO/

043123
051501
020105
051117

EM207:

.ASCIZ/TRANSFER WAS DONE ON PORT B/

020040
052123

DH1:

LASCII/PC

040504
043125
047504
052117
040524
042510
042522
043116

047101
053440
047117
050040
000102

020040
042524

040524
042506
051505
041440
047111
041440
052103
000117

TEST

RHW(

CONTENTS RHWC/<15><12>

SEQ 0156

MACY11 30A(1052)

MASSBUS RH70 AND RH11 DIAGNQOSTIC
CZRHBD .P11
02-MAY-78 10:01
8264
8265
8266
8267
8268
8269
8270
8271
8272
8273
8274

067610
067616

020040
041527
047503
051524
006503

020040
020040
052116
051040
012
020040
047040

070042
070050
070056

PAGE 157

044122
020040
047105
053510
020040
027117
020040
020040
046125
042526
000116
020040
052123
044122
020040
047105
041110

DHZ2:

LASCIZ/

NO.

LASCII/PC

TEST

SHOULD HAVE BEEN/

RHBAE

SHOULD HAVE BEEN/

LASCI1Z/

DH3:

CONTENTS RHBAE/<15><12>

LASCI1/PC

TEST

LASCIZ2/

NO.

LASCII/PC

TEST

RHBA

CONTENTS RHBA/<15><12>

044122

070072
070100
070704
070112
070120
070126
070134
070142
070150
070155
070162
070170
070176
070204
070212
070220
070224

020040
020056
020040
020040
042114
020105
000
020040
051505
051040
020040
042524
044122

(70232

070240
070246
070254
070262
070270
070275
070302

END OF PASS ROUTINE

020040
020056
020040
020040
042114
020105
000
020040
051505
051040
020040
042524

070014

B 13
02-MAY-78 10:03

053101
047105
020103
052040

020040
020056
020040
020040
042114
020105
000
020040
051505

DHé4:

SHOULD HAVE BEEN/

RHDB

SHOULD HAVE BEEN/

.ASC1Z/

DH5:

LASCII/PC

CONTENTS RHDB/<15><12>

TEST

RHCS2

TRE AND SC/<15><12>

SEQ 0157

MACY11 30A(1052)

MASSBUS RH70 AND RH11_DIAGNOSTIC
CZRHBD.P11
02-MAY-78 10:01

8320
8321
8322
8323
8324
8325

070310
070316
070324
070332
070340
070341
070346
070354
070362
070370
070376
070402
070410
070416
070424
070432
070437
070444
070452
070460
070466
070470
070476
070504
070512
070520
070526
070534
070542
070545
070550

020124

051040
020040
040440
006503

020040
047040
020040
020040
020040
000123

020040
027117
020040
020040
041040

070704
070712
070720
070723
070730
070736
070744
070752

020040
052123
047503
051524
012
020040
027117
020040
051503

DH11:

020040
052123
042504
005015
020040
020056
047503

:
DH34

020040
052123
040506
006507

020103
052040
052516
000
020103

042524

PAGE 158

END OF PASS ROUTINE

020040
031123
042522
051440

042522

c 13
02-MAY-78 10:03

DH35:
DH36:

020040
027117
040440
051523

LASCIZ/

NO.

LASCII/PC

TEST

LASCI12/

NO.

LASCII/PC

TEST

DEVICE/<15><12>

LASCIZ/

NO.

CODE/

LASCIZ/PL/
LASCI1/PC

TEST

FAILING/<15><12>

LASCIZ2/

NO.

ADDRESS/

BITS/

CONTENTS OF/<15><12>

RHCS2/

020040
051505
041115

DH&1:

.ASCIZ/PC

TEST NUMBER/

020040
051505
040440
051523
040524
040510

DHS2:

.ASCII/PC

TEST

ADDRESS

LASCIZ/

NO.

CONTENTS/

020040
027117
041440
052116

SEQ 0158

DATA

RHAS/<15><12>

MACY11 30A(1052)

MASSBUS RH70 AND RH11 DIAGNOSTIC
CZRHBD PN

02-MAY-78 10:01

070754
070762
070770
070776
071004
071012
071020
071026
071033
071040
071046

END OF PASS ROUTINE

DEVICE/<15><12>

LASCI1Z2/

NO.

NUMBER/

LASCII/PC

TEST

CONTENTS OF /<15><12>

LASCIZ/

NO.

DH76:

LASC1Z/PC

TEST NO.

RHBAE

DH105:

LASCIZ/PC

TEST NO.

RHBAE

RHBA

RHWC/

020040
052123

DH111:

.ASCIZ/PC

TEST NO.

RHCST

RHBA

RHWC/

020040
020124
044122

DH121:

.ASCIZ/PC

TEST NO.

RHCST

RHCSZ/

DH130:

LASCIZ/PC

TEST NO.

RHCS1/

020040
020124
044122
020040
020040
051503
044122

DH132:

LASCIZ/PC

TEST

RHBAE

RHBA

020040
020124

DH142:

LASCIZ/PC

TEST NO.

EVENAD

RHTDB/

020040
020124
051040
020040
000101
020040
020124
044122
020040
020040
041527

020103
042524
027117
030523
041110
051040
020040
051505

020040
051505
020056

051505

DH72:

RHBA/

051040
020040
020101
053510

020124
044122

071442

SEQ 0159

TEST

DH71:

020040
051511

PAGE 159

LASCII/PC

020040
052123
042504
005015
020040
020056
052516
000
020040
051505
041440
052116
005015
020040
020056
051040
042524

020040
042524

D1 3
10:03
02-MAY-78

NO.

RHCS2

RHCS3/

E 13
MACY11 30A(1052)
02-MAY-78
10:03
END OF PASS ROUTINE

MASSBUS RH70 AND RH11_DIAGNOSTIC
CZRHBD.P11
02-MAY-78 10:01
8432
8433

071450
071456
071464
071472
071500
071506
071514
071522
071530
071536
071537
071544
071552
071560

047516
047105

071574
071575
071602
071610
071616
071623
071630
071636
071644
071651
071656
071664
071672
071700
071706
071710
071716
071724
071732
071740

000
122
020040
020101
041510
120
020040
047040
041510

071566

071742
071750
071754
071762
071766
071774
072000
072006
072012
072020
072024
072032
072034
072042
072044
072050
072056

072074

020056

044122
041520
052040
047516
051503
044122
020040
000
120
020040
047040

052502
051040

053105
020040
000102
020040
020124
044122
020040
020062
041527

PAGE 160

DH146:

LASCIZ2/PC

TEST NO. RHCST

RH(CSZ2

RHTDB/

020103
042524
027117
020106
052110

020040
052123
051040
020040
041104

DH147:

LASCIZ/PC

TEST NO. RBUF

041110

042501
041110
051040
000
020040
052123
051040
000
020040
051505
042040
020105
031123

DH170:

.ASCIZ/RHBAE

RHBA

DH171:

LASC12/PC

TEST NO. RHCS3/

DH172:

ASCI1/PC

TEST

DEVICE

LASCIZ2/

NO.

NUMBER /

051105

020040
020056
052516
020040

SEQ 0160

RHWC/

RHCS3/

RHCS2/<15><12>

003454
000000
003454
000000
003454
000000
003454
000000
003454
000000
003454

003444

.EVE
DT1:

.WORD

$ERRPC,TSTNM,WC,SREGO,0

003416

DT2:

.WORD

$ERRPC,TSTNM,BAE,$REGO,0

003414

DT3:

.WORD

$ERRPC,TSTNM,BA,SREGO,0

003426

DT4:

.WORD

SERRPC,TSTNM,DB,S$REGO,0

003422

DTS:

.WORD

$ERRP(,TSTNM,(S2,$REGO,0

003422

DT11:

.WORD

SERRPC,TSTNM,(S2,0

003454

003434

DT34:

.WORD

SERRPC,TSTNM,DT,0

000000
003454

003330

DT35:
DT36:

' WORD

ggzgzg:?STNM.RHCS1.0

003454
003454
003412

000000
003416
000000

DT41:
DTS2:

" WORD

gggggg:}g}z::gAE,SREGO.AS.O

02-MAY-78

DT71:

.WORD

$ERRPC, TSTNM,RBUF ,0

003454
000000
003454
003444
003454
003444
003454
000000
003454

003416

DT76:

.WORD

$ERRPC, TSTNM,BAE ,BA,0

003416

DT105:

.WORD

$ERRPC, TSTNM,BAE ,BA W(, 0

DT111:

.WORD

$ERRPC,TSTNM,(S1,BA,WC,0

003420

DT121:

.WORD

$ERRP(C,TSTNM,(S1,(S2.0

003420

DT130:

.WORD

$ERRPC,TSTNM,(S1,0

072176
972204
072212
072214
072222
072226
072234
072242
072250
072254
072262
072264
072272
072274
072302

003454
003422

003416
003424

DT132:

.WORD

$ERRPC,TSTNM,
BAE ,BA,(S2,(S3,0

003454
000000
003454
003444
003454
000000
003414

004000

DT142:

.WORD

$ERRPC,
TSTNM, EVENAD,$REGO, 0

003420
000000
004100

DT146:

.WORD

$ERRPC,TSTNM,(S1,(S2,wC.0

DT147:

.WORD

$ERRPC, TSTNM,RBUF , $REGO, 0

003424

DT170:

.WORD

BAE ,BA,(S3.0

003454

003424

DT171 : .WORD

$ERRPC,TSTNM, (S3.0

003454
000000

004100

DT172:

.WORD

$ERRPC,TSTNM,RBUF
,(S2,0

072306
072311
072312
072315
072316

000

.EVE
DF1:

.BYTE

0,0.0.0

000

DF2:

.BYTE

0.0.0.0

000

DF3:

.BYTE

0.0.0.0

000

DFé4:

.BYTE

0.0,0.0

000

DFS:

.BYTE

0.0.0.0

000
000

DF11:
DF 34 :
DF 35:
DF36:
DF41:

DF52:

.BYTE
.BYTE
.BYTE
.BYTE
.BYTE
.BYTE

OO0O0O0OO0O0O

000
000

DF71:
DF76:

.BYTE
.BYTE

000

DF105:

.BYTE

000
000
000
000

DF132:

.BYTE

DF170:
DF172:

.BYTE
.BYTE

.EVEN

o
(=]

.
.

.
4

’

.0.0.0

.0.0,0.0

000

072325
072326
072331
072332
072335
072340
072341
072344
072346
072351
072353
072356
072361
072362
072365
072367
072372
072375
072400
072403

072321
072322

001116
000000
001116
003414
001116
003414
001116
003414

004100

072102
072110
072112
072120
072124
072132
072140
072146
072154
072162
072166
072174

003454

O©

PAGE 161

10:03

END OF PASS ROUTINE

8488
8489
8490
8491
8492
8493
8494
8495
8496
8497
8498
8499
8500
8501
8502
8503
8504
8505
8506
8507
3508
8509
8510
8511
8512
8513
8514
8515
8516
8517
8518
8519
8520
8521
8522
8523
8524
8525
8526
8527
8528
8529
8530
8531
8532
8533
8534
8535
8536
8537
8538
8539
8540
8541
8542
8543

F 13

MACY11 30A(1052)

MASSBUS RH70 AND RH11_DIAGNOSTIC
CZRHBD P11
02-MAY-78 10:01

0.0

SEQ 0161

MASSBUS RH70 AND RH11 DIAGNOSTIC
CZRHBD.P11
02-MAY-78 10:01

8544
8545
8546
8547
8548
8549
8550
8551
8552

8553
8554
8555
8556
8557
8558
8559
8560
8561
8562
8563
8564
8565
8566
8567
8568
8569
8570
8571
8572
8573
8574
8575
8576
8577
8578
8579
8580
8581
8582
8583
8584
8585
8586
8587
8588
8589
8590
8591
8592
8593
859
8595
8596
8597
8598
8599

G 13
MACY11 30A(1052)
02-MAY-78 10:03
END OF PASS ROUTINE

PAGE 162

;.'ttttttttttttttttttttt'tttttttttttitt"ttttt'ttt'tttttttttfittfiit

072404
072406
072410
0726412
072414
072416
072420
072422
072424
072426
072430
072432
0726434
072436
072440
072442
072444
072446
072450
072452
072454
072456
072460
072462
072464
072466
072470
072472
072474
072476
072500
072502
072504
072506
072510
072512
072514
072516
072520
072522
072524
072526
072530
072532
072534
072536
072540
072542
072544
072546
072550
072552

072554
072556
072560

000000
050334
050374
050421
050460
050517
050550
050602
050633
050677
050730
050760
0510M
051041
051071
051131
051171
051233
051275
051340
051414
051456
051520
051562
0516264
051666
051733
052013
052070
052145
052223
052277
052371
052456
052522
052573
052651
052740
053003
053070
053147
053234
053313
053372
053436
053502
053541
053615
053664
053737
054005
054060

054127
054202
054250

HEADER:

0
HED1
HED?2
HED3
HED&

HEDS
HED6
HED?7
HED10
HED11
HED12

HED13

HED14
HED15
HED16

HED17
HEDZ20
HEDZ21
HED22
HED?23
HED24
HED25
HEDZ26
HED2?
HED30

HED31
HED32
HED33
HED34
HED35

HED36
HED3?7
HED4O
HED41

HED4?2
HED43
HED&44

HED4S
HED46
HED47
HEDSO
HEDS1
HEDS?2
HEDS3
HEDS4
HEDSS
HEDS6
HEDS?7
HEDG6O
HEDG1
HED62

HED63

HED64
HEDGS
HED66

SEQ 0162

MASSBUS RH70 AND RH11 DIAGNOSTIC

CZRHBD.P11
8600
8601
8602
8603
8604
B60S
8606
8607

072562
072564
072566
072570
072572
072574
072576
072600

02-MAY-78 10:01
054324
054373
054447
054575
0545
054640
056714
054762

MACY11 30A(1052)

02-MAY-78

END OF PASS ROUTINE
HED67
HEDZ0
HED71
HED72
HED73
HED74
HED75
HED76

H13

10:03

PAGE 163

SEQ 0163

MASSBUS RH70 AND RH11 _DIAGNOSTIC

CZRHBD.P11

1 13

MACY11 30A(1052)

02-MAY-78 10:01

02-MAY-78

SCOPE HANDLER ROUTINE

10:03

PAGE 164

SEQ 0164

gggg

.SBTTL

8610

8611
8612
8613

$*THIS ROUTINE CONTROLS THE LOOPING OF SUBTESTS. IT WILL INCREMENT
;*AND LOAD THE TEST NUMBER(STSTNM) INTO THE DISPLAY REG.(DISPLAY<7:0>)
;*AND LOAD THE ERROR FLAG (SERFLG) INTO DISPLAY<15:08>

8614
8615
8616

2222323222223 2238232823232 232323232323 2232232222222 233202382223228 322202202 8dR

$«THE SWITCH OPTIONS PROVIDED BY THIS ROUTINE ARE:
PxSW14=1
LOOP ON TEST
:*SW11=1
INHIBIT ITERATIONS

8617

:*SW09=1

8618

;*SW08=1

8620

8619

8621
8622

8623
8624
8625

8626
8627
8628
8629
8630
8631
8632
8633
8634
8635
8636
8637
8638

8639

8640
8641
8642
8643
8644
8645
8646
8647
8648
8649

8650
8651
8652
8653
8654
8655
8656
8657
8658
8659
8660
8661
8662
8663

SCOPE HANDLER ROUTINE

s *CALL

072602

072602
072610

032777
001111

072612

000416

072614
072620
072626
072632
072636
072640
072642
072646
072650
072650
072656
072660
072666
072670
072674
072676
072704
072706

013746
012737
005737
012637
000463
022626
012637
000423

000004
072640
177060
000004

032777
001404
127737
001462
105737
001421
123737
101015
032777

000400

106262

106254

001102

072716
072724
072726
072732
072736
072740
072746
072750
072754
072756
072762
072770
072772
073000
073006
073012
073016

013737
000443
105037
005037
000415
032777
001011
005737
001406
005237
023737
002021
012737
013737
105237
011637
011637

072714

001404

040000

106330

$SCC°E:

1$:

LOOP ON ERROR

LOOP ON TEST IN SWR<7:0>

SCOPE
BIT
BNE

;;SCOPE=10T
#BI1T14,3SWR
$OVER

;.,LOOP ON PRESENT TEST?
;. YES IF SW14=1

$XTSTR: BR

;o
IF RUNNING ON THE 'XOR'' TESTER CHANGE
;:THIS INSTRUCTION TO A “NOP'' (NOP=240)
;,;SAVE THE CONTENTS OF THE ERROR VECTOR

SERRVEC,-(SP)
#5% ,a#ERRVEC
;.SET FOR TIMEOUT
a#177060
;. TIME OUT ON XOR?
(SP)+ ,a#ERRVEC
;;RESTORE THE ERROR VECTOR
$SVLAD
:;G0 TO THE NEXT TEST
(SP)+,(SP)+
;:CLEAR THE STACK AFTER A TIME OUT
(SP)+ ,a#ERRVEC
;;RESTORE THE ERROR VECTOR
7%
..LOOP ON THE PRESENT TEST
CODE FOR THE XOR TESTERANANA
#BIT08,aSwR
..LOOP ON SPEC. TEST?
2%
;BR IF NO

LARRBSTART OF CODE FOR THE XOR TESTERA#AAN

001115

001103

001000

106224

MOV
MoV
TST
MOV
BR
5%:
CMP
MOV
BR
6% : ;#ARAREND OF
BIT
8EQ
cMP8B
8EQ
2%:
1STB
BEQ
CMPB
BH!
BIT

001110

001106

7%:

000004

001103

001212

004000

106172

001100

001104
001212
000001
073050
001102
001106
001110

001104

001104
001212

BEQ

MOV
BR
6%:
CLRB
CLR
BR
3%:
BIT
BNE
TST
BEQ
INC
(MP
BGE
1$:
MoV
MOV
$SVLAD: INCB
MoV
MOV

aSWR,$TSTANM

$OVER
$ERFLG
3$
SERMAX ,SERFLG
3%
#B1T09,aSwR
4%
SLPERR,SLPADR
$OVER
$ERFLG

$TIMES
1%
#81T11,aSWR
1$
$PASS
18
$SICNT
$TIMES,SICNT
$OVER
#1,81CNT
SMXCNT,STIMES
$TSTNM
(SP) ,$LPADR
(SP) ,$LPERR

::ON THE RIGHT TEST?

SWR<7:0>

;:BR IF YES
;;HAS AN ERROR OCCURRED?
::BR IF NO
;;MAX. ERRORS FOR THIS TEST OCCURRED?
;:BR IF NO
::LOOP ON ERROR?
;BR_IF NO
::SET LOOP ADDRESS TO LAST SCOPE
;. ZERO THE ERROR FLAG

;;CLEAR THE NUMBER OF ITERATIONS TO MAKE
;;ESCAPE TO THE NEXT TEST
::INHIBIT ITERATIONS?
sBR IF YES
..IF FIRST PASS OF PROGRAM
INHIBIT ITERATIONS
: *INCREMENT ITERATION COUNT
;;CHECK THE NUMBER OF ITERATIONS MADE
;;BR IF MORE ITERATION REQUIRED
s;REINITIALIZE THE ITERATION COUNTER
;.SET NUMBER OF ITERATIONS TO DO
;. COUNT TEST NUMBERS
;. SAVE SCOPE LOOP ADDRESS
;. SAVE ERROR LOOP ADDRESS

MASSBUS RH70 AND RH11 _DIAGNOSTIC

CZRHBD.P11
8664
8665
8666
8667
8668
8669
gg;?

MACY11 30A(1052)

02-MAY-78 10:01

073022
073026
073034
073042
073046
073050

005037
112737
013777
013716
000002
000100

001214
000001
001102
001106

001115
106100

073052
073060
073066
073070
073072
073074
073076
073100
073102
073106
073112

012737
012737
010046
010146
010246
010346
010446
010546
017746
010637
012737

ggg?

073122

000776

.SBTTL

073120

000000

073212
000340

0000246
000026

106032
073216
073124

000024

$ESCAPE
#1,SERNAX
$TSTNM,aDISPLAY
$LPADR, (SP)

PAGE 165

SEQ 0165

;. CLEAR THE ESCAPE FROM ERROR ADDRESS
;;ONLY ALLOW ONE(1) ERROR ON NEXT TEST
;;DISPLAY TEST NUMBER
;;FUDGE RETURN ADDRESS
:.FIXES PS
. .MAX. NUMBER OF ITERATIONS

POWER DOWN AND UP ROUTINES

.POWER DOWN ROUTINE
$PWRDN: MOV
#SILLUP,a#PWRVEC ;,;SET FOR FAST UP
MOV
#340,a#PWRVEC+2 ;;PRIO:7
MOV
RO,-(SP)
;;PUSH RO ON STACK
MOV
R1,-(SP)
;;PUSH R1 ON STACK
MOV
R2,-(SP)
;;PUSH R2 ON STACK
MOV
R3,-(SP)
;;PUSH R3 ON STACK
MOV
R4 ,-(SP)
;;PUSH R4 ON STACK
MoV
R5,-(SP)
;PUSH RS ON STACK
MoV
aSWR,~(SP)
;;PUSH aSWR ON STACK
MOV
SP,$SAVR6
;;SAVE SP
MoV
A#SPWRUP ,a#PWRVEC ;.SET UP VECTOR
HALT

%88

: ;HANG UP

. (2223232322223 2232228223202 223f8 2228322800020 022 2

8690
8691
8692
8693
8694
8695

073124
073132
073136
073142
073146
073150

012737
013706
005037
005237
001375
012677

8697
8698
8699
8700
8701
8702
8703
8704
8705
8706
8707
8708
8709
8710
8711
8712

073156
073160
073162
073164
073166
073170
073176
073204
073206
073210
073212
073214
073216
073220
073226

012604
012603
012602
012601
012600
012737
012737
104401
073220
000002
000000
000776
000000
005015
000122

8696

CLR
Movs
$OVER:
MOV
MOV
RTI
$MXCNT: 100

10:03

.'.'Qt.*tfi**tt.*tit*fi'ttfitittt*it*ttttQttt***ifitfitit*ttitttttttfittt

8673
8674
8675
8676
8677
8678
8679
8680
868"
8682
8683
8684

8689

02-MAY-78

SCOPE HANDLER ROUTINE

8672

8685

J 13

073154

012605

073212
073216
073216
073216

000024

105764

073052
000340

. POWER UP ROUTINE

$PWRUP: MOV
MOV
CLR
18:
INC
BNE
MOV

MoV

000024
000026
$PWRMG:

$ILLUP:
047520

042527

020020200200t nRd]

$SAVR6:
$POWER:

MOV
MOV
MOV
MoV
MoV
MOV
MOV
TYPE
.WORD
RTI
HALT
BR
0
.ASCIZ
.EVEN

#SILLUP,Q#PWRVEC ;,SET FOR FAST DOWN
$SAVR6, SP
;:GET SP
$SAVR6
;;WAIT LOOP FOR THE TTY
$SAVR6
J.WAIT FOR THE INC
1%
;. 0F
WORD
(SP) +,3SWR
;;POP STACK INTO aSWwR

(SP)+,R5

;;POP STACK INTO R5

.=2

;. THE POWER UP SEQUENCE WAS STARTED
;. BEFORE THE POWER DOWN WAS COMPLETE
;;PUT THE SP HERE

(SP) + R4
;;POP STACK INTO R4
(SP)+,R3
;;POP STACK INTO R3
(SP)+,R2
:;POP STACK INTO R2
(SP) +,R1
;;POP STACK INTO R1
(SP)+,R0O
;;POP STACK INTO RO
#SPWRDN ,a#PWRVEC ;. SET UP THE POWER DOWN VECTOR
#340,a#PWRVEC+2 ;. PRIO:?7
JREPORT THE POWER FAILURE
$POWER
;;POWER FAIL MESSAGE POINTER

<15><12>'POWER"’

MACY11

MASSBUS RH70 AND RH11 DIAGNOSTIC
CZRHBD P
02-MAY-78 10:01

TYPE ROUTINE

8713

.SBTTL

8714
8715
8716
8717
8718
8719
8720
8721
8722

8730
8731
8732
8733
8734

8735
8736
8737
8738
8739
8740
8741
8742
8743
8744
8745
8746
8747
8748
8749
8750
8751
8752
8753
8754
8755
8756
8757
8758
8759
8760
8761
8762
8763
8764
8765
8766
8767
8768

TYPE

PAGE 166

SEQ 0166

ROUTINE

2223233222333 3223382322232 22 3323222222222
2232200d200t 02022323

*ROUTINE TO TYPE ASCIZ MESSAGE. MESSAGE MUST TERMINATE WITH A O BYTE.
;*THE ROUTINE WILL INSERT A NUMBER OF NULL CHARACTERS AFTER A LINE FEED.
SNULL CONTAINS THE CHARACTER TO BE USED AS THE FILLER CHARACTER.
'NOTE1
$FILLS CONTAINS THE NUMBER OF FILLER CHARACTERS REQUIRED.
$FILLC CONTAINS THE CHARACTER TO FILL AFTER.

;*NOTE?:
;*NOTE3:
- %

;*CALL:
*1) USING A TRAP INSTRUCTION
TYPE
.MESADR
.*OR
I®
TYPE

8723
8724
8725

8726
8727
8728
8729

K13
02-MAY-78
10:03

30A(1052)

;:MESADR IS FIRST ADDRESS OF AN ASCIZ STRING

ME SADR

- N

073230
073234
073236
073240
073242
073244
073250
073252
073254
073256
073260
073264
073266
073272
073274
073300
073302
073304
073306
073310
073314
073316
073322
073326
073330

105737
100002
000000

073334
073340
073342
073346
073352

105366
002770

000407
010046
017600
112046

001005
005726
012600
062716
000002

001157

1%:

000002

2%:
60%:

3%:

000002

122716

000011

122716
001006

000200

001430

$TYPE

005726

001350
013746

004737
105337
000770

MOV

MOVB
BNE
TST
MOV

ADD

RTI

CMPB
BEQ
(MPB
BNE
TST
TYPE

104401

001223
105037

TST8B

BPL
HALT
BR
Mov

073444
5%:
6%:

073400
001156
001154

$CRLF
CLRB
BR
JSR
CMPB
BNE
MOV

000001

7%:

073400
073444

DECB
BLT
JSR
DECB
BR

$TPFLG

;1S THERE A TERMINAL?

3s
RO,-(SP)
a2 (SP) RO
(RO)+,-(SP)
43
(SP)+
(SP)+,R0

. s LEAVE
::SAVE RO
::GET ADDRESS OF ASCIZ STRING
::PUSH CHARACTER TO BE TYPED ONTO STACK
::BR IF IT ISN'T THE TERMINATOR
;:IF TERMINATOR POP IT OFF THE STACK
::RESTORE RO

#2,(SP)

ggT.(SP)

;:BR IF YES
:3HALT HERE

NO TERMINAL

;;ADJUST RETURN PC

;JRETURN

::BRANCH [F

<HT>

ggRLF.(SP)

:;BRANCH IF NOT <CRLF>

(SP)+

;:POP

$CHARCNT
2%
PC.$TYPEC

;;CLEAR CHARACTER COUNT
J:GET NEXT CHARACTER
::;G0 TYPE THIS CHARACTER

2%
$NULL ,-(SP)

;:IF NO GO GET NEXT CHAR.
J:GET # OF FILLER CHARS. NEEDED

1(SP)

;;DOES A NULL NEED TO BE TYPED?

S$FILLC,(SP)+

PC.STYPEC

$CHARCNT
7%

<CR><LF> EQUIV

;:TYPE A CR AND LF

;IS IT TIME FOR FILLER CHARS.?

;;AND THE NULL CHAR.

::BR IF NO--GO POP THE NULL OFF OF STACK
::G0 TYPE A NULL

::DO NOT COUNT AS A COUNT

. :LOOP

:HORIZONTAL TAB PROCESSOR
073354
073360
073364
073372

073374

112716

004737
132737
001372
005726

000040
073400
000007

8%:

073444

9% :

MovB

JSR
BITB
BNE
TST

#' ,L(SP)
PC.$TYPEC
#7,$CHARCNT
9%

(SP)+

;;REPLACE TAB WITH SPACE
;:TYPE A SPACE
:;BRANCH [F NOT AT
;:TAB STOP

:;POP SPACE OFF

STACK

8769
8770
8771
8772
8773
8774
8775
8776
8777
8778
8779
8780
8781
8782

073376
073400
073404
073406
073414
073422
073424
073430
073432
073440
073442
073444
073446

000724
105777
100375
116677
122766
001003
105037
000406
122766
001402
105227
000000
000207

TYPE ROUTINE

$TYPEC:

105544

000002
000015

105536
000002

073444
000012

L 13
02-MAY-78 10:03

MACY11 30A(1052)

MASSBUS RH70 AND RH11_DIAGNOSTIC
CZRHBD.P11
02-MAY-78 10:01

000002

1$:

B8R

TSTB

BPL
movB
CMPSB

BNE
CLRB
BR

(MPB
BEQ

INCB
T
: .WORD
$CHARCN
$TYPEX: RTS

PAGE 167

2%
a$TPS

2;GET NEXT CHARACTER
J;WAIT UNTIL PRINTER IS READY

2(SP) ,a$TPB

::LOAD CHAR TO BE TYPED INTO DATA REG.
::1S CHARACTER A CARRIAGE RETURN?

$TYPEC

#CR,2(SP)
19
$CHARCNT
$TYPEX
ALF ,2(SP)
$TYPEX
(PC)+

s JBRANCH IF NO

::EE?;-CLEAR CHARACTER COUNT
s EX

::1S CHARACTER A LINE FEED?
;;BRANCH IF YES
:;COUNT THE CHARACTER
;; CHARACTER COUNT STORAGE

SEQ 0167

‘

MASSBUS RH70 AND RH11 DIAGNQSTIC

CZRHBD .P11

M13

MACY11 30A(1052)

02-MAY-78 10:01

O02-MAY-78

10:03

BINARY TO OCTAL (ASCII) AND TYPE

g;gz

.SBTTL

8785

8786

PAGE 168

BINARY TO OCTAL (ASCII) AND TYPE

2223222222223 23223332232X2X22233223232323232832322234232323234323223223228323232]

*THIS ROUTINE IS USED TO CHANGE A 16-BIT BINARY NUMBER TO A 6-DIGIT

8787

g;gg

*OCTAL (ASCII) NUMBER AND TYPE IT.
-%TYPOS-~-ENTER HERE TO SETUP SUPPRESS ZEROS AND NUMBER OF DIGITS TO TYPE

8790

:~CALL

8791
8792
8793
8794

D%
o%
oTM
1)

279?;2

MOV

TYPOS
.BYTE
.BYTE

NUM, - (SP)
N
M

::NUMBER TO BE TYPED

;sCALL FOR TYPEOUT
;oN=1 TO 6 FOR NUMBER OF DIGITS TO TYPE
::M=1 0R 0
::21=TYPE LEADING ZEROS

. :0=SUPPRESS LEADING ZEROS

. %

8797
8798
8799

;*$TYPON--=--ENTER HERE TO TYPE OUT WITH THE SAME PARAMETERS AS THE LAST
;+«$TYPOS OR $TYPOC
;«CALL:

8800

* %

Mov

TYPON

NUM, - (SP)

;JNUMBER TO BE TYPED

;:CALL FOR TYPEOUT

8803

;*$TYPOC---ENTER HERE FOR TYPEOUT OF A 16 BIT NUMBER

8805

8804

;*CALL:

g%g

8808
8809
8810
8811
8812
8813
8814
8815
8816
8817
8818

073450
073454
073462
073466
073472
073474
073502
073510
073516
073520
073522

017646
116637
112637
062716
000406
112737
112737
112737
010346
010446
010546

8820

073530

005404

8819

073524

073675
000006
073674
073673
000012

073532
073536
073542
073546
073552
073554

062704
110437
113704
016605
005003
006105

8828
8829
8830
8831
8832
8833
8834
8835
8836
8837
8838

073560
073562
073564
073566
073570
073572
073576
073600
073604
073606
073610

006105
006105
006105
010503
006103
105337
100016
042703
001002
005704
001403

073556

000001
000006
000005

113704

8821
8822
8823
8824
8825
8826

8827

000000
000001
073675
000002

073673

073673
073675
073672

MOVB
NEG

)

2%:

073674
177770

TYPOC

$TYPOS: MOV
MOVB
MOVB
ADD
BR
$TYPOC: MOVB
MOVB
$TYPON: MOVB
MOV
MOV
MOV

1%:

000404

MOV

3$:

NUM,-(SP)

; JNUMBER TO BE TYPED

a(SP) ,-(SP)
1(SP) ,$0FILL
(SP)+,SOMODE+1
#2,(SP)
$STYPON
#1,80FILL
#6, SOMODE +1
#5,80CNT
R3,-(SP)
R4 ,~(SP)
RS.-(SP)

J:PICKUP THE MODE
;:LOAD ZERO FILL SWITCH
;:NUMBER OF DIGITS TO TYPE
::ADJUST RETURN ADDRESS

$SOMODE +1 ,R4

;2CALL FOR TYPEOUT

;;SET THE ZERO FILL SWITCH
::SET FOR SIX(6) DIGITS
::SET THE ITERATION COUNT
::SAVE R3
::SAVE R4
;:SAVE RS

2:GET THE NUMBER OF DIGITS TO TYPE

ADD
MOv8
MOVB
MOV
CLR
ROL

#6 R4
R4 , SOMODE
$OFILL R4
12(SP) ,RS
R3
RS

;:SUBTRACT IT FOR MAX. ALLOWED
::SAVE IT FOR USE
;:GET THE ZERO FILL SWITCH
;;PICKUP THE INPUT NUMBER
:;CLEAR THE OUTPUT WORD
::ROTATE MSB INTO ''C**

ROL
ROL
ROL
MOV
ROL
DE(CB
BPL
BIC
BNE
TST
BEQ

RS
RS
RS
R5,R3
R3
$SOMODE
7%
#177770,R3
43
R4
5%

;:FORM THIS DIGIT

B8R

::GO DO MSB

;:GET LSB OF THIS DIGIT
;:TYPE THIS DIGIT?
;;BR IF NO
::GET RID OF JUNK
::TEST FOR O
;;SUPPRESS THIS 0?
::BR IF YES

SEQ 0168

N13
MACY11 30A(1052)
02-MAY-78 10:03
BINARY TO OCTAL (ASCII) AND TYPE

MASSBUS RH70 AND RH11 DIAGNOSTIC
CZRHBD.P11
02-MAY-78 10:01

073612
073614
073620
073624
073630
073634
07364N
07364¢
073644
073646
073650
073652
073654
073656
073664
073666
073670
073671
073672
073673
073674

005204

052703
052703

110337
104401
105337

003347
002402
005204
000764
012605
012604
012603
016666
012616
000002
000
000
000
000
000000

A ¥

000060
000040
073670
073670
073672

5%:
7%:

6%:
000002

000004

8%:
$OCNT:
$OFILL:
$OMODE:

PAGE 169

INC
BIS
BIS
MOVB

R4
#'0,R3
#' ,R3
R3,8%

::DON'T SUPPRESS ANYMORE 0°'S
;sMAKE THIS DIGIT ASCI!
JsMAKE ASCII IF NOT ALREADY
::SAVE FOR TYPING

DECR
8GT
8LT
INC
BR

$OCNT
29
6%
R4
2%

::COUNT BY 1
;:;BR ]F MORE 10 DO
::BR IF DONE
;o INSURE LAST DIGIT ISN'T A BLANK
;.60 DO THE LAST DIGIT

MOV

2(SP) ,4(SP)

;:SET THE STACK FOR RETURNING

.BYTE
BYTE
.BYTE

0
0
0

TYPE

MOV
MOV
MOV

MOV
RTI

.BYTE
.WORD

,8%

(SP)+,RS
(SP) +,R4
(SP)+ R3

(SP)+,(SP)

0
O

;G0 TYPE

THIS DIGIT

:;RESTORE R5
:RESTORE R4
;JRESTORE R3
: ;RETURN

;;STORAGE FOR ASCII DIGIT
;;TERMINATOR FOR TYPE ROUTINE
;;OCTAL DIGIT COUNTER
J:lERO FILL SWITCH
;:NUMBER OF DIGITS TO TYPE

SEQ 0169

MASSBUS RH70 AND RH11 DIAGNOSTIC

CZRHBD.P11

02-MAY-78 10:01

.SBTTL

8862

X2 2

8863
8864
8865
8866

gg;?

8872

073676

8877
8878

073706
073710

8883

8884

8885
8886
8887
8888
8889
8890
8891
8892
8893
8894
8895
8896
8897
8898
8899
8900
8901
8902
8903
8904
8905
8906

8907

8908
8909
8910
8911
8912

8913
8914
8915

PAGE 170

SEQ 03770

CONVERT BINARY TO DECIMAL AND TYPE ROUTINE
222222 XTIELXALIRZZX2ZSR2
22222322222 222222222020d22ZRc4R4R]

;*REPLACED WITH SPACES.
;*CALL:

8809

8882

10:03

'THIS ROUTINE IS USED TO CHANGE A 16-BIT BINARY NUMBER TO A 5-DIGIT
'SIGNED DECIMAL (ASCII) NUMBER AND TYPE IT. DEPENDING ON WHETHE:. ¢
;'NUMBER IS POSITIVE OR NEGATIVE A SPACE OR A MINUS SIGN WILL BE TYPED
;*BEFORE THE FIRST DIGIT OF THE NUMBER. LEADING ZEROS WILL ALWAYS BE

8367
8868

8879
8880
8881

02-MAY-78

CONVERT BINARY TO DECIMAL AND TYPE ROUTINE

ggg?

8873
8874
8875
8876

B 14

MACY?1 30A(1052)

073676
073700
073702
073704
073714
073720
073722

073724

073732

073734

073740
073744
073746
073752
073754
073756
073760
073762
073764
073766
073770
073772
073774
073776
074000
074006
074012
074016
074020
074022
074026
074030

074032

074034
074036
074040
074042
074050

074052
(074054
074056

$TYPDS:

010046
010146
010246
010346

010546
012746

020200

112766

000055

012703

074112

016605
100004
005405

005000
112723
005002
016001
160105
002402
005202
000774

116663
052702
052702
110223
005720
020027
002746
003002

000020

000001

000040

1%:
2%:

074102

'A ¥

5%:

000001
000060
000040

177777

6%:
7%:

000010

010502

000764
105726
100003
116663
105013

012605
012603
012602

NUM,-(SP)

::PUT THE BINARY NUMBER ON THE STA(CK

MOV
MOV
MOV
MOV

RO,-(SP)
R1,-(SP)
R2,-(SP)
R3,-(SP)

;sPUSH
;;PUSH
:;PUSH
::PUSH

MOV
BPL
NEG

20(SP) RS
1%
RS

;:GET THE INPUT NUMBER
::BR IF INPUT IS POS.
:;MAKE THE BINARY NUMBER POS.

TYPDS

MOV
MOV

060105
005702
001002
105716

100407
106316
103003

MOV

MOVB
CLR

MOV

177777

177776

9%:

#'=-,1(SP)
RO

#3$DBLK ,R3

MOVB
CLR
MOV
B
B.T
INC
BR
ADD
TST
BNE
TSTB
BMI
ASLB
BCC
MOVB
8IS
BIS
MOVB
TST
o, o
BLT
BGT

”' ,(R3)+
R2
$DTBL (RO) ,R1
R1,RS
43
R2
3%
R1.R5
R2
5%
(SP)
7%
(SP)
63
1(SP) .-1(R3)
#'0,R2
# _R2
R2,(R3)+
(RO)+
RO.A10
2%
8s

BR
7S18
BPL
MOVB
CLRB

6%
(SP)+
9%
=1(SP) ,-2(R3)
(R3)

MOV

8%:

RS5,-(SP)
#20200,~-(SP)

MOV
MOV
MOV

RS5.R2

(SP) + RS
(SP)+,R3
(SP)+,R2

;:G0 TO THE ROUTINE

RO
R1
R2
R3

ON
ON
ON
ON

STACK
STACK
STACK
STACK

::PUSH RS ON STACK
;:SET BLANK SWITCH AND SIGN

;;MAKE THE ASCII NUMBER NEG.
:2IERO THE CONSTANTS INDEX

::SETUP THE OUTPUT POINTER

;2SET THE FIRST CHARACTER TO A BLANK
;;CLEAR THE 8CD NUMBER
;2GET THE CONSTANT
;:FORM THIS BCD DIGIT
::BR IF DONE
:;INCREASE THE BCD DIGIT BY 1

:;ADD BACK THE CONSTANT
;;CHECK IF BCD DIGIT=0
;2FALL THROUGH IF O
;:STILL DOING LEADING 0°'S?

::BR IF YES
. :MSD?
;:BR IF NO
..YES--SET THE SIGN
;sMAKE THE BCD DIGIT ASCII
;;MAKE IT A SPACE IF NOT ALREADY A DIGIT
;:PUT THIS CHARACTER IN THE OUTPUT BUFFER
;2 JUST INCREMENTING
;;CHECK THE TABLE INDEX
::GO DO THE NEXT DIGIT
;G0 TO EXIT

:2GET THE LSD

::G0 CHANGE TO ASCII
:;WAS THE LSD THE FIRST NON-ZERO?
;:BR IF NO
;YES==SET THE SIGN FOR TYPING
;;SET THE TERMINATOR

::POP STACK INTO RS
;:POP STACK INTO R3
:;POP STACK INTO R2

€ 14
02-MAY-78 10:03 PAGE 171
CONVERT BINARY TO DECIMAL AND TYPE ROUTINE

MACY11

MASSBUS RH70 AND RH11_DIAGNOSTIC
CZRHBD P
02-MAY-78 10:01

8916
8917
8918
8919
8920
8921
8922
8923
8924
8925
8926

074060
074062
074064
074070
074076
074100
074102
074104
074106
074110
074112

012601
012600

104401
016666
012616
000002

023420
001750
000144
000012
000004

074112
000002

30A(1052)

(SP)+,R1
(SP)+,R0

. $DBLK

2(SP) ,4(SP)
(SP)+,(SP)

00004
:
$DTBL

$DBLK:

SEQ 0171

;;POP STACK INTO R1
:.POP STACK INTO RO

;NOW TYPE THE NUMBER
;sADJUST THE

STACK

;:RETURN TO USER

MASSBUS RH70 AND RH11 DIAGNOSTIC

CZRHBD.P11

02-MAY-78 10:01

gggg

074122

8937
8938
8939
8940
8941
8942
8943
8944
8945
896
8947
8948
8949
8950
8951
8952
8953
8954
8955
8956
8957
8958

074130
074132
074136

8961

8962
8963

8964
8965
8966
8967
8968
8969

8970
8971
8972
8973

2223322233222 23322223233 2222323322322 2323232332232322823233]

*«AND REPORTS THE APPROPRIATE INFORMATION CONCERNING THE ERROR.

8934

8960

PAGE 172

tTHIS ROUTINE USES THE °'‘ITEM CONTROL BYTE'' (SITEMB) TQ DETERMINE WHICH
:*ERROR IS TO BE REPORTED. IT THEN OBTAINS, FROM THE '‘ERROR TABLE'' ($ERRTB),

gg%%

8959

10:03

ERROR MESSAGE TYPEOUT ROUTINE

R 2223223282323
22323

8930
8931

8935
8936

02-MAY-78

ERROR MESSAGE TYPEOUT ROUTINE
.SBTTL

8929

D 14

MACY11 30A(1052)

074122
074126

074140

104401
010046

005000
153700
001004

001114

013746

001116

074144
074146
074150
074152
074154
074156
074160
074164
074170
074172
074174
074176
074202
074206
074210
074212

005300
006300
006300
006300
062700
012037
001404
104401
000000
104401
012037
001404
104401
000000

074220

011000

074224
074226

012600
104401

0742146

074222

074232
074234
074234
074236
074240
074242

074244
074250
074252

001223

$ERRTYP:

104402

1%:

013046
104402
005710
001770
104401
000771
020040
074256

MOV

$ERRPC ,-(SP)

4%:
5%:

MOV

6%:

MOV
TYPE

074174

001223
074212

001223
001223

2%:

7%:

074252
000

DEC
ASL
ASL
ASL
ADD
MOV
BEQ
TYPE
.WORD
TYPE
MOV
BEQ
TYPE
.WORD

001226

001004

000207

.$CRLF
RO,~(SP)
RO
a#SITEMB,
RO
1%

TYPOC

000426

1064401

TYPE
MOV
CLR
BISB
BNE

8%:

TYPE

BNE

RO
RO
RO
RO
#SERRTB RO
(RO)+,2%
3s
O
LSCRLF
(RO)+,4%
5%

LS$CRLF

(RO) ,RO

(SP)+,R0
L$CRLF

RTS

MOV
TYPOC
TST
BEQ
TYPE
BR
ASCIZ
.EVEN

a(RO)+,-(SP)
(RO)
6%

,8%

::''CARRIAGE RETURN'' & 'LINE FEED"'
::SAVE RO
::PICKUP THE ITEM INDEX

::1F ITEM NUMBER IS ZERO, JUST
::TYPE THE PC OF THE ERROR
::SAVE SERRPC FOR TYPEOUT
:;ERROR ADDRESS
;:GO TYPE--OCTAL ASCII(ALL DIGITS)
::GET out
:;ADJUST THE INDEX SO THAT IT WILL
1
WORK FOR THE ERROR TABLE
::FORM TABLE POINTER

::PICKUP 'ERROR MESSAGE'' POINTER

::SKIP TYPEOUT IF NO POINTER
::TYPE THE 'ERROR MESSAGE''
;" ERROR MESSAGE'' POINTER GOES HERE

::''CARRIAGE RETURN'' & 'LINE FEED"'
::PICKUP ‘DATA HEADER'' POINTER
:2SKIP TYPEOUT IF 0
::TYPE THE ‘DATA HEADER''

::'DATA HEADER'' POINTER GOES HERE

;;''CARRIAGE RETURN'' & ‘'LINE FEED"
;:PICKUP 'DATA TABLF'' POINTER
::G0 TYPE THE DATA

::RESTORE RO
::"'CARRIAGE RETURN'' & 'LINE FEED''
2 ;RETURN

::SAVE a(R0O)+ FOR TYPEOUT
::GO TYPE--OCTAL ASCIIC(ALL DIGITS)
;;15 THERE ANOTHER NUMBER?
:BR IF NO
..TYPE TWO(2) SPACES
:LOOP
SiTWO(2) SPACES

SEQ 0172

E 14
02-MAY-78
10:03
MACY11 30A(1052)
ERROR HANDLER ROUTINE

MASSBUS RH70 AND RH11 DIAGNOSTIC
CZRHBD.P11
02-MAY-78 10:01

8974
8975
8976
8977
8978
8979
8980
8981
8982
8983
8984
8985
8986
8987
89588
8989
8990
8991
8992

8993

8994
8995
8996
8997
8998
8999
9000
9001
9002

9003
9004
9005
9006
9007
9008
9009
9010
9011
9012
9013
9014

.SBTTL

PAGE 173

ERROR HANDLER ROUTINE

".'ttt'*tfiitttttt'tttittttit'tttfitittttttttttfittfi.tttlttfi.tttt'tfi'

J*THIS ROUTINE WILL INCREMENT THE ERROR FLAG AND THE ERROR COUNT,

;*SAVE THE ERROR ITEM NUMBER AND THE ADDRESS OF THE ERROR C(ALL
;s*AND GO TO TSTNMB ON ERROR
;*THE SWITCH OPTIONS PROVIDED BY THIS ROUTINE ARE:

;*SW15=1
;«SW13=1
:*SW10=1
;*SW09=1
;=CALL
*

074256
074256
074262
074264
074272
074300
074302
074306
074312
074316
074324
074332
074340
074342
074346
074352
074352
074356
074360
074362
074370
074372
074376
074402
074404
074410
074410

105237
001775

013777
032777

001402
104401
005237
011637
162737
117737
032777
001004
004737
104401

001102
002000
001216
001112
001116
000002
104566
020000

104552

032777
001402
013716
005737
001402
013716

001000

000002

104650
104640

001110
001214

001214

ERROR

INCB
BEQ

$ERFLG
JJSET THE ERROR FLAG
7%
;:DON'T LET THE FLAG GO TO ZERO
$TSTNM,aDISPLAY ;:DISPLAY TEST NUMBER AND ERROR FLAG

BIT

001116
001114

104600

BEQ
TYPE
INC
MOV
Su8
mMovB8

BIT

20%:
2%:
104550

INHIBIT ERROR TYPEOUTS
BELL ON ERROR
LOOP ON ERROR

MOV

1%:

050076
001223

005777
100001
000000

$ERROR:
7%:

001103

HALT ON ERROR

3%:
A ¥

5%:

JSR
TYPE
TST
8PL
HALT

BIT
BEQ
MOV
TST

BEQ
MOV
RT!

: ;:ERROR=EMT AND N-ERROR ITEM NUMRBER

#MI1T10,aSWR

;;BELL ON ERROR?

LIBELL

:;RING BELL

SERTTL
(SP) ,$ERRP(
#2,8ERRPC

OSERRPC,.SITEMB

#B1T13,aSWR
208
PC,TSTNMB

LSCRLF

;:NO - SKIP

;COUNT THE NUMBER OF ERRORS
::GET ADDRESS OF ERROR INSTRUCTION

;.STRIP AND SAVE THE ERROR ITEM (ODE

;:SKIP TYPEOUT IF SET
::SKIP TYPEOUTS

;GO TO USER ERROR ROUTINE

aSWR
3%

;;HALT ON ERROR
;:SKIP IF CONTINUE

#81709,aSWR

;:;LO0OP ON ERROR SWITCH SET?

43
$LPERR, (SP)

$ESCAPE
5%

SESCAPE.(SP)

;;HALT ON ERROR!

;:BR IF NO
;;FUDGE RETURN FOR LOOPING

;;CHECK FOR AN ESCAPE ADDRESS
::BR 1F NONE

-:FUDGE RETURN ADDRESS FOR ESCAPE
; sRETURN

SEQ 0173

MACY11 30A(1052)

MASSBUS RH70 AND RH11 DIAGNOSTIC

CZRHBD.P11

TTY

02-may-78 10:01

INPUT ROUTINE

SBTTL

9015
9016

9017
9018
9019

02-MAY-78

10:03

PAGE 174

SEQ 0174

TTY INPUT ROUTINE

::ttttfittttitt*t*ttttiQttttQttttttittitQt.t'tfii'."..'...'....'..

.ENABL

LS8

9020
9021
9022

.DSABL

LSB

9024

*THIS ROUTINE WILL INPUT A SINGLE CHARACTER FROM THE TTY

9026

9023

2222222232333 32 2232223222322

9025

;*CALL:

9027

9028
9029
9030
9031
9032
9033
9034
9035

I
*

074412
074414
074422
074426
074430
074436
074444
074452
074454
074460
074462
074466
074472
074476
074500
074502
074510
074512
074520
074522
074530

011646
016666
105777
100375
117766

042766
026627
001013

105777
100375
117746

000004

104516

104512
177600
000004

000002

$RDCHR: MOV
MOV
1%:

2%:

TSTB

TST18

a$TKS

BPL

BIC
(MP

000021

BNE

000004

000140

000004

000175

000040

000004

3%:

B8R

(MP
BLT

CMP

4%:

a%TKS

1%
4 (SP)
a$TKB,

MovB

104460
177600

(SP) ,~(SP)
4(SP) ,2(SP)

BPL
Movs

BIC
cTMMP
BNE

BGT
BIC
RTI

A C<177>,4(SP)
4(SP) 423
33
2’3

a$TKB,-(SP)

#~C177,(SP)
(SP)+, 421
2%

L(SP) #4140
49

4(SP) 2175
A3
#40,4(SP)

;*THIS ROUTINE WILL

i
P

074544
074546
074550
074552
074556
074560
074564
074566
074572

;;PUSH DOWN THE PC
::SAVE THE PS
sJWAIT FOR
;:A CHARACTER
;:READ THE TTY
;:GET RID OF JUNK IF ANY
:3IS IT A CONTROL-S?
;JBRANCH IF NO
;:WAIT FOR A CHARACTER

:;LO0P UNTIL ITS THERE
::GET CHARACTER
;;MAKE IT 7-BIT ASCII
;1S 1T A CONTROL-Q?
;3IF NOT DISCARD IT
;;YES, RESUME
1S 1T UPPER CASE?
;JBRANCH IF YES
;:1S IT A SPECIAL CHAR?
;;BRANCH IF YES
;sMAKE IT UPPER CASE
;G0 BACK TO USER

INPUT A STRING FROM THE

RDLIN
RETURN HERE

074540

2dd0RRidddRdRddn]

;:ttttttt.tttttt"t.t!tt'tfii'fi*tfiit*tit*fifit'i'fi!tflfitttfitl'iit'ttt

;*CALL:

074532
074534

8822222022228

;. INPUT A SINGLE CHARACTER FROM THE TTY
;. CHARACTER IS ON THE STA(K
;.WITH PARITY BIT STRIPPED OFF

RETURN HERE

000004
000004
000023

104464

RDCHR

2322222

010346
012703
022703

101405
104406
112613
122713

074640
074650

$RDLIN: MOV
1$:
MOV
2%:
MP
BLOS

RDCHR

000177

108:

001222

4%:

074636
074636

3s:

Movse

R3,-(SP)
H#STTYIN,R3
H#STTYIN+8.
,R3
43

(SP)+, (R3)

CMPB
BNE

#177,(R3)
3s

B8R

TYPE

.9%

TYPE

MOvB

. $QUES

(R3),9%

TTY

;s INPUT A STRING FROM THE TTY
;;ADDRESS OF FIRST CHARACTER WILL BE ON THE STACK
;. TERMINATOR WILL BE A BYTE OF ALL 0'S

;:SAVE R3
;:GET ADDRESS

,.BUFFER FULL?
;BR IF YES

..GO READ ONE CHARACTER FROM THE TTY
;JGET CHARACTER
IS IT A RUBOUT
J:SKIP IF NOT
JTYPE A *2°
::CLEAR THE BUFFER AND LOOP

;;ECHO THE CHARACTER

MACYi1 30A(1052)

MASSBUS RH70 AND RH11 _DIAGNOSTIC
CZRHBD .P11
02-MAY-78 10:01

9071
9072
9073

074576
074602
074604
074610
074614
074616
074620
074626
074634
0746636
074637
074640
074650
074655
074662
074670
074673
074700

122723
001356
105063
104401

012603

011646
016666
012766
000002
000
000
000010
052536
136
005015
020075
040
036440

TTY

INPUT ROUTINE

000015

CMP8
BNE
CLRB

177777
001224

000004
074640

TYPE
MOV
MOV

000002
000004

MOV

:
9%

005015

006507
053523
000
047040
000040

G 1 'A
10: 03
02-MAY-78

#15,(R3)+
23
-1(R3)
.SLF
(SP)+,R3
(SP) ,~(SP)
4(SP) ,2(SP)

MOV

HETTYIN,4L(SP)

0
0
8.

RTI

000
000012
020122

S$TTYIN:
$CNTLU:
$CNTLG:
SMSWR:

.BYTE
.BYTE
.BLKB
.ASCIZ
LASCIZ
.ASCIZ

053505

SMNEW:

.ASCIZ

/2U/<15><12>
/2G/<15><12>
<15><12>/SWR =
NEW =

PAGE 175

SEQ 0175

;3CHECK FOR RETURN

::LO0OP IF NOT RETURN
;:CLEAR RETURN (THE 15)
;:TYPE A LINE FEED

;;RESTORE R3
..ADJUST THE STACK AND PUT ADDRESS OF THE

: JRETURN

FIRST ASCI]

CHARACTER ON

2 :;STORAGE FOR ASCI] CHAR. TO TYPE
;s TERMINATOR
::RESERVE 8 BYTES FOR TTY INPUT
::CONTROL 'V
::CONTROL ''G"*

H 14

MACY11 30A(1052)

MASSBUS RH70 AND RH11 DIAGNOSTIC
CZRHBD.P11
02-MAY-78 10:01

02-MAY-78

10:03

READ AN OCTAL NUMBER FROM THE TTY

.SBTTL

3089

9090

PAGE 176

SEQ 0176

READ AN OCTAL NUMBER FROM THE TTY

2233322233222

232322322323223 3022232022322

2222220R2RR

220

dRRRRldd)

**«THIS ROUTINE WILL READ AN OCTAL (ASCII) NUMBER FROM THE TTY AND
*~CHANGE IT TO BINARY.
;*CALL:
®

]

[

RDOCT
RETURN HERE

074704
074706
074714
074716
074720
074722
074724
074726
074730
074732
074734
074736
074740
074742
074744
074746
074750
074752
074756
074760
074762
074764
074770
074774
074776
075000
075002
075004

011646
016666
010046

000004

010146
010246

000002

: MOV
$RDOCT

MoV
MOV
MOV

104407

1%:

112046

2%:

012600
005001
005002

001412
006301
006102
006301
006102
006301
006102
0462716
062€01
000764
005726
010166
010237
012602
012601
012600
000002
000000

MOV

RDLIN

MOV
CLR
CLR
MOVB
BEQ
ASL

ROL
ASL
ROL
ASL
ROL

BIC

177770

000012
075004

ADD

3%:

$HIOCT:

(SP) ,=(SP)
4 (SP) ,2(SP)
RO,-(SP)
R1,-(SP)

R2,~(SP)

(SP)+,RO
R1
R2
(RO)+,~(SP)
3$

R2
R1
R2
R1
R2

#~C7,(SP)
(SP)+ ,R1

B8R

MOV
MOV
MOV

R1,12(SP)
R2,$HIOCT
(SP)+,R2

TST

MOV
MOV
RTI

.WORD

(SP)
+

(SP)+,R1
(SP)+,RO

;cREAD AN OCTAL NUMBER
;.LOW ORDER BITS ARE ON TOP OF THE STA(K
:;HIGH ORDER BITS ARE IN S$HIOCT
;:PROVIDE SPACE FOR THE
2 INPUT NUMBER
;;PUSH RO ON STACK
;:PUSH R1 ON STA(CK
::PUSH R2 ON STACK
:;READ AN ASCIZ LINE
::GET ADDRESS OF 1ST CHARACTER
;3CLEAR DATA WORD
;.PICKUP THIS CHARA(CTER
::1F ZERO GET OUuT
. %

;:*8
J:STRIP THE ASCII JUNK
;;ADD IN THIS DIGIT

. ;LOOP

::CLEAN TERMINATOR FROM STACK
:3SAVE THE RESULT
:;POP STACK INTO R2
;;POP STACK INTO R1
:;POP STACK

; JRETURN

INTO RO

:;HIGH ORDER BITS GO HERE

9127
9128
9129
9130
9NN
9132
9133
9134
9135
9136
9137
9138
9139
9140
9141
9142
9143
9144
9145
9146
9147
9148
9149
9150
9151
9152
9153
9154
9155
9156

9157

9158
9159
9160
9161
9162

9163

9164

9165
9166
9167
9168

RD
02-MAY-78 10:03

MACY11 30A(1052)

MASSBUS RH70 AND RH11 DIAGNOSTIC
CZRHBD.P11
02-MAY-78 10:01

TRAP DECODER

.SBTTL

PAGE 177

SEQ 0177

TRAP DECODER

.'.'ttfi"tttfit.tit'tt't*tttfiit*.ttttttttfittiti*ttttfittltt'fifitttttt'

;*THIS ROUTINE WILL PICKUP THE LOWER BYTE OF THE '‘TRAP'' INSTRUCTION

J*AND USE IT TO INDEX THROUGH THE TRAP TABLE FOR THE STARTING ADDRESS
;*0F THE DESIRED ROUTINE. THEN USING THE ADDRESS OBTAINED IT WILL
;*G0 TO THAT ROUTINE.
075006
075010
075014
075016
075020
075022
075026

010046
016600
005740
111000
006300
016000
000200

$TRAP:

000002

MOV
MOV
TST
MOvVB
ASL
MOV
RTS

075042

RO,~(SP)
2(SP) ,RO
-(R0O)
(RO) ,RO

RO
$TRPAD (RO) ,RO
RO

;. SAVE RO
;:GET TRAP ADDRESS
;;BACKUP BY 2
:;GET RIGHT BYTE OF

TRAP
;;POSITION FOR INDEXING
;;INDEX TO TABLE
2:G0 TO ROUTINE

;:THIS 1S USE TO HANDLE THE ''GETPRI'' MACRO
075030
075032
075040

011646
016666
000002

000004

000002

$TRAP2: MOV
MOV
RT1

.SBTTL

(SP) ,-(SP)
4(SP) ,2(SP)

;:MOVE THE PC DOWN
2 ;MOVE THE PSW DOWN
;;RESTORE

THE PSW

TRAP TABLE

;*THIS TABLE CONTAINS THE STARTING ADDRESSES OF

;*BY THE '‘TRAP'' INSTRUCTION.

075042

075044
075046
075050
075052
075054

075056
075060
075062

075030

073230
073474
073450
073510

;

ROUT INE

$TRPAD:

.WORD
$TYPE
$TYPOC

$TYPOS
$TYPON
$TYPDS

073676

0764412
074532
074704
000001

.END

$TRAP?
;. CALL=TYPE
;. CALL=TYPOC

;. CALL=TYPOS
;. CALL=TYPON
;. CALL=TYPDS

SRDCHR ; ; CALL=RDCHR
$RDLIN
;;CALL=RDLIN
$RDOCT
;. CALL=RDOCT

TRAP+1(104401)
TRAP+2(104402)

TRAP+3(104403)
TRAP+4(104404)
TRAP+5(104405)

THE ROUTINES CALLED

TTY TYPEOUT ROUTINE
TYPE OCTAL NUMBER (WITH LEADING ZEROS)

TYPE OCTAL NUMBER (NO LEADING ZEROS)
TYPE OCTAL NUMBER (AS PER LAST CALL)
TYPE DECIMAL NUMBER (WITH SIGN)

TRAP+6(1064406)
TTY TYPEIN CHARACTER ROUTINE
TRAP+7(104407)
TTY TYPEIN STRING ROUTINE
TRAP+10(104410) READ AN OCTAL NUMBER FROM TTY

J 14
MACY11 30A(1052)
02-MAY-78 10:03 PAGE 179
CROSS REFERENCE TABLE -- USER SYMBOLS

MASSBUS RH70 AND RH11 DIAGNOSTIC
CZRHBD.P11
02-MAY-78 10:01

= 052525
AB
ABLE
013434
ADDERR 006336
003320
ADD1

ADD?2

003322

ADD4
AD1ERR
AD2ERR
AD3ERR
AD4LERR
AHEAD

003326
005066
005166
005206
005226
046044

ADD3

003324

ALRIGT 012240
APE
= 100000
AROUND
AS
ATA
=
ATO
=
AT1
=
AT2
=
AT3
=
AT4
=
ATS
=
AT6
AT7
=
A16
=
A17

004546
003412
100000
000001
000002
000004
000010
000020
000040
000100
000200
000400

- 001000

003414

16704
2739
2008
16054

16104

16114

1612#
1854
1877
1880
1883
6524

2575
15274

1820
16514
15564
15864
1587#
1588#
1585#
15904
15914
15924
15934
15404
6745

1541#

16524
2662+
3327«

4352«

BAE

003416

5025+
5891«
8509
16534
2506+
2695«
3086+«
3836«

4250
4620*
4941

BAETST
BA!l
=
BAKER
BATST
BATSTA
BEAU
BEFORE

012272
000010
021420
012504
012674
033€00
004122

BEGIN
BEGIN1

004144
004176

5330«
5756%
6241~
25924
15014
3614

26334
2656
5101
17544
3453«
467
465

2518
2764
2014

1876
1878
1881
1884
18764
18884
18924
18964

2659
2746
2018

2791
27484
20214

3165

5436

5718

3253

3358

3555

3660

SEQ 0178

6000

6282

1879
1882
1885

65274
25774
2089

Imm

2389+
2113

8486
6409

2967

3025

3061

3076

3218

3413

3520

3625

3728

3829

3930

3000
2191«

3061
2240+
2668+

3076
2280+
2685+

3218
2327+
2688

4617«

4164
4829+
5609+
8450

3829
2634
2985+
4194
4882+
5674+
8492

3930
2637
3080«

4564
5251«
6173+

4095+
4776+
5533«
8472

3728
2600~
«
2901

4511
5192

3520
2527~
2807
4030*
4723%
5468
6396«

3625
2551+
2846+

4458«
5127+
6032+

3323
2465+
2692+
3833«

6745
2640%
3222+
4299+

2197+
2533«
2754
3228«
3937«
4305«
4673«

2243«
2554
2757
3330+
3940+

2246+
2557«
2810+
3333«
4033+
4358+

2283+
2593«
2813=
3420«
4036+

2330+
2603+
2852+
3527

2333«
2606+
2904*
3530«

2646*
2988«
3635
4197+
4517+
4885+
5198«
5677+
6103«
8500

3361+
3970~

18294

3417

4405+«

5087+
5956+

2194«
2530
2698+
3225+

3839«
4302«
4623~
4993«
5333«
5818«
6244
2617
4336
3619

2658
26594
51044
2084
3558«

17664
17764

3524+

4996+

5395+
5821~
6317«

3629+

6097

4355«
4676
5028+
5398«
5894+
6320+

3732+

4726+

5031«
5471«
5897«
6399+

4389

3621

6750
36234

6765

2093
3560+

2100
3663«

2108
3665«

5327+
6238+

4408+
4729
5090«
5474%
5959«
6402*

4101~
4461+
4782+

4147+
4464+
4832+

5133«
5612«
6038«
8490

2387+«
2643«
2907«
3632«
4150«
4514+
4835+
5195+
5615+
6100+
8492

3116~
3867

3256«
3869+

3258«
3968+

5130~
5539+
6035+
8486

3174+
3768+

2468+

4244
4935x

5750+%
8494

4990+
5815+
8500

2471+
2671
2991«
3735+

2503+
2674+
3083+
3738+

4200+
4567+
4888+

52564+
5680
6176«
8509

3363+
4053«

4247%
4570+
4938+
5257+
5753
6179+

3451«

4055+

MACY11 30A(1052)

MASSBUS RH70 AND RH11_DIAGNOSTIC
CZRHBD.P11
02-MAY-78 10:01

BEGIN2
BEGIN3
BEHIND
BITCNT

004166
004152
046020
003446

17734
469
65224
17224
2742
2895+
3180«
3318«
3816«
4084+
4235«
4399+
4603+
4765«
4926*
5081+

BITO
BITO0
BITO1
BITOZ2
BITO3
BITO04
BITO5
BITO6
BIT07
BITO8
BIT09
BIT1
BIT10
BIT11
BIT12
BIT13
BIT14
BIT15

=
=
=
=
=
=
=
=
=
=
=
=
=
=
=
=
=
=

BIT2 =
BIT3 =
BIT4 =
BITS =
BIT6 =
BIT7 =
BIT8 =
BIT9 =
BLIP
BLITZ
BLKTST
=
BLO
=
BL1
BLZ

000001
000001
000002
000004
000010
000020
000040
000100
000200
000400
001000
000002
002000
004000
010000
020000
040000
100000

000004
000010
000020
000040
000100
000200
000400
001000
044540
044450
050326
000040
000100
000200

5242+
5445+
5588
5739«
5885«
6086+
6232+«
6613
4404
4304
L2
4284
W27n
L4264
L254
424N
L23H
422N
424
4394
420N
4194
4184
4“7
4164
4154
4384
4374
4364
4354
4340
4334
4320
4314

6368
63594
6365
16034
16044
16054

K 14
02-MAY-78 10:03

PAGE 180

SEQ 0179

CROSS REFERENCE TABLE -- USER SYMBOLS

6586

17694

6526
2313«
2745
=
2971
3181«
3507«
3819+
4086+
4238
4444
4606+
4767
{929+
5105%
5245«
5446%
5595«
5741«
5942%
6088+
6291+
6615*
6598

2316+
2793«
2974+
3184
3510+
3821«
4089+
4285«
L4447
4608
4770%
4976«
5106+

5304~
5447
5598«
5744~
5945«
6091+
6292+
6617+

2318«
2796+
2976+
3187«
3512+*
3824«
4130~

4288+
4449
4611
4815+
4979+
5113«

5305x*
5454«
5600«
5801~
9947%
6150+
6293
6628

440
439
438
437
436

435
(34
433
432
431
6371
8992
8652

8637
8645

8999

8623

6596
6370
6440
68234

63754

9007

2321+
2798«
2979+
3189+
3515+
3917«

4133«
4290+
4452«
4656+
4818+
4981+
5116«
5306
5457+
5603+
5804*
5950«
6151+
6300«
6630+

2344
2801«
3062+
3192«
3612+
3920+

4135«
4293«
4497
4659+
4820*
4984
5118«
5313«
5459%
5660~
5806+
6009+
6152
6303«

6635

2347
2831«
3065+
3204«
3615«
3922+

4138+
4338«
4500+
4661«
4823+
5011
5121
5316
5462+
5663
5809
6010=

6159+
6305+
6639

2349
2834
3067+«
3207«
3617«
3925+

4180+
(4361
4502+
4664*
4868+
5014~
5178+
5318«
5519«

5665+

5868+
6011
6162+
6308+
6723

2352+
2836+
3070+
3209+
3620

4016~
4183n
4343«
4505«
4709+
4871«
5016+
5181+=

5321«
5522+
5668+
5869+
6018+
6164*
6377«
6726*

2357+
2839
3167+
3212«
3715«
4019+

4185+
4346%
4550
4712+
4873

5019«
5183«
5378«
5524+
5727%
5870
6021+
6167+
6380+
6728+

2360
2887+
3170«
3310+
3718+

4021+
4188+
4391«
4553«
4714~
4876+

5073+
5186«
5381+
5527+
5728«
5877«
6023+
6224+
6382+
6731+

2737«
2890«
3172+
3313«
3720+

4024«
4230%
4394«
4555«
4717%
4921«
5076+
5237+

5383«
5586+
5729
5880+
6026*
6227+
6385+

2740+
2892+
3175+
3315+«
3723«

4081+
4233~
4396«
4558«
4762+
4924+
5078«
5240+
5386+
5587+
5736«
5882+
6083+

6229+
6600+

L1 4
MACY11 30A(1052)
02-MAY-78 10:03 PAGE 181
CROSS REFERENCE TABLE =-- USER SYMBOLS

MASSBUS RH70 AND RH11 _DIAGNOSTIC
CZRHBD.P11
02-MAY-78 10:01

BMD18 = 010000
BOTTOM 045114
BPTVEC= 000014
BULL
047672
BUSH
034100
CHARLE
022164
006572
CLEER

15824
6372
47N
6725
5145
3717
20734
3149
4265

6438

64414

6730

6732

67344

3724
2264
3396
4373
5156
6063

37264
2304
3486

51504

4956

CLEVER
CLR
=
CORREG
CPE
=
=
CR
CRLF
=
s

045472
000040
046006
000010
000015
000200
003420

5922
6454
1503~
6475
15614
3554
3564
16544
2598«
3522+
4456*
5125+

(Y4

003422

6030+
16554
2759+
3637+«
4519+
5200+

Cs3

003424

6105+
16564
2472%
2696+
3087«
3837«

4251+
4621+
4942+

CS3ERR 050052
CUTE
047704
DAYAMS 025734
DB
003426
DBL
= 002000

5331«
5757~
6242+
2154
6736
4258
16574
15224

DBLED
025602
DBLWDS 025046
010334
DBMG
DBMSG
010536
DBOUT
014002
DBTST
013360
DBTSTA 013700
DDISP = 177570
DELTA
015614
DEVCNT 003376

4232
4132
2315
2346
2795
27364
2779
3624
3064
16344

4740

64874

2169
6497
3113
8783
8783
2238«
2666+
3730+

4562+
5249+
6171+

2248+
2854+
3841+
4625+
5335+
6246+
2198+
2507+
2755+
3220+
3938+
4306+

4674+
4997+

5396w
5822+
6318+

4426
5217

6129

2367
3593
4479
€283
0204

2481
3801

2435

3698
4532

5358
6270

2579
3902

4585
5424
6345

4638
5499
6442

SEQ 0180

2618

2719

5565

5640

4003
4691

4064
4744

2188

2237
6519

2277
65204

2356

2443

6750

6765

2278«

2325%
2749
3932«

2392+
2805«

2393
2844~
4093+

2395

2397«
2983«

2463*
3078~

6508
3866

2690~
3831«
4615+
5325+
6236+
2288+
2909+
3942«
4678«

5400~
6322«
2244+
2531«
2758«
3331~
3941«
4356+
L4677
5029+«
5399+
5895+
6321«

2773

4211
4899
42414
IATAY

4L668%
5390~

6312+%
2335«
2993»

4038«
4731+
5476»
6404

2247
2534
2811
3334
4034+
{359
4727
5032«

5472%
5898
6400+

2775

4261
4952

4028+
4721
5466«
6394«

4774

5531~
8494
2508+
3088+
4152+«
4837+
5617«
8478
2287«

2473
3074

4103x
4784«
5541«
8476

2284«
2555~
2814
3421
4037~

4730«
5091«
5475«
5960«
6403

2825+

4316

8496
2535«
3216«

4202
4890~
5682+
8496

3424+
4099+
4412»
4780+
=
5094
5537+
5963+
8500

2331«
2604«
2853«
3528+
4102+
4462+
4783«
5131+
5540+
6036+
8509

2826
4369

4422

6476+

6537

2558~
2850«

4409~

2899+
4142~
4827«
5607«

2862+

23244
23554
28044
2790
30734
6455

6458

6461

4192+
4880+
5672+«

8498
2559+
3230+
4252*
4943
5758+
8500
2334
2607+
2905+
3531«
4148
4465
4833«

5134+
5613
6039+
851

2863

4475

4242
4933«
S5748%

8505
2608+
3309«

4307

{998«

5823+
8505
2450+
2644
29uU8x
3633«
4151~

4515«
4836+
5196+
5616+
6101«

2865

4528

2868

2947

3041

4116
4797
5706

4165
4850

4215
4903

2498«
3220«

2525+
3325«

2549+
3415+

2676+
3425«
44613«
5095«
5964«

2700~
3532«

4297+
4988+

5813«

2648+
3335«

4360*
5033+
5899«

8513
2451
2647
2989+
3636+

4198«
4518«
4886+
5199«
5678«
6104*

8474

4581

5781

4350+
5023+
5889+

2459+
2672«
2992+«
3736«
4201+

5847

4403+
5085+
5954+

4466%

5135«
6040+

2469+

2675+

6177+

3084+
3739+
4248+
4571+
4939+
5258+
5754+
6180+

4634

4687

4568+
4889+
5255«
5681+

M 14

MACY11 30A(1052)
02-MAY-78 10:03 PAGE 182
CROSS REFERENCE TABLE -~ USER SYMBOLS

MASSBUS RH70 AND RH11 DIAGNOSTIC
CZRHBD.P11
02-MAY-78 10:01
DEVICY1

003366

DEVIC2
DEVIC3
DEVIC4
DEVICS

003370
003372
003374
003400

DF1
DF105
DF11
DF132
DF170
DF172
DF2
DF3
DF 34
DF 35
DF 36
DF 4
DF41
DFS

072306
072362
072332
072367
072375
072400
072312
072316
072335
072340
072341
072322
072344
072326

DF 52
DF 71
DF 76
DH1
DH105
DH11
DH111
DH121
DH130
DH132
DH142
DH146
DH147
DH170
DH171
DH172
DH2
DH3
DH34
DH35
DH36
DH4
DH41
DH5

072346
072353
072356
067574
071160
070402
071225
071272
071330
071356
071434
071472
071537
071575
071623
071651
067714
070035
070470
070545
070550
070155
070631
070275

070655
DH52
070754
DH71
DH72
071033
DH76
071122
DISPLA 001142
000174
DISPRE
DLT
= 100000
= 000001
oMD

SEQ 0181
2375

6471

€473

6478+

6489+

6500+

6511«

16294

1876+

1903

1912+

1915

1918

1921

1985

1991

15304
16314
16324
16354
6520
596
1116

1888+

1933~
1954+
1975+
1963~

1936

1939

1942
1963

6487
6498

6511
2000

6489
6500
6517
6473

6495
6506

85304

6478

85164
1142
85264
1250

646

1233
1400
1031
603
609

1960
1982
1985+

6509
1993

1148

1296

85364

1255

1260

85384

1957
1978
1982+

85184

823

849
840
615
868

621

1454
639
769

1459

1464

1469

1474

776

784

794

802

691
813

703
85244

710

720

729

1041
1072

1066
1187

85334

1307

1312

1318

1434

1439

85344

1467
669
792

1472
678
800

83604
689
811

83184

701

708

718

727

3554
5311
5719

3659
5437
5726

3762
5444
5731

3863

3964
5450
5733

6052
5451

6765

739
937

653

1290

1302

1253

1258

84224

1316

844N

1447

1457

1462

754

774

782

1056

83844

1816+

8991«

3110
5303
5590

3357
5309
5592

1275

594

82624

1135
1180
1221
1231
1273
1294
1168
1398
829
1027
601
607
819
845
836
613
864
619
737
933

84064
1437

84134

1248

1310

1114
644

1087

680

82764

83494
83504

631

83704

1037
1070
5454
4624
15134
15704
5578

671

5585

5449
5732

5734

5452
5860

MASSBUS RH70 AND RH11 DIAGNOSTIC
02-MAY-78 10:01
CZRHBD.P

DNO
DN1
DN2
DOCC
DOIT
DPCA
DPE
DPEHI
DPELO
DPR
DR
DRCLR
DRY
DSWR
DS1

=
=

=
=
=
=
=
=
-

000001
000002
000004
000400
007576
000040
000020
040000
020000
00
003430
000011
000200
177570
003432

0034 34

DTE
- 010000
DTRM
- 000200
DT
071742
072124
DT105
072024
DT11.
0TI
072140

DT121
DT130
DT132
DT142
DT146
DT147
DT170
DT171
1172
D12
DT3
DT3%%
DT35
DT36
014
DT41
DTS

072154
072166
072176
072214
072226
072242
072254
072264
072274
071754
071766
072034
072044
072050
072000
072060
072012

DTS2
DT71
DT76
DUPORT
DVA
=
DYNO
EMTVEC=
EM1
EMIO

072066
072102
072112
047616
004000
020650
000030
055032
055601

5867
6154

15974
15984

N 14

MACY11 30A(1052)
02-MAY-78 10:03 PAGE 183
CROSS REFERENCE TABLE =-- USER SYMBOLS
5873
6156

5874

5875
6283

3765
3253
3253

3866
3358

2289«
2910«
4153+

2336+

6157

6901
6290

6008
6295

3660
3555

3660

2474
3089+

2509+
3231«

SEQ 0182

6013
6296

6014

6297

6015
6298

6016

6142

6149

2536+

2560+
3426+

2609+
3533«

2649+
3638+

2677+
3741+

2701«
3842+

15994

15784

2206
15754

15624
15264
15254
15524
16584
17114
15514
3614
16594

2760+
3943

4679+
5401+
6323+
16604
15654
15774
595
1115

645
1136
1181
1222
1232
1274
1295
1169
1399
830
1029
602
608
821
847

3358

2994~
4203+

4838+
5618+

4891«

3765

3866

5683+

4253
4944~
5759+

4308«
4999«
5824+

85004

3336+
4361
5034+
5900+

4467

5965+

5136+
6041+

4520+
5201+
6106+

84854
690
812

84764

702

709

3829

3930

6745

L4614
5096+

4573+
5260+
6182+

4626+

719

728

5336+
6247+

84684

85034
1306

8494a
1438

84964

1249

1254

1259

131

1317

85074

1453

1458

1468

768

775

1463
662
783

793

679
801

1065

84884

3323
35184

3413

3520

3625

3728

84704

838

1473

B 15
MACY11 30A(1052)
02-MAY-78 10:03 PAGE 184
CROSS REFERENCE TABLE =-- USER SYMBOLS

MASSBUS RH70 AND RH11 _DIAGNOSTIC

EM136
EM137
EM14
EM140
EM141
EM142
EMI4L3
EM144
EM145
EM146
EM147
EM15

EM1S0
EM151
EM152
EMI53
EM154
EMIS5
EM156
EM157
EM16
EMI60

063401
063433
063467
063570
063651

063705
063766
055765
064067
064144
064220
064272
064346
064434
064501
064552
056011

064643
064775
065077
065147
065233
065324
065412
065503
056035
065577

1080
1086
1091
1
1
1
1
1

76254

76354
76484
76674

14
656
1220
1225
1230
1235
1241
1247
1252
1257
666
1262
1267
1272
1277
1282
1287
1292
1298
674
1304

78454
73414
78564
78644

—d

b cmd

b w—d ——h

bl D
b

1
}

1
1
1

(N =D D02 O

oogooor
‘J\lbOO*V\mbuWNJ\N—'—'Og
WOV
DN
—=0O A OH00—=2N00
=N

EM131
EM132
EM133
EM134
EM135

060735
061022
061067
061120
061276
061467
061534
061562
055635
061671
061763
062036
062063
062160
062256
062370
062422
055676
062520
062561
062644
062676
062751
063044
063140
063231
055716
063327

—

EM100
EM101
EM102
EM103
EM104
EMIOS
EM106
EMI07
EM11
EMI10
EM11T
EMI12
EM113
EM114
EM115
EM116
EM117
EM12
EM120
EM121
EM122
EM123
EM124
EM125
EM126
EM127
EM13
EM130

02-MAY-78 10:01

NN
= D el

CZRHBD.P11

1309
1314
1320
1326
1332
1338
1344
683
1350

76884
76954
76994

73324
77114
77214
77294
77334
7744M
77554
77684
77734
7338#
7784H
77904
78004

78054
78134
78244
78354

78694
78744
78864
78954
79004
79094

73484

79214
79294
79374
79444

79524
79624

79694
79764
73524
79864
80024

80144
80214
80314
80414
80514
80624
73564
8073
80834

SEQ 0183

c 15
MACY11 30A(1052)
02-MAY-78 10:03 PAGE 185
CROSS REFERENCE TABLE =-- USER SYMBOLS

MASSBUS RH70 AND RH11 DIAGNOSTIC
CZRHBD .P11
02-MAY-78 10:01

EM162
EMI63
EMI64
EM165

065755
066044
066122
066211

Em?7

056055

EM166
EM167

EM171
EM172
EM173
EM174
EM175
EM176
EM177
EM2
EM20
EM200
EM201
EM202
EM203
EM204
EM205
EM206
EM207
EM21
EM22
EM23
EM24
EM25
EM26
EM27
EM3
EM30
EM33
EM32
EM33
EM34
EM35
EM36

EM37
EM4
EMLO
EM4T
EML2
EML3

EM4L
EM4S
EM46
EML7
EMS
EM50
EMS]
EMS2
EMS3
EM54
EMS5

066307
066366

1362
1367
1373
1379
1385
1391

693

066465
066537
066560
066644
066675
066735
066770
055072
056124
067035
067117
067201
067263
067343
067430
067514
067540
056155
056204
056237
056256
056307
056341
056367
055132
056422
056457
056516
056545

1402
1409
1415
1421
1426
1631
1436
598
706
1441
1446
1651
1456
1461
1466
16471
1476
713
723
732
742
749
759
772
605
779
787
797
805

056755

843

056615
056665
056717

055206
057006
057146
057251
057322

057366
057460
057533
057614
055246
057665
057744
057775
060150
060156
060163

816
826
834

611
852
861
872
880

886
894
901
908
617
915
922
928
940
946
952

80934
81044

8113
8123
81354
8144k
73594
81554
81634
81664

81754
8180#
8186#
81914
72684
73664

8198#
8207#
82164
8225#
82344
82434
8252#
8257#
73714
73754

73804
73834
73884
73934
73974
72744
74024
74074
74134
764174
74244
74314
74364
74424
72824
74474
74634
74754
74824
74884
74984
75064
75154
72884
75224
75304
75354
75554
75564
75574

SEQ 0184

D1 5
02-MAY-78 10:03 PAGE 186
MACY11 30A(1052)
CROSS REFERENCE TABLE =-- USER SYMBOLS

MASSBUS RH70 AND RH11 DIAGNOSTIC
CZRHBD.P11
02-MAY-78 10:01

EMS6
EMS7
EMO
EMGO
EM61
EM62
EME3
EMG4
EMES
EM66
EMG7

EM?7

EM70
EM71
EM72
EM73
EM74
EM75
EM76
EM77
ENDPAS
ENPS
=
ERPIP
ERR
=
ERRIP
ERRTST

060170
060176
055317
060204
060211
060216
060223
060231
060236
060244
060251

055533

060257
060265
060354
060411
060440
060466
060516
060623
045132
004000
025474
040000
025456
050202

958
964
23
970
976
982
988
994
1000

1006

1012

630

1018
1024
1034
1044
1053
1061
1068
1074

64524

15814
4212
15554
4208

2056
2948
4166

4851

ERRVEC= 000204
ERR1
ERR10
ERR11

006546
013246
014424

ERR29
ERR3
ERR30
ERR4
ERRS
ERRG
ERR7
ERTIP
ER1

025752
011116
024446
007274
011404
012152
012464
034054
003436

ERRZ2

007232

5782
4434
2007
8631+
2053
2687
2864
2126

025216
004000

75634
75654
75664
75674
75684
73204
75704
75724
75824
75874
75914
75954
75994
76114
42154

2113

6409

2162
3042

2175
3150

42114
4216
4904

5848
1805
2008+
8634
20564
27074
28684
2148

42654

4056

4061

2173
2461
2545
2615
5141

16614

2761
3944«

4680~
5402«

ERIR
EVENAD

75584
75594
72954
75604
75614
75624

4262

2380

6324

4162
17374
4917

5577«
6196

SEQ 0185

2384

21754
24804
25654
26184
51444
2201«
2817+
4040+

4733«
5478+
6406+
L1654

3810

4973

5583
6288

4266

4957
5923
1806+
2022~

2225
3292

4321
5055
5989
1817*

2025+«

2265
3397
4374
5157

6064
1844+

2305
3487

4427

5218
6130

1845+

2028

2029+

2337«
2995«

2475«
3090+
4254«

2368
3594
4480
5284
6205
1877
2032+

2434
3699

5359
6271
1880«
2040

2480
3802
4586
5425
6346
1883«
2047«

2537
3337

2561«
3427+

4533

2577
3903

2619

4004

2720

2869
4317
4798
5707

1893«
8628

1897+

4065
4745
5641

1886+
2046+

4692
5566
68004
1889+
2055+

2650+
3639«
4521
5202+
6107«

2678+
3742+
4574%
5261«
6183«

L4627+

4652
5350
6141

4758
5442
6147

4864
549N
6193

4639
5500

6443

8629+

21624
2396

40644

2250
2856+

24344

4105+
4786+

4204
4892+
5684+

4077
500"«
5632

4178
5070
5773
8503

5543+

6334

4945
5760%

4228

5071+
5859+

4309~
5000«

6362

4415

5825+

5035«
5901«

5097«
5966+

2610~
3534«
4468
5137~
6042%

4281
5110
5865

4334
5166
5914

4387
5295+
6006

4493
5301
6055

2510«
3232+

2702+
3843+

5337«
6248«

E 15
10:03
PAGE 187
)
02-MAY-78
30A(1052
MACY11
CROSS REFERENCE TABLE -- USER SYMBOLS

MASSBUS RH70 AND RH11 _DIAGNOSTIC
CZRHBD.P11
02-MAY-78 10:01
FAKE70
FANG
FANGIE
FANGY
FAST
FERR
=
F IND
FINDIT
FIT
FITIT
FOOEY
FOUND
FROG

006474
033330
021306
034134
033116
000004
050002
047706
020524
020060
025200
050026
024124

GAP
= 000020
GIGO
005246
GIGOT
005422
GIGO2
005562
GIGO3
005722
GIGO4
006146
GIGT
005260
005434
GIG2
005574
GIG3
GIG4
005734
GI
005402

Gl2

GI3
Gl4

GNS

005542

005702
006034
KERNAR

GO
=
GOOF
GOOFED
GO1

000001
012034
013124
005370

GO03

005670

G02
GO4

HEADER
HEDADD
HEDDAD
HED1
HED10
HED11
HED12
HED13
HED14
HED1S
HED16
HED17

HEDZ2

HED20
HED21
HED22
HED23
HEDZ24

005530

006030

(72404
050172
003460
050334
050633
050677
050730
050760
051011
051041
05107
051131

050374

051171
051233
051275
051340
051414

2041

4970

3501
5067
5013
15724
2149

2132
3410
3409

4158

2127

3914
16024
19004
1919

1940

1961
1923
1901
1925
1946
1967
1875
1937
1958
1979
461
2404
6661

20454
50564
35964
51584
5018

5020

50224

1986
1943
1964
1983
1965
1917

6474
6490
6501
6512
1984

6485

1858
6481
6688

1864

67584
67434
34854
34110
41614

67634

40054

1922
19244
19454

1920

19934

19214

1827

6469
6680

9162

15374

25484
268954

9166

3218

9167
3323

6787+

6788

1914
1935
1956
1977

6786
6788«

17324
68294
68664
68734
68784
68824
68874
68924
68974
69034
68354
69094
69154
69214

69274
69354

SEQ 0186

8565

1870

1909

1930

1951

1972

1989

6608

6623
6745

6493
6697

6504
6704

6515
6711

6563
6808

6570
6814

9158

3413

3520

3625

3728

3829

3930

9159

2036
6649

9160

2051
6653
9161

MASSBUS RH70 AND RH11

_DIAGNOSTIC

HEDZ2S
HEDZ26
HED27

051456
051520
051562

6941
69474
69534

HED30
HED31

051624
051666

69594
69654

HED6

050550

CZRHBD.P11

HED3

HED32
HED33
HED34
HED3S
HED36
HED37?
HED4
HED4O
HED4T1
HED42
HED43
HED44
HED4S
HED46
HED47
HEDS
HEDSO
HEDS1
HEDS2
HEDS3
HEDS4
HEDSS
HEDS6
HED57
HEDOD
HED61
HED62

HED63
HED6L

F 15
MACY11 30A(1052)
02-MAY-78 10:03 PAGE 188
CROSS REFERENCE TABLE -~ USER SYMBOLS

02-MAY-78 10:01

050421

69724
69814
69894
69974
70054
70134
68454
7023
70324
70384
70454
7053
70634
70694
7078#
68514
70864
70954
71034
71114
71174
71234
71294
7137#

053664
053737
054005

71440
7152#
71594

054127

054202
HED6S
HED66
054250
HED67
054324
HED7
050602
HED70
054373
HED71
054447
HED72
054515
HED73
054571
HED74
054640
HED7S
054714
HED76
054762
HERADD= 177742
HERE
007326
HIBYTE
012206
HT
= 000011

010462
HURTS
ICPA = 000010
IDPA = 000020
1E
= 000100

8566

68394

051733
052013
052070
052145
052223
052277
050460
052371
052456
052522
052573
052651
052740
053003
053070
050517
053147
053234
053313
053372
053436
053502
053541
053615

054060

SEQ 0187

68564

71674

71744

71824
71894
7197#
68614
7204H
72124
7219#
7227#
72344
72424
72494
16414
2188#
2569
3534

2341
15734
15744
1538#
6722

8606
8607
6699

2214
2571#
8742
2343

8783

4013

3076
6745

3218

3323

3413

3520

3625

3728

3829

3930

5173

5174

6375

G 15
02-MAY-78 10:03 PAGE 189
MACY11 30A(1052)
CROSS REFERENCE TABLE =-- USER SYMBOLS

MASSBUS RH70 AND RH11 DIAGNOSTIC
CZRHBD .P11
02-MAY-78 10:01

ILF

[ETST

IE3

IPCK1

IPCK?2
1PCK3

1PCkO

I0TVEC

034446
000100
000001
064454
000020
000001
000002
000004
000010
000100
045702
002000
007610
022652

[

IR
1S
ISLK
1700
JUMP
K [|PARO= 172340
KIPAR1= 172342

K IPARZ= 172344
K1PAR3= 172346
K IPAR4G= 172350
K IPARS= 172352
KIPARG6= 172354
KIPAR?7= 172356
K IPDRO= 172300
KIPDR1= 172302
KIPDRZ2= 172304
KIPDR3= 172306
KIPDR4= 172310
KIPDRS= 172312
K IPDR6= 172314
KIPDR7= 172316
KONG
004644
034124
LEAGUE
023404
LEAP
007230
LEAVE
034112
LEFOUT
LERADD=
=
LF
LOOCNT
LOOKED
LOOKFO

177740

5170
15214
15594
63604

2457
3765

15044

2042
2042
2042
2042
6765

6770
6770
3502
6770

15804

5867

5872

6460

22344
3812

3555
3866

3660

6770

5873

5874

5875

6001

6008

6013

6014

6015

6016

6770

W78
4984
LN

5004
5014
5024

5034

5044
4864
LB874
4884
4894
“50#
L
4924
4934

1853
5149
3913
2124
51534
16404

3544

MCLK

MCPE

- 020000

15444

MCPET
024224
MEMERR= 177744

4018
16424
1753#
4978

004120
032670
MIXIT
023466
MMVEC = 000250
MOAR
046524
MOL
= 010000
MOOR
046534
046670
MORE
MORE
0466660
2
MPE
000400

1791«

4L8a
15174
15184
15194
15204

000012
003450
047756
047732
= 000002

MINUS
MITE

2042
3113

SEQ 0188

17234

2142
2137

15714

5860

3930

3919
4754
66104
15534
66124
66274
66254
15064

18554
5151
39154

51564

6706
8777
2447+
67534
67484

2734+

2780

2782+

2784~

2787

2789+

6359+

6430

6432+

6436+

5437
6013
3218

5449
6015
3251

5451
6142
3323

5578
6154
3413

5590
6156
3520

6283
3625

5592

5719
6295
3728

5731
6297
3761

5733

3393

3447

3554

3659

3762

3863

3964

052

2147

4047
4023

3076

5310
6001
3109

4025

40274

4983

4985

49874

3110

3252

5872
2098

6713
2567
3924

5308

2573
3926

2709

3829

2715

39284

6616
6760
6641
6637

6631
2105

3344

H 15

MACY11 30A(1052) 02-MAY-78 10:03 PAGE 190
CROSS REFERENCE TABLE -~ USER SYMBOLS

MASSBUS RH70 AND RH11 DIAGNOSTIC
CZRHBD.P11
02-MAY-78 10:01

MPETST
024356
MxF
= 001000

6765

4044

L0478
2105
3951

SEQ 0189

3447

3554

3659

3749

3798

3916

3918

4052

3357
6765

3863

4000

3252

2105

3110

3252

3357

3447

3554

3646

3695

3762

3863

3964

4052

NEDERR 021330
NEM
= 004000

36054
2105

3097

3146

3252

3357

3447

3554

3659

3762

3863

3964

4052

NEXTST

046556

6614

66174

= 125252

2541
6077
2838

2683

2829
6218
28424

3202

5232

5295

5373

5514

5577

5655

5795

5859

4705

4811

5071

5109+

5347

5488

5629

5770

5911

2000+

2001+

2002

2003~

2004

6520~

6522

6525+

6527+

2780

2787

6610

6625

2350

2358

2362

2768

2794

2799

2820

2832

6439+
6765
3357

3447

3554

3659

3762

3850

3899

3964

4052

MYSTIC
014244
NEBL
= 000100
NED
= 010000

NOOP

OAB

- 000001

OABTST
ODDAD

014244
004002

OFFSET
OFF11

003456
003402

ONE
oPI
OR

ORSET
OUTOF

PARITY
PASS
PAT
=
PGE
=
PGETST
PIP
=
PIRQ
=
PIRQVE=
PLACE
PRIBIT
PRTBIT
PRO
=
PR1
=
PR2
=
PR3
=
PR4
=
PRS
=
PR6
=
PR7
=

013606
050324

047172
003452
000020
002000
022734
020000
177772
000240
020544
046730
046720
000000
000040
000100
000140
000200
000240
000300
000340

PS
PSEL
PSW

= 177776
= 002000
= 177776

RBUF

004100

RBUF1

004102

PWRVEC= 000024

4440

6141
2840
4546

4599

6784+

6785+

6787

6529
2492
2120
2314
2859
27724
6803
66734
6358+
3308
2105

6530+
2660
3113
2319
6750

6531
2735
3765
2340
6765

6369
3710
3110

6437
6750
3252

3823
6760

3825

38274

358
3076
6357+

5171«
3218

3323

3413

3520

3625

3728

3930

6425

6722

6745

2128+
5372
5833
6690+

2133«

8674+
2138«
5412
5936«
6699+

8675
2143«
5512
5974
6700

8684+
2150+
5513«
6076
6706+

8690~
2155«
5551
6077
6707

8702+
3306
5553
6115
6713

5230
5654+
6218+
8488

5231«
5692
6256
8507

5269
5694
6682+
8513

5271
5794
6683+

1993«

= 000001
- 020000
= 000200

17244
15024

6765

3818
15544
3604
454k
3500
6611
6626
3774
3784
3794
3804
3814
3824

3844
3574
15404
3584
44N
17404
5371
5795+
6684
17414

3110

1995

1996+«

3866
2345

68164

35024
66384
66344

1796+

1797+

5610
5935
6691

MASSBUS RH70 AND RH11 DIAGNOSTI(

CZRHBD .P11

RBUFZ2
RBUF3

MACY11 30A(1052)

02-MAY-78 10:01

004104
004106

RDY

15394
3168
3413
3745
k1
4364
4577
4816
5017
5265
5596
5883
6187

2738
3173
3430
3817
4136
4365
4604
4821
5038
5314
5601
5905
6225
27684
51704

1860

6735

RDYSET
READY

013566
034164

2765
5168

= 000072

16924

READO = 000071

READZ = 000073
READ3 = 000074
READ4 = 000075
READS = 000076

READ6 = 000077

16914

16934

16944
16954
16964

16974

REGEND
RESTAR
RESTAT

003404
006054
045366

5659
16434
1887
1938

RETAIN

003410

16454

RESVEC= 000010

RETURN 046712
RFAIL = 000100
RHAS
003346

RHBA

003334

La4n

003360

91654

91664

1866

1872

1911

1932

1953

1974

2743
3185
3508
3822
6157
4392
4609
4842
5074
5319
5623
5943
6230

2764
3190
3513
3829
4181
4397
4630
4869
5079
5341
5661
5948
6252

2888
3196
3520
3846
4186
4418
4657
4874
5100
5379
5666
5970
6301

2893
3205
3537
3930
4207
4445
4662
4895
5114
5384
5688
6019
6306

2914
3210
3613
3947
4231
4450
4683
4922
5119
5606
5737
6024
6328

3061

3307

4286

4655

4708

5377

5725

5518

6007

674¢

3076

6289
1776
1891
1959

2972
3218
3618
4017
4236
4471
4710
4927
5140
5455
5742
6046
6378

2977
3235
3625
4022
4257
4498
4715
4948
5179
5460
5764
6084
6383

3063
3311
3642
4043
4286
4503
4736
4977
5184
5482
5802
6089
6389

3068
3316
3716
4082
42N
4524
4763
4982
5205
5520
5807
6111
6411

3076
3323
3721
4087
4312
4551
4768
5003
5238
5525
5829
6160
6724

3093
3340
3728
4108
4339

4867

5236

5443

3829

3930

4761

4814

4920

6745
1873«
1895
1980

3323

3413

3520

3625

3728

1874+
1899
6462

2001
1941
64764

6528
1962
6488

1981
6499

19854
6510

1943«

1986+

2024

6474«

6485+«

6490*

6501x

6512+

4556
4789
5012
5243
5547
5878
6165
6729

66324
3112

1964+

1983+

3765

3866

5230
5609
5956

2191
2600
2707
3030
3629
4228+
4564
4917«
5251
5629
6006+

2240
2635
2714
3080
3810«
4299
6652+
4990
5347
5724
6076

2253
2640
2716
3164
3833
6334«
4670
5008+
5371+
5750
6097

2256
2661%
2751
3201~
3934
4352
4705+
5025
5392
5770
6147«

2261
2662
2807
3222
4030
4387«
4723
5070«
5442
5794«
6173

2280
2663
2846
3306
4077«
4405
4758+
5087
5468
5815
6193

2327
2668
2885+
3327
4095
4440%
4776
5110
5488
5865«
6217«

2465
2684+
2901
3417
6128~
4458
4811+
5127
5512«
589
6238

2500
2685
2963*
3505«
4144
4493+
4829
5166
5533
5911
6288+

2527
2686
2985
3524
4178«
4511
4864+
5192
5583«
5935~
6314

1997
2471
2852

6396

2235
2634
2710
3055+«
3732
4281%
4617
4973+
5327
5674
6052

16254
2383
2813

6363

2234
2633«
2708+
3052«
3712«
4244
4599
4935
5301
5653
6032
2002+«
2506
2884

2197
2533
2907

2246
2557
2962+

2274~
2592+
2991

2275
2593
3003

2286
2594
3005

2293
2606
3007

2296
2646
3058~

2301
2674
3086

2333
2698
3163

2379
2757
3228

16154
2551
2692
3012
3610

6334

1922«

3218

91674

6629
2120
2389

6620
15644
16204

4194
4546%
4882

RHBAE

SEQ 0190

17420
17434

17440
17554
17464
17474
9063
9104

= 000200

PAGE 191

CROSS REFERENCE TABLE -~ USER SYMBOLS

RBUF4
004110
RBUFS
004112
RBUF6
004114
RBUF7
004116
ROCHR = 104406
RDLIN = 104407

RDOCT = 104410

1 15
02-MAY-78 10:03

6414

MASSBUS RH70 AND RH11 DIAGNOSTIC

CZRHBD.P11

02-MAY-78 10:01

3305+

410
4517

RHCS

003330

4865~
5300+
5756
6222*
16134
2498
2886+
3063
3210
3506+
3716
3932
4129+
4242
4392
4524
4662
4814
4933
5074
5190

003362

5379
5547
5742
5941«
6095
6301
6722%
16274
6533
16174
2248
2444
2815
3146
3393
3695
3942
4360
4707
5051
5369+
5823
6281«
16264

003352

2814
3840
4359
4687
5042
5681
16224

RHCS1B8

003364

RHCS2

003340

RHCS3

RHDB

J 15
MACY11 30A(1052) 02-MAY-78 10:03 PAGE 192
CROSS REFERENCE TABLE -~ USER SYMBOLS

3423

4200
4570
{918+
5376%
5821
6287*
2005

2549
2893
3075

3504+

4250
4600+
4941

5398

5864+

6320
2010
2598

3220
3513
3727
4017
4136
(284

3530

4282+
4623
4972+
5441«
5897
6362+

2095
2638
2914
3093
3307+
3522
3745

4028
6157
4291
4443«
4562
4710
4842
4982

4403
4551
4683
4821
4975«
5085

5112«
5243
5443+
5607
5802
5970
6165
6375%
6744
3287«

5236
5390
5596
5764
5948

2102
2319
2559
2854
3216
3434
3798

4038
4466

4813
5108«
5510+
5964
6749
2086

2472
3052

2452

2736+«

4112
4465
4793
5144
5963
2770

3608+

4305

4653

4996
5474
5940+

6402
2098
2666
2967~
3166+~
3311
3537
3814«

4043
4179%
4297
6445
4577
4715
4867
4988
5114
5249

5455
5623
5807
6007

3635
4335«
4676
5031
5517«
5962

SEQ 0191
3839

3738

4358
4706+
5093
5539
6005~
6529+
2189

44611
4759+

5169+
5615
6081+

2278
2749
2983
3190
3340

2738
2972
3173

3322
3613
3817

4036
4464
4812+

4078+

2325
2764

2392

2463

5658+
6103

3000
3196
3412
3627
3831

5235+
5680
6146~

3203+

4494
4835

5257
5723«
6179
2844
3061+
3205
3430
3714w
3929

6394

3624
3828
4082
4207
4344
4496+
4615
4763
4895
5017
5173«
5319
5518«
5672
5878
6046
6230
6411

3694+

3797+

6532+

2169«
2350
2700
2993
3301«
3541
3899

2170+
2356+
2759
3060+
3308«
3590
3915+

2237+
2443«
2799
3097
3344
3646
3923
4336+

4049
4186

4337«
4456
4604
4736
4874
5010+
5125
5302«
5666
5661
5829
6024

6223+
6389

3940
44410
4782
5198

4202
4572
4919

4252
4601+
4943

2247
2607
3424

2287
2647
3502+
4251

5200
5651«
6105

62N
4571
4899

5334
6245
2825

5228+
5682
6140~

4581
4942
5399

6321
2830+

4087
6229+

4498
4630
4920+

4108

4236
4390+
4509
4657
4789
4927

5072«
5184

5377+
5531
5737
5905
6089
6289+
6532

K 15
MACY11 30A(1052)
02-MAY-78 10:03 PAGE 193
CROSS REFERENCE TABLE == USER SYMBOLS

MASSBUS RH70 AND RH11 DIAGNQSTIC
CZRHBD.PIN
02-MAY-78 10:01
RHDT
RHER

003356
003344

2171
2120
2702
3843

16244
1619#

2650
3639

4627
5337
6248
5296+
5453«

(521
RHMR1

RHMR?

003354

003336

5202
6107
16234
5451~
S732+
6013+
6290+

16164

2680
3744

6042
4735
54680
6408

4576

RHNINT
RHST

RHTDB

044630
003342

003350

5263
6185
6374

2150
2760
3943

16184

2649
3638
4520
5201
6106

4679

16214

5401
6323
2291

4416

4575

2912
3945

2762
3713«

5232+
5481
5718«
5967

5098

5410
5685
5904
6110
RHTEST
RHVEC
RHW(

006352
003316
003332

164844
16144

2493
2568
2916
3503«
L4177

4863
5191
5579+
5934«

011606
011424
006540
006406
006502
006450
033274

6184
6417

6327
2020

4510

RHWCA
RHWCT
RH11
RH11BA
RH708A
RH70TT
RITEON

2377
2143
2761
3944
4680
5402
6324
5303«
5578+
5735+
6016*
6297+
2203
2819

6313
2515
2493
2029
2033
20474
2027
5043

2572+
2918
3523
4193

4545+
4881

5229+
5608
5955
6331
2518+
2517
2039

20404
50484

2190
2519«
2578«
2964*
3628
4243
4598+
4934
5297+
5652+
6031
6395

20544

2395
2201
2817

2250
2856

4040
4733

4105
4786

5585«
5860«

5590«
5867«

5478
6406
5308«

6017«
6298%
2252
2858
6107
4788
5545

6433+

5543
6754
5309+

6142*
6299+
2292
2913
4156
4841
5621

2200
2816
4039
4732
5477
6405
2338
2925
4014~
4628
5262
5491
5761
5969
6186

2249
2855
4104
4785
5542
6409
2476
2930
4015«
4681
5264
5514«
5763
5974
6196

2204
2520
2599
2984
3711«
4280

2207
2521
2639
3059«
3731
4298

5326
5673
6049
6420

5344
5720«
6075«

4616
4974x

4651~
4989

2290
2911

2337
2995

2561
3427

2475

2€10
3534

4468

4415
5097
5966

5137
6042

5311«
5592+
5873«

6154~

5449+
5726+
6001+
6158+

5450
5731«
6008+
6283+

2477
3092

2612
3536

2652
3641

2560
3426

2609
3533

4154
4839
5619

4204
4892
5684

5310«
5591«
5872«
6149+

2339
2997

4206
4894
5686

SEQ 0192

4470
5139
6044

4256
L4947
5762

2289
2910

4153
4838
5618
6759
2511
2996
4041
4734

4414

4467

2679
3535

2703
3640
4363
5036
5405
5655«
5902
6108
6325

5096
5965

5269

5544
5773
5976
6219+

2220

4704

5024
5391
5767
6143

4386+

5069
5438+
5793
6172

4310

4946

5001
5403
5632
5835
6078«
6282+

2279
2550
2845
3302«
4094
4439«
4775
5111«
5485
5861+
6216+

2326
2565
2880+
3326

5373«
5622
5833
6055
6258

4523
5204
6109

4127~
4457
4810+
5126
5511«
5890
6237

5136
6041

2464
2566+

2900

3416
4143
4492+
4828
5172+
5532
5908
6284+

MASSBUS RH70 AND RH11 DIAGNOSTIC

CZRHBD.P11

02-MAY-78 10:01

MACY11 30A(1052)

L 15
02-MAY-78 10:03

RITURN 046716
RMBEX = 000040
RMR
= 000004

6595
15634
15604

6597
2120
2120

6599
3113
3113

66334
3765
3765

3866
3866

15474
3367
3751

2098
3436
3755

3099
3440
3759

3103
3444
3772

3107
3457
3852

3120
3543
3856

5585

5590

5591

5592

5210

5212

5215

52174

1788
1772

1842
17814

1807+«

1809

1815+«

2400

6594

6780

6802

404n
4030

3141
3141

3283
3283

16624
2763«

2203+
2819

2252%
2858+

ROTEEN
SA200

045576
005274

= 100000

SCLk = 000010
SEARCH= 000031
SKIPIN 004624
SLEUTH 004640

SLKM

= 001000

SRO

SR1

5860

5867

18504
18544

2359

2362#

= 177572

4794

= 177574

177576
172516
000750
004214
177774
033250

001140

SWREG
SWwO
Swo0
Sw01
SwO2
Sw03
Sw04
SWO5S
Swo6
Sw07
Sw08
Sw09
Sw1
Sw10
SwWl1
sw12
Sw13

=
=
=
=
=
=
=
=
=
=
=
=
=
=

000176
000001
000001
000002
000004
000010
000020
000040
000100
000200
000400
001000
000002
002000
004000
010000
020000

Sw15
Sw2
sw3
Swé
Sw5
swé
sw7

=
=
=
=
=
=
=

100000
000004
000010
000020
000040
000100
000200

= 040000

= 000400
= 001000

T8ITVE= 000014

6433

010566

034460

SWR

Sw8
Sw9

16004
17154
1847
1852

5578

=
SR2
=
SR3
STACK =
START
STKLMT=
SUPER

Sw14

64984
19064

15794

SNAFOO

SPLIT

6457
1904

003440

5208

PAGE 194

CROSS REFERENCE TABLE -~ USER SYMBOLS

5872

3241
3547
3860

5726

3262
3648
3957

5731

3346
3652
3961

5732

3350
3656
3974

3354
3669
4049

6001

6008

6013

6014

6015

6016

5733

5734

8623

8637

8639

8645

8652

8682

8695+«

8992

3478

3585

3690

3793

3894

3995

3388
3388

3478
3478

3585
3585

3690
3690

3793
3793

3894
3894

3995
3995

2292%
2913+

2339+
2997+

2477+
3092+«

2512+
3234+

2539+
3339+

2563«
3429+

2612+«
3536+

2652+
3641+

2680«
3744+

2704+
3845

5874

5719

3249
3564
3953

5875

5873

5593

3245
3551
3873

SEQ 0193

4804

4814
4824
3484
1768
3594
5039

544k

8999
4634
4120
402n
4014
4004

3994
3984
3974
3964
3954
3944
3934
4114
3924
3914
3904
3894

3884

3874
4104
409
4084
4074
406#
4054

445N

50424

1786

9004
1815

9007

412
o
410
409
408
407
406
405
604
403

3141

3283

3388

MASSBUS RH70 AND RH11

CZRHBD.P1i

02-MAY-78 10:01

3946+

4682+
5404+

TDR

003442

6326+
16634
2762+
3945«
4681+

THREE
TIEQUT

TKVEC =
1017
TPVEC =
TRAPED
TRAPVE=
TRE
=

025324
046740

000060
010020
0000C4
047610
000034
040000

5403+
6325+

4182
1844

L5208
2254
4534
6694
4514
15454
3365
3751

TREB
=
TRTVEC=
TSTADD
TSTIE

000100
000014
006252
034300

TSTNMA
TSTNMB
TST1
TST1I0
TST11

050174
050076
004546
010614
011126

17304
8480
8507
6781
67784
1775
2374n
24420

TSTi3
TST14
TST1S
TST16
1ST17
TST2
TST20
TST21
1ST22
TST23
T1ST24
TST25
TST26
TST27
TST3
TST30
TST31
TST32
TST33
TST34
TST3S
TST36
TST37

012256
012474
013344
014434
015020
006552
015466
016260
017254
020040
020524
021306
022056
022622
007236
023372
024124
024456
024750
025226
025504
025762
026254

25884
2590
27314
28794
29574
1849
30494
31584
33004
34054
34964
36034
37084
38084
21684
391
40114
40734
4075
4126
4176
4226
4279

TSTNM

TST12

003454

011414

M 15
10:03
PAGE 195
02-MAY-78
MACY11 30A(1052)
CROSS REFERENCE TABLE =-=- USER SYMBOLS

DIAGNOSTIC

15464
4464
2007#
5180

2446

SEQ 0194

4042+
4735«
5480*
6408+

4107+
4788+
5545«

4156+
4841+
5621+

64206%
4894%
5686*

4256+
4947+
5762«

4311«
5002+
5827+«

4364+

5037+
5903«

64417
5099+
5968+

4470
5139«

4576+

4629+

6044

4523
5204~
6109+

6106+
4787~

2291*
2912+
4155+

2338x
2996+

2476+
3091«

2511
3233+

2538+
3338«

2562+
3428+

2611+
3535«

2651«
3640+

2679+
3743«

2703+
3844

404612

2251
2857

6184+

5338«
6249+

2202+
2818«

(734
5479«
6407«
4187

5544~

1886

4189
1889

2259

22634

67164
1794
2098
3436
3753
3145

6539
5185
6778+
8483
8511
6783

9001
18394

24914

26304

20644

41244
41740
G224M

42774
43304

1795«
3099

3438
3759
3287
5187

6779+
8485
8513
67924

4575+
5262+

4628+

4363~
5036+
5902+

3118
3543
3854
3589

3241
3545
3860
3694

3243
3551
3871
3797

3249
3562
3953
3898

3260
3648
3955
3999

3346
3650
3961

3348
3656
3972

4051

6805+
8490

6810
8492

8468
8494

8470
8496

8472
8498

8474
8500

8476
8503

8478
8505

4255+
4946+
5761«

1893

1897

66464

3101
3444
3770
3392

3107
3455
3852
3482

51894
6784
8486

6804
8488

L1914

4522+
5203+
6108+

5239«
6250+

4310+
5007
5826+

4205+
4893+
5685«

4840+
5620*

5263+
6185+

4416%

5098«
5967+«

4469

5138«
6043~

3354
3667

MASSBUS RH70 AND RH11
(ZRHBD .P11

1ST4
TST40

02-MAY-78 10:01

007300
026546

21834
4332

TST4Y1
TST42
TST43

027040
027332
027624

4385
4438
44N

15147
TSTS

031174
007606

4703
22334

TST44
T1ST45
1ST46

030116
030410
030702

TSTSO
TST51
TST1S2
IST53

031466
031760
032252
032544

TST56
TSTSS

033330
034134

TSTS6
034470
1ST57
035032
TST16
010030
TST60
035464
TST61
036026
IST62
036460
TST63
037022
TST64
037454
TST6S
040016
TST66
040450
TST67
041012
1S17
010256
TST70
041444
IST71
042006
IST72
042440
1S773
043002
TST74
043434
1ST7S
043776
TST76
044430
TST77
045130
TWANG
033306
TWANGY
033320
TwOo
= 000002
TYPDS = 104405
TYPE
- 104401

TYPOC - 104402
TYPON - 104404

TYPOS = 104403

UPE

- 020000

UPETRE
usl
=
us2
=
US4
VECADD

N 15
MACY11 30A(1052)
02-MAY-78
10:03 PAGE 196
C(ROSS REFERENCE TABLE == USER SYMBOLS

DIAGNOSTIC

017402
000001
000002
000004
003406

6544
4597
4650

4756
4809
4862
4915

50644
51644

52274
52934
22714
53684
S5434m
55094
55754
56504
S7164
57914
5857#
2273
59324
59984
60734
61394
62144
62804
63534
64504
5047
5049
1674H
6567
1821
6463
6651
8747
9070
1992
6811

91614

91604

15114
3964
3312
14984
16994
15004
16444

SEQ 0195

43834
44364
4489
4542#
45954
4648
47014
47544
48074
48604
49134
49664

23114

50514
5052
1996

6574
1825
6467
6659

50544

2397
6636

6525
91624

6656

6502
6686
8952

6513
6695
8954

6561
6702
8957

6568
6709
8959

6575

6496
G1594

6507

6518

6658

3110
6765
3319

3252

3357

3411

3434

1867«

5170+

1856

8843

6479
6674
8918

8943

8967

9074
6472

2105
4052
3317
6750
6750
6750
1777+

6683

2632
6640
1862
6491
6678

91584
6484

8935

1868

33214

6365+«

1907

1928

6789

8963

6621
6806
8994

2049
6632
6812

9002

2402
6647
8704
9067

6665

6685

6701

6708

6715

3483

3541

3659

3762

3863

1949

1970

2034

MASSBUS RH70 AND RH11 DIAGNOSTIC

CZRHBD.P11

033022

vouUs

WATBIT

046354

WATFIV
WATFOR

010246
010036

WwCE

02-MAY-78 10:0]

003444

= 040000

10:03

PAGE 197

2152
2706

2157
2777

2213
2828

2223
2867

2258
65944

2298

26479

2497

2524

CROSS REFERENCE TABLE -- USER SYMBOLS

50074

SEQ 0196

2130
2547

2135
2597

2140
2654

2145
2682

16668
2520%
2900*
41437
4828+
gggg'

2190%
2523
2984+
4193+
4881*
gggz'

2210%
2526*
3079+
4243%
4934+
g;gg'

2212
2543«
3221+
4298x
4989+
5814+

2216%
2546
3326+
4351
5026+
5890+

2220%
2550«
3416
4404
5086+
5955«

2221
2599«
3523+
4457+
5126
6031+

2239%
2639%
3628+
4510+
S191x
6096+

2279%
2667+
3731«
4563
5250+
6172+

2326%
2691+
3832«
4616+
5326+
6237+

2464v
2750+
3933«
L669%
5391+
6313+

2496
2806%
4029+
4722%
5467+
6395+«

2499+
2845+
4094+
4775+
5532+
8468

15124

2105

3110

3659

3762

3863

3964

4052

229%
22744

2299

2303

)

6765
5122
I
311
5082

3239

3288

3357

3447

3554

51244
3358
3358
50844

3555
3555

3660
3660

5048
5042

5144
5150

2366
3199
3433
3664
3878
4111
4425
4792
5147
5832

3213
3176
3193

2767
3238
3452
3674
3882
6115
4474
4796
5268
5842

32154
31784
31954

2924
3257
3462
3678
3887
4160
4478
484"
5278
5917

2946
3267
3466
3683
3891
4164
4527
4849
5353
5973

3010
3271
3471
3687
3950
4210
4531
4898
5409
5983

3015
3276
3475
3748
3969
4214
4580
4902
5419
6058

3018
3280
3540
3767
3979
4260
4584
4951
5464
6114

3096
3343
3559
3777
3983
4264
4633
4955
5550
6124

3115
3362
3569
3781
3988
6315
4637
5006
5560
6199

3125
3372
3573
3786
3992
4319
4686
5041
5635
6255

3129
3376
3578
3790
4046
4368
4690
5045
5691
6265

3134
3381
35862
3849
4054
4372
4739
5103
5701
6340

3203

5010

5112

1701#
4229

2886
4337

2967
4443

2969
4975

3166
5072

3506
5173

3611
5302

3714
5800

3814
6375

3815
6722

4080

4129

4179

000063
000064
000065
000066

17034
17044
17054
17064

5584

5941

5866

6082

= 000000

17074

16728
3713

4390

4496

4549

4602

6148

6223

4812
5513
5940
5414
536#

4865
5517
6005

4918
5582
6017

4972
5594
6078

5169
5654
6081

5231
5658
6146

3163
6494
5300
5735
6219

3305
6547
5312
5796
6222

3504
4600
5372
5799
6287

3605
4653
5376
5864
6299

3608
4706
5441
5876
6362

3658
4759
5453
5937
6755

03372¢
010000
004000
033446
007462
007546
016610
016400
016474
007224

WRCHO
WRCH1
WRCH2
WwRCH3
WRCH4
WRCHS
WRCH6

000051
000052
000053
000054
000055
000056
000057

=
=
=
=
=
=

WRITEO= 000061

WRITE1= 000062

WRITEZ2=
WRITE3=
WRITE4=
WRITES=

WRITE6= 000067

$AUTOB
$8DADR

02-MAY-78

5153
5120
2089
2089
5080
22074
22194
3211
3174
31N

WCEERR
WCEHI =
WCELO =
WCEOWT
WCERR1
WCERR2
WCETRE
WCETST
WCTST
WHYFO

ZERO

5004

8 16

MACY11 30A(1052)

001134
001122

5051
511§
15¢4#
15234
5075
2187
2205
3206
3169
3186

21604
3138
3385
3645
3868
4063
44621
4743
5143
5776

6441
16814
16824
16834
16844
16854
16864

16874
17024

2566
3813

2572
4078

2578
4282

2708
4335

2714
4388

2884
4441
5235
5723
6158

c 16
MACY11 30A(1052)
02-MAY-78 10:03 PAGE 198
CROSS REFERENCE TABLE -~ USER SYMBOLS

MASSBUS RH70 AND RH11 DIAGNOSTIC
02-MAY-78 10:01
CZRHBD .P11
$BDDAT
001126
$BELL
001216
$CHARC
073444
$CKSWR= AN ER U

SCMTAG
M

$CM2
$CM3

$CM4
SCNTLG
$SCNTLU
$CRLF
$CS1
$CS2
$CS3
$DBLK
$DOAGN
$DTBL
$SENDAD
SENDCT
SENULL

001100
000006
000014
000006
000006
074655
074650
001223
004124
004126
004130
074112
046344
074102
046334
046200
046350
046144
046172
004134
001103

17584

8884
6557
8887
513
65594
65874

b2242
2

000000
075004
001104

073212
001135
001114
001224
001106
001110
18884
&4

074673
074662
073050

9015

8766

8775«

87804

1783
SS7H
5574
556
5634

1784
5584
5584

1792
5594
5594

1798
5604
5604

1799
5614
5614

5624
5624

S64LH

5654

5664

5674

5684

6575
2095
2102

6632
3109+
3110w

6789
3251
3252+
3253~

8748
3356~
3357«
3358+

8783
3446+
3447
3448~

1947

1968

6538

65494

3113«

3255+
1955
5209
6059
8989+
8665

3360«
1976
5214
6125
9015
8670

8470

8472
8496

1799~
8752

6576%
*
8664
8783

91264
8656+
8690

8918
6578
89224
65804
1926
6560
2117
1913
5046
5918
8649~

1792

89884

8490
8997
5894
6792
5314
S694
5524
5514
5354
5374
65774
9164
334
9121+
528#
8674
5420
5324
S734
S
5304
1819
90874

8492

5344

8994
8759+

1902
65564
17604
S27H

3997
5843
8643
5334

001115
074256
001116
001226
074122
001112
001214
001156
001155
001120
001124
046324

5384
S70#
8749+
9165
524N
5564
5564
5544
5624
90844
90834
572N
17564
17574

90854

8660

1800~

8468

8949
89344
6572

8783

8938
8783

1801+
1802+

8662

86694

SEQ 0197

9015

9083

3967~
3692
5636
6800

3795
5702
8613

3896
5777
8641

8485
8513

8486
8941

8488

3553«
3554«
3555«

8954
3658+
3659+
3660~

8959
3761«
3762+
3763

8963
3862+
3863+
3864+

9002

3450+
3143
5279
6200

3557+
3285
5354
6266

3662~
3390
5620
6341

3765~
3480
5495
6423

3866+
3587
5561
6782

8474
8498

8476
8500

8478
8503

8480
8505

8482
8507

8483
8511

8995~
9010

9015
9012

9015

8657
87074

8659+

8669

8998«

9015
9074

8667

8669

3111w
89264
65844

1934
5148
5984
8670

8643
8454
9015

9015
6666

8647
8736

6716
8663«
9004

9083
8647
8669

8662
9009

8935

3963+

3964+
3965

4051+
4052+

8996+

D 16
MACY11 30A(1052)
02-MAY-78 10:03 PAGE 199
CROSS REFERENCE TABLE -~ USER SYMBOLS

MASSBUS RH70 AND RH11 _DIAGNOSTIC
CZRHBD.P11
02-maY-78 10:01
5S04

SNULL
001154
BNWTST= 000001

8783
20574

18314

2308
28734
3492

21634

4219
45874

41184
4430
L7994
5221

4907
56264
5851
63474

5708#

$SOCNT
$OVER
$PASS
$SPOWER
$PWRDN

$QUES
$SRDCHR
$RDDEC=
$RDL IN
SRDOCT
$RDSZ =
$REGAD

$REGO

$REG2
$REG3
$REG4
$REGS

074532
074704
000010
001160
001162

004140
004142
046346
AR AR N
AR

073216

$SCOPE
072602
$SETUP= 000017

$SS1
$ST

= 000000

004132

9067

90314
9168
90594
30994
90524
5544
5564

22264
2584
32944
3906

43224
4642
50574
5503

6447

2268
27234
3401

22064
2725
34904

2228
26224

22664
2624
33994

4324
L6934
5059
55674
5992

43750
4695
S159#
5569

40674
4377
L7464
5161
56424

2393
2518«
2635
2778
3099
3262
3440
3624+
3759
3953
5622%
6743

2448
2519
2655
2785+
3101
3322«
3444
3625+
3770
3955
5687«
6748~

2449
2521
2657+
2791
3103
3323«
3455
3648
3772
3957
5763«
6753+

5828+
6758+

8989

9007

60654

6067

4069

L4284
4748

52194
5644
61314

8654

8670

2260~
2493
2614
2686
2927«
3243
3412«
3547
3728«
3871
5340+
6251+
8474

2295+
2494
2616+
2735«
2935«
3245
3413«
3551
3751
3873
5405«
6327+
8476

2300~
2514
2632~
2736
3075~
3249
3436
3562
3753
3929+
5481«
6601
8486

3201

3202+

3610

9168
9168

8683+

1790
17824
9014
18194
17594

5264
6186~
8472

4014

6045%
8468

3165+
1855

2172

1771«

17624
17634
65864

9083

2255+
2492+~
2594
2684
2922+
3241
3367
3545
3727+
3860

2215x%
2458
2591«
2663
2830
3217+«
3354
3520«
3667
3854

2454~
2542
2660
2823
3118
3348
3505
3652
3829~
3972
«
5904
6763«
S57#
5584
S5
S60#
5614
17614

004136

$SAVRE=

$SAVRO

42694
4589
49584
5428
59244
6349

2180
25824
3155
39044
4271
464600
4960
55014
5926
6445H

1796

$R2A

L2 2

2178»
2485
3153#
3805

88595

87054
8684
S7a

001164
001166
001170
001172
001174

$REG]

SRHBA
$RHDB
SRHWC
$RTNAD

6133
8815+
8810+
8624
5254
8705

073672
073674
073034
001100
073220
073052
073206
073124
001222
074412

2165
24834
3046
38034

SEQ 0198

2709*

2715+

2567

2573«

2388«
2516«

2633
2773

3076«
3260
3438
3564
3755
3930+
5546~
6603
8503

8507

8691

8692+

8693

87094

1789
9020

1790
9089

1792

1794

1796

1798

1799

1801

6551

8623

2110

3112~

3254«

3359«

3449+

3556«

3661«

3764+

3865+

3966+

2452
2541+
2659+
2792
3107

3346
3457

3650
3828+

MASSBUS RH70 AND RH11

CZRHBD.P11

$STUP =
$SVLAD
$SVPC =
$SWR
=

02-MAY-78 10:01

177777
073006
000214
167700

$SWRMK=
STIMES
$TKB
$TKS
$TMPO
$TMP1

000000
001212
001146
001144
001176
001200

$TMP2
$TMP3
$TMP4
$TMP5
$TN
=

001202
001204
001206
001210
000100

$TP8
$TPFLG
$TPS
$TRAP
$TRAP2
$TRP =
$TRPAD
$TSTNWM
STTYIN
STYPBN=
$TYPDS

$TYPE
$TYPEC

$TYPEX

$TYPOC
$STYPON
$TYPOS
$XTSTR

E 16
MACY11 30A(1052)
02-MAY-78 10:03 PAGE 200
CROSS REFERENCE TABLE ~- USER SYMBOLS

_DIAGNOSTIC

001152
001157
001150
075006
075030
000011
075042
001102
074640
saxssax |
073676

073230
073400
073446

073474
073510

073450
072612

$$GET4= 000000
$OFILL 073673

17824
8632
5114
3234

338

1802

1799

2732

2589
3912
4649
5510
6451
8637
8981
344

4074
4755
5651

6552

8641
8983

8618

1840+

5684
S47n
S464
S624

5634
2665+
6759+
S64H
5654
S664
S674

3234
2272
2590
3294
39124

42254
4438
4693
49144
53694
5849
62814

33014

47024

5454
SS34

8772+

1794
91464
91504
9140
5264

91354

5484

9060

9163
88724
87304
875°
8776
88134
8812
88084
86264
6579

8809+

91594
91574
6534+
9061
9162
9150

8758
8778
9159
88154
9160

8813«

339

1840
2880
6125

4808

5717
6579
8984
8619
2065

9035
9033

9041
9039

2221+
2775«
6764+
6618«
2925
6656+
2067«
1831
2306
26314
3399

2256+
2826+
6765+
6619

2930

6657

2123

18404

23124
2723
34064

340

2065

2958
6175
4861
5792

6585
8643
8992
8639
2184«

»
2261
2865+
6769+
6625
6602+
6663«
2125+
2057
2369
27324
3490

5858
6587
8650
8999

343
2234
3301
433
5065

8615
8652

6384
5165
6074
8616
8663

2958+

4967

6536+

6552+

2296+
6602

2301~
6618

2451~
6764

2496+
6745+

6604

6610

6612+

2163
2437
28804
3598

21694
24434
2950
36044

2178
2446
29584
3702

6914

6770x
6627*
6603+
6664
2146

20654
23754
2873
34974

88584

2523«
6749+

2546+
6750+

2596+
6754

2637+
6755+

21844
2483
3044
37094

2226
24924
3050#
3803
L1754
4385

2234H

2266
25894
3159«#

4176
4428
464N
4862
S294H
5783

62154

6217
La374
4650
4905
5360
57924
6272

39N

9015

91684

6804

8613

8639

8661«

8666

8771

8823

8669

91674

87704

9161

8660+

91664

6778

3809

8657

9165

6551«
90824

2492

8650+

91634

6535«

1798

8618
8669

60744

91624

2443
3709

6215

5228
6140
8617
8666

6167
43844
4597
4852
52284
5708

91614

9158
8765
8781#

9015

570

6543
5369
6281
8623
8706

4437

4126
4375
45964
4809
5219
56514
6131

91604
9078

9007

569
2375
3604

4596

41254
4332
4587
48084
51654
564°2

59334
6445

54354
5924
63544
8783
8783
8783

5999

2272
3406

568
2312
3497

4118
43314
4544
4799
5159
55764
6065

4075
4322
45434
4756
50654
€847
59994

4067
42784
44N
4746
49674
5501

344

342
2184
3159
4278
4967
5933
8614
8651
9004

341
2169
3050
4225

40744
4279
4534
L755#
5057
55104
5990
64514

40124
4269
44904
4703
4958

SEQ 0199

61404

4490
5294

486N
5285
57174
6206

8670

2582
3153
38094

5435
6354
8635
8980

F 16
MACY11 30A(1052)
02-MAY-78 10:03 PAGE 201
CROSS REFERENCE TABLE -- USER SYMBOLS

MASSBUS RH70 AND RH11 DIAGNOSTIC
CZRHBD.P11
02-MAY-78 10:01

SLOCAT= worvnr

= 975064

8623

L574

1801
64944
8686

9001
LO1R
1802

65054
8708

L4664
18244

65164
8783

4684
18284

65644
89264

511

18714

6587
89734

5124

19104

6588#
9015

S14n
1931#
66094
9018

5164
1952#
6624H#
90824

SEQ 0200

5234

19734

66984

9083

574
19904
68154
9089

17364
2160
84674

17394

246054
8669

1787
64824

8670

G 16
MACY11 30A(1052)
02-MAY-78 10:03 PAGE 203
CROSS REFERENCE TABLE == MACRO NAMES

MASSBUS RH70 AND RH11 _DIAGNOSTIC
CZRHBD.P11
02-MAY-78 10:01

SEQ 0201

CLEARS
COMMEN
DBLTST

24364
L4554
40674

6743

6748

6753

6758

6763

6768

4074

4278

4331

4384

6437

4490

4543

4596

4649

4755

4808

4861

4914

ERROR

3494
2262
2425
2712
3014
3140
331
3539
3686
3877
64045

2013
2297
2427
2718
3017
3148
3375
3549
3689
3881
4057

2017
2302
2429
2766
3020
3198
3380
3566
367
3886
4062

2023

2129
2364
2433
2776
3027
3247
3387
3572
3757
3893

2134
2390
2478
2322
3032

2139
2407
2513

2144
2409
2540
2861
3039
3270
3442
3584
3780
3959

2156

221
2417

2217
2419
2653
2936
3128
3342
3474
3673
3848
3991

2222
2421
2681
2942
3133
3352
3477
3677

2257
2423
2705
3009
3137
3369
3485

6392

5273
5484
5638
5840
6051
6203
6416

2151
2611
2564
2866
3095
3275
3459
3592
3785
3976
4213
4632
5040
5276
5487
5639
5845
6054
6254
6419

2165
25814
3296
4069

2180
26214
3401
4120

22264
2624
3492
L1674

2228
27224
35974

5362
6349

5503
6447

ENDCOM

L4554

4420
4795
5152
5356
5558

ESCAPE
GETPR]
GETSWR
MSG

5769
5921
6127
6336
4554
4554
4554
18304

2371
30444
39044

4377
51594

MULT
NEWTST

6067
4554
4554
2950

4269

POP
PUSH
REGCLR
REPORT
REWR
SAVE

SCOPE

5159
6206
4554
4554
17674

4554
17674
1767#

2843

4192
4988
5954
3504

2957

4277
5164

SETPR]

6214
4554

4424
4844
5155
5357
5563

5772
5972
6128
6339

4473
4848
5176
5408
5564

5775
5978
6189
6343

4114
4526
4901
5211
5417
5628
5780
5986

6195
639N

6208

21634
2485
32944
L0674
4589
5287
63474

1831
3044

2057
3153

2178
3399

5219
6272
8695
B676
2234

5285
6347
8696
8682
2274

1833

20574

4430
5161

4483
52194

24364
3046
3906
6133

4322

2439
31524
40064

4375

5228
2189
2899
4242

5369
2238
2983
4297

6030
1839
3049
4330
5227
6280

6095
2064
3158
4383
5293
6353

5023

5085

4481
5426

3264

3395
3577
3774
3901

4159
4530
4950
5216
5422
5631
5831
5987
6198

4642

2226
3490

4534
5501

4209
4583
5005

4748

2306
3702

4640
5642

4801
5569

2369
3803

4693
5708

2613
2932
3124

3470
3671
3800
3987
6314

4367
4742

6062
6268
6428

4318
4738
5102
5346
5498
5704
5913
6113
6269
6429

2268
28734
37014
4219

23064
2875
3704
L2684

2308

4689

5053
5343
5497
5699
5910

6422

4169
4854
5644

2437

3904
4746
5783

49584

5785

2483

3858

2582

4067

4799
5849

4852

2638
3831

2666

5924

4960

5851

2622

4118
4905
5990

5142

5549
5705
5916
6119
6330
6737

29504
38034
427
50574
5926

2723

4167
4958

6065

3682
3875
4002
4371
47N

5146
5352
5555
5766
5920
6122
6333

23694
2952
3805
4324
5059
5992

2873

6217

5057
6131

9122
9101

5651

2325
3220

4403
5190
6236

2183
3405

4489

5434
6550

5792
2462
3325

4456
5249

6312
2233
3496

4542
5509

6215
2548
3627

4615
5466

2598
3730
4668
5531

2374
3808

2442
3911

4701
5716

4754
5791

3932

4721

5607

L4774
5672

249
40N
4807
5857

2588
4073
4860
5932

2689

4028
4827

5748

2630

6124
4913
5998

2749

4093
4880

5813

2731

4174
4966

6073

2805

4142
4933
5889

287Y

6224

6139

MASSBUS RH70 AND RH11

CZRHBD.P11

SETTRA
SETUP
SKIP
SLASH
SPACE
STARS

H 16
MACY11 30A(1052)
02-MAY-78 10:03 PAGE 204
CROSS REFERENCE TABLE == MACRO NAMES

DIAGNGOSTIC

02-MAY-78 10:01

91504
4554
4554

9159
1782
2273

9160

9162

9165

9166

9167

2446

4075
4862

6126
4915

4176

4226

4279

4332

4438

4491

4544

4597

1699
2057
2310
2950
3707

470
1709
2063
2369
2956
3803

506
1713
2068
2373
3044
3807

519

574
1725
2081

1485

1647
1733
2167
2582
3299

1649
1735

1666
1749

1675

1678
1779

1680
1831

1689
1838

4650
4554
4554
4S54

4703

4756

1720

2077
2441
3153
3910

4375
4753

4269
L647
5159
5649
6206
6719
8610
4554
20574
3715
4656
5519
2872#

4276
4693
5163
5708
6213
6721
8672
18034
2313
3816
4709
5595
3075

4322
4700
5219
5715
6272
6739
8688

3917
4762
5660

4081
4868
5801

4554
4554

6565

6572

6638

8941
4554
6467
6695
17674
S174
517#

1991
8965
1821
6479
6702
5294
556
562

6471

6483

1825
6491
6709
5435
557
563

1856
6502

1831
3044
4322
5219
6272
9159
2273

2057
3153
4375
5285
6347
9160
2446

2163
3294

$ESET
$$SKIP

4554
2950
4269
5159
6206
91504
L5540

EQUAT
.HEADE
KT
.SETUP

3234
3234
3234
3234

345
324
471
1781

SWRSU

TIME

TRESC
TRMTRP
TYPBIN
TYPDEC
TYPNAM

TYPNUM
TYPOCS
TYPOCT

TYPTXT
XRCYSR
$SCMRE
$SCMTM
$SESCA
SONEWT

. SWRHI
.SWRLO
LSACT
.SCATC

SEQ 0202

91504
4554

5285
5790
6347
6774
8785

2793

2344

4006
4382
4799

5292
5849
6352
6776
8862

2831

2490
3294

4010
4428
4806
5360
5856
6445
6795
8929

4067
4435

4852
5367

2887

2178
2587
3399
4072
4481
4859
5426

5931
6542
6818
9017
3062

6664

6684

6506

6517

1862

1868
6561

6568

6606

6621

6140

6281

2306
3702

2369
3803

6167
4541
4958
5508
6065
6642

6827

5091

3204

3167

6083
3828

6495

3624

2232
2723
3495

4118
4488
4905
5633
5990
6590
6821
9023
4338
5113
6159
3929

4180
4976
5942

1764

2182
2622
3404

4285
5073

4130
4921
5877
3519

3612

3217

2483
3157

1728
2163

4444

5237
6300

2266
2730
3598
6173

4587
4965

5567
6072
6644

7257
9129

3310

2270
2873
3602
4217
4594
5057
5574
6131
6669
7259

2306
2878
3702

4223
4640
5063
5642
6138
6671
8544

3612

4497
5313

3507
4550
5378

4603

6377

6723

5454

4554
4554
4554

4S54

4650

3234
3234
3234
3234

4703

334
3654
507
455

4756

5576
558
564

4428
5360
6445
9161

2590

4809

6513
6812
5717

1906

6657
1927

1948

1969

6646

6691

6700

6707

6714

6810

1987

2033
6659

2049

2402
6678

6463
6686

2483

2582
4067
4852
5924

6118
4905
5990

2622

2723
6167

4958

6065

4217
5057
613

4438

44691

4544

4597

6651

559
565

5858
560
566

5999

2178
3399

2226
3490

2266
3598
4587
5567

4640
5642

4693
5708

4746
5783

4006
4799
5849

9166
4176

9167
4226

4279

4332

4385

4481

5426

4534
5501

9162
4075
4862

9165
4126
4915

6673

567
2437
3904

2873

MASSBUS RH70 AND RH11 DIAGNOSTIC
02-MAY-~78 10:01
CZRHBD.P11

.SCMTA
.SEOP
.SERRO
.SERRT
. SPOWE
.SRDOC
.SREAD
.$SCOP
.STRAP
.$TYPD
.STYPE
.$TYPO

3234
323
3234
3234
323
32
323
323
3234
3234
323n
323

517
6540
8974
8927
8670

. ABS.

075064

000

ERRORS DETECTED:

1 16
MACY11 30A(1052)
02-MAY-78 10:03 PAGE 205
CRUSS REFERENCE TABLE == MACRO NAMES

9089

9015
8608

9127
8860

8713
8783

CZRHBD.BIN,CZRHBD.LST/CRF/SOL/NL
: TOC=CZRHBD.P11
36 30 3 SECONDS
RUN-TIME RATIO: 501/71=7.0
(55 PAGES)
CORE USED:
28k
RUN-TIME:

SEQ 0203