Digital PDFs

AH-8545C-MC

January 1979

142 pages

Original

8.4MB

view download

OCR Version

7.2MB

view download

Document:	CZDMCC0 DMC-11 BASIC W-R MICRO PRO JAN 1979 bw
Order Number:	AH-8545C-MC
Revision:	000
Pages:	142
Original Filename:	CZDMCC0__DMC-11__BASIC_W-R_MICRO_PRO__AH-8545C-MC__JAN_1979_bw.pdf

OCR Text

BASIC W/R MICRO PRO

cZDMCCO

AH-8545C-MC

JAN 1979

Eflbflflfifl

MADE IN USA

CJOMC
WACY'] SOA(I0S2)
20-AUG=78
CIOMCC.P'Y
11-AyG-78 08:21
1

12:19
REM

PAGE

SEQ 0001

8§

11
12
13

IDENTIF ICATION

RODUCT

PRODUCT NAME:

CZDMCCO BSC W/R MICRO-PROC

DATE :

SEPTEMBER 1978

MAINTAINER:

DIAGNOSTICS

CODE:

AC-8544C-MC
TST

25
26

29
30
31
32

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

35
36
3

FHE SOF TWARE DESCRIBED IN THIS DOCUMENT IS FURNISHED
UNDER
A
_JCENSE
AND MAY ONLY BE USED OR COPIED IN ACCORDANCE WITH THE
TERMS OF SUCH LICENSE.

DIGITAL EQUIPMENT CORPORATION ASSUMES

40
4
[

[OCUMENT.

"HE
USE
OR RELIABILITY OF
NOT SUPPLIED BY DIGITAL.

WITHOUT
DIGITAL
ASSUMES
IN THIS

RESPONSIBILITY

[TS SOFTWARE ON EQUIPMENT THAT

FOR

COPYR]GHT (() 197¢, 1978 BY DIGITAL FQUIPMENT (ORPORAT]ON

12:19

PAGE 2

SEQ 0002

ABSTRA(T
THE

FUNCTION OF

THE

DMC11

CIAGNOSTICS

OPTION
OPERATES ACCORDING TO SPECIFICATIONS.
VERFIY THAT THERE ARE NO MALFUNCTIONS AND THE

VERIFY

THE DMC!1 ARE CORRECT IN ITS ENVIRONMENT.

PARAMETERS MUST BE

SET UP TO

PROGRAM DETERMINES

THE

ALERT

THE

THAT

THE

THE DIAGNOSTICS
ALL
OPERATIONS

DIAGNOSTICS

DMC11 CONF IGURATION.
THESE
PARAMETERS ARE (ONTAINED [N THE
STATUS
TABLE
AND
ARE
GENERATED
IN
TWO
WAYS:
')
MANUAL
INPUT = THE
OPERATOR
ANSWERS QUESTIONS.
2) AUTOSIZING - THE
PARAMETERS AUTOMATICALLY.

CZDMC TESTS THE DMC11 MICRO-PROCESSOR (M8200-YA OR
M8200-YB).
[T
PERFORMS
WRITE/READ
TESTS
ON
THE DMC UNIBUS REGISTERS,
CHECKS THE MICRO-PROCESSOR OPERATION, (HECKS OUT MAIN
MEMORY,
SCRATCH
PAD
MEMORY,
THE ALU FUNCTICNS AS WELL AS INTERRUPTS

AND NPR OPERATION.
CZDMC PERFORMS NO TESTS ON THE
LINE
UNJT
OR
ANY (CROM DEPENDENT TESTS.
IT DOES NOT REQUIRE A LINE UNIT
TO RUN.
NOTE:
THIS DIAGNOSTIC WILL RUN ON A
KMC11
(M8204),
HOWEVER
IT
IS
NOT
ADVISEC
THAT THIS DIAGNOSTIC BE USED TO

CHECK A KMC11, RATHER YOU SHOULD
DIAGNOSTIC PACKAGE
.
CURRENTLY THERE ARE

CHECK A KMC11

NOTE:

CZDMC
CZDME
DZDMF
DZDMG

FIVE

AN ERROR

ADDITIONAL DIAGNOSTICS MAY BE ADDED

THE

WITH THE

FIVE OFF LINE DIAGNOSTICS THAT ARE

RUN
IN
SEQUENCE
TO
INSURE THAT IF
WILL BE DETECTED AT AN EARLY STAGE.

N SN
—

CcOMC
MACYTT 30A(1052)
24-AUG-78
crpMCcc.P1
11-A1G-78 08:21

KMC11

SHOULD OCCUR

IN THE FUTURE.

DIAGNOSTICS ARE:

[REV]
[REV]
[REV]
[REV]

BASIC W/R AND MICRO-PROCESSOR TESTS
DDCMP MODE LINE UNIT TESTS
BITSTUFF LINE UNIT TESTS
JUMP AND CROM TESTS

DZDMH [REV] FREE-RUNNING TESTS

REQUIREMENTS

col

EQUIPMENT

(HEAT TEST TAPE)

ANY PDP11 FAMILY CPU (EXCEPT AN LSI=11) WITH MINIMUM 8k MEMORY
ASR 33 (OR EQUIL IVALENT)
DMC11-AR (M8200-YA) OR A DM(17-AL (MB200-YR)

CZDMC
MACY1T 30A(1052)
24~AUG~78
11-AUG~-78 08:21
CZDMCC.P11

12:19

PAGE

SEQ 0003

93
94

2.2

Ic R n 2o 3B IRIRIC2S L IR

STORAGE
PROGRAM WILL USE

ALL

MEMORY

EXCEPT

WHERE

ABL

AND

BOOTSTRAP
|OADER
RESIDE.
LOCATIONS 1500 THRU 1640;
CONTAIN
THE "'STATUS TABLE'' INFORMATION WHICH IS GENERATED AT START
OF
DIAGNOSTICS
BY
MANUAL
INPUT
(QUESTIONS)
OR
AUTOMATICALLY

D e

(AUTO-SIZING).
ALTERED BY THE

THIS AREA
OPERATOR.

[S AN OVERLAY AREA AND

SHOULD NOT BE

d ed

LOADING PROCEDURE

ME THOD

ALL

PROGRAMS ARE

ABSOLUTE LOADER.

IN ABSOLUTE

NOTE:

LOADED

USING

THE

OR
HAS

(CASSETTE,
FOLLOW
INSTRUCTIONS
BEEN
PROVIDED ON THAT SPECIFIC

MEMORY

R REN RS o

_—

e
D e

RIS RN

SIZE

20K
24K
28k

11
13
15

12K
16K

md e
b
b
=S
b
—_—

=«

57
77

NNN

)
D

ABSOLUTE LOADER STARTING ADDRESS +500

D e

D ed e

AS DISK ,MAGTAPE,DECTAPE,
;ggIATHE
MONITOR
WHI(H

FORMAT AND ARE

THE DIAGNOSTICS ARE ON A MEDIA SUCH

3.1.1

PLACE ADDRESS OF ABS LOADER INTO SWITCH REGISTER.
(ALSO PLACE ‘HALT' Sw UP)

3.1.2

DEPRESS

3.1.3

DEPRESS 'START KEY' ON (ONSOLE
BE LOADING INTC (PU)

°'LOAD ADDRESS'

KEY ON (ONSOLE AND RELEASE.

AND RELEASE

(PROGRAM SHOULD NOW

CZOMC
MACY11 30A(1052)
24-AUG-78
CZDMCC.P1T
11-AUG-78 08:21
135
1356
1%;

139
140
141

142
143

164
145

146
}2;

12:19

PAGE &

SEQ 0004

STARTING PROCEDURE

A.
B.
C.

SET SWITCH REGISTER TO 000200
DEPRESS 'LOAD ADDRESS' KEY AND RELEASE
SET SWR TO ZERO FOR

'AUTO SIZING'

OR SWR BITO=1

FOR MANUAL

DIAGNOSTIC.
DEPRESS 'START KEY'

AND RELEASE.

THE

WILL

INPUT (QUESTIONS) OR SWR BIT7=1 TO USE EXISTING PARAMETERS
SET UP BY A PREVIOUS
START
OR
A
PREVIOUSLY
RUN
DMC11
PROGRAM

TYPE

MAINDEC NAME AND PROGRAM NAME (IF THIS WAS THE FIRST START
UP OF THE PROGRAM) AND ALSO THE FOLLOWING:

1.9
s

MAP OF DMC11 STATUS
eememmcccecc———e———-

151
}2%

(SR

STAT1

STAT?2

STAT3

177777
177777

000000
000000

154

155
}29
158
159
160

001520 160010 145310
001510 160020 145320

“HE PROGRAM WILL TYPE °'R' AND PROCEED TO RUN
THE
DIJAGNOSTIC.
THE
ABOVE IS ONLY AN EXAMPLE.
TIH]S WOULD INDICATE TAE STATUS
TABLE STARTING AT ADD.
1500 IN THE PROGRAM.
IN THIS
EXAMPLE
THE

THE

TABLE

CONTAINS

STATUS

TABLE

IE PDONE.

FOR

HELP.

THE

VERIFIED BY

INFORMATION OF

THE DIAGNOSTIC WAS

PARAMETER

INFORMATION AND

MUST BE

INPUT

THEN

HOW MANY DM(11°'S

TO BE

QUESTIONS ASKED AND

SOME

USER

Sw00-1

FOLLOWING

EXAMPLE

TWO DMC11°'S.
AUTO

SIZING

INDICATING

MANUAL

STATUS TABLE SEE

<TARTED WITH
THE

STATUS OF

THE

SHOWS

ANSWERS:

SECTION 8.4 FOR

AN EXAMPLE

THE

TYyPE

‘11'',

PRINTED

OUT

TESTED?

(SR _ADDRESS?160010
VECTOR ADDRESS?310

BR PRIORITY LEVEL?
(4,5,6,7)?5
DOES MICRO-PROCESSOR HAVE (RAM?
(Y OR N)N
WHICH LINE UNIT?
IF NONE TYPE 'N'',
IF
M820*

M8202 TYPE '2''1
[S THE LOOP BACK CONNECTOR ON?Y
SWITCH PAC#1 (DDCMP LINE#)Z377
SWITCH PAC#2 (BMB73 BOOT ADD)?377
FOLLOWING

THE

QUESTIONS

THE

STATUS

MAP

DESCRIBED
ABOVE,
THE
INFORMATION
IN
THE
MAP REFLECTS THE
ANSWERS TO THE QUESTIONS.
IF THE DJAGNOSTI(C WAS STARTED
WITH

SW00=0

AND ONLY

AND

THE

SW07-0

(AUTO-S5IZING)

STATUS-MAP IS PRINTED

THEN NO QUESTIONS ARE ASKED
O0UT.

AUTO-SIZING

USED
THE
STATUS
INFORMATINN MUST BE VERIFIED TO BE CORRE(CT
‘MAT(H The HARDWARE).
IF IT DOES NOT MATCH THE
HARDWARE
THE
DIAGNOSTIC

MuST

RESTARTED

WITH SW0O=1

AND

THE

QUESTIONS

CZOMC
MACYTT 30A(1052)
24~AUG-78
CZ0MCC.P11T
11-AUG=-78 08:21

12:19

e
D D ) D D

W
NS

NoYo RNo XV, F NN U P) OV ~NCG

[ASTaSTN
1A [ N T,81,8]1,8],¥] AINININI
NI NINI N

NS
SSE385R3%

191
192
193

PAGE 5

SEQ 0005

ANSWERED.
4.1

CONTROL

SWITCH SETTINGS

SW 15 SET:

HALT ON ERROR

SW 13 SET:
SW 12 SET:

INHIBIT ERROR PRINT OUT
INHIBIT TYPE OQUT/ABELL ON ERROR.

Sw 14 SET:
SW 11

[OOP ON CURRENT TEST

SET:

INHIBIT ITERATIONS.

(QUICK PASS)

Sw 10 SET:
SW 09 SET:

ESCAPE TO NEXT TEST ON ERROR
LOOP WITH CURRENT DATA

W Q7 SET:
Sw 06 SET:

USE PREVIOUS STATUS TABLE.
HALT IN
ROMCLK
ROUT INE

Sw 08 SET:

SW
SwW
Sw
Sw
Sw

05
04
03
Q2
Q1

CATCH ERROR AND LOOP ON IT

M1 CRO-PROCESSOR

SET:
SET:
SET:
SET:
SET:

BEFORE

RESERVED
RESERVED
RESELECT DM(11'S DESIRED ACTIVE
LOCK ON SELECTED TFST
RESTART PROGRAM AT SELECTED TESi

SW 00 SET:

BUILD NEW STATUS TABLE
AND
SWO0 O
A
NEW
AUTO-SIZING)

FROM QUESTIONS.
(IF Sw07=0
STATUS
TABLE
IS
BUILT BY

SWITCH 06 AND 08-15 ARE DYNAMIC AND CAN BE

CHANGED

STEGaéégff.

WHILE
A

THE

CLOCKING

DIAGNOSTIC

IS RUNNING.

SWITCHES 00-03 AND

AND LRE USED ONLY ON STARTING

NEEDED

SWITCH 07

RESIARTING

THE

CZOMC
MACYT1 30A(1052)
24-AUG-78
CZ0MCC.PI1
11-AUG~78 08:21

%S%

224
225
226
227
228
229
S%Q
232
233
234
235
236

12:19

PAGE 6

4.1.2

SWITCH REGISTER OPTIONS

RESTART PROGRAM AT
SELECTED
TEST.
IT
IS
STRONGLY
SUGGESTED
THAT AT LEAST ONE PASS HAS BEEN MADE BEFORE
TRYING TO SELECT A TEST, THE REASON BEING IS THAT
THE
PROGRAM HAS
TO
CLEAR AREAS AND SET UP PARAMETERS.
WHEN THIS SWITCH IS USED THE DIAGNOSTIC WILL ASK
TEST
NO.?
ANSWER BY TYPING THE NUMBER OF THE TEST DESIRED
?ggTCARRIGE RETURN TO BEGIN EXECUTION AT THE
SELECTED

sWw 02

LOCK ON SELECTED TEST,
THIS
SWITCH WHEN USED WITH
SWO1
WILL CAUSE THE PROGRAM TO CONSTANTLY LOOP ON THE
SELECTED TEST.
HITTING ANY KEY ON
THE
(ONSOLE
WILL
ET
IT
ADVANCE TO THE NEXT TEST AND LOOP UNTIL A KEY

IS HIT AGAIN.

238
528

2643

244
245
246
247
248
249
gg?

252
253
254
255
256
257
258
259
260
261
262

(AT START UP)

SW 01

237

241
242

SEQ 0006

SWO2=0

WHEN

SWO1

USED.

THE

PROGRAM WILL
BEGIN AT THE SELECTED TEST AND CONTINUE
NORMAL OPERATIONS.
Sw 03

RESELECT DMC11°'S DESIRED ACTIVE.
PLEASE NOTE
THAT
A
MESSAGE
IS
TYPED OUT FOR SETTING THE SWITCH REGISTER

EQUAL TO DMC11°'S ACTIVE.

THIS MEANS IF THE SYSTEM HAS

FOUR
DMC11S;
BITS
00,01,02,03 WILL
BE ScT IN LOC
'DMACTV'
FROM
THE
SWITCH REGISTER.
USING
THIS
SWITCH(SWOO0)
ALTERS
THAT
LOCATION; THEREFORE IF FOUR
DMC11S ARE IN THE
SYSTEM
=*««DO NOT**«
SET
SWITCHS
GREATER
THAN Sw 03 IN THE UP POSITION.
THIS WOULD BE
A FATAL ERROR.
DO NOT SELECT MORE ACTIVE DMC11S
THAN
THERE IS INFORMATION ON IN THE STATUS TABRLE.

METHOD: A:
B:
C:
D:

t:
F:

LOAD ADDRESS 200
START WITH Sw 00=1
PROGRAM WILL TYPE ME
JE
SET A SWITCH
FOR
FEtA(H DMC
DESIRED
ACTIVE.
EXAMPLE:
IF YOU HAVE 4 DMC'S BUT ONLY WANT TO
RUN THE FIRST AND THE LAST SET SWR BITS O AND
3 = 1.
PRESS CONTINUE
NUMBER (IF
VALID)
WILL
BE
IN DATA LIGHTS
(EXCLUDIMG 11/05)
SET WITH ANY OTHER
SWITCH
SETTINGS
DESIRED.
PRESS (UNTINUE.

12:19

PAGE 7
SEQ 0007

DYNAMIC

SWITCHES

ERROR SWITCHES

SW
SW
SW
SW
SW

6.1 .3

N SN
—

COMC
MACY1T 30A(1052)
24~-AUG-78
11-AUG~78 08:21
CZDMCC.P1

SCOPE

12
13
15
08
10

DELETE PRINT QUT/BELL ON ERROR.
DELETE ERROR PRINTOUT.
HALT ON THE ERROR.
GOTO BEGINNING OF THE TEST(ON ERROR).
GOTO NEXT TEST(ON ERROR).

SWITCHES

Sw0é6

<W09

HALT
IN
ROMCLK
ROUTINE
BEFORE
CLOCKING
MICRO-PROCESSOR
INSTRUCTION.
THIS
ALLOWS
THE
OPERATOR TO SCOPE A MICRO-PROCESSOR INSTRUCTION IN
THE
STATIC
STATe
BEFORE
IT
IS
CLOCKED.
HIT
CONTINUE TO RESUME RUNNING.

(IF ENABLED BY

ORINTED

)

'SCOP1') ON AN ERROK;

IN FRONT OF

SWO9

THEREFORE

THE

TEST NO.

INCORPORATED

IF AN

(EX.

THAT

‘'x'

=*TEST NO.

TEST

SWO09 IS USUALLY THE BEST SWIT(H FOR

AND
THE

SCOPE LOOP (SW14=0, SW10=0, SW09-1,
Sw08-0).
IF
SWO9
IS
NOT ENABELED;
AND THERE IS A HARD ERRCR
(CONSTANT);

SWO8

SW09=0, SWO8=1).

WILL LOOP ON TEST

SWi

SW14

ERROR.
INHIBIT

BEST.

REGUARDLESS

(SW14=1, SW10=0,
INTERATIONS.

LOOP ON CURRENT

(SW14=1,0,

SwW10-0,

FOR INTERMITTEMT ERRORS;
SW09 0,

ERROR

SwW08-1,0)

Sw14-1

NOT

TEST,

STARTING ADDRESS
STARTING ADDRESS IS AT 000200
THERE
ADDRESSES FOR THE DMC11 DIAGNOSTICS.
NOTE :

ARE
NO
OTHER
STARTING
(SEE SECTION 4.0)

IF ADDRESS 000042 IS NON-2ERO THE PROGRAM
ASSUMES
|T
IS
UNDER
ACTI1T
OR
XXDP
CONTROL
AND
WILL
ACT
ACCORDINGLY Ar'TER ALL AVAILABLE DMC11°'S ARE TESTED THE
PROGRAM WILL RETURN TO 'XXDP' OR 'A(CT=-11°.

OPERATING PROCEDURE
wHEN PROGRAM IS INITIAL_Y STARTED
MESSAGES
AS
DESCRIBED
IN
SECTION
4.0
wiL.
BE PRINTED, AND PROGRAM WILL REGIN RUNNING
THE

DIAGNOSTI(

| CZOMC

MACY11 30A(1052)

)

Lo
Lo
oL -—

ININWNWWWNWN NN

D00 NN
Nn—

CZDMCC.P1T

24=AUG-78

11-AUG-78 08:21

12:19

5.2

PAGE 8

SEQ 0008

PROGRAM AND/OR OPERATOR A(CTION
THE

TYP]CAL

APPROACH SHOULD BE

HALT ON ERROR

SET Sw 13:

2.
3.

THE

(VIA SW 15

WHEN EVER AN ERROR OCCURS.

CLEAR SW 15.
SET SW 14:
(LOOP ON THIS TEST)

(INHIBIT ERRCR PRINT 0OUT)

TEST NUMBER AND PC

ERROR

MESSAGE

WILL BE

TYPED

(THIS DEPENDS ON THE

OQUT

TEST)

AND

TO GIVE

POSSIBILY

THE OPERATOR

AN IDEA AS TO THE SOURCE OF THE PROBLEM.
IF IT
IS
NECESSARY
TO KNOW MORE INFORMATION CONCERNING THE ERROR REPORT;
LOOK IN
THE

LISTING FOR

THAT

TEST

NUMBER WHICH WAS

NOTE THE PC OF THE ERROR REPORT
THE TEST CAN BE DETERMINED.

THIS WAY

AND

THEN

EXACT FUNCTION OF

ERROPS
AS DESCRIBED PREVIOUSLY
PC

TYPED OUT

THE

TIME

THERE
OF

WILL ALWAYS BE
ERROR

12-0).
IN MOST CASES ADDITIONAL
;NET?gRggE ERROR MESSAGE TO GIVE
H

6.2

TYPFD QUT

THE

(PROVIDING

TEST NUMBER AND
SW

0 AND

INFORMATION WILL BE
SUPPLIED
THE OPERATOR AN INDICATION OF

ERROR RECOVERY

IF FOR SOME REASON THE
DMC'1
SHOULD
‘'HANG
THE
BUS'
(GAIN
CONTROL OF BUS SO THAT CONSOLE MANUAL FUNCTIONS ARE INHIBITED)
AN INIT OR POWER DOWN/tIP IS NECESSARY FOR OPERATOR
TO
REGAIN
CONTROL
OF
CPU.
It
THIS
SHOULD HAPPEN;
LOOK IN LOCATION
"TSTNO' (ADDRESS 1226)FOR THE NUMBER
OF
THE
TEST
THAT
WAS
RUNNING
AT
THE
TIME OF THE CATASTROPHIC ERROR.
IN THIS WAY

THE OPERATOR WILL HAVE AN
AT THE TIME OF THE ERROR.

RESTRICTIONS

[

STARTING RESTRICTIONS

IDEA AS

TO WHAT

THE

DM(C11

WAS

DOING

SEE SECTION 4.
(PLEASE)
STATUS TABLE SHOULD BE VERIFIED REGUARDLESS OF HOW PROGRAM WAS
STARTED.
ALSO IT IS IMPORTANT TO USE THIS LISTING ALONG WITH

;ggelg;gRMATION
L

PRINTED

CON

"HWE

TTY

(OMPLETLY

[SOLATE

€OMC
MACY1T 30A(1052)
24-AUG-78
C2DMCC.P11
11-AUG-78 08:21

12:19

PAGE 9

SEQ 0009

359

360

gg;

7.2

363
364
365
366
367
368
%98
ggg

OPERATING RESTRICTIONS

THE FIRST TIME A DMC11 DIAGNOSTIC IS LOADED INTO CORE AND
RUN
THE STATUS TABLE MUST BE SET UP.
THIS IS DONE BY MANUAL INPUT
(SW00=1) OR BY AUTOSIZING
(SW00=0 AND
SW07-0).
THEREAFTER
HOWEVER
THE
STATUS
TABLE
NEED
NOT
BE SETUP BY SUBSEQUENT
RESTARTS OR EVEN LOADING THE NEXT DMC DIAGNOSTIC
BECAUSE
THE
STATUS
TABLE
IS
OVERLAYED.
THE
CURRENT PARAMETERS IN THE
SIATUS TABLE ARE USED WHEN SW07=1 ON START UP.
7.2

HARDWARE CONF IGURATION RESTRICTIONS

373
g;é

DMC11(M8200)~ JUMPER W1 MUST BE
BE IN THE OFF POSITION.

g;g

KM( (M8204)~ JUMPER W1 MUST BE

%;8

%g?

MISCELLANEOUS

g.1

EXECUTION TIME

IN, AND SWITCH 7 OF

E76

MUST

IN.

382
383
384

ALL DMC11 DEVICE DIAGNOSTICS WILL GIVE AN 'END
PASS'
MESSAGE
(PROVIDING NO
ERRORS
AND
SW12-0)
WITHIN & MINS.
THIS IS
ASSUMING SW11-1 (DELETE ITERATIONS) IS SET TO GIVE THE FASTEST

386
387
388
ggg

ON THE PDP11
SYSTEM.

385

POSSIBLE EXECUTION.

8.2

THE

ACTUAL

EXECUTION TIME DEPENDS GREATLY

CPU CONFIGURATION AND THE AMOUNT OF MEMORY IN THE

PASS COMPLETE

291
392
393
394
295
366
ggg

NOTF:
EVERY TIME THE PROGRAM IS STARTED;
THE TESTS WILL
RUN
AS
IF
SW'1
(DELETE
ITERATIONS)
WAS
UP
( 1).
THIS IS 10
"VERIFY NO HARD ERRORS' AS SOON AS
POSSIBLE.
THEREFORE
THE
FIRST
PASS
<-EACH
TIME
PROGRAM IS STARTED- WILL BE A 'QUICK
PASS' UNTIL ALL
DMC11°'S
IN
SYSTEM ARE
TESTED.
WHEN
THE
DIAGNOSTIC HAS COMPLETED A PASS THE FOLLOWING IS AN EXAMPLE OF
THE PRINT OUT TO BE EXPECTED.

399

END PASS CZDMC CSR:

28%

ERRURS:

402
403
404
405
406

NOTE:

4«07

175000 VEC:

0300 PASSES:

000001

000000

THE PASS COUNT AND ERROR COUNTS
ARE
CUMMULITIVE
FOR
EACH
DMC11
THAT IS RUNNING, AND ARE SET TO ZERO ONLY
WhHEN THE DIAGNOSTIC

IS STARTED.

THEREFORE

AFTER

OVERNIGHT RUN FOR EXAMPLE, THE TOTAL PASSES AND ERRORS
FOR EACH DMC11 SINCE THE DIAGNOSTIC
WAS
STARTED
ARE

RECLECTED [N PASSES:

AND ERRORS:,

C<OMC
MACY11 30A(1052)
24-AUG-78
11-AUG-78 08:21
czemcc.pP1

408
409
410
G

12:19

SEQ 0010

8. 4

412
413
414
415

416

67
418
619
420
421
622
423
424
425
426
427
428
429
430
43
432
433
434
435
436
437
438
439

446

a7
448
649
450
451
452
453
454
455
456
457
458
459
460
“6°

462
463

KEY LOCATIONS

RETURN

(1214)

CONTAINS THE ADDRESS WHERE PROGRAM WILL RETURN

(1216)

TSTNO

(1226)

CONTAINS THE NUMBER
PEFORMED.

RUN

(1316)

THE BIT IN
CURRENTLY

WHEN
ITERATION COUNT
TEST IS ASSERTED.

CONTAINS

PEFORMED.

IS REACHED OR

THE ADDRESS OF

THE NEXT

THE

DMCROQ-DMCR17
DMST00-DMST1?
(1500)-(1640)

DMACTY

(1306)

LOOP ON

TESTTM

TEST

BEF

NOW

BEING

'RUN' ALWAYS POINTS
TO
THE
BEING
TESTED.
EXAMPLE:

DM(C11
(RUN)

1302/00000090010000C0 MEANS
IS THE DMC11 NOW RUNNING.

THAT

DMC11

NO.06

THESE LOCATIONS CONTAIN THE INFORMATION NEEDED
TO TEST (P TO 16 (DECIMAL) DMC11S SEQUENTIALY.
THEY
CONTAIN
THE
CSR,VECTOR
AND
STATUS
CONCERNING THE CONFIGURATION OF EACH DMC11.

EACH BIT SET
THE

IN THIS LOCATION

ASSOCIATED

DMC11

WILL BE

INDICATES

TESTED

IN TURN.

EXAMPLE:

(DMACTY)
NO.

00,01,02,03,04 WILL BE

THAT DMC11

NO.

00.04 WILL BE

THAT DMC11

THAT

1276/0000000000011111 MEANS

EXAMPLE: (DMACTY) 1276/6000000000010001 MEANS

440
2]
442
443
L44

445

PAGE 10

DMCSR

g. GA

(1404)

'STATUS TABLE'
THE

TABLE

ggg;AINS

THE

(SR OF

THE

TESTED.

CURRENT

DM(11

UNDER

(1500-1640)

IS FILIED BY AUTO SIZING OR BY

THE

MANUAL

PARAMETER

INPUT (QUESTIONS) AS DESCRIBED PREVIOUSLY.
ALSO IF DESIRED BY
USER;
THE LOCATIONS MAY BE ALTERED BY HAND
(TOGGLED
N)
TO
SUIT THE SPECIFIC CONFIGURATION.
THE EXAMPLE STATUS MAP SHOWN BELOW
CONTAINS
TWO
DMC11°'S.
THE
TAB.E
(AN
(ONTAIN
UP

ESE&?HING

THE MAP

[S A DESCRIPTION OF

MAP OF
P(

(SR

DM(11

STAT

"SOO 160010 145310
001570 160020 016320

THE

INFORMATION
FOR
TO
16
DMC11°S,
BITS
FOR
FEACH
MAP

STATUS
STATZ2

STAT3

177777
000000

000000
000000

COMC
MACYTT 30A(1052)
24-AUG-78
11-AUG-78 08:21
CzZomcc.P1

12:19

PAGE

SEQ 0011

464

465

466

467

468
469
470
W7
472
473
674
475
476
477
478
479
480
481
482
483
484
485
486
4«87
488
489
490
N
492

EACH MAP ENTRY CONTAINS
&4
INFORMAT ION
FOR
1
DMC11,
THE

FIRS T OF

THE & WORDS

IS.

WORDS
WHICH
CONTAIN
THE
STATUS
THE PC SHOWS WHERE IN CORE MEMORY

DMC'S STATUS IS IN LOCATIONS,

IN THE EXAMPLE ABOVE

1500,

1502,

1504,

SECOND DMC STATUS IS LOCATED AT 1570, 1512,

THE
INFORMATION
FOLLOWS:

CONTAINED

{SR:

CONTAINS DMC11

STAT1:

BITS 00-08 IS DMC11

AND 1506.

1514,

IN EACH 4 WORD ENTRY

IS DEFINED AS

C3R ADDRESS

VECTOR ADDRESS

BIT15=1 MICRO-FROCESSOR HAS CRAM
BIT15=0 M1CRO~PROCESSOR HAS CROM

BIT14=1 TURNAROUND CONNECTOR IS ON
31T14=0 NO TURNAROUND CONNECTOR

BIT13=0 LINE UNIT IS AN M8201
BIT13=1 LINE UNIT IS AN M8202
BIT12=1 NO LINE UNIT
BITS 09-1" IS DMC11 BR PRIORITY LEVEL
STAT2:
STAT3:

LOW BYTE

HIGH BYTE

BITO=1

IS SWITCH PACA#1

1S SWITCH PAC#2

(DDCMP LINE NUMBER)
(BM873 BOO)

RUN FREE RUNNING TESTS ON KMC11

BIT1=0 DMC11-AR (LOW SPEED.
BIT1-1 DMC11-AL (RIGH SPEED)

ADD)

CZOMC
MACY1T 30A(1052)
24-AUG-78
11-AUG-78 08:21
czomcc.P1
493
494
495
496
497
498
499

12:19

PAGE

—

d
)
d
d
nd
—

00 YO N (NN
— (&)

SEQ 0012

8.5

METHOD OF AUTO SIZING

8.5.1

FINDINC

THE

CONTROL

STATUS REGISTER.

THE AUTO=-SIZING ROUTINE

500
501
502
503
504
505
506
507
508

(S IV, 1V, 1V, 1V, [V TV TV, N

FINDS A DMC11

FOLLOWS:

STARTS

AT ADDRESS 160000 AND TESTS ALL ADDRESS IN INCREMENTS OF 10 UP
TO AND INCLUDING ADDRESS 167760.
IF THE ADDRESS DOES NOT TIME
OUT,
THE FOLLOWING IS DONE, THE FIRST (ROM ADDRESS IS WRITTEN

TO A 125252 THEN IT 1S READ BACK.
IF
125252
OR 626 OR
16520 A DMC11 OF

IT
(CONTAINS
A -1
OR
“MC11 HAS BEEN FOUND, IF

NOT, THE ADDRESS IS UPDATED BY 10 AND
4E SEARCH COITINUES.
A
=1
INDICATES A DMC11 WITH NC CROM, A 125252 INDICATES A KM(C11
WITH CRAM, A 626 INDICATES A DMCT11-AL AND A 16520 INDICATES
A
DMC11-AR.
FURTHER
TESTS
ARE
PERFORMED
AT
THIS
POINT TO
DETERMINE
WHICH
LINE
UNIT,
IF
ANY,
IS
|INSTALLED,
IF
A
LOOP-BACK
CONNECTOR
IS INSTALLED AND VARIOUS SWITCH SETTINGS
ON THE LINE UNIT.
THIS
IS
WHY
THE
STATUS
TABLE
MUST
BE
VERIFIED
BY
THE
USER AND IF ANY OF THE INFORMATION DOES NOT
AGREE WITH THE HARDWARE THE DIAGNOSTIC MUST BE
RESTARTED
AND

THE
QUESTIONS
MUST
BE
ANSWERED.
ALL DMC11'S IN THE SYSTEM
WILL BE FOUND BY THE AUTO-SIZER.
IF IT DOES NOT FIND A
DM(C11
THE DIAGNOSTIC MUST BE RESTARTED AND THE QUESTIONS ANSWERED.

8.5.2

FINDING THE
THE

VECTOR

VECTOR AND BR LEVEL
AREA

(ADDRESS

300-776)

FILLED

WITH

THE

INSTRUCTION
IOT
AND_
'.+2'
(NEXT
ADDRESS).
THE PROCESSOR
STATUS IS STARTED AT 7 AND THE DMC IS PROGRAMMEC TO INTERRUPT.
THE
PS
IS
LOWERED BY 1 UNTIL THE DMC INTERRUPTS, A DELAY IS
MADE AND IF NO INTERUPT OCCURES AT PS LEVEL 3
(BECAUSE
OF
A
BAD
DMC11) THE PROGRAM ASSUMES VECTOR ADDRESS 300 AT BR LEVEL
5 AND THE PROBLEM SHOULD Bc FIXED IN THE DIAGNOSTIC.
ONCE THE
PROBLEM

FIXED;

THE

FPROGRAM SHOULD BE

RE-SETUP AGAIN

TO GET

BIR

CORRECT VECTOR.,
IF AN INTERUPT OCCURED;
THE ADDRESS TO WHICH
THE
DMC11
INTERUPTED
TO
IS
PICKED
UP AND REPORTED AS THE
VECTOR.
NOTE:
IF THE VECTOR RECORTED IS NOT THE
VECTOR
SET
LDJPONEBY
YOU.
THERE IS A PROBLEM AND AUTO SIZING SHOULD NOT BE

SOF TWARE

SWITCH REGISTER

IF THE DIAGNOSTIC
SWITCH
REGISTER

ALLOW USER

THE

IS RUN ON AN 11/04 OR QTHER
(PU
WITHOUT
THEN
A
SOFTWARE SWITCH REGISTER IS USED

SAME

SWITCH OPTIONS

AT ANY ALLOWABLE

TIME

DESCRIBED

A
TO

PREVIOUSLY.

[F
THE HARDWARE SWITCH REGISTER_DQES NOT EXIST OR IF ONE DOES
AND
IT
CONTAINS
ALL
ONES
('77777)
THIS
SOFTWARE
SWITCH

15 USED.

CONTROL :
TO OBTAIN CONTROL
THE

DIAGNOSTIC

THE

"ERMINAL ~SYBOARD.
THE DIAGNOSTIC, THE

OPERATOR

TYPES

DURING
A CTRL

AS SOON AS THE (CTRL G
FOLLOWING MESSAGE wILL

EXECUTION

C ON

THE

CONSOLE

IS
RECOGN]ZED,
BE DISPLAYED:

COMC
MACYN 30A(10;2)
24;AUG-78
CZoMCC.P1
11-AUG-78 08:2

12:19

549
550
gg}

PAGE

SEQ 0013

SWR=XXXXXX NEW?

553
554
555
556
557
558
559
22?

WHERE XXXXXX IS THE CURRENT CONTENTS QF
THE
SOFTWARE
SWITCH
REGISTER
IN OCTAL.
THE
SOF TWARE CONTROL ROUTINE WJLL THEN
AWAIT OPERATOR ACTION.
AT WHICH TIME THE OPERATOR S REQUIRED
TO
TYPE
ONE
OR_ MORE OF THE LEGAL CHARACTERS:
1) 0 - 7, 2)
LINE FEED(<LF>), 3) CARRIAGE
RETURN(<CR>),
OR
&)
(CONTROL-U
(CTRL
V).
NO_
C(CHECK
IS
MADE
FOR
LEGALITY.
IF THE INPUT
CHARACTER IS NOT A <LF>, <CR>, OR CTRL U IT ]S ASSUMED
TO BE
AN OCTAL DIGIT.

562
563
564
565
566
567
ggg

TO CHANGE THE CONTENTS OF THE SSR THE
OPERATOR
SIMPLY
TYPES
THE
NEW DESIRED
VALUE
IN OCTAL - LEADING ZEROS NEED NOT BE
TYPED.
AND TERMINATES THE INPUT STRING WITH A
<(R>
OR
<LF>
DEPENDING
ON
THE
PROGRAM ACTION DESIRED AS DESCRIBED BELOW.
THE INPUT VALUE WILL BE TRUNCATED TO THE LAST 6 DIGITS
TYPED.
AT
LEAST
ONE
DIGIT
MUST BE TYPED ON ANY GIVEN INPUT STRING

570
571
572
573
574
g;g

WHEN THE INPUT STRING IS TERMINATED WITH A <CR> THE DIAGNOSTIC
WILL
CONTINUE
EXECUTION
FROM
THE
POINT
AT
WHICH
T WAS
INTERRUPTED.
IF A <CR> IS THE ONLY THING
TYPED
THE
PROGRAM
WILL CONTINUE WITHOUT CHANGING THE SSR.
THE <LF> DIFFERS FROM
THE <CR> BY RESTARTING THE PROGRAM AS IF [T WERE RESTARTED
AT
ADDRESS 200.

577
578
ggg

IF A CTRL U IS TYPED AT ANY POINT IN THE INPUT STRING PRIOR TO
THE
TERMINATOR
THE
INPUT
VALUE WILL BE DISREGARDED AND THE

PROMPT DISPLAYED

581
§g%

TO SET THE SSR FOR
THE
STARTING
SWITCHES,
FIRST
LOAD
DIAGNOSTIC, THEN HIT CTRL G, THEN START THF DIAGNOSTIC.

PRIOP TO THE

584
585
586
587

TERMINATOR BEFORE A CHANGE

(SWR

TO THE SSR WILL OCCUR.

XXXXXX NEW?).

THE

CDMC
MACY11 30A(1052)
24-AUG-78
11-AUG~78 08:21
czomcc.P1

12:19

PAGE

INTRODUCTION "0 DMC11

DIAGNOSCTIC

SEQ 0014

s *AC=-8544(-MC _ CZDMCCO BASIC DMC11 CONTROLLER TEST
:*COPYRIGHT 1976,1978, DIGITAL EQUIPMENT (CORP., MAYNARD, MASS.
C

- -

01754

- - -

- -

s STARTING PROCEDURE
;LOAD PROGRAM
;LOAD ADDRESS 000200

;SWR=0 AUTOSIZE DM(11
;SW07=1
USE CURRENT DMC11 PARAMETERS
;5W00=1
INPUT NEW DMC11 PARAMETERS

;PRESS START
.PROGRAM WILL

TYPE

"AC-8544C-MC

(ZDMCCO BASIC

DMC11

CONTROLLER

;PROGRANM WILL TYPE STATUS MAP
;PROGRAM WILL TYPE 'R'' TO INDICATE THAT TESTING HAS STARTED
;AT THE END OF A PASS, PROGRAM WILL TYPE PASS COMPLETE MESSAGE
JAND THEN RESUME TESTING
;SUBSEQUENT RESTARTS WILL NOT TYPE PROGRAM TITLE

TEST'

SUITCH REGISTER OPTIONS

SW15-100000

SW14-40000

1,HALT ON ERROR

1,LOOP ON CURRENT

TEST

SW13-20000
SW12=10000
SW11=4000

;
;
;

1.INHIBIT ERROR TYPEOUT
1.DLLETE TYPEOUT/BELL ON ERROR.
1,INHIBIT ITERATIONS

Sw09=1000
Sw08=400

;
.

1,L00P WITH CURRENT DATA
1.LO0P ON ERROR

SW05=40
Sw04=20
Sw03 10
Sw02 4
SwQ1=2
Sw00 °

:RESELECT DMC11°'S TO BE TESTED (ACTIVE)
JLOCK
ON TEST SELECT
:RESTART PROGRAM AT SELECTED TEST
JINPUT DM(11 PARAME TERS

SW10=2000

SwWQ/7-200
SwW06-100

;~1,ESCAPE

:
;

TO NEXT

TEST ON ERROR

1.USE CURRENT DMC11 PARAMETERS, =0,AUTOSIZE DM(11
1, HALT BEFORE CLOCKING MICRO-PROCESSOR INSTRUCTION

CZDMC
MACY11 30A(1052)
24-AUG-78
11-AUG-78 08:21
czomcc.PI

633
634

12:19
PAGE 15
GENERAL DEF INATIONS AND EQUIVALENCIES

;REGISTER DE€INI TIONS
000000

000006
000007

RO=X0
R1=X1
R2=%¢
R3=23
R4=24
RS %5
SP-%6
PC=%7

sGENERAL
;GENERAL
;GENERAL
;GENERAL
-GENERAL
sGENERAL

;PROCESSOR STACK POINTER
:PROGRAM COUNTER

sLOCATION EQUIVALENCIES
177776

001200

PS=177776

STACK=17200

;PROCESSOR STATUS WORD

:START OF

PROCESSOR STA(K

JINSTRUCTION DEF INITIONS
005746
005726
010046
012600
024646
022626

PUSH1SP=5746
POP1SP=5726
PUSHRO 10046
POPR0=12600
PUSH2SP=24646

PCP2SP=22626
EMT.HLT
EQUIV

JBIT DEFINITIONS
100000

040000

;DECREMENT PROCESSOR STA(CK " WORD
s INCREMENT PROCESSOR STACK 1 WORD
;SAVE RO ON STA(K

JRESTORE RO FROM STA(CK
JDECREMENT STACK TWICE
s INCREMENT STACK TWICE

;BASIC DEFINITION OF ERKOR CALL

SEQ 0015

12:19

PAGE 16

TRAPCATCHER FOR UNEXPECTED

ASSAS2E

A0SR

2
INTERUPTS

RdRt2

s TRAPCATCHER FOR

SEQ 0016

2222822022822

ILLEGAL

2222232223222 X222

INTERRUPTS

;THE STANDARD '‘TRAP CATCHER'' IS_PLACED

;BETWEEN ADDRESS O TO ADDRESS 776.

;1T LOOKS LIKE "PC+2 HALT''.
.

;:Qtttttttttt*tt't*tt*t'ti'tttt*ttfi*t*tttfit*fi*tk*tttt*tttt*tittttt'ttt

000000

.=0

s STANDARD INTERRUPT VECTORS

000024
005336
000340
004750
000340

. 24

;POWER FAIL HANDLER

“SEQVICE AT LEVEL

340
. TRPSRY
340

*SERVICE AT LEVEL 7
*GENERAL HANDLER D]SPATCH SERVICE
*SERVICE AT LEVEL 7

HLT

)

*ERROR HANDLER

:SAVE FOR ACT=11 OR XXDP

$ENDAD

*FOR USE WITH ACT=11

*RETURN ADDRESS IF UNDER ACT-11 OR XXDP
*SAVE FOR ACT=11 OR XXDP

000174
000000
000000

002002

174

001000
005377
055103

041501
046504

.=200

034055
041503

IMP

=1000

MTITLE: .ASCI]

LASCIZ

001200

.=1200

177570
17757G

DISPLAY:17757C
SWR:
177570

OR XXDP

:ACT=11 PROGRAM CHARACTERISTICS

DISPREG:0
SWREG:
0

000200
000137

0
0

000052
000000

001200
0012062

PFAlL

340

:SOF TWARE DISPLAY REGISTER
*SOF TWARE SWITCH REGISTER
.START

;GO TU START OF

<377><12>/AC-8544C-M(/<377>
/CZDMCCO BASIC DMC11

PROGRAM

CONTROLLER TEST/<377>

—~

CZ0MC
MACY11 30A(1052)
24=~AUG-78
czoMcc P11
11-AUG-78 08:21

731
;g%
734

12:19
PAGE 17
PROGRAM PARAMETERS,

VARIABLES, AND TRAP C(CALLS.

SEQ 0017

JINDIRECT POINTERS TO TELETYPE VECTORS AND REGISTERS

73S

001204

77560

TKCSR:

177560

JTELETYPE KEYBOARD CONTROL REGISTER

;%g

001212

177566

TPDBR:

177566

sJTELEPRINTER DATA BUFFER

736
737

001206
001210

177562
177564

760

;g;

001214
001216
001220
001222
001224
001226
001230

001232

001234

000000
000000
000000
000003
000000
000000
0C0000

000000

753

001236
001240
001242
001244
001246
001250
001252
001254
001256
001260
001262
001264
C01266
001270
001272
001274
001276

774
775
776
777
778
779

001302
001304
001306
001310
001312
001314

;g?

782
783

RETURN: 0
NEXT:
0
LOCK:
0
TCOUNT: 3
LPCNT:
O
TSTNO:
0
PASCNT: 0

;SCOPE ADDRESS FOR LOOP ON TEST
JADDRESS OF NEXT TEST TO BE EXECUTED
;ADDRESS FOR LOCK ON CURRENT DATA
;NUMBER OF ITERATIONS THAT CURRENT TEST WILL BE EXECUTED
JNUMBER OF JTEREATIONS COMPLETED
;NUMBLR OF TEST IN PROGRESS
JNUMBER OF PASSES COMPLETED

ERRCNT:

;TOTAL NUMBER OF

LSTERR:

;PC OF

ERRORS

LAST ERROR CALL

;PROGRAM VARIABLES

756
757
758
759
760
761
762
763
764
765
766
767
768
769
770
771
772

773

sTELETYPE KEYBOARD DATA BUFFER
JTELEPRINTER CONTROL REGISTER

ittt

750

177562
177564

;PROGRAM (ONTROL PARAMETERS

;4;

743
744
745
746
747
748
749

TKDBR:
TPCSR:

001300

001316

001320
001322

000000
000000
000000
000000
000G00
000000
000000
(000000
000000
000000
000000
000000
000000
000000
000000
000000
000000

STRTSW: 0
STAT:
0
CekX:
0
MASKX:
O
TEMP1:
O
TEMP2:
0
TEMP3:
0
TEMP4:
0
TEMPS:
0
SAVRO:
0
SAVR1:
0
SAVRZ:
0
SAVR3:
0
SAVRSG:
0
SAVRS:
(
SAVSP:
SAVP(:
0

000001
000000
000001
000001
000001
(000007

ONE :
MEML IM:
DMACTYV:
DMNUM:
SAVA(CT:
SAVNUM:

001472
001¢7¢

(REAM:
Mick:

000000

JERO:

RgNEN
EV

; TEMPORARY STORAGE
: TEMPORARY STORAGE
. TEMPORARY STORAGE
: TEMPORARY STORAGE
: TEMPORARY STORAGE
;RO STORAGE
JR1 STORAGE
JR2 STORAGE
;R3 STORAGE
;R4 STORAGE
;RS STORAGE
:STACK POINTER STORAGE
:PROGRAM COUNTER STORAGE

1
O

.BLKW
. BLKW
.BLKW
_BLKW
0

;SWIT(HES AT START OF PROGRAM
;DM STATUS WORD STORAGE

!
1
°
!

DM, MAF-¢
(NT
. MAP=4

JHIGHEST LOCATION FOR NPR'S

JDMC11°S SELECTED ACTIVE.
JOCTAL NUMBER OF DM(11°S,
JORIGINAL ACTV
DEVICES
;WORKABLE NUMBER
JPOINTER TO RUNNING DEVICE.

JTABLE POINTER,
;TABLE POINTER

CZDOMC
MACY11 30A(1052)
24-AUG-78
CzDMCC.P11
11-AUG~78 08:21

CZ0MC
MACY11 30A(1052)
24-AUG-78
11-AUG-78 08:21
czZomcc.P1
784
785
786
787
788
789

12:19

PAGE

PROGRAM PARAMETERS,

;PROGRAM (CONTROL

001324
001325
001326
001327

000
000
000
00C

INIFLG:
ERRFLG:
LOKFLG:

VARIABLES,

AND

FLAGS

.BYTE
.BYTE
.BYTE

Qv.FLG:

SEQ 0018

TRAP (ALLS.

;PROGRAM INITIALIZATION FLAG

.ERROR OCCURED FLAG

LOCK ON CURRENT TEST FLAG
;JQUICK VERIFY FLAG.

.BYTE

JON FIRST PASS OF

.EVEN

EACH DMC11

ITERATIONS WILL BE

;DEFINITIONS FOR TRAP SUBROUTINE CALLS
;POINTERS TO SUBROUTINES CAN BE FOUND
;IN THE TABLE IMMEDIATLY FOLLOWING THE DEF INITIONS
IR

001330

104400

001330

003576

001332

003736

001334

003766

001336

004050

104401

104402

104403

001340

104404
004154

001342

004174

001344

004374

001346

004434

001350

004466

01352

004472

001354

001360

005466
104413
005436
104414
005504

001362

005552

001364

005¢1¢

001356

104405

104406

104407

104410
104411

104412

104415

104416

R AN R

A AR T AR

AN A AR AN RN AN R RN NARA RN

A ANARARNNIRARNNARANNRNAN
RN AN

TRPTAR:

SCOPE-~TRAP+0

. CALL

SLIPT=TRAP+1
.SCOP1

JrALL T0 LOOP ON CURRENT DATA HANDLER

.SCOPE

TYPE=TRAP+?

TO SCOPE

LOOP AND

[TERATION HANDLER

s CALL

70 TELETYPE OUTPUT ROUTINE

s CALL

T0 ASCI1

SCAlL

4¢) INPUT ERROR HANDLER

JcALL

"C NUMERICAL

s CALL

TO REGISTER SAVE

sCALL

£¢) REGISTER RESTORE ROUTINE

; CALL

T0 DATA OUTPUT ROUTINE

s CALL

10 DATA OQUTPUT ROUNTINE

MSTCLR=TRAP+1?

s CALL

DELAY-TRAP+13

JCALL T DELAY

ROM(LK

JCALL

MY (LOCK ROM ONCE

JCAlLL

10 (LK DATA

.TYPE
INSTR=TRAP+3
.INSTR
INSTER=TRAP+4
. INSTER
PARAM=TRAP+5

SAV0OS5=TRAP+6
. SAVQS

RESOS=TRAP+7

.RESOS
CONVRT=TRAP+10

.CONVRT
(NVRT=TRAP+11
.CNVRT

MSTCLR

DELAY

TRAP+14

.ROMCLK
DATACLK-TRAP+1'S
LDATA(LK
TIMER TRAP 16
. TIMER
Y

(LA AR A

RN A

STRING

INPUT ROUTINE

DATA

INPUT ROUTINE
ROUTINE

WwlTHOUT

TR/LF.

ISUE A MASTER (LEAR

JCALL e DELAY A (LOCK T]ik

R R

R R R

XXX XXX

SUPPRESS

CZ0MC
MACY11 30A(1052)
24~AUG-78
11-AUG~78 08:21
czoMCcc.P11

12:19

PAGE

PROGRAM PARAMETERS,

;OM(C11 CONTRO.
001366
001370
001372

STAT1:

STA12:

star3:

001374
001376
001400
001402
001404
001406
001410
001412
001414

900000
301460

AND

TRAP (ALLS.

SEQ 0019

INDICATORS FOR CURRENT DM(C11 UNDER TEST

VECTOR AND REGISTER

DMRVE(:
DMRLVL:
DMTVEC:
DMTLVL:
DMCSR:
DMCSRH:
bMCTL:
DMPO4:
DMPO6:

Q
O
O
u
¢
O
O
O
O

INDIRECT POINTERS

JPOINTER
JPOINTER
JPOINTER
JPOINTER
;PCINTER
;POINTER
JPOINTER
JPOINTER
JPOINTER

TO
TO
TO
TO
TO
TO
TO
TO
TO

DMC11
DMC11
DMC11
DMC11
DMC11
DMC11
DMC11
DM(C11
DMC11

RECEIVER INTERRUPT VECTOR
RECEIVER INTERRUPT SERVICE PS
TRANSMITTER [NTERRUPT VECTOR
TRANSMITTER INTERRUPT SERVICE PS
CONTROL STATUS REGISTER
CONTROL STATUS REGISTER HIGH BYTE.
CONTOL OUT REGISTER
PORT REGISTER(SEL &)
PORT REGISTER(SE! €)

EMP STORAGE

TEMP:

.+40

;DMCT1 STATUS TABLE AND ADDRESS ASSIGNMENTC

Pal

;CONTROL STATUS REGISTER FOR DM(C11 NUMBER 01
;VECTOR FOR DMC11 NUMBER 01
;ODCMP LINE# FOR DMC11 NUMBER 01

CMCRO1:
DMS101:
DMS201:

.BLKW
.BLKW
.RLKW

.BLKW

00000
000001
000001
000001

DMCR0OZ2:
DMS102:
DMS202:
DMS302:

.BLKw
.BLKW
.BLKW
.BLkw

DMCRO3:
DMS103:
DMS203:

.BLKW
.BLtkw
.Blkw

.BLkw

;3RD STATUS WORD

DMCRO4:
OMS104:
oMS204:

.Bikw
,RLKW
BLKW

;CONTROL STATUS REGISTER FOR DM(11
JVECTOR FOR DM(C11 NUMBER 04
;DDCMP L INE# FOR DM(TM1 NUMBER (4

DMS303:

nms304:

Birw

—

DMS301:

000001
000001
000001
000001

—

23RD STATUS WORD

—

;CONTROL STATUS REGISTER FOR DMC11 NUMBER 00
JVECTOR FOR DMC11 NUMBER 00
;DDCMP LINEX FOR DMC11 NUMBER 00

Vo)

o
o

000001
000001
000001
000001

001500
=4

001416

VARIABLES,

;DMC11

23RD STATUS WORD

;CONTROL STATUS REGISTER FOR DM(11 NUMBER 02
;VECTOR FOR DM(C11 NUMBER 02
;DDCMP LINE# FOR DMC11 NUMBER 02
;3RD STATUS WORD

;CONTROL STATUS REGISTER FOR DM(1° NUMBER 03

;VECTOR FOR DM(C11 NUMBER 03
;DDCMP LINE# FOR DMC11 NUMBER 03

;3RD STATUS WORD

N\eMBER (4

SEQ 0020

DMCROS:
DMS105:
DMS205:
DMS305:

.BLKW
_BLKW
.BLKW
.BLKW

;CONTROL STATUS REGISTER FOR DM(11 NUMBER 05
;VECTOR FOR DMC11 NUMBER 05
;DDCMP LINE# FOR DMC11 NUMBER 05

001560
001562
001564
001566

000001
000001
000001
000001

DMCRO6:
DMS106:
DMS206:
DMS306:

.BLKW
.BLKW
.BLKW
.BLKW

R 06
;CONTROL STATUS REGISTER FOR DMC11 NUMBE
;VECTOR FOR DMC11 NUMBER 06
;ODCMP LINE# FOR DMC11 NUMBER 06

001570
001572
001574
001576

000001
00000
000001
000001

DMCRO7:
DMS107:
DMS207:

.RLKW
.BLKW
.BLKW

;CONTROL STATUS REGISTER FOR DM(CMN NUMBER 07
JVECTOR FOR DMC11 NUMBER 07

001600
001602
001604
001606

000001
00000¢1
000001
000001

DMCR10:

001610
001612
001614
001616

000001
000001
000001
000001

DMS111:
DMS211:

DM5311:

.BLKW
.BLKW

Bl kW

001620
001622
001624
001626

000001
000001
000001
000001

DMCR12:
DMS112:
DMS212:
DMS312:

.RLKW
.BLKW
.BLKW
.BLkW

1
1
1
1

;CONTROL STATUS REGISTER FOR DM(11 NUMBER 12

001630
001632
001634
001636

000001
000001
000001
000001

DMCR13:
DMS113:
DMS213:
DMS313:

.BLKW
.BLKW
_BLKW
.BLKW

TRAP (ALLS.

;CONTROL

[

AND

;3RD STATUS WORD

001640
001642
C0O1644
001646

000001
000001
000001
000001

DMCR14:
CMS114:
DMS214:

.BLKW
.BLKW
.RLKW

22—

VARIABLES,

001650
001652
001654
001656

000001
000001
000001
000001

DMCR15:
DMS115:
DMS215:
DMS315:

.BLKW
.BLKW
.BLKW
.BLKW

001660
001662
001664
001666

000007
000001
000001

000001

DMCR16:
DMS116:
DMS216:
DMS316:

.BLKW
.BLKW
.BLKW
.BLKW

001670
001672
001674
001676

000001
002001
000001
000001

DM(R17:
DMS117:
DMS217:
DMS317:

.BLKW
.BLkW
.RLkw
.BLKW

001700

000000

DM.END: 0OGOOC

.BLKW

.B_KW

[
N

;CONTROL STATUS REGISTER FOR DM(C11 NUMBER 10
JVECTOR FOR DMC11 NUMBER 10
;DDCMP LINE# FOR DMC11 NUMBER 10

DMS310:

.BLkw

DMS314:

NUMBER 07

23RD STATUS WORD

.BLKW

DMCR11:

;DDCMP LINE# FOR DMC11

.BLKW

DMS110:

DMS210-

;3RD STATUS WORD

.BLKW

1
1

—

DMS307:

;3RD STATUS WORD

!
1
!

;3RD STATUS WORD

;CONTROL STATUS REGISTER FOR DM(C11 NUMBER 1"
JVECTOR FOR DMC11 NUMBER 17
.DDCMP L INE# FOR DMC11 NUMBER 11

;3RD STATUS WORD

;VECTOR FOR DM(C11 NUMBER 12

;DDCMP LINE# FOR DMC11 NUMBER 172

;3RD STATUS WORD

STATUS REGISTER FOR DM(C11

sVECTOR FOR DMC11 NUMBER 13
;DDCMP LINE# FOR DMC11 NUMBER 13

NUMBER

;CONTROL STATUS REGISTER FOR DM(11 NUMBER 14
JVECTOR FOR DMC11 NUMBER 14
;DDCMP LINE# FOR DMC11 NUMBER 14

;3RD STATUS WORD

R 15
;CONTROL STATUS REGISTER FOR DMC11 NUMBE
;VECTOR FOR DMC11 NUMBER 15
;DDCMP LINE# FOR DMC11 NUMBER 15

2 3RD STATUS WORD

R ¢
s CONTROL STATUS REGISTER FOR DM(C11 NUMBE
JVECTOR FOR DMC11 NUMBER 16
;DDCMP LINE# FOR DMC11 NUMBER 16

;3RD STATUS WORD

R
sCONTROL STATUS REGISTER FOR DMr 11 NUMBE
JVECTOR FOR DM(C11 NUMBER 17
;DDCMF LINEX FOR DM(C11 NUMBER 7

J3RL STATUS WORD

1?7

—~

000001
000001
000001
0C0001

893

001550
001552
001554
001556

—_

891

892

12:19
PAGE 20
PROGRAM PARAMETERS,

—d

CZ0MC
MACYTT 30A(1052)
24=-AUG-78
CZDMCC.P1N
11-AUG-78 08:21

CZ0MC
MACY1T 30A(1052)
24-AUG-78
11-AUG-78 08:21
czbMcc.P1

PROGRAM PARAMETERS,

VARIARLES,

AND

SEQ 0021

TRAP C(ALLS.

;DMC11 PASS (OUNT AND ERROR COUNT TABLE
001702
001702
001704

000000
000000

PACTOO:

001706
001710

000000
000000

PACTO1:

001712
001714

000000

PACTOZ:

001716
001720

000000
000000

FRCTO3:

PACTO3:

001722
001724

000000
000000

PA(T04:

001726
001730

000000
000000

PALTOS:

001732
001734

000000
00000C

PACTO6:

001736
001740

000000
000000

PACTO7:

001742
001744

000G00
000000

PACTI1G:

001746
001750

000000
000000

PACT11:

001752
001754

000000
000000

001756
001760

000000
000000

;PASS COUNT FOR DMC11 NUMBER 00
;ERROR COUNT FOR DMC11 NUMBER 00

sPASS COUNT FOR DMC11 NUMBER (1
;ERROR (OUNT FOR DM(C11 NUMBER O1

JPASS

;PASS

;PASS COUNT FOR DMC11 NUMBER 04
JERROR (OUNT FOR DM(C11 NUMBER 04

;PASS COUNT FOR DMC11 NUMBER 05
JERROR COUNT FOR DM(C11 NUMBER 05

JPASS COUNT FOR DMC17 NUMBER 0¢

JPASS

OO0

;PASS

OO0

;PASS COUNT FOR DMC11 NUMBER 11
;ERROR COUNT FOR DM(C11 NUMBER 11

;PASS COUNT FOR DM(C11 NUMBER 12
;ERROR COUNT FOR DM(11 NUMBER 172

;PASS COUNT FOR DMCT11 NUMBER 17
JERROR COUNT FOR DM(C11 NUMBER 12

001762
001764

JPASS (OUNT FOR DMC11 NUMBER 14
JERROR COUNT FOR DMC11 NUMBER 14

001766
001770

CNT .MAP:

;PASS

001772
001774

953
954
955
956
957
958

PAGE

;PASS COUNT FOR DMC11 NUMBER 16

947
948
949
950
951
952

12:19

;PASS (COUNT FOR DMLTY NUMBER 7
JERROR (OUNT FOR DMr11 NUMBER 7/

00177¢

002000

000000

ERCTOO:

ERCTO1:
ERCTOZ:

ERCTO4L:
ERCTOS:

ERCTO6:

FERCTO7:

ERCTI10:
ERCT1:

COUNT

FOR DMC11

NUMBER 02

COUNT

FOR DMC11

NUMBER 03

JERROR COUNT FOR DMC11 NUMBER 02
;ERROR COUNT FOR DMC11 NUMBER 03

;ERROR COUNT FOR DM(11
COUNT

FOR

DM(C11

(OUNT

FOR DM(C11

NUMBER 06

NUMBER 07

;ERROR COUNT FOR DM(C11 NUMBER 07

;ERROR COUNT FOR DMC11

(OUNT

FOR DM(C11

NUMBER

NUMBER 10

NUMBER

JERROR COUNT FOR DM(11 NUMBER 15
;ERROR (OUNT FOR DM(11

NUMBER

CZDMC

MACY1T

CZDMCC.P1

30A(1052)

24-AUG-78

12:19

11-AUG-78 08:21

PAGE 22

PROGRAM PARAMETERS, VARIABLES, AND TRAP (ALLS.

SEQ 0022

1000

I
R{

TABLE

(]

I
l¢c

STATUS

FORMAT

CSR

Gy P

L
L)
e

HEE
I
I

SR:

CONTAINS

DMC11

(SR

g
0 =g by

I
'}'

Ll
o 1]

Gung Gy
P

[ 4

P
G

Pneg Pong

i o 1
L

[

”

I
'}

1
1

=]
1

STAT1

STAT?

STAT3

4DDRESS

TATY:

1
0
1
0

MICRO-PROCESSOR HAS (CRAM
MICRO-PROCESSOR HAS CROM
2272 TURNAROUND CONNECTOR

NO TURNAROUND CONNECTOR
0 LINE UNIT IS AN M8201

[S ON

1 LINE UNIT IS AN M8202
1
LINE UN]T
9
IS DMC11 BR PRIORITY _EVEL

BHl

g
g Pp

[

]

l
{'

TS TN

)

o
[

X o]

CTATZ2:
“TAT3:

LOW BYTE IS SWITCh PACAH1

HIGH BYTE

SWITCH PA(#2

(DDCMP LINE NUMS[R)
(BMB73 BQOT

ADD)

BIT0=1 DO FREE RUNIWING TESTS ON KM(
(MUST BE SET TO A ONE MANUALLY [PROGRAM DZDM]
KMC MUST HAVE MICRO-CODE

WRITTEN FROM RUNNING

DZDMG TEST 2 FIRST
BIT1-1 DMC11-AL LOCAL HIGH SPEED MICRG-CODE

BIT1 O DM(1'=-AR REMOTE (Ow SPEED MI(RO=-70DE

ONLY])

MACY11 30A(1052)
24~AUG-78
11-AUG-78 08:21
CZDMCC.P1Y
CZOMC

12:19

PAGE 23

PROGRAM

INITIALIZATION AND

2
START UP.

SEQ 0023

sPROGRAM INITIALIZATION
sLOCK OUT INTERRUPTS
sSET UP PROCESSOR STA(K
JSET UP POWER FAIL VECTOR
s CLEAR PROGRAM (CONTROL FLAGS AND COUNTS

sTYPE

002122
002126
002132
002140
002146
002154

012737
012706
012737
013737
005037
105037
105037

012737
012737
012737
012700
005020
022700
001374
005037
012737
012737
013746
013746
012737
012737
012737
022777
001402
000407
022626
012737
012737
012637
012637
105737

001006
022737
001402
SV, P SSUS
[ YR
400080?0008
[ RVols JINTo

—b
d
D
D
b

d ed
D
D

D ed
A
&

—d
—

ed ek —d =D

1099

104402

000340
020 1200
0OC 5336
00 1310
010016

00 1325
00 1327
00 1470
00 1676
* 00000
00 1702

177776

000006
000004
002166

17 7570
17 7570

17 7777

000176
000174
000004
000006

MOV
MOV
MOV

000024

001314

CLR
CLRB
CLRR
MOV

001320
001322
001376

23%:

002002
00 1234
000001
002002

.START: MOV

00 1000
00 7606
176734

004737
017737
005737
001402
005037
032737

00 123%6
000001

105737

00 123¢

005737

00 1306

104402

00 7154

000042

(LR
MP
BNE
R

001226
001214

000004
001202
001200

001236

ERRFLG

;LOCK QUT INTERRUPTS
JSET UP STACK
JSET UP POWER FAIL VECTOR
;SAVE NUMBER OF DEVICES IN SYSTEM,
;CLEAR SCFT TYPEQUT FLAG
;CLEAR ERROR FLAG
;ZERO QUICK VERIFY FLAG

QV.FLG
#DM.MAP-10,CREAM;
GET MAP POINTER.
#CNT.MAP=4 MILK ;GET PASS COUNT MAP POINTER

#BIT15,RUN

#CNT .MAP RO

(RO)
+

POINT POINTER TO FIRST DEVICE.

;PASS COUNT POINTER TO RO
;CLEAR TABLE

#CNT .MAP+00,R0 ;DONE

23%

LSTERR

#1,TSTNO
#.START ,RETURN

MOV
MOV

a6, ~(SP)
. -(SP,
#63 . N

YET?

JKEEP GOING
.CLEAR LAST ERROR POINTER
JSET UP FOR TEST 1
;SET UP FOR POWER FAIL BEFORE
sTESTING STARTS
;SAVE CURRENT VECTORS

“SET UP FOR TIMEOUT

*SET SWR TO HARD SWR ADDRESS

#177570,DISPLAY ;SET DISPLAY TO HARD SWR ADDRESS

#-1,3SWR

68+2

6%:
7%:

#SENDAD
, a4 2

20%

20%:

JREFERENCE HARDWARE SWITCH REGISTER
JIF = =1 USE SOFT SWR ANYWAY
JIF IT EXISTS AND NOT
-1 USE HARD SWR
;ADJUST STACK
;POINTER TO SOFT SWR

(SP)+,(SP)+
#SWREG, SWR
#D]SPREG,DISPLAY;POINTER TO SOFT DISPLAY REG
(SP)
+ ,a#4
JRESTORE VECTORS
(SP)+,a#6

INIFLG
20%

000042

001236

¥ PFAIL ,a#24
DMNUM, SAVNUM
SWFLG

#177570, SWR

177020

001202
601200

HSTACK,SP

MOV

00 1324

00 3522

MOV
MOV
MOV

#340,PS

JMTITLE
PC,CKSWR

ASWR,STRTSW
ansy?
.+6
STRTSW

#SW00,STRTSW
17%

STRTSW
17%

DMArTY
1.¢
NOAC(T

:HAS INITIALIZATION BEEN PERFORMED

‘BR IF YES

“IF ACT=-11 AUTOMATIC MODE, DON'T TYPE

sTYPE

TITLE MESSAGE

*CHECK FOR SOFT SWR
;STORE STARTING SWITCHES

“1S IT RUNNING IN AUTO MODE>
BR IF NO
IF

S%%%E%

002002
002010
002014
002022
002030
002034
002040
002044
002052
002060
002066
002072
002074
002100
002102
002106
002114

TITLE MESSAGE

YES,

CLEAR SWITCHES

IF swd0=1,

QUESTIONS ARE ASKED.

;r suob
17>

Sw07=0
£ ANY DEVICES SELECTED?
IF YES
DEVICES SELECTED.

002312
002314
002316
002322
002326
002330
002334
002336
002344
002346
002350
002354
002360
002364
002370
002374
002376
002402

002406
002412
002414
002416
002420

30A(1052)

24-AUG-78

11-AUG-78 08:21

000000
000776
004737
105737
001410
105737
100431
032737
001403
000424
005137
104402
012704
010437
012437
001411
012437
012437

012437
104410
007454
000762
012700

12:19

210512
001324

PROGRAM

HALT
BR
JSR
TSTB
8EQ
TSTB
B8M]
BIT
BEQ
BR
(OM
TYPE
MOV
MOV
MOv
BEQ
MOV
MOV

'7%:
14%

001236

001324
006224
001500
001246
003250

21%:
246%:
5%:

001252
001254
001256

001500

MOV
CONVRT
XSTATQ
B8R
MOV

1%:

INITIALIZATION AND

001236
000006

PAGE 24

SEQ 0024

START UP.

;STOP THE SHOW
.~
;DISQUALIFY CONTINUE SWITCH
PC,AUTO.SIZE
.G0 DO THE AUTO SIZE
INIFLG
JFIRST TIME?
21
;BR IF YES
STRTSW
;IF USING SAME PARAMETERS DONT TYPE MAP
1%
#BIT1 BIT2,STRTSW,; IS TEST NO. OR LOCK SELECTED
24%
cIF NO THEN TYPE STATUS
1%
cIF YES DO NOT TYPE STATUS
INIFLG
;SET FLAG
. XHEAD
. TYPE HEADER
#DM.MAP R4
JSET POINTER
R4, TEMPI
.SET ADDRESS
(R4)+,TEMP?
;SET CSR
1%
JALL DONE IF ZERO
(R4)+,TEMP3
;SET STAT1
(R4) +,TEMPS
JSET STAT?
(R4)+,TEMPS

;SET STATS
cTYPE QUT STATUS MAP
:

5%
#DM MAP ,RC

;RO POINTS TO STATUS TABLE

PR YO YUY QD RS (U
S SV U N N
W
P
TR R
Y
T SR
Y I

TS (T S Qi S W
§ S Y QN (N T N

S
T\

S
Y

¥ -—
W

PIORUTONONLNVNVNVMNONY
— —
D b
a2
gmu\mmmmmmmmbbJ\bbbbbbbwgwgw%wwwg
N W20V
NNV NN =O
V0NN
INNNAD
—

MACY11

..=AUTO SIZE TEST

;.*THIS

R
SY

""tfitIitt'tt*ii'l’*tttk.*"'t‘Rttfi.ittttt!.t!.fi'tkfi"ttt*.'i"kit'fi'ttt

G
N
W
W

;.*(HECK

;;*IF

S
S
N
s T YIS W W
N

N N=OVONO

&AR

VERIFYS

THAT

THE

DMC11S

THE

ADDRESSES OF

ALL

FLOATING DEVICES

AND/OR KMC11S

THIS TEST FAILS,

2 ;*ADDRESS 760000.

THIS

ARE

THE

CORRECT

FLOATING

IS NOT A HARDWARE ERROR.

(DJ,.DH,DQ,DU,DUP,LK,DMC,DZ.KMC).

THERE ARE NO OIHER F_OATING DEVICES BEFORE

;.*DM.11 ADDRESS IS 760070, kMC11

THE DMC11,

THE FIRST

IS 760110. NO DEVICE SHOULD EVER BE AT

TEST MAY REQUIRE 2 OR MORE ATTEMPTS TO GET

THE

;s *RIGHT ADDRESSES. AFTER YOU HAVE CHANGED THE ADDRESS TO WHAT IT TOLD
Js*YOU THE FIRST TIME, [T MAY COME BACK AND TELL YOU A DIFFERENT ADDRESS

;;*THE NEXT

TIME

YOU RUN

Jo*WILL BE CORRECT

e L S
e
R
e I
R

e R T
I
e B
I
e
die e
e

oY
2 Yo

R
I
R
I
it
T
it

TEST

:2*ADDRESSES FOR YOUR SYSTEM.

;i%CORRECT).

IT.

PLEASE

HAVE

PATIENCE,

(AS LONG AS ALL DEVICES

THE

IN FRONT OF

FINAL

ADDRESS

THE DM(C'S ARE

",'.l’fi.t"‘.fii.t'fit't"ttt.t.'t"t.'....Q".t'..t.t'.l.tt..'l'...'."'.

002424
002430
002434
002440
002444
002446
002452
002454
002456
002460
002466
002470
002472
002500
002502
002510
002512

013746
013746
005037
005037
005005
011037
001564
005705
001005
032760
001061
000404
032760
001454
012737
005705
001003

000004
0009206
000006
001252
001404

100000

000002

100000

000002

002674

000004

MOV
MOV
(LR
CLR
(LR
AUSTRT: MOV
BEQ
TST
BNE
BIT
BNE
B8R
1%:
BIT
BfQ
2%:
MOV
TST
BNF

a6 ,-(SP)
a#6,-(SP)
b
TEMP3
RS
(RQ) ,DM/ SR
AUDONE
RS
1%
#IT15,2(R0O)
SK P
2%
MITIS,2(RO)
SK]P
MNODEV , a4
k3%

JSAVE LOC 4
JSAVE LOC 6
JCLEAR VEC+?
.CLEAR FLAG
JR5-0 DM(, RS =71 knp
JGET NEXT DMC
SR
;BR 1F DONE
;DMC OR KM(C?
:BR [F KM(
;CHECK FOR DM( (SR
JSKIP IF NOT DM(
JITS A DMC SO CONTINUE
JCHECK FDR KM( (SR
JSKIP IF NOT xM(
JSET UP FOR TIMeOUT
.DM(C OR KkM(°
JBR [f kM(

MACY11 30A(1052)
24-AUG-78
CZbMCC.P1T
11-AUG-78 08:21

002514

pu—}

NNV
N NN_A—J—J—I-J_‘—l—‘—l—l—‘—‘—l—l—l—d—l—l_—l—l—l_fl—l—l—d_‘_‘—l—l—l—l_‘ —
o

SS O?OOO
2O 8&<
VNS
NN
— SEBLRE RS BB BB IR R REI R B IR IFININIIDS ~

CZDMC

D
d

d e

D i

oD e

D e

D ed

D md

D nd

D ad

060401
005201
040401
005703
001371
012737
010137
005705
001005
032760
001014
000404
032760
001407
005711
020137
00141
062701
000756
062700
011037
001470
000750
062700
062737
011037
001457
013701
000735
000002
005737
001014

MOV
BR
MOV
MOV
MOV

#6,R3
48
#10,R3

JR3 IS COUNT OF DEVICES BEFORE DMC
;GO ON
JR3 IS COUNT OF DEVICES BEFORE KMC

#160010,R1

;START WITH ADDRESS 160010

MOVR
ADD
INC
BIC

(R2) R4
R4 ,R1
R1
R4 ,R1

;IF NG TIMEOUT, GET NEXT ADDRESS
;JIN R1
;
;

200010
003010

(%:

160010

FLOAT:

100000
100000

000004

MOV

Fv:

1%:

000010

000010
001404
000010
000010
001404

SKIP:

003022

oK :

003022
NODEV:

001252

007223
012737
104411

ERR:

104402

104410

002776
005705
001003
104402

002756

007320
000402

(R1)

177777

001252

1%:

TABLE PONTER

;CHECK ADDRESS

IN R1

.DMC

R1.,xLOC
1%

SK]P

#BIT1S,2(RO)
SKIP

JOK ONLY DMC'S ARE

LEFT,

SET UP FOR

;SAVE FIRST DM(C/KM(C ADDRESS
OR KM(C?

JBR IF KMC

JCHECK FOR DM(C CSR
JSKIP IF

NOT DMC

JITS A DMC SO CONTINUE

;CHECK FOR KMC CSR
JSKIP IF NOT KMC

TST
CMP
8EQ
ADD
BR
ADD

(R1)
R1,DM(SR
0K
#10,R1
Fy
#10,R0

JBR IF YES
;GET NEXT DM(C ADDRESS
;DO IT AGAIN
JSKIP TO NEXT CSR IN TABLE

BEQ
BR
ADD
ADD
MOV
BEQ
MOV

AUDONE
FY
#10,R0
#10,XL0C
(RO) ,DMCSR
AUDDNE
XLOC,R1

;BR IF DONE
JELSE CONTINUE
JSKIP TO NEXT DMC CSR
JUPDATE EXPECTED DMC/KMC ADDRESS
JGET NEXT DMC/KMC (SR
;BR IF DONE
cGET EXPECTED DMC/KMC ADDRESS

(MPB
RT]
TST

(R2)+,~(R3)

;ON TIMEOUT, INC RZ, DEC R3
JRETURN
JCHECK FLAG IF - O TYPE HEADER

MOv

B8R

(RO) ,DMCCSR

TEMP3

19
#ERR, SAVP(

TYPE

001262

JR2 IS DEVICE

JANY MORE DEVICES TO CHECK FOR?
;BR IF YES

’$

BIT
BEQ

SEQ 0025

R3
FLOAT
#ERR, a#6

CONERR
MOV
(NVRT
ERRPC

0C*276

#DEVTAB,R?

#81T15,2(RO)

TYPE

002700

START UP.

BIT

BNE

002770

007277
012737
010137

TS~

BNE

2%:

0C1404

MOV
BNE

000002
000002

TST

TST
BNE

104402

i Sy i R

N 2OV

INITIALIZATION AND

122243

S
(AN 1201 ) N R O

)
D
d e
D
-—ed

PROGRAM

000006

002700
003022

PAGE 25

111204

—_—a —d
—_—

D —d =D e

)

AN IASTAS LIS,V 1,NT N1, W1,V 1,61,81, ST, N1, ¥}

012703
000402
012703
012702
012701
005711

12:19

. CHECK DMC ADDRESS
;DOES IT MATCH

JGET NEXT rSR

;CONT INUE

;SK]P HEADER

;TYPLOUT HEADER MESSAGE

. CONF IGURATION ERROR!'.
..
;SAVE PC FOR TYPEOQUT
;TYPE OUT ERROR PC
.

:TYPE

REST

HEADER

CNERR
MOV
MOV
CONVRT

#-1,TEMP3
R1,SAVR1

;
JSET FLAG SO IT ONLY GETS
JSAVE R1 FOR TYPEOQUT

TST

;DMC

(ONTAB

BNE

TYPE

DMCM

B8R

;TYPE (SR VALUES
CR kMC

;BR IF xM(C

s CONT INUE

TYPED ONCE

TIMEOUT

239

003004
003006
003010
003011
003012
003013
003014
003015
003016
003017
003020

3%
4%:

ERRPC:

002

(ONTAB:

004
002

003026

003030
003034
003040

003042

003046

(SP)+,(SP)+
0.4

BYTE

6.2

SAVPC

.BYTE
XLOC

BYTE

DEVTAR:

DMCSR

BYTE
BYTE
.BrTE
.BYTE
.BYTE
BYTE
.BYTE
BYTE
BYTE

.EVEN
xLOC:
0
ALIDONE:

003022
003024

177777

001500
000006
000004
000010

1%:

MOV

001236

000300
000302

JMERR3

001306

2%:
2¢.

ISWR,DMA(TV
DMACTV,RO

MOV

#300,R0
#302 R
R1, (RO)+

MOV

(LR
(MP
Me
BNE

;TEST START
001200
000006

.BEGIN:

.=2

MOV

MOV
HALT

001000

1278

(SP)+,a#6

aSWR, SAVA(CT

0C6005
176064
001306

RS
1%
#-1,R5
#DM_MAP ,RO
AUSTRT
(SP)+ ,a#6

JNEW
RO

601312

MOV
MOV

JADJUST STA(CK
;BR T0 GET OUT

6.4

;§U03.STRTSU

006144
176104

SEQ 0026

TYPE

KM(CM
CMP
R

003002

000001
006
001276
000002
06

PROGRAM INITIALIZATION AND START UP.

NN!\J&NN
EIRHR

002772
002774
002776
003000

104402

007330
022626
000727

002760
002762

PAGE 26

NNNNNNN=—N
~

1223
1224

12:19

CZDMC
MACY11 30A(1052)
24-AUG-78
czomcc.P1
11-AUG-78 08:21

(R1)+

(RO)Y+,(R1)+
#1C00,R0
43

.DMC?

:BR IF KMC AND ALL DONE
JSET RS TO =1 (kM()
JRESET RO TO START OF

;GO OC KMC'S

SRESTORE LOC 6
+RESTORE LOC 4

sSELECT SPECIFIC DEVICES??
:BR [F NO.

sTYPE

THE MESSAGE.

s ZERQ DATA LIGHTS

JWAIT FOR USER

#_TACK,SP

TO TELL

WHAT DEVICES

;1S THE NUMBER VAL ID?
JBR IF NUMBER [S OK.
STELL USER OF INVALID NUMBER.
;STOP EVERY THING.

JRESTART

THE PROGRAM AGAIN.

sGET NEW DEVICE PATTERN

sSHOW THE USER WHAT HE

SELECTED.

cCONTINUE DYNAMIC SWITCHES.
;PREPARE

TO CLEAR

THE

;VECTOR AREA. 300-776

FLOATING

JSTART PUTTING "PC+2 - HALT"'

;IN VECTOR AREA.
.POP POINTERS
JALL DONE??
.BrR

NO.

RESTART

a6 ,=(SP)

TABLE

JSET UP STA(K
JS5AVE LOC ¢

’

R
—

TO RUN

COMC
MACY 1] 30A(1052)
24-AUG-78
11-AUG~-78 08 :21
CcZomCcC.P1

279

1280
1281

1282
1283

003162
003166
003170
003176
003202
003204
003210
003212
003216

013746

12:19

PROGRAM

000004
203234

000006

000004

6%:

157776

007776
001304
200004

7%:

000006

ZRERIRO8ESYL
Y
b
—

=20

WNW

104402

000177

001236

3
00604
000240
000240

003612
003614

003730
003732
010060
000002

003612
003614
001214
001236

005755

175630

MOV
CLR
MOV
CLR
TST

a6, ~(SP)
RO
n2S,
D)
(RQ)
+
#157776,R0O
6%
#7776 ,RO
RO,MEML
IM
(SP) +,a44
(SP) +,a#6

000340
000004

177776

10%:

#37400,R0
7%
#340,PS

#BIT2,STRYSW
1%

MLOCK

#NOP,TTST
ANOP,TTST+?
1%:

3%:

SEQ 0027

INITIALIZATION AND START UP,

(SP)+,(SP)+

047400

012737
012737
000406
013737
013737
012737
032737
001002

10%

000004
00777¢
030000

1295

PAGE 27

BRW,TTST
BRX,TTST+2

#CYCLE ,RETURN

#SW01,STRTSW

5%:

aRE TURN

;SAVE LOC 4
JSTART AT O
JSET UP FOR TIME CUT
;TO AUTOSIZE MEMORY
. CHECK ADDRESS IN RO
;IS IT AT LEAST 28K
sBR [F NO

;SAVE 2K FOR MONITORS

;STORE MEMORY LIM]T
JRESTORE LOC 4
JRESTORE LOC 6

;CONT INUE
;ADJUST STACK
;GET LAST GOOD ADDRESS

;SAVE 2K FOR MONITORS
;IS IT 8k?

¢BR IF NO

JIF 8K DON'T SAVE 2k
cLOCK OUT INTERRUPTS
JCHECK FOR LOCK ON TEST
¢BR If NO LOCK DESIRED.

cTYPE

LLOCK

SELECTED.

;ADJUST SCOPE ROUTINE.
JSET UP TO LOCK
cCONTINUE ALONG.
;PREPARE NORMAL

SCOPE

cLOCK NOT SELECTED,

ROUTINE

SET UP FOR NORMAL

SCOPE LOOP

JSTART AT ''CYCLE'' FIND WHICH DEVICE TO TEST
oIS TEST NO. SELECTED?
JBR IF YES

;TYPE

JSTART

TESTING

MACY11 30A(1052)
24-AUG-78
PN
11-AUG-78 08:21

12:19 PAGE 28
END OF PASS ROUTINE

sEND OF PASS

;TYPE

d
d
d
d e

)

D od

D D

JRESTART

)
) e
b
)
D
D
h
) D
d
e
d e e

—=O O oo
W
2O VO NN
NN
NN

b
D e
)
D e e
) e
b D e
) e
D
D

000005
005037
105037
005237
013777

001234
001325
001230
001230

003414
003420
003424
003430
003434
003440

104402
104411
104402
104411
104402
104411

006072
003546
006100
003554
006106
003562

003444
003450
003454
003460

W
KR LR LLR R W
WN
FELBLSY DAANAANARNIANR

003364
003366
003372
003376
003402
003410

104402

104402
104411
013700
013720

006117
003570
001322
001230

112737
013737
013701
001406

000377
001310
000042

003464
003470
003474

013720
005337
001017

003520

000005

003476
003504
003512
003516
003522
003522
003524
003526
003530
003532
003534
003542
003546
003550
003552
003554
003556
003560
003562
003564

003566
003570
003572
003574

005733

004711
000240
000240
000240
000240
012737
000137
000001
006
001404
000001
004
001374
000001
006
001230
000001
006
001232

001232
001314

.EOP:

175570

]
001327
001314

010060
070060
)
002
002
002

002

001214

TEST

RESET
(LR
CLRB
INC
MOV

LSTERR
ERRFLG
PASCNT
PASCNT,aDISPLAY

;MAKE THE
WORLD CLEAN AGAIN.
*CLEAR LAST ERROR P(
*CLEAR ERROR FLAG
*UPDATE PASS COUNT
:DISPLAY PASS COUNT

TYPE
CNVRT
TYPE
CNVRT
TYPE
CNVRT

.MCSRX
,XCSR
.MVECX
JXVEC
.MPASSX
. XPASS

*TYPE
JSHOW
“TYPE
JSHOW
TYOE
SSHOW

ERRCNT, (RO) +
SAVNUM
RESTRT

. STORE ERROR COUNT FOR THIS DM(C11
:ARE ALL DEVICES TESTED?
;BR IF NO.

TYPE

SENDAD:

TYPE
CNVRT
MOV
MOV
MOV
DEC
BNE
MOVB
MOV
MOV
BEQ
RESET

JSR
NOP
NOP
NOP
NOP
RESTRT: MOV
JMP
XCSR:
1
BYTE
DMC SR
XVEC:
1
BYTE
DMRVE
€
XPASS:
1
BYTE
PASCNT
XERR:
1
BYTE
ERRCNT

MEPASS

.MERRX
.XERR
MILK,RO
PASCNT, (RO) +

#377 ,QV.FLG
DMNUM, SA\NUM
aw42 R
RESTRT

*TYPE END PASS

CSR
T
VECTOR
IT
PASSES
[T

“TYPE ERRORS
SHOW [T
JGET POINTER TO PASS COUNT
;STORE PASS COUNT FOR THIS DMC11

JSET THE QUICK VERIFY FLAG.
JRESTORE THE COUNT
*CRECK FOR ACT=-11 OR DDP
;IF NOT, CONTINUE TESTING

:STOP THE SHOW--CLEAR THE WORLD

PC,(RD)

#CYCLE,RETURN
CYCLE
6,2

4,2
6,2

6,2

;SCOPE LOOP AND INTERATION HANDLER

D e

)

TEST

JUPDATE PASS COUNT
;CHECK FOR EXIT TO ACT-1

b
—

NAME OF

SEQ 0028

003576
003602

004737
010016

007606

JSCOPE: JSR
MOV

BCL(KSWR
RO, (SP)

JLKECK FOR SOFT SWwR
*SAVE RO ON THE STACK

COMC
MACY11 30A(1052)
24=-AUG-78
11-AUG~78 08:21
CZDMCC P11

1368

003604

032777
001407
000437
005737
001434

040000

175370

TTST:

003734

003734
004000

175342

001327

001224
001224

VAP BLEEEE S5

001222

2%:

001404

175264
BRw:
BRX:
DONE
:

BEQ
INC
CMP
8LOS
CLRB
(LR
CLR

MOV
MOV
MOV
POP2SP
MOV

JMP
1407

(TYPEOUT, ERROR,

#81T14,aSWR
1%

SCOPE,

SEQ 0029

ETC)

:"LOOP ON THIS TEST'TM

BR IF NO.

(IF LOCK SW01=1;

THIS LOC -240)
THIS LOC -240)

;GOTO 38

:BR IF NO (LOCKED ON TEST)
;YES, CLEAR TLAG
;GO TO NEXT TEST
(QUICK PASS)
;DELETE ITERATION?
YES
;JBR IF

:BR IF QUICK PASS.

DONE

;WAS

DONE

#SW11,aSWwR
Qv.FLG

(IF LOCK SW01=1;

TKCSR DONE

SET?

JHAVE PASSES BEECOMPLETED?

LPCNT
LPCNT, 1COUNT

ERRFLG
LPCNT

JUPDATE

;ARE ALL

ITERATION COUNTER

ITERATIONS DONE??

;BR IF NOT YET
JPREPARE

FOR NEW

TEST

;START ICOUNTER AT O

« OCK

#20, ICOUNT
NEXT
,RE TURN
(SP) ,RO

DMCSR ,R1
aRE TURN

JRESET ITERATIONS
;GET NEXT TEST
;POP RO OFF OF THE STA(K

JFAKE AN 'RTI"
JR1 CONTAINS BASE DMC ADDRESS

GO DO THE TEST

637
0

CHE'K FOR FREEZE ON CURRENT DATA

38
N3

D
D ed
D o
D
D
D
d
d
D
et ad
—
—

BIT
BEQ
BR
TST
BEQ
(LR
BR
BIT
BNE

TSTR

001325
001224
001220
000020
001216

W NN NN ININ

1380

12:19
PAGE 29
GENERAL UTILITIES

1398

007606
001000

175232

LSCOPY:

001220

JSR
BIT
BEQ

PC,CKSWR

JCHECK FOR SOFT SWR
;1S SWO9=1(SET)?
;BR IF NOT SET.

LOCK, (SP)

;GOTO THE ADDRESS IN LOCK.
. GO BAC(CK,

#5w09,aSwR

TST

001220

'$:

BEQ
MOV

RT]

;TELETYPE

017605

.TYPE:

000002
000002
010016

600002

010000

1765164

4%:

1%:

00567¢
175754

OUTPUT

ROUTINE

RS,=(SP)

82 (SP) ,RS
#2,2(SP)

SWFLG

1%
ASW12 .8SWR

(R2)

JMCRLF

Iz ¥

8TP(SR

2 ¥

(RS)+ ,aTPDBR
4
(SPYe KRS

175155

JSAVE RS ON THE STA(K.

cGET ADDRESS OF MESSAGE.
:POP OVER ADDRESS.
:SOFT SWR MESSAGE?

JIF YES TYPE IT OUT REGARDLESS OF Swi1?2
JINHIBIT ALL PRINT OUT??
BR IF NO PRINT OUT WANTED (SwiZ2-1)
S

MINUS?

(MSB 1(B]T7))

M}BE? IS PLUS

CURRENT (HAR.

NOT ZERO KEEP PRINTING

CEND OF OUTPUT. RESTORE KS

1440
146461
1642
1443
1444
1445

1446
1647

1448
1449

1450
1451

1452
1453
1454

000004
000002

012704
012703

207502
0CCOC7

14
14

175070
000200

S777

175054

017777

175044

NANNNIN)
2 20O

1438
1439

010346
010446
017637
062766

1436
1437

000002

P S
N

1431
1432
1433
1634
1435

004046

1424
1425
1626
1427
1428
1429
1430

RRRRRRRRRR 22 ® SRR
J3FR]REIXTLE ~&¥ BN
SRE NN AR ERE

MACY1 30A(1052)
C{OMC
24-AUG-78
17 -AUG~-78 08:21
CZDMCC.PINT

777

12:19
PAGE 30
GENERAL UTILITIES

. INSTR: MOV
004072
000004

175074

00001S

17504,

0056€€¢

DEC
BNE
.INSTE:

1471

1472
673
1474
1475
1476
677
1478

647G

STKDBR, aTPDBR

R3
1%

(SP)+,R4

MOV
MOV
BR

R3,-(SP)
R4 ,-(SP)
. INST1

g?Y

(SP)+ ,R3

004370

004372
004372
000004

000060

200075

007502
000015

000067

000000

MOV

PARAMT:

'$:

MOV
MOV
MOV
MOV
MOVR
MOVB
MOV
(LR

MOV

JMaM

(SP) + R4

R4 ,-(SP)

4(SP) RS
(R5)+,LOLIM
(R5)+ ,HILIM
(R5)+ ,DEVADR
(RS)+,LOBITS
(R5)+.ADRCNT
RS,4(SP)

# INBUF R4

BI(HK
B]SRB

#60, (R4)
(R4)+ RS

JRESTORE R3

RS,=(SP)

w15, (R&)
PARERR
(Rw) @60

REGC

JRESTORE R4

STRING TO OCTAL

(MPR
BEQ
(MPB

BLT
(MPR
8GT

;SAVE R3 ON STA(CK

;SAVE R4 ON STA(CK

INSTRS

(SP)+ ,R3

TYPE

ET(C)

@TPCSR
28

MOV

000004
004364
004366

NOBRSMEMNN

1468

1469
1470

6605
37
37

4NNNW*N“*NN§ONNNNN

1466
1467

.PARAM:

1463
1464
1465

TSTB
BPL

SCOPE,

#7 ,R3
aTKCSR
1%
aTKDBR, (R4)
#200, (R4)
tR4)
+ #2158

sCONVERT ASCII

NN
gaoddmdwwd
[2RVLY 21, V) \Jm\JOl\?\h&\l\l

1462

BEQ

INSTRZ2: MOV

g““dgdgdngOO“dOOOOOQ
DNONEONIONION
SO 2o a2

1460
14€1

# INBUF
R4

MOV

1455
1456

1457
"458
1459

MOV

1064402

R3,-(SP)

R&4 ,~(SP)
@4 (SP)
, .MSG
#2,4(SP)

MOV
TSTR
BPL
MOVB
BICR
(MPR

(TYPEOUT, ERROR,

MOV
MOV
ADD

JINSTY: TYPE
MSG:
0
'Y

PARERR
(R4) 467
PARERR

&<, (Re)
LIM]TC

-0

SEQ 0030

MACYMY 30A(1052)
(LOMC
24-AUG-78
11-AUG~-78 08:21
cC2DMCC.PIT
1480
1481
16482
1483
1484
1485

1486

004300
004302
004304
004306
004310

00431¢

12:19 PAGE 31
GENERAL UTILITIES

006305
006305
006305
000760
T 06604
0007sC

PARERR:

1487

1489

1495
1496

1497
1498
1499
*S00
1501

1502
1503

15046

004314
004320
004322
004326
004330
0046334

004336
004342

004344

004350
004354

1507
1508

004364
004366

1511

020537

00« 304

BH]
(MP

133705

Q06?7¢

BI'R

LIMITS:

BNE

204

5
062705

337

00437C

‘%

000002

004372

MOV

ADD
DECR

B8NE
MOV
MOV
LaLIm:
HlicIm:
DEVADR:
LOB]TS:

004370
004372

RS,HILIM

PARERR
R5,LOLIM
PARERR

LOBITS,RS

PARERR

RTI

DEVADR R4

RS5,(R4)
«

#2 ,R5
ADR(CNT

1%
(SP)+ R4
(SP)+ RS

0
O
0
O

ADRCNT=LOB]TS+1

¢SAVE P( OF
(e3¢

Cle637

70006

(Q0' 7¢

.SAYCS: MOV

TEST THAT FAILED AND RO=RS

L(SP) ,SAVP(

JSAVE R7 (P(C)

;SAVE RO=RS
004402
G0440¢
004412

1525

004426

16826
1527
1528
1629
1530
1531
16532
1533
153%
6535

CMP

BLO

004362

1519
152(
1521
1522
152%

1524

PARAM1

(Qua3st

1612
1512

1314
1815
1614
1517
1518

020537

004356

004360

1509
1510

RS
RS
R5
13

SCOPE, ET()

;STORE NUMBER AT SPECiFIED ADDRESS

1505

1506

(TYPEOUT, ERROR,

ASL
ASL
ASL
BR

INSTER

JTEST TO SEE IF NUMBER S WITHIN LIMITS

1488

16490
14917
1492
1493
1494

004416

004422

006432

01053”?
010437

010337
010237
010137
010037
000002

Qo0127¢
001270
00126€
001264
0012¢c
001260

Sv05:

MOV
MOV

MOV
MOV
MOy
MOy
RT]

RS,SAVRS
R4, SAVRS

R3,SAVR}3
R?,SAVRZ
R1,SAVR1
RC, SAVR(Q

:SAVE RS
;SAVE Ré

;SAVE RS
;SAVE R?2
;SAVE R1
:SAVE RO
sLEAVE.,

JRESTORE RU=RS

Q06e3%

013700
013701
0137C§

001260
001262
001

RESDOS: MOV
MOv
MOV

SAVRO,R(
SAVR1 ,R1
SAVR .R%

JRESTORE RO
JRESTORE R1
JRESTORE R

00446(

013208

0O0'27%¢

MOy

SAYRS RS

JRESTORE RS

006440
004444
004450
004454

01370 S919%%

SRR
~.R&
R4

‘RESTORE
MG
:

SEQ 0031

MACY11 30A(1052)
24=AUG-78
11-AUG-78 08:21
P11
004464

12:19
PAGE 32
GENERAL UTILITIES

00002

G
(TYPEOUT,

3
ERROR,

SCOPE,

ETC)

JLEAVE

RT]

00457¢

—

gOOOOOO 2
PIWNIAN
S PNOWRNINIAN NO
O OO ?
NN NN
8‘4—‘—‘—‘—‘\10\\"‘\\"—‘ H
QOO
WOwW ?W
WWWWWgOl‘J\J\J\
NWNNNNN
B *alcal
et o Yo 1(=]
oN)

[eleblolelel
Jor
e
e WO
2

NIRE LR RERRNT
SRR NI

;CONVERT OCTAL NUMBER TO ASCII AND OUTPUT TO TELEPRINTER

042703

Q05672

00001¢
000002
0047°0
004712
004713
004714
000003
177400
004714

004712
N0141¢

17777¢

.CONVR: TYPE
.(NVRT: MOV
MOV
MOV
MOV
MOV

00/. o ‘,

LMCRLF
RO, -(SP)
R1.-(SP)
R3.-(SP)
R4 .~ (SP)
RS .=(SP)

312(SP)
,R1

n2,12(SP)

(R1)+,WRDCNT
(R1)+
. CHRCNT
(R1)+.SPACNT
3(R1)+,BINWRD
#3, CHRCNT
2s

006712
0046714

#177400,BINWRD

, R4
BINWRD
CHRCNT RS
3%

000060

#TEMP RO

R4 ,R3

#177770.R3
#060,R3
R3, (RO) +

007544

004712

1587

—2 AN
= NN O
AW
VY]
NE NN NPNOWWN
N W N S
-

1585

og2

—

228N S832838352
N =2\ NAN) = N =2 N D
aurw&)m-am
WW B OWW NS YWNO

012703

—

004713

004713
007544
004711

5%:
¢.$:

#MDATA ,R3
-(R0O), (R%)«
CHR(NT
43
SPACNT

#040, (R3)+
SPA(CNT

(R3)

LMDATA

WRDCNT
¢

e+ RS
(SF)
(SP)+ R4

(SP)+ RY
(SP)+ R

(SF)+ Ry

SEQ 0032

24~AUG-78
C0MC
MACY11 30A(1052>
11-AUG~78 08:21
czomcc.P1Y

1592
1593
1594

006714

12:19 PAGE 33
GENERAL UTILITIES

0047213

(TYPEOUT, ERROR,

SCOPE, ET()

SEQ 0033

+1
SPACNT=CHRCNT

0C0000

BINWRL: O

1595

1596
1597

JTRAP CISPAT(H SERVICE

JARGUMENT OF TRAP IS EXTRA(TED
JAND USED AS OFFSET TC OBTAIN PGINTER

1598

;TO SELECTED SUBROUTINE

004716
004720

16276

017616
006316
0462716
062716
017616
000136

.TRPSR: MOV
SJ8
MOV

000002
000000

TRPOK:

177¢C01

001330
000000

e
a

ASL
BIC
ADD

MOV
sMP

O‘O‘O‘O‘O‘O‘O‘g
WO
N

—.

S A2

1608

011646

(SP) ,=-(SP)

#2,(SP)
a(SP), (SP)
(SP)

#177001, (SP)

#.TRPTAB, (SP)

a(SP), (SP)
I(SP)+

JGET PC COF RETURN

;=PC

.GET TRP

TRAP

JMULTIPLY TRAP ARG BY 2
JCLEAR UNWANTED BITS
JPOINTER TO SUBROUTINE ADDRESS
. SUBROUT
INE ADDRESS
;GO TO SUBRCUTINE

;ERROR HANDLER

004737
032777
001406
105777

100003
112777

032777
001105
021637
001404
011637
105037

104406

011605

162705
011504

006304
061504
006304
042704
062704
012437
012437
011437
105737

001403
005737
001040
104402
104402

005737
001402
104402
1046402
104417

007606
010000

17420

174220

0002¢C7
020000

TSTR

174212
1747 74

XBX :

001234
001234
001325

000002

177001

SAVQS

MOV
SUB
MOV

BI(

ADD

MOv
MOV
MOV

TSTR

005216

006142
00¢130
0(s833C

BPL
MOVHK
BIT
BNE
(MP
BEQ
MOV
CLRB

ASL
ADD
ASL

036330
005172
005204
005216
001325

005672
005672
001220

JSR
BIT
8EQ

TYPMS,:

BEC
TST
B8NE

TYPE

TST

BfQ

PC,(KSWR

#SW12,aSWR
XBX

JCHECK FOR SOFT SWR
JBELL ON ERROR?
;BR IF NO BELL

aTPCSR

.TTY READY.

#20/,aTPDBR

JPUSH A BELL AT THE TTY.
JDELETE ERROR PRINT QUT?
.BR IF NO PRINT OUT WANTED.

XBX

#SW1%, aSwR

HALTS
(SP) ,LSTERR
1%
(SP) ,LSTERR
ERRFLG
(SP)

#2 RS
(RS) R4

(RS) ,Ré4
R4

#177001,R4

# .ERRTAB
R4
(R
+ ,ERR
G)
MSG

(R )+ .DATARD
(R4) ,DATABP

G
ERRFL
TYPMSG

DATARP
TYFDAT

,MCRLF
CMCRLF

:DON'T WAIT

.WAS

TTY NOT READY.

THIS ERROR FOUND LAST

JBR IF YES
JRECORD BEING HERE

;PREPARE

HEADER

JSAVE ALL PROC REGISTERS
;GET THE PC OF ERROR
;GET ADDRESS OF TRAP CALL
JGET HLT INSTRUCTION
JMULT BY TWO
;DOUBLE IT
:MULT AGAIN
JCLEAR JUNK
JGET POINTER
;GET ERROR MESSAGE
;GET DATA HEADRER
JGET DATA TABRLE
s TYPE

HEADREER

;‘HL‘

JBR IF YES
;DOE> DATA TABLE EXIST?
JBR IF YES.

LocK

TYPE

TYPF

"NvR?

TIME?

C<OMC
MACY11 30A(1052)
24=-AUG~78
11-auG=-7 8 08:21
czomcc.pP

1651
1652
1653

1654

1655
1656
1657
1658
1659

660

1661
1662
1663
1664
1665
1666
1667

1668

1669
1670
1671
1672

1673

1674
1675

1676

1677

1678

005140
005144
005150
005154
005162
9166

005170
005172
005174
005174

104402
104411

106402

112737

005737
001402

006217
005322
705672
177777

005172

005737

005777
100005

010046
016600
000000
012600
005237
032777
001007
032777
001411
013737
012706
013701
000177

TYPE

00521

0035¢¢

Tuo0462

TYPE

B8tQ

173744

TST

1%:

000002

00°232
00040¢C

17371¢

002000

173706

001216
001200
001404

001214

173674

EXITER:

BPL

PUSHRO

XTSTN:

002

ERRMSG

:TYPE

DATAHD
TYPDAT

DATA HEADER
:
;DATA TARLE?
;BR 1F NO.

DATARBP
RESREG

; SHOW

;

#$ENDAD
, o4 2

aSwR

PROC

REGISTERS

JIF ACT=11 AUTOMATIC MODE, HALT..
JBR [F NO HALT ON ERROR

s SAVE

#SW10,aSwR

MOV
MOV
MOV
JMP

NEXT ,RETURN
#STACK,SP
DM(SR,R1
aRE TURN

BYTE

DATA TABLE

JRESTORE

JHALT ON ERROR?

EXITER

BIT

TSTNC

ERROR MESSAGE

JTYPE

ERRCNT
#Sw08,aSwR
1%

?AVP(

PC.

;DATA HEADER?
:BR IF NO

INC
BIT
BNE

?71
’%:
ERTARC:
.BYTE

002

;GIVE A CR/LF
;NO MORE HEADER UNLESS NO DATA TABLE.
;1S THERE AN ERROR MESSAGE”
:BR IF NO.

2(SP) RO

BEQ

SEQ 0034

MCRLF

MOV

T
HAL
POPRO

ET()

JSHOW IT

WRKO.FM

0
TYPDAT: 1ST
BEQ
6ONVRT
PATARP:
RESREG: RESOS
HALTS:
(MP
DATAHD:

SCOPE,

;TYPE

BEQ

TST

ERROR,

. MERRP(

LERTARO

#-1,ERRFLG

TYPE

205204

(TYPEOUT,

MOVB

ERRMSG: 0
WRKO,FM:
TST
BEQ

104402

000000
005737
001402
104410
0000G0
104407
022737
001403

GENERAL UTILITIES

001325

104402

TYPE

000000

001402

PAGE

CNVRT

1643
1650

1648

12:19

;SHOW ERROR P{ IN DATA LIGHTS
JHALT
JGET RO
;UPDATE ERROR COUNT
;GOTO TOP OF TEST?
JBR IF YES
;GOTO NEXT TEST?
;JBR IF NO
JSET FOR NEXT TEST
JRESET SP
JSET UP R1
;GOTO SPECIFIED TEST
JRETURN

6,2

3,2

SENTER HERE ON POWER FAILURE

012737
000000

005350

000024

PFAIL:

MOV

#RESTART
24

HALT

000777

+PROCESSOR WiLL
012737
01270¢

00533

(1200

00024

RESTAR:

MOV
MOy

JSET UP FOR POWER UP TRAP

JHALT

ON POWER DOWN NCRMA,

TRAP HERE WwHEN POWER [S RESTOURED

8."FAJL, 24
&P
#STACK,

JSET UP FOR POWER FAILURE

JRESET

THE

STAk

POINTER

CZOMC

MACY11

C2ZDMCC.PNM
1704
1705
1706

1707
1708
1709
1710
1711

1712

1713
1714

005362
005366
005372

005376
005400
005404

005622
005424

104412
000177

005430
005432

1719

005436

1721
1722
1723
1724
1725
1726
1727

005444
005446
005450
005450
005452
005454
005462

1720

};Sg
1730
1731

1732

013701
005037
005237

0056410
005414

005420

005434

005436

005464

005466
005466

005474

24-AUG-78

171-AUG-78 08:21

001375
104402
104411
105037
005037

1715
1716

];}g

30A(1052)

005011

00000°
003

00122¢

012777
104414
121111

106614
121224
032777
001772

12:19

005675
005430
001325
001234

PFTAB:
BYTE

000020

173746

000100

173712

005502

000002

173704

1735
1736
1737
1738

005504
005504
005512
005516

152777
013677
062746

000002
173676
000002

173674

1740

005530

001401

005522

032777

000100

1741

05532

000000

1743
;;«g

005542
005550

142777
000002

005557
005552
005556
005562

013637
062746
152777

001416
000002
000020

142777

000020

1742

00553

1746
17647
1748
1749

1750

1751

1752
1753

005570

005576

005604
005610

17564

005612

757

005616

1759

005622

1;22
1758

005614

005616

152777

027777

005337
001364

000003

000007

173610

007416

000002

002001

01337

0€274¢6

CLRB
(LR

ERRFLG
LSTERR

§]5Rj.§}ffifl
.

MSTCLR
JMP

aRE TURN

MOV

ROMCLK
121111

ROMCLK
121224
8IT
BEQ

RT]

000300

1739

DELAY:

173730

142777

};52

;RESTORE R1
*READY FOR TIMMER
“PLUS ONE TO THE TIMER.
“BR IF MORE TO GO
*TYPE THE MESSAGE
JTELL WHAT TEST TO RETURN TO.

.MSTCLR:

173452
173644

173636

00C002

*START CLEAN UP OF DEVICE
JSTART DOING THAT TEST AGAIN.

£20, 3DMPO4

sNEXT WORD IS INSTRUCTION,
“POKE CLOCK DELAY BIT

ROMC_K PC-5304
ROMCLK PC

#8174, aDMPO4

;NEXT WORD IS INSTRUCTION,
*PORT4_JRUS*11
xs CLOCK BIT SET?

BR IF

#BIT&.aDMCSRH

:SET MASTER CLEAR

#BIT&'BIT7.aDMCSRH

BISB
MOV
ADD

#BIT1,aDMCSKH
@(SP)+ DMPO6
#2,~-(SP)

BEQ

HAL T

BISB

BICR
RT]

;CLEAR MASTER CLEAR AND RUN

RE TURN

#5W06 ., 3SWR

:SET ROM]
:LOAD INSTRUCTION IN SEL&
SADJUST STACK

HALT IF Swo6 =1
BR IF

Sw06 =0

‘HALT BEFORE CLOCKING INSTRUCTION

#BIT1'BITO,@DMCSRH ;CLOCK INSTRUCTION

#BIT2/RIT1.BITO,aDMCSRH

:CLEAR ROMG,

173616

.DATACLK:
MOV
ADD
'%:
BISB

a(SP)+ TEMP
#2,-(SP)
#BiT4,8DMCSRH

JPUT TICK COUNT
*ADJUST STACK
-SET STEP LU

173602

BICB

#B]T4,3DMCSRH

-CLEAR STEP LU

173696

CMP

DE(
BNE
14 :

001416

BISB

BIT

1§:

*CLEAR MAINT BITS

BICR

RT]

ROM(LK:

(R1)

T$TNO

000002

152777

DMCSR,R1
TEMP
TEMP
=4
"MPFAIL
LPFTAR

1
3,2

1%:
,
000020

LTIMER:

SEQ 0035

MOV
(LR
INC
BNE
TYPE
CNVRT

CLR

002

GENERAL UTILITIES (TYPEOUT, ERROR, SCOPE, ETC)

001404
001416
701416

17356

PAGE 35

RT]

SDMCSR,@DMCSR

TENMP
1$

ADD

@ CFYe

[N TEMP

TIME

SDEC TICK COUNT
*BR IF NOT DONE

*RE TURN

BLkw 1

MOV

-WASTE

TEMP

82,~(sk)

sMOYE (OUNT

TO TEMP

SaDJUST STA(K

ROMI,

STEP

5304

(ZOMC
MACY1T 30A(1052)
24-AUG-78
cZomcc.P1
11-AUG=-78 08:21

173552

2$:
000002

173536

001416

1771
};;g

005662
005664

001361
000002

1774
(2)
(2)

005666
005672
005675

020040
005015
377

000077
000
053520

(2)
(25
(2)
(2)
(2)
(2)
(2)
(2)
(2)
(2)
(2)

005755
005760
006005
006031
006043
006072
006100
006106
006117
006130
006142

377
047377
377
377
377
051503
042526
040520
105
042524
000052

000122
020117
047111
0642524
047514
035122
035103
051523
051122
052123

042504
052523
052123
045503
000040
000040
051505
0S1117
047040

051777

052105

051440

020212
377
020212
026777

020040
020040
050040
026455

006217

006224
006263
006322
006374

120

035103

020122

020104

000040

020040
020040
020103
026455

MEPASS:

MR:
MERR2:
MERR3:
MISTPC:
MLOCK:
MCSRX:
MVECX:
MPASSX:
MERRX:
MISTN:
MASTEK:

MNEW:

MERRPC:

XHEAD:

.ASC
.ASC

CNOIYIICIIIHIOIINY

047105

MQM:
MCRLF:
MPFAIL:

.
.

.
LASC
.ASC
.ASC

.ASC
.ASC
LASCiZ
LASC
LASC

006450
006510
006526
Q06547
006606
006704

044377
041777
053377
377
044777
053777

053517
051123
041505
051102
020106
044510

0466440
040440
0475246
050040
046504
044103

NuUM:
C(SR:
VEC:
PRIO:
(RAM:
MODU:

(2)
(2)
(2)
(2)
(2)

007054
007114
007154
007205
007215

051777
044777
047377
377
116

044527
020123
020117
051412
053505

041524
064124
042504
051127
020077

BM:
CONN:
NOACT:
SWMES:
SWMES1:

.
ASC
_ASC
_AS(

007277
007320
007330
007340

377
024040
024040
042377

042377

054105
046504
046513
041515

041515

CONERR:

.ASC

007454
007456

000005
006
001246

003

(2)

(2)
(2)
(2)
(2)
(2)

(2)
1775

1776

007223

007460

051777

377

044527

041524

042520
024503
024503
030461

LINE:

CNERR:
DMCM:
KkM(M:
SPEED:
.EVEN

XSTATQ:

>>>p>>

007016

(2)

X %%

(2)
(2)
(2)
(2)
(2)
(2)

.AS(
.ASC
ASC
.ASC

e e s NG N NG NG N NI N NI NI NG P U N N N N N N

(2)

(2)
(2)
(2)
(2)

006144

377

BNE
RT]

S
BYTE
TEMP

NN N N N N NN N N N N N NG N N N

(2>

005733

ROMCLK
021364
BIT
BNE
DEC

(TYPEOUT, ERROR,

SCOPE,

ET(C)

JNEXT WORD IS INSTRUCTION,
;PORT4 _1BUS* REGI11
#2,3DMPO4
1%

h—-»—h-n—.u—.»—»—.b—-t—-u—-u—.s—»—.h-—u—-b- el e e L e L Y oy Sy Wy Ay Sy Sy iy Wby ey Sy Sy )

(2)

BIT
BEQ

PEPPBLBLILIDDDDD

104414
021364
032777
001372
005337

000002

ROMCLK
021364

nonhnuomnovwhnm hnunnununwm

005642
005642
005644
005646
005654
005656

032777
001772

1%:

005632
005640

104414
021364

[gn]

1763
1764
1765
1766
1767
1768
1769
1770

005626
005626
005630

1760
1761
1762

12:19 PAGE 36
GENERAL UTILITIES

#2,aDMPO4
2%
TEMP
1%

SEQ 0036
ROMCLK PC=5304

;1S PGM CLOCK BIT CLEAR?
:BR IF YES

JNEXT WORD IS INSTRUCTION,
PORT4 1BUS* REG]1
;1S PGP CLOCK BIT SET?

ROMCLK PC=5304

BR IF YES
:DEC COUNT

JBR _IF NOT DONE
JRETURN

/2
<15><12>
-377>/PWR FAILED. RESTART AT
<377>/END PASS (IDML
/
<3/7>/R/
<377>/NO DEVICES PRESENT./
<377>/INSUFFICIENT DATA./
<377>/TEST PC-/
<377>/L0CK ON SELECTED TEST/
/CSR: /
/VEC: /
/PASSES: /

TEST /

/ERRORS: /
/TEST NO: /
/*/
<377>/SET SWITCH REG TO DMC11'S DESIRED ACTIVE./
/PC: /
<212>/
MAP OF DM(C11 STATUS/

377>/

ememememec——ccceceee-

212>/
PC
CSR
STAT1
STAT2
<377>/======
mmm=me=
cmeeee c;eeee
<377>/HOW MANY DM(C11°'S TO BE TESTED?/
<377>/CSR ADDRESS?/

STAT3/
eeeeee

<377>/VECTOR ADDRESS?/
<377>/BR PRIORITY LEVEL? (4.,5,6, 7)’/
<377>/1F DMC HAS CRAM (M8204) TYPE W'Z IF CROM (M8200) TYPE 'WN'' 2/
<377>/WHICH LINE UNIT? [F NONE TYPE 'N'', IF MB8201 TYPE '1'", [F M8202 TYP
<377>/SWITCH PACA1 (DDCMP LINE )2/
<377>/SWITCH PACH2 (BM873 BOOT ADD)?/
<377>/1S THE LOOP BACK CONNECTOR ON?/
<377>/NO DEVICES ARE SELECTED/
<377><12>/SWR=
/NEW? /
<377><377>/DMC11 FOUND AT NON-STANDARD ADDRESS
P(: /
<377>/EXPECTED
FOUND/
/
/

(DMC)
(KMC)

/
/

<377>/DM(
" 1~AK (REMOTE L Ow SPEED) OR DM(C11-AL (LOCAL ,HIGH SPEED)
€7

TYPE

'R"’

CZOMC
MACY 30A(1052)
24~AUG-78
czomcc.P1N
11-AUG-78 08:21

1777
1778

1779
1780
1781

007662
007464

007466
007470
00747¢

006
001250
006
001252
006
001254
00¢
001256

12:19

PAGE 37

GENERAL UTILITIES

003
003

6,3

BYTE

6,3

TEMP3

003

TEMP4

002
.EVEN

(TYPEOUT, ERROR,

BYTE

TEMP?

BYTE
TEMPS

1826
1827
1828

1829
1830
1831
1832

006000

INBUF:
. .+40

007544

MDATA:

.40

SEQ 0037

INPUT=QUTPUT

O
O

JROUTINE USED TO CHANGE SOF TWARE SWIT(CH
JREGISTER USING THE CONSOLE TERMINAL

007606
007614
007616
007622
007624
007632
007640
007642
007650
007652
007654
007656
007660

00
NN NN
—
v

—

BEEREBEAAAXIIISY

e B
e
D S
P
W
S
Y
QRS S
ST Y
QD W
Y

EEE
)
et ——d ——d —d

e] NN
WA 2OV~

TR
I
— B

-— —

s e Y

——d

o ¢] 00 0o 00 00 0O 00 OV 00

1819
1820
1821
1822
1823
1824
1825

007502

SCOPE, ET()

6,2

JBUFFERS FOR

1789
1790

007670
007674
007700
007702
007704
007710

007714
007720
007722
007726
007730
007734
007736

007742
007744
007746

007752
007754
007756
007760

022737
001077
105777
100003

000176

001202

(KSWR:

1713%¢2

012737
022777

177777
000007

003734

022777

000207

171336

171346

12704

177777
1777277

04402

007205

04402
004737
02?703

007215
010020
00001¢

022703

00002

022703

000025

022703

000007

042703 177770

010016

#SWREG, SWR

;IS THE SOFT SWR BE ING USED?

TSTB

Q@Tk(SR

*IS DONE

MOV

#-1,DONE

“IF DONE SET, SET FLAG

BEQ
(TMM

1$
#207,aTKDBR

MOV

R2.=(SP)

*STORE R2

MOV

R4 .= (SP)

*STORE Re

CLR

*CLEAR NEW SWR CONTENTS

BPL
2%.

012737

(MP

BNE

(KSWR':

(KSWR2:

BNE

MOV

TYPE

CNVRT
SOF TSW

CkSwR3: TYPE

CKSWRG:

JSR

CKSWRS

#7.aTKDBR

CKSWRS

R3,=(SP)

#=7,SWF 0
#-1.Ré

L SWMES

,SWMEST

PC,

INCHAR

(MP

215 R3

”12,R3

BEQ

:BR IF NO

SET?

GO ON IF NOT SET
*WAS

TYPED?

(7 BIT ASCII)

‘BR IF YES
*WAS CTRL G TYPED?

CTRL

(8 BIT ASCII)

‘BR IF NO
*STORE R3

“SET SOFT TYPE OUT FLAG

SSET

FLAG

TO ALL

STYPE 'SWR=z '

STYPE OUT PRESENT CONTENTS
SOF SOFT SWITCH REGISTER

STYPE "NEW? '

*GET RESPONSE

‘wAS IT A CR?

‘BR IF

BEQ
CMP
BEQ

«$
#25,.R3
(KSWR1

‘BR IF YES
JWAS IT CTRL U?

BEQ
(LR
BI¢

(KSWRé
R4
177770 ,R3

(mp

ASL

ASL
ASL

#7? ,R3

YES

JWAS IT A LF?

JBR IF YES(START OV
JIF CNTL G GET NEXT CHAR

;1T MUST BE A D] GIT SO CLR FLAG
;ONLY O=7 ARE LEGAL SO MASK OFF B]T1S

SSHIFT R2 3

&%, K2

JADD (AST DIGIT

R
N

ONES

TIMES

CZDMC
MACY11 30A(1052)
24=-AUG-78
11-AUG-78 08:21
cZomcc.P11

1833

XV
N @RV ](o RNTo YV, W XYNT P o

—~ed
b a2

mmmmm?
(VL
[V, LV, IV, ]
PERRERPE 2

1834
1835
1836
1837
1838
1839

1855

1856

1857

007762
007764
007772
007774
007776
010002
010006

002002
171200

010016

010010
010012
010014
010016

12:19
PAGE 38
GENERAL UTILITIES

000006

4%:
5¢:

6%:

BR
MOV
TST

BNE
MOV
CLR

MOV

MOV
MOV

(KSWRS: RTS

000000
1057277

177160

105777
100375

171152

010020
010024
010026
010032
010036
010040
010044
010050

010377
042703
000207

010052
010054
(10056

000001
006
000176

100375
017703

SwFLG:

INCHAR:

1STR
8PL

MOV

002

SOF TSw:

CKSWR4

#.START ,6(SP)
R4

63
R2,aSWR
SWFLG
(SP)+ R4
(SP)+ R3

(SP)+ ,R?2
PC

ATKCSR
-4

aTKDBR,R3

arzcsn

B8IC

#iT7.R3

RTS

BYTE

SWREG

(TYPEOUT, ERROR,

TSTR

B8P
MOV

171146
000200

R3,aTPDBR

6,2

SCOPE, ET()

SEQ 0038

JGET NEXT CHARA(TER
;LF WAS TYPED SO GO TO START
;IS FLAG CLEAR?

;IF NOT DON'T CHANGE SOFT SWR
JIF

YES THEN WRITE NEW CONTENTS

;CLEAR TYPEOUT FLAG
JRESTORE

JRESTORE R3

JRESTORE R?
JRETURN

TO SOFT

SWR

CZD0MC
MACY11 30A(1052)
24-AUG-78
CZ0MCC.P1T
11-AUG-78 08:21

12:19
PAGE 39
GENERAL UTILITIES

=00

0o 0o

\I\Ig

S3EERREREER

1858
1859
1860

(TYPEOUT, ERROR,

SCOPE,

ETC()

SEQ 0039

;ROUTINE USED TO ''CYCLE'' THROUGH UP TO 16 DMC11°'S
;THIS ROUTINE SETS UP THE CONTROL ADDRESS FOR THE DIAGNOSTIC
JAND RUNS THE SPECIFIED DM(C11°'S.
THIS ROUTINE *MUST+

;BE _RUN FIRST BEFORE ENTERING THE DIAGNOSTIC FOR THE
;SETUP NECESSARY.

005737
001004
104402
000000
000776

062737
022737
001006
012737
012737
033737
001747
013700
013702
012037

011037
042737
012037

012037

001306

TST
BNE

007154

TYPE
HALT

001316
001216
000004
000010
001700

001322
001320
001320

001500
001702
001316

001320
001322
001306

001320
001322
001404
001374
177000

001366

012037
012237
012237
012700
013737
005237
013737
005237
013737
060037
013737
060037

DMACTY
1%

LNOACT
=2

RUN
RUN
o4 MILK

#10, CREAM
2%

#DM_MAP,CREAM
#CNT.MAP MILK

RUN,DMAC TV
1%

001406
001410

001412

001376
001400
001402

032737
001450

000002

005737

000042

001402
001236

*UPDATE ADDRESS POINTER.

ADD

MOV

JKEEP GOING; NOT ALL

TESTED FOR.

;RESET ADDRESS POINTER.
;RESET PASS COUNT POINTER

CREAM,RO
MILK ,R2
(RO) +,DMCSR
(RO) , DMRVE
C
(RO)+,STAT1
(RO)+,STAT?

$LOAD STAT1
*LOAD STAT?

(R2)+ ,PASCNT
(R2) + ,ERRCNT
#2,RO
DMCSR,DMCSRH
DM( SRH
DMCSRH,DMCTL
DMCTL
DMCTL ,DMPO4
RO, DMPO4
DMPO4
, DMPO6
RO,DMPO6

;LOAD PASS COUNT
.LOAD ERROR COUNT
;SAVE CORE THIS WAY.

(RO)+,STAT3

013737
060037

*UPDATE POINTER
“FATCH CARRY FROM RUN
*UPDATE POINTER

:1S THIS ONE ACTIVE?
‘BR IF NO
“GET ADDRESS PUINTER
*GET PASS COUNT POINTER
*LOAD SYSTEM CTRL. REG
*LOAD VECTOR

#177000,DMRVFC

:CLEAR UNWANTED BITS

*LOAD STAT3

ADD
MOV
ADD

DMRVE (,DMRLVL
RO,DMRL VL
DMRLVL ,DMTVEC

JPTY Ll
;
ST VEC

OMTVEC ,DMTLVL
RO,DMTL
VL

JTX L.

BIT
BEQ

#5W01,5TRTSW
’$

s15
;BR

rey

" 20

JRUNNING [N ALTO MODE?

RO,DMTVEC

TESTED?

*NO DMC11'S SELECTED!!
SSTOP THE SHOMW.
*DISQUALIFY CONT. Sw.
*CLEAR PROC. CARRY BIT.

#DM .MAP+200, CREAM

001374

001414

;ARE ANY DMC11'S TO BE
‘BR IF OK.

;

TEST NG.
[F NO

SELECTED

= O 000~
NS

010360
010362
010366
010370
010372
010374
010376
010400

——d
e
med
) e

ek —
—

RR RRRRRRR
H
LT

010410

QO OQOOOOO0O

=000~V
W
VS

0
D
d e
D
D
D oD
D
D
—
G
QU S
QS W
S
N

0O N0 N0 NO N0 OO OO

AONONOND
— — 222

ND oo
ole oo Vo o RVo Vo]

CZ0MC
MACY11 30A(1052)
24-AUG-78
CZoMCC.P1
11-AUG-78 08:21

010454

e
&

1937

RRPRRRER

NOVNSWN
=20

1939

001045

104402
104403

TYPE

INSTR
MTSIN
?ARAM

104405

104402

000730
010474
010502
010506

BNE

005672

206130

000001
001000
001226
000
001
012700
022710
012737
001020
023760
001014
022760
001010
010037
104402
042737
000412
005720
020027
001351

012737
013701
000177

12:19
PAGE 40
GENCRAL UTILITIES

(TYPEOUTTM,

&
ERROR,

;BR IF

MCRLF

;GET

ET(C)

SEQ 0040

VES

TEST NO.

1000

BYTE
.BYTE

012320

5%:

001226

000002

001226

000004

001214
005755
000002

#TST1,R0O

MOV

(PC)+,a(PC)+

CMP

CMP
BNE
(MP

6%:

’%:

8%:

;CMP FIRST WORD TO 12737

;BR _IF NOT SAME

#TSTNO, 4 (RO)

. 1S LAST WORD 0K?

TSTNO,2(RO)
6%

6%
RC,RETURN

BIC
BR
TST
(MP
BNE

#SWO1,STRTSW
8%
(RO) +
RO,#TLAST+10
5%

TYPE

00"214

(PC)+, (RO)

BNE
MOV

TYPE

005666

012320
001404
170502

MOV

BNE

001236

033746

TSTNO

O
1

MOV

MOV
JMP

,MOM

7ST1,RETURN

DMCSR,R1
aRETURN
USED

JNOTE:

THE

;

AUTO.SIZE:
RESET

001500

CSRMAP:
1%:

001700

001236

011252
000001

001256

ADDRESS RANGE

SO DO IT

;POP RO
AT END YET?
JBR IF NO
ILLEGAL

TEST

NO.

;PREPARE RETURN ADDRESS

JR1

= BASE DMC11

.GO START

TO "'AUTO SIZE'' THE

CSR MAY BE

TEST

ANY WHERE

ADDRESS

TESTING.

DM(C11
IN

THE

(160000:164000)

FLOATING

AND THE VECTOR MAY BE ANY WHERE IN THE
FLOATING VECTOR RANGE (30G:770)

s INSURE A BUS INIT.
;LOAD MAP POINTER.
;JERO ENTIRE MAF

MOV
(LR
CMP

#DM.MAP R?
(R2) +
#DM.END ,R?

CLR
MOV
C_R

DMALM
#DI* .MAP ,R?
DMA(CTV

;SET OCTAL NUMBER OF DM(C11°'S TO O
JRZ2 POINTS TO DMC MAP
sCLEAR ACTIVE

ngTR

#1,TEMPS

JSTART WITH

BNE

001310
001500
001306
000001

:BR Ir NO
JIT IS A LEGAL

:TRY AGAIN

JROUTINE

;
;

sDOES TSTNO MAT(H?
JBR IF NO

JYES

(SR _AND VECTOR.

010570

SCOPE,

BIT
BNE
JMP

#SW00,STRTSW
)
’$

JALL DONE?
;BR _IF NO

JQUESTIONS?
JBR IF YES
;IF NO SKIP QUESTIONS
1

CZOMC
MACY11 30A(1052)
24=-AUG~78
CZOMCC.P1N
11-AUG-78 08:21

1970
1971
1972
1973
1974

1975

1976
1977
1978
1979
1980

010572
010574
010576
010600
010602
010603
010604
010612
010616
010620
010622
010626
010630

104402
104410
012002

005237
104403

PAGE 41

GENERAL UTILITIES

104405

000001
000020
001252
000
001
013737

(TYPEOUT,

4
ERROR,

SCOPE,

ET(C)

SEQ 0041

PARAM

001252
005672

16.
TEMP3
BYTE
.BYTE

001310

MOV
TYPE
CONVRT
WHICH
INC

001256

INSTR
CSR

006510
104405
160000

010644
010650
010652
010654
010656
010660
010662
010664
010665
010666
010672
010674
010676
010702
010706
010710
016714
010716
010722
010724
010726
010730
010734
010736
010740
010742
010744
010746
010750

010752
010756
010762
010764
010770
010772
010774
010776

12:19

0
TEMP3
, DMNUM
MCRLF

TEMPS

;DMNUM - HOW MANY
;TYPE WHICH DMC

JTEMPS

IS BEING DONE

IS WHICH DMC

PARAM

160000

164000
TEMP4
BYTE

_BYTE

001254

MOV

INSTR

0
TEMPS, (R2) +

;STORE (SR IN MAP

VEC

PARAM

001254

10%:

012266
000024

776
TEMP4
BYTE
.BYTE
MOV

TYPE
PRIO

JSR
(MP
BHI
(MP
BLO

000027
000011

MoV
ASL

170777

8¢:

00011¢

000763

1
TEMP4, (R2)

PC,INTTY
#24 R3

TYPE

TYPF

;STORE VECTOR IN MAP
JASK WHAT BR LEVEL

;GET RESPONSE

*BR IF LESS THAN 4
;BR IF GREATER THAN 7
;R4 = NUMBER OF SHIFTS

JSHIFT R3 LEFT

sDEC SHIFT COUNT
;BR IF NOT DONE
JBIC UNWANTED BITS
;PUT BR LEVEL IN STATUS MAP
s CONTINUE

108

JRESPONSE IS OUT
:TRY AGAIN

R4
=4

#17077/,R3
R3, (R2)

£0%:

012266
000121

PC,INTTY
#13%1,R3

.DOE> DM( HAVE (RAM?
:GET REPLY

9%
#116,R3
40%

JYES
;NO
JNOT A Y OR N

JASK

JTYPE !

AGAIN

LIM]TS

CZOMC
MACY11 30A(1052)
24=AUG-78
CZDMCC.P11
11-AUG-78 08:21

2026
2027
20c8
2029
2030
2031
2032
2033
2034
2035
2036
2037
2038
2039
2060
2041
2042
2043
2044
2045
2066
2047
2048
2049
2050
2051

011000
011002
011004
011010
011014
011016
011022
0110246
011026
011030
011032
011040
011042
011046
011050
011052
011056
011062
011064
011070
011072
011076
011100
011102
011104
011106

104402
007340
004737
022703
001414
022703
001403
104402
005666
000763
052762
000402
052712
104402
006704
004737
022703
001417
022703
001412
022703
001403
104402
005666
000760
052722

2053
2054

011114
011116

011124
011126
011132

2052
2055

2056
2057
2058

2059
2060
2061
2062
2063
2064
2065
2066
2067
2068
2069
2070
2071
2072

2073
2074
2075
2076
2077
2078
2079
2080
2081

011112

011122

011136
011140
011144
011146
011150
011152
011154
011160
011162
011166
011166
011170
01172
011174

011176
011200
011202
011203
011204
011210
011212
011214
01721€

12:19
PAGE 42
GENERAL UTILITIES
40%:

012266
000122

100000

TYPE

SPEED
JSR

000004

L41%:

9%:

16%:

012266
000021

(TYPEOUT, ERROR,

PC,INTTY

#122,R3

16$
#1164 ,R3
41%

000114

000002

SCOPE,

ETC)

SEQ 0042

;DM
s GE
IS

40%
JB£T1,4(R2)
16

;TRY AGAIN

#BIT15, (R2)

JSET BIT1 N STAT3
c CONT INUE
JSET BIT 15 IF CRAM

PC,INTTY

;GET REPLY

421,R3

00002

JASK WHICH LINE

UNIT

;0010!

;10210

000116

;'N“

JIF NOT A 1,2 OR N TYPE 'TM*°

16%

. TRY AGIAN

(RZ)+,(R2)+

;POP OVER STATZ2 AND STAT3

010000

#BIT12,(R2)+

000447
052712

020000

33%
#IT13,(R2)

JSET 811

007114
004737
022703

012266
000131

PC,INTTY

#1%1,R3

JASK ]F LOOP-BRACK IS ON
:GET REPLY

006116

#116,R3

308

:TRY AGAIN

022222

104402

001406
022703
001406
104402
005666
000763
052722
000402
042722
104403
007016
104405
000000
000377
001254
000
001
113722
104403
(07054
104405
00600NG

(40000
04000C

17%

188

17%:

#MBIT14, (R2)+

'8%:

#MIT14,(R2)+

109¢:

19%

JSET BIT 12 IN STATZ IF NO LU
13 IN STAT2 [F M82Q2

;IF NOT Y OR N TYPE "'

JTURNAROUND S CONNECTED
:NO TURNAROUND

0
3

(015«

TEMPSL, (R2)

JSTORE SWITFH PAC [N MAP

CZOMC
MACY11 30A(1052)
24-AUG-78
cZoMcC.P1
11-AUG=-78 08:21

2082
2083
2084
2085
2086
2087
2088
2089
2090
2091
2092
2093
2094
2095
2096
2097

w&w&uwwgwmmmwmmmmma—a—a—a—a—-—-—a—a—a%oogo?
W
2OV
NRNRNN 200NN
WSO
000~y
W
NOWVMB

— emd ed

e e

ed e

b e

)

d e

)

D ed

D e

ASIaVLVIN 1, N1,V N 1a S LN,V LN LN ) ST S 1N L U, BTN 1, 1S 1 6T U1, ST,V 1,V 1,N1,8Y,¥1 81,8 1, T,V1,81,87,¥)

2098
2099
2100
2101
2102
03

011220
011222
011224
011225
011226
011232
011234
011240
011242
011246
017252
011256
011264
011266
011270
011272

011276
011302
011304
011310
011314
011322

000377
001254
000
001
113722
005722
005337
001402
000137
9000137
012701
012737
005011
005711
001172
005061

005761
001165
012711
005061
012761
052711

001252

33%:

010612
011702
1€000C
011774

36%:
7%:

002000
000004
125252
020000
125252

000006

100000

000002

001000

011360
011364

012711
012711

001400
002000

011370

011376
0116400
011406
011410
011416
011420
C11422

011430

011432

011436
011442
011450

022761

00141
022761
001410
022761
001404
000516
052762

010122

012711

005061
012761
052711

011454
011462

012761
052711

011474

001003

011466

0114726

011502
011506

011512
011514
011520
011522
01153C

122761

052712

000436
032761

001403
052712
000427
032761
001023

000004

2%:

000006
000006

022761
001004
052762
000431
012711

012761

377
TEMP4
BYTE
BYTE
MOVR
TST
DEC
BEQ
JMP
JMP
MOV
MOV
CLR
TST
BNE
CLR

001254

011326
011334
011336
011344
011346

011352

12:19
PAGE 43
GENERAL UTILITIES

000004

100430

000006

016472

000006

016461

000006

177777

(000006

000002

000006

2°s:

001000
000004
122113
000400

021264
000400

000377

158
000006
000006

000004

010000

000002

000004

060000
000070

000004

O
1
TEMPS, (R2) +

SCOPE,

ET(C)

SEQ 0043

JSTORE SWITCH PAC IN MAP
;POP OVER STAT3
;DEC DMC COUNT
;BR IF DONE
;JUMP [F NOT
; CONT INUE
;SET FOR FIRST ADDRESS TO BE TESTED
;SET FOR NON-EXiSTANT DEVICE TIME OUT
;CLEAR SELO
;IF DMC11 DMCSR S/B 0
;IF NO DEV ; TRAP TO 4. :Ff nO BIT 8 THEN NO DM(C11
;CLEAR SEL6

(R2) +

TEMP3
34%
12%
13$
#160000,R1
RES , x4
(R1)
(R1)
3s
6(R1)

;SET ROM]

MOV
MOV

#BIT9!BIT8,(R1)
#1710, (R1)

;CLOCK INSTRUCTION (MICRO PROC PC TO 0)
;SET ROMO

BEQ
(MP
BEQ
CMP
BEQ
BR
BIS
THIS

(TYPEOUT, ERROR,

#125252,4(R1)
21%
#BIT15,2(R2)
22%
#8179, (R1)

MOV

23%:

TST
BNE
MOV
CLR
MOV
BIS
(MP
BNE
BIS
BR
MOV

(MP

éé;

POINT

MOV

CLR
MOV
BIS

MOV
8IS

5(R)
3%
#81T710, (R1)
4(R1)
#125252,6(R1)
#B1T13,(R1)

#100450,6(R1)

#016472,6(R1)

23$
#016461,6(R1)
22%
#-1,6(R1"
22%
33
#BIT1,6(R2)
IT

IS ASSUMED

R1,(R2)+

;IF DMC11 THEN DMRIC S/B
JBR Ir NOT DMC11
;SET ROMO
;CLEAR SEL4
;WRITE THIS TO SEL6
JWRITE IT!
;WAS IT WRITTEN?
sIF NO IT IS NOT CRAM
JSET BIT1S IF (RAM

:PUT INSTRUCTION IN SEL6

1S IT LOCAL CROM>

JBR IF YES
;IS IT REMOTE (ROM?
;BR IF YES
sNO CROM?
JBR IF YES
NOT A DM(
JSET BIT 1 IN STAT3
THAT

HOLDS

A DM(11

;STORE CSR IN CORE

(SR ADDRESS.

TABLE.

#MIiT9,(R1)

:CLEAR LINE UNIT LOOP

#021264,6(R1)
#RIT8, (R1)

:LOAD INSTRUCTION
SCLOCK INSTRUCTION

4(R1)
#122113,6(R1)
MmIT8, (R1)

SCLEAR PORT4
:LOAD INSTRUCTION (CLR DTR)
SCLOCK INSTRUCTION

(MPR

#377.4L(R1)

BIS

#;T12,(R2)

BEQ
BIS
8R
BIT
RNF

.+10
BR IF M8201
#BIT13.8IT14,
(R2S ;M8202 ASSUME CONNECTOR
20%
;CONNECTOR ON)
CTT3,4(RD
“1S MRDY SET
20
PBR IF MB8201 NO CONNE TOR

BNE
B8R
Bil

.+10

208
#MRIT1,4(RT)

SIS IT ALL ONES?

*BR IF NO

:1F

YES, NO LINE UNIT,

SET STATUS BIT

;1S SWITCH A ONE?

/ON . INE

CZOMC
MACY11 30A(1052)
24~-AUG-78
CZDMCC.P11
11-AUG-78 0821

2138
2139

011532
011540

012761
012761

2140
2141
2142

011546
011552
011560

052711
012761
052711

2144
2145
2146
2147
2148
2149
2150
2151
2152
2153
2154
2155
2156
2157
2158
2159
2160
2161
2162
2163
2164
2165
2166
2167
2168
2169
2170
2171
2172
2173

011572
011574
011600
011602
011610
011614
011620
011626
011632
011636
011640
011642
011646
011654
011656
011660
011664
011670
011674
011676
011702
011706
011712
011714
011720
0117264
011726
011732
011736
011740

001402
052712
005722
012761
012711
156122
012761
012711
156122
005722
005011
005237
022737
001412
005011
005061
062701
022701
001402
000137
005037
005737
001423
013701
010137
000241
006137
005237
005301
001371

2143

2174

2175
2176
2177
2178
2176
2180
2181
2182
2184

011564

011742

012737

011750
011756
011762
011766
011770
011772
011774
012000

000776
012716
000002

012002

000001

2185

012004

2188
2189
2190
2191
2192
2193

218

032761

013737
000137
104402
005000

C00100
122113
00400
021264
000400
000010

12:19

021324
0C1400
000004
021344
001400
000004

001310
000020

MOV
MOV

000006

MOV

000006

BIS
BIT
BEQ
BIS
TST

MOV
MOV

BISR

MOV
MOV

BISR
TST

(LR
INC

Cui310

(MP

3%
14%:

13%:

00131C
001314

BEQ
CLR
(LR
ADD

% ¥

000004

0013;

5%:

INC
DEC
BNE
MOV
MOV
JMP

TYPE

(LR

HALT

et
wH] H:

012006

002

001256

002

012010
012016
012020
012026
0120%
(12040

032737
001114
012737
012737
012702
012700

000001

00123

000340
012202
001500
060300

000022
000020

4(R1),(R2)+

:STORE BM873 ADD IN TABLE
:POP OVER STAT3

+
(R2)
(R1)
DMANUM
#20, DMNUM
13%
(R1)
6(R1)
#10,R1
13%

DMA( TV
DMNUM

DMA(TV
DMAT TV
R1
3

6, N
DMACTV,SAVA(T

VE CMAP
JMERR?
RO

MOV

BYTE

2,2

8l1
BNE

#5w00,STRT
W

RT]

TEMPS
£ TMAP:

:PORT6_INSTRUCTION

=2
4148, (SP)

011664

MOV
MC
MNP,

:CLOCK INSTRUCTION(READ MODEM REG)
*1S MRDY SET NOW?

#021344 ,6(R1)

#31T8.BIT9,(R1;

5%
R
DMNUM,
R1,SAVNUM

ROL

SEQ 0044

:BR IF NO CONNECTOR
:SET STATUS BIT FOR CONNECTOR
(R2)+
:POP POINTER
#021324,6(R1)
:PUT INSTRUCTION IN PORT6
#B1T9!BIT8,
(R1) *PORT4_LU 15
4(R1),(R2)+
:STORETMDDCMP LINE # IN TABLE
P4

BEQ

MOV
cLe

ET()

#1714, (R2)

#1646000,R1

TST

SCOPE,

;LOAD BORT4
*LOAD INSTRUCTION
:CLOCK INSTRUCTION(SET DTR)
:LOAD INSTRUCTION

CMP
BEQ
JMP
CLR
MOV

001306
001306

(01306
01201C
005760

20%:

000006

011264
001306
001310

(TYPEOUT, ERROR,

BIS

000004

000006
000010
164000

000006

GENERAL UTILITIES

000004
000006

040000

Fo4

PAGE 44

:CLOCK”INSTR.

‘CLEAR ROMI
:UPDATE DEVICE COUNTER
SARE MAX. NO. OF DEV FOUND?

:YES DON'T LOOK FOR ANY MORE.
SCLEAR BIT 10
*CLEAR SEL 6
ZUPDATE

(SR POINTER ADDRFSS

;BR [F DONE
;JUMP [F NOT
JWERE ANY DMC11'S FOUND AT ALL?

;ERROR AUTO SIZER FOUND NO DM(C11'S IN THIS SYS.

;SAVE NUMBER OF DEVICES
;GENERATE ACTIVE REGISTER OF
JSET THE BIT

JBR IF MORE TO GENERATE
JRESTORE

TRAP VE(CTOR

+SAVE ACTIVE REGISTER
cGO FIND THE VECTOR NOW.

JNOTIFY OPR THAT NO DM('1'S FOUND.

sMAKE DATA LIGHTS ZERO
;STOP THE SHOW
;DISABLE CONT.

Sw.

JENTERED BY NON-EX|STANT

JRETURN TO MAINSTREAM

#360,a42°
8.8 0420

B MAP
R
#300,~(

DEVICES.

JSET JOT TRAP PRIQ 10 7
:SET JOT TRAP VEZTOR

TIME-QUT.

JSET SOF TWARE PQOINTEK
JFLOATING ECTORS START W ~F

MACY11 30A(1052)
€L CMC
24;AUG-78
11-AUG-78 08:2
cZomcC.P1

2194
2195
g}%

012044
012050
012052

012701
010120
012721

97
21 98

012056
012060

022021
020127

2200
2201
2202
2203
2204
2205
2206
2207

012066
012074
012100
012102
012106
012114
012116
012124

013737
006037
103063
012704
016437
011207
012761
012711

2208
2209
2210
2211
2212
2213
2214
2215
2216
2217
2218

012130
012136
012142
012144
012146
012152
012154
012162
012164
012172
012174

012761
012711
105200
001376
162704
001404
016437
000767
052762
00501
062702

2220
2221
2222

012202
012206
012214

051662
042762
016405

12:19
PAGE 45
GENERAL UTILITIES

000302

1%:

900004

200012
012252
000200
001000
“21111
001400

001246

(TYPEOUT, ERROR,

#302 ,R1
R1. (RO)+

#4,(R1)

1%
DMACTV, TEMP1
TEMP1

000004

#12,RG
BRLVL (R&) ,PS
(R2) ,R1
#2004 (R1)

000006

#1211711,6(R1)

177776

#MITS, (R1)

#MIT9 BiT8, (R1)

€000C2
177776

005300

000602

00000
0006002

6%:

4%:

BQLV;(RL),DS
7
#5300,2(R2)

(R1)
#10,R2

(SP),2(RZ)
#7,2(R2)

BRLVL+2(Rs)
RS

012230
012234

042705
050562

170777
000002

2230

012242

012718

012172

2233
2234
2235
2236
2237
2238
2239
2240
2241
2242
2243
22+4
2245
22646
22647
22648
2245

012252
(12256
012256
012260
012262
012264

000000
000000
000200
000240
000300
000340

012266

105777

012272
012274
012300
012304
012306
012312
012%16

100375
017703
105777
100375
0103?77
04270%
000207

RS
RS
8170777
,RS
RS,2(R2)
¢+, (SP) e
(SP)
#38, (SP)
cs:

BRLVL:

JLEVEL
JLEVEL
JLEVEL

166712

66706
166704
166700
00024C

INTTY:

SEQ 0045

;PC OF I0OT INSTR.
JSTART FILLING VECTOR AREA
JWITH .+2; 0T
JADD 2 TO RO +R1
sBR IF MORE TO FILL

:STORE

TEMPORALLY

;R4

INDEX REGISTER

JBRING OuT A BIT
;BR IF ALL DONE
1S

“SET PS TO 7

;SET ROM]
JPUT INSTRUCTION IN PORT6
sFORCE AN INTERRUPT
JSTALL
TIME

INTERUPT

JGET NEXT LOWEST PS LEVEL
;BR |F R& = 0
JMOVE NEXT LOWER LEVEL IN PS

¢BR T0 DELAY

;NO_INTERUPT ASSUME 300 AT LEVE.
;C(LEAR ROM]
;POP SOF TWARE POINTER
;KEEP GOING
;GET VECTOR ADDRESS
;(LEAR JUNK
;GET BR LEVEL OF DM(C11
THE

s STATUS

LEFT

TABLE

FOR

THE

cCLEAR UNWANTED BITS
JPUT BR LEVEL IN STATUS TABLE
JPOP JOT JUNK OFF STACK
JSET FOR RETURN

DONE W]TH “'AUTO SIZING'’

eT~n(SK

JWAIT FOR DONE

STKDBR,RY

JPUT (HAR [N R3
JWAIT UNTIL PRINTER ]% READY

-4

arfcsn

éssarpoaa
o

5 AND FIX DMC11 LATER

JSHIFT LEVEL & PLACES

;TO

JALL

JLEVEL
<LEVEL
JLEVEL

ET()

NOAWNESOO

2227
2228

SCOPE,

JFOR

#Z R4

012252

000002
000007
012254

(ROY+, (R1)+
R1,#1000

001000

001306
001246

Y7_B!Y‘).H'

JECHO (HAR

JMASK

OFF

N
T E
JR

(OwfR "A°E

CZOMC

MACY11

czomMcC.P1M

30A(1052)

24-AUG~78

11-AUG~78 08:21

12:19

GENERAL UTILITIES (TYPEOUT, ERROR, SCOPE, ETC)

2250
2251
2252

JRrrannrRRNR
AR Rntknnnrrnnnn

2254
2255
2256
2257
2258

'VERIFY THAT REFERENCING UNIBLS DEVICE REGISTERS
;*DOES NOT CAUSE A TIME OUT TRAP
:;tttttttttttttttttttttlttt'tttttttfittttttt.'t'.tttt.tt'ttntttt

2267
2268

2269
2270
2271
2272

2273
2274
2275
2276
2277
2278
2279
2280
2281

)
012320
012326
012334

012342
012346
012352
012360
012366
012370
012372
012374
012400
012402
012404
012412
012416
012620
012422
012424

;

012737
012737
012737
.
013701
012700
012737
012737
005711
000240
1044601
062701
005300
001371
012737
005037
104400
011602
104001
000002

0000
012426
012366
001404
000004
012420
000340

001226
001216
001220

00000«
000006

7TST1:

1¢:

000002

000006
000006

00004
’%:

MOv
MOV
MOV
MOV
TST
NOP
SCOPT
ADD
DEC(
BNE
MOV
(LR
SCOPE

;SwW09=1?
JNEXT REGISTER
;DEC REGISTER COUNT
JBR IF NOT LAST REGISTER
JRESTORE LOC ¢
JRESTORE LOC 6
JSCOPE THIS TEST
JGET P(C OF TRAP
s TIME-QUT ERROR

#2 ,R1
RO
1%
n6,4
6
(SP) ,R2
1

HLT
RT]

2283

'VFRIFV

2298

" LA AR

(12426
01243%

012737
012737

012442
012444
012446
012450
(012452
012454

005011
005005
011104
001401
104002
104400

00000c
012456

001226
(001216

T1S'2:

1%:

snnnnnnnnevavnnennnranansnne

JR1 CONTAINS BASE DM(11 ADDRESS
JR1 CONTAINS BASE DM(C11 ADDRESS
;4 REGISTERS TO BE TESTED
JSET UP TIMEOUT TRAP
JLEVEL 7
JREFERENCE DEVICE REGISTER

DM(CSR,R1
#4 R0
! 74 ¥
#360,6
(R*)

JENRNCARANRNRAR
N TN RN ARrannedn

2285
2286
2287
2288
2289
2290
2291
2292
2293
2294
2295
Sggg

TEST

fmmemmmeeeaeeee
MOV
#1,TSTNO
MOV
NTST2 NEXT
MOV
#18,L0CK

2282
228‘.

[ECT

SEQ 0046

22573

2259
2260
2261
2262
2263
2264
2265
2266

PAGE 46

TEGT

THAT RUN (AN BE (LEARED

SRRl

ZE R AR

sonensnnnenonannsnnannnenen
EEE FEZ R

EE RN

AR RN

EEENRESEEEE

.
TEST 2
R
e D
MOV
#2,TSTNO

MOV

#TSTI NEXT

(LR
LR
MOV
BEQ
HLT
SCOPE

(R1)
RS
(R1) ,Ré
1%
l

;JR1 CONTAINS BASE DM(C1" ADDRESS
.CLEAR DMCSR
sJCLEAR “EXPECTED"’
JPUT DM(CSR IN "FOUND''
:BR IF CLEARED
JERROR DM(SR NOT (LEARED
.SCOPE THIS TEST

2299

Jrenranesnnnsrannnanvarnvens

2301
2302

L 0AD ALL REGISTERS WITH [NCREMENTING PATTERN
:'READ BACK ALL REGISTERS TO VERIFY (ORKECT ADDRESSING

2300
2303

2304

2305

TOCT

snnnnnanenonsennonosnnnennes

'UNIBUS REGISTER WORD DUAL ADDRESSING TEST

'-:t'tt'ttttttttt".tt.tttttnt.ttt.nttntti.ttt..tt.nt'n.t-o-tt'-

;

TEST 3

000003

212606
012506

4
I
12:19
PAGE 4?7
DMC11 UNIBUS REGISTER TESTS

001226

001216
001220

TST3:

MOV
MOV
MOV

#3,TSTNO
NTSTL NEXT
#1$,L0CK

MSTCLR

000001
Gunr

QOOOOOOOO

1%:

MOV

#1,RO

MOV
MOV

RO.RS
RO, (R1)

BEQ

(LR

(R")

s Qunr S

Gy G

MOV
(MP

’%:

pur G

OVO00 NN

AUPNINUNL
AL NN NN NI NN
WWW NN N WNWININ
NN
N—=
o a0 a0

3EEE

€ DMC
MACY11 30A(1052)
24-AUG-78
11-AUG-78 08:21
4 OMCC.P1

TST

INC

000005
001404
000001
01255¢

HLT
SCOP1

1%:

“%:

00ocos

;CLEAR REGISTER

;PUT DATA IN "EXPECTED"’
JWRITE DMC REGISTER WITH PATTERN

;DATA ERROR
. SW09=1?

JBR

JNEXT

INTO "FOUND''

YES

¢ INCREMENT CATA PATTERN

MOV
MOV
MOV

DMCSR,R1
#1,RO
#3%,L0CK

JBASE DMC11
ADDRESS TC R1?
JRESTART PATTERN AT 1
JNEW SCOP1

(R1) R4

;JREAD DMC REGISTER

MOV

RO,R5

(MP
8tQ

RS,R4
4%

INC

MOv

HLT
SCOP1
TST

BNE

;LAST REGISTER?
;BR

IF NO

JPUT DATA IN "EXPECTED"'
21S DATA CORRECT
JBR IF YES

INTO "FOUND''

(R15 ¢

.DUAL ADDRESSING ERROR
. SW09-1?
JNEXT REGISTER

#5,R0

sLAST REGISTER?

J INCREMENT PATTERN
;BR IF NO
;SCOPE

JeemmannRnR
e nrrnannwntann

THIS

JEST

TEST

anennnnnsesnnannesnnnnnnnnn

;*CONTROL STATUS REGISTER WRITE/READ TEST

;*SET BITO, VERIFY BITO WAS SET
J*CLEAR BITO, VERIFY BITO WAS CLEARED

::"'t"'.l.QQ""'Q.Q"..t'..tti..t.tt..tt..lt't.t.t"tt'ttt‘!

— N NN
N

SO =ONIWISNONON

000004
012704
012632
001404
000001

0012¢6
001216
001220

T€74:

TEST

'$:

#4,TSTNO
#TSTS NEXT

MST(Lk
MOV
MOV
MOV

DMCSR ,R1
#3.10,R5
RS, (R1)

(MP
8fQ

RS ,R4
2%

S(OP
MO,

,
#ig,.. «

MOV

( ’ 1")'}"

MOV
MOV

MoV

81\\.’1—‘\!\\0\“‘\[\[\
NO
iggpdc>crdufluux

~N &

lelelelelellolole

3
SEE? mrd-a-hasa_ha_a
—

QO -t —a

b —d

—

RARN IS 00N

ADDRESS

;START PATTERN AT 1

JREAD DMC REGISTER
s1S DATA CORRECT

(R1)+

DMC11

#5,R0

(MP

NN Wiy =

RINRNINININ
AR NN
AARNAARRRRRRRRY

CONTAINS BASE

JMASTER CLEAR DM(C11

(MP

SCOPE

2355

;R1

(R1) ,R4
RS,R4

BNE

out12ev

SEQ 0047

HLY

#1%,L0CkK

(R1),R¢

JMASTER CLEAR DM(11
JPUT REGISTER ADDRESS IN R1
;PUT DATA IN "EXPECTED"'
JWRITE BIT 0

:READ CONTROL STATUS REGISTER

1S DATA CORREC(T
JBR IF YES

:DATA ERROR

;w09 LP°
JNEW SCOP

C,OMC
MACY11 30A(1052)
24-AUG-78
11-AUG-78 08:21
CZ0MCC.PIN

012664
012670
012672
012674
012676
012700

012792

062711
005005
011104
001462
104000

12:19

PAGE 48

3%:

BI(
CLR

000001

DMC11

1044601

106400

UNIBUS REGISTER TESTS

MOV
BEQ
HLT
SCOP1

SEQ 0048

#3170, (R1)
RS

JCLEAR BIT 0O
JCLEAR "EXPECTED"'

(R1) R4
4%
2

JREAD CONTROL STATUS REGISTER
;BR IF ZERO
;DATA ERROR BITO NOT (CLEARED
. SW09 uP?

SCOPE

;SCOPE

JNTRRRRRRRANR
AR
RO AR AARRAnn

THIS

JEST

TEST

wnennnnanannnnnannntennnann

;*CONTROL STATUS REGISTER WRITE/READ TEST
J*SET BIT1, VERIFY BIT1 WAS SET
;*CLEAR BIT1,
.

jolalelelel Jolole

2O =OMNwW

f\)—l-—l-—l—l?—l-—l—l
NI

012704
012712
012720
012726
012730
012734
012740
012742
012744
012746
012750
012752
012754
012762
012766
012770
012772
012774
012776
013000

000005

013002
012730

001226
Qul2
¢
001220

001404
000002

TST5:

401

012762
000002

001220

°%:

3s:

WAS (CLEARED

ARNANR A RN AN NN

A NAAN P

AN NN

ANNARAARNT RN RRRN

TEST S

MOV

#5,TSTNO

MOV

#TSTO NEXT

MSTCLR
MOV
MOV

DM(SR,R 1

MOV
1¢:

VERIFY BIT1

TARARARAARANAN AR

#18,L0(K

#IT1,RS

JMASTER CLEAR DMC11
JPUT REGISTER ADDRESS IN R1
JPUT DATA [N "EXPECTED"'

MOV
MOV
CMP
BEQ
HLT
SCOP1
MOV

RS, (R1®
(R1) ,R4
RS ,R4
2%
Pa

.DATA ERROR

#3%,.0(K

JNEW SCOP1

MOV
B8EQ

{(R1) R4
4 3

BIC
(LR

#MITI
RS

HLT

SCOPI
SCOPE

JWRITE BIT 1
JREAD CONTROL STATUS REGISTER
1S DATA (CORRE(T
;BR IF YES
;SW09 UP?

.CLEAR BIT 1
;CLEAR "EXPECTED''

cREAD CONTROL STATUS REGISTER
:BR IF ZERO

:DATA ERROR BIT1

:SW09 UP?
;SCOPF TH]IS

JRRANRTANRRNARR
R R R R R nnnnann

TEST

€

NOT

CLEARED

TEST
aennnnnnenrsrennnvnnnnnnnannr

. *CONTROL STATUS REGISTEP WRITE/REAC TEST

;*SET BIT2, VERIFY BIT2 WAS SET
J*CLEAR BIT2, VERIFY BIT2 WAS (LEARED

N AN NNS NN
OO=O0O
~ NWW
S an=—roNNN

2000
QOOO0O

—

ALY
-‘—l—d?
O —2
2 ONIWENINNY

WWS
RR
L8888L
WWNON)
— —

nNoO

—

—d

)

slelelololelolele

000006
013100
013026

001404
000004

001226
001216
001220

RAR RN AR NN

RN R

MOv
MOV
MOV
MSTCLR
MOV
MOV

DMCSR,R1
#M]72 RS

MO\
ME

("H) Re
K5, RG

MOV

#6,TSTNO
#1577 NEXT
#18,L0(k

RS‘(Rf)

I AN AR

N AR AN T AN AR AR ORI AN NSRRI N NIRRT

JMASTER CLEAR DM(11
‘PUT REGISTER ADDRESS IN R1
‘PUT DATA IN "EXPECTED"

CWRITE BIT 2

*READ CONTROL STATUS REG]STER
©1S DATA CORRE(T

NES

€ DM(
MACY1Y 30A(1052)
24~AUG-78
4 DMCC.P11
11-AUG-78 08:21

2618
2419
2620
2621
2622
2623
2624
2625
2626
2627
2628
2429
2430
2431
2632
2433
2634
2435

2636
2437
2438
2439
2440
2641
2642

2443
2644
2645
2446
2647
2448
2449
2450
2451
2452
2453
2654
2455
2456
2457
2458
2459
2660

013044
013046
013050
013052
013060
013064
013066
013070
013072
013074
013076

K
&
12:19
PAGE 49
DMC11 UNIBUS REGISTER TESTS

001601

013060
000004

001220

104400

2%:
3%:

A ¥

MOV
BIC
CLR

#38,L0CK
#BIT2,(R1)
RS

Mov
BEQ
HLT
SCOP1
SCOPE

JBR IF

YES

;DATA ERROR
., SW09 uP?

JNEW SCOP1
;CLEAR BIT 2
;CLEAR "EXPECTED'’

(R1) R4
4%
2

'READ CONTROL STATUS REGISTER
BR IF ZERO
:DATA ERROR BIT2 NOT CLEARED
:SW09 UP?
;SCOPE THIS TEST
TEST

wnmnnnrenrnnrnarnnennntnnnnn

;*CONTROL STATUS REGISTER WRITE/READ TEST

J*SET BITS5, VERIFY BITS WAS SET
;*CLEAR BITS5, VERIFY BITS WAS CLEARED

;:i***tfitifi*"tfit.itfititttt.tttfitttkttQtttt't'tttt.t'ttttttfi'tt

013100
013106
013114
013122
013124
013130
013134
013136
013140
013142
013144
013146
013150
013156
013162
013164
013166
013170
013172
013174

012737
012737
012737
104412
013701
012705
010511

000007
013176
013124

001226
001216
001220

001404
000040

013156
000040

1ST17:

1%:

001220

2%:
3%

MOV

#7,TSTNO

MOV
MOV

#TSTI0,NEXT
#18,L0CK

MOV
MOV
MOV
MOV
(MP
BEQ
HLT
SCOP1
MOV

DMCSR,R1
#MITS,RS
RS, (R1)
(R1) ,R4
R5,R4
2%

MSTCLR

#3%,L0(K

#ITS5,(RY)

HLT

(LR
MOV
BEQ

JPUT REGISTER ADDRESS IN R1
JPUT DATA [N "EXPECTED''
JWRITE BIT S
JREAD CONTROL STATUS REGISTER
. 1S DATA CORRECT
JBR_IF YES
;DATA ERROR
;SW09 uP?
sNEW SCOP1

BI(

JCLEAR BIT 5

RS
(R1) ,R4
3]

SCoPI
SCOPE

JMASTER CLEAR DM(11

;CLEAR "EXPECTED'’
READ CONTROL STATUS REGISTER
JBR IF ZERO

sDATA ERROR BITS NOT

. SW09 uP?
;SCOPE THIS

Jennnnnnannsnnnnvnrrnnnnnwns

[EST

CLEARED

TEST

:+CONTROL STATUS REGISTER WRITE/READ
J*SET BIT6, VERIFY BIT6 WAS SET

anvnnnennnranernennnnnnnarnny

TEST

:+CLEAR BIT6, VERIFY BIT6 WAS CLEARED

24665
2666

NN ARAAN RN AR RN R TN

2667

2469
2670
2471
2472
2473

HLT
SCOP1

JNNERRRRNRRNNAARNRARANS
AARAk

2661
2662
2463
2464

2468

BEQ

SEQ 0049

:
013176
013204
013212
013220

013207

000010

013274
013222
001404

001226
001216
001220

T¢1°C:

TEST 10

MOy

#10,TSTNO

MOV
MSTCLR

4%, LOCK

MOV
MO\

EC R AN RSN AN AN NN AN AN AR AR AR RN AN RN

#15F171 NEXT
DM( SR ,R1

:MASTER (LEAR DM(11
SPUT REGISTER ADDRESS

IN R

P AR R RN

N RN RS

CZOMC
MACYIY 30A(1052)
24-AUG-78
CZDMCC.P1T
11-AUG-78 0821

2474
2475
2476
2477
2478
2679
2480
2681
2682
2483

013226
013232
013234
013236
013240
013242
013244
013246
013254
013260

2685
2686
2487

013264
013266
013270

2484

gzgg

0°2705
01051
011104
020504
001401
104002
1064401
012737
042711
005005

013262

011104

013272

104400

4
L
12:19
PAGE 50
DMC11 UNIBUS REGISTER TESTS

000100

(013254
000100

001220

°%:

MOV

001402
104002
104401

2490

BEQ
HLT
S>COP1

#176,RS
RS, (R1)
(R1) R4
RS,R4
2%
2
#38,10CK
#3176, (R1)
RS
(R1) ,R4

43
2

SCOPE

;PUT DATA IN "EXPECTED'
JWRITE BIT 6
JREAD CONTROL STATUS REGISTER
;1S DATA CORRECT
;BR IF YES
;DATA ERROR
2 SW09 UP?
;NEW SCOP1
;CLEAR BIT 6
;CLEAR 'EXPECTED''
;READ CONTROL

STATUS REGISTER

;BR IF ZERO
sDATA ERROR BIT6 NOT CLEARED
;SW09 uP?
;SCOPE

THIS TEST

249N

SANNARARNRRANNAARRNRRAAANANAR

2492
2493
2694

:*CONTROL _STATUS REGISTER WRITE/READ TEST
:+SET BIT7, VERIFY BIT7 WAS SET
**CLEAR BIT7, VERIFY BIT7 WAS CLEARED

2496
2497

2495

2498

2499
2500
SO0
2502
2503
2504
2505
2506
2507

013274
013302
V13310
013316
013320
013324
013330
013332
013334

013336

2510

013342

2511
2512
2513
2514
2515
251
2577

gg}g

013340

0133464
013352
013356
013360
013362
01334
012366
013370

012737
012737
072737
106412
013701
012705
010511
011104
(020504

000011
013372
013320

0Q0122¢
00-21€
001220

001404
000200

T1ST11:

1%:

001401

104401

012737
042711
005005
011104
001402
104002
104401

073352
000200

001220

104400

3%:

4%:

2520

TEST

womannnnnnnnannnrsenttnnnnn

R SR R ARy

MOV
MOV
MOV
MSTCLR
MOV
MOV
MOV
MOV
CMP

DM(SR R
#3177 RS
RS, (R1)
(R1) R4
RS,R4

JMASTER CLEAR DMCT1
sPUT REGISTER ADDRESS [N R1
sPUT DATA IN "EXPECTED''
JWRITE BIT 7
JREAD CONTROL STATUS REGISTER
:1S DATA (CORRECT

HLT

;BR IF

SCOP1

MOV
BI(
CLR
MOV
BEQ
HLT
SCOP1

#11,TSTNO
#1ST12,NEXT
#18,L0(K

YES

;DATA ERROR

#38,L0CK
MIT7,(R1)
RS
(R1) ,R4
43
2

SCOPE

;SW09 UP?

;NEW SCOPI
;CLEAR BIT 7
sCLEAR "EXPECTED"'
JREAD CONTROL STATUS REGISTER
JBR IF ZERO
;DATA ERROR BIT7 NOT CLEARED
;SW09 uP?
JSCOPE THIS TEST

Jutekecneantanennennnnnentnt

2522

TEST

snnecanarnnnnneneenannnannn

s *(ONTROL STATUS REGISTER WRITE/READ TEST

2523

c*SET BIT9,

2525

2504

VERIFY RIT9 WAS SET

:+CLEAR BIF9, VERIFY BIT9 WAS CLEARED

2506

2527

2529

Jmmm———e———————

BEQ

104002

2521

2528

[EST

2508

2509

MOV
MOV
MOV
(MP
BEQ
HLT
SCOP1
MOV
BIC
CLR

SEQ 0050

L13372

TEST 12

'R
W e oo P

02737

Q0Ute

duN006

TsTi2:

MOy

#12,1SING

CZ0MC
MACY11 30A(1052)
24~AUG-78
11-AUG-78 0 8:21
czomcc P11

(&)

FREEFN
&

KRERLLLR

—

d e

000000000

) ed md

013400

012737
012737

0 13470
0 13416

013701
012705
010511

Y 01404

104412

0111064
020504
001401
104002
104401
012737
042711
005005
011104
001402

12:19

PAGE

DMC1?

1%:

001000

UNIBUS REGISTER TESTS

MOV
MOV

#TST13 NEXT
#1$,L0C(K

MOV

DMCSR,R1

MSTCLR

3¢:

4%:

;PUT REGISTER ADDRESS IN R1

;PUT DATA IN "EXPECTED"'
;WRITE BIT 9
JREAD CONTROL STATUS REGISTER

BEQ

JBR IF YES

RS.R4
2

SCOP1
MOV
BIC
(LR

(R1) ,R4
4%
’

SCOP1

:1S DATA CORRECT

;DATA ERROR

#3%,L0CK
#MIT9,(R1)
RS

MOv
BEQ
HLT

104002
104401
104400

JMASTER CLEAR DMC11

#BIT9 RS
RS, (R1)
(R1) ,R4

HLT

001220

SEQ 0051

MOV
MOV
MOV
(MP

013450
001000

SCOPE

. SW09 uP?
JNEW SCOP1
JCLEAR BIT 9
JCLEAR "EXPECTED"'

JREAD CONTROL STATUS REGISTER
JBR IF ZERO
;DATA ERROR BIT9 NOT CLEARED

2 SW09 uP?
;SCOPE

IRNNNNRRRAANR
AR RN AR AR NARNAN

THIS

JEST

TEST

auaana v e a

;*CONTROL STATUS REGISTER WRITE/READ TEST
J*SET BIT11, VERIFY BIT11 WAS SET
J*CLEAR BIT11, VERIFY BIT11 WAS (LEARED
M TN

.
013470

000012

013476

013566
013514

001226
001216

o~
o

335828% -a?
2 o J\-J§NN

#13, TSTNO
#TST14 NEXT

1%:

MSTCLR
MOV

DMCSR,R1

’%:

MOV
MP
8tQ
HLT
SCOP1

061220

3¢

BI(C

MOV

(=]

—

013546
004000

MOV
MOV

ARNNANNANPAANNRANNN RN RN RN

#18,L0CK

#31T11,RS
R5,(R1)
(R1) ,Ré
R5.R4
2%

JMASTER CLEAR DMC11
;PUT REGISTER ADDRESS

IN R1

JPUT DATA IN 'EXPECTED"'
SWRITE BIT 11

JREAD CONTROL STATUS REGISTER
;1S DATA CORREC(T
JBR IF YES
;DATA ERROR
;SW09 uP?

MOV

#3%,L0CK

sNEW SCOP1

(LR
MOV
BEQ

RS
(R1) ,R%
48

JCLEAR "EXPECTED"’
JREAD CONTROL STATUS REGISTER
JBR IF ZERO

HLT

4%:

AN AR AR

AR R AN NR NN

TEST 13

MOV
MOV

TST13:

1220

001404
004000

AR A AN A AN AN NN RN AN AANRNA RN AR NARNR

et e kA

SCOP1

#BIT11,(RY)

SCOPE

;JCLEAR BIT 11

;DATA ERROR BIT11

. SW09 uP?
JSCOPE

Jhthakansanennnrrarrnnnnnnnn

NOT

CLEARED

THIS TEST

JEST

wnnnnnenrasrnnnnnnnansnennnnse

J*CONTROL STATUS REGISTER WRITE/RFAD TEST

J*SET BIT12,

VERIHY BIT12 WAS SET

c*CLEAR B:712, VERIFY BIT12 WAS CLEARED

":'.'.'.tt'.fi...'t....'flfit't.'..'....“.tt.'t'l."...t.....""'

CcoMC
MACY'1 30A(1052)
24~AUG-78
czomcc. P11
11-AUG=-7 8 08:21

2586
2587
2588
2589
2590
25N
2592
2593
2594
2595
2596
2597
2598
2599

;

000014
013664
013612

001226
001276
001220

001404
010000

104002
104401

2600
260}
2602
2603
2604
2605
2606

012737
042711
005005
011104

2607

2608
2609
2610
2611

013644
010000

001220

TEST

MoV

#14,TSTNO

1%:

MSTCLR
MOV

DMCSR,R1

2%:
5%

MOV
MOV

4%:

#TST15, NEXT
#18,L0CK

MOV

MIT15
RS

MOV

#3$,L0CK

MOV
MOV
MP
BEQ
HLT
SCOP1

B8IC

RS, (R1)
(R1) R4
RS, R
2%
2

#1712, (R1)

RS
(R") R4
4%

SCOP1

SEQ 0052

TST14:

BEQ
HLT

104400

SCCPE

JMASTER CLEAR DM(11

;JPUT REGISTER ADDRESS IN R1
;PUT DATA IN 'EXPECTED''

JWRITE BIT 12
JREAD CONTROL STATUS REGISTER
1S DATA CORRECT
;BR IF YES
;DATA ERROR
. SW09 UP?
JNEW SCOP1
JCLEAR BIT 12
;sCLEAR "EXPECTED"'
;READ C(ONTROL STATUS REGISTER
:BR IfF ZERO
;DATA ERROR BIT12 NOT CLEARED
;SW09 uP?
;SCOPE THIS TEST

JRRRNRRANRRARKARRANARARARAAN

TEST

wnnnnnnnnnnnernaternnnannnann

;*CONTROL GUT REGISTER WRITE/READ TEST

;*SET BITO, VERIFY BITO WAS SET
;*«CLEAR BITO, VERIFY BITO WAS CLEARED

M TRRRAANRARAR AN AN

?.A_A_.A
[AS1yS1)N]

0014170
00000"

=S NN
NN
O—=OQO
2 WWW
P
i AR A€ RV NN

000015
013762
013710

OO0 =000

013664
013672
013700
013706
C13710
013714
013720
013722
013724
013726
013730
013732
013734
013742
013746
013750
013752
013754
013756
013760

—=ONMNW

TEST

Phar Qe GurPnrd

2612
2613
2614
2615
2616
2617
2618

N 4
12:19 PAGE S2
DMC11 UNIBUS REGISTER TESTS

001226
001216
001220

TST15:

MOV

1%:

MSTCLR
MOV

020504

MOV
MOV

MOV
MOV
MOV
CMP
BEQ
HLT

013742
000001

001220

4%:

SCOP1
MOV

BI(C

CLR
MOV
BEQ
HLT
SCOP1
STOPE

RN N RN AN R AR RANNRAN RN RN ANAAN T RN AANAANARANANANRRANR AR

#15,TSINO

#TST16,NEXT
#18,L0°K
DMCTL ,R1

#I1T0,RS
RS, (R1)
(R1) ,R4
RS,R4

#3%,L0CK

#IT0, (R1)

RS
(R*) R4
3]
2

sMASTFR CLEAR DMC11
JPUT REGISTER ADDRESS IN R1
;PUT DATA IN "EXPECTED''

JWRITE BIT O

JREAD CONTROL OUT REGISTER
;1S DATA CORRECT
;BR If YES
;DATA ERROR

. SW09 uP?
JNEW SCOPT
JCLEAR BIT O
JCLEAR "EXPECTED"'
JREAD CONTROL OUT REGISTER

sBR IF ZERO

JDATA ERROR BITO NOUT CLEARED
:SW09 uP?
:SCOPE THIS TEST

Jrtennnnannwnnnsenevnnnnnney

TEST

awnnnvannnnnnnnnennssnervne

12:19

PAGE

CMC11

2642
2643

w1 SVNNNH
NN
2 WWW
o O =00
H H o2 NN

=000
OOOOO

013762
013770
013776
014004
014006
014012
014016
014020
014022
014024
014026
014030
014032
014040
014044
014046
014050
014052
014054
014056

000016
014060
014006

001226
001216
001220

001410
000002

R RN

SEQ 0053

1ST16:

MOV

1%:

MSTCLR
MOV

001220

2%:
3%:

#16,TSTNO

MOV
MOV

DMCTL ,R1

;MASTER CLEAR DMC11
sPUT REGISTER ADDRESS

(R1) ,R4

JREAD

#8IT1,RS
RS, (R1)

(MP
BEQ

R5,R4
’$

HLT

SCOP1

MOV

BIC
(LR

HLT

SCOP?
SCOPE

CONTROL

;DATA ERROR

. SW09 uP?

(R1) R4

JREAD

OUT REGISTER

:1S DATA CORRECT
JBR IF YES
sNEW SCOP1

IN R1

JPUT DATA IN "EXPECTED''
JWRITE BIT 1

#3%,L0CK

#BITT,(RT®
RS

MOV

4%:

#TST17 NEXT
#18,L0CK

MOV
MOV

BEQ
104400

RN R RARN R R AN A RA AN A RAANAAANRNARANANNANRNANNNARRANNNANRNAN

TEST 16

MOv

014040
000002

;CLEAR BIT 1
;CLEAR "EXPECTED"'
;BR

CONTROtL

OUT REGISTER

ZERO

;DATA ERROR BIT1

;SW09 UP?
;SCOPE THIS TEST

JRNRARNRRRRRRANRAREANRNRANNRY

TEST

;*CONTROL _OUT REGISTER WRITE/READ
;+SET BIT2, VERIFY BIT2 WAS SET

NOT

CLEARED

mana e s n e

vt h A kAR A AR R RN RN

TEST

J*CLEAR BIT2, VERIFY BIT2 WAS CLEARED

":*fitttttt**tttt"*tt*tttfifittfitt.tflttfitt'itt"t.iitittt*ittltttt

001410
000004

IST'7:

1¢:

TEST

MOV
MOV
MOV
MSTCLR
MOV
MOV
MOV
MOV
MP

BEQ

0146136
000004

—nN

QOO0 =000
[N LA PR
PIFY o P PUFPY

001226
001216
001220

504
401
002

014150
014152

000017
014156
014104

014142
014144
014146

EBCDCDCND-JE;

C14060
014066
014074
014102
014104
014110
014114
014116
014120
014122
014124
014126
014130
014136

H=20=20NWSRNOMNON

;

—b

269
2697

;

—d

2693
269
2695

UNIBUS REGISTER TESTS

;*SET BIT1, VERIFY BIT1 WAS SET
;*CLEAR BIT1, VERIFY BIT1 WAS CLEARED

2673

2674
2675
2676
2677
2678
2679
2680
2681
2682
2683
2684
2685
2686
2687
2688
2689
2690
2691
2692

;*CONTROL OUT REGISTER WRITE/READ TEST

mpq_a_hagra_na
O—=20ONW
NN

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
2669
2670
2671
2672

001220

2%:

3%:

HLT

#17,1STNO
#TST20 NEXT
#1%,L0CK

DMCTL ,R1
#]T2,RS
R5,(R1)
(R1) R4
RS ,R4
2%

JMASTER CLEAR DM(11

;PUT REGISTER ADDRESS IN R1
sPUT DATA [N "EXPECTED''
JWRITE BIT 2
JREAD CONTROL OUT REGISTER
;1S DATA CORRECT
JBR IF YES

;DATA ERROR

MOV

#3%,L0CK

JNEW SZOP1

MOV
BEQ

(R1) R4
4%

JREAD CONTROL OUT REGISTER
JBR IF ZERO

SCOP1

BIC
(LR

HLT

SCOPY

#MIT2,(R1)
RS
é

. SW09 uP?

;CLEAR BIT 2
JCLEAR "EXPECTED’

;DATA ERROR BITZ2 NOT

;SW09 uP?

CLEARED

YTM

C ZDMC
MACY11 30A(1052)
24=-AUG-78
11-AUG-78 08:21
CZDMCC P11

014154

12:19

104400

PAGE

DMC11 UNIBUS REGISTER TESTS
4%:

SCOPE

SEQ 0054
;SCOPE

JNNRRRNKRAARRAAR
AR AARRAAAR®

THIS TEST

TEST

wnnnnnnnnannaaantrenanntnnnsn

;*CONTROL OUT REGISTER WRITE/READ TEST
;*SET BIT6, VERIFY BIT6 WAS SET
;*CLEAR BIT6, VERIFY BIT6 WAS CLEARED
: AR

—

SN
NN
O—=2COOO
2 WWW
oo NNN

ZoNWR nororY
b —D
—

QOO0

014156
014164
014172
014200
014202
014206
014212
014214
014216
014220
014222
014224
014226
014234
014240
014242
014244
014246
014250
014252

2000

;
000020
014254
014202

001226
001216
001220

001410
000100

T1ST20:

1%:

MOV

#20,TSTNO

MOV

#TST21 NEXT

MSTCLR

MOV

2%:
3%

DMCTL R1

JMASTER CLEAR DM(C11

;JPUT REGISTER ADDRESS IN R1

#8I1T6,RS

BEQ
HLT

2%
2

;BR IF YES
.DATA ERROR

#38,L0CK
MIT6, (RD
RS

;CLEAR "EXPECTED'’

RS, (R1)
(R") R4
RS R4

SCOP1
MOV
BIC
CLR
MOV
BEQ
HLT

#%,L0(K

MOV

MOV
MOV
(MP

001220

AN AN AR R AR AN A AARRANANARARANN A RN AR AN RN AR RARAANRRNNANANRANRAANR

TEST 20

MOV

020504

014234
000100

SCOP1
SCOPE

(R1) ,R4
4%
2

JPUT DATA IN "EXPECTED''

JWRITE BIT 6
sREAD CONTROL OUT REGISTER
;1S DATA (CORRECT

. SW09 UP?
JNEW SCOP1
;CLEAR BIT %

JREAD CONTROL OUT REGISTER
;BR IF ZERO
;DATA ERROR BIT6 NOT CLEARED

;SW09 UP?
;SCOPE THIS TEST

JNNANNRANRRNRRAN
N ARkt nr

TEST

ARARRNRRNRN
AR AR AR AR AR AR AR

;*CONTROL _OUT REGISTER WRITE/READ TEST

;*«SET BIT7, VERIFY BIT7 WAS SET

;*CLEAR BIT7, VERIFY BIT7 WAS CLEARED
" _'tttlt'ttttttt*tttitfittttti'fittttfittfitttttttttttttttttti'tt'tit

—S N2 NN
N

(=)

06271

()

2753%

WO
\‘_.N_A

Q——

QOOQO

OO0

8 ==
e Ot et 2
NS R =20 =0
U

014254

i I E i VY|
\11\8 =t
= OO
WWW
RR

;
000021
014352
014300

001226
001216
001220

001410
000200

014332

000200

TST21:

I ¥

TEST 21

MOV
MOV
MOV

MSTCLR
MOV

2%:
3%

#1%,L0CK
DMCTL R

MOV

#1T17 RS

BEQ

RS ,R4
2%

MOV
MOV
(MP

001220

#21,1STNO
HTST22 NEXT
JMASTER CLEAR DM(CN
JPUT REGISTER ADDRESS

I[N R1

JPUT DATA IN "EXPECTED''

RS,(R1)
(R*) R4

JWRITE BIT 7
sREAD CONTROL OUT REGISTER
1S DATA CORRE(CT

.DATA ERRCR

MOv

#3%,L0(K

JNEW SCOP1T

HLT

SCOP1

BIC

#2117 ,(RD)

;BR IF

YES

. SW09 uP?

;CLEAR BIT 7

JCLEAR "EXPECTED'

[ Yen]

CZDMC
MACY11 20A(1052)
24=AUG~78
11-AUG-78 08:21
CZDMCC.P11

2754
2755
2756
2757
S;gg

01630
014342
014344
01436
014350

12:19
PAGE 55
DMC11 UNIBUS REGISTER TESTS

011104
001402
104002
104407
"04400

6%:

2760

MOV
BEQ
HLT
SCOP1
SCOPE

(R1) R4
4%
2

5
SEQ 0055

JREAD CONTROL OUT REGISTER
;BR IF ZERO
;DATA ERROR BIT7 NOT CLEARED
; SW09 uP?
;SCOPE THIS TEST

2761

JNTRRNNRRRNRAANRRREARNNRRANRE

2762
2763
2764

;*CONTROL QUT REGISTER WRITE/READ TEST
;«SET BIT12, VERIFY BIT12 WAS SET
;*CLEAR BIT12, VERIFY BIT12 WAS CLEARED

2766
2767
2768
2769
2770
2771
2772

014352
014360
014366
014374

012737
012737
012737
104412

G00022
014450
014376

.
TEST 22
Jmmmmeemee—e———
MOV
#22,TSTNO
MOV
#TST23 NEXT
MOV
#18,L0CK
MST(CLR

JMASTER CLEAR DM(C11

2774

014402

012705

010000

MOV

sPUT DATA IN "EXPECTED''

2765

2773

2775
2776
2777
2778
2779
2780
2781
2782
2783
2784
2785
2786
2787
s;gg

014376

0164406
014410
014412
014414
014416
014420
0164422
014430
014434
014436
014440
014442
014444
01444€

013701

01051
011104
020504
001401
104002
104401
01737
042711
(XX5005
071104
001402
104002
106601
104400

001226
001216
001220

001410

014430
010000

T1S122:

1%:

001220

’%:
3s:

2790

MOV

AR AR AR R AR NN R AN R RN R R

DM(TL ,R1

MOV
MOV
(MP
BEQ
HLT
SCOPT
MOV
BIC
(LR
MOV
BEQ
HLT
SCoP1
SCOPE

#BIT’é,RS
RS, (R1)
(R1) R4
RS.R4
23
2

#3%,L0(K
MIT12,(RY)
RS

(R1) R4

33
2

TEST

D20

wanannnnnannssnnsannttenrnnn

R AR N AN ANA RN AR

;PUT REGISTER ADDRESS

JENRRRRRRRANRANR
AR RAR AR nAentt

2792

;+CONTROL QUT REGISTER WRITE/READ TEST

JEST

IN R1

savnnrsnnnnnnnsnnnanennnnnnne

279¢%

TEST 23

;*SET BIT13, VERIFY BIT13 WwAS SET
;*(LEAR BIT13, VERIFY BIT13 WAS CLEARED

T Ty

R R R R R SRR

2796

2797

2798

2799

014450

012737

2800
2801
2802
2803

014456
(14464
0164472
014474

012737
012737
104412
013701

2805

014504

019511

2804

014500

2806

014506

014512

2807

2809

014510

014574

012705
011104

020504

001607

104002

000023

014546
014474
001410

020000

001226

001216
001220

Jemm——ecccencae

T1sT123:

‘%

Moy

MOV
MOV
MSTCLR
MOV

#23,TSTNO

#TST24 NEXT
#18,0CK
DMCTL R

JMASTER CLEAR DM(1M
JPUT REGISTER ADDRESS [N R1

MOV

‘BIT13,RS

MOy

(RY) R4

;READ CONTROL OUT REGISTER

JBR IF YES

MOV

RS,

(R1)

CMP

RS ,Ré

HLT

BEQ

R AR RN

JWRITE BIT 12
;JREAD CONTROL OUT REGISTER
;1S DATA (ORRECT
;BR IF YES
;DATA ERROR
2 SW09 uP?
;NEW SCOP1T
;CLEAR BIT 12
JCLEAR "EXPECTED''
JREAD CONTROL OUT REGISTER
;BR IF ZERO
;DATA ERROR BIT12 NOT (LEARED
;SW09 UP?
;SCOPt THIS TEST

2791

2793
2794

RN RN RN N NRANNR R

JPUT DATA IN "EXPECTED''
JWRITE BIT 13

;1S DATA (ORRECT
.DATA ERROR

(ZDMC
MACY11 30A(1052)
24-AUG-78
C2oMCC.P1
11-AUG-78 08:21

2810
2811
2812
2813
2814
2815
2816
2817
2818
2819

ololeleolslolelels]

104401

012737
042711

005005
011104
001402

014526
120000

12:19

001220

104002
10440

PAGE

DMC11 UNIBUS REGISTER TESTS

2%:
3%

SCOP1
MOV
BIC

CLR
MOV
BEQ
HLT

104400

SCOP1

#3%,L0CK
#BIT13,(R1)

RS
(R1) ,R4
4%
2

SEQ 0056
;SW09 UP?

;NEW SCOP1

;CLEAR BIT 13
JCLEAR "EXPECTED''

JREAD (ONTROL OUT REGISTER

;BR IF Z2ERO
;DATA ERROR BIT13 NOT CLEARED

;SW09 uP?

;SCOPE THIS TEST

SCOPE

JRRRARKNRRRRRARN
R NRnkwnnant

;*PORT4 REGISTER WRITE/READ

JEST

tannnnsnnnnnannnanrvenvnannn

TEST

;*FLOAT A ONE THROUGH PORT4 REGISTER
;*FLOAT A ZERO THROUGH PORT4 REGISTER
: INRRRN AN NN ANANARN A AR RAR RN AR

;
37
37

?5
01
00

000024
014672

014602

001226
001216
001220

001412
C000C1

TST24:

t5%:

012737
012700

014640
000Gu1

MOV
MOV

res:

DMPO4 ,R1

;MASTER CLEAR DM(C11

.PUT REGISTER ADDRESS IN Rl

MOV
MOv
MOV
(MP
BEQ

RO,RS
RS.(R1)
(R1) R4
RS ,R&
A5%

JPUT "EXPECTED'' IN RS

HLT

cLe
ROL

SCOP1

JWRITE PORT4 REGISTER
JREAD PORT4 REGISTER

;COMPARE EXPECTED AND FOUND
JBR IF 0K

:WRITE/READ ERROR

;LOOP TO 648 IF SW09-1
. CLEAR CARRY

64%
#66%,10(K

JSHIFT

TO NEXT BIT

;BR IF NOT DONE YET?
;NEW SCOP1

MOV

#1 RO

JSTART WITH BITO

(OM
MOV
MOV

RC
RO,RS
RS, (R1)

JCHANGE TO A FLOATING ZERC

(MP

RS R4

LT
5COP?
oM

;COMPARE EXPECTED AND FOUND
JBR JF 0K

CLC
ROL

(014670

0CK

JSTART WITH BITO

BEQ

2861

#6468,

#1,R0

MOV

¥
e

#24,TSTNO
#TST2S NEXT

MOV

BNE
MOV

BNE

NN OR

TEST 24

MOV
MST(LR
MOV

66%:

N I RAANANAARARARNARRNANNNAANRANTAR

SCOPE

(R1Y R4

67%

6693

;ereencan

JREAD PORT4 REGISTER

JWRITE/READ ERROR

JLOOP TO 668 IF SW09 1
.CHANGE BACK TO A FLOATING ONE
JCLEAR CARRY

RO
RO

JPUT "EXPECTED'' IN RS
JWRITE PORT4 REGISTER

JSHIFT

TO NEXT BIT

JBR IF NOT DONE YEI?
JSCOPE THIS TEST

coenssonvevrennnnne

TEST

“ePURTE REGISTER WRITE/READ TEST

saetwntencnvannrenresnnnesesr

CZDMC
MACY!N 30A(1052)
24~AUG-78
11-AUG-78 08:21
CZDMCC.P1T

MACY11

C20MCC.P11Y

30A(1052)

24-AUG-78

11-AUG~78 08:21

12:19

PAGE

;*FLOAT A ONE

2867
2868

2869

;

2872
2873
2874
2875

014672
014700
014706
014714

012737
012737
012737
04412

000025
015016
014726

2877
2878
2879
2880

014722
014726
014726
014730

012700

000001

2883
2884
2885
2886
2887
2888
2889
2890
2891
2892
2893
2894

014736
014740
014742
014744
014746
014750
014752
014760
014764
014764
014766
014770

28%

014774

2895

2897

2898

2899
2900
2901
2902
2903
2904
2905
2906

SEQ 0057

THROUGH PORT6 REGISTER

;*FLOAT
A ZERO THROUGH PORT6 REGISTER
":tttttttttttttt'ttttt'ttttttfittti*ttttt'tktttttlttttttfitt't"!'

Sg;?

2881
2882

DMC11 UNIBUS REGISTER TESTS

2866

2876

014716

014732
014734

014772

014776

015000

015002
0150046
015006
015010
C15012
015014

0137201

010005
010511
017104
020504
001401
104002
104407
000241
006100
001366
012737
012700

001226
001216
001220

TST25:

001414

MOV
MOV
MOV
MSTCLR

#25,TSTNO
#TST26,NEXT
#64$,
L 0CK

MOV

#1,R0

:START WITH BITO

MOV
MOV
MOV
(MP
BEQ
HLT
SCOP1
FLC
ROL
BNE
MOV
MOV

RO,RS
RS, (R1)
(R1) R4
R5.R4
65%
2
RO
64$
#66%,10(K
#1,R0

;PUT "EXPECTED'' IN RS
:WRITE PORT6 REGISTER
:READ PORT6 REGISTER
;COMPARE EXPECTED AND FOUND
:BR IF 0K
:WRITE/READ ERROR
:LOOP TO 64% IF SW09-1
;CLEAR CARRY
SSHIFT TO NEXT BIT
:BR IF NOT DONE YET?
:NEW SCOP1
SSTART WITH BITO

CoM
MOV
MOV

RO
RO,RS
RS, (R1)

:CHANGE TO A FLOATING ZERO
;PUT "EXPECTED"'
IN RS
:WRITE PORT6 REGISTER

RS ,R&

;COMPARE EXPECTED AND FOUND

HLT

WRITE/READ ERROR

MOV
6ut:

014764
000001

TESTM 25

001220
608

005100
010005
010517
011104

MOV

020504

001401

(R1) ,Ré

BEQ

104002

104401
005100
000261
006100
001364

6% :

10440C

DMPO6G ,R1

67$

SCOP1
coM
(Le
ROL
BNE
S(OFE

RO
66%

;MASTER CLEAR DM(C11

;PUT REGISTER ADDRESS IN R1

:READ PORT6 REGISTER

‘BR IF OK

;LOOP TO 663 IF Sw09=1
:CHANGE BACK TO A FLOATING ONE
:CLEAR CARRY
SSHIFT TO NEXT BIT
:BR IF NOT DONE YET?

*SCOPE THIS TEST

29C7

cnnnnennnesavnntnnrsnnnnntnn

2908
2905
2910

:*UNJBUS REGISTER BYTE DUAL ADDRESSING TEST
;*LOAD ALL REGISTERS WITH INCREMENTING PATTERN
S*READ BACK AL' REGISTERS TO VERIFY CORRECT ADDRESSING

2911

2912

gg;z

2915
2916

2917
2918

2919
2920

2927

;

015016
ovsogs

012737
012737

(€150

012737

015040
015042

104412
012700

(1504€

10817

000026
015146

015046

00000°

001226
001 ;8

T1512¢:

001

'$:

TEST

annnnsnsnnresnncnnnnnnnnnny

TEST 26

Moy
MO\

#26,TSTNO
#15827 NEXT

MOy

218,100

MST( K
MOy

8 KO

JRT CONTAINS BASE DM(
11 ADDRE
S5

JMASTER CLEAR DM(11
SSTART PATTERN AT 1

SCLEAR REGISTER

—

CZOMC

(ZDMC
MACYYY 30A(1052)
24=-AUG=78
cIoMCC.PYY
11-AUG~78 08:21

5
SEQ 0058

2922
2923

015050
015052

110005
1001

MOVB
MOVR

RO,RS
RO, (R1)

JPUT DATA IN 'EXPECTED''
JWRITE DMC REGISTER WITH PATTERN

2925
2926
2927
2928
2929
2930
2931
2932
2933
293

015056
015060
015062
015064
015066
015070
015072
015076
015100
015104

020504
00140
104002
104407
10572
005200
022700
001363
073707
012700

(MP
BEQ
HLT
SCOP1
1ST8
INC
(MP
BNE
MOV
MOV

RS,RS
2%
2

21S DATA CORRECT
;BR IF YES
;DATA ERROR
2 SW09=1?
JNEXT REGISTER
J INCREMENT DATA PATTERN
JLAST RECISTER?
JBR IF NO
;BASE DM(C11
ADDRESS TO R1
JRESTART PATTERN AT 1

293
2937
2938
2939
2940
2961
292
2963
2964
2965
296
2947
2948

015116
015120
015122
015124
015126
015130
015132
01513
015136
015142
015144

110005
111104
020504
001401
104002
104407
105721
005200
022700
001365
104400

29264

2935

12:19
PAGE 58
DM(C11 UNIBUS REGISTER TESTS

015054

015110

111104

012737

MOVE

’%:
200(1°

001404
000001
(C*S*7s

oty

°t:

ot
n(¢

(Rf),R4

(RV)+
RO
#11,R0
18
DM(SR ,R1
#1,RO

MOV

#3%,L0CK

MOvR
MOVR
‘MP
BEQ
HLT
SCoP!
TSTR
IN{
(MP
BNE
St OPE

RO,RS
(R1) R4
5,R4
3
2
(R1) RO
#11,R0
38

JREAD DMC REGISTER INTO ‘FOUND''

;NEW SCOPT

;PUT DATA [N "EXPECTED"'
JREAD DMC REGISTER INTO "FOUND''
;IS DATA (CORRECT
;BR Ir YES
;DUAL ADDRESSING ERROR
;SW09=1?
JNEXT REGISTER
J INCREMENT PATTERN
;LAST REGISTER?
;BR IF NO
;SCOPE THIS TEST

2949

Jaerccnannantecnennsnnntntnt

2950
2951
2952

*MAINTENANCE INSTRUCTIGN REGISTER TEST
*VERIEY THAT THE MAINT [R (AN BE WRITTEN TO ALL ZEROS'
JYAND ALL ONES'. VERIFY THAT T IS (LEARED ON A BUS RESET.

”SS

2954

2958

;

015%'%6

012737

000027

l12se

012737

(015200

0TM X(

015156

012737

015170
015172
(15176
015200
015204

104412
012711
005005
0105617
016104

2967
2968
2969
2970
2971
2972

015212
015214
015216
015220
019226
015232

001401
104023
104407
012737
012705
010561

2974
2975
2976
VeZEANE

015242 020504
015244 0014C?
07524¢
1047503
AL Vs TN I Y A B

2959
2960
2961
2962
2963
2964
2965
2966

2973

ananneansvonnannsrsnnnannen

.':....'..'...".""..".'.".............'...."Q'.".""..."

2955

2956
2957

JEST

C15162

015210

015236

020504

014104

015306

OL1cTe

TCT27:

015 S;
177277

TEST 27

MOV

00300C

(Q0Q000¢
00000¢

;MOV

MSTOLR
MOV
(LR
MOV
MO\
. MP

‘%

BEQ
T
(NP
MOv
MOV
MO\

-$:

‘Mp
HEG
Wt
~ e

'$:

#27 ,1STNO

#75F30, NEXT
#18,L0(k

JRT (ONTAINS BASE DMC1" ADDRESS
JMASTER (LEAR DM( 11
M1 BITI0, (R, ;SEL6 IS NOW THE (R
RS
JPUT "EXPECTED'" IN RS
R5,6(R1)
;CLEAR THE IR
6(R1' R4
JREAL THE IR
RS ,R4
JIS 1T CLEARED?
2%
JBR IF YES
23
JERROR IR IS NOT (LEAR
JLO0P TO 18 IF SW09 !
933,00k
JNEw SCOPY
#-1 RS
JPUT "EXPECTED' IN KS
RS, 6(R*
JWRITE ALL ONES "0 "Wt IR

&(RT) &4

RS K6
'3
¢’

:READ THE IR

SIS IT ALL ONES:
JBR IF VES
JERROR IR IS NO'
A .
L
U
RMATE §
SO

(cOMC
MACYTY 30A(1052)
24-AUG=78
CIDMCC.P1Y
11-AUG-78 08:21

2978

2979
2980
2981
2982
2983
2984
2985
2986
2987
2988
2989

015252

015260
015262
015264
015270
015274
015276
015300
015302
01532

012737

005005
000005
01271
016106
(20504
001407
104023
10«4C°
(&l

015262

12:19
PAGE 59
DMC17 UNIBUS REGISTER

001220

MOV

5%:

003000
00000€¢

L$:

(LR
RESET
MOV
MOV
rMpP
BEQ
HLT
SCOP1
SCOPE

TESTS

#5% . LGCK
RS

SEQ 0059

;NEW SCOP1

JPUT "EXPECTED'" IN RS
JBUS RESET
MIT9!BIT10,(R1) ;SEL6 IS IR
6(R1) R4
JREAD THE IR
RS,R4
;1S IT CLEARED?
6%
;BR IF YES
23
JERROR, IR IS NOT CLEARED
JLOOP TO 5% IF SW09-1
;SCOPE TH]IS TEST

299G

Jevennnnenananswwrnnsnawnwwr

299"

s *MAINTENANCE

2992
2993

2995
2996
2997
2998
2999
3000
3001
3002
3003
3004
3005
3006
3007
3008
3009
3010
3011
3012
3073
3014
3015
3016
3017
3018

015306
015314
015322

(12737
012737
012737

0°5330
015332
015336
015340
015344
015350
015352
01535
015356
015360
015366
015372
015376
C15402
015406
015406
015410

104412
0127'1
005005
010561
016104
020504
001401
104023
104401
012737
012705
010561
0161064
020504
0014017
104023
104401

3020
21
3022
3023
026
3025
3026

015420
015422
015626
015432
015436
015440
015442

005005
052711
012711
016104
020504
001407
104023

3028

(0'544€

104640C

3007

3029
3030

INSTRUCTION REGISTER

snnennnnntennnsnnsnvestnnnn

TEST

;*VERIFY THAT THE MAINT IR CAN BF WRITTEN TO ALL ZEROS'
J*AND ALL ONES'. VERIFY THAT IT IS CLEARED ON A MASTER RESET.

299¢

3019

TEST

(015412

015444

012737

10440°

000030
015450
01S%0

0"2c€
00'2'¢
Q(°c2f

1S5130:

003000
00000¢

000006

Q153772
1777277
000006
000006

015422

Q4Q00C
00
000006

,
220

’%:
iA ¥

(D2

«%:
‘e

;
TEST 3C
Josseseseseeae—
MOy
#30,7STNO
MCv
#TST31 NEXT
MOV
#1%,L07k
MST{LR
MOv
(LR
MOv
MOV
(
BEQ
HLT
SCOP1
MOV
MOV
MOV
MOV
(MP
BEQ
HLT
SCOP1
MOV

(LR
BIS
MOV
MOV
“MP
BEQ
W7

SC0p

SCOPE

JR1 CONTAINS BASE DM(1'
JMASTER (CLEAR DM(C 11
M31TQO BIT10,(R1) ;SEL6 IS NOW THE |R
RS
JPUT "EXPECTED''
IN RS
RS,&(R1)
;CLEAR THE [R

65(R1) R4
RS ,R4
2%
23
#3%,L0(x
#-1,RS
RS5,6(R1)
6(R1} ,R4
RS R4
43
23
#5%,L0(k

ADDRESS

JREAD THE IR
21S IT CLEARED?
JBR IF YES
JERROR IR IS NOT CLEAR
JLOOP TO 18 IF SW09-1
JNEW SCOP1
JPUT "EXPECTED'' IN RS
JWRITE ALL ONES TO THE IR
JREAD THE IR
JIS IT ALL OMNES?
;BR IF YES
JERROR IR _IS NOT - ALL ONES
JLOOP TO 3% [F Sw09=1
JNEW SCOPY

RS
JPUT "EXPECTED'' IN RS
#MIT14,(RT)
JMASTER CLEAR
#1119 BIT1C,(R1) ;SEL6 IS IR
6(R1.,R¢
;READ THE IR
RS R4
IS 1T (LEARED?
63
JBR IF YES
23
FRROR,
IR IS NOT (LEARED

:LooP fo 58 IF Sw09:1

;SCOPE

THIS TEST

200

Jeenessansnvecnnesnvnennsnne

TEST

acvvcncccnsnsnensearnnannes

303¢
3032

JeMI(RO PA7{ECSOR TEGT
.+ OAD DMPOE wlTW A MI(RO=-PROCESSOR INSTRUCTION, ( Orr

.
r

(DM

MACY11

(20MCC.P11

30A(1052)
24=AUG-78
11-AUG=-78 08:21

12:19

DMC11 MICRO PROCESSOR 1BUS*

3034
3035
3036
2037

TESTS

SEQ 0060

;*VERIFY INSTRUCTION EXECUTED PROPERLY
;*INSTRUCTION SHOULD MOVE ]BUS*4 TO IBUS*S,

IBUS*4

IS ALL

;*AND IBUS*5 IS ALL 0°'S. RESULT SHOULD BE ALL 1'S IN SEL4

1°'S

,':lttt't"fi'k*fi'tttit."ttttttttfi'ti'tttt.ttttt.tt.itt.fittitt'fit

;

015450
01545€
015464
015466
015474
015500
015506
015512
015514
015520
015524
015526
015530
015532

000031
015534
000377
001000
121105
001400

001226
001216

1S131:

020504
001407

TEST 31

MOV

#37,TSTNO

MOV

#TST32, NEXT

MSTCLR

000004

000006

000604

104003
104400

°%:

R1)

;R1 CONTAINS BASE DMC11 ADDRESS
*MASTER CLEAR DM(C11
*PORT4 HI-BYTE-0'S LO-B-TE=1'S

L6(R1)

:INSTRUCTION TO PORT6

MOV

mIT9 (R1)

B8I3

#RIT8'RITY,
(R1) :CLK INTSRUCTION, MOVE IBUS*4 TO [BUS*S

MOV

#-1,RS

MOV
(Mp

4(R1) R4
RS ,R4

NOP

177777

BFQ
HLT

SCOPE

“SET ROMI

;PUT

1%
3

;*MI{RO PROCESSOR

"EXPECTED''
IN RS

JPUT FOUND'' INTO R4
:1S DATA CORRECT

JBR IF YES
;ERROR

;SCOPE

Jurrennanannnnnnnnnrannnerwnr

THIS

JEST

TEST

munnanmnnnmnnnnnnannnnnnnnnn

IBUS* REGISTER WRITE/READ

;*FLOAT A 1 THROUGH [BUS* REGISTER 0
;*FLOAT A O THROUGH IBUS* REGISTER O

TEST

":fi.tt.""fi'..Itt"'ifi'fi"tfitttttt.fltt'ttttttt'tt'ttttttfi.t"tt!

OO0

015556
C15560
015564
015570
015570
015574
015602
015604
015606
015610
015612
015614
015620
015624
015626
015630
015632
015634
015636
C15640

015534
015542
015550

OO
=

;5
000032

—d

015734

O
~n

8353558 3

000004
000030

SN AN

000000
000001

o
(DCDSE
N
VNN
O
—

—

015570

S R Q=== 200
OO0 SNRNRNS

3038
3039
3040
3041
3042
3043
3044
3045
3046
3047
3048
3049
3050
3051
3052
3053
3054
3055
3056
3057
3058
3059
3060
3061
3062
3063
3064
3065
3066
3067
3068
3069
3070
3071
3072
3073
3074
3075
3076
3077
3078
3079
3080
3081
3082
3083
3084
3085
3086
3087
3088
3089

PAGE 60

001226
001216
001220

15732:

TEST 32

MOV

MOV
MOV

MSTCLR

ta%:

#0,R2

#1°R0O

*START WITH BIT 0

MOV

RO,4(R1)

;PUT PATTERN INTO PORT4

ROMCLK

#30,4(R1)

*SAVE REGISTER ADDRESS FOR TYPEOUT

*CLEAR UNWANTED BITS
*NEXT

WORD

INSTRUCTION,

ROMCLK

MOV DATA TO IBUS* REGISTER 0

121005. <02 20>

*READ FROM [BUS* REGISTER 0

MOV

BIC

MOVR
(MPB

BEQ
Rt
¥

ADDRESS

121100.0

ROMCL K

000030
0000GS

JR1 CONTAINS BASE DMC11
*MASTFR CLEAR DM(11

MOV

MOV
BIC

000004

#32,1STNO

#TST33, NEXT
#64%,10CK

HLT

SCOP1
(L

ROLR

BNF

INEXT

WORD

INSTRUCTION,

RO RS

SPUT EXPECTED

S(R1).Ré4
RS,R4

*PUT "FOUND'' INTO Ré
*DATA CORRE(T?

#30 RS

65$

€£4$

IN RS

“CLEAR UNWANTED BITS

‘BR IF YES

:ERROR

:SW09-12

*C_EAR CARRY
SSHIFT BIT

IN RO

S1F RO=0 THEN DONE

ROMCLK

PC-5304
PC

53C4

MACY1 30A(1052)
CZOMC
24-AUG-78
11-AUG-78 08:21
CZDMCC.P1

000004
00003C

el @ o RN Yy | qp JPu QU Gy

—

010061
04276
no

015656
000001

£HO (%l —=NOO
& —
OO0 o OO ()
RSN
o NSEY H [ XV, IV, IV, I o O

012737
012700
005100

& 3 RR2JomoNR
~n

MOV

232:

#67%,L0CK

:NEW SCOP1

#1.R0
RO

*CHANGE

MOV

RO.4 (R1)

:PUT PATTERN INTO PORT4

COM

ROMCLK

“START WITH BIT 0

#30.,4(R1)

*CLEAR UNWANTED BITS

oH
o—

INSTRUCTION,

#30,RS

SCLEAR UNWANTED BITS

HLT

JERROR

SCOP1
COM
cLC
ROLB
BNE

SCOPE

S(R1).R4
RS,R4
68%

5304

*PUT 'FOUND'' INTO Ré&
*DATA CORRECT?
*BR IF YES

LSWN9=17
“CHANGE TO FLOATING 1
*CLEAR CARRY
SSHIFT BIT IN RC
“1F RO=0 THEN DONE

RC
RO

69%

‘CCOPE

Jennknkrrwmnkrnwrrnranwnanwrn

;*MITRO PROCESSOR

ROMCLK PC

:MOV DATA TQ IBUS* REGISTER 0
*NEXT WORD IS INSTRUCTION, ROMCLK PC=5304
*READ FROM IBUS* REGISTER 0
*PUT EXPECTED IN RS

BIC

MOVB
(MPB
BE Q
¢ RS

TO FLOATING ZERO

*NEXT WORD

121100'0
ROMCLK
121005 ' <0*20>
MOV
RO,RS

000030
000005

SEQ 0061

MOV

BIC

000004

01351
04400

1BUS*

THIS

JEST

TEST

wanwnnnnawnnsrananrneannennnn

;*FLOAT A 1 THROUGH IBUS* REGISTER 2
;*FLOAT A O THROUGH [BUS* REGISTER 2

TEST

".'t'tttttltttti'ti'ttt.fithtflttttitfitt'tttkfitl‘fi'tfi.tit.t't.fittfit

000033

737

015770

~
v ]
~N

016134

001226
001216
061220

TST133:

~n
80

;

000004
000070

e
\nc>b<3§5CMDSE
WO

2 —

-—

TEST 33

MOV

#33,TSTNO

MOV

#6438 ,L0CK

MOV

MSTCLR

MOV

648:

MOV

BI(

0600v4

ROMCLK
1211002
ROMCL K

ed b =
R Qb
3
n

o
VNN
IS —a

000002
000001

—

—h

~on

412

-—

016024
016026
016030
016032
016034
016036
(016040

737

A LA LAY

OOO

015756
(€15760
015764
015770
015770
015774
016002
016004
016006
016010
016012
016014
016020

prr ey

015734
015742
015750

OO
=

;

—

3139
3140
3141
3142
7143
3144
3145

DMC11 MICRO PROCESSOR IBUS* TESTS

2115

3116
2117
2118
3116
3120
3121
3122
3123
3124
2125
3126
3127
3128
3129
3130
3131
3132
3133
23134,
3135
3136
3137
2138

PAGE 61

001220

5300
——t

015642
015650
015654
015656
015656
015662
015670
015672
015674
015676
015700
015702
015706
015712
015714
0157156
015720
015722
015724
015726
015730
015732

—LO-O

3090
3091
3092
3093
3094
3095
3096
3097
3098
2099
3100
3101
3102
3103
3104
3105
3106
3107
3108
3109
3110
3111
312
3113
3114

12:19

#TST346 NEXT

#2.R2

MOV

RO,4(R1)

:PUT PATTERN INTO PORT4

#70,4(R1)

*NEXT WORD IS INSTRUCTION, ROMCLK PC-5304
:MOV DATA TO IBUS* REGISTER 2
*NEXT WORD

INSTRUCTION,

‘READ FROM [BUS* REGISTER 2

S(RT).R4
RS,R4

*PUT "FOUND'' INTO Ré
*DATA 7QRRE(T?

HLT

JERROR

(LC
ROLR
BNF

*C_EAR CARRY
“SHIFT BIT [N RG

MOVB
(MPB

BEQ

S OP?

65$

64%

TYPEOUT

*CLEAR UNWANTED BITS

*PUT

#70 RS

ADDRESS

*START WITH BIT 0

RO,RS

BIC

¢5%:

*SAVE

#1.RO

121005. <2+20 »

000070
000005

JR7T CONTAINS BASE DMC11
*MASTFR CLEAR DM(11

EXPECTED

IN RS

SCLEAR UNWANTED BITS

‘BR IF YES
1 SW09-12
S

RO O THEN DONE

ROMCLK

P(-5304

MACY11 30A(1052)
24-AUG-78
11-AUG-78 08:21
CZDMCC.P1Y

016042
016050
016054
016056

012737
012700
005100

016056
000601
000004
000070

d e

CZCMC

12:19

PAGE 62

DMC11 MICRO PROCESSOR ]BUS* TESTS

001220
69%:
67%:

#67%,10CK

CoM

s CHANGE TO FLOATING ZERO

RO, 4 (R1)

JPUT PATTERN

MOV

#1.R0O

MOV
ROMCLK

#78.4(R1)

—

121100.2

ROMCLK

121!005
<2%20>
MOV
RO,RS

000070
000005

8IC

#70,R5

HLT

MOVB
(MPB
BEQ
8%:

SCOP1

CoM

CLC
ROLB

BNE

104400

JNEW SCOP1

MOV

BIC

000004

SEQ 0062

SCOPE

S(R1).R4
RS,R4
68%

RO
RO

69%

;START WITH BIT O

INTO PORT4

cCLEAR UNWANTED BITS
SNEXT WORD IS INSTRUCTION, ROMCLK P(C=5304
;MOv DATA TO IBUS* REGISTER 2
JNEXT WORD IS INSTRUCTION, ROMCLK P(C=5304
JREAD FROM IBUS* REGISTER 2

JPUT EXPECTED IN RS

;CLEAR UNWANTED BITS

JPUT "FOUND'' INTO R4
.DATA CORREC(CT?
;BR IF YES
;ERROR

. SWD9=1?
;CHANGE TO FLOATING

JCLEAR CARRY

JSHIFT BIT IN RO
;IF RO=0 THEN DONE

JSCOPE THIS TEST

JNRRRRNRRRARRRAAANSANRNNRANY

TEST

swnnarnnnmnsnrenannnennnnnnn

;*MICRO PROCESSOR IBUS* REGISTER WRITE/READ TEST
J*FLOAT A 1 THROU GH IBUS* REGISTER 4

;*FLOAT A O THROUGH [BUS* REGISTER 4

":tttt*"t‘t.tfl.fit"'*tfittttttitfit!tttfitttttt!tttittttttttttt'ttl

—d c—b
—

000034
016310
016170

001226
001216
001220

TST34:

3201

-abndt\gg ~non

000004
000001

664%:

000004

MOV

MOV
MOV

#34
., TSTNO

#TST3S,NE XT
#6468, 0CK

MOV

RO,4 (R1)

JPUT PATTERN

INTO PORT4

MOV DATA

IBUS*

MOVR
g
)
BEQ

-—

ADDRESS

;SAVE REGISTER ADDRESS FOR
JSTART WITH BIT O

MOV

001220

DM(11

#1.RO

MOV

RC,RS

5(R1) ,R4
RS R4
65%

JPUT "FOUND'' INTO R4
.DATA (CORRECT?

;BR IF YES
JERROR

CLC
ROLR

JSHIFT BIT

#1 RE

JOTART WITH BIT

BNE
MOV

MOV

64%
' [0h4 PN

JNEXT WORD [S INSTRUCTION, ROMCLK PC-5304
JREAD FROM [BUS* REGISTER 4
;PUT EXPECTED IN RS

HLT

SCOP1

TYPEOQUT

JNEXT WORD IS INSTRUCTION, ROMCLK P(C=5304

121005.<4%20>

016244
0u0001

CONTAINS BASE

JMASTFR CLEAR DM(11

#4 R2

ROMCLK

65%:

JRT

MSTCLR
MOV

121100.4

000005

TEST

ROMCLK

—t

TM e R L
L
T Y qn L R
Y
SR Y o
OON
= =NONO
=00

AN NN AN AN N N AN NN N N N AN NN
AN =t b ed ed e D e e ) D e —d
D b

SERIRRRES2EBRTRRE

OO—=

016134
016142
016150

OO0

;

2 Sw09=1?
;CLEAR CARRY

IN RC

J1F RO=0 THEN DONE

JNEW S0P

(

CZOMC
MACYT1 30A(1052)
24~AUG-78
cZoMcC.P1N
11-AUG~78 08:21

3202
3203
3204
3205
3206
3207
3208
3209
2210
3211
2212

. 7%
3¢ &
3215
3216
3217
3218
3219
3220
3221

016242
016244
016244
016250
016252
016256
016256
016260
016262
016266

016270

016272
016274
016276
016300
016302
016304
016306

12:19
PAGE 63
DMC11 M]JCRO PROCESSOR

005100

010061
104414
121104
104474
121105
010005
116104
120504

69%:
67%:

200004

000005

001401

COM

68¢%:

IBUS*

MOV
RO,4(R1)
ROMCL K
121100.6
ROM(LK
121005 ! <4*20>
MOV
RO,RS
MOVR
5(R1) ,R4
(MPR
RS R4

BEQ

104004
104401
005100
000241
106100
001356
104400

HLT
SCOP1
LOM
Lc
ROLRB
BNE
SCOPE

68%

RO
RO
59%

S
TESTS

SEQ 0063

sCHANGE TO FLOATING ZERO

JPUT PATTERN INTO PORT4
JNEXT WORD IS INSTRUCTION, ROMCLK P(C=5304
MOV DATA TO IBUS* REGISTER 4
JNEXT WORD IS INSTRUCTION, ROMCLK P(C=53)4
JREAD FROM ]BUS* REGISTER 4
JPUT EXPECTED IN RS
JPUT "FOUND'' INTG R4
sDATA CORRE(T?
;BR

YES

;ERROR
. SW09=1?
JCHANGE T0 FLOATING 1
;CLEAR CARRY
JSHIFT BIT IN RO
. IF RO-0 THEN DONE
;SCOPE THIS TEST

3222

Junmncnakannennnneennnwanwwn

3223
3224
3225

;*M]I (RO PROCESSOR IBUS* REGISTER WRITE/READ TEST
;*FLOAT A 1 THROUGH [BUS* REGISTER S
;*FLOAT A O THROUGH [BUS* REGISTER 5

3226

3227
3228
3229
3230
3231
3232
3233
3234
3235
323
3237
3238
3239
3240
3241
3242
3243
3244
3245

016310
016316
016324

012737
012737
012737

016332
016334
016340
016344
01634
(C16350
016352
016354
016356
016360
016362
016366

104412
012702
012700
010061
104414
121105
104414
121125
010005
116106
120504

3247
3248
3249
3250
3251

016372
016374
016376
016400
016402

104004
104401
000241
106100
001360

3253

016412

012700

000001

010061
104414

000004

3246

3252

3256
3255
3256
3257

016370

016404

016416
016420
016420
(16426

000035
016464
0163%4

001226
001216
001220

000005
000001

(T2
¥

000004

00000¢

001401

012737

005100

T4T35:

_
65%:

(16420

001220

nennnnnnnannnrtnnnnnnannnns

R R R AR R AN P P R R AN AR AR AN A NN RN AR N R RN RN N AN AR AR AR

AR AN R AR R AR NN

;
TEST 35
I-

MOV
MOV
MOV

#35,1STNO
#TST36 NEXT
#6438, 00K

MSTCLR
MOV
MOV

5,12
#1,R0

MOV
RO,4(R)
ROM(LK
121100 S
ROM(CLK
121005 ! <5+20>
MOV
RO,RS
MOvR
S(R1) ,Re
(MPR
RS R&

BEQ

HLT
scoet
(Lc
ROLB
BNE

65$

;PUT PATTERN INTO PORT4
JNEXT WORD IS INSTRUCTION, ROMCLK PC-5304
MOV DATA TO [BUSx REGISTER S
JNEXT WORD IS INSTRUCTION, ROMCLK P(=53064
;READ FROM [BUS* REGISTER 5
JPUT EXPECTED IN RS
JPUT "FOUND'' INTO R4
;DATA CORRE(CT?

*BR IF YES

RO
649

MOV

#1,RE
RO

:START WITH BIT 0

JCHANGE

MOV
ROMC K

Re,4 R

;PUT PATTERN INTO PORTS
JNEXT WORD IS INSTRUCTION, ROM(LK P

JR1 CONTAJNS BASE DM(C11 ADDRESS
JMASTER (LEAR DMCT
. SAVE REGISTER ADDRESS FOR TYPEQUT
JSTARTI WITH BIT 0

*ERROR
. SW09-1?
.CLEAR CARRY
JSHIFT BIT IN RO
;1F RO-0 THEN DONE

MO\

69$:
¢7%:

[FST

#67%,100k

JNEW SCOPIT

TO FLOATING ZERO
5304

C.OMC
MACY11 30A(1052)
24-AUG=78
(20MCC.P1Y
11-AUG-78 08:21

3258
3259
3260

3261
3262
3263

3264

3265
3266
3267
3268
3269
3270
%S;;

016426
016430
016432

121105
104414
121125

016434
016436
016442

010005
116104
120504

016446
016450
016452
016454
016456
016460
016462

104004
104400
005100
Q002461
106100
001356
104400

016444

12:19
PAGE 64
DMC11 MICRO PROCESSOR

m
[BuUS*

121100!5
ROM(CLK
121005 .<5+20>

MOV
MOVA
(MPR

000005

001401

BEQ

68%:

3273

HLT
SCoP1
(oM
o
ROLR
BNE
>(OPE

S
TESTS

SEQ 0064

sMOV DATA TO [BUS* REGISTER S
JNEXT WORD IS INSTRUCTION, ROMCLK P(-5304
JREAD FROM ]BUS* REGISTER 5

RO,RS
5(R1) ,R4
RS R4

JPUT EXPECTED IN RS
JPUT "FOUND'' INTO R4
sDATA CORRE(CT?

;ERROR
. SW09=1?
sCHANGE TO FLOATING 1
;CLEAR (CARRY
JSHIFT BIT IN RO
;1F RO=0 THEN DONE
;SCOPE THIS TEST

68$
RO
RO
¢9%

BR IF YES

3274

Jwsransnanannnntrnsrvenrnnnnd

3275
3276
3277
3278

J*MI(RO PROCESSOR [BUS* REGISTER WRITE/READ TEST
J*FLOAT A ° THROUGH [BUS* REGISTER 10
J*FLOAT A O THROUGH JBUS* REGISTER 10
;*THE NPR RQ BIT (BIT 0) [S MASKED DURING THIS TEST

3280
3281
3282
3283
3284
3285

016464
016472
016500

012737
012737
012737

.
TEST 36
mm—e—eececccem—MOy
#36,7STNO
MOV
ATSTI7 NEXT
MOV
#6463, 0CK

3287
3288
3289
3290
3291
3292
3293
3294
3295
3296
3297
3298
3299
2300

016506
016510
016514
016520
016520
016524
016532
01653
(01653
016540
016542
016544
016550
016554

104412
012702
012700

3279

3286

3301

3302
3303
3304
3305
3306
3307

3308

3309
3310
3317
3312
3313

016556

0100617
042761
104414
121110
104414
121205
010005
042705
116104
120504

00122¢
QC121¢
001220

000010
000001
000004
000141

1S736:

669%:
000006

000141
000005

001401

016560
016562
016564
016566
016570
016572

104004
104601
000241
106100
001353
012737

016604
016606
016606
016612
016620

005100

016600

000036
016664
016520

012700
010061
042761
10464

MST(LR
MOV
MOV

¢5%:

Q1660¢

0000CT

000141

wQ1220

¢9%:
%4
¥
000004

aonennncannncnnnnnnnanennns

#10,R?2
#1,R0

MOV
RO,4(R1)
BIC
#1467 ,4(R")
ROMCLK
12110010
ROM( K
121005 '<10+20>
MOV
RO ,RS
BIC
8141 ,RS
MOVR
S(R1' R4
(MPR
RS R4

BEQ

TEST

65$

JR1 (CONTAINS BASE DM(C11 ADDRESS

JMASTER (LEAR DM( 11
;SAVE REGISTER ADDRESS FOR TYPEOUT
JSTART WlTH BIT O
JPUT PATTERN INTO PORTS
cCLEAR UNMWANTED BITS
JNEXT WORD IS INSTRUCTION, ROMCLK P(-5304
MOV DATA TO [BUS* REGISTER 10
JNEXT WORD IS INSTRUCTION, ROMCLK P(C=5304
JREAD +ROM [BUS* REGISTER 10
JPUT EXPECTED IN RS
JCLEAR UNMWANTED BITS
JPUT "FOUND'* INTO R4
;DATA CORRECT?

:BR IF YES

HLT
SCOP?
L
ROLB
BNE
MOV

RO
(%3
2678 L (K

;ERROR
;Sw(9=1?
.C(LEAR CARRY
JSHIFT BIT [N RO
1F RO=0 THEN DONE
JNEW STOPI

cOM

JCRANGE TO FLOATING ZERO

RO,«(R1;
&7 LR

JPJT PATTERN INTO POKTS
JOLEAR UNWANTED BITS
JNEXT WORD IS INSTRUCTION, RUM(LK Pt -83(4

MOV

MOV
8l(
ROM( x

#1,R¢

SSTART WITH BIT 9

(Z0MC

MACY11

c2omMcCc.P1N
3314

016622

30A(1052)

24-AUG-78

11-AUG~78 08:21

12:19

PAGE 65

DMC11 M]ICRO PROCESSOR [BUS* TESTS

121110

121100.10

331S

016624

104414

ROMCLK

3317

016630

010005

MOV

3319

016636

116104

3316

3318

3320

3321

3322

3323
3324
3325
3326

3327
%%Sg

016626

016632

016642

016644

016646

016650

121205

042705

120504

000141

000005

016662

104400

68%:

001351

JREAD FROM [BUS* REGISTER 10

RO,RS

JPUT EXPECTED IN RS

S(R1) ,R4

JPUT "FOUND'' INTO R4

(MPH

RS ,R4

;ERROR

; CHANGE TO FLOATING 1
;CLEAR CARRY
JSHIFT BIT IN RO

ScoP1

{OM
Le
ROLR

BNE

SCOPE

3330

;MOV DATA TO IBUS* REGISTER 10

JNEXT WORD IS INSTRUCTION, ROMCLK PC-530¢4

#141,RS

BEQ

1044

005100
00024?
106100

SEQ 0065

BIC

MOVB

001401

016652
016654
016656

016660

121005'<10+20>

1064004

68§

69%

;CLEAR UNWANTED BITS

;DATA CORRECT?

‘BR IF YES
:Sw09-1?

;1F RO O THEN DONE
;SCOPE

THIS TEST

3339

sersnnnannannanneennnnnnnnnn

3330
3333

;*MICRO PROCESSOR [BUS* REGISTER WRITE/READ TEST
;*FLOAT A 1 THROUGH IBUS* REGISTER 11

3334

TEST

sannennnnannanennanennnnnne

J*FLOAT A O THROUGH IBUS* REGISTER 11

3335

;*THE BR RQ BIT, PGM CLOCK BIT, FORCE POWER FAIL BIT

3234

J(BITS 7,4,1) ARE ALL MASKED DURING THIS TEST

3338
3339

;

3337

3340
3341

.'_'.t.t...t.t..tt..'.l.t...........Q!.'t.'.....‘.t."'t"""....

33,3

016664
016672
016700

012737
012737
012737

335

016706

104412

332

3344

336
33,7

000037
017104
016720

016710
016714

012702
012700

000011
000001

3369
3350
3351

016720
016724
C167%2

010061
042761
104414

000004
000262

3358

016742

010005

338

3352
TIST
3364
3356
3357

3358

016720

01673
01673
016740
016744
016750

01675

000267
000020

000020

116106

052704
120504

332
363
34
3365
3366
T%7

016770
016772
016774
016776
017000
017002

104004
106401
0002417
104100
0013%7
012737

338

T3¢9

(017010
017014

MOV
MSTCLR
t6%:

000004

00510C

#TSTLO NEXT

#6468, L0CK

000005

;SAVE REGISTER ADDRESS FOR TYPEOUT
JSTART WITH BIT O

MOV
BIC
ROM(LK

RO,4(R1)
8262,4(RY1)

JPUT PATTERN INTO PORTS
CCLEAR UNWANTED BITS
JNEXT WORD [S INSTRUCTION, ROMCLK PC=5304

MOV

RO,RS

000001

001220
o

8262 RS
#20 RS

SR
R

BlS
(MPR

#20 R4
RS R&

M T
s(om
e
ROLB
anE
MOV

BEQ

017016

JMASTER CLEAR DMC11

11 ,R2
#1 .0

move

058

JR1 (ONTAINS BASE DMC11 ADDRESS

MOV
MOV

8IC
8IS

00140!

012700

MOV

121100 11
ROM(LK
121005 '<1120>

042705
052705

(16760
016764

016766

1ST37:

12111
104414
121225

2359
3560

331

Q01226
001216
001220

TEST 37

meescsccccccas
MOy
#37 ,TSTNO

MOy

65%

JMOV DATA TO [BUS* REGISTER 11
INEXT WORD IS INSTRUCTION, ROMCLK P(=5304
JREAD FROM [PUS* REGISTER 11

JPUT EXPECTED IN RS

JCLEAR UNMANTED BITS
JADD THESE BITS

SPUT "FOUNDTM' INTO Ré
JACD THIS BIT
;DATA (ORRECT?

“BR IF YES

RO
643
[34

SERROR
;Sw09=1?
(LEAR (ARRY
JSHIFT BIT [N RO
J1F RO=0 THEN DONE
JNEW SCOPI

JUANGE

ISTART w]TH BIT 0

TO FLOATING ZERL

3370
3371

017016
017016
017022
017030
017032
017034
017036
017040

017042

017046
017052
017056
017062
017064
017066
017070
017072
017074
017076
017100
017102

010061
042761
104414
12111
104414
121225
010005

042705

052705
116104
052704
120504
001401
104004
104401
0051G0
000261
106100
001345
104400

000004
N00262

B 6
12:19 PAGE 66
DMC11 MI CRO PROCESSOR 1BUS* TESTS

67%:
000004

MOV

RO,4(R1)

BIC

ROMCLK

;PUT PATTERN INTO PORT4
;CLEAR UNWANTED BITS
JNEXT WORD IS INSTRUCTION, ROMCLK PC=5304

#262,4(R1)

121100. 11

sMOV DATA TO IBUS* REGISTER 11

ROMCLK
121005!<11+20>

MOV
BIC
BIS
MOVB
BIS
CMPB
BEQ

000262
000020
000005
000020

68%:

HL TM

SCOP1
(oM

CLC
ROLB

BNE
SCOPE

SEQ 0066

SNEXT WORD IS INSTRUCTION, ROMCLK PC=5304
JREAD FROM IBUS* REGISTER 11

RO,RS
#262 RS
#20,R5

;PUT EXPECTED IN RS

:CLEAR UNWANTED BITS
;ADD THESE BITS

JPUT "FOUND'' INTO R4

5(R1) R4

#20,R4
RS ,R&
68%

JADD THIS BIT

;DATA CORRE(CT?
JBR IF YES

;ERROR

. SW09=1?
;CHANGE TO FLOATING 1

;CLEAR CARRY
JSHIFT BIT IN RO

69%

;IF RO=0 THEN DONE
;SCOPE THIS TEST

JRNRNRNPARKAARRE
AR EANRANCNAN

;*MICRO PROCESSOR

TEST

000040
017260
017140

001226
001216
(01220

000000
000001

RRRRRERRRRRRIRRR
R

FRUNRSTHIZ ARG
IS

3409

15T40:

64%:

000004

RN AR AR AR

;

TEST 40

MOV
MOV
MOV
MSTCLR
MOV
MOV

AN R AR R A AR AR AR AR

#40,TSTNO
#TST47 NEXT
#64%,1 0CK
#0,R2
#1.RO

MOV
RO.4(R1)
ROMCLK
12210010
ROMCLK

21005 ' <0*20>

MOV
MOVB
(MPB
BEQ

000005

65%:

017214
000001

(01220
69%:

HLT

SCOP1
CLC
ROLB
BNE
MOV

MOV

RO, K5
S5(R1.Ré4
RS,R4
65$
5

RO
64$
#67%,00K

»° RO
KO

AR AN

IBUS REGISTER WRITE/READ

;*FLOAT A 1 THROUGH IBUS REGISTER C
;*FLOAT A O THROUGH IBUS REGISTER 0

RN RN A

AR A NA RN

kA R

AR AR AR AR R AR A NN

TEST

RANANNNARRANRANTRN

;R1 CUNTAINS BASE DMC11 ADDRESS
*MASTER CLEAR DMC11
*SAVE REGISTER ADDRESS FOR TYPEQUT
*START WITH BIT 0

;PUT PATTERN INTO PORT4
*NEXT WORD IS INSTRUCTION, ROMCLK PC=5304
*MOV DATA TO IBUS REGISTER 0
*NEXT WORD

INSTRUCTION,

*READ FROM IBUS REGISTER 0

*PUT EXPECTED IN RS
*PLT "FOUND'TM INTO R4
*DATA CORRECT?
‘BR IF YES

*ERROR

S SW09-17
*CLEAR CARRY
SSHIFT BIT IN RO
“1F RO=0 THEN DONE
*NEW SCOP1

*START WITH BIT 0
“THANGE

TO FLOATING ZERU

ROMCLK

PC-52064

YTM

MACY'1 30A(1052)
264-AUG-78
11-AUG~-78 08:21
CZDMCC.PIN
CZDMC

M6
3427
3428
329
3630
331
3432
3633
3634
3435
3436
3437
3438
3439
34640
3441
34642
3443
3444

017214
017214
017220
017222
017224
017226
017230
(017232
017236
017240
017242
017244
017246
017250
017252
017254
017256

010061
104414
122100
104414
021005
010005
116104
120504
001401
104005
104401
005100
000241
106100
001356
104400

c
6
12:19
PAGE 67
DMC11 MICRO PROCESSOR IBUS TESTS
67%:

000004

000005

68%:

MOV
RO,4(R1)
ROM(CLK
122100!0
ROMCLK
21005!<0+~20>
MOV
RO,RS
MOVB
5(R1) R4
CMPR
RS R4
BEQ
68%
HLT
5
SCOP1T
(oM
RO
CLC
ROLR
RO
BNE
69%
SCOPE

SEQ 0067

JPUT PATTERN INTO PORTS
JNEXT WORD IS INSTRUCTION, ROMCLK PC 5304
;MOV DATA TO IBUS REGISTER O
JNEXT WORD IS INSTRUCTION, ROMCLK PC-5304
JREAD FROM [BUS REGISTER O
;JPUT EXPECTED IN RS
JPUT "FOUND'* INTO R4
;DATA CORRECT?
;BR IF YES
;ERROR
. SW09=1?
;CHANGE TG FLOATING 1
;JCLEAR CARRY
JSHIFT BIT IN RO
;IF RO-O THEN DONE
;SCOPE THIS TEST

2445

JRRARANNRRAANAARERNARRRRRRANS

3446
3447
3448

;*MICRO PROCESSOR [BUS REGISTER WRITE/READ TEST
;*FLOAT A 1 THROUGH IBUS REGISTER 1
;*FLOAT A O THROUGH IBUS REGISTER 1

2449

3450
3451
3452
3453
3454
3655
3456
3657
3458
3459
3660

3461
34662
3463
64
3465
3466
3467
3468
3469
3470
3471

372
373
3474
3475

476

3477
3478
379
3480
3487

IR RR RN

017260
017266
017274

012737
012737
012737

017302
(17304
017310
017314
017314
017320
(017322
017324
017326
017330
017332
017336
017340
017342
01734
017346
017350
017352
01735

104412
012702
012700

017362

017366
017370
0172370
017374
017376

010061
104414
122101
1064414
021025
010005
116104
120504
001401
104005
104401

000241
106100
001360
012737

000041
017434
017314
000001
000001

T1ST41:

64%:

000004

000005

65%:

017370

012700

000001

010061
104474
122101

000004

005100

001226
001215
001220

001220

€9%:
7%

A R R

AN R AN

;s
TEST 41
Jmmm———————————
MOV
#41,TSTNO
MOV
#TST42 NEXT
MOV
#6648, 0CK
MSTCLR
MOV
MOV

#1,R2
#1,R0

MOV
RO,4(R1)
ROMCLK
122100.1
ROM(LK
21005.<1=20>
MOV
RO,RS
MOVR
5(R1) R4
(MPR
RS ,R4
BEQ
65%
HLT
5
SCoOP

cLC
ROLB
BNE
MOV

MOV

(oM

JEST

Aranna st e a v

AN RRAR R NN A RNA NI AN R AN RN PR AN RAR R R AR AR

;R1T CONTAINS BASE DMC11 ADDRESS

;PUT PATTERN INTO PORT4
JNEXT WORD IS INSTRUCTION, ROMCLK P(C=5204
;MOV DATA TO [BUS REGISTER 1
JNEXT WORD IS INSTRUCTION, ROMCLk PC-5304
JREAD FROM IBUS REGISTER 1
;JPUT EXPECTED IN RS
JPUT “FOUND'' INTO R4
;DATA CORRE(CT?
;BR IF YES
ERROR
;SW09=1?

;CLEAR CARRY
JSHIFT BIT IN RO
;IF R0O=0 THEN DONE
JNEW STOP1

JCHANGE TO FLOATING ZERO

MOV
RO,4(R1)
ROM(L K
122100 .1

RR RN RARN

JMASTER CLEAR DM(C11
;SAVE REGISTER ADDRESS FOR TYPEOUT
JSTART WITH BIT O

RO
643
#67% 1 0(x

#1,R0

A Ak ke kR kA AN ARk

:START WITH BIT 0

JPUT PATTERN INTO PORTS
JNEXT WORD IS INSTRUCTION, ROM(iKk Pr
;MOv DATA TO IBUS REGISTER 1

5304

lan W)

CZDMC
MACY11 30A(1052)
24~AUG-78
CZdMCC.P11
11-AUG~78 08:21

3482
3483
3484
3485
3486
3487
3488

3489
3490
3491
3492
3493
3494
3495
3496

017400
017402
017404
017406
017412
017414
017416
017420
017422
017424
017426
017430
017432

104414
021025
010005
116104
120504
001407
104005

12:19
PAGE 68
DMC11 MICRO PROCESSOR

000005

104407
005100
000241
106100
001356
104400

68%:

IBUS TESTS

ROMCLK
21005.<1+20>
MOV
RO,RS
MOvB
5(R1) ,R4
CMPB
RS ,R4
BEQ
68%
HLT
5
SCOP1
(OM
RO
(L
ROLB
RO
BNE
69%
SCOPE

SEQ 0068

JNEXT WORD IS INSTRUCTION, ROMCLK P(C=5304
JREAD FROM IBUS REGISTER 1
JPUT EXPECTED IN RS
JPUT 'FOUND'' INTO R4
;DATA (ORRECT?
JBR IF YES
;ERROR
;SW09=1?
sCHANGE TO FLOATING 1
:CLEAR CARRY
JSHIFT BIT IN RO
;IF RO=0 THEN DONE
;SCOPE THIS TEST

3497

JRNRNRNANKRAARARARRARAARNNAN

3498
3499
3500

. *MICRO PROCESSOR IBUS REGISTER WRITE/READ TEST
;*FLOAT A 1 THROUGH [BUS REGISTER 2
;*FLOAT A O THROUGH IBUS REGISTER 2

2501

3502

2282

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

3532
3533
3534
3535
3536

3537

;

017434
017442
017450

012737
012737
012737

017456
017460
017464
017470
017470
017476
017476
017500
017502
017504
(17506
017512
017514
017516
017520
017522
017524
017526
017530
017536
017542
017544
017544

104412
012702
012700

017550
017552
017554
017556
017560
01752

010061
106414
122102
104414
021045
010005
116104

120504
001601
104005
104401
000241
106100
001360
012737
012700

005100

000042
017670
017470
000002
000001

T1Sr142:

66%:

000004

000GCS

65%:

017544
000001

010061
104414
122102
104414

000004

116104

0000

021045
010005

001226
001216
001220

001220

(9%
67%:

R AR

AR AR AR AR A

TEST

AN AR AN NN AN AN

AR NN

AN A A At

AR A AR AN R

AR AR ANN N AR N RN

AR AR

R AN RN

A AR

TEST &2

MOV
MoV
MOV

#42,TSTNO
HTSTLS NEXT
#64$,L0CK

MSTCLR
MOV
MOV

#2 ,R¢
#1,R0

MOV
RO,4(R1)
ROMCLK
122100.2
ROMCLK
21005.<2+20>
MOV
RO,RS
MOVR
S(R1) R4

(MPR
BEQ
HLT
SCOP1
cLce
ROLB
BNE
MoV
MOV
(oM

RS ,R4
65%
5

RO
64%
#67%,L0(K
#1 R0
RO

JR1 CONTAINS BASE DMC11 ADDRESS
JMASTER CLEAR DM(CI
;SAVE REGISTER ADDRESS FOR TYPEOUT
JSTART WITH BIT O

;sPUT PATTERN INTQ PORT4
JNEXT WORD IS INSTRUCTION, ROMCLK PC 5304
;MOV DATA TO IBUS REGISTER 2
JNEXT WORD IS INSTRUCTION, ROMCLK PC-5304
JREAD FROM IBUS REGISTER 2
JPUT FXPECTED IN RS
;PUT "FOUND'' INTO R¢
;DATA CORRECT?
;BR IF YES
;ERROR
. SW09=1?
. CLEAR CARRY
JSHIFT BIT IN RO
;IF RO-O THEN DONE
JNEW SCOP1
;START WITH BIT 0

. CHANGE TO FLOATING ZERO

MOV
RO,4(R1)
ROMCLK
122100!2
ROM( L K

JPUT PATTERN INTQ PORT4
JNEXT WORD IS INSTRUCTION, ROMCLK P(=5304
;MOV DATA TO IBUS REGISTER 2
JNEXT WORD IS INSTRUCTION, ROMCLK P(C 5304

MOV

JPUT "FOUND'* INTO R4

21005. <2+20>
MOV
R, RS

5(R1’,Ra

:READ FROM IBUS REGISTER 2
JPUT EXPECTED IN RS

fan Kan

({OMC
MACY11 30A(1052)
24-auG-78
CZDMCC.P11
11-AUG-78 08:21

CZDMC
MACY11 30A(1052)
24-AUG-78
CZDMCC.PT
11-AUG-78 08:21
120504

104005
106401

68%:

005100
000241

106190

[BUS TESTS

SEQ 0069
;DATA CORRECTTM?

68$

:BR IF YES

SCOP1
COM
cLC

:SW09=17?
JCHANGE TO FLOATING 1
;CLEAR CARRY

HLT

BNE

104400

BEQ

ROLB

001356

RSP

(MPB

001401

69%

SCOPE

JERROR

JSHIFT BIT IN RO
;IF RO=0 THEN DONE

:SCOPE THIS TeST

IRRANRNRRRAARRRANRAAAANNNNNY

TEST

wavannernannnnhnrnnwnnnannn

:*MICRO PROCESSOR 1BUS REGISTER WRITE/READ TEST
S«FLOAT A 1 THROUGH IBJS REGISTER 3
;*FLOAT A 0 THROUGK [BUS REGISTER 3

":tl*tfifi'ifiifififi‘i"i.t!'liifltitttttttt#ttfltt*ttfi'ttttfi*ttttttttt

—

RRNRS AR
&
&

001226
(01216
001220

TST43:

000003
000001

€6%:

000004

VAN
S (N
—

OO ==
O

MOV

#63,TSTNO

MOV
MOV

#TST44
NE XT
#64%,10CK

017720
000001

RO,4(R1)

:PUT PATTERN

000004

HLT

SCOP1

L
ROLB
BNE

MOV

£0%:
6’%:

MOV

08‘:

*PUT "FOUND'" INTO R4

‘DATA CORRECT?
‘BR IF YES
*ERROR

:SW09=1?

*CLEAR CARRY

#1.R0

*START WITH BIT 0
*CHANGE TO FLOATING ZERO

64$
#67%,L0CK

21005 '<3+20>

RO,RS
S(R1) &4

(MPB

RS Ré

HLT
SP

BEQ

*READ FROM IBUS REGISTER $

*PUT EXPECTED IN RS

SSHIFT BIT

MOV
RC,4(R1)
ROMCLK
122100.%

MOV
MO VB

INTO PORT4

*NEXT WORD IS INSTRUCTION, ROMCLK PC-5304
:MOV DATA TO IBUS REGISTER 3
*NEXT WORD IS INSTRUCTION, ROMCLK PC=5304

ROMC LK

000( 05

ADDRESS

MOV

210051<3%20>
MOV
RO,RS
MOVR
5(R*) R4
RS ,R4
(MPR
BEQ
65$

00221

DMC11

#3,R2
#1,R0

122100 3

£5%:

CONTAINS BASE

MOV
MOV

ROMCLK

000005

.R1

JMASTER CLEAR DM(11
sSAVE REGISTER ADDRESS FOR TYPEOUT
JSTART WITH BIT 0O

ROMCLK

241

TEST 43

MST(.R

O
OO

OnN) ==y
o

=S Q===

RESR3
SeroRaRs
2
THE
S3S
525

17750

—d

elole]

017632
017634
017640
017644
017644
017650
017652
017654
017656
017660
017662
017666
017670
017672
017674
017676
017700
017702
017704
017712
017716
017720
017720
017724
017726
017730
017732
017734
017736
017742
017744
017746

000043
017764
017644

ooy

17610
17616
017624

OO -

—

3541
3542
3543
3544
3545
3546
3547
3548
3549
3550
3551

017566
017570
017572
017574
017576
017600
017602
017604
017606

3538
3539
3540

12:19
PAGE 69
DMC11 MICRO PROCESSOR

68¢

*1F

IN RO

RO=0 THEN DONE

*NEW SCOP1

;PLT

PATTERN

*NEXT WORD

INTO PORT4

INSTRUCTION,

ROMCLK P(=5304

‘MOv DATA TO IBUS REGISTER 3
SNEXT WORD IS INSTRUCTION, ROMCLK P(=5304

*READ TROM [BUS REGISTER $
*PUT EXPECTED IN RS

SPUT "FOUNDTM INTO R4
:DATA CORRE(CT?

‘BR IF

£ RKOR

YES

Jowi9-1?

3594
3595
3596
3597
3598
3599
3600

017752
017754
017756
017760
017762

F
6
12:19
PAGE 70
DMC11 MICRO PROCESSOR IBUS TESTS

005100
000241
106100
001356
104400

(OM
(LC
ROLB
BNE
SCOPE

SEQ 0070

JCHANGE TO FLOATING 1
;CLEAR CARRY
JSHIFT BIT IN RO
;1F RO=0 THEN DONE
;SCOPE THIS TEST

RO
69%

2601

JRRNRRNRNNNRKRRRR
AR A AR AARANNNY

3602
3603
3604

;*MICRO PROCESSOR IBUS REGISTER WRITE/READ TEST
;J*FLOAT A 1 THROUGH IBUS REGISTER 4
J*FLOAT A O THROUGH IBUS REGISTER &

2605

3606
3607
3608
3609
3610
3611
3612
3613
3614
3615
3616
3617
3618
3619
3620
3621
3622
3623
3624
3625
3626
3627
3628
3629
3630
3631
3632
3633
3634
3635
3636
3627
3638
3639
3640
3641
3642

020112
020116

3644
3645
3646
3647
3648

020122
020126
020126
020130
02032

3643

017764
017772
020000

012737
012737
012737

Q2
020010

104412
012702

020014
020020
020020
020024
020026
020030
020032
020034
020036
020042
020044
020046
020050
020052
020054
020056
C20060
020066

020072
020074

012700

010061
104414
122104
104414
021105
010005
116104
120504
001401
104005
104401
000241
106100
001360
012737
012700
005100

020074
020100
020102
0201046
020106
020110

010061
104414
122104
104414
021105
010005

020120

001401

116104
120504

104005
1044601
005100
000241
106100

000044
020140
0¢0020

001226
001216
001220

TST4L4:

L 66%:

000004

0CO00S

65%:

000004

.
TEST
e
MOV
MOV
MOV

44
——e———
#44 ,TSTNO
HTSTLS NEXT
#64%,L0CK

MST(LR
MOV

000004
000001

020674
000001

001220

69% :
X8
¥

Q00ULO5

MOV

4 ,R2
#1,R0

R R

nunnnnanwnavnntnnnnnnnnannns

R KR AR I A RPN RN N A RN A RN R RN A RN AN R AN

R R

;JR1T CONTAINS BASE DM(C11 ADDRESS
JMASTER CLEAR DM(11
;SAVE REGISTER ADDRESS FOR TYPEOQUT
JSTART WITH BIT 0O

MOV
RO,4(R")
ROM(LK
122100!4
ROM(LK
21005.<4+20>
MOV
RO,RS
MOVR
S(R1) R4
CMPS
RS ,R4
BEQ
65%
HLT
5
SCOP1
CLe
ROLB
RO
BNE
64%
MOV
#67%,10Ck
MOV
#1,R0O
(oM
RO

;PUT PATTERN INTO PORT4
JNEXT WORD IS INSTRUCTION, ROMCLK PC-5304
MOV DATA TO [BUS REGISTER 4
JNEXT WORD IS INSTRUCTION, ROMCLK PC-5304
sREAD FROM IBUS REGISTER 4
JPUT EXPECTED IN RS
JPUT "FOUND'® INTO R4
sDATA CORRECT?
:BR [F YES
;ERROR
;SW09-1?
;CLEAR CARRY
JSHIFT BIT IN RO
JIF RO=0 THEN DONE
JNEW SCOP1T
JSTART WITH BIT 0O
. CHANGE TO FLOATING ZERO

MOv
RO,4(R")
ROMCLK
122100.4
ROM(L K
21005.<4+20>
MOV
RO ,RS

JPUT PATTERN INTO PORT4
JNEXT WORD IS INSTRUCTION, ROM(LK PC-53%04
MOV DATA TO IBUS REGISTER 4
JNEXT WORD IS INSTRUCTION, ROMCLK P(=53C4
sREAD FROM [BUS REGISTER 4
JPUT EXPECTED IN RS
JPUT "FOUND'' INTO R4
;DATA CORRE(T?

MOVB
(MPS

BEQ
¢.8%:

TEST

HLT
SCOP1
(oTM
rye
ROIR

5(R1) ,R4
RS ,R¢

68%
5

RO
ko

BR IF YES

JERROR
. SW09=1?
JCHANGE TO FLOATING 1
;C_EAR CARRY
JSHIFT BIT IN RO

C<OMC
MACY11 30A(1052)
24-AUG-78
czDMCC.P11
11-AUG-78 08:21

MACY11 30A(1052)
24=AUG-78
CZoMCC.P1N
11-AUG-78 08:21
CZOMC

12:19

PAGE

DMC11 MICRO PROCESSOR IBUS TESTS

020136

SCOPE

SeEQ 0071
;SCOPE

SANRNNNRNTARRNRRCRRarnnnwnnn

THIS

JEST

TEST

wannnnnnnnsnnasnnnnnantnnnn

:*MICRC PROCESSOR IBUS REGISTER WRITE/READ TEST
s*FLOAT A 1 THROUGH [BUS REGISTER 5
;*FLOAT A 0 THROUGH IBUS REGISTER S
. TRARNAN AR

noror
SN N
NN

QO
—

NN
S

_l_a?
ronro

001226
001216
001220

(WLIV, P oSV, P o e

000004

000005

TST45:

<DS2$3 NN
nN—=O
==
SIS

#45,TSTNO

MOV
MOV

#TST4L6, NEXT
#64%,L0CK

MOV

#5,R2

MOV

#1°R0

21005 . <5*20>

RIRSSER J\\h—ng—ll\—lb 3

MOV

MOV
RO.4(R1)
ROMCLK
122100.5
ROM( LK

MOV
MOVB
(MPB
BEQ

R
S

8—.—. 832283332
2SS NRVR
B d

TEST 45

MSTCLR

000005
000001

N
N &~

==L OO
ON=2=2NONO
=
=200 =Hrus
obw —h
Ho
olelel o
—_ -

000045
020314
020176

€58

020250
000001

33 —

020%12

onrnor

OO0

020162
020164
020170
020174
020174
020200
020202
020204
020206
020210
020212
020216
020220
020222
020224
020226
020230
020232
020234
020242
020246
020250
020250
020254

—_

020140
020146
020154

OO
—

NN
N

;

AR AN NN NN AANNRNRAARRRNCNRANANRCAANANNNRANNOANRN RN AANNANR RS

601220

Egg-

000060C4

HLT

RO,RS
5(R1) R4
RS,R&
65%

SCOP1

CLC
ROLB
BNE

DMC11

CLEAR DM(11

ADDRESS

*SAVE REGISTER ADDRESS FOR TYPEOUT

“START WITH BIT 0

;PUT PATTERN INTO PORT4
*NEXT WORD IS INSIRUCTION,

ROMCLK PC=5304

*NEXT WORD

ROMCLK PC=5304

MOV DATA TO 1BUS REGISTER S
IS

INSTRUCTION,

*READ FROM IBUS REGISTER §

*PUT EXPECTED IN RS
*PUT "FOUND'' INTO R4
*DATA CORRECT?
‘BR IF YES

'ERROR

. SW09-12

*CLEAR CARRY
*SHIFT BIT IN RO
*1F RO=0 THEN DONE

MOV
MOV
COM

*NEW SCOPT
SSTART WITH BIT 0
*CHANGE TO FLOATING ZERO

MOV

RO.4(R1)

:PUT PATTERN INTO PORT4

122100.5
ROMCLK

*NEXT

WORD

INSTRUCTION,

*READ FROM IBUS REGISTER 5

MOVB

*PUT "FOUND'' INTO R4

RO,RS

(MPB

RS,R4

HLT

5C0P?

oM
(e

ROLBR

BNE

5(R1),R4

68§
RO
RC

£98

ROMCLK

PC=5304

*MOV DATA TO IRUS REGISTER S
*NEXT WORD IS INSTRUCTION,
ROMCLK PC-5304

210055220

MOV

BEQ

+,8%:

CONTAINS BASE

JMASTER

RO
64$
#67%,1 00K
#1,R0
RO

ROMCLK

0000
/S

JR1

*PUT EXPECTED IN RS
:DATA CORRECT?

‘BR IF

"ERROR

YES

S Sw09-1?

*CHANGE TO FLOATING
*(LEAR CARRY

SSHIFT BIT

IN RO

“1F RO=0 THEN DONE

YSCOPE

Jeevesacenseesavenrnannrenn

THIS

TELT

TEST

aeeentresttscanerrsrarevenns

(cOMC
MACYTY 30A(1052)
24-AUG=78
T2oMCC. P
11-AUG=~78 08:21

12:19
PAGE 72
DMC11 MICRO PROCESSOR

IBUS TESTS

3706

;*MICRC PROCESSOR

3708

;*FLOAT A O

3707

3709

6
SEQ 0072

IBUS REGISTER WRITE/READ

;*FLOAT A 1

THROUGH [BUS REGISTER 6

THROUGH
R

TEST

[BUS REGISTER 6

AN R A AR R AN NN RN N R R AR R RN R R AR R R RN R R AN

R R AR E

3710

3711

3712

;

3713
3714
3715

020314
020322
020330

012737
012737
012737

3717
3718
3719
3720

020336
020340
020344
020350

104412
012702
012700

3716

37221
3722

3723
37264
3725
3726
3727
1728
3729
3730
3731
3732
3733
3734
3735
3736
3737
3738

3739

3760

37241
37642
3743
3744
3745
3746
3747
3748
3749
3750
3751
3752
3752
g;gz

3756

3757

3758

3759

376C
37¢,°

020350
020354

020356
020360
020362
020364
020366
020372
020374
020376
020400
020402
020404
020406
020410
020416
020422
020424

020424

020430

020432
020436
(020436
020440
020442
020446
020450
020452
020454
020456
020460
020462
020464
020466

01006
104414

000046
020470
220350

001226
001216
001220

V00006
00000C"

T1ST46:

FLY:

000004

122°0¢
104474

021145
(10005
116104
120504
001407
104005
104401
C0G241
106100
001360

QOCOr
€

£5%:

(012737
012700
005100

020624
0000

010061

00CO00«

104414

12210¢
104414
021145
010005
116104
1205C4
001407
104005
104401
005100
000241
106100
00135¢
104400

,
0" -0

0%
67%:

TEST 46

Jmmmeemmme———a—

MOV
MOV
MOV

MST(LR
MOV
MOV
MOV
ROMCLK

$8%:

sR1

MOV

CONTAINS BASE DMC11

ADDRESS

JMASTER CLEAR DM(11
;SAVE REGISTER ADDRESS FOR TYPEOQUT
JSTART WITH BIT 0

#6,R2
#1,R0
RO,4(R1)

JPUT PATTERN INTO PORT4
SNEXT WORD IS INSTRUCTION, ROMCLK P(=5304

1221006
ROM(CLK
21005 ! <6+20>
MOV
RO,RS
MOVB
5(R1),R4
(MPH
RS ,R4
BEQ
65%
HLT
5
ScoP?
(Le
ROLR
RO
BNE
649
MOV
#67%,00K
MOV
#1,R0O
(TM
RO
ROMCLK

(0Q06S

#46,TSTNO
#TSTL7 NEXT
#668,L00K

sMOV DATA TO IBUS REGISTER 6
JNEXT WORD IS INSTRUCTION, ROMCLK PC S304

JREAD FROM |BUS REGISTER 6
JPUT EXPECTED IN RS
;PUT "FOUNC'' INTO R4
;DATA (CORRE(T?
JBR IF YES
;ERROR
2 SW09=1?
;CLEAR (ARRY
JSHIFT BIT IN RO
;IF RO-0 THEN DONE

JNEW SCOP1
;START WITH BIT 0
s CHANGE TO FLOATING ZERO

RG,4(R1)

;PUT PATTERN INTO PORT4

JNEXT

122100.6
ROMCLK
21005!<6+20>
MOV
RO,RS
MOVR
5(R1) R4
rMPR
RS R«
BEQ
68%
HLT
S
SCOP1
(oM
RO
CLC
ROLR
RC
BNE
69%
<TOPE

WORD

INSTRUCTION,

ROMCLK

PC-5304

JMCV DATA TO IBUS REGISTER 6
JNEXT WORD IS INSTRUCTION, ROMCLK P(C=5304
JREAD FROM IBUS REGISTER 6
JPUT EXPECTED IN RS
JPUT "FOUND'' INTO R4
;DATA CORRECT?
JBR IF YES
;ERROR
2 SW09-17?
JLHANGE TO FLOATING !
;(LEAR CARRY
JSHIFT BIT IN RO
;1F RO-0 THEN DONF
JSCOPE THIS TEST

Jreecatnrensntrrsesnrnannnnnn

JEST

sannnnnnnssantnsnnsensrnnne

s*MI (RO PROCESSOR IBUS REGISTER WR]TE/READ TEST

J*FL0AT

THROUGH

[BUS REG]STER

;*FLOAT A 7 THROUGH 1BUS REGISTER 7
AL

I OO

12:19
PAGE 73
DMC11 MICRO PROCESSOR

3762
3763

3764

3765
2066
3767
3768
3769
3770
3771
3772
3773
3776

;

020470
020476
020504

012737
012737
012737
104412
012702
012700

3775
3776

020512
020514
020520
020524
020526
020530
020532
020534

010061
104416
122107
104414

3778
3779
3780
3781
3782

020540
020542
020546
020550
020552

0100CS
116104
120504
001401
104005

3785
3786
3787
3788
3789
3790

020560
020562
020564
020572
020576
020600

3792
3793
37946

020604
020606
020610

3777

3783
3784

3791

3795

3796
3797
3798
3799
3800
3801
3802
2
3804
3805
gggg

020536

020554
020556

001226
001216
001220

0000C7
200001

1ST47:

t6%:

000004

021165

104401
000241
106100
001360
012737
012700
005100

020600

010G61

020612

021165

020614
020616
020622
(020624
020626
020630
020632
0206346
020636
020640
020642

000047
020644
020524

104414
122107
104414

010005
116104
120504
001401
104005
106407
005100
000241
106100
001356
104400

IBUS TESTS

6£5%:

020600
000001

0v122(C

¢.7%:
6H’%:

000004

TEST &7

MOV
MOV
MOV

#47,TSTNO
H#TSTSO NEXT
#64%,10CK

MSTCLR
MOV
MOV

#7,R2
#1,R0

;PUT PATTERN INTO PORT4
JNEXT WORD IS INSTRUCTION, ROMCLK P(C=5304
;MOV DATA TO IBUS REGISTER 7
JNEXT WORD IS INSTRUCTION,
ROMCLK P(C=5304

MOV
MOVB
(MPR
BEQ
HLT

SCOPY
rLc
ROLB
BNE
MOV
MOV
(oM

R0,R5
S(R1) ,R4
RS ,R4
65%
5

sPUT EXPECTED IN RS
PUT FOUND'' INTO R4
;DATA (CORRECT?
;JBR IF YES
;ERROR

RO
64%
#67%,10(K
#1,R0
RO

JSHIFT BIT IN RO
:IF RO=0 THEN DONE
;NEW SCOPI
JSTART WITH BIT 0
sCHANGE TO FLOATING ZERO

MOV

RO,4(R1)
A

21005!<7%20>

68%:

3808

;R1 CONTAINS BASE DM(C11 ADDRESS
JMASTER (CLEAR DMCTM
s SAVE REGISTER ADDRESS FOR TYPEQUT
JSTART WITH BIT 0

MOV
RO,4(R1)
ROM(CLK
122100.7
ROMCLK

ROM(LK
122100.7
ROM(LK

0000U5S

SEQ 0073

~1005.<7+20>

0v000S

MOV
MOVB
(MPR
BEQ
HLT
SCOPI
(oM
CLc
ROLB
BNE
SCOPE

RO,RS
S(R1) R4
RS R&
68%
5

RO
69%

:READ FROM [BUS REGISTER 7

;SW09-1?
;C(LEAR CARRY

JPUT PATTERN INTO PORT4

JNEXT WORD IS INSTRUCTION, ROMCLK P(C=5304
;MOV DATA TO IBUS REGISTER 7
SJNEXT WORD IS INSTRUCTION, ROMCLK P(C=5304

:READ FROM IBUS REGISTER 7

JPUT EXPECTED IN RS
JPUT "FOUND'' INTO R4
;DATA CORRE(CT?
;BR IF YES
sERRQR
2 SW09=1?
JCHANGE TO FLOATING 1
s CLEAR (CARRY
JSHIFT BIT IN RO
JIF RO=0 THEN DONE
;SCOPE THIS TEST

2809

Janennneannnnnennnvannnnnnnn

3810
3811
3812

;*MICRO PRGCESSOR ]BUS DUAL ADDRESS TEST
J*WRITE ALL IBUS REGISTERS WITH INCREMENTING PATTERN
J*READ ALL [BUS REGISTERS TO VERIFY CORRECT ADDRESSING

3813

R L

3814

815

3817

TEST 50
20664

01,737

Q00050

Jul22¢

TSTISL:

MOy

#50,TSTNO

JEST

annnnnenesenvnrnrnanansnnns

CZDMC
MACY11 30A(1052)
24-AUG-78
CZ0MCC. P11
11-AUG=-78 08:21

COMC

MACYYT

cZoMCcC.P1

020652
020660

012737
012737

020666
020670
020674
020676
020700

104412
012700
005002
010203
010061

3828
3829
3830
3831
3832
3833
3834
3835
3836
3837
3838
3839
3840
3841
3842
3843
3844
3845
3846
3847
3848
3849
3850
3851
3852
3853
3854
3855
3856
3857

020716
020720
020722
020724
020726
020730
020732
020740
020744
020746
020750
020752
020756
020760
020762
020764
020766
020770
020772
020776
021000
021006
021012
021014
021016
021024
021030
(21032
021034
021036

104414
122100
006303
006303
006303
006303
042737
050337
104414
021005
010005
116104
120504
001407
104005
104401
005200
005202
022702
001337
012737
012700
005002
005003
042737
050337
1046414
021005
010005
116104

3859
3860
3861
3862
3863
3864

(21044
021046
021050
021052
02105¢
021056

001401
104005
104401
005200
005202
062703

3866
3867
3868
3869

021066
021070

001353
104400

3858

3865

020704
020712

(021042

021062

24-AUG-78

11-AUG=78 08:21

3818
3819
3820
3821
3822
3823
3824
3825

3826
3827

30A(1052)

042737
050337

120504

0227C2

021072
020676

12:19

PAGE

DMC11 MICRO PROCESSOR [BUS TESTS

001216
001220

SEQ 0074

MOV
L 0)%

#TSTST NEXT
#1%,L0(K

MSTCLR
MOV
CLR
MOV
MOV

#1,R0O
R2
R2,R3
RO,4(R1)

(00005

ROMCLK
122100
ASL
ASL
ASL
ASL
BIC
BIS
ROM(CLK
21005
MOV
MOVR
CMPH
BEQ
HLT
SCOP1
INC
INC
(MP
BNE
MOV
MGV
(LR
(LR
BIC
BIS
ROM(LK
21005
MOV
MOVR

JNEXT WORD IS INSTRUCTION, ROMCLK PC 5304
sMOVE DATA TO IBUS REGISTER
R3
JSHIFT ADDRESS
R3
;4 TIMES TO GET
R3
;1T TO BITS 4-7
R3
;JOF NEXT INSTRUCTION
#360,6%
cCLEAR ADDRESS FIELD
R3,6%
sADD ADDRESS TO INSTRUCTION
JNEXT WORD IS INSTRUCTION, ROMCLK PC 5304
JREAD FROM IBUS REGISTER
RO,RS
JPUT "EXPECTED'' IN RS
5(R1) ,R4
JPUT "FOUNL'' IN R4
RS,R4
;1S DATA CORRECT?
2%
;BR IF YES
5
;DATA ERROR
;SW09-1?
RO
; INCREMENT PATTERN
R2
. INCREMENT REGISTER ADDRESS
#7+1,R2 ;LAST ADDRESS DONE?
1%
JBR IF NO
#3%,LCCk
JNEW SCOP1
#T,RO
;RESTART PATTERN T0O 1
R2
JRESTART AT ADDRESS 0
R3
JRESTART AT ADDRESS C
#360,7%
JCLEAR ADDRESS FIELD OF INSTRUCTION
R3,7%
;ADD ADDRESS TO INSTRUCTION
JNEXT WORD IS INSTRUCTION, ROM(CLK PC-5304
JREAD FROM [BUS REGISTER
RO,RS
JPUT "EXPECTED'' IN RS
5(R7) ,Rq
JPUT "FOUND'' IN RS

4%
5

000020

BEQ
HLT
SCOP1
INC
INC
ADD

000001
000004

0000'7
02072C

1%:

00720

BIC
BIS

5%:

000360
(c¢0746

020746
6%:

000005

2%:
000016
021016
000001

001220

000360
021032

021032

3%:
7%:

(MP

00000

CMP

BNE
SCOPE

JR1 CONTAINS BASE DMC11 ADDRESS
JMASTER CLEAR DM(C11
JSTART WITH A ONE
JR2 CONTAINS ADDRESS OF REGISTER
JR3=REGISTER ADDRESS
;WRITE DATA TO PORT4

417 5%
R3, 13

;CLEAR ADDRESS FIELD OF INSTRUCTION
;ADD ADDRESS TO INSTRUCTION

RS.R4

;DATA CORRE(CT?

JBR IF YES
;DUAL ADDRESSING ERROR
. Sw09=1?
JINCREMENT PATTERN
JNEXT ADDRESS
JADD 7 TO ADDRESS IN R3I!SHIFTED 4 TIMES)

RO
Re
l20 R3

#7+ ,R2 ;LAST ADDRESS DONE?
b}

;BR IF NO
;SLOPE THIS TEST

3870

Jeesnawenwnnasnenntesanannen

3871
3872

*«MI(RO PRO'ESSOR BR REGISTER TES
J*FIOAT A ' THROUGH THE RR

2873

;'FLOAY

THROUGH

THE

TEGT

swennnsasnsnvenccensnnnoenns

CZDMC
MACY11 30A(1052)
24-AUG-78
11-AUG~-78 08:21
CZomcC.P11

K
6
12:19 PAGE 75
DMC11 MICRO PROCESSOR 1BUS TESTS
IR

—B
b
—

000051
0212642
021122

001226
001216
001220

200001

TSTS1:

000004

R R A R R A A R

P N R AN

MOV

#51,TSTNO

MOV

#648,10CK

MOV

012700
005100
010661
106414

021176
000001

001220
22::

000004

120500

104414

68%:

021240

N#TSTS2 ,NEXT

#1,R0

MOV

RO,4(R7)

JWRITE PATTERN [N PORT4

JNEXT WORD IS INSTRUCTION, ROMCLK PC=5304

120500

;MOVE DATA TO THE BR REGISTER

061225

JMUVE BR TO PORT 5

JNEXT WORD

INSTRUCTION,

ROMCLK

5304

R0,R5
5(R1) R4
RS R4
65%

JPUT "EXPECTED'* IN R"
JPUT FOUND'' IN R4
;DATA CORRECT?
,BR IF YES

. CLEAR CARRY
JSHIFT BIT IN RO

;CHANGE

MOV
ROM(LK
120500
ROM(CLK

RO,4(RT)

;WRITE PATTERN IN PORT4
JNEXT WORD IS INSTRUCTION, ROMCLK PC=5394
:MOVE DATA TO THE BR REGISTER
JNEXT WORD IS INSTRUCTION, ROMCLK P(=5304

MOV
MOVB
(MPR
BEQ

RO,RS
5(R1) ,R4
RS ,Ré
68%

HLT

SCOP1

CLC
ROLB

BNE
MOV
MOv

061225

000005

A NN NN R AR AN R AN RO R AR RN R AR

sR1 CONTAINS BASE DM(C11 ADDRESS
JMASTER CLEAR DM(11
;START PATTERN WITH BITO

MOV
MOVB
(MPR
BEQ

65%:

MSTCLR
MOV

ROM(CLK

000005

AN AN RN

TEST 51

ROM(LK

—_

o
nN

_— O

SERERXNNGR &SI

SEQ 0075

HLT

SCOPI

(oM
CLC
ROLB
BNE
SCOPE

:DATA ERROR

64%
#67%,L0CK
#1,R0

;DONE IF RO=0
;NEW SCOPI
;START PATTERN WITH BITO
TO FLOATING ZERO

;MOVE BR TO PORT 5

JPUT "EXPECTED'' IN RS
JPUT "FOUND'' [N Ré
.DATA CORRE(CT?
JBR [F YES

.DATA ERROR

;CHANGE BACK TO A ONE
.CLEAR CARRY
JSHIFT BIT IN RO

RO
69%

;DONE

+SCOPE

Janannennnnnnnnnnnvennwnnenn

[F RO=0
THIS

JEST

TEST

snnnvnnnnnnnnnennnannannnns

+*SCRAT(CH FAD TEST
;*FLOAT A 1 THROUGH EACH SCRATZH PAD LOCATION

;*FLOAT A O THROUGH EACH SCRATCH PAD LOCATION
PN

0224,

02737

000052

00122¢

ISTS52:

MOV

R R

A N P R

R T N AN AR N R R N

TEST 52

#52,TSTNO

AN AN

R AN R RN A A RN R AN R

R RN R RN RN AR AR

CZ0MC
MACY11 30A(1052)
24~AUG-78
11-AUG-78 08:21
CZomMcC.P1

3930
3931
3932
3933
3934
3935

3936
3937
3938

021250
021256

012737
012737

021264
021266
021270
021274

104412

021314
021316
021324
021330
021332
021334
021336
021340
021342
021346
021350
021352
021354
021356
021360
021362
021364
021372
021376
021400
021406
021412
021416
021420
021422
021430
021434
021436
021440
021442
021444
021446
021452
021454
021456
021460
021462
021464
021466
021470
021472
021476
021500
02" 504
021506

005002
012700
042737
050237
010061
104414

021510
021274

12:19

001216
001220

000001
000017
021314
000004

021314

010061

104414
123100

042737
050237

1064414
040600
104414
061225
010005
116104
120504
001601
104007
104407

(6%:

ROMCLK

SEQ 0076

#TSTS3 NEXT
#64%,L0CK
R2
#1 RO

000005

67%:

#17.65%

;CLEAR ADDRESS FIELD OF INSTRUCTION
;ADD ADDRESS TO INSTRUCTION
JWRITE PATTERN TO PORT4
JNEXT WORD IS INSTRUCTION, ROMCLK PC 5304

RG.4(R1)

JWRITE SCRATCH PAD(ADDRESS IN R2)

#17,66%
R2,66%

. CLEAR ADDRESS FIELD OF INSTRUCTION
;ADD ADDRESS TO INSTRUCTION

040600

0C1220

000017
021420
000004

021420

000017
021436

021436

69%:

70%:

71%:

000020

INSTRUCTION,

ROM(LK P(-5304

MOV
MOv

COM
BIC
BIS
MOV

ROMCLK

123100
BIC
BIS
ROMCLK

;DATA ERROR

#17,70%
R2,70%

RO,4(R1)

#7,71%

R2,71%

040600

IN RO

;DONE [F RO=0
JNEW SCOPI

JSTART WITH BITO

;CHANGE TO FLOATING ZERO
sCLEAR ADDRESS FIELD OF INSTRUCTION
;ADD ADDRESS TO INSTRUCTION
JWRITE PATTERN TO PORT4

JNEXT WORD IS INSTRUCTION, ROMCLK PC 5304
JWRITE SCRATCH PAD(ADDRESS IN R2)
;CLEAR ADDRESS FIELD OF INSTRUCTION

;ADD ADDRESS

INSTRUCTION

SNEXT WORD IS INSTRUCTION, ROMCLK P(C=5304
MOV SP TO BR
JNEXT WORD IS INSTRUCTION, ROMCLK P(C=5304
;MOVE BR TO PORTS

JPUT "EXPECTED"' IN RS

JPJT "FOUND'' IN R4
;DATA CORRECT
;BR_IF YES

HLT

;DATA ERROR

SCOP1

. Sw09=1?
;CHANGE BACK TO A ONE
. CLEAR CARRY

oM
CLC

BNE
MOV
INC
(MP
BNE
SCOPE

JSHIFT BIT

#6998, L0k
#£1,R0

ROLB

000001

JNEXT WORD

CLC

5304

;DATA CORRECT
JBR [F YES

061225

106100

ROMCLK PC

;SW09 1?2
;CLEAR CARRY

CMPS
BEQ
HLT
SCOP1

MOV
MOVB
(MPR
BEQ

72%:

INSTRUCTION,

MOV
MOVB

ROM(LK

000005

;MOVE BR TO PORTS
JPUT EXPECTED'' IN RS
JPUT "FOUND'' IN R4

BNE

72%:

SNEXT WORD

MOV SP TO BR

ROMCLX

ROLA

021400
000001

;R1 CONTAINS BASE DMC11 ADDRESS
;MASTER CLEAR DMCN

;START AT ADDRESS ZERO
JSTART WITH BITO

061225

005100
000241

001342
012700
005202
022702
001273
104400

BIC
BIS

123100
BI(C
BIS

021332

104401

050237

64%:

MOV

MOV
ROMCLK

001401
104007
000241
106100
001344
012737
012700
005100
042737

MOV
MOV

CLR

104414

116104
120504

SCRATCH PAD TESTS

MSTCLR

123100
042737
050237
0460600
104414
061225
010005

PAGE

DMC11

JSHIFT BIT

IN RO

JDONE IF RO=0

JRESTART AT BIT 0

#20,R¢
4%

JNEXT SP ADDRESS

sLAST ADDRESS?
;BR IF NO

JSCOPE THIS TEST

CZ0MC
MACY 1T 30A(1052)
24-AUG-78
CZDMCC.P1T
11-AUG-78 08:21

12:19
PAGE 77
DMC11 SCRATCH PAD TESTS

SEQ 0077

3986
JRRRARRARNARNAARRRRRARAANRANY

TEST

annanaannananannnnnnhnnnnntns

:*SCRATCH PAD DUAL ADDRESSING TEST

;*WRITE AN INCREMENTING PATTERN IN ALL

SP LOCATIONS

:*READ ALL SP LOCATIONS TO VERIFY CORRECT ADDRESSING

. TRRR AN NN NN AR R AN AR AR AANAARAARANRRAANAN R AN AN AN RANANANAR R A AR

37
37

200053
021732
021542

001226
001216
001220

TSTS3:

MSTCLR

000001

MOv

000017
021564
000004

021564

000017
021602

021602

060600
104414

061225
010005
116104

120504
001401

104414

021720

005203

R3,R2

#1728

Re. 2%

R0,4(RT)
#17,3%
R2,3%

RO,RS
5(R1) R4
R5,R4
4%
7

RO
R3
#20,R3
1$
#5%,L0CK
#1.R0
R3
R3 R

000020

021654
000001

001220

000017
021672

021672

5¢:

#17.,6%
R2,6%

6%:
RO,RS

000005

’%:

IN(

JR1

CONTAINS BASE DMC11

JMASTER CLEAR DMC11

ADDRESS

JSTART WITH A 1
sADDRESS 0O

;MOVE ADDRESS TO RZ2

;CLEAR ADDRESS FIELD
<ADD ADDRESS TO INSTRUCTION
JWRITE PATTERN TO PORT4
JNEXT WORD IS INSTRUCTION, ROMCLK PC=5304

JWRITE SP(ADDRESS IN R2)
.CLEAR ADDRESS FIELD OF INSTRUCTION
sADD ADDRESS TO INSTRUCTION
JNEXT WORD IS INSTRUCTION, ROMCLK PC-5304
MOV SP TO BR
cNEXT WORD IS INSTRUCTION, ROMCLK P(C=5304

;MOV BR TO PORTS
JPUT "EXPECTED'' IN RS
JPUT "FOUND'' IN R4

.DATA CORRECT?

:BR IF YES
;DATA ERROR

; SW09-0

. INCREMENT PATTERN
cNEXT ADDRESS

sLAST ADDRESS DONE?
:BR IF NO
sNEW SCOP1

JRESTART PATTERN AT 1
*RESTART AT ADDRESS ZERO
;PUT ADDRESS IN R?

;CLEAR ADDRESS FIELD OF INSTRUCTION
;ADD ADDRESS TO INSTRUCTION
JNEXT WORD IS INSTRUCTION, ROMCLK PC 5304
MGV SP TO BR
JNEXT WORD IS INSTRUCTION, ROM(LK PC=5304
MOV BR TO PORTS

JPUT "EXPECTED'" IN RS

5(R1) R4

JPUT "SOUND'' IN R4
;DATA CORRE(T?
:BR IF YES
. SP_ADDRESSING ERROR

Ry
k3

* INCREMENT PATTERN

RS5,R4

001401

104007
104401
005200

#1,R0
R3

60600

4%:

106414

116104
120504

CLR
MOV
BIC
BIS
MOV
ROMCLK
123100
8IC
BIS
ROMCLK

000005

060600

061225
010005

2%:

3%:

104007
104401

005200
005203
022703
001341
012737
012700
005003
010302
042737
050237

#53,TSTNO
NTSTS54 NEXT
#1$,L0CK

R AN RN

:SW09 12

JNEXT ADDRESS

CZDMC
MACY11 30A(1052)
24~AUG-78
CZDMCC.P11
11-AUG-78 08:21

021722
021726
021730

022703
001352

12:19

PAGE

DMC11

000020

SCRATCH PAD TESTS

CMP

BNE
SCOPE

104400

#20,R3
5%

SEQ 0078

;LAST ADDRESS DONE?

;BR [F NO
;SCOPE THIS TEST

JNNRARRNNARARRRRARNRRANANRARR

JEST

ansnnnnrnnnnnannvranttannnnn

s*INTERRUPT TEST
;*TEST THAT DEVICE CAN INTERRUPT TO VECTOR A
S

021732
021740

012737
012737

021746
021750
021752
021756
021760
021762
021764
021772
022000
022002
022004
022010
022012
022014
022016
022020
022024

000005
005011
004537
022020

022016
340
012737
012761
104414
12111

005037
000240

000054
022026

001226
001216

T1STS4:

034612
340
000340
000200

177776

000004

104400

#TSTSS,NEXT

001200

CLR
JSR
3%
2%
BYTE
MOV

12111
gbg

2%:

HLT
Bk
HLT

10
4%
1

SCOPE

MOV

:R1 CONTAINS BASE
.BUS RESET

(R1)
R5,SETVEC

MOV

ROM(CLK

177776

AN ARANA R R A AN

AR A RN AN A RANA AR

#54
, TSTNO

MOV

340,340
#340,PS
#200,4(R1)

104010

104011

MoV

RESET

000403
012706

IRRARRRANRRARNR AN RN AN AAAN AR RN ARN RN R

JALLOW INTERRUPT

;NO

THAT

TEST

DEVICE

INTERRUPT

JWRONG VECTOR

JRESET STACK
;SCOPE

JNNERRRRACANRAARNI
R AAAneannt

J*TEST

ADDRESS

JCLEAR RUN
JSET UP VECTORS
xx0
I XX4
JLEVEL 7
JPS - LEVEL 7
JWRITE PORT4
JNEXT WORD IS INSTRUCTION, ROM(CLK P(C=5304
JSET BR RQ IN [BRUS* REG 11

#STA(CK,SP

J*INTERRUPT

DMC11

CAN

THIS

[EST

INTERRUPT

TEST

mannnnsnnnnnnvnntnnnennnnen

TO VECTOR B

":'.Q*ittttt*'tttt'ttlifi't"tt'tttt.ttttt.lfi"'..fitl'.tti't'!"t

022026
022034

022042
022044
022050
022052
022054
022056

022064
022072
022074
022076
022102
022104

000055
022120

001226
0012

TSTSS:

177776

MOV
MOV
MSTCLR

034€12
340
000340
000300

TEST

177776

000004

JSR
2%
3%
BYTE

MOV
MOV

ROMCLK

121111

#55,TSTNO
#1S756 NEXT

RS,SETVEC

340,340

#3.0.PS

#3004 (R1)

:R1 CONTAINS BASE DMC11
*MASTER CLEAR DM(11

ADDRESS

“SET UP VECTORS
JXx0
JUXG
SLEVEL 7

PS = LEVEL 7
‘WRITE PORT4
INEXT WORD

SSET BR RQ

INSTRUCTION,

IN IBUS* REG 11

gbg

CALLOW

HLT

;NO [NTERRUPT

INTERRUPT

ROMCLK PC-5304

4098
4099
4100
4101
6102
4103
4104
4105
4106

12:19
PAGE 79
DMC11 INTERRUPT

000403
10401

012706
104400

’%:
38

101200

4%:

BR
HLT
MOV
SCOPE

8
TESTS
4%
1
#STACK ,SP

SEQ 0079
;JWRONG VECTOR

JRESET STACK
;SCOPE THIS TEST

INRRRRNARARRRAR
AN SR ANRRANNNSY

S«PRIORITY

INTERRUPT

TEST

tanaaennnnanranreastrrvtannn

TESTS

;*SET PS TO ALL BR LEVELS EQUAL OR GREATER THAN
;*THE DMC11 LEVEL,VERIFY THAT DMC11 DOES NOT INTERRUPT
::tttttt*ttttfittttttttttttttttttttttfifl'fitflt.tit*ttt!tl.fitfittttt'

D —
D

2L 2P 2 2k 2 £

—

—d

b Dt

s~ AR P ol o

INHNLY (AN ] 207, PR I S
R i g e
VAW N 2O000NN
WY

oo~

_——

ronro

4126

4129
4130
k)
4132
4133
4134
4135
4136
4137
4138
4139
4140
4141
4142
4143
L144

022120
022126

000056
0222640

022134
022136
022142
022146
022152
022154
022156
022160
022162

001226
001216

TSTS6:

BIC

RS,SETVEC

ié3

177776

4%:

000040

104020

% ¥

000002

BYTE
MOV
ROM(CLK
121111

MOV
NOP
cMP
BEQ
SUB

340,340
#200,4 (R1)

RO,R2
1$
#60,R2

SCOPE

HLT

RT]

CONTAINS BASE

ADDRESS

JSHIFT RO 4 TIMES

;s CLEAR UNWANTED BITS
;SET UP VECTORS
;A VECTOR
;B VECTOR
JPRIORITY 7

;LOAD PORT4

INTERRUPT

INSTRUCTION,

;SET BR REQUEST
JPUT LEVEL IN R2 IN PS

ROMCLK PC-5304

;1S PRESENT PS LEVEL - TO DMC LEVEL
;BR IF YES
;NO GET NEXT LOWER LEVEL IN R2
JAND CONTINUE WITH TEST
;SCOPE THIS TEST
JERROR UNEXPECTED INTERRUPT

JNRRRANARANRRANNAARANRARARNE

S«PRIORITY

DMC11

sMASTER CLEAR DM(11
;PUT LEVEL 7 IN R2
;SET PRIORITY 10 7
;GET BR LEVEL OF DMC11

JNEXT WORD

R2.PS

B8R

JR1

;TO GET PROPER LEVEL

#177437,R0

JSR
2%

000004

#340,R2
R2.PS
STAT?,RO

RO
RO
RO
RO

ASR

TESTS

[EST

aantandnananasaanernaatnane

;*SET PS TO ALL BR LEVELS LESS THAN THE DM(C1'
:*VERITY THAT THE DMC11 WILL INTERRUPT

4145
4146

4147
4148
4149
4150
4151
4152
4153

#TSTS7 NEXT

ASR
ASR
ASR

034612

#56,TSTNO

MOV

MOV
MOV
MOV

177437

340
000200

MOV
MSTCLR

000340
177776
001366

022166
022172
022174
022176
022200

TEST

LEVEL

::Qt.tt.ttn.t"'it'ttttt'tt.tt't't'tt..'it‘tfitttttit.'ttt't.tt"

;
022240
022246

012737
012737

022254

104412

000057
022404

001226
001216

1ST57:

TEST 57

MOV

MOV
MSTCLR

#57,TSTNO

#TSTO60,NEXT

JRT (ONTAINS BASE DM(11
JMASTER CLEAR DM(11

ADDRESS

[enX¥ent

CZOMC
MACYT1 30A(1052)
24~AUG-78
CZDMCC.PIN
11-AUG~-78 08:21

6154
6155
6156
6157
G158
4159
4160

022256
022262
022266
022272
022274
022276
022300

012702
010237
013700
006200
006200
006200
006200

6161
4162
6163
4164
4165
4166
6167
4168
6169
43770
6171
4172
6173
4174
6175
6176
6177

022302
022306
022310
0223146
022320
022322
022324
022326
022336
02233
022340
022344
022346
022350
022354
022356
022362

042700
010002
162702
004537
0223266
022374
340
012761
104414
121111
010237
000240
104010
022702
001403
162702
000761

4179
4180
4181
4182
4183
4184
4185

022366
022372
022374
022376
022402

012716
000002
104011
012716
000C02

4178

022364

104400

12:19
PAGE 80
DMC11 INTERRUPT

000340
177776
201366

177437

000040
034612
340
000200

000004

4%:

1/7776

5%:

000140

6%:

000040

1%:

022350

°%:

3%:

022350

MOV
MOV
MOV
ASR
ASR
ASR
ASR
BIC
MOV
SUB
JSR
2%
3%
.BYTE
MOV
ROM(CLK
12111
MOV
NOP
HLT
CMP
BEQ
SUR
BR
SCOPE
MOV
RT]
HLT
MOV
RTI

TESTS

SEQ 0080

#3460 ,R2
R2,PS
STAT1,RO
RO
RO
RO
RO
#177437 ,RO
RO,R2
#4640 ,R2
RS,SETVEC
340,340
#200,4 (R1)

JPUT LEVEL 7 IN R2
;SET PRIORITY TO 7
JGET BR LEVEL OF DMCi1
JSHIFT RO 4 TIMES
;7O GET PROPER LEVEL
;CLEAR UNWANTED BITS

JPUT DMC LEVEL IN R?
JGET NEXT LOWER LEVEL IN R2
;SET UP VECTORS
;A VECTOR
;B VECTOR
JPRIORITY 7
;LOAD PORT4
JNEXT WORD IS INSTRUCTION, ROMCLK PC-5304
;SET BR REQUEST
JPUT LEVEL IN R2 IN PS

R2.,PS

10
#140,R2
1%
#40,R2
4%
#6%, (SP,

JERROR, NO INTERRUPT
oIS IT DOWN TO LEVEL 3 YET?
JYES,DMC DID NOT INTERUPT, ERROR
sPUT NEXT LOWER LEVEL IN R2
JCONTINUE TEST
;SCOPE THIS TEST
JSET UP FOR RT]

1
#6$, (SP)

JERROR, WRONG VECTOR
JSET UP FOR RTI

4186

JRRAENARRAC
R PR AN NS
nn

4187
4188

c*NPR TEST
J*TEST OF DATO,

4190
2;8;

;

4189

4193
6194
4195
4196
4197
4198

64199
4200
4201
4202
4203
4206
4205
6206
4207
4208
4209

022404
022412

012737
012737

022420
022422

000005
005011

022424

022430
022434
022436
022440
022442
(022444
022450
022456
022460
022462
022464

005061

004537
000000
177777
022506
022504
005037
012761
104414
121110
000240
012705

000060
022510

001226
001216

034634

77777

Q00004

AR A AN

XA AN A AN R AR AR R AP AR KRR AR EE R RN

TO 11

MEMORY

R AN R AN RN AN R R AR AR

R AR AR AR

R RR Y

TEST 60

MOV
MOV

(LR

WORD FROM UPROC

RN AR AR R A R R R R P AR KR R R AN R R

RESET
(LR

000004

022504
000021

TST60:

[EST

JSR
0
~1
3%
’%
(LR
MOV
ROM(LK
121110
NOP
MOV

#60,TSTNO
#TST6T NEXT
(R1)
4(R1)

;JR1 CONTAINS BASE DM(C11
;BUS RESET

RS ,NPRSET

;CLEAR RUN
;CLR PORT4
JSET UP IBUS REG 0-7
;IN DATA

°%
#21,6(RD)

.OUT DATA
JIN BA
;0UT BA
;CLEAR 2%
JWRITE PORTS
JNEXT WORD IS
JSET NPR BITS

#-1,R5

ADDRESS

INSTRUCTION, ROMCLK Pr=5304
[N IBUS* REG 11

JPUT "EXPECTED'® IN RS

[ ¥en}

CZOMC
MACY11 30A(1052)
24-AUG-78
C20MCC.P1T
11-AUG-78 (8:21

4210
(211
4212

4213
4214
4215
4216
4217
4218
4219
4220

022470
022474
022476
022500
022502
022504
02250¢

013704
020504
001401

022504

MOV
rMP
BtQ

104012
104400

000000
000000

2%:
3%

HLT
SCOPE

12:19
©AGE 81
DM(C11 NPR TESTS

SEQ 0081
2%, R4
RS,R4
4%
12

;PUT "FOUND'' IN R4
;DATA CORRECT?
;BR IF YES
JERROR NPR FAILED
.SCOPE THIS TEST

0
0

;0UT BA
JIN BA

SRNRRARNRRANARANN
N RN RwehAnt

J*NPR TEST
J*TEST OF DAT],
IR

022510
022516

012737
012737

022524

104412

005061
004537

000000
177777
022622
022620
012737
012761
104414
121110
000240
012705
104414

000061

0¢2624

001226
001216

~ST61:

022620
022622

MOV
MOV

WORD FROM 1
R AR A RN

#61,TSTNO
#TST62 NEXT

JSR
0

000001

4(R1)

RS ,NPRSE T

ROMCLK

MOV
ROM(LK

;0UT BA

#-1,3%
#1,4(RT)

;PUT DATA [N 3%
JWRITE PORT4
JNEXT WORD

#-1,R5

021025
(MP

HLT

SCOPE
0
0

ROMCLK

sMOVE

JPUT

cBR

022624
02263¢

012737
012737

022640

106612

000062
022726

001226
0Ci2le

1STéc:

;

TEST 62

MOV
MOv
MCTECR

S N R

A R A R

IN DATA LOW BYTE
IS

TO PORT4

INSTRUCTION,

IN DATA HIGH BYTE TO PORTS

P(C=5304

"FOUND'' IN R4

;DATA CORRE(CT?

c*NPR TEST
;«TEST OF DATORB,

REG

JNEXT WORD

YES

JERROR NPR

;SCOPE THIS
cOUT BA
.IN BA

JYTNRNRR AR RARRN AR AR R AR RRRRAN

4257
4258
4259
4260
4261
4262
4263
4264
4265

ROMCLK P(=5304

IBUS*

ROMCLK PC-5304

4(R1),R4

R5,R4

BEQ

INSTRUCTION,

JPUT "EXPECTED''
IN RS
JNEXT WORD IS INSTRUCTION,

;MOVE

ROMCLK
MOV

;SET NPR BITS

021004

6%
2%:
3¢

CONTAINS BASE DM(11 ADDRESS

JSET UP IBLS REG 0-7
. IN DATA

L5;110

000004

R AR R

.0UT DATA

MOv
MOv

177777

TO UPROC

JIN BA

022622
000004

MEMORY

JMASTER CLEAR DM(11
.CLR PORT4

-1

177777

annananaatnneranstrnantannsn

AR RN A AR R AR AN A AN RNARNRR AR NARANNRNA

JR1

021004

104414
021025
016104
020504
001401
104012
104400
000000
000000

R AR AR

TEST 61

MST(LR
CLR

000004
034634

[EST

BYTE
A NN R

#62,1STNO
#TSTE3 NEXT

TEST

FROM UPROC
AR

JR1

FA]JLED

TEST

ARNRRA RN AR NN NN RNANNRNRERARNNNR

MEMORY

P RN A NN RN N AR

CONTAINS BASE

JMASTER

CLEAR

RN RN N R

NDM(11

DM(T1

ADDRESS

AR AR RN

CZ0MC
MACY11 30A(1052)
24-AUG-78
czZomcc P11
11-AUG-78 08:21

104414
121110

000240
012705
013704
020504
001401
022722
022724

CLR
JSR
0

SEQ 0082
4(R1)
RS ,NPRSET

=1
3%

022722
000221

2%+1
CLR

000004

MOv

ROMCLK

;0UT BA

#221,4(R1)

;8;110
177400

022722

#177400,R5
2% ,R4

BEQ

«%:

000000
000000

2%:
3%:

R5,R4

HLT

SCOPE

;OUT DATA
;IN BA

;CLEAR 2%

;WRITE PORT4
JNEXT WORD

INSTRUCTION,

;SET NPR BITS

MOV
MOV

(MP

sCLR PORT4
;SET UP IBUS REu 0-7
. IN DATA

IN [BUS* REG

YES

;SCOPE

THIS

TEST

€7

snnannanatantsanananrntenns

;*D0 A DATO TO AN ADDRESS USING OUT BA BITS

;*VERIFY CORRECT RESULTS

022726
022734

022742
022744
022752
022760
022764
022766
022770
022772
022774

000063

023064

001412
001412
034634

00122¢

061216

TST62:

000021

121110

003000
000400
121110

TEST 63

MOV

MSTCLR

02277¢
022770

MOV
MOV
JSR

0
ot

000014

;

000u04
00000«
N2000¢

ROM(CLK
12111

#TST64 NEXT
DMPD4 ,1$
DMP04, 2%

RS ,NPRSET

023056

000004

ADDRESS

SEL4 FOR ADDRESS
SEL4 FOR ADDRESS
;LOAD BA AND DATA

. IN DATA

#16,4(RY)

;0UT BA

;LOAD SEL 4 WITH QUT BA16 AND 17

JNEXT WORD

#121110,6(R1)
#1.11°0,R5

INSTRUCTION,

;SET OUTBA 16 AND

:LOAD SEL4

JWAIT

FOR NPR

JNEXT

WORD

INSTRUCTION,

ROMCLK

P(-5304

SNEXT WORD

INSTRUCTION,

ROMCLK

PC=5304

;PUT "EXPECTED'' IN RS

021065

JMOVE OUT DATA HB TO SELS

BEG

5304

AND (ROMO..

JMOVE OUT DATA LB 10 SEL4
LR
SPPLT

ROMCLK PC

IPUT INSTRUCTION IN SEL6

021044

MOv
rMP

;USE
JUSE

M3IT9!B1T10,(R1);SET CROM]
#3178, (R1)
JCLOCK IT!

NOP

;OUT DATA
;IN BA

ROMCLK

20504

;R1 CONTAINS BASE DMC11
;JMASTER CLEAR DM(11

MOV
RIS

MOV

#63,TSTNO

#21 4 (R1)

MOV

16 AND

MOV

ROM(LK

125252
0

MOV

5304

TEST

;*TEST OF EA BITS 16 AND 17
A

;DATA CORRECT?

JBR IF

;0UT B8A
;IN BA

;JERROR NPR FAILED

0
0

ROMCLK

JPUT "EXPECTED'' IN RS
;PUT "FOUND'' IN R4

Junrnnnnnnnnnrnwwnennnnnkwnt

4308
4309
4310
4311
4312

4313
4314
4315
4316
4317
4318
4319
4320
4321

PAGE

DMC11 NPR TESTS

000004
034634

106012
104400

4306
4307

177777
022724
022723
005037
012761

—

4305

005061
004537
000000

4304

022642
022646
022652
022654
022656
022660

\n_a—a_af\_,og
RS ASIASLASTANE
R 3\ V]

4266

4267
4268
4269
4270
4271
4272
4273
4274
4275
4276
4277
4278
4279
4280
4281
4082
4283
4284
4285
(286
4087
4288
4289
4290
4291
4292
4293
4294
4295
4296
4297
4098
4299
4300
4301
4302
4303

12:19

JPUT "FOUND'' IN Ré
J(ORRECT RESULTS ?

JBROIFYES

[ Xen}

CZDMC
MACY11 30A(1052)
24=-AUG-78
CZDMCC.P1
11-AUG-78 08:21

4322
(323
4324

023060
023062

12:19
PAGE 83
DMC11 NPR TESTS

104012

"04400

3%:

HLT

SCOPE

7
SEQ 0083

JERROR BA 16 AND 17 FAILED

2SCOPE THIS TEST

4325

4326
4327
(328
4329
4330
4331
(332
4333
4334

4335
$336
(337
4338
4339
4340
4341
4342
4343
4344
4345
4346
4347
4348
4349
4350
4351
4352
4353
4354
4355
4356
4357
4358

{359
4360
4361
4362
4362
4,364
4365

JENNRANRNNNRRAARRNRRNRRRRRNR

a a A AR

AN R A AR

N AR AR

;*TEST OF EA BITS 16 AND 17
.*DO A DATI USING IN BA BITS 16 AND 17
J*VERIFY CORRECT RESULTS

.':tti*t*.tt'.'tl't'ttfit*i'i.tttt*fit**'tt*tttittttttt'ttittfifltttt

023064
023072

023100
023102
023110
023116
023122
023124
023126
023130
023132
023140
023146
023152
023156
023160
023164
023166
023170
023172
023174
023200
023202
023204
C23206

200064
023210

001412
001412
034634

001226
001216

TST64:

121110

003000
000400

MOV

#64,TSTNO

#TSTES NEXT

MSTCLR
MOV

023130
023126

MOV
JSR

2%:

000015

TEST 64

MOV

006004
000006

1%:

DMPU4 , 2%
RS _NPRSET

#15,4(R1)
#121110,6(R1)

BIS

#RIT18,(R1)

#121110,RS

021004

104400

3%:

:IN DATA
;0uT BA

JLOAD SELS
JPUT INSTRUCTION IN SEL6

021025
MOV

4L(R®) ,R4

BEQ

k3 3

HLT
SCOPE

CROM]

JCLOCK IT!

AND CROMO.
.

JWAIT FOR NPR
JPUT "EXPECTED'' IN RS

JNEXT WORD

INSTRUCTION, ROM(CLK PC=5304

JNEXT WORD

INSTRUCTION,

;MOVE IN DATA LB 70 SEL4

ROMCLK

(MP

:MOVE IN DATA HB TO SELS
JPUT "FOUND'' IN R4

RS ,R4

JCORRECT RESULTS

JERROR BA 16 AND 17 FAILED
JSCOPE THIS TEST

;BR IF YES

JenrnaRwnknnnnnkenrnnnnnnrann

JEST

J*NPR NON=EXISTENT MEMORY TEST
:*DO A DATO TO A NON-EXISTENT ADDRESS

J*VERIFY

ADDRESS

JUSE SEL4 FOR ADDRESS
;LOAD BA AND DATA

#BITO'BIT10,(R1);SET

ROM(C LK

000004

JR1T CONTAINS BASE DM(C11
<MASTER CLEAR DM(C1?
;USE SELS4 FOR ADDRESS

;OUT DATA
;IN BA

MOV
MOV
NOP
MOV

121116

OMP04,1%

125252
0

MOV

4366

L3667
4368
L3695
4370
L371
L3722
4373
4374
4375
4376
w377

JEST

THAT

THE NON-EXISTENT BIT

ROMCLK PC

S304

sanneencannannnnannnstennne

SET

IN [BUS REG

.':t'tt't.t't.lt't"'.t.tfi'fitfit.'it.t'ttt'tt!i..'ttt.tl""".tt'

;
023210
023216

023224
023226
023232
023234
023236

000065
023320

034634

001226
001276

TSTES:

TEST 65

MOV

MSTCLR

JSR
0
0

172285(

#65,TSTND

#TST66 NEXT

RS NPRSET

;K* CONTAINS BASE DMC11 ADDRESS
JMASTER CLEAR DM(11

JLOAD [BUS REGISTERS Q-7
;s IN DATA
:0UT DATA

;N BA

CZ0MC
MACY11 30A(1052)
24=-AUG-78
c20MCC PN
11-AUG-78 08:21

4378
4373
4380
4381

023240
023242
023250
023252

4382

0232564

4386

023270

4383
64384
4385

4387
4388
4389

4390

4391
4392
4393

2%3?

177320
012761
104414
121111

012761

(023262
023264
023266

104414
121110
000240

023272
023274
023300

121225
012705
116104

023304

023310
023312
023314

023316

12:19
PAGE 84
DM(C11 NPR TESTS

000014

000004

000021

000004

177320
MOV
ROM(LK
121111

MOV

ROM(CLK
121110
NOP

104414

042704

020504
001401
104012

SEQ 0084
#14,4(R1)

#21,4(R1)

ROM(CLK

121225
MOV
MOVR

0C0CC:
000005

17777¢

BIC

1044GC

(MP
BEQ
HLT

SCOPE

;0UT BA
JSET OUT BA BITS 16+17 IN PORT4
JNEXT WORD IS INSTRUCTION, ROMCLK PC
JSET OUTBA 16 AND 17

;SET NPR REQUEST BITS [N PORT4
JNEXT WORD IS INSTRUCTION,
;JMOV [BUS* 4 TO |BUS+ 10

ROMCLK PC

5204

JNEXT WORD

ROMCLK P(C

5304

INSTRUCTION,

#1,RS
5(R1) ,R4

JMOV [BUS*11 TO [BRUS*5
JPUT "EXPECTED''
IN RS
JPUT "FOUND'' IN R4

RS ,R4
1%
12

;DATA CORRE(T"?
JBR IF YES
JERROR NON-EXISTENT MEM BIT

#177776,Rb

5304

:CLEAR UNWANTED BITS

JSCOPE

THIS TEST

FAILED

TO SET

4396
4397

SRR NRRRNRRRARRARRRNRRANNAN

4399

;*DO A DAT]

4401
4602
4403
4‘00«
4605
4406
4407
4408
4409
4410

":."*fi'."'fi"""'.fi..‘...Q"‘Qi'...'.'..'i'lQQ...'.."...".'

023320
023326

012737
012737

023334
(023336
023342

104412
004537
000000

412

023346

177320

4398

L4600

4611

4413
4614
4415
616
4417
4618
46419
420
4621
622

662%
4626

4625

6626
4627
L6428

22%8

JECST 6

J*NPR NON-EXISTENT MEMORY TEST

FROM A NON-EX]STENT ADLCRESS

J*VERIFY THAT

023344

023350
023352
(023356
023360
023362
023370
(023372
023374
023376
02300

0234602
023406

023412

023416
02320
023%272

0234624

000066
0234c6

00°226
0C216

T5T66:

000000

177320
005061
104414
121111
012761
104414
121110
000240
104414
121225

012705
116104

042704

020504
001401
104017

104400

JR1

RS ,NPRSE T

177320
(LR
ROMCLK
121111
MOV
ROMCLK
121110
NOP
ROM(CLK

00000«
000015

000C04

121225

000001
000005

17777¢

LR
#15,4(R?

DM(11

ADDRESS

;OUT BA
JNEXT WORD ]S INSTRUCTION, ROMCLK PC
JCLEAR NON-EXISTENT BIT
JSET NPR REQUEST BITS [N PORT4
JNEXT WORD

JMOV [BUS* 4

#1,RS
5(R1 R&

€,
BFQ
HLT

RS ,R4
I} 3
12

STOFE

CONTAINS BASE

JMASTER CLEAR DM( 11
.LOAD [BUS REGISTERS 0=/
;JIN DATA

. IN BA

MOV
MOVR

8IC

‘%

IN IRUS REG 11

;OUT DATA

177320

8177756 ,R6

4(,32

Jevterens

“".72

;'NF“‘

THE NON-EX]STENT BIT SET

.
TEST 66
P it
et
MOV
#66,TSTNC
MOV
HTST6? NEXT

MSTCLR
JSR
0

03463

soannnanrnnnennnnesnannranne

'E‘,'

INSTRUCTION,

T0O IBUS*

JNEXT WORD IS INSTRUCTION,
JMOV [BUS*11 TO IBUS*S

S304

ROM(LK P(=5304

ROM(Lk

5304

JPUT “EXPECTED'' IN RS
JPUT "FOUND'' IN R4

SCLEAR UNWANTED BITS

;DATA CORRECT?
;BR [F YES
JERROR NON=EX]STENT

JSCOPE THIS TEST

coennssavrercecenne

TEQT

MEM KT

k4]
[

¢7

esseenserrrnenrneratransene

COMC
MACY'T 30A(1052)
24-AUG-78
C20MCC.P1T
11-AUG=-78 08:21

12:19

PAGE 85

DMC11

63
4435

s *FROM M]ICRO-PROCESSOR

02342¢
023434
023442

4444
4445
G446
4447
6448
4449

023450
023452
023456

4450
4451
4452
4453
4454
4455

4456
4457
4458
4459
4460
L4661
4462

4463

L4664

4465
4466

L4667

L4668
4L4L69
4470
4471

4472
4473
4474
4475
64476
4477
4478
6479
4480
4481
4482

4483
AN .72

ALL

(0-377 )

AVAILABLE

MEMORY

":.Qtfififi'it'ttt"fi'tttittfi'fitttttfltttl.tttttttfittt.tt't."'t.ttt

4440
L4641
6662

4443

SEQ 0085

J*JSING DATO, NPR A BINARY (OUNT

636

4637
4438
4439

NPR TESTS

023460
023464
023464
023470
023474

023500
023502
023506
023512
023514
023516
023520
023522
023524
023532
023534
023536
023540
0235¢2
023544
023546
023550
023552
023554
023556
023562
023566
023570
023572
023574
023576
023602
023604
023610
023616
023620
023622

0127%7

0127%2

012737

104647
¢

005037
005000
012702

010037
010237
032702
001402
000337

000067
Q00003
023624

001226
001222
001216

T1ST67:

MOV
MOV
MOV
MSTCLR

023¢2¢
C36534

023574

023520
000001

Re ¥

49
I 0OM04

#67 ,TSTNO
#3,1COUNT
#TST70,NEXT

MOy
MOV
817

RO,2S
2,49
#M]T0,R2

;LOAD DATA
;L0AD BA
;1S BA 0ODD?

SWAR
JSR

2%
RS ,NPRSET

J1F ODD PUT DATA [N HI-RYTE
JLOAD NPR REGISTERS

0
0
0

0
(LRR
MOV
NOP

Ltk

036534

177777

. IN BA

R2)
#2c1,6(RY)

.0UT BA
JCLEAR MEMORY LOCATION

JLOAD PORT4
JNEXT

WORD

;D0 THE NPR

INSTRUCTION,

ROMCLK P(-5304

JPUT "EXPECTED'' IN RS
JPUT "FOUND'' IN Ré
;1S DATA CORREC(CT?
;JBR If YES

RS,R4

HLT

SCOP’
INC

;ERROR,

JNEXT

TST
BEQ
sy
BEQ
INC

5%
[}
RC
7%
R¢

JHAS MAX MEMORY BEEN REA(CHED

(RS).R&

#177400,RC

DATA

INCORRE(T

CHARA(CTER

JUSE ONLY LOW BYTE

JBR IF NO
;DONE PATTERN?
JBR

JINC BA

YET?

YES

(mMP

MEML IM_R?

cREACHED MEMORY ( [M]T

MCV
MOV

#(ORMAX
, R,
r=-1,5%

JRESTART BA AT FIRST ADDRFSS
JSET FLAG TO END TEST AT END OF
;JCONT INUE
:SCOPE THIS TEST

8NE

Le362¢

JIN DATA

;0UT DATA

(MPS

8IC

001304

JBR IF NO

RO,RS

8tQ

A ¥

JSTART FLAG AT 0
;DATA

MOV

MOVB

023622

ADDRESS

;ADDRESS

121110

1774GC

(ONTAINS BASE DMC11

JMASTER CLEAR DM( 11

5%
RO
#CORMAX ,R?

ROM( _k

’¢:

JR1T

CLR
(LR
MOV

BEG

023514
034€7%4

000221

TEST

BR 1§
SCOPE

;BR

]F NOT

YET?

sTHIS LOCATION IS A FLAG,

DATA PATTERN

STARTS AT 0,

JAND S SET TQO =1 WHEN LAST MEMORY ADDRESS

L4LBS
4486

J1S USED,

TEST

THEN ENDED WHEN PATTERN IS FINISHED

WLB7

4LB8
448y

;evacnser

cevsrevrecncncvnned

TeMAIN MEMORY TE T

TEQT

senvenncnnnverssernnannnnny

(e P

CZ0M(
MACY11 30A(°052)
24=AUG-78
11-AUG-78 08:21
czomcc.p1?

SEQ 0086

THROUGH ALL

MAIN MEMORY LOCATIONS

::ttt.tQ‘fifitttt'tti'.ttttfittt.Qfi.'it'tt'fi..fiitt'.'.tttt.."t...'

;

1064412

——

023646
023650

noNy

737

023624
023632
023€40

4504
4505
4506

737

2737

005002
012700
042737
050237
104414

010000
010061

023702
023704
023706
023710
023712
023714
023716
023722
023724
023726
023730
023732
023734
023736
023740
023742
023746
023750

10444

000070
023752
023656

000001
000377
023672

001226
001216
001220

023677

TST70:

65% :
AES:

(00004

TEST 70

MOV

#70.TSTNO

MOV

#65%,.0CK

MOV

#TST77

MSTCLR
[\ .

MOV

R2
#1 RO

BIS

R2,66%

BIC

#377.66%

ROM(LK

0*0009
MOV
ROMCLK

R0.4(R1)

122500
104414
040620
104414

ROM(LK

116104
120504

MOV
MOVR
(MPR

RG,RS
S{R1),R4
RS,R&4

HLT
SCOP1
(€
ROLR

061225
010005

122500

ROM(CLK

0460620

61225

0000,
<

007401

B8EQ

104013
104601

3} ’S:

000c41

106100

001347
005202
022702
001341

BNE
INC
CMP
BNE

00040C

104400

SCOPE

67%

65%
R2
8600 ,R2
1%

;R1 CONTAINS BASE DM(C11 ADDRESS
JMASTER CLEAR DM(C11

;START WITH ADDRESS O
JSTART WITH BIT O

;CLEAR ADDRESS FIELD OF INSTRUCTION
;ADD ADDRESS TO INSTRUCTION
JNEXT WORD IS INSTRUCTION, ROMCLK P(C-5304
;LOAD MAR W]TH ADDRESS IN R?2
WRITE

JNEXT
IMOVE
JNEXT
;MOVE
JNEXT
.MOVE

PATTERN IN PORT4

WORD IS INSTRUCTION, ROMCLK PC-5304
PORT4 TO MEMORY
WORD IS INSTRUCTION, ROMCLK PC-5304
MEMORY T0O BR
WORD IS INSTRUCTION, ROMCLK P(C=5304
BR TO PORTS

JPUT “EXPECTED'' IN RS

JPUT “FOUND'' IN R4
sDATA CORRE(CT?
;BR IF YES

;DATA ERROR

:SW09=1?
s CLEAR (ARRY
JSHIFT BIT IN RO
JDONE IF RO=0
JNEXT ADDRESS
;LAST ADDRESS
;BR [r NO

;SCOPE

Jrrnnennnnnananrrerennennnnn

THIS TEST

TEST

annnnvnnrsvenannennvnnnnnne

c*MAIN MEMORY TEST

;*FLOAT A O THROUGH ALL MAIN MEMORY LOCATIONS

;:..".".".'.."."..'.'..'t"tt'tl..Q‘.'."t'tt'ttt.'t...‘...

NN
RN

EONZNZ &

000071
026104
024006

1ST71:

TEST

000377

024022

0cele’l

$:
Loy
tS$:

Moy

#71,TSTNO

MOV

#65%,10CK

MOV

MSTCLR

000001
&N

02402(

NNN

LA LN
1\ ¥ ]

023774
023776
024000
024004
024006
024014

parPurinrd

023752
023760
023766

QOO

;

SIARB2S R

4507
4508
4509
4510
4511
4512
4513
4514
4515
4516
4517
4518
4519
4520
4521
4522
4523
4524
4525
4526
4527
4528
4529
453
4531
4532
4533
45%
4535
4536
453%7
4538
4539
4540
4541
4542
45473
4544
o545

PAGE 86

DMC11 MAIN MEMORY TESTS
;*FLOAT

4490
L4
4492
4493
4494
4495
4496
4497
4498
4499
4500
4501
4502
4503

12:19

(LR

MOV
(oM
BI¢
BIS

ROM(
, K

#15872 NEXT
R?

#1,R0
RO
4377 ,66%
k. .66%

;R1 CONTAINS BASE DMC11 ADDRESS
:MASTER CLEAR DM(11

JSTART WITH ADDRESS O

:START WITH BIT 0
*CHANGE

TO FLOATING O
:CLEAR ADDRESS FIELD OF

;ADD ADDRESS TO [NSTRUCTION

INSTRUCT]ON

SNEXT WORD IS INSTRUCTION, WOM(LK P

S374

CZ0MC
MACY11 30A(1052)
24-AUG-78
11-AUG-78 08:21
c2oMmCc P

CZDMC
MACY11 30A(1052)
24-AUG-78
czomcc.P1
11-AuG-78 08:21

4599
«600
4601

RO,4(RY)

104013
104401

+7%:

005100
000241

1061GC0

(P8
8EQ
HLT

[N PORT4

INSTRUCTION,

ROMCLK P(=5304

;DATA CORRECT?

JBR IF YES

>COP1

.DATA ERROR
. Sw09=1?

ROLB

.CLEAR CARRY
JSHIFT BIT IN RO

.LAST ADDRESS

JCHANGE TO FLOATING 1

COM
cLC

JDONE IF RO=0
JNEXT ADDRESS

JBR IF NO

BNE
SCOPE

104400

PATTERN

JNEXT WORD ]S INSTRUCTION, ROMCLK PC-5304
JMOVE BR TO PORTS
JPUT "EXPECTED’' IN RS
JPUT "FOUND'' IN R4

BNE
INC

000400

JWRITE

<MOVE MEMORY T0 BR

MOV
MOVA

JLOAD MAR WITMH ADDRESS IN R?

JNEXT WORD

61225

Jiw 4,

SEQ 0087

SNEXT WORD IS INSTRUCTION, ROMCLK PC 5304
;MOVE PORT4 TO MEMORY

ROMCLK

001601

001345
005202
022702
001337

010000

MOV
ROMC LK

040620

;SLOPE

JENERARNERNRRRARRRYRRRRRRRA
ey

;*MAIN MEMORY DUAL

THIS TEST

TESQT

ARNANRN AR NNNARRANRNRACRRI
R

ADDRESSING TESI

;*LUAD EACH MEMORY LOCATION WITH

[TMS OWN ADDRESS

:*READ BACK EA(M LOCATION TO VERIFY CORRECT ADDRESSING

":Q'."...l..""'.'tfiQ..ttt't..t"'.‘t"t.t....Qh.t.l..t..t.t'.

024104
024112
024120

#72,T1STNO
#TCT7T NEXT

024304
024132

#1%,L0(x

MST(CLR

0246146

LR
BIC
BIS

000004

MOV

000377

;CLEAR ADDRESS FIELD OF INSTRUCTION
JADD ADDRESS TO INSTRUCTION
SNEXT WORD IS INSTRUCTION, ROMCLK P(=5304
.. 0AD MAR

010000

ROM{ LK

JNEXT
;MOVE
JNEXT
;MOVE
LNEXT

122500

ROM( LK

04062C

QCulr

JR® (ONTAINS BASE DM(C11 ADDRESS
11
JMASTFR CLEAR DM(
JSTART AT ADDRESS 0O

ROM( LK

0246126
C24130
024132
0246140
024144
024146
024150
024154
024156
02«160
024162
024164
026166
024170
024172
024176
0246200
0246202
024204
(0246206

000072

4596
4597
4598

116104
120504

MAIN MEMORY TESTS

122500
ROMCLK

4580
4581
4582
(583
4584
4,585
4586
4587
4588
4,589
4590
4591
(592
4,593
45946
4595

061225
010005

4579

€6%:

1064414

4578

000004

PAGE

DMC11

12250C
10464614
060620

4576
4577

1064414

(562
(563
4564
(565
4566
4567
4568
4569
4570
4571
4572
4573
4574
4575

010000
010061

’ut%btflfi-‘NflVf:Safi~h
PRIV

4561

024022
024024
024030
024032
024034
024036
0240490
024042
024044
024046
024052
024054
024056
024060
024062
024064
024066
024070
024072
024074
024100
024102

NP
NFSESE

6546
4547
4548
(549
4550
4551
4552
4553
4554
4555
4556
4557
4558
4559
560

12:19

€12,
MOy
MOVR

S
RS,

BEC

b31

WORD IS INSTRUCTION, ROM(LK P(=530¢4
PORT4& TO MEMORY
WORD [S INSTRUCTION, ROM(CLK P(C-5304
MEMORY TO THE BR
WORD [S INSTRUCTION, ROM(LK P( 5304

_MPR

Y
FE KRG

LPUT "EXPECTED'® IN RS
JPUT "FOUND'' [N R4
;DATA (CORRE(T?
JBR IF YES
;DATA ERROK

JNEXT

7
;ow09.

ADDRE¢

CZDMC
MACY11 30A(1052)
24-AUG-78
11-AUG-7 8 08:21
czomcc.P1
4602
4603
4604
4605
4606
4607
4608
4609
4610
4611
4612

4613

4614

4615
4616
4617
4618
4619
4620
4621
4622
4623
4624

4625
4626
4627
4628
4629
4630
4631
4632
4633
4634
4635

4637
4638
4639

4640
4641
4642
4643
“644
4645
4646

4647
4648
4649
4650
4651
4652
4653
4654
4655
4656
4657

026210
024214
024216
024224
024226
024234
024240
024242
024244
024246
024250
024252
024254
024256
0264262
024264
024266
024270
024272
024274
024300
024302

022702
001346
01273%7
005002
042737
050237
106614

12:19

PAGE 88

DMC11 MAIN MEMORY TESTS

000400
026226

001220

#400,R2
1%
#4%,L0CK

Q0v377
0242042

024242

#377.5%

010000

SEQ 0088
JLAST ADDRESS

:BR IF NO
;NEW SCOPE 1
JRESTART AT ADDRESS 0

;CLEAR ADDRESS FIELD OF INSTRUCTION
;ADD ADDRESS TO INSTRUCTION
JNEXT WORD IS INSTRUCTION, ROMCLK P(C=5304
:LOAD THE MAR
JNEXT WORD IS INSTRUCTION, ROMCLK P(C-5304
JMOVE MEMORY TO THE BR
JNEXT WORD IS INSTRUCTION, ROMCLK P(C=5304
;MOV BR TO PORTS

R2,5%

5%:

104414

040620
10644

061225
010205
116104
120504

JPUT "EXPECTED'' IN RS
JPUT "FOUND'' IN R4

Q0000
¢

;DATA CORRECT?
;BR IF YES
;ADORESSING ERROR
;SW09=1?

001401

104013
104401

005202
022702
001352

t$:

JNEXT ADDRESS

000400

SIS IT THE LAST
:BR IF NO
;SCOPE THIS TEST

104400

Juneennnnennrnnernnnnnvnnntnan

TEST

awsnnnnannnansanarnsnnnnnnn

J*MAR TEST
;*PERFORM DUAL ADDRESSING TEST
:*USING MAR AUTO-INC FEATURE
M AR R NN R AR AN AN T

024304
024312

024320
024322
024324
024326
024330
02433%6
024340
024342
024 344
024350
024352
024354

000073

02444C

001226

GO 216

UNFER

#73,1STNO
#1ST74 NEXT
MSTCLR

(LR

ROMCL
K

100000

010000

001366

BIT
BEQ

ROM(L
K

000004

1¢%:

RN AN NN

4000
MOV

RZ
#MIT15,STATT

R2,4(RT)

ROM(CL
K

“36500

INC
(mP
BNE
(LR

000400

ROMCLK

100000

001366

010000

BIT
BEQ

ROM(L
K

4000

R2
#400,R2

JR1

RN T A NN RN AN ANANAN AR

RRANNAT

CONTAINS BASE

ADDRESS

DM(C11

JMASTER CLEAR DM(C11

AR ANNNNY

JSTART WITH A ZERO

JNEXT WORD IS INSTRUCTION, ROMCLK P(=5304
JLOAD MAR
;DM(?

JBR IF YES
JNEXT WORD IS INSTRUCTION,
TMAR HI _ 0 (KMC ONLY)

ROMCLK PC

JNEXT WORD

ROMCLK

JWRITE DATA TO PORT4
IS

INSTRUCTION,

:LGAD MEM AUTO-INC MAR
s INCREMENT DATA

5304

PC-5304

DONE YET?
BR IF NO

TRESTART WITH A ZERO

MITIS5,qTAT
.*6

:LOAD MAR
:DM(?
JBR IF YES

INEXT WORD

INSTRUCTION,

JNEXT WORD [S INSTRUCTION,
<MAR H] _ 0 (kMC ONLY)

ROMCLK PC=5304

ROM(Lk Pr

S3(4

CZ0OMC

MACY11

cZoMmcc.P1
4658
4659
4660
4661
4662
4663

024406
026406
024410
026412
024414
0246420

G665

024424

4664

L4666
4667
G668
4669
4670
4671

30A(1052)

24-AUG-78

11-AUG~78 08:21
104414
055224
010205
016104
120504

024422

001601

024426
0264430
024434
0264436

005202
022702
001364
104400

12:19

PAGE 89

DMC11 MAIN MEMORY TESTS
2%:

000004

ROMCLK
055224
MOV
MCV
CMPB

3%:

20C400

SEQ 0089
JNEXT WORD IS INSTRUCTION, ROMCLK P(=5304
JMOVE MEM TO PORT4
;PUT "EXPECTED"' IN RS
;PUT "FOUND''
IN R4
;DATA CORRECT?

R2,RS
4(R1) R4
RS,.R4
3%
14
R2
#400,R2
2%

BEQ

104014

HLT

INC
(MP
BNE
SCOPE

JBR IF

JNEXT ADDRESS
JDONE YET?
JBR IF NO
;SCOPE THIS TEST

L6672

JENNNNRARARRRA
NN ARk hhkank

4673

J*ALU C BIT TEST

L675

S IR

4674

4676
4677
4678
L4679
4680
4681
4682
4683
G684
4685
4686
4687

4688

4689
4690
4691
4692
4693
4694
4695
“6%
4697
4698
4699
4700

4701

4702

4703
4704
4705
4706
4707

4708
4709
4710

47211
4712
713

s*TEST

024440
024446
024454

012737
012737
012737

024462
024464
024470
024472
(024476

104412
004737
026542
004737
024542

024500
024502
024504
024506
024510
024512
(24514
024516
024520
024524
024530

104414
010000
104414
(564400
104414
040621
104414
061224
012705
016104
20504

(024500

024532

024534

024536

024540
024542
024545
024550

_
000074
024552
024500

001226
001216
001220

T1ST74:

034676

036732

1%:

000001
000004

001401

104401

106400
377
000
000

2%:
009
000
000

000
000

TDATA:

RN RN AN R AN

MST(LR
JSR
TDATA
JSR
TDATA

TEST

377 AND

AXARANRRARAAANRNARNANAR
SR A AR

377 WILL

R RN R AR AR AN RN AN

;
TEST 74
Rttty
MoV
#74 ,TSTNO
MOV
#TST7S NEXT
MOV
#18,L0CK
PC ,MEMLD

PC,SPLD

SET

THE

C BIT

A RN AR RN AR RN AR R RNNCR R

;LOAD MAINMEM DATA
JPOINTER TO DATA
;LOAD SP DATA
;POINTER TG DATA

JMAR O
;NEXT WORD IS INSTRUCTION,
JADD 377 AND 277, 10 SET C
JNEXT WORD IS INSTRUCTION,
JADD O AND O AND THE (C BIT
JNEXT WORD IS INSTRUCTION,
sPUT RESULTS IN PORT4
JPUT "EXPECTED'" IN RS
JPUT "FOUND'' IN R4
.DATA CORRECT?

HLT

¢cERROR C BIT NOT SET

’%

SCOP1

SCOPE
_.BY'E

JNEXT WORD

JBR

;SCOPE

INSTRUCTION, ROMCLK PC-5304

ROMCLK PC-5304
BIT
ROMCLK PC 5304
ROM(CLK P(C=530¢4

YES

;Sw09=1?

-1,0,0,0,0,0,0,0

RNAE

JR1T CONTAINS BASE DM(11 ADDRESS
JMASTER CLEAR DM(11

ROM(LK
010000
ROMCLK
054400.<0+20>
ROMCLK
0460401 .<1220.
ROM(CLK
61224
MOV
#1,R5S
MOV
4(R1) R4
(MPS
RS ,R4

BEQ

104015

THAT AN ADD OF

AN AR

YES

;MAR ERROR

THIS

TEST

LEVEN
Jeevevnnnnrensvanreesnnnnnne

JEST

eonnvnsnnenctnennnnnonenany

S *ALU TEST
J*TEST OF LU FUNCTION SEL B WwITH C BIT (LEARED
S*ALU FUNCTION (B)
(ope M

CZDMC
MACY1T 30A(1052)
24-AUG-78
CZDMCC.P1
11-AUG-78 08:21

12:19
PAGE 90
DMC11 ALU TESTS

714
4715

;*LOAD MAIN MEM AND SP WITH 8 WORDS OF DATA
s*PERFORM THE FUNCTION, VERIFY THE RESULTS

4716

7217
4;}3

;

4720
4721

Q24552
0246560

4723
47264

026566

012737

Q24574

104412

4722

4725
4726
4727
4728

4729
4730
4731
4732
4733
4734
4735
4736
4737
4738
4739
4740
47641
4742
4743
47644
4745

472646
4747
4748
4749
4750
4751
4752

4753

4756
4755
4756
4757
4758

SEQ 0090

012737
012737

024576
024600
024604
024610
024612
024616
024620
024624

005000
012702
004737
035022
004737
035032
004737
042737

024636
024640

104414
010000
042737
050037
104414
040620
104414
061224
111205
116104
120504
001401

024632

024642
024650
024654
024656
024660

024662
024664
0264666
024672
024674

050037

024676
024700
024702
024704
024706
(024712
024714

104015
1044607
005202
005200
022700
001342
104400

024721
(024724

377
125

024716

000

000075
(024726
024620

001226
001216

TST75:

061220

TEST

MOV
MOV
MoV

R AR

AN R R R A RN AR NN AR AN

CLR
MOV
JSR

MEMDAT

034732

034776
000017
024640

000017
024656

G464

0c4656

'$:

2%:

3%:

000004

6%:

—

#1%,L0CK

000010

377

125
252

000

252

5$:

RO
#5% ,R2
PC,MEMLD

vSR
PC,SPLD
SPDAT
JSR
PC, CLRC
BI(
#1-,2%
BIS
RO,2%
ROMCLK
010000
BIC
#17,3%
BIS
RO, 3$
ROMCLK
040400!<11%20>
ROMCLK
61224
MOVB
(R2) ,RS
MOVR
4(R1) ,R4
(MPB
RS.R4
BEQ
4%
HLT
SCOP1
INC

INC
(MP
BNE
S(OPE

BYTE

AN RN N AR R RN AN AP AR AR P A RN RN

#75,TSTNO
#TST76 NEXT

MSTCLR
024716
034676

A NN RN N

R2
RO
#10.RC
1%

JR1 CONTAINS BASE DM(C11
JMASTER CLEAR DM(C11

JMEM + SP ADDRESS
JPOINTER TO CORRECT DATA
JLOAD 8 WORDS OF MAIN MEMORY
JPOINTER TO DATA
;LOAD 8 WORDS OF SP
JPOINTER TO DATA

JCLEAR C BIT!
;CLEAR ADDRESS FIELD OF INSTRUCTION
sADD ADDRESS TO INSTRUCTION
JNEXT WORD IS INSTRUCTION, ROMCLK PC-5304
;LOAD MAR
. CLEAR ADDRESS OF INSTRUCTION
JADD ADDRESS TO INSTRUCTION
JNEXT WORD IS INSTRUCTION, ROMCLK PC S304
JBR _ SEL B
;NEXT WORD IS INSTRUCTION, ROMCLK PC 5304
;MOVE BR TO PORT4
JPUT "EXPECTED'" IN RS
JPUT "FOUND'' IN R4
;DATA (CORREC(T?
JBR IF YES

JALU ERROR
;SW09=1?
JNEXT DATA

sNEXT ADDRESS
JDONE YET?
JBR [F NO
:SCOPE THIS TEST

0,-1,0,-7,125,252,125,252

.EVEN

4759

JANRRRRRRRRARRANCARRR
AN A nAn

4760
4761

S*ALU TEST
:*TEST OF ALU FUNCTION SEL A WITH C BIT CLEARED

4765

L76¢
4763
4764

4766
4767
G768

4769

TEST

tanwnanannnavnannnnennasnnnn

;*ALU FUNCTION (A)
TODE=10Q
;*LOAD MAIN MEM AND SP WITH 8 WORDS OF DATA
;*PERFORM THE FUNCTION, VERIFY THE RESULTS

024726

017737

000076

ADDRESS

001226

T1S176:

;
TEST 76
i
e

MOV

#76,TSTNO

CZDMC
MACY11 30A(1052)
24=-AUG~78
CZDMCC.P1M
11-AUG-78 08:21

4770
47N

024734
024742

012737
012737

4773
4774
4775
4776
6777
4778

024750
024752
024754
024760
024764
024766
024772
024774
025000
025006
025012
025014
025016
025024
025030
025032
025034
025036
025040
025042
025046
025050
025052
025054
025056
025060
025062
025066
025070
025072
025075
025100

104412

001216
001220

MOV
MOV

MSTCLR
CLR
MOV
JSR

025072

034676

MEMDAT

034732
034776
000017
025014

000017
025032

025014

025032

1%:

2%:

3%:

JSR
SPDAT
JSR
BIC
BIS

ROMCLK

010000

BIC
BIS
ROMCLK

4%:

MOVB
(MPB
BEQ
HLT
SCOP1
INC

000010
377
125

000
12¢
252

H#TST77 NEXT
#1%,L0CK
RO
#5%,R2

PC,MEMLD

PC,SPLD

PC,CLRC

#17.2%
RO, 2$

#17,3%

R0,
$%

040400!<1C+20>

MOVB

000004

SEQ 0091

JR1 CONTAINS BASE DM(11
JMASTER CLEAR DMC11

JMEM + SP ADDRESS
cPOINTER TO CORRECT DATA
JLOAD 8 WORDS OF MAIN MEMORY
;POINTER TO DATA

;LOAD 8 WORDS OF SP

JPOINTER TO DATA
JCLEAR C BIT.
cCLEAR ADDRESS FIELD OF INSTRUCTION
;ADD ADDRESS TO INSTRUCTION
JNEXT WORD IS INSTRUCTION, ROMCLK P(C=5304
.LOAD MAR
sCLEAR ADDRESS OF INSTRUCTION
;ADD ADDRESS TO INSTRUCTION
;g£XT gngAIS INSTRUCTION, ROMCLK P(C=5304

(R2) RS
4(R1) ,R4
R5,R4
4%
15
R2
RO
#10,R0
1%

.MOVE BR TO PORT4

IN RS
JPUT "EXPECTED''
JPUT “FOUND'' IN R4
sDATA CORRECT?
;BR IF YES

JALU ERROR

. SW09=1?

JNEXT DATA

JNEXT ADDRESS

JDONE YET?
sBR IF
-SCOPE

NO
THIS

TEST

0.0.-1.-1,125,125,252,252

S%:

ADDRESS

JNEXT WORD IS INSTRUCTION, ROMCLK PC 5304

ROMCLK

61224

FVEN
JRNRARRRAARARAR
R RN
nAntwn

JEST

nawnnntnsstnnannnnnnrntnnnn

J*ALU TEST
J*TEST OF ALU FUNCTION A OR NOTB WITH ( BIT CLEARED
s*ALU FUNCTION (A OR NOTR)
CODE-12
:*LOAD MAIN MEM AND SP WITH 8 WORDS QOF DATA

;*PERFORM

THE

FUNCTION,

VERIFY

THE

RESULTS

000077
025256
025120

388

":tt"'t.‘fitl!fi".t.'tfitt‘tti*lttltl'tttt‘tt'tt"'.itittt'tt""t

—

4779
4780
4781
4782
4783
4784
4785
4786
4,787
4788
4789
4790
4791
4792
4793
4794
4795
4796
4797
4798
4799
4800

005000
012702
004737

4772

025102
024774

12:19
PAGE 91
DMC11 ALU TESTS

1226
1216
1220

1S177:

#77,TSTNO
#TST100 ,NEXT
#18,L0(k
MSTCLR

025246
034676

(LR
MOV
ISR

RO
#.%, R

PC,MEMLD

JRT

CONTAINS BASE

DM(11

;MASTER CLEAR DM(11

ADDRESS

JMEM + SP ADDRESS
JPOINTER TO CORRECT DATA
JLVAD 8 WORDS OF MAIN MEMORY

CZ0M(
MACYTT 30A(1052)
24-AUG-78
(ZomMcc.P1
11-AUG-78 08:21
4826
4827
4828
4829

025140
025142
025146
025150

035022
004737
035032
004737

(832
4833
4834
4835
4836
4837
(838
4839
4840

025166
025170
025172
025200
025204
025206
025210
(025212
025214

104414
010000
042737
050037
104414
040640
104414
061224
111205

4830
4831

025154
025162

042737
050037

4841
4842
4843
4844
4845
4846
«847
4848
4849
4850

025216
025222
025224
025226
025230
025232
025234
025236
025242
025244

116104
120504
001401
104015
1044601
005202
005200
022700
001342
104400

4852

025251

377

4851

4853

4854
4855
4856

025246

025254

12:19
PAGE 92
DMC11 ALU TES'S

034732
034776

000017
025170

0000'7
025206

025170

025206

1%:

°%:

3%:

000004

4%:
000010

377

000

252

377

377
125

S%:

MEMDAT
JSR
SPDAT
JSR

SEQ 0092
JPOINTER TO DATA
;LOAD 8 WORDS OF SP
;POINTER TO DATA
sCLEAR C BIT.

PC,SPLD
PC CLRC

BI(
BIS

817,28
RO, éS

MOVR
{MPR
BEQ
HLT
SCOP1
INC
INC
rMp
BNE
SCOPE

4(R1) R4
R5,R4
4%
15

sCLEAR ADDRESS FIELD OF INSTRUCTION
;sADD ADDRESS TO INSTRUCTION

ROMCLK
010000
BIC
#17,3%
BIS
RO, 3%
ROMCLK
040400 <12+20>
ROM(CLK
61224
MOvR
(R2) ,R5

BYTE

JNEXT WORD IS INSTRUCTION, ROMCLK PC=5304
;LOAD MAR
;CLEAR ADDRESS OF INSTRUCTION
;sADD ADDRESS TO INSTRUCTION
;NEXT WORD IS INSTRUCTION, ROMCLK P(C=5304
:BR _ A OR NOTB
NEXT WORD IS INSTRUCTION, ROMCLK PC 5304
MOVE BR TO PORT4
;PUT "EXPECTED'" IN RS
JPUT "FOUND'' IN R4

.DATA CORRECT?
JBR IF YES
;ALU ERROR
;SW09-1?
JNEXT DATA
JNEXT ADDRESS
;DONE YET?
;BR IF NO
-SCOPE THIS TEST

R2
RO
#10,R0
1%

=1,0,-

-1,125,252,-1

.EVEN

4857

JRNRANNNNNAA
ARSI AN R AR AR bannwn

4858
4859

S*ALU TEST
J*TEST OF ALU FUNCTION A AND B WITH C BIT CLEARED

43860

;*ALU FUNCTION (A AND B)

(862

;*PERFORM THE FUNCTION,

4861

4864
4865

;

4867
4B68
4869
4870
4871
4872
4873
4874
4875
4876
4877
4878

025256
025264
025272

012737
012737
012737

025300
025302
025304
025310
025314
025316
025322
025324

104412
005000
012702
004737
035022
737
035032
004737

4881

(0725342

104414

4879
4880

VRS

CODE-13

;~«LOAD MAIN MEM AND SP WITH 8 WORDS OF

4863

(866

[EST

025330
02533

042737
050037

000100
025432
025324

001226
001216
001220

(025344

R R

AR L)

DATA

VERIFY THE RESULTS

R R AR R R AR A AR AR AR AR A A R AR R RN AN

AR R AN AR O AN R R AN R ERR RN

TEST 100

TST100: MOV
MOV
MOV

034732

034776

R ettt

;
025422
034676

000017
025344

AN AR AN AR RN R

T I

MSTCLR
CLR
MOV
JSR
MEMDAT
JSR
SPDAT
JSR

BI(
BIS

ROM( L k

#100,TSTNO
#TST101 NEXT
#1%,L0(K

RO
#5% ,R2
PC,MEMLD
PC,SPLD

PC CLRC

#1708
ke, 2

;JR1 CONTAINS BASE DM(C11 ADDRESS
JMuSTER CLEAR DM(11
;JMEM + SP "DDRESS
sPOINTER TO CORRECT DATA
JLOAD 8 WORDS OF MAIN MEMORY
JPOINTER TO DATA
,LOAD 8 WORDS Of SP
JPOINTER TO DATA
sCLEAR C BIT!

sCLEAR ADDRESS FIELD OF INSTRUCTION
JADD ADDRESS TO INSTRUCTION
JNEXT WORD

INSTRUCTION, ROM(C_k PC

53(4

(ZOMC
MACY11 30A(1052)
24-AUG-78
cZomcC.P1
11-AUG~-78 08:21
4882
4883

025344
025346

010000
042737

4885
4886
4887
4888
4889
4890
4891
4892
4893
4894
4895
489
4897
4898
4899
4900
4901
4902
4903
4904
4905

025360
025362
025364
025366
025370
025372
025376
025400
025402
025404
025406
025410
025412
025416
025420
025422

104414
040660
104414
061224
111205
116104
120504
001401
104015
104401
005202
005200
022700
001342
104400
000
377
000

4884

025354

025425
025430

050037

000017

025362

12:19
PAGE 93
DMC11 ALU TESTS

(25362

2%:

BIS

3%:

000004

4%:
000010

000
125
252

000
000

010000
BIC

5%:

SEQ 0093

#17,3%

RO, 38

;LOAD MAR
;CLEAR ADDRESS OF

INSTRUCTION

+ADD ADDRESS TO INSTRUCTION

ROMCLK
;NEXT WORD IS INSTRUCTION, ROMCLK PC=5304
040400.<13%20>
JBR _ A AND B
ROMCLK
;NEXT WORD IS INSTRUCTION, ROMCLK P(C-5304
61224
;MOVE BR TO PORT4
MOVR
(R2) RS
JPUT "EXPECTED'' IN RS
MOVB
4(R1) R4
JPUT "FOUND'' IN R4
CMPS
RS.R4
;DATA CORRECT?
BEQ
4%
JBR IF YES
HLT
15
JALU ERROR
SCOP1
; SW09=1?
INC
R2
JNEXT DATA
INC
RO
JNEXT ADDRESS
(MP
#10,R0
;DONE YET?
BNE
1%
<BR [F NO
SCOPE
:SCOPE THIS TEST
BYTE
0,9,0,-1,125,0,0,25¢

.EVEN

L4906

JHNRNRANRNANCRR
AR AR A At wn

4907
4908
4909
4910
4911
(912
4913
4914
4915
6916
4917

J*ALU TEST
;*TEST OF ALU FUNCTION A OR B WITH C BIT CLEARED
;*ALU FUNCTION (A OR B)
CODE=14
:*LOAD MAIN MEM AND SP wITH 8 WORDS OF DATA
;*PFRFORM THE FUNCTION, VERIFY THE RESULTS
LA A
s
e

4918
4919
4920
4921
4922

4923
4924
4925
4926
4927

4928
4929

4930
4931
4932

4933

4934
4935
4936
4937

025432
025440
025446

012737
012737
012737

025454
025456
025460
025464
025470
025472
025476
025500

104412
005020
012702
004737
035022
(04737
035032
004737

025516
025520
025522

104414
010000
042737

025534
025536
025540
025542

104414
040700
104474
061224

025504
025512

025530

042737
050037

050037

000101
025606

025500

001226
(01216

T1ST101:

001220

025576
034676

034732

034776

000017
025520
000017

025536

025520

025536

'$:

’$:

3%:

;
TEST 101
mmm———————————
MOV
#101,TSTNO
MOV
#1ST102 ,NEXT
MOV
#1%,L0CK
MSTCLR
CLR
MOV
JSR
MEMDAT
JSR
SPDAT
JSR

waaada

A A A A

R AR AR A RRR AN RS

R e R R R SR T )

RO
5% ,R2
PC,MEMLD

;R1 CONTAINS BASE DMC11 ADDRESS
JMASTER CLEAR DM(C11
JMEM + SP ADDRESS
;POINTER TO CORRECT DATA
JLOAD 8 WORDS OF MAIN MEMORY

PC,SPLD

JPOINTER TO DATA
;LOAD 8 WORDS OF SP

PC,CLRC

JPOINTER TO DATA
;CLEAR C BIT.

#17,3%

JNEXT WORD IS INSTRUCTION, ROM(LK P(-5304
;LOAD MAR
:CLEAR ADDRESS OF INSTRUCTION

BIC
BIS

#1728
RO,2$

BIS

RO,%$

ROMCLK
010000
BI(

JEST

ROMCLK
040400.<14#20>
ROMCLK
61224

;CLEAR ADDRESS FIELD OF INSTRUCTION
:ADD ADDRESS TO INSTRUCTION

:ADD_ADDRESS TO INSTRUCTION

sNEXT
.BR
SNEXT
JMOVE

WORD IS INSTRUCTION, ROM(LK P(=530¢4
_AORB
WORD IS INSTRUCTION, ROM(LK Pr 5304
BR TO PORT4

CZOMC
MACY11 30A(1052)
24-AUG-78
CZDMCC.P1T
11-AUG=78 08:21

4938
4939
4940
4961
4962

4943
4964
4945
64966
4967
4948
4949
4950
4951
4952
4953
4954

025544
025546

025552
025554
025556

025560
025562
025564
025566
025572
025574
025576
025601

025604

111205
116104

120504
001401
104015
10440
005202
005200
022700
001342
104400
000
377
377

12:19
PAGE 94
DMC11 ALU TESTS

MOVB
MOVB

000004

48:
000070
277
125
252

377
377

S8:

(MPB
BEQ
HLT
SCOPT
INC
INC
(M
BNE
SCOPE
BYTE

SEQ 0094

(R2) RS
4(R15,R4
RS5,R&
4§
15

:PUT "EXPECTED'* IN RS
:PUT “FOUND''
IN R4

:DATA CORRECT?
:BR IF YES
:ALU ERROR

; SW09=17
:NEXT DATA
:NEXT ADDRESS
:DONE_YET?
:BR IF NC
:SCOPE _THIS TEST
0,-1,-1,-1,125,-1,-1,252
R2
RO
#10.R0
18

.EVEN

4955

JNRRRRRRNRA
AR
h
e nnntn

4956
4957
4958
4959
4960

J*ALU TEST
J*TEST OF ALL FUNCTION A XOR B WITH C BIT CLEAKRED
J*ALU FUNCTION (A XOR B)
(ODE=15
;*LOAD MAIN MEM AND SP WITH 8 WORDS OF DATA
J*PERFORM THE FUNCTION, VERIFY THE RESULTS

4961

NN A NN

4962
4963
4964
4965
L4966
4967
4968
4969
4970
4971
4972
4973
4974
4975
4976

025606
025614
025622

012737
012737
012737

025630
025632
025634
025640
025644
025646
(025652
025654

104412
005000
012702
004737
(035022
004737
035032
004737

4978
4979

025666
025672

050037
104414

4977

025660

4980
4981

025674
025676

4983
4984
4985
4986
4987
4988
4989
4990
4991
4992
4993

025710
025712
025714
025716
025720
025722
025726
025730
025732
02573%
(025736

4982

025704

042737

010000
042737

050037

104414
040720
104414
061224
111205
116104
121504
001401
104015
104407
005207

000102
025762
025654

001226
001216
001220

034732

000017

025674

000017

025712

025674

(Gp5712

A AR

R AR AN R RN AN NN

.
TEST 102
PR,
TST102: MOV
#102,TSTNO
MOV
#TST103 NEXT
MOV
#1%,10(K

025752
034676

034/77¢

1%:

MSTCLR
(LR
MOV
JSR
MEMDAT
JSR
SPDAT
JSR

BIC

BIS
ROM(LK

c$:

010000
BI(

BIS

3% :

000004

RO
#5% ,R2
PC ,MEMLD
PC,SPLD
PC,CLRC

#17,25
RO,2$

”17,3%

RO, 38

ROMCLK
040400'<15+20>
ROM( LK
61224
MOVR
(R2) ,R5
MOVR
4(R1) ,R4
(MPR
RS5.R6
BFQ
43
HLT
15
SCoP1
IN
ke

[EST

JRT

A R

102

wnnnnnnnnnennsennnannnannnnnn

R AR AN NN N AR AR

CONTAINS BASE DM(11

R R R

AR AR

I AN R AN R

ADDRESS

JMASTER CLEAR DM(C11
JMEM + SP ADDRESS
;POINTER TO CORRECT DATA
;LOAD 8 WORDS OF MAIN MEMORY
JPOINTER TO DATA
;LOAD 8 WORDS OF SP
JPOINTER TO DATA
JCLEAR C BIT.

;CLEAR ADDRESS FIELD OF

INSTRUCTION

;ADD ADDRESS TO INSTRUCTION
JNEXT WORD IS INSTRUCTION, ROMCLK PC

.LOAD MAR
;CLEAR ADDRESS OF

5304

INSTRUCTION

*ADD ADDRESS TO INSTRUCTION

JNEXT WORD IS INSTRUCTION, ROMCLK PC 5304
JBR
A XOR B
;NEXT WORD IS INSTRUCTION, ROMCLK P(-53064
JMOVE BR TO PORT4
JPUT "EXPECTED'' IN RS
JPUT “FOUND'' IN R4

;DATA CORRE(T?
JBR IF YES

JALU ERROR
JSw09-1?
JNEXT DATA

(ZDMC

MACY11

CcZoMCC.P1
4996
4995
4996
4997
4998
4999
5000
SO0
5002
5003

025740
025742
025746
025750
025752
025755
025760

30A(1052)

24-AUG-78

11-AUG-78 08:21
005200
022700
001342
104400
000
000
377

12:19

PAGE 95

DMC11 ALU TESTS

000010
377
000

000

377
377

5%:

INC
CMP
BNE
SCOPE
By

SEQ 0095
RO
#10,R0
1%

JNEXT ADDRESS
;DONE YET?
:BR IF NO
SCOPE THIS TEST
0,-1,-1,0,0,-1,-1.,0

.EVEN

5004

Jvtnnanannnwknnwnrrinwnnhnte

5005
5006
5007
5008
5009

J*ALU TEST
J*TEST OF ALU FUNCTION ADD WITH C BIT CLEARED
J*ALU FUNCTION (A PLUS B)
CODE=00
;*L0AD MAIN MEM AND SP WITH 8 WORDS OF DATA
J*PERFORM THE FUNCTION, VERIFY THE RESULTS

5010

AR N R AR RN

A R A R N

A A

A R R AR

JEST

R AN AR

T0F

enntnennnnnnnntnnnnnnratnnns

A RN RN AR R AR AR

AN RN

A AN RN NN

A RN

5011

28}%

5014

5015

025762

012737

025770

012737

026004
026006
026010
026014
026020
026022
026026
026030

104412
005000
012702
004737
03502”
004737
035032
004737

S016
5017
5018
5019
5020
5021
5022
5023
5024
5025

025776

5027
5028
5029
5030

026042
026046
026050
026052

050037
104414
010000
042737

5032
5033
5034
5035
5036

026064
026066
026070
026072
026074

104414
040400
104414
061224
111205

5026

5031

5037
5038
5039
50640
5041
5042
5043
5044
5045
5066

5047
5048
5067

026034

C26060

012737

042737

050037

026076
026102
026104
026106
026110
026112
026114
026116
026122
0261246

116104
120504
001401
104015
104401
005202
005200
022700
001342
104400

26134

026126
026131

000
3

000103

026136

026030

(001226

001216

T1s1103:

001220

034732

000017
026050

000017

026066

026050

(26066

1%:

2%:

(00004

A ¥

#103,TSTND
#TST104 ,NEXT

MST(LR
(LR
MOV
JSR
MEMDAT
JSR
SPDAT
JSR

BI(

BIS
ROM(LK
010000
BIC

S%:

#18,L0CK

RO
#5% ,R2
PC ,MEMLD
P(C,SPLD
PL CLRC

015 ’$
RC, s

#17.3%

RO, {3

ROMCLK
060400!<00+20>
ROM(Lk
61224
MOVB
(R2),RS

MOVR
(MPR
BEQ
HLT
SCoP1
INC
INC

000010

377

MOV

BIS
3%

103

MOV

MCV

026126
03467¢

034776

TEST

(MP
BNE
SrOPE
BYTE

4(R1) ,R4
R5.R4
%
15
R2
RO

#10,RC
'$

;R1 CONTAINS BASE DM(C1' ADDRESS
JMASTER CLEAR DMCTN
JMEM + SP ADDRESS
JPOINTER TO CORRECT DATA
;LOAD 8 WORDS OF MAIN MEMORY
JPOINTER TO DATA
;LOAD 8 WORDS OF SP
;POINTER TO DATA
JCLEAR C BIT!

;CLEAR ADDRESS FJELD OF INSTRUCTION
;ADD ADDRESS TO INSTRUCTION
JNEXT WORD IS INSTRUCTION, ROMCLK PC-5304
;LOAD MAR
;CLEAR ADDRESS OF INSTRUCTION

.ADD ADDRESS TO INSTRUCTION

JNEXT WORD IS INSTRUCTION, ROMCLK PC-=5304
JBR . ADD
NEXT WORD IS INSTRUCTION, ROMCLK PC 5304
;MOVE BR TO PORT4
;PUT "EXPECTED'' IN RS
JPUT "FOUND'' [N R4
;DATA CORREC(CT?
;BR IF YES
JALU ERROR
. SW09=1?
JNEXT DATA
JNEXT ADDRESS
DONE YET?
BR |F NO
SCOPE THIS TEST

0,=1,=1,37¢,250,=1,=",124

(ZOMC
MACY11 30A(1052)
24-AUG=78
czomcc.P1
11-AUG~78 08:21

12:19
PAGE 96
DMC11 ALU TESTS

5050
5051
5052

SEQ 0096

.EVEN

5053

JaRnnnnann
vk
nnhkwnnwnanr

5054
5055
5056
5057
5058

t*ALU TEST
J*TEST CF ALU FUNCTION 2A W/C WITH C BIT CLEARED
;'ALU FUNCTION (A PLUS A PLJUS ()
CODE=6
;*LOAD MAIN MEM AND SP WITH 8 WORDS OF DATA
;*PERFORM THE FUNCTION, VERIFY THE RESULTS

5059

5060

282;

;

5063
5064
5065
5066
5067
5068
5069
5070
5071
5072
5073
5074

026136
026144
026152

012737
012737
012737

026160
026162
026164
026170
026174

104412
005000
012702
004737
035022

026202
026204

035032
004737

5076

026216

050037

5075

026176

026210

034732

042737

000017

026222
026224
026226
026234
026240
026242

104414
010000
042737
(50037
104474
040540

5084
5085
5086
S087
5088
5089
5090
5091
5092
5093
5096
5095

026246
026250
026252
(26256
(026260
026262
026264
026266
026270
026272
026276
026300

061224
111205
116104
120504
001401
104015
104401
005202
005200
022700
001342
104400

5097
5098

026305
026310

376
124

(026244

5096 026302

001226
001216
001220

034776

026224

9200017
026242

02¢c¢2«
_
026240

000004

0000190

009

252
126

376 5%:

2582

R RN AR AR R

sannnanntsannnnnnnnnnnssnnn

R R AR RN AR R R RNNNNRAA AR AR AR AR NAANR RO A NN

TEST 104

MOV
MOv
MOV

#104,TSTNO
#TST105 ,NEXT
#1%,L0(K

MSTCLR
(LR
MOV
JSR
MEMDAT

RC
#5% ,R2
PC ,MEMLD

SPDAT
JSR

PC,CLRC

;JRT CONTAINS BASE DMC11 ADDRESS
JMASTER CLEAR DM(11
;MEM + SP ADDRESS
JPOINTER TO CORRECT DATA
;LOAD B WORDS OF MAIN MEMORY
JPOINTER TC DATA
;LOAD 8 WORDS OF SP
;POINTER TO DATA
JCLEAR C BIT!

BIS

RO, 2%

;ADD ADDRESS TO INSTRUCTION

JSR

104414

000

T1ST104:

026302
034676

004737

5077
5078
5079
5080
5081
5082

5083

000104
026312
026204

R AR N AR R AN RN

TEST

BIC

PC,SP.D

fi1? 2%

ROM(CLK
010000
BIC
#17,3%
RiS
RO, 3%
ROM( ¥
06040)!<€+20>

ROM(LK

61224
MOVB
MOVR
(MPR
BEQ
HLT
SCOP1
INC
INC
(MP
BNE
<COPE

BYTE

(R2) ,RS
4(R1Y R4
RS,R4
43
15
R2
RO
#10,R0
1%

;CLEAR ADDRESS FIELD OF INSTRUCTION
JNEXT WORD IS INSTRUCTION, ROMCLK P(C-5304
.LOAD MAR
;sCLEAR ADDRESS OF INSTRUCTION
;ADD ADDRESS TO INSTRUCTION
NEXT WORD IS INSTRUCTION, ROMCLK PC-5304
2A W/C

NEXT WORD IS INSTRUCTION, ROMCLK PC-5304

*MOVE BR TO PORT4
‘PUT "EXPECTED'' IN RS
JPUT "FOUND'® IN R4
;DATA (CORREC(CT?
JBR IF YES
JALU ERROR
. SW09=1?
JNEXT DATA
JNEXT ADDRESS
JDONE YET?
BR IF NO
OPE THIS TEST

0,0,376,376,252, ?52 24,124

JEST

105

wnnenvsevsnnsocrnnrecntconene

SeALU TEST
SeTEST OF *Lu FUNCTION SUB wlTH (
J*ALU FINCTION
A=k
ODE 6

cvevennnnsnnnerevneerassenne

BIT

(LEARED

(ZDMC
MACY1Y 30A(1052)
24-AUG~78
C20MCC.P1T
11-AUG~78 08:21

12:19
PAGE 97
DMC11 ALU TESTS

5106
5107

8
SEQ 0097

J*LOAD MAIN MEM AND SP WITH 8 WORDS OF DATA
J*PERFORM THE FUNCTION, VERIFY THE RESULTS

5108

ROMCLK PC

5304

5109

g}}?

5112

TEST

026312

012737

026326

012737

026334
026336
026340
026344

104472
005000
012702
004737

5121
5122
5123

026352
026356
026360

004737
035032
004737

5125

026372

050037

5113

5114
5115
5116
5117
5118
5119
5120

5124

5126

5127
5128
5129
5130
5131
5132
5133
51346
5135

026320

026350

026364

026376

012737

035022

042737
104414

026400
026402
026410
026414
026416
026420
(026422
0264246
026426

010000
042737
050037
104414
040740
104414
061224
111205
116104

5137
5138
5139
5140
5141
5142
5143
5144

026434
026436
026440
026442
026444
026446
(026452
026454

001401
104015
104401
005202
005200
(022700
001342
104400

51466
5147
5148
5149

(026461
£26464

000
125

5136

C\gpfiduhgthnnunhUN
—~
OO
N> N WrLU—O

(026456

120504

000

001226

(026360

001220

001216

026456
034676

054776

026400
000017
(026476

Ccoa0C
A
Qz6416

'%:

’%:

(00000«

#1%,L0CK

#TST106 NEXT

SR
SPDAT
JSR

BIC

ROM(LK

000010

7?7

.53

5%:

RO
#5% ,R2
PC ,MEMLD
PC,SPLD

BEQ
HLY
SCOP1
INC
INC
(TMMP
BNE
SCOPE

BYTE

JPOINTER

TO DATA

P(C,CLRC

RO, 2%

;ADD ADDRESS TO INSTRUCTION

#1°,2%

R5,R4

6«3
15
R2
RC

#10,R0
'S

;CLEAR ADDRESS FIELD OF
JNEXT WORD

INSTRUCTION

INSTRUCTION,

;LOAD MAR
;CLEAR ADDRESS OF INSTRUCTION
;ADD ADDRESS TO INSTRUCTION
JNEXT WORD IS INSTRUCTION, ROMCLK PC 5304
;BR
SUB
JNEXT WORD IS INSTRUCTION, ROMCLK P(=5304
JMOVE BR TO PORTS
JPUT "EXPECTED'®
IN RS
JPUT "FOUND'' IN R4

;DATA CORRE(CT?

;BR JF YES
;ALU ERROR
s SW09=1?
JNEXT DATA
JNEXT ADDRESS
JDONE YET?
;BR IF NO
:SCOPE THIS TEST

0.1,1,0,0,253.,125.0

LEVEN
Junsentacsnnvenswanennnnnnss

oAl
U

JESQT

106

REERRNRNRANI
AT IONDIRNOOIOERIRNONNCETDR

TEST

il e

ol =

J*TEST OF ALU FUNCTION ADD w/C WITH ( BIT CILEARED
c*ALU FUNCTION (A PLUS B PLUS ()
(ODE=01
*LOAD MAIN MEM ANC SP WiTW 8 WORDS OF DATA

J*PERFORM THE FUNCTION, VERIFY THE RESULTS

;;ttt'.'t.'ttt't'tttttttttt.'tttt..'tt.ttt.tttt.'.'.tn.'tn'o-'.'-

e
—

JR1T CONTAINS BASE DM(11 ADDRESS
JMASTER CLEAR DM(C11
;MEM + SP ADDRESS
JPOINTER TO CORRECT DATA
;LOAD 8 WORDS OF MAIN MEMORY
;LOAD 8 WORDS OF SP
<POINTER TO DATA
JCLEAR C BIT!

010000
BI(
#17,3%
8IS
RO, 3%
ROM(LK
0406400'!'<16+20>
ROM( LK
61224
MOvR
(R2) RS
MOVR
4(R") ,R4

(MPR

JOO
e

MOV

BIS

3%:

0,0}

#105,TSTNO

MOV

MEMDAT

034732

000017

MOV

TST105:

MSTCLR
CLR
MOV
JSR

h =D -

AN NN NN

5145

026432

000105

026466

105

oLt

(U278

1006

IsTiges MOV

TEST 106

8106, 15T\

C(ZOMC
MACY1T 30A(1052)
24-AUG-78
CZDMCC.P1
11-AUG~78 08:21
5162
5163
5164
5165
5166
5167
5168
5169
5170

0264764
026502

012737
02737

5171
5172

026510
026512
026514
026520
026524
026526
026532
026534

104412
005000
012702
004737
035022
004737
035032
004737

5174
5175
5176
5177

026546
026552
026554
026556

050037
104414
010000
042737

026570
026572
026574
026576
026600

104414
040420
104414
061226
111205

5173

5178

5179
5180
95181
5182
5183

5184
5185
5186
5187
5188
5189
5190

5191
5192
5193
5194
5195
5196
5197

026540

026564

026602
026606
026610
026612
026614
026616
026620

026622
026626
026630
026632
026635
026640

042737

050037

116104
120504
001401
104015
104401
005202
005200

022700
001342
104400
000
37¢
377

026642
026534

12:19 PAGE 98
DMC11 ALU TES'S

001216
001220

MOV
MOV

(026632
03467€

034732
034776

000017

0245564

000017

526572

026554

{(2¢5°¢2

2%:

MSTC.R
CLR
MOV
JSR
MEMDAT
JSR
SPDAT
JSR

BIC

BIS
ROMCLK
010060
BIC

000004

0CGOC1C
377
252
124

177
377

S$:

RO
#5% R2
PC ,MEMLD
PC,SPLD
PC,CLRC

#17,2%

;CLEAR ADDRESS FIELD OF INSTRUCTION

ROMCLK
040400!:<01+20>
ROMCL K
61224
MOvVB
(R2) RS

JNEXT WORD IS INSTRUCTION, ROMCLK P(=5304
;BR _ ADD Ww/(
JNEXT WORD IS INSTRUCTION, ROMCLK P(=5304
;MOVE BR TO PORT4
JPUT "EXPECTED''
IN RS

BEQ
HLT
SCOP?
INC
INC
(MP
BNE
SCOPE
BYTE

RO,2%

JR1 CONTAINS BASE DMC11 ADDRESS
JMASTER CLEAR DM(11
JMEM + SP ADDRESS
;POINTER TO CORRECT DATA
;LOAD 8 WORDS OF MAIN MEMORY
JPOINTER TO DATA
;LOAD 8 WORDS OF SP
JPOINTER TO DATA
;CLEAR C BIT!

»7,3%

MOVA
(MPH

47ST107 NEXT
#1%,L0CK

;ADD ADDRESS TO INSTRUCTION
;NEXT WORD IS INSTRUCTION, ROMCLK P(C=5304
;LOAD MAR
;CLEAR ADDRESS OF INSTRUCTION

BIS
s

SEQ 00938

0. %8

4(R1Y,RS
R5,R4
4%
15

R2
RO
#10,RC
3 J

;ADD ADDRESS TO INSTRUCTION

JPUT "FOUND'' IN Ré4

sDATA CORREC(CT?
JBR IF YES
JALU ERROR
2 SW09=1?
JNEXT DATA
JNEXT ADDRESS

JDONE YET?
JBR IF NO
. SCOPE THIS TEST
0,-1,-7,376,252,-1.,-1,12¢4

FVEN

5198
5199
5200

Javnwensensnnnenentnsnnnenwn

520°
5202
5207
5204
5205

FeALY TEST
J*TEST OF ALU “UNCTION >UB W/(C WITH ( BIT (LEARED
¢*ALU FUNCTION (A-B-()
CODE=2
;*LOAD MAIN MEM AND SP WwITH 8 WORDS OF DATA
;*PERFORM THE FUNCTION, VERIFY THE RESULTS

52&

520/
5208
209

5210
5211

107

evnnennvssvennnannnnenranonnny

":.....'......Q.".""Q"."...'.t'."'.'.."...'Q"'...l'.'...‘.

020642
026650

012737
012737

5212
5213

026656

012737

5215
5216
5017

026664

026666
026670
26674

106612

9216

JEST

005000
012702
004737

000107
027016
026710

00'2¢6
00127¢

00122

;
TEST 107
eccceccccee=- -

TST197: Moy
Moy
MO\

MST(LR
027006
(34e7¢

(LR
MO/
1<k

#1507, TSTNO
#1STHIO NEXT

#18,L00k

RO
8.8, Re
Po MEM

sRT (ONTAINS BASE DM(11 ADDRESS
JMASTER CLEAR DM(11
JMEM + SP ADDRESS
;POINTER 10 CORRECT DA'A
;tOAD 8 WORDS OF MAIN MtM(RY

(Z0MC
MACY11 30A(1052)
24=~AUG~78
11-AUG-78 08:21
C20M(CC PN

026700
026702
026706
026710
026714
026722
026726
026730
026732
026740
026744
026746
026750
026752
026754
026756
026762
026764

035022

12:19

PAGE 99

DMC11

ALU TESTS

034732
034776
000017
026730
0000”7
226746

0267 30

Ocet? &6

1%:

BIC

BIS

‘%

ROMC LK

010000
BIC

BIS
3%

ROMC LK

040400

ROMCLK

61224
MOVB

20C0LC4

MOVB
(MPB
BEQ
o$:

000010

HLT

SCOP1
INC
INC

rMP
BNE
SCOPE
LBYTE

000
377
377

027014

MEMDAT
JSR
SPDAT
JSR

SEQ 0099
PC,SPLD
PC,CLRC

:POINTER

TO DATA

;POINTER

TO DATA

;LOAD 8 WORDS OF SP

RO, 3¢

;CLEAR C BIT.
;CLEAR ADDRESS FIELD OF INSTRUCTION
;ADD ADDRESS TO INSTRUCTION

#1738

:LOAD MAR
;CLEAR ADDRESS OF

<2%20>

JNEXT WORD IS INSTRUCTION, ROMCLK P(C=5304
SUB wW/C
;BR

#1728

JNEXT WORD

RO,
%%

:ADD ADDRESS

INSTRUCTION,

ROMCLK P(C=5304

INSTRUCTION

;NEXT WORD IS INSTRUCTION, ROMCLK PC=5304

(R2),RS

4(R1).Ré
R5,R4
48
1€

:MOVE BR TO PORT4

JPUT "EXPECTED'' IN RS
JPUT “FOUND'' IN R4

;DATA CORRECT?
;BR Ir YES
;ALU ERROR
:SW09=1?

R2
RO
#10,R0
¢

NEXT DATA
NEXT ADDRESS

:DONE YET?
:BR IF NO
-SCOPE

THIS

<1,0.37¢,~1,-1,282.104
"

savannnnnnreennnrannnncnnnnn

SeALU TEST

JEST

TE<T

110

tannnnnnnanssnnonnnnnnnannn

S*TEST UF

AU FUNCTION INC A WITH C BIT

s *PERFORM

THE

(ODE=3
J*ALU FUNCTION (A PLUS 1)
;*LOAD MAIN MEM AND SP WITH 8 WORDS OF
FUNCTION,

VERIFY

THE

CLEARED

DATA

RESULTS

;:!t.'..'...l'."".""fi..t.'.tt'.t...h...fiQ'.Q....t!"t"'..'t‘

NNN

NNV

000110

022172
027064

S ONNONONN

= WNAWNNWWNNIWO

& NN
NI NN

—

row

—

RETE 822 E;—*? elele
roruro
g
o

w
v

027040
027042
027044
027050
027054

027016
027024
027032

-——
—

1226

001

001 216
001 2 20

TST110:

TEST

MOy

#110,TSTNG

MOy

#18,10CK

MOV

MST(LK

027162
034676

0347%2
034776
000017
027104

110

#1sTI11 NEXT

(LR
MOV
JSR
T
MEMDA
JSR

RO
#58,R2
PC,MEMLD

JSR

PC (LRC

SPDAT

BI{
RI<

ROM( L&

PC,SPLD

0’28
RC.d$

;R1

C(ONTAINS BASE

DM(11

;MASTER (LEAR DM(11

ADDRESS

JMEM + SP ADDRESS
<POINTER TO (ORRECT DATA

.LOAD 8 WORDS OF MAIN MEMORY

JPOINTER

TO DATA

;LOAD 8 WORDS OF SP

JPOINTER TO DATA

JCLEAR ( BIT.

sC_EAR ADDRESS FIELD OF

INSTRU(TION

sADD ADDRESS TO INSTRUCTION

JNEXT WORD

INSTRUCTION,

RUM(.x

P' 53
4

CZDMC
MACY11 30A(1052)
24-AUG-78
CZOMCC.P11
11-AUG-78 08:21

5274
5275

027104
027106

010000
042737

9277
5278
5279
5280
S281
5282
5283
5284
5285
5286
5287
5288
5289
5290
5291

027120
027122
027124
027126
027130
027132
02736
027140
027142
027144
027146
027150
027152
02715€¢
027160

104414
040460
104414
061224
111205
1161046
120506
001401
104015
104401
005202
005200
022700
001342
104400

5293
5294
5295
5296
5297

027165
02717C

000
253

5276

5292

027114

027162

050037

001

000017

127122

12:19
PAGE 100
DMC11 ALU TESTS

027122

2%:

BIS

3%:

000004

6%:
000010

00!

126
253

000

126

5%:

.LOAD MAR
;CLEAR ADDRESS OF

#17,3%

RO,3$

ROMCLK
040400.<3%20>
ROMCLK
61224
mMOovB
(R2) ,RS
MOvS
4(R1) R4
(MPB
R5,R4
BEQ
4%
HLT
15
SCOP1
INC
R2
INC
RO
CMP
#10,R0
BNE
1%
SCOPE

BYTE

INSTRUCTION

:ADD_ADDRESS TO INSTRUCTION

JNEXT WORD IS INSTRUCTION, ROMCLK PC-5304
JBR _ INC A
A
;NEXT WORD IS INSTRUCTION, ROMCLK PC=5324
sMOVE BR TO PORT4
JPUT "EXPECTED"' IN RS
JPUT "FOUND'' IN R4
;DATA CORRE(T?
:BR IF YES
;ALU ERROR
5 SW09=1?
JNEXT DATA
JNEXT ADDRESS
JDONE YET?
JBR IF NO
:SCOPE THIS TEST

1,7,0,0,126,126,253,253

.EVEN

5298

Juvennnwnnannhnrwnrnawnanatww

5299
5300
5301
5302
5303

“eALU TEST
J*TEST OF ALJ FUNCTION 2A WITH ( BIT CLEARED
s*ALU FUNCTION (A PLUS A)
CODE -5
;*LOAD MAIN MEM AND SP wITH 8 WORDS OF DATA
s*PFRFORM THE FUNCTION, VERIFY THE RESULTS

5304

010000
BIC

SEQ 0100

5305
5306
5307
5308
5309
5310
5311
5312
5313
5314
5315
5316
537
5318
5319

027172
027200
027206

012737
012737
012737

0272146
027216
027220
027224
027230
027232
027236
027240

104412
005000
012702
004737
035022
004737
035032
004737

5?51

QSZSSZ

050037

5320

5322

5323

5324

5325

5326
5327

538

5329

0272644

027256

027260

027262

027270
027274
027276

027300
02730¢

042737
104414

010000

042737

059037
104414
040520

10444

0e122¢

000311
027346
027240

001¢c26
(01216
001220

034732

034776

027260

000017

02727¢

027250

0272°o

177

A A AN R A AR NN RN R AN AN N

sannnnnnvannnnvasrnnntnanwnny

AN RN AN N R A AR AR ANR N RN AN

s
TEST 11
R
e ———
[IST111: MOV
#111,TSTNO
MOV
#TST112 NEXT
MOV
#1%,L0CK

027336
034676

000017

A N AR AN AN A

TEST

'$:

MSTCLR
(LR
MOV
JSR
MEMDAT
JSR
SPDAT
JSR

BI(

BIS
’%:

ROM(LK

010000

BIC

BIS
it

P(CCLRC

;R1 CONTAINS BASE DMC11 ADDRESS
JMASTER CLEAR DM(C11
JMEM + SP ADDRESS
;POINTER TO CORRECT DATA
JLOAD 8 WORDS OF MAIN MEMORY
JPOINTER TO DATA
JLOAD 8 WORDS OF SP
JPOINTER TO DATA
;(LEAR C BIT.

R0.2$

<ADD ADDRESS TO INSTRUCTION

RO
#5% ,R?
PC ,MEMLD
PC,SPLD

#1708

07,38

RO, 3%

ROM(LK
040400.<5+2)>

ROMC | K
€lecé

;CLEAR ADDRESS FIELD OF INSTRUCTION
JNEXT WORD IS

INSTRUCTION, ROM(LK P(=5304

JLOAD MAR

;CLEAR ADDRESS OF

INSTRULTION

JADD ADDRESS TQO INSTRUCTION

JNEXT WORD IS INSTRUCTION, ROM(LK PC 5304
JBR
_2A

NEXT WORD IS INSTRUCTION, ROM(.x P’ 5304
MOVE BR TO PORT4

CCOMC
MACY1T 30A(1052)
24-AUG-78
czoMcc.P1
11-AUG-78 08:21

5330
5331
5332
5333
5334
5335
5336
5337
5338
5339
5340
5341

§342
5343
5344
5345
5346

027304
027306
027312
027314
027316
027320
027322
027324
027326
027332
027334
027336

027341
027344

111205
116104
120504
001401
104015
104401
005202
005200
022700
001342
104400
000
376
124

12:19
PAGE 101
DMC11 ALU TESTS

000004

4%:
00000

Q 00
gg
¢

376

283

5%:

MOVB
MOvR
CMPB
BEQ
HLT
SCOP1
INC
INC
(MP
BNE
SCOPE

BYTE

SEQ 010°

(R2) ,RS
4(R1) ,R4
R5.R4
4%
15

JPUT "EXPECTED'"
IN RS
JPUT "FOUND'' IN R4
;DATA CORRECT?
;BR IF YES
JALU ERROR
. SW09=1?
JNEXT DATA
;NEXT ADDRESS
;DONE YET?
JBR IF NC
:SCOPE THIS TEST

R2
RO
#10,R0
1%

0,0,376,376,252,252.
24,124

[

.EVEN

5347

JRNRRNNNNNARRRRAR ekttt

5348
5346
5350
5351
5352

J*ALU TEST
s*TEST OF ALU FUNCTION A PLUS C WITH C BIT CLEARED
J*ALU FUNCTION (A PLUS ()
CODE=4
;*LOAD MAIN MEM AND SP WITH 8 WORDS OF DATA
;*PERFORM THE FUNCTION, VERIFY THE RESULTS

535%

IR NN AN

A R AR R

[EST

1720

exnnnnnnannnsnnnnnennnnasnnns

RN R AR AN A NN AR A R R R AR AN AR AN RN N AR R R R T R AN RN ARNNN NN XD

5354

2%22

5357
5358
5359
5360
5361
5362
5363
5364
5365
5366
5367
5368

5369
5370

027346
027354
027362

012737
012737
012737

027370
027372
027374
027400
027404
027406
(027412
027414

104412
005000
012702
004737
035022
004737
035032
004737

027420
027426

042737
050037

5371
$372
5373

027432
027434
027436

104414
010€00
042737

5375
5376
5377
5378
5379
5380
5381
5382
5383
9386
5385

027450
027452
027454
027456
027460
027462
027466
027470
027472
027474
027476

104414
040500
104414
061224
111205
116104
129504
001401
104015
104401
00502C¢

5374

027444

050037

000112
027522
027414

001226
001216
001220

TST1112: MOV
MOV
MOV

027512
034676
034732

03477¢

000017
027434
000017

027452

027434

(27452

TEST

2%:

3¢ :

000004

MSTCLR
CLR
MOV
JSR
MEMDAT
JSR
SPDAT
JSR

112

#112,TSTNO
#TSTT113 NEXT
#1%,L0CK

RO
#5% R?
PC ,MEMLD
PC,SPLD

PC,CLRC

BIC
BI1S

017 3%
RO, 2$

8IS

RO, $8

ROMCLK
010000
BI(

#1739

ROMCLK
040400.<4*20>
ROM(CLK
61224
MOVB
(R2) ,RS
MOVB
4(R1) RS
(MPB
RS5.R4
BEQ
49
HLT
15
SCOP1
INC
ke

JR1T CONTAINS BASE DMC11 ADDRESS
sMASTER CLEAR DMCT1
;JMEM + SP ADDRESS
POINTER TO CORRECT DATA
;LOAD 8 WORDS Or MAIN MEMORY
JPOINTER TO DATA
;LOAD 8 WORDS OF SP
POINTER TO DATA
;CLEAR C BIT!

;CLEAR ADDRESS FIELD OF INSTRUCTION
sADD ADDRESS TO INSTRUCTION

JNEXT WORD IS INSTRUCTION, ROMCLK PC 5304
;LOAD MAR
;CLEAR ADDRESS OF INSTRUCTION

JADD ADDRESS TO INSTRUCTION

SNEXT WORD IS INSTRUCTION, ROMCLK P(=5304
;BR _ A PLUS C
JNEXT WORD IS INSTRUCTION, ROM(LK PC=5304
MOVE BR TO PORT4
JPUT "EXPECTED'' IN RS
JPUT "FOUND'' IN Ré
;DATA CORRE(T?
JBR IF YES
ALU ERROR
JSw09 12
JNEXT DATA

CZ0MC
MACY11 30A(1052)
24=AUG -78
czomcC.P1
11-AUG~78 08:21

5386
5387

5388
5389
5390
5391
5392
5363
5394
5395
5396
5397
5398
539G
5600

027500
027502
027506
027510
027512
027515
027520

005200
022700
001342

12:19

PAGE 102

DMC11 ALU TESTS

000010

104400

377

000
377
252

125

S$:

5413
5414
5415
5416
5417
5418
5419
5420
5421
5422
5423
5424
5425
5426
5427
5428
5429
5430
5431
5432
5433
5434

0,0,-1,-1,125,125,252.252

;BR IF NO
"SCOPE THIS TEST

JEST

713

annnnnnnrnnnnnnnnnnntnnnnnn

CODE-17
J*ALU FUNCTION (A-B-1)
;*LOAD MAIN MEM AND SP WITH 8 WORDS OF DATA

;*PERFORM

THE

FUNCTION,

VERIFY

THE

CLEARED

RESULTS

":ttttt.\***ttt.ifi*t.tfifltititifititt'tttttfi'tttitfiitttttttt'tt'tfit

[AS 1))

;

027544
027546
027550
027554
027560
027562
027566
027570
027574
027602
027606
027610
027612
27620
027624
027626
027630
027632
027634
027636
027642

104412

—

027522
027530
027536

737

737
2737

005900
012702
004737
035022
004737
035032
004737
042737
050037
104414
010000
042737

050037

104414
040760
104414
061224
111205
116104
120504

000113
027676
027570

034732
034776
000017
027610
000017
027626

MOV

#1%,L0CK

027626

;R1 CONTAINS BASE DMC1!
JMASTER CLEAR DM(C11

PC,CLRC

BIS

RC,7%

:ADD ADDRESS

ROMCLK

a15,2s

0460400.<17+20>

ROMCLK

#17,3%
RO, 3%

ROM(CLK

MOVR
MOVR

(R2),RS
4(R1) RS

BEQ
HL!

4%
15

(MPR

RS,R4

;CLEAR ADDRESS FIELD OF INSTRUCTION
JNEXT WORD

JNEXT WORD

INSTRUCTION,

ROMCLK

INSTRUCTION,

ROM(CLK

PC-5304

JBR . 2'S COMP SUB

5304

JNEXT WORD IS INSTRUCTION, ROMCLK PC-5304
;MOVE BR TO PORT4

JPUT "EXPECTED'' IN RS
JPUT "FOUND'' IN R4

JDATA (CORRE(CT?

:BR [F YES
;ALU ERROR

RO
#10,R0
1%

BYTE

=1,0,376,-1,-1,282.124,-1

SCOPE

TO INSTRUCTION

:LOAD MAR
;CLEAR ADDRESS OF INSTRUCTION
;ADD ADDRESS TO INSTRUCTION

SCOP1
INC
INC
(MP
BNE

ADDRESS

;MEM + SP ADDRESS
JPOINTER TO CORRECT DATA
;LOAD 8 WORDS OF MAIN MEMORY

;POINTER TO DATA
;LOAD 8 WORDS OF SP
;POINTER TO DATA
;CLEAR C BIT.

PC,SPLD

010000
BIC
BIS

377

RC
#5% ,R?
PC,MEMLD

°%:

000004

000010

#TSTI114 NEXT

MEMDAT
JSR
SPDAT
JSR

61224

377

#113,TSTND

MOV

BIC

027610

113

MOV

CLR
MOV
JSR

027666
03467¢

104400

027674

1511°3:

001401

005200
022700
001342

5637
5438

001226
001216
001220

TEST

MST(LR

104015
104401
005202

5435

5441

BYTE

BNE
SCOPE

;NEXT ADDRESS
‘DONE YET?

J*ALU TEST
;*TEST OF ALU FUNCTION 2'S COMP SUB WITH C BIT

5436

5439
5440

RO
#10,R0

JNERRRRNARRARKRARNNSARARAAANY

QOO

5408
5409
5410
5411
5412

INC
CMP

.EVEN

5601

5402
5403
5404
5605
5406
5407

SEQ 0102

;SW09-1?
:NEXT DATA
INeXT ADDRESS
JDONE YET?
;BR |F NO
-SCOPE

THIS

TEST

CZDMC
MACY11 30A(1052)
24-AUG-78
czomcC.P11
11-AUG-78 08:21

12:19
PAGE 103
DMC11 ALU TESTS

5442
5443
5444

SEQ 0103

.EVEN

5445

SHRANRRRNNNRANARRAARANKARANN

5446
5447

s*ALU TEST
J*TEST OF ALU FUNCTION DEC A WITH C BIT CLEARED

5450

J*PERFORM THE FUNCTION,

5448
5449

5452
2222

;

027676
027704
027712

012737
012737
012737

027720
027722
0277264
027730
027734
027736
027742
027744
027750
027756
027762
027764
027766
027774

104412
005000
012702
004737
035022
004737
035032
004737
042737
050037
104414
010000
042737
050037

5482
5483
5484
5485
5486
5487

030002
030004
030006
030010
030012
(030016
030020
030022
030024
030026
030030
030032
030036
030040

040560
104414
061224
111205
116104
120504
001401
104015
104401
005202
005200
022700
001342
1064400

5489
5490

030045
030050

376
251

5462

5463

5464
565
5466
5467
5468
5669
5470
5471

5472
5473
5474
5475
5476
5477
5478
5479
5480
5481

5488

5491

5492
5493

7174

s*ALU FUNCTION (A-1)
CODE=7
;*LOAD MAIN MEM AND SP WITH 8 WORLCS OF

5451

5455
5456
5457
5458
5459
5460
5461

TEST

030000

030042

104414

377

000114
030052
027744

001226
001216
001220

T1ST114: MOV
MOv
MOV

030042
034676
034732

034776
000017
027764

000017
030002

027764

030002

1%:

°%:

3%:

000004

6%:
000010

124
251

376
124

TEST

5%:

MSTCLR
(LR
MOV
JSR
MEMDAT
JSR
SPDAT
JSR
BIC
BIS
ROM(CLK
010000
BIC
BIS

ROMCLK

DATA

VERIFY THE RESULTS

AR AR AR R AR RN R RN NN AR RN A AR AN A NRN NN RN A AR AR RN RARANNRR R R R RN

114

#114,TSTNO
ATSTI15 NEXT
#1%,L0CK
RC
5% ,R2
PC,MEMLD
PC,SPLD

C,COLRC
#17,2%
RO.,Z2%

#17,3%
RO, 3%

060400 <7%20>
ROM(CLK
61224
MOVB
(R2) ,RS
MOovB
4(R1) R4
(MPB
RS,R4
BEQ
4%
HLT
15
SCOP1
INC
R2
INC
RO
(MP
010.R0
BNE
1%
SCOPE

BYTE

Attt a kv A e AN AR AR AR AR AR AN R AN

:sR1 CONTAINS BASE DM(C11 ADDRESS
JMASTER CLEAR DM(11
JMEM + SP ADDRESS
JPOINTER TO CORRECT DATA
;LOAD 8 WORDS OF MAIN MEMORY
;POINTER TC DATA
;LOAD 8 WORDS OF SP
;POINTER TO DATA
,CLEAR C BIT!
sCLEAR ADDRESS FIELD OF INSTRUCTION
;ADD ADDRESS TO INSTRUCTION
JNEXT WORD IS INSTRUCTION, ROMCLK PC 5304
;LOAD MAR
;CLEAR ADDRESS OF INSTRUCTION
JADD ADDRESS TO INSTRUCTION

JNEXT WORD IS INSTRUCTION, ROMCLK PC 5304

:BR _ DEC A
JNEXT WORD IS INSTRUCTION, ROMCLK PC-5304
;MOVE BR TO PORT4
;PUT ‘EXPECTED'' IN RS
JPUT "FOUND'' IN R4
;DATA CORRE(CT?
;BR IF YES
sALU ERROR
2 SW09-1?
JNEXT DATA
JNEXT ADDRESS
JDONE YET?
BR 1F NO
(OPE THIS TEST

<1,-7,376,376, 124 124,251,251

.EVEN

5494

JNenmnneannnnnannnnnesnnnnnte

5495
5496

T*ALU TEST
S+TEST OF ALU FUNCTION SEL B WITH ( BIT SET

5497

:*ALU FUNCTION

(B)

(0Dt

JEST

115

wownnnnnnannnnsennrnnsannnnn

CZDMC
MACY11 30A(1052)
24-AUG-78
CZDMCC.PN
11-AUG=78 08:21

12:19 PAGE 104
DMC11 ALU TESTS

5498
5499

;. 0AD MAIN MEM AND SP WITH 8 WORDS OF DATA
J*PERFORM THE FUNCTION, VERIFY THE RESULTS

SS(X)

";tttttttttttttt'tttttt*ttttlttttttttt*ttttttttttttflttfitttttttttt

5501

ggg%

;

5504
5505
5506
5507
5508
5509
5510

030052
030060
030066

012737
012737
012737

030074
030076
030100

104412
005000
012702

5513
5514
5515
5516
5517

030112
030116
030120
030124
030132

004737
035032
004737
042737
050037

5511
5512

030104
030110

004737
035022

5518
5519
5520

030136
030140
030142

042737

5522

030154

104414

5521

5523

030150

030156

104414
010000

050037

030160
030162
030164
030166
030172
030174
030176
030200
030202
(030204

104414
061224
111205
116104
120504
001401
104015
104407
005202
005200

5535
5536

(030212
030214

001342
104400

5538
5539
5540
5541
5542

030221
(30224

377
125

5537

030206

030216

000115
030226
030120

001226
001216
061220

022700
000

TST115: MOV
MOV
MOV

)
030216
034676

034732
055010
000017
030140
000017

030156

030140

030156

1%:

2%.

000004

4%:

000010
377

000

052

JSR
MEMDAT
JSR
SPDAT
JSR
BIC
BIS
ROMCLK

010000

BIC

BIS

125
252

TEST 115

MSTCLR
LR
MOV

040620

5524
5525
5526
5527
5528
5529
§530
5531
5532
5533

5534

SEQ 0104

5$:

ROMCLK

#115, TSTNO
#TST116 NEXT
#1$,L0CK
RO
#5% R2
PC.MEMLD

PC.SPLD
PC,SETC
#1728
RO, 2%
#17.3%

RO, 3%

040400 <11%+20>

ROM(LK
61224
MOVB
MOVR
(MPB
BEQ
HLT
SCOP1
INC
INC

(R2) ,RS
4L(R1) R4
RS,Ré
4%
15
R2
RO

;R1T CONTAINS BASE DM(C11 ADDRESS
*MASTER CLEAR DM(C11
‘MEM + SP ADDRESS
*POINTER TO CORRECT DATA
*LOAD 8 WORDS OF MAIN MEMORY
*POINTER TO DATA

*LOAD 8 WORDS OF SP
;POINTER TO DATA
“SET ¢ BIT.
:CLEAR ADDRESS FIELD OF INSTRUCTION
*ADD ADDRESS TO INSTRUCTION

*NEXT WORD IS INSTRUCTION, ROMCLK PC 5304
:LOAD MAR
*CLEAR ADDRESS OF INSTRUCTION

“ADD ADDRESS TO INSTRUCTION

*NEXT WORD IS INSTRUCTION, ROMCLK PC-5304

‘BR

_SEL B

:NEXT WORD IS INSTRUCTION,
*MOVE BR TO PORT4
SPUT "EXPECTED''
IN RS
JPUT "FOUND'' IN R4
*DATA CORRECT?
;BR IF YES
‘A
U ERROR
L SW09-12
*NEXT DATA
*NEXT ADDRESS

CMP

#10.R0

BYTE

0,-1,0,-1,125,252.125.252

BNE
SCOPE

“DONE YET?

‘BR IF NO
“SCOPE THIS TEST

.EVEN

5543

JNRRRRRRRnnennerarnnnenenan

5544
5545
5546
5547
5548

J*AlLU TEST
J*TEST OF ALU FUNCTION SEL A WITH C BIT SET
J*ALU FUNCTION (A}
CODE=10
;*LOAD MAIN MEM AND SP WITH 8 WORDS OF DATA
s*PERFORM THE FUNCTION, VERIFY THE RESULTS

5549

5550
222}

5553

;

030226

012737

000116

ROMCLK P S304

001226

TST116: MOV

TEST 116

#116,TSTNG

JEST

116

anavannennrnrntnanncantonns

I R

CZDOMC
MACY1T 30A(1052)
24-AUG-78
c2DMCC.P1T
11-AUG-78 08:21

5554
5555
5556
5557
5558
5559
5560
5561
5562
5563
5564

030266
030272
030274

5566
5567
5568
5569

030306
030312
030314
030316

5565

5570

030234
030242

012737
012737

030250
030252
030254
030260
030264

104412
005000
012702
004737
035022

030300

042737

030324

5571
5572
5573
5574
5575
5576
5577
5578
5579
5580
5581
5582
5583

030330
03033¢
030334
030336
030340
030342
030346
030350
030352
030354
030356
030360
030362

5585

030370

5584

5586

5587
5588
5589

004737
035032
004737

050037
104414
010000
042737

050037

1044174
040600
104414
061224
111205
116104
120504
001401
104015
104401
005202
005200
022700

030366

001342

030372

000

030375
030400

04400

377
252

030402
030274

12:19
PAGE 105
DMC11 ALU TESTS

001216
001220

030372
034676
034732
035010

000017

030314

000017

030332

030314

030332

1%:

2%:

000004

4%:

000010

c00

125
252

377
125

MOV
MOV

#TST117 NEXT
#1%,10CK

MSTCLR
CLR
MOV
JSR
MEMDAT

RO
#5% ,R2
PC,MEMLD

BIC

#1? 2%

JSR
SPDAT
JSR

5%:

PC,SPLD
PC,SETC

BIS
ROMCLK
010000
BIC

BIS

SEQ 0105

JR1 CONTAINS BASE DM(C11 ADDRESS
JMASTER CLEAR DMC11
<MEM + SP ADDRESS
JPOINTER TO CORRECT DATA
;LOAD 8 WORDS OF MAIN MEMORY
;POINTER TO DATA
;LOAD 8 WORDS OF SP
JPOINTER TO DATA
JSET C BIT!

;CLEAR ADDRESS FIELD OF INSTRUCTION

RO, 2$

;ADD ADDRESS TO INSTRUCTION
JNEXT WORD IS INSTRUCTION, ROMCLK P(C=5304
;LOAD MAR
sCLEAR ADDRESS OF INSTRUCTION

#17,3%

30, 38

:ADD ADDRESS TO INSTRUCTION

ROM(CLK
040400.<10+20>
ROM(L K
61224
MOVR
(R2) ,RS
MOVB
4(R1) R4
(MPR
RS,R4
BEQ
4%
HLT
15
SCOP
INC
R2
INC
RO
(MP
#10,R0

JNEXT WORD IS INSTRUCTION, ROMCLK P(C=5304
.BR
SEL A
NEXT WORD IS INSTRUCTION, ROM(.K PC 5304
;JMOVE BR TO PORT4
JPUT "EXPECTED'' IN RS
JPUT "FOUND'' IN R4
.DATA rfORRECT?
JBR IF YES
;JALU ERROR
; Sw09=17?
JNEXT DATA
JNEXT ADDRESS
;DONE YET?

BNE

JBR IF

BYTE

€.0.=1,=-1,1¢5,125,252.252

SCOPE

-SCOPE

THIS TEST

.FVEN

5590
5591
5592

Jreunanwnnannnnntenenrnnntnn

5593
5594
559¢
5596
5597

'ALU TEST
J*TEST OF ALU FUNCTION A OR NOTB WITH C BIT SET
:‘ALU FUNCTION (A OR NOTB)
(ODE-12
s« OAD MAIN MEM AND SP WITH 8 WORDS OF DATA
J*PERFORM THE FUNCTION, VERIFY THE RESULTS

5598

5599

228?

;

5602

030402

012737

000117

001226

T1ST117: MOV

5604
5605
5606
5607
5608
5609

030416

012737

030450

001220

MOV

030424
030426
030430
030434

104412
005000
012702
004737

5603 030410 012737 030556 001216
030546
034676

A AR AN RN

A T

[EST

117

R R AN A AN R RN RN R AN

nennnennssvannnnnntnntantnns

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

TEST 117

MOV

MSTCLR
(LR
MOV
JSK

TSTNO
nsfizo.NExT

#1%,L0CK

RO
¢ R?
PC ,MEMLD

;JR1 (ONTAINS BASE DM(11 ADDRESS
JMASTER CLEAR DM(C11
JMEM ¢+ SP ADDRESS
JPOINTER TO CORRECT DATA
,LOAD 8 WORDS OF MAIN MEMORY

CZDMC
MACY11 30A(1052)
24;AUG-78
cZ0MCC PN
11-AUG-78 08:2

5610
5611
5612
5613
5614
5615
5616
5617
5618
5619
5620
5621
5622
5623

5624
5625
5626
5627
5628
5629
5630
5631
563¢
5633
5634
5635
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

030440
030442

035022
004737

034732

030450
030454
030462

004737
042737
050037

035010
000017
030470

030472
030500

042737
050037

000017
930506

12:19

PAGE 106

DMC11 ALU TESTS
MEMDAT

030470

030506

1%:

116104
1205C4
001401
104015
104401
005202
005200
022700
001342
104400

030551
030554

377
252

030546

377

2% :

000004

000010

5¢:

000

377
377

JSR

BIC

PC,SPLD

ROMCLK

010000

BIC
BIS

:POINTER

TO DATA

*LOAD 8 WORDS OF SP
:POINTER TO DATA

PC,SETC

SSET C BIT!

RO,2$

*ADD ADDRESS TO INSTRUCTION

#17.2%

BIS

3¢ -

030516
030522
030524
030526
030530
030532
030534
030536
030542
030544

JSR
SPDAT

SEQ 0106

;CLEAR ADDRESS FIELD OF INSTRUCTION
;NEXT WORD

:LOAD MAR

#17,3%
RO, 3$

INSTRUCTION,

SNEXT WORD IS INSTRUCTION,
BR _ A OR NOTB

MOVB
MOVR

SPUT "EXPECTED'®
IN RS
JPUT "FOUND'' IN R4

(MPB
8EQ
HLT
SCOP1
INC
INC
(MP
BNE
SCOPE

BYTE

5304

:CLEAR ADDRESS OF INSTRUCTION
*ADD ADDRESS TO INSTRUCTION

ROMCLK
040400 <12%20.

ROMCLK
61224

ROMCLK PC

(R2) ,RS
4(R1) R4

R5,Ré4
A
1<

ROMCLK PC-5304

*NEXT WORD IS INSTRUCTION, ROMCLK PC-5304
:MOVE BR TO PORT4
:DATA CORRECT?
:BR I+t YES

*ALU ERROR
1SW09=12
*NEXT DATA
*NEXT ADDRESS

R2
RO
#10,R0
1¢

:DONE YET?
‘BR IF NO
.SCOPE

THIS

=1,0,-1,-1.-1,125.252.-1

Juwnnnnnnnnwnnnnennrrnrnnantwan

[EST

TEST

120

wtnnnnnnnnseennnerrnnannanwnnn

c*ALU TEST
J* EST OF ALU FUNCTION A AND B WITH C B]T SET
J*ALU FUNCTION (A AND B)
CODE 13
;*LOAD MAIN MEM AND SP WITH 8 WORDS OF DATA

*PERFORM

THE

FUNCTION,

VERIFY

THE

RESULTS

":"'tit.ltttfi*QiQ"fi'tltt!tt!'fifi"filtfitl‘tit'ttt'.t!.t"t.'.'ttt'i

;

030556
030564
030572

012737
012737
012737

030600
030602
030604
030610
030614
030616
030622
030624
030630
030636
030642

104412
005000
012702
004737
035022
004 737
035
004727
042737
050037
104414

000120
030732
030624

001226
1216
0012
001220

T1ST12G:

MST(LR
(LR

MOV

JSR

034732

030644

MOV
MOV
MOV

030722
034676

035010

TEST

(30644

1%:

MEMDAT
JSR
SPDAT
JSR

BI¢
BIS

ROM( _k

120

#120,TSTNO
#1ST127 NEXT

#18,L0CK
RO
#58 ,R2
PC ,MEMLD
PC,SPLD
PC,SETC

#1728
R, 28

;RT CONTAINS BASE DMC11
*MASTER CLEAR DM(11

ADDRESS

*MEM + SP ADDRESS
*POINTER TO CORRECT DATA
*LOAD 8 WORDS OF MAIN MEMORY
*POINTER TO DATA
*LOAD 8 WORDS OF SP
‘POINTER TO DATA
SSET C BIT!

:CLEAR ADDRESS FIELD OF INSTRUCTION
*ADD ADDRESS TO INSTRUCTION
JNEXT WORD

INSTRUCTION,

ROMCLk

S3(4

C{DOMC
MACY11 30A(1052)
264-AUG-78
czomcc.P
11-AUG~-78 08:21
5666
5667

030644
030646

010000
0642737

5669
5670
5671
5672
5673
5674
5675
5676
5677
5678
5679
5680
5681

030660
030662
030664
030666
030670
030672
030676
030700
030702
030704
030706
030710
030712

104414
040660
1046414
061224
111205
16104
120504
001401
104015
104401
005202
005200
022700
001342
104400
000
377
0G0

5668

5682
5683
5684
5685
5686
5687
5688
5689

030654

030716
030720
030722
030725
030730

050037

000017

130662

12:19
PAGE 107
DMC11 ALU TESTS

030662

2%:

BIS

3%:

000004

(%
000010
000
125
252

000
000

010000
BIC

5%:

SEQ 0107

;LOAD MAR
;CLEAR ADDRESS CF

#17,3%

RO.3$

ROMCLK
060400.<13x20>
ROM(LK
61224
MOVB
(R2) ,RS
MOVRB
4(R1) ,R4
CMPS
RS.,R¢4
BEQ
4%
HLT
15
SCOP1
INC
RZ
INC
RO
CMP
#10,R0

BNE
SCOPE
BYTE

INSTRUCTION

JADD ADDRESS TO INSTRUCTION

JNEXT WORD IS INSTRUCTION, ROMCLK PC 5304
JBR
A AND B
;NEXT WORD IS INSTRUCTION, ROMCLK PC 5304
JMOVE BR TO PORT4
JPUT "EXPECTED'' IN RS
JPUT "FOUND'' IN R4
;DATA CORRE(CT?
JBR IF YES
;ALU ERROR
. SW09=1?
JNEXT DATA
JNEXT ADDRESS
JDONE YET?

JBR IF NG
;SCOPE THIS
0,9,0,-1,125,0,0,25¢

TEST

LEVEN

5690

JANRRRRRRRRANER
R nnnasny TEST

5691
5692
5693
5694
€695

;*ALU TEST
J«TEST OF ALU FUNCTION A OR B WITH C BIT SET

5701

5702
5703
5704
5705
5706
5707
5708
5709
5710
5711

57212

s*PFRFORM THE FUNCTION, VERIFY THE RESULTS
IR

030732

012737

030746

012737

030740

030754
030756
030760
030764
(030770
030772
030776
031000

031004

012737
104412
005000
012702
004737
035022
004737
035032
004737

042737

5713
572164
5715
5716

031012
031016
031020
031022

050037
104414
010000
042737

5718

031034

104414

5720
5721

031040
031042

5717
57219

sannnsnnsnnsantansnsnenvnnn

;*ALU FUNCTION (A OR B)
CODE=14
.*LOAD MAIN MEM AND SP wlTH 8 WORDS OF DATA

5696

5697
5698
5699
5700

7121

031030

031036

052037
040700

104414
0€1224

000121

001226

031000

001220

031106

601216

MOV
MOV

034732
035010

031020

000017

0%°03%%

031020

03103¢

AN R AR

RN N AN AN N AN NN RN AN

P AR AR

AR AN NN AR SRR RN RN RN AR

.
TEST 121
R
e
T1ST121: MOV
#1271 ,TSTNO

031076
034676

000017

'$:

’$:

MSTCLR
(LR
MOV
JSR
MEMDAT
JSR
SPDAT
JSR

BIC

BIS
ROMCLK
010000
B8IC

BIS

kS ¥

ROMCLK

#1ST122 NEXT
#18,L0CK

RO
#5% ,R2
PC ,MEMLD
PC,SPLD
PC_SETC

t17,2$
RO,Z2$

#1738

RO.§$

040400 <14+ (>

ROM(L K
€204

;JRT CONTAINS BASE DMC11 ADDRESS
JMASTER CLEAR DM(C11
JMEM + SP ADDRESS
;POINTER TO CORRECT DATA
;LOAD 8 WORDS OF MAIN MEMORY
;POINTER TO DATA
;JLOAD 8 WORDS OF SP
;POINTER TO DATA
JSET C BIT!

sCLEAR ADDRESS FIELD OF INSTRUCTION

.ADD ADDRESS TO INSTRUCTION
JNEXT WORD IS INSTRUCTION, ROMCLK PC=S5304
.LOAD MAR
;CLEAR ADDRESS OF INSTRUCTION

;ADD ADDRESS TO INSTRUCTION

JNEXT WORD IS INSTRUCTION, ROMCLK PC=5304
JBR

A 0ORB

;NEXT WORD IS INSTRUCTION, ROM(
K Pr 5304
JMOvE BR T(Q PQORT4

CZDMC
MACY11 30A(1052)
24-AUG-78
czomcc.P1M
11-AUG~78 08:21

5722

5723
5724

C31044

031046
031052

111208

116104
120504

5725
5726
5727
5728
5729
5730
5731
5732

031054
031056
031060
031062
031064
031066
031072
031074

001401
104015
104401
005202
005200
022700
001342
1046400

5734
5735
5736
573%7
5738

031101
031104

377
377

5733

031076

000

12:19
PAGE 108
DMC11 ALU TESTS

MOVR

000004

MOVR
(MPH

4%
000'0

177

125
252

377

5%:

SEQ 0108

(R2) RS

JPUT "EXPECTED'' IN RS

4%
15

;BR IF YES
;ALU ERROR
;SW09=1?
JNEXT DATA
JNEXT ADDRESS
;DONE YET?
;BR IF NC
:SCOPE THIS TEST

4(R1) R4
RS ,Ré4

BEQ
HLT
SCOP1
INC
INC
(MP
BNE
SCOPE

R2
RO
#10,R0
1%

BYTE

JPUT "FOUND'' IN R4
sDATA CORRE(CT?

0.-1.-1,-1,125,-1,-1,252

JEVEN

5736

JRNRRRARARR
RN R ARkt nwnrnrn

5740

J*ALU TEST

5742
5743
5744

s*ALU FUNCTION (A XOR B)
CODE - 15
;*LOAD MAIN MEM AND SP WITH 8 WORDS OF DATA
s*PERFORM THE FUNCTION, VERIFY THE RESULTS

5741

J*«TEST OF

5745

5746
5747
5748

;

57649
5750
5751
5752
5753
5754
5755
5756
5757
5758
5759
57260

031106
031114
031122

012737
012737
0127%7

031130
031132
031134
031140
031144
0%1146
C31152
031154

104412
005000
012702
004737
(035022
004737
035032
00473

5767
5764
5765

(031172
031174
031176

104414
010000
042737

5767
5768
5769
5770
5771
5772
5773
5776
€775
5776
5777

031210
031212
031214
031216
031220
031222
(031226
031230
031232
03123
(C3'2%

104414
040720
104414
061224
111205
116104
129504
0014C?
04015
104401
00520

5761
5762

5766

031160
031166

031206

042737
050037

050037

000122
031262
031154

001226
00°216
001220

000017

03121/

tannnannaneannsnnnnnnnnnnen

ALU FUNCTION A XOR B WITH C BIT

A AR AN R AN N AR NN AR AR

SET

R R AN RN ANN R A RN AN R R R

AR ANANANN AN NN RN AN RNRS

TEST 122

T1S1122: MOV
MOV
MOV

03732

000017
031174

1220

m—e——eccccccccaa

03125/
0367¢

035010

[EST

(31174

(2'>°0>

1%:

MSTCLR
(LR
MOV
JSR
MEMDAT
JSR
SPDAT
JSR

BI(
BIS

ROM(L K
010000
BIC

BIS

000004

#122,TSTNO
#7ST123 NEXT
#18,10CK
RO
#5%,R2
PC ,MEMLD
PC,SPLD

PC_SETC

#1708
RO, 2%
#7 3%

RO, %

ROM(LK
040400 . <15220>
ROM( LK
61224
MOVR
(R2) RS
MOVR
4(R1) RS
(MPR
RS ,R4
BfQ
43
HLT
16
ST OR
N
ko

JR1 CONTAINS BASE DM(C11 ADDRESS
JMASTER CLEAR DM(C11
;MEM + SP ADDRESS
JPOINTER TO CORRECT CATA
;LOAD 8 WORDS OF MAIN MEMORY
;POINTER TO DATA
;LOAD 8 WORDS OF SP
JPOINTER TO DATA
JSET C BIT.

;CLEAR ADDRESS FIELD OF INSTRUCTION
;ADD ADDRESS TO INSTRUCTION

JNEXT WORD IS INSTRUCTION, ROMCLK P(C-5304
;LOAD MAR
;CLEAR ADDRESS OF INSTRUCTION

*ADD ADDRESS TO INSTRUCTION

JNEXT WORD IS INSTRUCTION, ROM(LK P(C=5304
;BR
A XOR B
JNEXT WORD IS INSTRUCTION, ROM(LK P(C 5304
JMOVE BR TO PORT4
JPUT "EXPECTED'' IN RS
JPUT "FOUND'' IN R4
;DATA CORRE(T?
;BR IF YES
JA_U ERROR
JSw09 1°?
JNEXT DATA

(ZOMC
MACY11 30A(1052)
24-AUG-78
CZDMCC.P1N
11-AUG-78 (8:21

5778
5779
5780
5781

031240
031242
031246
031250

005200
022700
001342
104400

5783

031255

5782

5784
5785

031252
031260

000

377

12:19
PAGE 109
DMC11 ALU TESTS

000010

377

000

377

277

INC
(MP
BNE
SCOPE

.BYTE

SEQ 0109

RO
#10,R0
1%

JNEXT ADDRESS
JDONE YET?
sBR IF NO
:SCOPE THIS TEST

0,-1,-,0,0,-1,-1,0

.EVEN

5786
5787

5788

sveennnnnnannnnnannnnwnntatnn

5789
5790
5791
5792
5793

J*ALU TEST
J*TEST OF ALU FUNCTION ADD WITH C BIT SET
c*ALU FUNCTION (A PLUS B)
CODE=00
c*LOAD MAIN MEM ANC SP WITH 8 WORDS OF DATA
J*PERFORM THE FUNCTION, VERIFY THE RESULTS

5794

5795
5796
5797
S798
5799
5800
5801
5802
5803
5804
5805
5806
5807
5808
5809

031262
031270
031276

012737
0127%7
012737

031304
031306
031310
031314
(31320
031322
031326
031330

104412
005000
012702
004737
035022
004737
035032
004737

5811
5812
5813
5814

03132
031346
031350
0%1352

050037
104414
010000
042737

5816
5817
5818
5819
5820
5821
5822

031364
031366
031370
031372
031374
031376
031402

104414
0460400
104414
061224
111205
116106
120504

5810

5815

5823
5824
5825
5826
5827
5828
5829
5830
5831
5832

5873

031334

(031360

031404
031406
C31410
031412
031414
(031416
031422
0314246
03142¢
031431
3,3,

042737

050037

001401
104015
104401
005202
005200
022700
001342
104400
000
37¢
7

000123
031436
031330

(00122¢
001216
001229

T151123:

)
031426
03467¢
034732

035010

000017

031350

000017

031366

(135

(31366

‘$:

’%:

00000«

000010

RIA

AR
37

;s
TEST 127
mmmmeceecec———MOv
#123, TSTNG
MOV
HTSTI26 NEXT
MOV
#1%,L0CK
MST{LR
CLR
MOV
JSR
MEMDAT
JSR
SPDAT
JSR

BIC

BIS
ROM(LK
010000
BIC

BIS

=7
252

AN RN AN R R RN A A R

RO
#5% ,R2
PC ,MEMLD
PC,SPLD

PC SETC

01’.23

”7,3%

3
19

R2
RO
8'C,KRC
i
R

evnnenannnnnnnnnnannnnvtnns

AR AN AN N AN N NANAN AR AC AN RANANN NN PR AN RN RN RN

JR1 CONTAINS BASE DMC11 ADDRESS
JMASTER CLEAR DMC11
sMEM + SP ADDRESS
JPOINTER TO CORRECT DATA
;L 0AD 8 WORDS OF MAIN MEMORY
JPOINTER TO DATA
sLOAD 8 WORDS OF SP
JPOINTER TO DATA
JSET C BIT.

;ADD ADDRESS TO INSTRUCTION
JNEXT WORD IS INSTRUCTION, ROMCLK PC
.LOAD MAR
sCLEAR ADDRESS OF INSTRUCTION

ROM(CL K
060400! <00+20>
ROMCLK
61224
MOVR
(R2) RS
MOvB
4(R1) ,R4
(MPR
RS ,R4

BEQ
HLT
SCOP1
INC
INC
(mpP
BNt
STOFE
JHYTE

123

sCLEAR ADDRESS FIELD OF INSTRUCTION

RC.,S

RO, $8

JEST

*ADD ADDRESS TO INSTRUCTION

JNEXT WORD IS INSTRUCTION,
JBR
ADD
JNEXT WORD IS INSTRUCTION,
JMOVE BR TO PORT4
JPUT "EXPECTED'' IN RS
JPUT "FOUND'' [N R4
;DATA (ORRECT?

JBR JF YES
JALU ERROR
,SW09-1?
INEXT DATA
sNEXT ADDRESS
JDONE YET?
JBR [F NO
JSCOPE THIC Tf
T
LR
P R

5304

ROMCLK PC

5304

ROMCLK PC

5304

CZOMC

MACYIY

czomMcc.P1

30A(1052)

24=-AUG-78

11-AUG~78 08:21

12:19

PAGE

110

DMC11 ALU TES'S

5834
5835
5836

SEQ 0110

.EVEN

S83%7

Jrrnennannarnnennernennwnnnnn

5838
5839
5840
5841

s*ALU TEST
J*TEST OF ALU FUNCTION 2A W/C WITH C BIT SET
J~ALU FUNCTION (A PLUS A PLUS ()
CODE=6
;*LOAD MAIN MEM AND SP WITH 8 WORDS OF DATA

5843

2842
5844

;

5847

031436

(12737

5849
5850
5851
5852
5853
585
5855
5856
5857
5858

031452

012737

031460
031462
031464
031470
031474
031476
031502
031504

104412
005000
012702
004737
035022
004737
035032
004737

5861
5862
5863

031522
031524
031526

5865

031540

5859
5860

5864

5866

5867
5868
5869
5870
5871
5872
5873
5874
5875
5876
5877
5878
5879

5880

5881
5882
5883
5884
5885

031444

031510
031516

031534

031542

012737

042737
050037

104414
010000
042737

050037
104414

001226

031504

001220

001216

104414
061224
111205
116104
120504
001401
104015
104401
005202
005200
022700
00132
104400

031605
031610

177
125

ool

T157124:

031602
03%67¢
}
0373C
0350°0C

000017
(31524
000017

03154

03%'%2¢

T31¢¢.

040540

031544
031546
031550
031552
(31556
031560
031562
031564
(31566
031570
031572
031576
031600

031602

000124

031612

'S,

arnnannenannannnnneneonanns

00uCLe

«%:

CCOG".

77
L4

8124

MOV

#18,L0CK

MSTCLR
LR
MOV
.SR
MEMDAT
JSR
SPDAT
_SR

Bl
BIS

ROM( _K
010000
BIC

ROM( LK

BYTE

TSTNO

#1ST125 NEXT

RC
#5% ,R2
PC,MEMLD
PC,SPLD
P

SETC

JRT (ONTAINS BASE DM(C11 ADDRESS
JMASTER CLEAR DM( 11
JMEM + SP ADDRESS
JPOINTER TO CORRECT DATA
JLOAD 8 WORDS OF MAIN MEMORY
JPOINTER TC DATA
.LOAD 8 WORDS OF SP
JPOINTER TO DATA
JSET C BIT!

017,28
RO.é‘

sCLEAR ADDRESS FIELD OF INSTRUCTION
;ADD ADDRESS TO INSTRUCTION

”7, 3

.LOAD MAR
sCLEAR ADDRESS OF

RO.%‘

0460407 <6+ 20>

ROMCL ¥
61224
MOVB
MOVR
CMPR
BtQ
HLT
SCoP1
INC
INC
(MP
BnE
SC(OPt

124

MOV

MOv

BIS
8 .

C6 4
¢

TEST

(R2) RS
4(R1Y R4
RS .R4
63
15

R2
RO
#10,RC
8

JNEXT WORD IS

INSTRUCTION,

ROMCLK P(C-5304

INSTRUCTION

;ADD ADDRESS TO INSTRUCTION

JNEXT WORD ]S INSTRUCTION, ROMCLK PC 5304
;BR

2A wW/C

;NEXT WORD IS INSTRUCTION, ROMCLK P(=5304
;MOVE BR TO PORTS
JPUT "EXPECTED''
IN RS
JPUT "FOUND'® IN R¢
JDATA CORRE(CT?
;BR IF YES
sALU ERROR
. SW09=1?
JNEXT DATA
JNEXT ADDRESS
JDONE YET?
sBR [F NO
+SCOPE THIS TENT

1,0 =0 a1, 052 288 735 .8

JHuEN

5886

Jveeessccnnenescenresessonne

588~
5888

J*ALU TEST
JoTEST OF “LU FUNLTION SUB wiTW

588¥

104

;*PERFORM
THEA
FUNCTION,
VERIFY
THE RESULTS
A
R
A A
A R A
R
R

gag

5848

JEST

JeALL FUNCTION (A=B)

TEST

.ODE 16

1705

osneencecennencstsscnrrenee

BIT

<E?

COMC

MACYYT

czomMcc.PI

30A(1052)

24-AUG-78

11-AUG~78 08:21

12:19

PAGE

5890
5891

5905
5906
5907
5908
5909
5910
"5911
5912
5913
5914
5915

5916
5917
5918
5919
5920
5921

5922

IR AN AN AR AR

031672
031620
031626

(12737
02737
012737

031636
031636
031640
031644
031650
031652
031656
031660
031664

104472
005000
012702
004737
035022
004737
035032
004737
042737

031676
031700
031702
031710
031714
031716
031720
031722
031724
031726
031732
03173
03173

104414
010000
042737
050037
104414
040740
104414
061224
111205
116104
120504
001401
104015

031672

5923
5924
5925
5926
5927

031740
031742
031744
031746
(31752

5929

031756

5928

593G
5931
5932
5933

SEQ 0111

;«LOAD MAIN MEM AND SP WITH 8 WORDS OF DATA
J*PERFORM THE FUNCTION, VERIFY THE RESULTS

5892

5893
5894
5895
5896
5897
5898
5899
5900
5901
5902
5903
5904

111

DMC11 ALU TESTS

050037

031754

1046601
005202
005200
022700
001342
104400

031761
(31764

000
125

000

000125
031766
031660

001226
001216
001220

;
TEST 125
Jmm————e—em——————
TST125: MOV
#125,TSTNO
MOV
HTST126 ,NEXT
MOV
#18,10CK

0371756
034674
034732

055010
00007

031700

000017
031776

,
(<700

N317°4

(O00CLe

%
000010

001

000
000

277

J63

MSTCLR
CLR
MOV
JSR
MEMDAT
+SR
SPDAT
JSR
8IC

RO
#5% ,R2
PC ,MEMLD
PC,SPLD

R R A RN AN RN R R

JR1T CONTAINS BASE DM(11 ADDRESS
JMASTER CLEAR DM(C11
JMEM + SP ADDRESS
JPOINTER TO CORRECT DATA
;LOAD 8 WORDS OF MAIN MEMORY
JPOINTER TO DATA
;LOAD 8 WORDS OF SP
JPOINTER TO DATA
JSET C BIT!
JCLEAR ADDRESS FIELD OF INSTRUCTION

BIS

P(LSEYC
#,2%
RO, 2%

SCOP1
INC
IN(
CMP
BNE

R2
RO
#1C RC
'$

BYTE

0,1,-1,0,0,253.1205.0

ROM(CLK
010000
8](
#7,3%
BIS
RC, 3%
ROM(LK
0460400 .<16+20>
ROM( LK
61224
MOVR
‘R¢J RS
MOVR
L(RY) R4
(MPR
RS,RS
BEQ
43
HLT
15

SCOFE

AR R AR ARNN NN NN RN O RN AN NI NI NN RN R

;ADD ADDRESS

TO INSTRU(TION

JNEXT WORD IS INSTRUCTION, ROMCLK PC 5304
.LOAD MAR
JCLEAR ADDRESS OF INSTRUCTION
JADD ADDRESS TO INSTRUCTION
JNEXT WORD IS INSTRUCTION, ROMCLK P(=5304
:BR
SUR
NEXT WORD IS INSTRUCTION, ROMCLK P(=-5304
;MOVE BR TD PORT4
JPUT "EXPECTED'® IN RS
JPUT "FOUND'' IN Ré
;DATA CORRECT?
,BR IF YES
JALU ERROR

. ow09-1?
JNEXT DATA
JNEXT ADDRESS
;DONE YET?
;BR [F NO
-SCOPE THIS TEST

LEVEN

5934
5915

Jeseennavannvtnccosnnnnneesn JEST 126 eravecrnceennencnnnceaneers
JeALU TEST
S*TEST OF ALU FUNCTION ADD Ww/(C WITH ( BIT SE?
seALU FUNCTION (A PLUS B PLUS ()
(ODE=0
c*LOAD MAIN MEM ANL SP WlTr 8 JORDS OF DATA

5936
5937
5938
5939

5940

c*PERFORM THE FUNCTION, VERIFY THE RESWLTS

5%
5G
5944

:
.

53¢ 1

5945

_R'7H¢

0787

(KK 26

JUTece

TaT1s¢: MOy

TEST

126
e-

8126, TSING

CZOMC

MACY11

C20M(CC.P11
5946
9947
5948
5949
5950
95951
5952
5953
5954
5955
5956

031774
032002

(012737
012737

032010

104412

032012
032014
032020
0320246
032026
032032
032034

035032
004737

032046
032052
032054

050037
104414
010000

5957

032040

5961

032056

5958
95959
5960

5962

5963

5964
5965
5966
5967
5968
5969
5970
5971
5972

5973
5974
5975
5976
5977
5978
5879
5980
5981
598>
5983

30A(1052)

005000
012702

004737

035022
004737

042737

032064

050037

032072
032074
032076
032100
032102
032106
032110
032112
032114

040420
104414
061224
111205
1161046
120504
001401
104015
104401

032070

032116
032120
032122
032126
032130
032132
032135
032140

24;AUG-78

11-AUG~78 08:2

104474

005202
005200
022700
001342
104400
oo
377
000

032142
032034

12:19

PAGE

112

DMC11 ALU TESTS

001216
001220

MOV
MOV

SEQ@ 0112
#TST127 NEXT
#18,L0(K

MSTC.R
032132
034676
034732

03510

000017

032054

000017

232072

032054

032072

1%:

2% :

0NO00U-

000010
000
000

BIC

BIS
ROMCLK
010000
BIC

BIS
B ¥

Co0
253
05

CLR
MOV
JSR
MEMDAT
JSR
SPDAT
JSR

5%:

ROMCLK

RO
#5% R2
PC .MEMLD

PC,SPLD

PC,SETC

l17.2$
RO.Z2%

#17,3%

?O,is

0604600.<01+20>
ROM(L K
61224
MOvB
(R2) ,RS
MOVA
4(R1) R4
(MPR
R5,R4
BEQ
3
HLT
15
SCOF?

INC
INC
(MP
BNE
SCOPE
BYTE

R2
RO
#10,R0
1%

JR1 CONTAINS BASE DMC11 ADDRESS
JMASTER CLEAR DM(11
;JMEM + SP ADDRESS
JPOINTER TO CORRECT DATA
JLOAD 8 WORDS OF MAIN MEMORY
;JPOINTER TO DATA
;LOAD 8 WORDS OF SP
JPOINTER TO DATA
JSET C BIT!

;CLEAR ADDRESS FIELD OF INSTRUCTION

;ADD ADDRESS TO INSTRUCTION
JNEXT WORD IS INSTRUCTION, ROMCLK P(=5304
;LOAD MAR
sCLEAR ADDRESS OF

INSTRUCTION

;ADD ADDRESS TO INSTRUCTION

JNEXT WORD IS INSTRUCTION, ROMCLK P(C=5304
;BR _ ADD W/(C
sNEXT WORD IS INSTRUCTION,
;MOVE BR TO PORTS
JPUT "EXPECTED'' IN RS
JPUT "FOUND'' IN Ré
;DATA CORRECT?
;BR IF YES
;ALU ERROR
2 SW09=1?

JNEXT DATA
JNEXT ADDRESS
sDONE YET?
;JBR IF NO
JSCOPE THIS TEST
1,0,6.-1,255,0,0,125

LEVEN

5984

Jernnevanantnanenttnrnanenrn

5985
5986
5987
5988

SeALy TEST
J*TEST OF ALU FUNCTION >UB Ww/(C WITH C BIT SET
JALL FUNCTION (A-B=()
CODE-2
;*LOAD MAIN MEM AND SP wlTH 8 WORDS OF DATA

2989
5991

ggg%

;

5994

032142

012737

000127

00122¢

TST127: MOV

5996
5997
S998

032156

012737

032210

001220

MOV

032164
032166
03217C
U32174

104412
005000
(012702
0046737

€999
6000
6001

JEST

127

snnntsnsresnnnennannennnnesn

;*PERFORM
THE L
FUNCTION,
VERIFY THE RFSULTS
R LR
L
S

5990

5995

032150

012737

032316

(3230¢
(344 7¢

ROMCLK PC-5306

001276

TEST 127

MOV

MST(LKA
"R
MCrv
ML

8127 ,TSTNO

#1STI30 NEXT
#18,L0CK

RO
ye ke
POMEM D

JR1 (ONTAINS BASE DM(11 ADDRESS
JMASTER CLEAR DM(11
*MEM + SP ADDRESS
JPOINTER TO (ORRECT DATA
;. OAD 8 WORDS OF MAIN MEMCKY

Y T RN

(OMC
MACYY 30A(10;2)
24;AUG—78
czomcc.P1
11-AuG~-78 08:/2
6002

6003
6004

032200

035022

032202
032206

004737
035032

034732

032214
032222

042737
050037

000017
03223C

6005

032210

6008
6009
6010

032226
032230
032232

6012
6013
6014
6015

032244
032246
032250
032252

6017
6018
6019
6020
6021
6022
6023
6026
6025
6026

032256
032262
032264
032266
032270
032272
032274
032276
032302
032304

116104
120504
001401
104015
104401
005202
005200
022700
001342
104400

6028
6029
6030
6031
6032

032311
032314

000
125

6006
6007

6011

6016

6027

032240

032254

032306

004737

104414
010000
042737

050037

106414
040440
104414
061224
111205

000

035010

00007

230046

12:19
PAGE 113
DMC11 ALU TESTS
MEMDAT

(32230

032246

1%:

ROMCLK
010000
BIC

«%:
000010

$77

252

S%:

PC,SPLD
PCSETC

#17,2%
RO, 2$

#17,3%

RO, 3%

JPOINTER TO DATA

JLOAD 8 WORDS OF SP
JPOINTER TO DATA
JSET C BIT!

;CLEAR ADDRESS FIELD OF INSTRUCTION
JADD ADDRESS TO INSTRUCTION

JNEXT WORD IS INSTRUCTION, ROMCLK PC 5304
;LOAD MAR
;CLEAR ADDRESS OF INSTRUCTION

JADD ADDRESS TO INSTRUCTION

ROMCLK
040400 <2+20>
ROMCLK
61224

;NEXT WORD IS INSTRUCTION, ROMCLK P(=5304
:BR _ SUB W/(
JNEXT WORD IS INSTRUCTION, ROMCLK P(=5304
;MOVE BR TO PORT4

MOVR
CMPB
BEQ
HLT
SCoP?
INC
INC
(MP
BNE
SCOPE

JPUT "FOUND'' IN R4
;DATA CORRECT?
JBR I+ YES
JALU ERROR
; SW09-1?
JNEXT DATA
JNEXT ADDRESS
JDONE YET?
JBR IF NO
:SCOPE THIS TEST

MOvVR

000004

000
000

JSR

BIC
BIS

BIS
3%:

001

JSR
SPDAT

SEQ 0113

BYTE

(R2) ,RS

4(R1) R4
R5,R4
3
1€
R2
RO
#10,R0
'$

JPUT "EXPECTED'' IN RS

0,1,-1,0,0,253,185,0

EVEN

6033

Juvnnnnnnnnnnantvasennennnnn

6034
6035
6036
6037
6038

J*ALU TEST
s*TEST OF ALU FUNCTION INC A WITH C BIT SET
S*ALU FUNCTION (A PLUS 1)
(ODE=3
.*LOAD MAIN MEM AND SP WITH 8 WORDS OF DATA
J*PERFORM THE FUNCTION, VERIFY THE RESULTS

6039

AR A

6040
6041
6042
6062

(32316

(12737

(00130

0C'22¢

6045

(32332

012737

03234

00'220

03230
032342
032344
032350
03235
032356
032362

104412
005000
012702
004737
035022
004737
035032

6046

60466

6047
6048
6049
6050
6051
6052
6053

032324

012737

60564

032364

004737

6056
6057

032376
03%3240c

050037
104414

6055

032370

042737

032472

00121€

MOV
MOV

034676

03732

035010
032404

(C3ca(

130

ennnnennnsnnnnnrnnnennnannn

T T TR R

PR R R

R R

PR RPN

;s
TEST 130
e emeeeccee~
T1ST'30: MOy
#130,TSTNO

]
03246¢

000017

JEST

'$:

MST(LR
(LR
MOy
JSR
MEMDAT
JSR
SPDAT

JSR

BI(

8IS
ROM( | «

#1STi37 NEXT
#18,10CK

RO
#5% .R°

P( ,MEMLD

PC,SPLD

JR1 (ONTAINS BASE DM(11 ADDRESS

JMASTER CLEAR DM(11
JMEM + SP ADDRESS
JPOINTER TO CORRECT DATA
JLOAD 8 WORDS OF MAIN MEMORY
cPOINTER TO DATA
JLOAD 8 WORDS OF SP
JPOINTER TO DATA

PC SETC

JSET ( BIT.

ke,c$

;ADD ADDRESS TO INSTRUCTION
JNEXT WORD IS INSTRUCTION, ROM(.x

01"2$

sC_EAR ADDRESS FIELD OF

[NSTRUCTION
P

374

(7DMC
MACYT1 30A(1052)
24=-AUG-78
CZDMCC.P11
11-AUG-78 08:21

032404
032406
032414
032420
032422
032424
032426
032430
032432
032436
032440
032442
032444
032446
032450
032452
032456
032460
032462
032465
032470

010000
042737
050037
104414

000017
132422

12:19

032622

040460

PAGE

ALU TESTS

2% :

010000
BIC

BIS
3%

104414

061224

111205
116104
120504
001401
104015
104401

005202
005200
022700
001342
104400

114

DMC11

ROMC K

4$:

000010

Q01

126

253

00C

126

5% :

#17,3%

RO, 38

;LOAD MAR
*CLEAR ADDRESS OF

INSTRUCTION

*ADD ADDRESS TO INSTRUCTION
*NEXT WORD

INSTRUCTION,

040400 .<3%20>
ROMCLK

BR _ INC A
*NEXT WORD IS INSTRUCTION,

MOVB
MOVB

*PUT 'EXPECTED''
IN RS
SPUT 'FOUND''
IN R4

61224

000004

SEQ 0114

(R2) ,RS
&(R1),R¢4

(MPB
BEQ

RS,R4
4%

INC
INC
CMP
BNE
SCOPE

R2
RO
#10,R0
1%

HLT
SCOP1

BYTE

*MOVE BR TO PORT4

ROMCLK PC-5304

ROMCLK PC=5304

*DATA CORRECT?
‘BR IF YES

:ALU ERROR
L SW09=17

SNEXT DATA
*NEXT ADDRESS
*DONE YET?
:BR IF NO
SCOPE THIS TEST

1,°,0,0,126,126,253,253

.EVEN
JNNRNR
R AR R ANk
ANRR
nnnannn

TEQT

131

J*ALU TEST
P«TEST OF ALU FUNCTION 2A WITH C BiT
S«ALU FUNCTION (A PLUS A)
CODE=5

NRRNRARRRANARRN
AN ANRAN N R RN

SET

“«_0AD MAIN MEM AND SP WITH 8 WORDS OF DATA

**PFRFORM THE

FUNCTION,

VERIFY

THE

RESULTS

::ttttt....'tl'it"ttt.tfi..'tttti.'tt'..'Qtt!'ttt't."‘..t.t.l'.t

NNN

~
VAES
NSO
NNONO~NN
&»
—2 N WWWNNNIIWWND
—
NN
SN
Nt
N

000131
032646
032540

SEC)iagfiu 53 S

YR 2V, F o \Jét\
£ OHNN

) 0D
= NN

TEST

rsT131: MoV

MOV

MOV
MSTCLR

) ——
—

WNOWNO
—
OO
08

03260¢

00O

032514
032516
032520
032524
032530
032532
032536
032540
032544
032552
032556
032560
032562
032570

R oo

032472
032500
022506

NN
N

;

032636
034676

035010
000017
032560
000017
03257¢

03°c7¢

2%:

TSTNO

#1STi32 NEXT

78,00k
RO

JSR
MEMDAT
JSR
SPDAT

PC,MEMLD

JSR

BIC
BIS

ROMCLK

010000
BI(

8IS
z¢ .

#1371

(LR

MOV

034732

131

ROMC LK

#5$ R

P(,SPLD

PC,SETC

#1708
RO, 2%
217,38

RO, %$

060600.<5%2)>

ROM( | K
61004

:R1 CONTAINS BASE DMC11
*MASTER CLEAR DM(C11
*MEM + SP ADDRESS

ADDRESS

SPOINTER TO CORRECT DATA

:LOAD 8 WORDS OF MAIN MEMORY
*POINTER TO DATA
*LOAD 8 WORDS OF SP
*POINTER TO DATA

SSET C BIT!

:CLEAR ADDRESS FIELD OF INSTRUCTION
“ADD ADDRESS TO INSTRUCTION

INEXT WORD

INSTRUCTION,

‘LOAD MAR
*CLEAR ADDRESS OF
‘BR

P(=5304

INSTRUCT]ON

*ADD ADDRESS TO INSTRUCTION

INEXT WORD

ROMCLK

INSTRUCTION,

ROMCLK P(-5304

*NEXT WORD IS INSTRUCTION, ROM(LK P(-S304

MOVE BR T(Q PORT4

CZ0M(C

MACYT1

C20MCC.P11

30A(1052)

6114
6115
6116
6117
6118
6119
6120
6121
6122
6123
6124

032604
032606
032612
032614
032616
032620
032622
032624
032626
032632
032634

111205
'16104
1205064
001401
104015
104401
005202
005200
022700
001342
104400

6126
6127
6128
6129
613C

032641
032644

376
124

6125

032636

24-AUG-78

11-AUG~-78 08:21

000

12:19

PAGE 115

6%:

MOVB
MOVB
(MPH
BEQ
HLT
SCOP1
INC
INC
(MP
BNE
SCOPE

DMC11

000004

00000

376

282
124

5%:

ALU TESTS

LBYTE

SEQ 0115

(R2) ,R5
4(R1) R4
RS5,R4
4%
15

;PUT “EXPECTED''
IN RS
JPUT "FOUND'' IN R4
.DATA CORRECT?
;BR IF YES
;ALU ERROR
;Sw09=1?
JNEXT DATA
JNEXT ADDRESS
;DONE YET?
;JBR IF NC
:SCOPE TH]S TEST

R2
RO
#10,R0
1%

0,0,376,376,252.252,
24,124

LEVEN

6131

JRNANNRNRRNRAN
RN E Rk wnnnen

6132
6133
6134
6135
6136

;*ALU TEST
J«TEST OF ALU FUNCTION A PLUS C WITH C BIT SET
s*ALU FUNCTION (A PLUS ()
CODE - 4
. *LOAD MAIN MEM AND SP WITH 8 WORDS OF DATA
J*PERFORM THE FUNCTION, VERIFY THE RESULTS

6137

6138
2}28

6141
6142
6143
6144
6145
6146
€147
6148
6149
6150
6151
6152

032646
032654
032662

012737
012737
012737

032670
032672
032674
032700
032704
032706
(032712
032714

104412
005000
012702
004737
035022
004737
035032
004737

6154
6155
6156
6157

032726
032732
032734
032736

050037
104414
010000
042737

6159
6160
6161
6162
6163
61646
6165
6166
6167
6168
6169

032750
032752
032756
032756
032760
032762
032766
032770
032772
032774
032776

104414
040500
104414
061224
111205
116104
129504
001401
104015
104401
005202

6153

6158

032720

032744

042737

050037

000132
033022
(032714

001226
001216
001220

034732
035010

000017

03273

000017

0327%2

03273%

032752

1%:

’%:

MSTCLR
(LR
MOV
JSR
MEMDAT
JSR
SPDAT
JSR

BIC

8IS
ROM(LK
010000
BIC

BIS

s :

000004

AN R AR

132

R RN RN R AR R A AN

AANNRNRRANNRAANRNRNNANNNRARR

A NP T RN AR AR NN SR RN RR R AN RO R RN

TEST 132

T131132: MOy
MOV
MOV

03301¢
034676

R AR R AR AR P AN

[EST

#132,15TNO
#TST133 NEXT
#18,10(K

RO
#5% ,R2
PC ,MEMLD
PC,SPLD
PC SETC

7,28

RO,/’$

#1733

RO.%S

ROM(CLK
040400 <4#+20>
ROM(LK
61224
MOVB
(R2) ,RS
MOV
4(R1) R4
(MPR
RS ,R4
BfQ
43
HLT
15
S(OP1
ING
ke

JR1 CONTAINS BASE DM(11 ADDRESS
JMASTER CLEAR DM(C11
;MEM + SP ADDRESS
JPOINTER TO CORRECT LATA
;LOAD 8 WORDS OF MAIN MEMORY
;POINTER TO DATA
;LOAD 8 WORDS OF SP
JPOINTER TO DATA
JSET C BIT.

;CLEAR ADDRESS FIELD OF

INSTRUCTION

;ADD ADDRESS TO INSTRUCTION
JNEXT WORD [S INSTRUCTION, ROMCLK Pr 53064
.LOAD MAR
;CLEAR ADDRESS OF INSTRUCTION

;ADD ADDRESS TO INSTRUCTION

JNEXT WORD IS INSTRUCTION, ROM(C.K P(-5304
;BR
A PLUS C
NEXT WORD IS INSTRUCTION, ROM(LK P( 5304
sMOVE BR TO PORT4
JPUT "EXPECTED' IN RS
sJPUT "FOUND'' IN R4
:DATA CORRECT?
JBR [F YES
;ALJ ERROR
;SwW09-12
NEXT DATA

CZDMC
MACY11 30A(1052)
24-AUG-78
CZDMCC.P11
11-AUG-78 08:21

6170
6171
6172
6173
6174
6175
6176
6177
6178
6179

6180
6181
6182
6183
6184
6185
6186
6187
6188
6189
6190
6191
6192
6193
6194
6195
6196
6197

033000
033002
033006
033010
033012

033015
033020

005200

12:19

PAGE

DMC11

000010

001

126

253

000

126

5%:

116

ALU TESTS

SEQ 0116

INC
CMP
BNE

RO
#10,R0
1%

BYTE

1,1.0.0,126.,126,253,25%

SCOPE

;NEXT ADDRESS
*DONE YET?
“BR IF NO
.SCOPE

THIS

TEST

.EVEN
JRNNERARRARANRANAARERAANNRAAY

TEST

7137

wannnnnnnnnnnnannnntantantn

J*ALU TEST
;*TEST OF ALU FUNCTION 2'S COMP SUB WITH C BIT SET
CODE-17
;*ALU FUNCTION (A-B-1)
;*LOAD MAIN MEM AND SP WITH 8 WORDS OF DATA

;*PERFORM THE

FUNCTION,

VERIFY

THE

RESULTS

; INRRE NN RAARR AR NN R RAN AR AR AN RNANNNN AN RN R

;

033022
033030
033036
033044
033046
033050
033054
035060
033062
033066
033070
033074
033102
033106
033110
033112
033120
033124
033126
033130
033132
033134

000133
033176
033070

001226
001216
001220

TEST

B
TST133: MOV
MOV

MOV
MSTCLR

(LR
MOV

033166
03467¢

JSR

MEMDA T

034732
035010
000017
33110
000017

033126

’%:

000004

000010

000
377
377

376
252

#1%,L0CK

RO
#5% .R?

PC.,MEMLD

:R1 CONTAINS BASE DMC11
“MASTER CLEAR DM(11

ADDRESS

*MEM + SP ADDRESS
*POINTER TO CORRECT DATA

:LOAD 8 WORDS OF MAIN MEMORY
*POINTER

TO DATA

PC,SETC

:LOAD 8 WORDS OF SP
:POINTER TO DATA
*SET C BIT!

BIS

RO, %

*ADD ADDRESS TO INSTRUCTION

010000
BIC

BIS
3%:

#133,TSTND
#TST134 NEXT

PC,SPLD

ROMCLK

#1728
#17,3%

RO, 3$

040400.<17+20>

ROMCLK
61224
MOVR
MOVB
(MPR
BEQ

(R2) ,RS
4(R1).R4
RS,R4
4%

SCOP1
INC
INC
(MP
BNE

R2
RO
#10,R0
i1

HLT

SCOPE

133

JSR
SPDAT
JSR

BIC

033110

AR ANARANRAANANRRANARRRR R AR

;CLEAR ADDRESS FIELD OF INSTRUCTION
:NEXT

WORD

INSTRUCTION,

‘LOAD MAR
SCLEAR ADDRESS OF

INSTRUCTION

*ADD ADDRESS TO INSTRUCTION
:NEXT WORD

INSTRUCTION,

:BR _ 2'S COMP SUB

ROMCLK PC=5304

ROMCLK PC

5304

SNEXT WORD IS INSTRUCTION, ROMCLK PC=5304
*MOVE BR TO PORT4
*PUT "EXPECTED'' IN RS
SPUT "FOUND'' IN R4
*DATA CORRECT?
‘BR IF YES

*ALU ERROR

SW09=1?
*NEXT DATA
*NEXT ADDRESS
SDONE YET?
*BR IF NO
SCOPE

THIS

-1,9,376,~1,-1,282.124
-1

TEST

CZDMC
MACY11 30A(1052)
24-AUG-78
CZDMCC.PY1
11-AUG-78 08:21

12:19
PAGE 117
DMC*1 ALU TESTS

6226
6227
6228

SEQ 0117

.EVEN

6229

JNRRRRARARNANRAR
AR ANRRARR

6230
6231
6232
6233
6234

J*ALU TEST
*TEST OF ALU FUNCTION DEC A WITH C BIT SET
s*ALU FUNCTION (A-1)
CODE=7
;*LOAD MAIN MEM AND SP WITH 8 WORDS OF DATA
J*PERFORM THE FUNCTION, VERIFY THE RESULTS

6235

6236
6237
6238
6239

6240
6241
6242
62643
6244
6245
6246
6247
6248
6249
6250

033176
033204
033212

012737
012737
012737

(033220
033222
033224
033230
033234
033236
033242
033244

104412
005000
012702
004737
(035022
004737
035032
004737

6252
6253
6254

033256
033262
033264

050037
104414
010000

6251

6255
6256
6257

6258
6259
6260
6261
6262
6263
6264
6265
6266
6267
6268
6269
6270
6271
6272
6273
6274
6275
6276
6277

033250

033266
033274
033300

033302
0333046
033306
033310
033312
(033316
033320
033322
033324
(033326
033330
033332
033336
033340
03332
03335
033350

042737

000134
033352
033244

001226
001216
001220

034732

000017

033264

042737
050037
104414

000017
033302

033302

116104
120504
001401
104015
104401
005202
005200
(022700
001342
104400
377
376
251

000004

0405690
104414
061224
111205

033264

1%:

°%:

i3 ¥

4$:

000010
377
124
251

3%
124

AR RN R R

MSTCLR
(LR
MOV
JSR
MEMDAT
JSR
SPDAT
JSR

BIC

BIS
ROMCLK
010000

BIC
BlS
ROMCLK

aaa

AN AR R AN RN

;R1 CONTAINS BASE DM(C11 ADDRESS
JMASTER CLEAR DM(11
JMEM + SP ADDRESS
JPOINTER TO CORRECT DATA
JLOAD 8 WORDS OF MAIN MEMORY
JPOINTER TC DATA
;LOAD 8 WORDS OF SP
JPOINTER TO DATA
JSET C BIT!

RC
#5% ,R2
PC ,MEMLD
PC,SPLD

PC,SETC

015.25

;CLEAR ADDRESS FIELD OF INSTRUCTION

RO,2%

;ADD ADDRESS TO INSTRUCTION
JNEXT WORD IS INSTRUCTION, ROMCLK PC-5304
;LOAD MAR

#17,3%
RO, 3%

;CLEAR ADDRESS OF INSTRUCTJON
sADD ADDRESS TO INSTRUCTION
JNEXT WORD IS INSTRUCTION, ROMCLK P(=5304

0604600!<7+20>
JBR _ DEC A
ROMCLK
JNEXT WORD IS INSTRUCTION, ROMCLK PC=5304
61224
;JMOVE BR TO PORT4
mMCvB
(R2) RS
JPUT "EXPECTED'' IN RS
MOVR
4(R1) R4
JPUT "FOUND'' IN R4
(MP8
R5.R4
;DATA CORRE(CT?
BEQ
4%
;JBR IF YES
HLT
15
;ALU ERROR
SCOPT
1SW09=12
INC
R2
JNEXT DATA
INC
RO
JNEXT ADDRESS
(MP
#10,R0
JDONE YET?
BNE
1%
sBR [F NO
SCOPE
;SCOPE THIS TEST
BYTE
=1,-7,376,376,124,1264,25,251

.EVEN
_

6278

cvennnnnentnanewensanrnnnnnan

6279
6280

J*TEST OF PROGRAM (LOCK'BIT
s*D0 A MATER CLEAR, WRITE THE PROGRAM (CLOCK BIT

6281

A v

R R RN AR RN AN N AN N R AR R AR AR R RN NN R R R AR R R R R AN RRNN NN

;
TEST 134
Jmm—e—m————————
T1ST134: MOV
#1346 ,TSTNO
MOV
#TST13S NEXT
MOV
#18,L0CK

033342
034676

035010

R RN

TEST

JEST

135

ennnnnnnennnnannannnannenns

TO A ONE,

s«VERJFY THAT IT CLEARS, AND THEN ETS SOME TIME LATFR

CZOMC

MACYYT

cZoMmcC.P11

30A(1052)

24-AUG-78

11-AUG=-78 08:21

12:19

6282

gsgg

;

033352
033360

012737
012737

033366
033370
033374
033400
0334046
033412
033420
033426
033434
(033442
033450
033456
033462
033464
033466
033470
033472
033472
033474
033476
033504
033506
033514
033520
033526
033530
033534
033540
033542

104412
005037
005037
012702
012761
152761
012761
152761
012761
152761
142761
016104
005005
120504
001401
104016
1044 4
121224
122761
001416
062737
095537
022737
001361
012705
016104
104016
104400

000135
033544
001476
001246
000011
000020
000002
121111
000003
121224
(000003
000003
000004

001226
00216

000004
000001
000006
000001
000006
000001
000001

1%:

0020004

000001
001246
000006

001416
00246

000020
000004

6319

3¢

SEQ 0118

AR AR R AN AR R

R AN AR

AR N

R A AR RN AR AR R AR AR NN

R R R R

AN AR RN NI AR

TEST 135

TST135: MOV
MOV

’%:
000020

8 10

118

DMC11 ALU TESTS

6283

6286
6287
6288
6289
6290
6291
6292
6293
6296
6295
6296
6297
6298
6299
6300
6301
6302
6303
6304
6305
6306
6307
6308
6309
6310
6311
6312
6313
6314
6315
6316
2%15

PAGE

#135,TSTNO
#TST136,NEXT

JR1 CONTAINS BASE DMC1"' ADDRESS
JMASTER CLEAR DM(C11
TEMP
;PREPARE FOR
TEMP1
;DELAY
#11,R2
;sSAVE FOR TYPEOUT
#20,4(R1)
;LOAD PORT &
MIT1,1(R1)
;SET ROM]
#121111,6(R1)
;SEL6
INSTRUCTION
#31T1!'BIT0,1(R1):SET clock BIT
#121224 ,6(R1)
JLOAD NEXT INSTRUCTION
#BIT1.BITO,1(R1);READ CLOCK BIT
MIT1'BITO,1(R1);CLEAR MAINT BITS
4(R1) R4
JPUT "FOUND'' IN R4
RS
sPUT "EXPECTED'' IN RS
RS,R%
;1S PGM (CLOCK CLEAR?
°%
16
JERROR, PGM (CLOCK IS NOT (LEAR

MSTCLR
(LR
(LR
MOV
MOV
BISB
MOV
BISR
MOV
BISB
B!(B
MOV
(LR
TMPR
BEQ
HLT
ROM(LK
121224
CMPR
BEWQ
ADD
AD(
CMP
BNE
MOV
MOV
HLT
SCOPE

JNEXT WORD IS INSTRUCTION, ROMCLK PC 5304
;PORT4 LU
;IS PGM CLOCK SET?
:BR [F YES
; INCREMENT DELAY
JINCREMENT DELAY
;1S DELAY DONE
;JBR IF NO
JPUT "EXPECTED'' IN RS
JPUT *FOUND'' IN R4
JERROR PGM CLOCK NOT SET
;SCOPE THIS TEST

#2G,4(R1)
3%
#1,TEMP
TEMP1
#6, TEMP
2%
#20,R5
4(RTM) R4
16

6320

Jerekmakwnnrknnnnerernnennnnn

632!
6322

6322
6324
632
6326
6327
6328
6329

,*FORCE POWER FAIL TEST
;*SET FORCE POWER FAIL B!T VERIFY THAT PROCESSOR TRAPS TO 24
;*GOING DOWN AND (OMING UP, VERIFY ALSO THAT BUS INIT WAS
;*BLOCKED FROM GETTING TO THE DMC DURING THE POWER FAIL
J*THIS TEST MAY HANG ON SOME PROCESSORS IF AN M9301 IS PRESENT.
;J*T0 AVOID HANGING SW(O2 (POWER ON REBOOT ENABLE) ON THE M9301
J*MUST BE IN THE OFF POSITION. THIS TEST WILL ALSO FAIL IfF THt
;*(PU POWER FAIL VECTOR IS SET TO ANY LOCATION OTHER THAN 24.
s*IF THIS TEST HANGS OR FAILS DUE TO EITHER REASON ABOVE THE

6332

6334
€335
6336

.
;

2%%?
6333

6337 033544 072737 000736 01226

TEST

136

nannnnnvsonnnnnnnrnnonsnnne

J*FOLLOWING PAT(CH MAY BE INSTALLED TO SKIP THIS TEST:
NN

TST136: MOV

R N

LOC 33362

R AR N R N

TEST 136
- -

#136. 1STNU

P N N

WAS 33544

P NN AN AN P AN

SB 33736

AR R RN AR

NN PR R AR SRR

T RN TN RN R Y

CZ0MC
MACY11 30A(1052)
24~AUG-78
czomcC.PN
11-AUG-78 08:21

6338
6333
6340
6341

033552

012737

033560

1044612

005037
013746
012737
012761
012711
012761
012711
005237
001375

033736
001416
000024
033636
000002
001000
121111
001400
001416

12:19

PAGE

DMC11

ALU TESTS

001216

MOV

000024
000004

5%:

033654
033652

000024

033652

033674
033676
033700
033706
033712
033716
033722
033726
033730
033732

000024
005336

005336
001200

003000
121111

1%:

3%:
000024

000024
4%

000004

TEMP

a#24,~-(SP)
LAk I 240

MOV

;STORE POWER FAIL ADDRESS

MIT9.BIT8,(R1)

;LOAD PORT4
;SET ROMI
;LOAD INSTRUCTION

TEMP

;WAIT FOR POWER FAIL

ghT

sERROR,

MOv
MOV

#3844
SP.2%

sPOWER UP ADDRESS
2STORE STACK

INC

BNE

SALT

;CLOCK INSTRUCTION

;BR IF DELAY NOT DONE

JWAIT

MOV

POP2SP
MOV
(MP
BEQ
HLT
MOV
MOV
MoV

MOv
MOV

NO POWER FAIL

FOR POWER UP SEQUENCE

2%.SP

JRESTORE STACK

(SP) + ,a#24
¥ _PFAIL ,a#24
4
17
¥ PFAIL ,a#24
#STACK,SP

;JPOP STACK TWICE
JRESTORE TRUE POWER FAJL ADDRESS
;IS IT CORRECT?
JBR IF YES
JERROR, STACK IS INCORRECT
JRESTORE TRUE POWER FAIL ADDRcSS
JRESTORE STACK

#121111,RS
4(R1) ,RG

;RS = EXPECTED
;R4 = FOUND

MIT9.BITIO,(R1),;SEL6 = MAINT

RS .,R4

BEQ
HLT

ADDRESS

;SET UP FOR FORCE POWER FA]L

#2,6(R1)
#IT9,(R1)
#121111,6(R1)

(MP

001401
104025

;JR1 CONTAINS BASE DM(C11
JMASTER CLEAR DM(C11
;PREPARE FOR DELAY

MOV
MOV

MOV
MOV
MOV

000006

SEQ 0119

#TST137 NEXT

MSTCLR
(LR

104017

000426
012737
010637
0000C0

c 10

119

JMAINT IR SHOULD

.+
25

JBR JF 0K
JIF - 0 THEN BUS

12111
INIT

WAS

JNOT BLOCKED FROM CLEARING

033734

104400

s THE DMC-11
;SCOPt THIS

SCOPE

Jrvnannanannennsnnnnnnnnnnnn

s *M] CRO-PROCESSOR NQJSE

[EST

TEST

137

anannannnnnnannsnnnsnnnnnnnn

TEST

J*WRITE ALL ZERO'S THEN ALL ONE'S THEN A DATA PATTERN
;*TO THE IBUS* AND [BUS PEGISTERS AND TO
J*THEN GO BACK AND READ THE DATA PATERNS

THE SP AND MAIN MEM
TO VERIFY THAT

J*READING AND WRITING OF OTHER LOCATIONS AND REGISTERS
;*DID NOT CHANGE THE DATA.
DN

;
033736
033744

033752
033754
033756
033764
033772

TST137:

AR R

034604

18:

MOV
MOV

(.R

AN T AN

R AN R R A A R

A RN

N R

AN R R R RN RO

N AR R R AN R R RN R R

TEST 137

MSTCLR

000017

AR AR A

BI(
BSR
MOVR

#1357 ,TSTNO
# EOP NEXT

4'7,2%
30 (R2),2%
31$(R2) ,4 (KT

sK1 CONTAINS BASE DM(11
JMASTER CLEAR DM(11

JRZ

INDEX REGISTER

ADDRESS

;CLEAR ADDRESS FIELD
JADD IBUS* REG ADDRESS TO INSTRUCTINN
;. 0AD PORTq

N RN

CZOMC
MACY11 30A(1052)
24~AUG-78
czomcc.P1
11-AUG-78 08:21

6394
6395
6396
6397
6398

PR ¥ RLLRLLRR
2L
HRERN
=0 O 00 ~NON N
NN —

6410

12:19

104414
121100

005202
022702
001361
005002
042737
042737

OMC11

°%:
000005

000017
000017
00007
034062
034074
034104
000004
000377

034062
034074
034104

ALU TES'S

SEQ 0120

ROMCL
K

JNEXT WORD

121100
INC

INSTRUCTION,

000004

5¢:

7%.

034206

000004

00000«

8%:
Gt

00004

10%:

000020

;CLEAR ADDRESS FIELD OF

#377 ,4(R1)

Rc,4(RTM)

INSTRUCTIONS

JNEXT WORD

ROMCLK PC-5304

;LOAD PORT4

INSTRUCTION,

JWRITE ALL ONES TO IBUS REG
;LOAD PORT4
JNEXT WORD IS INSTRUCTION, ROMCLK PC=5304
JWRITE ITS OWN ADDRESS TO IBUS REG

R2
#17,8%
#17,9%
#17,10%
k2,8%
R2,9%
R2,10%
4(R1)

;START AT

:CLEAR PORT4

#3777 ,4(R")

‘WRITE ZERO TO SP
*LOAD PORT4

DONE YET?
JBR IF NO

Re,4(RY,

LR
#3774 (K

RZ,4(R1)
k.

SP ADDRESS 0

;CLEAR ADDRESS FIELD

;ADD

ADDRESS

INSTRUCTION

INSTRUCTION.

ROMCLK PC=5304

*NEXT WORD IS INSTRUCTION.
*WRITF ALL ONES TO SP

ROMCLK PC=5304

*NEXT WORD

000004

ROMCLK PC-5304

JNEXT ADDRESS

R¢
1’,“

JNEXT WORD IS INSTRUCTION,
;WRITE O TO IBUS REG

R2
#10.R2

#20,R2

000004

5304

JR2 IS IBUS REGISTER ADDRESS

034164
0%417¢
034206

ROM(LK PC

;ADD [BUS REG ADDRESS TO INSTRUCTION

000010

000377

JWRITE [BUS~ REGISTER
JINC INDEX REGISTER
;DONE YET?
JBR IF NO

3¢

6%:

000377

0D 10

120

. CLEAR PORT4

000004

000017
000017
000017
034164
034176

PAGE

*LOAD PORT4
INEXT WORD IS INSTRUCTION, ROMCLK PC=5304
“WRITE SP ADDRESS TO ITSELF

'NEXT

SP ADDRESS

"DONE YET?
;BR IF NO

‘R2 = MAIN MEM ADDRESS

*NEXT WORD IS INSTRUCTION. ROMCLK PC=5304

MAR

“CLEAR PORT4

*NEXT WORD IS INSTRUCTION, ROMCLK PC=5304
"WRITE ZEROS TO MEM
*LOAD ©QRT4
*NEXT WORD IS INSTRUCTION, ROMCLK P(=5304
*WRITE ONES TO MEM
*LOAD PORT&
INEXT WORD IS INSTRUCTION, ROMCLY Pr=5304

SWRITE TO MEM [T OwN ADDRESS
INEXT MEM ADDKE
SS

CZDMC
MACY11 30A(1052)
24-AUG-78
CZDMCC.P1Y
11-AUG-78 08:21

6450
gzg;

034262
034266

022702
(001357

000400

CMP
BNE

gzgz
036270
03272
036274
034302

104414
010600
032737
001402

6460
6461
6462

034306
03310
036312

004000
005000
042737

6464
6465
6466
6467
6468
6469
64670

034324
034326
034330
034332
034334
034336
0332

010203
006303
006303
006303
006303
050337
116005

6472

034350

121004

6463

64671

6473
6474

6475
6476
6477
64678

034304

034320

036346
034352
036356

116002

104414

016104
120504

001401
104004
005200
022700

6480

034374

005002

6482

034404

010203

6481

034372

034376

001347
042737

6483
6484
6485
6486
6487
6488
6489

034406
034410
03412
0%414
(C3%416
034422
03424

006303
006303
006303
006303
050337
010205
104414

6491
6492
6493
6494
6495
6496
6497
6498
6499

034430
0343
034436
034440
036442
034444
034450
034452
034454

016104
120504
001401
104005
005202
022702
001352
005002
042737

6501
6502
6503
65046

03466
034470
03%472
03474

6490

6500

6505

034426

034462

034476

100000

ROMCLK
010000
BIT
BEQ

001366

104414

034360
036362
034364
034366

6479

SEQ 0121

#400,R2
1%

:DONE YET?
:BR IF NO

;NOW GO BACK AND READ EVERYTHING

6455
6456
6457
6458
6459

E 10

12:19
PAGE 121
DMC11 ALU TESTS

021004

050237

104414
0460600
010205
104474
061226

ROMCLK

000360

03457¢

Q346350

12%:

034350
034604

13¢.

000004

000005

000360

14%:

(Q364ct

1658 :

000004

000010
000017

034470

4000
CLR
BIC

RO
#360,13%

MOV
ASL
ASL
ASL
ASL
BIS
MOVR

R2.R3
R3
?3
R3
R?
R3,13$
21$(R0) RS

MOVR

ROM(CLK
121004

MOV
CMPS

(34470

°v%:

)

’$:

30%$(R0O) ,R2

sNEXT WORD IS

INSTRUCTION,

JMAR HI
0 (KMC ONLY)
JRO 1S IRDEX REGISTER
;CLEAR ADDRESS FIELD

;PUT ]BUS* ADDRESS IN R3
JSHIFT ADDRESS TO BITS 4=7

:ADD ADDRESS TO INSTRUCTION
;RS - "EXPECTED"'

JNEXT WORD IS INSTRUCTION, ROMCLK PC 5304
JPORT4

[BUS* REGISTER

BEQ
HLT
INC
cMP

;R4 = "FOUND''
;IBUS* CONTENTS OK?

.+
4
RO
#5,R0

:BR IF YES
: IBUS* DATA ERROR
; INC COUNTER
:DONE YET?

CLR

BIC(

MOV

128

#360,15%

R2.RS

:BR IF NO

JR2 - IBUS REG ADDRESS

;CLEAR ADDRESS FIELD OF

:R3 = 1BUS ADDRESS

INSTRUCTION

ASL
ASL
ASL
ASL
BIS
MOV
ROMCLK

R3
R3
R3
R3
R3,15$
RZ.RS

MOV
(MPS
BEQ
HLT
INC
CMP
BNE
(LR
BIC

4(R1) R4
:RG = "FOUND''
RS, R4
;IBUS CONTENTS 0k?
. *4
;BR IF YES
5
:1BUS DATA ERROR
Ke
JNEXT [BUS REGISTER
#10,R2
JDONE YET?
14%
;BR IF NO
R2
;R2 = SP ADDRESS
#17 ,17% (L FAR ADRESS FIELD OF INSTRUCTION

021004

BIS

ROM( LK
040600
MOV
ROM( | ¥
01004

JSHIFT ADDRESS TO BITS 4=7

;ADD ADDRESS TO INSTUCTION
;RS - "EXPECTED"
SNEXT WORD IS INSTRUCTION, ROMCLK P(-5304

:PORT4

R2,17¢
R2,N5S

ROMCLK P(C=5304

;JR2 = ]RUS* ADDRESS

4(R1) ,RG
RS R

BNE
034426

#BIT15,STAT]
.+6

;NEXT WORD IS INSTRUCTION, ROMLLK PC-5304
;MAR 0
:DMC?
;:BR IF YES

IBUS REG

:ADD ADDRESS TO INSTRUCTION

JNEXT
JBR _
;RS T
JNEXT

WORD IS INSTRUCTION, ROMCIK P(-5304
SP
"EXPECTED'’
WORD IS INSTRUCTION, ROM((
K Pr:=53C4

;PORT4 _ BR

(ZDMC
MACY11 30A(1052)
24=-AUG-78
CZDMCC.P11
17-AUG=78 08:21

6506
6507
6508
6509
6510
6511
6512
6513
6514
6515
6516
6517
6518
6519
6520
6501
6502
6523
6524
6525
6526
6527
6528
6509

034500
034504
034506
034510
034512
034514
034520
034522
034504
034506
034530
034536
034540
034542
034544
034546
034550
034552
034556
034560
034562
034564
034566
034572

016104
120504
001401
104007
005202
022702
001355
0050(2
104414
010000
032737
001402
104414
004000
010205
104414
055224
016104
120504
001401
104013
005202
022702
001364

6531
6532
6533

034576
034601

000
005
034604

6530

6534

6535
6536
6537
6538
6539
6540

034604

034607

(U612

6545
6546
6547
6548
6549

034612
034616
034622
034626
034632

6551
6552

03634

6550

€553
6554

104400

001

06
034612

000020

071366

8%
000004

000400

002
010

¢c07

003

0064

01¢

30%:
.EVEN

31$:

SEQ 0122

MOV
C(MPB
BEQ
HLT
INC
(MP
BNE
(LR
ROMCLK
010000
BT
BEQ
ROM(LK
4000
MOV
ROMCLK
055224
MOV
(MPS
BEQ
HLT
INC
(MP
BNE

4(R1) R4
RS ,R4
. +4
13
R2
#400,R2
18%

.BYTE

0,2,3.5.,10

.BYTE

1,3,4,6,10

< COPE

4(R1) R4
RS,R4
RY
7
R2
#20.R2
16$
RS
#31T15,STAT1
.46
R2,RS

;R4 - "FOUND"'
$SP CONTENTS OK?
BR IF YES
.SP DATA ERROR
*NEXT SP LOCATION
:DONE YET?
:BR IF NO
:R2 - MEMORY ADDRESS
INEXT WORD IS INSTRUCTION, ROMCLK PC-5304
MAR _ 0
:DMC?
‘BR IF YES
JNEXT WORD IS INSTRUCTION, ROMCLK P(C-5304
IMAR HI
0 (KMC ONLY)
RS - "ERPECTED"
INEXT WORD IS INSTRUCTION, ROMCLK PC-5304
:PORT4 _ MAIN MEM
;R4 = "FOUND''
JMAIN MEM CONTENTS OK?
:BR IF YES
:MAIN MEM DATA ERROR
*NEXT MEM ADDRESS
*DONE YET?
:BR IF NO

*SCOPE THIS TEST

.EVEN
; SUBROUT INES
R
D ettt

6541
6542

2222
I

034574

000004

10000C

12:19
PAGE 122
DMC11 ALU TES'S

St TVEC:
012577
012577
112577
112577
000205

144556
144556
144550
144550

:THIS SUBROUTINE LOADS THE VECTORS AND VECTOR LEVELS

MOV
MOV
MOVB
MOV
RTS

NPRAE
T

(RS)+,8DMRVEL
(R5)+.9DMTVEC
(RS)+.QDMRLVL
(RS)+.QOMTLVL
RS

;LOAD BASE VECTOR
:LOAD VECTOR + 2
:LOAD VECTOR + 4
:LOAD VECTOR + ¢
RE TURN

;THIS 5UBROUTINE LOADS [RUS REGISTERS 0-7
sWITH NPR INFORMATION (INBA, CUTBA, OUT DATA)
MO\

R2,=(SP)

Mr YR

(RS)+ 4(RY"

His

Kwo

:SAVE R?

:START AT

:C_EAR ADDRESS FIELD OF [NSTRU(TION

RLC8

IBUS REG O

JLOAD PORT4

*ADD ADDRESS TQ INSTRUCTION
SNEXT WORD

INSTRUCTION,

ROM((k

83 4

MACYM 30A(1052)
((DMC
24-AUG-78
11-AUG-78 08:21
CZomMcC.P1

6562

6563

6564
6565
6566
6567
6568
6569

6570

6571
6572
6573
65746
6575
6576

6577
6578
6579

6580
6581
6582
6583
6584
6585
658€
6587
6588
6589
£590

034660
034662
034664
034670
034672
034674

12:19

122100

005202
022702

001363

PAGE

DMC11

ALU TESTS

’%:

122100

700010

MEM.D:

SEQ 0123

;MOVE PORT4 "0 IBRUS REG

INC
(MP

R2
#10,R2

JNEXT ADDRESS
JALL DONE?

MOV
RTS

(SP)+ ,R?
RS

JRESTORE RZ?
;RETURN

BNE

012602
Q00225

034t
¢

G 10

123

JTHIS

SUBROUTINE

BR IF NO

(OADS

MEMORV wlTH THIS DATA:

034676
034700
034704
034710
034712
034714
034720
034722
034724
034726
034730

013605

062746

012704
106414

010060
112577

104414
136500

MOV

\,‘OL-( !

ADD

(”

MOV

ROM(CL K

1446,

B ¥

005304
001372
000207

034732

010000

a(SP)+ RS

FIRST

8 LOCATIONS

MAIN

0,-1,,0,-1,125,252,125,252

JPUT POINTER TO DATA IN RS

#2,-(SP)

JADJUST STACK

#10.R%

:DO 8 LOADS

JNEXT WORD [S INSTRUCTION, ROMCLK P(C=5304

MOVAR

(RS) ¢+ ,aDMPO4

DEC
BNE
Qrce

R«
1A
Pt

ROM( . K
136500

THE

CMAR < 0

LOAD PORTS

JNEXT WORD IS INSTRUCTION, ROM(CLK P(=5304
;mv DATA TO MEM, AUTO [N(C MAR

;DECREMENT COUNT
;BR [F NOT DONE
JRE TURN

SBEID:
JTHIS

SUBROUTINE

LOADS

THE

¢ IRST

SC(RAT(H PAD

JLOCATIONS wlTH: 0,0,=1,-1,125,125,252,252
034732
03473%
034740
054742
03444
034754
034760
034762
C34764
034766
034772
03774

013605
062746

000002

112577

144444

005004

042737
050437
104414

123100
005204
022704

0013%3
000207

000017
03%47¢?2

MOV
ADD
R

1 347%¢

¢ $:
00(L'C

8(SP)+ RS

JPUT POINTER TO DATA IN RS
JADJUST STACK

(LR

82,-(SP)
R4

START AT SP ADDRESS 0

BIC
BIS

?‘
R/- ?S

cCLEAR ADDRESS FIELD OF INSTRUCTION
;ADD ADDRESS TO INSTRUCTION

123100
INC

MOVR

ROM( LK
‘Mp

BNE
RTS

’RS)'

[ AU

1%
ps

eDMPO4L

JLOAD PORT4 W]TH DATA

JNEXT WORD IS INSTRUCTION, ROMCLK PC-5304

JMOVE DATA TQ SP
. INCREMENT COUNT

;DONE

YET?

JBR [F NO
JRE TURN

(o4

STHIS SUBRG "INt - _FARS THE MI(RO PROCESSOR C B]7

106616

ROM! | K

010000
10‘414

010000
ROMC L K

000207

RTS

0604

060400,

JNEXT JORD IS INSTRUCTION, ROM(LK P(=5304

JMAR 0
JNEXT WORD 1S INSTRUCTION, ROM(LK P(=530%

<« Je 20»

.. EAR (C B]T
2 kE TURN

T!S

SURY

tTINE

TeE

MDORL PROTESCUR

byi"t

.BYTE

0,-1,0,-1,125,252,125,25¢

377
126

SPDAT:

.BY'E

(,0,-1,-1,125,125,252.252

046504
044501
047520

030503
052116
042527

EM20:
EM21:
EM2?2:

035/26
035767
036025
03046
C36'10

051377
377
327
042777
042777

043505
054105
056105
050130
05013C

051511
042520
(42520
041505
041505

DH1:
DH2:
DH3:
Dré:
DNS:

LASC
LAS(
JASC
LAS(
.AS(

036151

377

136206
o210
0%212
036214
036216
03620
036222
036224

000002
006
001262
006
001264
000003
006
001272

03230

001270

03623%
03623%

001262
000007

Q007

036226

036232

036240

05405
,
e

042520

DH()E:

EVEN

AR
%

006

0°

00¢,

MRS

LASC

ey By S Sy By By
e B B B By B
Sy G B S G B

.
.
L)
.
L]
]
[)
L]
L]
[
.
.
.
[]
]
.

EM17:

(0541

047125

>
BYTE
SAVRI1
HYTE
CA,R2
z
BYTE
SAYRS

<377>/UNIBUS REGISTER ADDRESSING TIME~QUT/
<377>*UNIBUS REGISTER WRITE/READ TEST*
<377>/MICRO PROCESSOR TEST/
<377>*MICRO PROCESSOR WRITE/READ TEST*
<377>/BR REGISTER TEST/
<377>/SCRATCH PAD TEST/
<377>/DEVICE FAILED TO INTERRUPT/

<377>/DEVICE INTERRUPTED TC WRONG VECTOR/
<377>/NPR TEST/
<377>/MAIN MEMORY TEST/
<377>/MAR TEST/
<377>/ALU TEST/
<377>/PROGRAM (CLOCK TEST/
<377>/FORCE POWER FA]L ERROR/

<377>/UNEXPECTED INTERRUPT/

<377>/DMC11 FONF IGURAT]ON ERROR/
<377>/MAINTENANCE INSTRUCTION REGISTER TEST/
<377>/POWER FAIL INITIALIZE FAJLURE/

<«377>/REG]STER
<377>/EXPECTED
<377>/EXPECTED
<377>/EXPECTED
<377>/EXPECTED

<377>/EXPECTED

e,'"

¢,
L

BYTE

4.4

BYE

SAVRG

vre

N A

377
046777
277

377

035565
035620
035667

N R NI R N P

EMI:
EM2:
tM3:
EM&:
EMS:
EME:
EM7:
EM1Q:
EM11:
EM'2:
EM'3:
EM'4:
EMIS:
EM16:

NIRNNIN NI

052502
041111
047522
047522
051040
040522
044526
044526
020122
047111
020122
020125
043517
OATSS%

CYYTDYOYDIYONOYONOIYOOIYMYOYOYOY
M OO

044516
0647725
041511
04151
051102
061523
0425064
042504
050116
040515
0405'S
046101
051120
047506

BD>>D>

052777
377
046777
046777
377
377
377
377
377
377
327
377
377
377

N N

.tV

035042
035107
035150
035176
035237
035261
035303
035337
035403
035415
035437
035651
035463
035507

035537

JNEXT WORD IS INSTRUCTION, ROMCLK P(C 5304
JMAR 3
SNEXT WORD IS INSTRUCTION, ROMCLK P(-5304
JSET C BIT
JRETURN

MEMDAT:

X
RV G X X X T XV XV AV XV, XV

SEQ 0124

ggg

NIRAIRINING

LY
377
125
000
377
252

ALU TESTS

St g By B @ Seg ey

035022
035025
035030
035032
035035
035040

DMCY1

H 10

124

6624
6625
6626
6627
6628
6629
gg%?

PAGE

ROMCLX
010003
ROM(CLK
040403 <0+20>
RTS
PC
~

104414
010003
104414
040403
000207

035010
035012
035014
035016
035020

6632

'2:19

11-AUG-78 08:21

6618
6619
6620
6621
6622

6623

24=~AUG=78

J’NS\I\

20MCC.P11

30A(1052)

rIVNORN) N~y

MACY1T

FO = DN, - N

(OMC

CAyR1
Py

A, kS

FOUND
FOUND/
FOUND
FOUND

FOUND

TRAPPED FROM/
REGISTER/
IBUS* REGISTER/
IBUS REG]ISTER/

ADDRE SS/

(OMC
MACYYT 30A(1052)
24=~AUG="8
CIDMCC.PI1
11<AuG=78 08:21

036264
036246
03625C
036252
036254
036256
036260

006
001270
000003
003
001272
003
001270

036264
036266
036270
036272
036274
036276

001264
000003
003
001272
00%
001270

036302
036304

001264
000002

036262

036300
036306
036310
036312
036314
036316

036320
036322
036324

97
_

006
001262
006

304
)
002

prr.

001270
000002

035726
036206
035107
035767
036220
035150
036025
036236
035176

036364
036366

036250
035176

035042

SAVR?
3
BYTE
SAVRS
BYTE
SAVRG

6.2
3.7
3.1

2.2
3.7
3.7

BITE

6.2

BYTE
BYTE

3.7
3,2

BYTE
BYTE

6,4

SAVR?
2
LAVRS
SAVRG
2

SAVR1

LERRTAB:

SEQ 0125

DMC SR

6.2
l

0
0
0

EM1

D1
D11
EM2
DHE
D12
EM3
DH3
013
EMG

DHG

036110

DHS

HLT

)

036250
035937
036025
036304

036404

036151

036402 035261

036266
035303
000000
000000

035337
0000N(

T4
EMG

DT4
EMS
w3
D16

EM6

036046

036372
036374
03376
036400

C36416
36420

L°%:

(Te:

036340
036342
036344
036346
036350
026352
036354
036356
036360

636406
036410
C36412
036414

co?

BYTE
SAVRG
3
BYTE
SAVRS
BYTE
SAVRG

BYTE

00~
002

000000
000000
000G00

036370

002

003
001272
003

036330
036332
036734

03636

011

052

0014604

036536

DT4:

006

036326

036330

002

002
6C?

1 10

12:19
PAGE 129
DMC11 ALU TESTS

DT
Em7
¢

EM1(
:

ZoMC

MACY11

CZDMCC.P1T

30A(1052)

24-AUG-78

11-AUG~78 08:21

12:19

PAGE

DMC11

ALU TEST'S

036422
036424
036426
036430
036432
036434
036436
036440
036442

000000
035403
036025
036236
035415
(036151
036266
035437
036151

0
EMI11
DH3
D13
EM12
DH6
DTS
EM13
DHE

036446
036450
036452
036454
036456
036460
036462
036464
036466
036470
036472
036474
036476
036500
036502
036504
036506
036510
036512
036514
036516
036520
036522
036524
036526
036530
0%532

(035451
036025
036304
035463
036046
036250
035507
000000
000000
035537
000000
000000
035403
036151
036266
035565
036025
03631¢
035620
036025
036236
035565
000000
000000
035667
036025
0%23%

EM14
DH3
D16
tM15
DHS4
CT4
EM16
0
0
EM17
o

036444

C36 3%

J 10

126

036266

DTS

EM11
DH6
DTS
EM20
DH
D17
EM21
DH3
D13
EM20
0
0
Emo2
DH
pr3

ORMAY:

SEN 0126

JHLT

SHLT

IHLT

JHLT

SHLT

¢l

JHLY

SHLT

SHL?

BIT7
BIT8
BIT9

- 000200
000400
001000

BM
BRL VL
BRW
BRX
CHRCNT
(KSWR
(KSWR1
(KSWRZ

007054
012252
003730
003732
004712
007606
007666
007700

B1T6

(KSWR3

000020
000040

000100

007710
010014
001242
034776

(NERR
(NT.mA
CNVRT
{ONERR
(ONN

007277
001702
104411
007223
007114

(ONVRT
(ORMAX
(RAM
(REAM
(SR
(SRMAP
CYCLE
DATABP
DATACL
DATAHD

DELAY
DEVADR
DEVTAB

2362
1743

2624
2036

2119

2632

4451

2132

6296
2384

6298
2392

2962

2981

3003

3022

«3IN

6347

€364

2594
2134
2067

2602
2804
2134

2774
2812
2145

2782

2414

4€41

1742

1162
1743

1183

6299
2654

2662

4654

6457

6516

2209
2534

3048
2542

6312
2962

4348
2981

6347
3003

5221

5270

5319

1186

24722

3021
2038
2684

2106
2692

2714
2744
2148
2207
6347

2722
2752
2151
2209
6364

502¢

5074

5123

5172

1647

1649

1709

1815

6294

1751

2452
2138
2248

15914
1796#

159¢

007704

(KSWR4
(KSWRS
(LKX
FLRC

(ONTAB

1593«

2354

[e NaVINN1,V1,0}
N — = NS
LHNnE =00
N —=PORORN)

= 010000
- 020000
040000
- 100000
= 000004
- 000010

00200C
= 004000

SEQ 0127

12464

SO
N
~OD
O O

BIT10
BIT11
BIT12
BIT13
BIT14
BIT1S
BIT2
BIT3
BITS
BITS

TABLE -- USER SYMBOLS

Hrororon

010512

004714
BINWRD
BITO
000001
BIT1
- 000002

K 10

W — — o

AUTO.S

12:19
PAGE 1728
CROSS REFERENCE
»

ADKRCNT= 004373
AUDONE
003024
AUSTRT
002446

r\)o_—l—a—a_l_a_a._o
=) = NNNOMN)
=N
OOV —=H NP
o

CZDMC
MACY11 30A(1052)
24~AUG-78
CZoMCC. P
11-AUG-78 08:21

4878

4976

1073
1327

66054

133

002776

1064410
(036534
006606
001320
006510
(010514
010060
005216
1044°5
005204

1044613
0046370
J03010

1663
1877

18674

16644

1883

(ZDMC
MACY11 30A(1052)
24~-AUG-78
czoMcc.P1
11-AUG~-78 08:21

DMS107
DMS110
pDMS111
pDMS112
DMS113
DMS114
DMS115
DMS116
DMS117
DMS200
DMS201
DMS202

001376
001374
001502
001512
001522
001532
001542
(001552
001562

001572
001602
001612
001622
001632
001642
001652
001662
001672
(001504
001514
O0C1524

1263+

1264

1155w

1189

17744

1943

2264

2325

850#
BS1#
777
8524

1731«
1896+
1066
1720+
6594+
1737«
1903«

1732+
1897
1338
1726

6632

6579

853«

LAY
845
8674
8724
8774
8824
8874
8624
8674

Q02»
9074
912#
9174
9224
974
932
937
9428
8¢.8#
873«
R7Rs

1355

1900~
1904«
1886+

1867

1881

1199+

2383

1603

1389

2473

1769+
2683
2156

2713
2165

1976+
1768

2876
65647+

1352

2164+

2443

17642+

2623

1963«

1322+

1091«

—

001414

DMRLVI
DMRVE"
DMS100
DMS101
DMS102
DMS103
DMS104
DMS105
DMS106

8494

85+

DMPO6

7294
7154
7764
1221
866N
871
8764
834
8864
831a
8964
9C1a
064
9114
P1¢n
9214
Q264
931
Q3N
94 1a

001406
001410
001310
001412

66324
66324
60324
66324

DMCSRKH
DMCTL
DMNUM
DMPOL

66324

001404

SEQ 0128

66324

ny —

DM(CSR

== USER SYMBOLS

) —

DMCR13
DMCR14
DMCR1S
DMCR16
DMCR17

001540
001550
001560
001570
001600
001610
001620
001630
001640
001650
001660
001670

TABLE

=0
VoV,
IV, ¥ o
OOWVNINAN

DMCR0O4
DMCROS
DMCRO6
DMCRO7
DMCR10
DMCR11
DMCR12

036025
036046
036110
036151
001200
000174
001306
007320
001500
001510
001520
0j1s3n

L 10

—_—P

DH3
DHG
DHS
DH6
DISPLA
DISPRE
DMACTV
DMCM
DMCROO
DMCRO1
DMCROZ2
DMCeN2

035726

035767

N=OQO

DHZ2

12:19
PAGE 129
(ROSS REFERENCE

6545+

1899+

1751«

1900

2170+

1681

2503
1894+

2763
2167
2833

2171«

1704

2533
1895+

2175

1750

2563

2200

1885+

1894

2593

2933

4338

4339

1896

2773

2803

4299

4300

(ZOMC
MACY11 30A(1052)
24;AUG-78
CZDMCC P11
11-AUG-78 08:2

DMS$203
DMS204
DMS205
DMS206
DMS207
DMS210
DMS211
DMS212
DMS213
DMS214
DMS215
DMS216
DMS217
OMS 300
DMS 301
DMS302
DMS303
DMS 304
DMS 305
DMS 306
DMS307
DMS310
DMS3N
DMS312
DMS313
DMS314
DMS315
OMS316
DMS317
DMTL VL

DMTVE
C
DM_.END
DM.MAP
DONE
oT1
D12

DT3

001534
001544
001554
001564
001574
001604
001614
001624
001634
001644
001654
001664
001674
001506
001516
001526
001536
001546
001556
001566
001576
001606
001616
001626
001636
001646
001656
001666
001676
001402
001400
001700
001500
003734
036206
036220
026236
036250
036266
036304
036316
C35042
035337
035403
035415
035437
035451
035463
035507
035537
035107
035565
035620
035667
035150
03517¢

8834
888+
893«
8584
Q03
SO8#
9134
9184
9234
9284
933y
9284
9434
8654
8744
8794
8844
8894
8944
8995«
S04#
9094
Q144
9104
924LH
929
934a
930
Q4L4H
8484
8474
9L6N
782
1371
66324
66324
66324
66324
66324
66324
66324
66324
66324
66324
66324
66324
66324
66324
66324
66324
66328
66324
6632
66324
66324
663

12:19

1907+«
1905+
1959

8654

1373

PAGE

130

CROSS REFERENCE

M0
TABLE -~ USER SYMROLS

6546

1133

1249

1877

SEQ 0129

1879

1957

1962

2192

(ZOMC
MACY11 30A(1052)
24-AUG-78
Cc7oMcC.PI
11-AUG-78 08:21

ERCT1I0
ERCT11
ERCTI2
ERCT13
ERCT14
ERCTIS
ERCTI6
ERCT17
ERR
ERRCNT
ERRFLG
ERRMSG
ERRPC
ERTARO
EXIT
EXITER
FLOAT
Fy
HALTS

HILIM
1COUNT

INBUF
INCHAR
INIFLG
INSTERINSTR
INSTR2
INTTY
KMCM
LIMITS
L INE
LOBITS
LOCK

035237
035261
035303
001704
001710
001714
001720
001724
001730
001734
001740
001744
001750
001754
001760
001764
001770
001774
002000
002700
001232
001325
005172
002770
005322
000205
005252

66324
66324
66324
9534
Q564
9594
9624
9654
9684
971»
974K
9774
9804
9834
9864
9854
9924
9954
9984
1179
7504
7894
1634
1211
1649
6834
1669

1178
119¢
16664

007502
010020
001324
104404
104403
004166
012266
007330
004314
007016
Q04372
001220

1433
1818
7884
8104
808#
1440
2001
1224
1479
17744
1465+
7654
2427
2621+
2811+
3068«
3623«
3767«

1469
18464
1094
1484
1916
14524
2018
17744
14904
2070
1494
1384+
2441+
2631«
2831«
3090+
3455+
3787«

5898«

5947+

1463+
7464

001326
004364
001224

7904
1462«
678

1209
1367
1320+
16554

1674«
1382+

1166

1202

15084
1385+

4441w

1114

1127«

1968

1892+
1624+

1637

1651«

1981

1990

2069

2078

2028

2061

2057

224N

15104
1401
2451
2651%
2846%
3124+

1511
1403
2471«
2661+
2874+
3146+

1643
2481x
2681+
2889x
3180+

3819+

3848«

3880+

2262
2501«
2691+
2917+
3200+
3559+
3899

6096+

6143x

1770«

16744

11724
11814
1620

6604
5261+

LOKFLG
LOLIM
LPCNT

12054
1334
1068+
1652
12274
16844

002536
002566
00522¢

004366
001222

SEQ 0130

1490
1380

17894

3475+

3507+

L4681
5310«

4722+
5359+

4771x
5408«

1492
137G+

1578
1380

1353

5996+

€045

3527%

4B20*
5457+«

4869+
5506+

2309«
2511x
561135«
3232+
3579«
3937+

4918+
5555+

6192+

2327+«
2531«
2721
2959«
3252+
3(11x
3956

4967+
5604+

6241»

2351x
2541«
2741«
2970+
3285+
3631w
3997«

5016+
5653«

2361w
2561
2751«
29/8«
3307«
363
4024+

5065+
5702+

3 Blx
5 21
7 71
000+
343«
683+
497+«
114

NN ES NWNWWNNO
NN

EMS
EM6
EM7
ERCTO0
ERCTO1
ERCTOZ2
ERCTO3
ERCTO4
ERCTOS
ERCTO6
ERCTO7

N 10
12:19 PAGE 131
CROSS REFERENCE TABLE == USER SYMBOLS

751«

2391«
2591«
2781+«
3011+«
3367+
3715+

4537+
5163+

S800*

2411«
2601«
2801«
3019+
3403
3735+
4580+
5212
5849+

CZDMC
MACYN 30A(1052)
24-AUG-78
cZpmcc.P1
11-AUG-78 08:21

MPASSX
MPFAIL
MoM
MR
MRESET
MSTCLR

001304
005733
006217
006117
005760
006005
001322
006043
006144
006704

006106
005675
005666
005755
004000
104412

1077+

001000

00613C
006031
006100

001216

17740
1581

6777
5414
6051

4727

5364
6001

1287+
1774m
17760

1071«

177468
1774n

PACTOO
PACTOY

PACTOZ

002646

001302

001702
001706

00771,

1641

1642

1650

17744

1915

1977

4924
5561
6198

4973
5610

5022
5659

5708

5613
6050

4875
5512
6149
4825
5462
6099

1332

17914
4826

5463
6100

4776
L4677

6247

5071

5267
590

5316
5953

4972

5609
6246

5021
5658
65704

66254

4874

5511
6148

4923
5560
6197

1875«

1580+

1884

2014

2024

2034

2049

2063

2352
2742
3287
3999

2382
2772

2412

2442
2832
3457

2472
2875
3509

5266
5903

2592
3044
3717
4373
4969
5606
6243

2622
3070
3769
4408

5655
6289

2500+
2916+
3558+

2530+
2958+
3610+

204C

17744

17744
1774m

17744

1713

5753
6389

4582

5214
5851

4153
4724

5990

2802
3405
6115
4683
5312
5949

2289+«
2680+
3179~
3879+

2308+
2710+
3231
3930+

2350
2740
3284
3996+

3345
4086
4637

5263

5361
5998

4229
4773
5410
6047

2502
2919
3561
4265

2532
2961
3613
4298

2562
3002

4822

4871

5508
6145

3665
4337
4920
5557
6194

24 On
2800+
3402+

2440~
2830+
3454«

2470+
2873+
3506+

5459
609¢

5018

1098

1774M

17744
1386

2590+
3042+
4868+

ONE

1711«

17744

374w

007154
002674
(34634
006450

1623+

17744
2177

4296+

NOACT
NODEV
NPRSET
NUM

1621

N —

1541

4499
5116

MTITLE

1319+

17740

2682
3182
3882

MISTIN
MISTPC
MVECX

SEQ 0131

MEMLIM
MEPASS
MERRPC
MERRX
MERRZ2
MERR3
MILK
MLOCK
MNEW
MODU

034676

»
N

TABLE -- USER SYMBOLS

oony

MEMLD

001234

001244
006142
005672
006072
007544
035022

B 11

[V, 1V, |

LSTERR

MASKX
MASTEK
MCRLF
MCSRX
MDATA
MEMDAT

12:19
PAGE 132
CROSS REFERENCE

2261
2650
3123
3818+

4371+
4966+

L4406+

5505+
61642

5603«

6260+

5015
5652«
6287

4231

430"

4340

17744
1203#

19¢9

1167

44420+
5064+

4496

5701+
€338

5113«
5750«
6387+

L4374

4409

2380+
2770
3342+

4055+
4536
5162+
5799«

4084+
6579+

44654

€552#

5211«
5848+

4113
4635+

5260+

5867«

6151«
4680+

5309+
5946+

4194
4721+

5358+

5395«

4227
4770+
5407+
6044»

CZ0MC
MACY 11 30A(1052)
24-AUG-78
CZDMCC.P1
11-AUG-78 08:21
PA(TO3
PACTO4
PACTOS
PACTO6
PACTO?
PACT10

PACT11
PACT1?
PACT13
PACT14
PACT1S
PACT16
PACT17

104405

PARAM

PARAM1

PARBIT-

PARERR

PASCNT
PERFOR=
Pf TAB

POPRO =

POP1SPPOP2SP=

PRIO

PUSHR(
PUSH1S~PUSHZS

QV.FLG
RESREG
RESTAR
RESTRY

001716
001722
00172¢
001732
001736
001742
007746
001752
001756
001762
001766
001772
001776

RESOS RE TURN
ROMCLK

004234
040000
004310
001230
004537
005430
012600
005726
022626
006547
177776
010046
005746
024646
001327
005220
005350
003534

12:19
PAGE 133
CROSS REFERENCE

cn
TABLE -=- USER SYMBOLS

SEQ 0132

G61#

9644
9674
9704
Q73
G764
Q794

9824

9854
G88#
9914
994La
9974

8124

1970

1983

1992

2071

2080

6534
1471
7494

1475
1322

14844

1491
1358

1493
1891~

1495

2214+

4063

L0€7

14684

683
1709
6594
€574
6614
“7746

650
6584
€56
6604

1333

6357

"298

4091+

4095+

4117«

4137«

4171«

7914

104407

001214

1932«

1046474

3134
3313
3482
3670
3836

4010

4307

c\%o\hmmm
S
O~y

4507
4612
4740
4979

RUN
SAVA(T

4155+

001216
IC*37,

5179
5377
5616
5816
6014
6253
6444
6580

1944

3154
3351
3516
3688
4030

4317
4511
4643
4787
4985
5224
5424
5622

5861
6061
6259
6455
6608

(ZOMC
MACY11 30A(1052)
24-AUG-78
CZDMCC.PIN
11-AUG-78 08:21

SAVNUM
SAVPC
SAVRO
SAVR1
SAVRZ2
SAVR3
SAVR4
SAVRS
SAVSP
SAVOS =
SCOPE =

001314
001276
001260
001262
001264
001266
001270
001272
007274
104406
104400

2794
7724
7654
7664
7674
7684
7694
7704
774
B4k
8024

2638

I
3806
4359

4948

SCOPY

104401

SETC

035010

SETVEC
SKIP

034612
002632
010052
004713
035032

SOF TSw
SPACNT
SPDATM

SPEED
SPLD

07340
034732

STACK
STAT
STAT1
STAT2
STAT3
STRTSW

£01200
001240
001366
001370
001372
001236

SVOS

SWFLG

004402

010016

SWMES
SWMEST
SwR

007205
007215
001202

SWREG
SWOG

000176
v0000]

12:19
PAGE 134
CROSS REFERENCE

1066+
1209+
1525«
1215«
1523~
1522«
1521~
1520«
2276

2296

2338

2368

2398

2428

2458

2488

2518

2548

2578

2608

3167
3867
4394

3219
3918
4429

3271
3984
4482

3328
4044
4525

3390
4073
4567

3442
4101
4623

3494
4137
4669

3546
4178
4703

3598
4214
4752

3650
4250
4801

3702
4282
4850

3754
4323
4899

5781
6530
2360

5193

5242

5291

5340

5977

6026

6075

6124

6173

2367

23%0

2397

2420

2427

2450

2457

2480

2668

6997

2698

5046

2168«
1686

1531
6632

6632

2728

5095

5683
6317
2320

5732
6372
2333

4796

4845

4894

4943

4059
1160

1816
1551«
4730
5367
6004
17740
4686
5317
5956
6514
7578
8384
8304
8LUN
o8

15204

1067«

17740
17744
7304
‘668
764
e308

SEQ 0133

6632
6632

1625

1338+
1516«

5634
6271
2270

5633
6070
5515
6152

TABLE == USER SYMBOLS

1335x
1229
1530
1524+
1532
1533
1534
1535

5585
622¢
8044

2487
2690
2899
3196
3541
3895

D 1

2510
2697
2928
3214
3575
3913

€482
6119
5564
6201

4087
1163

18554
1575
4779
5416
6053
2027
4709
5366
6003
1064

1888+
1889+
1850+
TT00

2517
2720
2961
3248
3593
3952

5531
6168
5613
4250

2540
2727
2969
3266
3627
3975

5580
6217
5662
66154

2758

5144

2788

5830

2818

5879

2547
2759
2977
3303
3645
4019

2570
2757
2986
3323
3679
4039

2577
2780
3010
3363
3697
4469

5629
6266
5711

5678

5727

4992

5041

5090

2861

5928

2904

2946

5389

2987

5438

3028

5487

3055

5536

2600
2787
3C'8
3385
3731
4518

2607
2810
3027
3419
3749
4559

2630
2817
3086
3437
3783
4600

2637
2842
3106
3471
3801
4619

2660
2856
3142
3489
3843
4702

5139

5188

5237

5286

5335

5972

6021

5776

5825

5874

5923

2667
2885
3162
3523
3861
4747
5384

<760

SBO9

5858

5907

5956

6005

6056

6103

4126
118

4164
1187

6542w
1193

1578«
4B2B
5465
6102

15924
4877
5514
6151

4926
5563
6200

4975
5612
6249

5026
566!
6628H

5073
5710

5122
5759

5171

5220

5269

5318

5808

5857

5906

5955

4778
5415
6052
1277

4BZ7
5464
6101
168C

4B76
5513
&150
1703

4925
5562
6199
4072

4974
5611
6248
4100

5023
5660
&587#
6363

5072
5709

5121
5758

5170
5807

5219
5856

5268
5905

4118

4156

4641

4656

6457

6576

1103+

1106

C1le

153

129

1308

1910

193s

811+

1838s

134sa

'0B6
1677
799
1964

109Ce
1739

110
799

1,58
837

12643

1375

1396

144

1616

1619

)

1412

8%
1817
10B4
1675
1090
1104

1857
188

(ZDMC
MACY11 30A(1052)
24-AUG=78
czomcc.Pi
11-AUG~78 08:21

SWwO1
SWO2
Sw03
SwWO4
SWO5
SWwO6
SwO7
SWO8
Sw09
SWw10
SW1t
SwWwi2
Sw'3

Swi14
SWi5

TDATA
TEMP
TEMP

TEMP?

TEMP3
TEMPL
TEMPS
TIMER

TKCSR

TKDBR

=
=
=
=
=
=
=
=~

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

040000
100000

(L7

6312

1770

629C+

6310+

5341+

001252
001254
001256
104416

7628
7634
7648
830#

1127+«
1128«
112G~

1153«
782
1784

1208
1986
1967+

1214
1989
1980

1780
1995
2186

1973
1998

1976
2C7¢4

2088+
2077

2083

2086

001206

7364

22644

1930

2260

2288+

2307+

3066+
3765+
(334

3122+
3817+
(370«

3178«
3878+
4405~

3230+
3929«
L4400

5602+

5651«

5700+

K239

6286

001250

001204

001210

004730
001226

768

7354

937

7374

£123%20
(C1317¢

ISTY14
TST115

1ST116
TSTUI7

1806

1848

66324

2245

1851

2247«

26392

24690

16044
7,84

1078+

2872%
3505«
4150y

4636

LO79r

5896+
1G24
2640

5045
1640
24698

(819

4917
505

Q27172

5260

030226
O%04(

2242

1804

1849

5064
5113
5162
2470

027676
03005¢

1846

1618«

026312
026466
026642
C13274

Q27522

1801

1616

L9466

TST113

1443
1443w

025762

027346

143%7

1441

T1ST10%

027016

1752+

1421~

4868

026136

1435

1778

1747+

1419

(25256

025606

1125+

1706~

7384

025432

TST112

1614

6311

TST100

IST110

1675
1399
1677
1375
1414
1619

6291«

TST101

1ST11Y

1739

2201«

5259+

TSTI0S
TST106
1ST107
TSI

1253

2200

2829+
3453
L1120

IS1104

1934

47048
1705«
1776

001212

TST102

SEQ 0134

4687
1558
1124+

TPDBR

TST1
TSTI0

1910

TABLE == USER SYMBOLS

4685
8584
7608

~ 033736

TRPOK
TSINO

(184

1308

(024542
001416
001246

TLAST

TPCSR

6318
6304
629#
628#
(Ydd
626
6254
624N
623
6228
¢
620
194

12:19
PAGE 135
(ROSS REFERENCE

5211

5308+

L8¢7n

496N

4968
SQiLm
506 3#

5112
51¢1#
52104
2499

52594

5308«

5309

535’

5407
565¢

54554

5358

5505
555«

55048

562y
Se.0ca

1689

2499+

2915«
3557«
ACEL]
4720

5357«

5994
2260

1717

2529«

2957%
3609
4226+
4769

54606+

6043

1921

D55Ga

2QQ8«
3661
(242
4818

54565

6092+

1628

D58Qs

3041
3713
4295+
LBE7r

5504«

6141+

1758+

D61Qe

4916%

5553+

6190

D649«

4965w

2679+

5014+

2709

5063+

6357+

2349+

6348+

2379x

24(9

3283«
3995«
4495+

3341
L(0S4Lx
4535+«

3401
4083+

5749+

5798+

2739«

5112+

6386

2769+«

5161+

2799w

{578~
5210+

S847n

1M 30A(1052)
MACY
(Z0MC
24~-AUG-78
{Zomcc.P1
11-AuG=-78 08:21

1ST12
TST12)
TST121
TST122
TST123
TST124
TST125
TST126
TST127
TST13
T1ST130
TST131
TST132
TST133
TST134
TST135
TST136
TST137

013372
030556
030732
031106
031262
031436
031612
031766
032142
013470
032316
032472
032646
033022
032176
033352
033544
033736

TST14

013566

TST1S
TST16
TST17

013664
013762
014060

15120
1S121
T1ST22
TS123
TST24
TST2S

014156
014254
014352
014450
014546
014672

T1ST27

015146

TST30
ST

015306
015450

TST140=

TST?2

1ST26

TST13

TST32

15133
1ST34
1ST35
15136
TIST37
TST4
TST40
TST41
TST42

T1S143
TST44
TST45
1ST46

1ST47

74715
TST50

15151

wwnwnn

012426

015016

01245¢

01553%

015734
01613%
016310
0164¢4
016664
012606
017104
017260
017634

017610
017764

020140
020314

020470

012704
020644

(21072

1STS5¢

021242

'ST%

15153

027151(

2500

12:19

PAGE 136

CROSS REFERENCE

2529
56514

57004
5749
5798~
58474
58964

594,54
59944
2559#
6043
6092#
6141
6190
62354
62864
€3374
¢3864
¢S89«

26194

26494

26794

22884
2706
2739«
2769
2795«
2829#
28724
29154
29574
2307
2998~
3041
20664
31224
Z178#

43P

F1N
TABLE == USER SYMBOLS

SEQ 0135

(ZOMC
MACY1T 30A(1052)
24=AUG-78
C20MCC.P1N
11-AUG-78 08:21

TSTSS

022026

4055

12:19
PAGE 137
CROSS REFERENCE

022120
022240
013002

4084
6113
2380

L1128
41504
2406

15761

022510

6194

L2264

TIST62
TST63
TST64
IST6S
1ST66

022404

022624
Q22726
023064
023210
023320

TST167
1577
IST70

023426
013100
023624

1S172

024104

TST7

TS173
TST74
TIST7S

023752

42624
L2954
(33
(3704
4405

WAL
c46'0
4442

[YRAY
2439
46954

453%

L5784

“H36m
L6798
«720#

003612

1302+

1303

1305

1658
1058

16614
1110

TWOSYN-

010000

(005206
104402

L7221
(7?70

683

1640
8064
1324

1648

7748
2176

1991
2'88#

004710
005174

1549«
1653

1582«
16564

WwRDCNT
wRKO.F

012002

005000

1638

1979

1615

003546
003570
006224
003022
003562
007454
0053%0

1325
1331
1722
1180
1329
1M
1647

ZERO

001300
cenaee

588

SCRAP -

77777

5884
23694
2497

XVEC

93¢0 )]

1650

006526
(012010

vEC
vVECMAP

XBX

1326

2016

005106

X(SR
IKERR
XHEAD
XL O(
XPASS
XSTATQ
XTSIN

L7694
(818#

018

TYPMSG

wHICH

4535#

4579
4635
46380

02472¢
025102

TYPDAT
TYPE

6227
4263
4296
6335
G371

4496

003554

1327

OIS

27594

2908
30620
T30
1550
I7¢'

ALY]

SEQ 0136

41934

(024304
024440
024552

1ST726
TSTY77
1187

ALY

TABLE == USER SYMROL
S

4083#

TSTS6
TSTS?
1S76

ISTO0

16418

2184#
1617

1350#
13554
1774n
" 198
13564
1774w
1687#

1306

13654

11%2

1207

1212

1220

1223

1255

1260

1330

1418

1431

1448

1541

1581

1641

2026

2033

2039

2048

2055

RRLY

WPEAYJ

2254
23754
25108
2642

cO56a
23998
2522

2280a
240?
25258
20694

0283
24058
254984
2672

84w
242008
2550
26754

29534
31684
1394
36054
.Y

2988«#
37
313974
3651
8”7

991
1748
LIXRY ]
3654
18744

1328

1654

2023

1656

1708

1814

1817

1869

1915

1301
1642

1310
1645

1323
1646

2062

1933

2177

1939

1977

1999

22974
2432
25554
2699

2300
24350
25794
2702

2303
24598
2582
27054

23394
2462
25854
27294

232
24658
26094
2732

235

27354

2994
32204
3446
36574
19198

30294
3223
3449
37034
390

3032
32264
34954
3706
39254

30374
32724
3498
37094
39854

30564
3275
35014
3755«
398§

3059
32794
I547%
3758
16918

15Q0#

16168

1353

22514
2372
24958
26308
2767

291'®
31128
I3
35538
380 7%

« LR

27658

29474
116
13178
359?0
T81¢

204654
2789

2950
31184
TiG14
3602
18'3s
IRERLN |

2792

Q77

27954

ST]

28154

2822

&'CS

28254

L1784

2B624

(VAR |

2865

(AP

28688

L146n

24BO#
2612
29054

LIBLN

L2538

4256

42584

4529
G768
L953@
5152

G531
L7574
4956
S1574

L568x
4760
49€14
51984

4571
47654
5002#
5201

4574h
4BO6H
5005
52064

L624H
4B09
50104
52474

4627
48144
50514
5250

c31o8
2497
2489
256¢
645
27134
2797
290¢
3002

2339
2412
2695
2563
2647
2729
2802
2911
30034

2345
26134
2497
2579
2652
2735
2803
2913
3029

2347
2429
2502
2585
26534
2737
2810
2919
3037

’10
5884

1096
2251

3120
3272

3405
3553
36664
3815
3985
4086

13424
2256

3126
3279
34064
3555
3703
3821
2961
40874

1666
2258

31274
3281

3443
356!
3706
38224
3993
4102

L4304

42854

4433

L6304
L8554
5054
52554

4288

L3324

44364

LLBOH

50594
52964

L6704
4858

4673
48634

46754
49044

44910

51004
5299

5103
5304k

5108#
53454

564024
5639%
5838
60394
62764

54434
5642
58434
60804
6279

5446
56474
58844
6083
62824

54514
56884
5887
60884
63184

54924
5691
58924
61294
6321

5495
56964
59334
6132
63334

55004
57374
5936
61374
63734

55414
5740
59414
61784
6376

22644

2280

2284

2286

22914

2297

2303

2305

2352
2435
2503%
2587
2669
c 42
2825
29204
3039
3168
3287

3449
35624
3711
3868
3999
4108

23534
2437
2519
2592
2675
27434
2827
2947
3044

3174
32884
3451
3599
3717
3874
40004
4110

2369
2442
2525
25934
2677
2759
2832
2953
30454

3176
3329
3457
3605
37184
3876
4065
4115

2375
24434
2527
2609
2682
2765
28334
2955
3C

2377
2459
2532
2615
26834
2767
2862
2961
3062

3
33

34580
3607
3755
3882
4050
41164

3495
3613
3761
38834
4052
4140

4327

4489

2382
2465
25334
2617
2699
2772
2868
29624
3064

23834
2467
2549
2622
2705
2773
2870
2988
3070

2399
2472
2555
26234
2707
2789
2875
2994
30714
v

5397
55984
58354
6034
62354

44014

3501
36140
3763
3919
4057
6146

3503
3651
3769
3925
4059
4148

3509
3657
37704
2927
4074
6153

~)
~)
0

5394w
5593
57944
oJ314
6230

4398

53534
55904
5789
59904
62278

L3954

L7084
4507

5544
57454
59824
6181
6382#
2311

2405
24734
2557
2639
2712
2795
28764
2996
3112
~n

42228

L3664

(220

4363

5348
55494
57864
5985
. BoN

718
32354
3399
3547
3665
28°3
39344
4«08?

35104
3659
3807
3933
4079
L1544

4184
4265
4366
L4458
4576

4189
L2664
4368
(4B
4582

419
(285
6373
4491
4583

4196
4291
6374
«493
4624

L1984
4293
4395
6499
4630

4217
4298
44601
L5004
4632

4227
Lo
4403
4526
4637

6224
4324
4408
4531
46384

4229
4330
4409
4533
4670

62304
4332
4430

4253
6337
6436

4258
43384
4438

4260
4360
44644

4539
4675

L5404
4677

4568
4683

4574
4L684n

L9218

4953

4961

6962

4963

4969

49704

5002

5010

501

5012

5018

5051
5157
5256
535%
5656

§794

5803

6096
f

L2174

n
N
o

7t
oo

41894

43604

[AY]
no
o

SENDAD
TM

SEQ 0137

L5264
7N
CAT2M
51494

CROSS REFERENCE TABLE == USER SYMBOLS

(3304

H 1

138

4187

PAGE

—

11-AuG~78 08:21

12:19

24-AUG-78

cZomMCcc. PN

30A(1052)

~NFOON

MACY1T

woown

(COMC

SBBN

260
Q6. 38
"8
g

5059
5158
5257
5361
56604

§795
589

5060
5159
5263
53624
5492

5796

5900

60978

6129

2201

2264w

2463M
650
B3
T

2470
Q653
CB7Y
Ry

5061
5165
52644
5394
5500

5067
31664
5296
5602
5501

50684
5198
5304
5403
£502

5100
5206
5305
5404
5508

5108
5207
5306

5109
5208
5312
56114
#5541

5110
5214
53134
5443
5549

50194

516
52154
5345
5651
5550
5649

51174
5247
5353
5652
5551

5149

5453
5557

5655

56564

5255
9354

5802

58034
5933

5941

5835

5843
5942

5643

5949

59504

5982

5990

5991

6137

638

6139

6145

61464

6178

6186

6187

6188

6194

2%0
2710
202uM

530
2713
Q958

2350

2353

2383

2410

Troe

59014

2289

2473
2680
B76M
TG

2291a

2500
Je3%e
Ty
gl

3128

Jo%%e

253%
2740
096o@
T8

2560
Svu3e
2999
toRge

2380

25634
2770
3003
33

2590
97738
2040

2593
2800
30454

24i3e

2620
2803
3067
306w

(COMC
MACYYY 20A(1052)
24=-AUG-78
CIDMCC.PYY
*'-AUG=78 08:21

3454
37704

03653

L1544
6406
4686

5260

52644

5309

53134

5897
61954
5884
824
€954
8554
8794
BY6#
9644

1965

003152
006472
Q04466
005552
005436
003364
036330
004750

.INSTR
LINSTT
.MSG
MSTCL
.PARAM
PRAIL
LRESOS
ROMCL
.SAVOS
.SCOPE
.SLOP1T
.START
.TIMER

JRPTA
. YR

LINSTE

TRPSR

6475

4966

5603

59014
6240
7944
8204
696
8644
8814
8974
913
QN

1702

2009

6493

12778
821
819
829
825
12184
‘€33
702

1542#
154"
»
17464
17194
+387
6632
16134

004050
004070
004072
005466
004174
0053%
00463
005504
004374
003576
0037%
D020C2
Q0561¢

809
1431
LG
82%
813
700
817
827
815
80%
805
719
31

14278
1451
14324
17304
1455
1065
15304
17358
5164
13664
13984
We3e
17¢7g

(OCT337
D370

8l'a
acr

16t
AT

004154

004 7¢

35104
3879

615
3740
4680

9128
Go8a

.BEGIN
JANVRT
.CONVR
.DATAC
DELAY
EOP
LERRTA
LY

3506
38224

Q11w
4371
46384

55584

1 GV

34588
3818

113
63384
4035
L1

12:19
PAGE 139
(ROSS REFERENCE

811

49704

56078

5946
6244m
802
8284
6994
8664
8824
8984
Q144
CRAF

1112

2129

5015

5652

59504
6287
804#
8304
7064
8674
3834
8994
9164
9324

1264

I
TABLE

358
38834

== USER SYMBO.S

35624
3930

36144
3996

3662
40004

36664
4055

3714
4GNSO

37184
(086

3766
40874

4194
o098
4721

L1988
L4472
L7254

4227
L4458
4770

L2304
4496
47744

4263
45004
4819

L2668
4536
48234

4296
456404
4868

62994
4579
LB724

4335
4583
4917

5358

53624

5407

56114

5456

564604

5505

55094

5554

5995
62904
8064
8324
711a
8684
884#
9014

59964
6338
808+

6044
63414
810#

60484
6387
8124

6093
63904
8144

60974
8164

818#

8204

8224

714
8654
8864
9024

7" 84
8714
8874
9034

7224
8724
8884
9044

7244
873a
8854
9064

776N
874m
8914
9074

7778
8764
8924
908+

7784
8774
8934
9094

7794
8784
894#
9114

50194

56564

9174
933y

1°€2

5064

5701

9184
9%4n

1697

6,508

2132

¢517

2180

221

€525

(5338

£70

£ 2,-

.7y

‘s

14484

KA]

3610
39344

SEQ 0138

50684

57054

9194
9364

1707

2243

4536

5113

5750

9214
9374

17554

2246

51174

57544

9224
938«

1790#

4452

5162

5799

9234
939«

17924

4642

51664

58034

6142

924m
Q41 a

1847

4655

5211

5848

61464

264
LN

1850

6368

52154

58524

6191

927

943N

1871

6458

CZOMC
MACYT1 30A(1052)
24=-AUG-78
C2oMCC.P1
11-ALG-78 08:21
5884
5884
6w

2278

2295

4138

4173

4181

5383

56432

“681

2509
2726
2985
3362
3748

$F LOAT

4701

2319

2332

2359

6213

4249

4281

5530

5579

5628

2546
2779
3026
3436
3842

L7646

4795

2569
2786
3054
3470
3860

4844

576
2809
3085
3488
3894

2389

4322

4358

56727

5726

2599
2816
3105
3522
3912

4893

4942

2606
2841
3141
3549
3951

4991

2396

2629
2855
3161
3574
3974

2419

2426

2449

2456

2479

2486

4393

2636
2884
3195
3592
4018

2659
2898
3213
3626
4038

2666
2927
3247
3644
4069

2689
2940
3265
3678
4071

2696
2968
3302
3696
4097

2719
2976
3322
3730
4099

4428

4468

6517

4558

4599

4618

5775

5824

5873

5922

5971

6020

6069

2699

2729

5049

5089

5138

5187

5236

5285

5334

€216

6265

6304

6316

6350

6361

636%

6476

6494

6509

6526

2905
2369

2399

24709

2459

2489

2519

2549

2579

2609

2639

2669

5884

4708

4757

4806

LBSS

4904

4953

5002

5051

5786

5835

5884

5149

5198

5247

5982

6031

6080

5884

3072

3091

3128

3201

7236

3053

3289

8
9

3347

3736

3 368
3 77

3407

3424

31329

239

3643

7495

§947

35Q¢

3657

3703

3755

3459

5443

3476

3528

4540

4654

6457

SNPR1

5884

4184

6217

425%

$NPR3

5884

4360

4395

4641

4285

4074
2988

354"

4500

5884

4045
2947

5649¢

5884

4324

569C

147

5639

184

SR80

5884

4102

414C

§ $PROCZ

5884

3056

3112

5168

3220

1272

968

981

1980

2069

r78

5884
5884
5884
588

4
3868

€488

365

5737

3532

3667

5100

3684

5933

5296

3788

5345

6516

$PRIO

$PRO( 3
$PRO( &
$PROC S
[SoUEST

2366

2251
2280
2297
2339

5884
5884
5884

SNPR?

SEQ 0139

5884
5884
>884
588¢

5394

61¢7

2539
2756
3017
3418
380C

$INTR
$IR
$MARH |

SMEMF |

== MACRO NAMES

$ALU

6118

2516
2749
3009
3384
3782

[V]

$ADD
$ADD2
$ADD 3
$ADDS

TABLE

N
1

4665

J 1

1312

OMEND
DMFRN"
HLT

12:19
PAGE 141
(ROSS REFERENCE

(ZDMC
MACY1Y 30A(1052)
24-AUG-78
C2DMCC.P1T
11-AUG-78 08:21

SRAMCL
$RCLK

588+
5884
3205
3412

1718
1721
3207
3428

1724
3239
3430

176"
3241
3462

4010
6317
4548
4659
4885

4012
435
4550
4689
4887

4030
6353
6552
4691
4930

6429

3618
3794

$TSTN

5132
5377
5622
5867
6112

517¢
5620
5665
5910
6155

6518

6521

6541

SWRFL T
BWRL6
$x2

1794
3935
3919
3985
6276
802

588¢

2258

2677
3281
4,081
€139

5884

5884
5884
5884

2459
2675
2947
3279
3703

4079
4360

. ABS.

6426

5884
5884
588
5884
5884
5884
5884
5884

4677
5404

$VAR]A

3636
3836

5130
5375
5620
5865
6110

6413
$SCOPE
$SIMBC
$SOF TC
$SPF
$SP1
$SP2
$TIMER
$TRPDE

3620
3828

1362

2707
3339
4110

4718
5453

3096
3295
3514

4032
4380
4586
4693
4934

6065
4383
4589
4695
4936

4093
4386
459N
4734
4979

46129
4415
4593
4738
4983

4169
4418
4608
47640
4985

6463%¢

6438

3638
3854

5179
5424
5669
5914
6159

€577

3670
3886

3722
3939

4206
4421
4610
4783
5028

4238
4461
4612
4787
5032

5230
5475
5720
5965
6210

5273
558
5763
6008
6253

5277
5522
5767
6012
6257

4580

6597

6608

6610

6618

6620

6441

6444

6447

6455

3134
3351
3534

3740
3945

4242
4504
4639
4789
5034

3152
3353
3566
3742
3962

42644
4507
4643
4832
5077

3154
3373
3568

3187
3375
3584

4274
4509
4646
4836
5081

4307
451
4652
4838
5083

3774
3966

3189
3410
3586

3776
3968

3792
4006

5328
5573
5818
6063
6407

5371
5616
5861
6106
6410

4315
4545
4656
4881
5126

5279
5524
5769
6014
6259

5322
5567
5812
6057
6306

5326
5571
5816
6061
6394

6501

6504

§'8

820

822

824

826

828

2497

2527

2557

2587

2617

2647

6459

6471

6489

6514

3957

80«

80¢

808

810

812

814

816

228¢

2305

2347

2377

2407

2437

2467

2737
3399
G148

2767
3451
619

797
3503
4224

2847
2862
2256

2877

2870

2280

2284

000

3690
3906

5228
5473
5718
5963
6208

2834
2819
2251

(3e53%

3688
3904

3132
3315
3532
3724
3943

5224
5469
5714
5959
6204

6237

4708
5059
5443
5794
6178

3672
3888

3098
3313
3516

SEQ 0140

5181
5626
5671
5916
€161

6188

6102
4366

-- MACRO NAMES

3078
3293
3482

4865
5600

2465
2699
2953
3329
3709

TABLE

3076
3259
3480

4816
5551

721

K 11

1766
3257
3464

4767
5502

4675
5051
5602
5786
6137

ERRORS DETECTEC:

12:19
PAGE 142
(ROSS REFERENCE

2489
2705
2988
3337
3755

4108
4395

6716
5100
5651
5835
€18¢

6284

2495
272
2994
3391
3761

6140
4401

4757
5108
5492
5843
€22’

6335

2519
2735
3029
3397
3807

(146
4430

4765
5149
5500
5884
€235

2827
3555
6260

2870
3607
4293

4914
5649

4963
5698

2297

2303

6384

2525
2759
3037
3447
3813

4184
L4636

4806
5157
5541
5892
6276

2549
2765
3056
3449
3868

4189
4486

4814
5198
5549
5733
6282

2913
3659
4332
5012
5747

2339

2955
371
6368
506"
5796

2345

2996
3763
4403

3039
3815
4438

3064
3876
4493

2369

2375

2399

5110
5845

2555
2789
3062
3495
3874

2579
2795
3112
3501
3919

2585
2819
3118
3547
3925

4217
44691

6222
6526

4253
453

4855
5206
5590
5941
¢718

4863
5247
5598
5982
€33

4904
5255
5639
5990
6373

5159
5894

2609
2825
3168
3553
3985

4258
4568

4912
5296
5647
6031
¢ 38¢

5208
5943

3120
3927
4533
5257
5992

2405

3176
3993
4576

3228
4052
4632

5306
6041

5355
6090

2615
2867
3174
3599
3991

2639
2868
3220
3605
4045

2429

2435

3226
3651
4050

3272
3657
4074

4285
6574

4291
4624

6324
4630

4330
4670

5737
6088

5745
6129

4953
5304
5688
6034

4961
5345
5696
6080

2645
2905

5002
5353

2669
2911

5010
5394

(COMC

MACY1T

C2DMCC.PYI

30A(1052)

24~AUG-78
11-AUG-78 08:21
08:

12:19 PAGE 143
CROSS REFERENCE

czomcC/1,c2DMC
. SEQ/SOL/CRF=C2DM (P11
RUN-TIME: 1€ 23 1 SE(ONDS
RUN-TIME RATI(: 45747.1.5
(ORE USED:
CBn
'S5 BAGE))

LN
TABLE =~ MACRO NAMES

SEQ 0141