Digital PDFs

AH-8783H-MC

February 1985

141 pages

Original

70MB

view download

OCR Version

92MB

view download

Document:	CZDZAH0 DZ11 DZ11 ASYNC MUX TEST FEB 1985 bw
Order Number:	AH-8783H-MC
Revision:	000
Pages:	141
Original Filename:	CZDZAH0__DZ11__DZ11_ASYNC_MUX_TEST__AH-8783H-MC__FEB_1985_gray.pdf

OCR Text

FEB

Bzll

[

i
il
mi...
1

[

1985

CZDZA-HO

CZDZAM.P11

MACY11 SOAC1052) 19-JUN-84 16:22 PAGE 1

€0 1

19-JUN-84 15:45

2
S
4

REM =

6
7

10
11
12

POREESEIRRRUL
I BYRNARNRUNEY ST

. SR
15

IDENTIFICATION
A R

RS LR SAL P

L (EP

el . T St AL

PRODUCT CODE:

AC-8781M-MC

PRODUCT NAME:

CZDZA0 DZ11 LN ASYNC MUX TSTS

PRODUCT DATE:

JUNE 1984

MAINTAINER :

MX-DIAGNOSTIC ENGINEERTING

THE INFORMATION IN THIS DOCUMENT IS SUBJECT TO OHMANGE WITHOUT
NOTICE AND SHMOWLO wOT BE CONSTRUED AS A COMMITMENT BY DIGITAL
EQUIPMENT CORPURA (ION. OIGITAL EQUIPMENT CORPORATION ASSUMES NO
RESPONSIBILITY FOR ANY ERRORS THAT MAY APPEAR IN THIS DOCUMENT.

NO RESPONS" JILITY IS ASSUMED FOR THE USE OR RELIABILITY
OF SOFTWA'c ON EQUIPMENT THAT IS NOT SUPPLIED BY DIGITAL
OR ITS AFFILIATED COMPANIES.

COPYRIGHT (C) 1976,1961,1984 BY DIGITAL EQUIPMENT CORPORATION
THE FOLLOWING ARE TRADEMARKS OF DIGITAL EQUIPMENT CORPORA.ION:

DIGITAL

DEC

DECUS

. UNIBUS

DECTAPE

MASSBUS

Cl
CZDZA -H0
P11
' CZDZ.m4

MACY11l SOA(1052)

19-JUN-84 15:4F

19-JUN-84

16:22

SEQ
2

PAGE 2

50
51
5
S3
S4
S5
56
S7

58
59
60
61
62

ABSTRACT

THE

FUNCTION OF THE DZ11 DIAGNOSTICS IS TO VERIFY THE

OPTION

OPERATES

ACCORDING TO SPECIFICATIONS.
THE DIAGNOSTICS ALSO VERIFY THAT THE DZ11
OPERATES IN ITS ENVIRONMENT SUCH AS THE SYSTEM IN WMICH IT IS INSTALLED.

PARAMETERS MAY BE SUPPLIED TO THE PROGRAM BY EITHER
‘AUTO SIZING'
OR
ON THE CONSOLE BY MAVING SWOO=1 AT START TIME.
AUTO
OMLY THE FIRST TIME THE PROGRAM IS STARTED AND

SWO7=0

AND

SW00=0

AND SWO3=0.

IA
T0 CERTAIN VALUES (SEE

TME AUTOSIZER IS DESIGMED

DETECT

8.3).

START TIME TMROUGH THE USE OF SWOO, SWOS, SWO4, AND SWO6 (SEE SEC. 4.1.1

FOR A DETAILED DESCRIPTION OF THESE SWITCHES).

CURRENTLY THERE IS ONE STANDALONE DIAGNOSTIC (CZDZA), ONE SYSTEM
:i.'a;fi)c lsgnglfl). AMD AN ONLINE OVERLAY FOR DZITA (ITEP) - DZDZB.

CZDZA WILL TEST ALL PARTS OF THE DZ11 SUCH AS CABLES, DIST PML.,

64
65
65

68
69
70

72
73
74

76
77
78

79
80
81
82
83
84

INTERFACE MODULE ITSELF.

REQUIREMENTS

EQUIPMENT
ANY POP1L FAMILY CPU (WITH MINIMUM 8K MEMORY)

ASR 33 (OR EQUILIVALENT FOR CONSOLE)
0Z11
INTERFACE MODULE (M7819(EIA), M7814(20MA))
H3271
STAGGCRED TURNAROUND CONNECTOR FOR EIA MODWLE.
H3190
STAGGERED TURNAROUND CONNECTOR FOR 20MA MODULE.
325
CABLE TURNAROUND AND DIST PML TESTING FOR EIA MODWLE.
M315
THIS MAY BE SUBSITUTED FOR M32S.

NOTE:

A STAGGERED TURNAROUND CONNECTOR IS NEEDED IN ORDER TO TEST

PARITY AND BREAX LOGIC.

THE

D1
| CZDZAM.P11
85
86
87

MACY11l SOA(1052)
19-JUN-84 15:45

19-JUN-84

2.2

88
89

16:22

SEQ
3

PAGE 3

STORAGE
PROGRAM WILL USE ALL 8X OF MEMORY EXCEPT WHERE ABL AND BOOTSTRAP

LOADER

RESIDE.
LOCATION 1500 THMRU 2000 ARE ESPECIALLY TO BE NOTED AND TO BE
UNTOUCHED B8Y OPERATOR AFTER PARAMETERS MAVE BEEN INPUT FROM CONSOLE
(SW00=1);
OR AFTER THE 'AUTO SIZING' MAS BEEN DONE.
THESE LOCATIONS

90
91

MAY BE CHANGED IF THE

USER

PARAMETERS ARE REQUIRED.

UNDERSTANDS

THEIR

MEANING

AND

DIFFERENT

LOAGING PROCEEDURE
ME THOD

ALL PROGRAMS ARE IN ABSOLUTE FORMAT AND ARE LOADED USING THE
LOADER.
NOTE:
IF
THME DIAGNOSTICS ARE ON A MEDIA SUCH

JMAGTAPE ,DECTAPE, OR CASSETTE;

INSTRUCTIONS

WHICH HMAS BEEN PROVIDED ON THAT SPECIFIC MEDIA.

FOR

THE

ABSOLUTE
AS DISK

MONITOR

ABSOLUTE LOADER STARTING ADDRESS 500
MEMORY

8x
12¢
16K
20K
24K
28K

SIZE

37
57
77
117
137
157

35.1.1

PLACE ADORESS OF ABS LOADER INTO SWITCH REGISTER.
(ALSO PLACE 'MALT' SW UP)

35.1.2

DEPRESS ‘'LOAD ADDRESS' KEY ON CONSOLE AND RELEASE.

5.1.3

DEPRESS 'START KEY' ON

LOADING INTO CPU)

CONSOLE

AND

RELEASE

(PROGRAM

SHOUWLD

NOW

El
CZDZA -0
CZDZAM.P11

MACY1l SOA(1052)
19-JUN-84 15:45

19-JUN-84

16:22

4
SEQ

PAGE 4

127

128
129
130
131
132
133
134
135
136
137
138
139
140

STARTING PROCEEDURE
A.

8.
C.
D.

SET SWITCH REGISTER TC 000200

DEPRESS 'LOAD ADDRESS' KEY AND RELEASE
SET SWR TO ZERO FOR 'AUTO SIZING'
OR SET SWOO=1 FOR USER PARAMETER
INPUT FROM CONSOLE TERMINAL.
ON FIRST START IF SWO7=1 AND SWO00+0
THE PROGRAM WILL DEFAMAT TO CONSOLE PARAMETER INPUT (SWO0=1).
DEPRESS 'START KEY' AND RELEASE, THE PROGRAM WILL TYPE MAINDEC NAME
AND PROGRAM NAME (IF THIS WAS THE FIRST START UP OF THE PROGRAM OR
PARAMETERS WERE CHANGED BY SWOO=1) AND ALSO THE FOLLOWING:
‘MAP OF DZ11 STATUS'

141

142
143
144
145
146

165
166
167
168
169
170

171
172
173
174
175
176
177
178

17°

18
181
182

1512

00000C

017070

THE ABOVE IS ONLY AN EXAMPLE!

148

THIS

WOWLD

STARTING AT ADD.
1500 IN THE PROGRAM.
VERIFIED BY THE USER IF AUTO SIZING IS DONE.

149

160
161
162
163
164

160100
000300
000005
000377

1510

147

150
151
152
153
154
155
156
157
158
159

1500
1502
1504
1506

TABLE SEE SECTION 8.4 FOR HELP.

INDICATE

THE

STATUS

TABLE

THE STATUS TABLE MUST BE
FOR INFORMATION OF STATUS

THE PROGRAM MWILL TYPE “RUNNING” AND PROCEED TO RUN THE DIAGNOSTIC.
4.1

CONTROL SWITCH SETTINGS

NOTE

SWR MAY BE MODIFIED
IF THERE IS NO REAL SWR (177570);
LOC:176 OR BY HITTING CONTROL “G* <tG> ON CONSOLE TERMINAL.

SW 15
SW 14
SW 13
SW 12
SW 11
SW 10
SW 09
SW 08

SET:
SET:
SET:
SET:
SET:
SET:
SET:
SET:

HALT ON ERROR
LOOP ON CURRENT TEST
INMIBIT ERROR PRINT OUT
INMIBIT eeAlLLee TYPE OUT/BELL ON ERROR.
INMIBIT ITERATIONS.
(QUICK PASS)
ESCAPE TO NEXT TEST
LOOP WITH CURRENT DATA
CATCH ERROR AND LOOP ON IT

SW 06
SW 05
SW O4
SW 03
SW 02
SW 01
SW 00

SET:
SET:
SET:
SET:
SET:
SET:
SET:

OPERATOR MUST INPUT ADDRESS AND VECTOR FROM CONSOLE.
RESELECT DZ11'S DESIRED ACTIVE
RESERVED
SELECT DELAY PARAMETER (SEE SEC. 4.1.1)
EXTRA PARAMETER INPUT (SEE SEC. 4.1.1)
LOCK ON SELECTED TEST
RESTART PROGRAM AT SELECTED TEST
GET USERS PARAMETERS FROM CONSOLE

THIS
(PROGRAM STARTED AT LOC. 210)
FOR ECHMO OR CABLE TESTS
THE
AND
VECTOR
THE
IN
TYPE
TO
USER
THE
ALLOWS
1
TO
SET
SWITCH

SW 07

SET:

NO AUTO SIZE.

IF 1ST START OF

PROGRAM AFTER

LOADING THE

CSR FOR THE DZ11 UWDER TEST.
FOR ECHO OR CABLE TEST THIS SWITCH SET TO 1 ALLOWS THE SELECTION

OF E.I‘flttegtfli ECHO OR CABLE TEST, BAUD RATE, AND THE LINE NUMBER

F1
| CZDZA-MO

CZDZAM.P11
183
184
185
186
187
188
189
190
191
192

MACY1l 30A(1052)

19-JUN-84 15:45

19-JUN-84

4.1.1

16:22

5
SEQ

5
PAGE

SWITCH REGISTER CONTROL OF PARAMETER INPUT 7ROM CONSOLE
SW 00

GET USERS PARAMETERS FROM CONSOLE.
SETTING THIS SWITCH AT START
UP TIME ALLOWS THE USER TO INPUT AT THE CONSOLE TERMINAL THE
FOLLOWING PARAMETERS:

BASE DEVICE ADDRESS, BASE VECTOR ADDRESS,

BUS REQUEST LEVEL, DECLARE EIA OR 20MA MODWLE, MODE OF OPERATION
AL OR STAGGERED), AND THE MUMBER OF DZ11'S THAT
, INTERNAL,
CEXTERN
ARE RUNNING.
USING THIS SWITCH ALONE DEFAMATS THE FOLLOWING
PARAMETERS:
ALL 8 LINES ARE SET TO BE TESTED ON EACH DZ11,
THE

193

DEFMALT BAUD RATE IS SET AT 9600 BAUD, AND THE CHARACTER LENGTH

FOR THE MAJORITY OF TESTING IS SET AT EIGHMT BITS PER CHARACTER
WITH TWO STOP BITS.

SW 03

EXTRA PARAMETER INPUT.
SETTING THIS SWITCH AT START WP TIME
PROVIDES THE USER WITH THE ABILITY TO SET THE LINES ACTIVE FOR
TESTING AND TO SET THE DEFAMAT BAUD RATE USED FOR THE MAJORITY
OF THE DIAGNOSTIC TESTS. THE DELAY PARAMETER IS AUTOMATICALLY
ADJUSTED TO THE BAUD RATE GIVEN BY THE USER.

SW 04

SELECT DELAY PARAMETER. THE DELAY PARAMETER THIS SWITCH CONTROLS
DETERMINES THE LENGTH OF TIME THE PROGRAM STALLS MAITING FOR A
CHARACTER TO BE COMPLETELY TRANSMITTED OR RECEIVED. THIS DELAY
COUNT IS AUTOMATICALLY SET TO PROVIDE ENOUGH DELAY TIME FOR THE
DEFAMAT BAUD RATE SPECIFIED WHEN RUNNING THE PROGRAM ON AN 11/45
WITH BIPOLAR MEMORY, WMEN RUNNING THIS PROGRAM
ON A FASTER
PROCESSOR THE DELAY PARAMETER SHOULD BE ADJUSTED PROPORTIONALLY
HIGHER THAN THE FOLLOWING DEFAMATED VALUES:

2450
1560
1120
0750
0660
0330
0150
0060
0040
0030
0020
0010
0001
0001
0001
0001
see NOTE

SO0 BAUD
;TIME FOR
7S BAUD
1TIME FOR
:TIME FOR 110 BAUD
1 TIME FOR 134 BAUD
s TIME FOR 150 BAUD
;TIME FOR 300 BAUD
:TIME FOR 600 BAUD
: TIME FOR 1200 BAUD
1 TIME FOR 1800 BAUD
;sTIME FOR 2000 BAUD
s TIME FOR 2400 BAUD
1 TIME FOR 3600 BAUD
1 TIME FOR 4800 BAUD
1 TIME FOR 7200 BAUD
1 TIME FOR 9600 BAUD
1 TIME FOR 19.2 KBAUD

eoee

19.2% BAUD IS AN UNSUPPORTED BAUD RATE. IT SHOULD NOT NORMALLY BE USED.

9600 BAUD IS THE SPECIFIED MAXIMUM,

233
234

16:22

4.1.2

235

SEQ
6

6
PAGE

SWITCH REGISTER RESTRICTIONS
SW 06

RESELECT DZ11'S DESIRED ACTIVE.
TYPED

OUT_

FOR

SETTING

ACTIVE.
THIS MEANS
00,01,02,03 WILL BE

METHOD
:

oO®>»

CZDZAM.P11

19-JUN-84

CZDZA-HO

MACY11l SOA(1052)
19-JUN-84 15:45

SW 01

USING

THE

IF THE
SET IN

THIS

PLEASE NOTE THAT A

SWITCH

MESSAGE

EQUAL TO DZ11'S

SYSTEM MAS FOUR DZ11S;
BITS
LOC
°'DZACTV'
FROM THE SWITCH

SWITCM( SWO06 )

ALTERS

THAT

LOCATION; THEREFORE IF FOUR DZ11S ARE IN THE SYSTEM eeeD0 NOTees
SET SWITCHES GREATER THAN SW O3 IN THE WP POSITION.
THIS WOWD
BE A FATAL ERROR.
DO NOT SELECT MORE ACTIVE DZ1iS THAN MAS BEEN
GIVEN INFORMATION ABOUT IN PARAMETER INPUT (SW00-1)
LOAD ADORESS 200
START WITH SW 06-1
PROGRAM WILL TYPE MESSAGE

SET THE BINARY NUMBER OF DZ11S DESIRED ACTIVE EXAPLE:
1-1
DZ11;
32 DZ11;
7-3 DZ11;
17=4 DZ11 375 DZ11 ETC/AA PRESS

NUMBER (IF VALID) WILL BE IN DATA LIGHTS (EXCLUDING 11/05)
SET WITH ANY OTHER SWITCH SETTINGS DESIRED.

PRESS CONTIMNUE.

RESTART PROGRAM AT SELECTED TEST
IT IS STRONGLY SUGGESTED
THAT AT LEAST ONE PASS HAS BEEN MADE BEFORE TRYING TO SELECT A
TESYTMTIS'OTINMMWSEWM REASON BEING IS
THE

PROGRAM

HAS

CLEAR

AREAS AND SET UP PARAMETERS.

'OTE
IF RUNNING MULTIPLE DZ11'S;
THE DZ11 YOU DESIRE TO0 BE
UNDER TEST MUST BE SELECTED BY THE USE OF SWO6 BEFORE LOCKING ON
THE TEST. IN OTHER WORDS;
EACH TIME THE PROGRAM IS STARTED;
THE FIRSY DZ11 WILL BE SELECTED TO BE UNDER TEST UMLESS SW06 IS

USED TO SELECT ONLY ONE.

LOOP ON CURRENT DATA:
THIS SWITCH WILL ONMLY WORK IF CALL
*SCOP1’
IS IN THAT TEST.
THE REASON BEING THAT MOST TESTS DEAL
WITH BLOCKS
OF DIFFERENT DATA TO BE SENT OR RECEIVED
ALL AT ONCE
THUS IN BLOCK DATA, ONE PATTERN CAN'T BE SINGLED OUT.

THIS SWITCH IS DESIGNED TO PROVIDE AN AID FOR A TRAINED TROUBLE-

SHOOTER TO SAMPLE VARIOUS SIGNALS ON THE MODULE AND IS NOT MEANT
TO BE USED AS A GENERAL USER CONTROL SWITCH

SELECT DELAY PARAMETER: THIS SWITCH SHOULD BE USED WITH CARE
AS TOO SHORT A DELAY WILL CAUSE VALID TESTS TO FAIL ON CERTAIN

PROCESSORS.

IT IS

RECOMMENDED THAT THIS SWITCH

ONLY BE USED

IN CONJUNCTION WITH SCOPE LOOPS, E.G, SW 14,9.4,1 SET; SW 9.4,
2,1 SET. THE SHORTEST PARAMETER IS 1; THE LONGEST ACCEPTED IS
177776 (SEE SEC. 4.1.1)

H1
CZDZA -HO
CZDZAM.P11

MACY11l 30A(1052)

19-JUN-84 15:45

19-JUN-84

4.1.3

16:22

SEQ 7

PAGE 7

SWITCH REGISTER PRIORITIES
ERROR SWITCHES

1.
2.
3.

SW 12
SW 13
SW 15

DELETE PRINT OUT/BELL ON ERROR,
DELETE ERROR PRINTOUT.
HALT ON THE ERROR.

SW 10

GOTO NEXT TEST(ON ERROR).

SW 08

GOTO BEGINNING OF THE TEST(ON ERROR).

3.
4.2

X
WA

SW 09 (IF ENABLED
BY 'SCOP1’'). IF AN ‘e’ IS PRINTED
IN FRONT OF
THE TEST NO. ON AN ERROR REPORT (EX. «TEST NO.
10 ) SW09 IS
INCORPORATED IN THAT TEST AND THEREFORE SW09 IS eUSUALLYs THE
BEST SWITCH FOR THE SCOPE LOOP (SW14=0, SW10=0, SWO09=1, SW08-0)
IF THE PROGRAM USER IS TECHNICALLY TRAINED TO ELECTRONICALLY
ISOLATE SIGNAL PROBLEMS ON THE DZ11 MODULE.
IF SWO9 IS NOT ENABELED;
AND THERE IS A sHARDes ERROR
(CONSTANT);
SWO8 IS BEST.
FOR INTERMITTENT ERRORS EITHER START THE PROGRAM WITH SWO1 AND
SWO2 SET WMICH WILL ALLOW THE USER TO LOCK ON A SELECTED
TEST,
OR ELSE SET SW14 AS AN ERROR IS BEING TYPED OUT ON THE TERMINAL.
SW14 WILL CONTINUE TO LOOP ON THAT TEST REGARDLESS OF WMETHER AN
ERROR OCCURS.
SW 14 LOOP ON CURRENT TEST.

STARTING ADDRESS

THIS
SA 200 - ADDRESS 200 IS FOR NORMAL EXECUTION OF THE DIAGNOSTIC.
OF
VERIFICATION
FOR
NECESSARY
DO THE MAJOR TESTING
WILL

SA 210 - CABLE/ECHO - TERMINAL TESTS.

STARTING AT ADDRESS 210 WILL GIVE

THE USER THE OPTION TO VERIFY THE EIA CABLES AT THE DIST PNL OR
VE"‘RI;;uA TRUE LINK TO ANY DEC SUPPORTED TERMINAL SUPPORTED BY

T
e

bow

5 ST

T FEEAREEE

SCOPE SWITCHES

NOTE:

IF ADDRESS 000042 IS NON-ZERO THE PROGRAM ASSUMES IT IS UNDER
ACT11 OR XXDP CONTROL AND WILL ACT ACCORDINGLY. AFTER eALLe

Axg%fl.i DZ11'S ARE TESTED THE PROGRAM WILL RETURN TO ‘'XXDP' OR

OPERATING PROCEDURE

WHEN PROGRAM IS INITIALLY STARTED MESSAGES AS DESCRIBED IN SECTION
WILL BE PRINTED AND PROGRAM WILL BEGIN RUNNING THE DIAGNOSTIC.

FOUR

11
CZDZA-HO
CZDZAM.P11
330

MACY11l 30A(1052)

19-JUN-84 15:45

19-JUN-84

3.1

16:22

SEQ
8

PAGE
8

NORMAL START OF DIAGNOSTIC
ON THE FIRST START OF THE DIAGNOSTIC AT ADDRESS 200;
IF
AUTO
SIZING IS NOT USED OR WHENEVER SW0O=1;
THE FOLLOWING QUESTIONS
ARE ASKED AND MUST BE ANSWERED.

*1ST CSR ADDRESS (160000:163700):

YOU MUST TYPE IN THE FIRST DZ11

TESTING TO BEGIN AT.

RANGE:

“1ST VECTOR ADDRESS (300:770):

CSR

THE

160000:163700

OSYSTEM

YOU

WISH

YOU MUST TYPE IN THE VECTOR OF THE
UNDER TEST.
RANGE 300:770

THE

SYSTEM

IN THE PRIORITY LEVEL OF
THE ODZ11 THAT
THE
INFORMATION
HAS BEEN GIVEN ABOUT. RANGE
4 OR S OR 6.

ABOVE

“BR LEVEL (4:6):

FIRST

DZ11

TYPE

“TYPE "A” FOR EIA MODWLE OR "8 FOR 20MA (A:B8):

TYPE "A* IF RUNNING A DZ11-A,.B8.E (EIA).
TYPE “B" IF RUNNING A DZ11-C,.D.F (20MA).
TYPING A <CR> DEFAMLTS TO EIA MODULES.
MODE

(EXTERNAL <H325>-EIA ONLY
(INTERNAL <DZCSRO3=1>
(STAGGERED <H3271>-EIA ONLY
(STAGGERED <H3190>-20MA ONLY

( €))
( 1))
( S))
( S)]

TYPE “E” OR "I" OR “S” DEPENDING ON WHICH MODE YOU WISH

IN.

RUNNING

“EXTERNAL”;

ALL

TERMINATED BY AN H325 TEST CONNECTOR.

SELECTED

LINES

MUST

RUN

Jl
CZDZA-HO

CZDZAH.P11
368
369
370
371
372
373
374
375
376
377
378
379
380
381
382
383
384
385

387
390

MACY11l 30A(1052)
19-JUN-84 15:45

19-JUN-84

16:22

9
SEQ

PAGE 9

"® OF DZ11'S <IN OCTAL> (1:20):

TYPE TOTAL NUMBER OF DZ11'S TO BE TESTED IN THE

IS 1 THRU 20 IN OCTAL.

SYSTEM.

RANGE

ssessssss IF SWOS=]1 THEN esssessss

IF SWOS=1 THE FOLLOWING WILL BE PRINTED.

“LINES ACTIVE BY BIT <IN OCTAL> (001:377):"
EACH BIT REPRESENTS A LINE AND ANY COMBINATION OF LINES MAY BE
SELECTED (MOMEVER IN STAGGERED MODE TWO ADJACENT LINES MUST BE
SELECTED (0-1, 2-3, 4-5, 6-7))..

"DEFAULT BAUD RATE <IN OCTAL> (00:16):

THIS GIVES THE USER A CHANCE TO CHANGE

THE

DEFAULT

BAUD

RATE

USED
IN APP. 90 PERCENT
OF THE TEST. BAUD RATE CHOICES
ARE:
*00"(
S0 BAUD),*01"(
7S BAUD),~"02"( 110 BAUD),"03"( 134 BAUD),
*04*( 150 BAUD),"05"( 300 BAUD), "06"( 600 BAUD), “07"(1200 BAUD),
*10*(1800 BAUD),"11"(2000 BAUD), “12"(2400 BAUD), "13"(3600 BAUD),
~14~(4800 BAUD), "15"(7200 BAUD), *16"(9600 BAUD), "17"(19.2 KBAUD)
LOW DEFAULT BAUD RATES ARE NOT SUGGESTED SINCE THEY LENGTHEN THE
mt"r,geCOMPLETE A PROGRAM PASS DRAMATICALLY.
ans

sxe

SPEED SELECT CODE 17 CAN BE USED TO SELECT 19.2K BAUD, BUT THIS
SPEED IS NOT SPECIFIED BY DEC, AND SHOULD NOT NORMALLY BE USED.

$880000084088840080088884888¢88084800

IT IS IMPORTANT TO NOTE THAT ALL DZ11'S IN THE SYSTEM MUST BE
ALSO ALL THE EXTRA
CONTIGIOUS FOR BOTH ADDRESS AND VECTORS.

PARAMETERS OTHER THAN CSR AND VECTORS ARE GIVEN TO THE

EXISTING

DZ11'S IN THE SYSTEM. IF NOT ALL DZ11'S ARE SAME PRIORITY OR IF
THE MODE OF OPERATION IS DIFFERENT FOR EACH DZ11;
THIS MUST BE

“PATCHED” INTO THE CORRECT STATUS MAP ENTRY WHICH IS PRINTED AT
START TIME. AN ALTERNATIVE IS TO PUT SWOO0=1 AT START TIME;
ANSWER QUESTIONS ABOUT DZ11 UNDER TEST AND INDICATE ONLY 1 DZ11
IN THE SYSTEM.,
IF THE STATUS MAP IS TO BE “PATCHED” IT MUST BE
DONE AFTER THE QUESTIONS ARE ANSWERED OR AFTER THE AUTO SIZE.

CZDZA-HO

CZDZAH.P11
409
410
411
412

413
414
415

MACY11 SOA(1052)
19-JUN-84 15:45

19-JUN-84

5.2

16:22

HOW TO RUN THE "CABLE/ECHO" TESTS.
NORMAL STARTING FOR THE FIRST TIME WOUWLD BE:
WITH THE SWR EQUAL TO 00S.

NOTE:

416

417
418
419
420
421
422
423
424

425
426

a2?

440
44)
aa2

443
444

447

448
449
450

451
452
453
454
455
456

457

458
459
460
461

SWOO=1 ASKS FOR “VECTOR” AND "CSR"
SWO1=1 ASKS FOR “WMICH TEST ECHO OR CABLE”,
UNDER TEST.
PROGRAM WILL PRINT OUT:

210;

START

"BAUD RATE”,

“LINE"

YOU TYPE VECTOR WITH A <CR>,

“CONTROL REGISTER ADDRESS-"
YOU TYPE IN DZCSR UNDER TEST.

“WHICN TEST ?

ECHO OR CABLE (E OR C)*

LETS DO THE CABLE TEST FIRST.
«eTHIS TEST IS ONLY TO BE DONE ON
Tg EIA VERSION OF
THE DZ11 NOT THE 20MA VERSION".
TYPE “C”
<CR>

“BAUD RATE- *
TYPE EITHER 50, 110, 135, 150, 300, 600,
3600, 4800, 7200, 9600 FOLLOWED BY <CR>
“LINE:

1200 1800, 2000,

2400,

YOU TYPE THE LINE WHICH HAS

THE

H325

TEST

CONNECTOR.

(TYPE

“CABLE TEST"

AND IF EVERYTHING IS WORKING;

4as
446

LOAD ADDRESS

“"VECTOR ADDRESS"

428
429

430
431
432
433
434
435
436
437
438
439

SEQ 10

PAGE 10

THE FOLLOWING WILL BE PRINTED:

“PASS DONE.
"

“PASS DONE."

ETC.

“LINE:

TO CHANGE LINES;
HIT ANY PRINTING KEY ON YOUR CONSOLE
TERMINAL
WHILE THE PROGRAM IS RUNNING AND THE FOLLOWING WILL BE PRINTED:
"

NOW CHANGE THE H32S TEST CONNECTOR TO ANOTHER LINE AND TYPE
NEW LINE.

PROGRAM WILL THEN PRINT:

“CABLE TEST"

“PASS DONE."
“PASS DONE. "

CONTINUE THIS OPERATION UNTIL ALL LINES ARE TESTED.

THE

L1
CZDZA-HO
CZDZAM.P11

MACY1l S0A(1052)

19-JUN-84 15:45

19-JUN-84

16:22

SEQ 11

PAGE 11

452

463

464

465
466

467
468
469

470
471
472
473
474

475
476
477
478
479
480
481
482

483
484
485

486
487
488
489

490
491
492
493
Atsl
495
496

497
498
499

500
501
502
503
S04
505
506
507
508
509
510
511

5.3

ECHO TEST

IF PROGRAM HAS ALREADY BEEN STARTED AT 210 AND THE

HAVE
002.

VECTOR

AND

ADDRESS

BEEN TYPED IN;
JUST LOAD ADDRESS 210 AND START WITH SWR EQUAL TO
PROGRAM WILL PRINT:

"WHICH TEST ?

ECHO OR CABLE (E OR C)"

NOW TYPE AN "E” TO DO THE ECHO TEST.

PROGRAM WILL PRINT:

“BAUD RATE-*

TYPE BAUD RATE AT WHICH THE TERMINAL IS SET THAT IS CONNECTED TO
THE DZ11 DIST PML.
BAUD RATE CHOICES ARE: SO, 7S. 110, 135, 150
300, 600, 1200,
1800,
2000, 2400, 3600, 4800, /200, 9600. THE

PROGRAM WILL THEN PRINT:

LINE:

TYPE ThH: LINE THE TERMINAL IS CONNECTED TO AT THE DIST PNL
THE "RCGRAM WILL PRINT:

THEN

"TERMINAL ECHO TEST”
¢ e AT THIS POINT THE MESSAGE:

*THE QUICK BrudN FOX JUMPED OVER THE LAZY DOGS BACK 0123456789

IF
SHOULD BE PRINTED ON THE TERMINAL CONNECTED TO THE 0DZ11.
SWR
THE
SET
THIS MESSAGE IS DESIRED TO BE CONTINIOUSLY OUTPUT;
TO 377 (SWR=377) WMILE IT IS BEING OUTPUT OR WHEN THE LINE NO.
IS REQUESTED ABOVE. WHEN THIS MESSAGE IS DONE AND THE SWR IS NOT

EQUAL TO 377;
“TYPE A CHAR.

THE CONSOLE WILL PRINT:

ON DZ11 TERMINAL"

ANY PRINTABLE CHAR HIT ON DZ11 TERMINAL SHOUWLD BE ECHOED BACK ON
THE TERMINAL.
e«IF YOU HIT CNTRL C <tC> ON THE DZ11 TERMINAL
THE PROGRAM WILL PRINT:

“PASS DONE.

ON THE CONSOLE TERMINAL

AND

THE

*“QUICK

BROWN

FOX"

WILL

PRINTED ON D211 TERMINAL AGAIN AND THE ECHO TEST WILL BE
RUNNING. TO CHANGE LINES: TYPE ANY PRINTABLE CHARACTER ON THE

CONSOLE TERMINAL (NOT THE DZ11 TERMINAL). THE PROGRAM WILL AGAIN
TYPE “LINE:

“ AND WAIT FOR A RESPONSE.

M1
CZDZA-HO
CZDZAM.P11

MACY11l 30A(1052)
19-JUN-84 15:45

19-JUN-84

16:22

SEQ 12

PAGE 12

512

5.4

THE VARIETY OF PROGRAM CONTROL SWITCHES PROVIDED IN THIS DIAGNOSTIC
PACKAGE IS DESIGNED
TO PROVIDE
THE USER WITH A WIDE RANGE OF TROUBLE -

SHOOTING TECHNIQUES. BEFORE THE USER ATTEMPTS TO RUN THIS DIAGNOSTIC HE
SHOULD BECOME FAMILIAR WITH THE USE OF THESE CONTROL SWITCHES AND THEIR

WHEN THE PROGRAM DETECTS AN ERROR THE TEST NUMBER AND PC WILL BE

TYPED

OUT AND POSSIBLY AN ERROR MESSAGE (DEPENDING ON THE PARTICULAR ERROR).
IF IT IS NECESSARY TO KNOW MORE INFORMATION CONCERNING THE ERROR REPORT
THEN LOOK IN THE PROGRAM LISTING FOR THAT TEST NUMBER AND THEN NOTE THE

PC
OF THE

526

ERROR

REPORT.

THE

REASON
FOR THE ERROR REPORT WILL BECOME

CLEARER WHEN READING THE COMMENTS IN THE PROGRAM LISTING.

Se7”

ERRORS

AS DESCRIBED PREVIOUSLY THERE WILL ALMAYS BE A TEST NUMBER AND PC_ TYPED
OUT AT THE TIME OF AN ERROR (PROVIDING SW 13=0 AND SW 12=0). IN MOST
CASES ADDITIONAL INFORMATION WILL BE SUPPLIED TO THE THE ERROR MESSAGE
WHICH IS TO GIVE THE OPERATOR AN INDICATION OF THE ERROR.
6.2

ERROR RECOVERY

IF FOR SOME REASON THE DZ11 SHOULD 'HANG THE BUS'

(GAIN

IS NECESSARY FOR OPERATOR TO REGAIN CONTROL

CPU.

SO THAT CONSOLE MANUAL FUNCTIONS ARE INKIBITED) AN INIT
HAPPEN;

LOOK

LOCATION ‘S$TSTNM'

(=}

528
529
530
531
532
533
534
535
536
537
538
539
540
541
542
543
544
545
546
547
548
549
550
551
552
553
554

PROGRAM AND/OR OPERATOR ACTION

ONTROL
OF BUS

513
S14
515
516
517
518
519
520 °
Sel
S22
Se3
524
525

POMER DOWN/UP
THIS

SHOUWLD

(BYTE 1122) FOR THE NUMBER OF THE

IN THIS
TEST THAT WAS RUNNING AT THE TIME OF THE CATASTROPHIC ERROR.
WAY THE OPERATOR WILL MAVE AN IDEA AS TO WHAT THE DZ11 WAS DOING AT THE
TIME OF THE ERROR.

RESTRICTIONS

STARTING RESTRICTIONS
SEE SECTION 4.1.2

STATUS TABLE SHOULD BE VERIFIED REGARDLESS OF HOM PROGRAM WAS STARTCD.
ALSO IT IS IMPORTANT TO USE THIS LISTING ALONG WITH THE INFORMATION

PRINTED ON THE TTY TO COMPLETLY ISOLATE PROBLEMS.

N1
MACY11l 30A(1052)

CZDZA-HO

19-JUN-84 15:45

CZDZAH.P11
555
556

19-JUN-84

7.2

557

558
559

16:22

SEQ 13

PAGE 13

OPERATING RESTRICTIONS
PARAMETER MUST BE INPUT FROM USER OR APT IF

560
561

562

MISCELLANEOUS

564

8.1

EXECUTION TIME

563

565

566

“AUTO SIZING" IS NOT USED.

ALL DZ11 DEVICE DIAGNOSTICS WILL GIVE AN 'END PASS’'

567
568
569
570
S71
572
g;z

MESSAGE

(PROVIDING

NO ERRORS AND SW12+=0) WITHIN 2 MIN. THIS IS ASSUMING SWil=1 (INMIBIT
ITERATIONS) IS SET TO GIVE THE FASTEST POSSIBLE EXECUTION.
THE ACTUAL
EXECUTION TIME DEPENDS GREATLY ON THE POP11 CPU CONFIGURATION. AN 11/40
WITH CORE MEMORY WILL TAKE AROUND 100 SECONDS TO EXECUTE A PASS WITH NO
ITERATIONS AND ABOUT 400 SECONDS TO EXECUTE A FULLY ITERATED PASS. ANY
OTHER
PDP11 CPU TYPE WILL EXECUTE A PASS IN TIME PROPORTIONAL TO THE
EXECUTION SPEED OF THE CPU 'S MEMORY IN RELATION TO THAT OF AN 11/40.

g;z

8.2

577
578
579

PASS COMPLETE

NOTE: <EVERYs TIME THE PROGRAM IS STARTED; THE TESTS WILL RUN AS IF
Sury (DELETE ITERATIONS) MWAS UP (=1). THIS IS TO 'VERIFY NO sHARDe
ERRORS' AS SOON AS POSSIBLE.
THEREFORE THE FIRST PASS -EACH TIME

STARTED- WILL BE A 'QUICK PASS' UNTIL ALL DZ11'S IN SYSTEM
WHEN THE DIAGNOSTIC HAS COMPLETED A PASS THE FOLLOWING IS

580
581

PROGRAM IS
ARE TESTED.

END PASS CZDZA-H

Ssgg

AN EXAMPLE OF THE PRINT OUT TO BE EXPECTED.

586

NOTE:

VEC: 300

PASSES: 000001

ERRORS:

THE NUMBERS FOR CSR AND VEC ARE NOT NECESSARILY THE
THE DEVICE.

THEY ARE ONLY FOR THIS EXAMPLE.

VALUES

587

CSR: 160010

FOR

B2
| ClDZA-m

! CZOZAM. P11
588
589
590

591
592

MACY11 SOA(1052)

19-JUN-84 15:45

19-JUN-84

16:22

SEQ 14

PAGE 14

KEY LOCATIONS
SLPADR (1126)

CONTAINS
THE ADDRESS
{s%}ég‘ COUNT IS

WHERE PROGRAM WILL RETURN WHEN
REACHED OR IF LOOP ON TEST IS

CONTAINS THE ADDRESS OF THE NEXT TEST TO BE PEFORMED.
CONTAINS THE NUMBER OF THE TEST NOW BEING PEFORMED.
THE BIT

CURRENTLY

°'RUN'

BE ING

ALWAYS

POINTS

TESTED.

ONE

PAST

THE

EXAMPLE :

1304/0000000001000000 MEANS THAT DZ11 NO.O0S IS THE

STATUS MAP
(1500)-(2000)

NOW RUNNING.

THESE LOCATIONS CONTAIN THE INFORMATION NEEDED

0Z11

(RUN)
0211

TEST

THAT

TIE

UP TO 16 (DECIMAL) DZ11S SEQUENTIALY.
THEY CONTAIN THE
CSR,VECTOR AND STATUS CONCERNING THE CONFIGURATION OF
DZACTV (1404)

EACH

0Z11.

ASSOC

BIT

SET

THMIS

LOCATION
TESTED

MICITES
IN

00,01,02,03,04
WILL BE TESTED.
EXAPLE:
1300/0000000000010001 MEANS THAT DZ11 NO. 00,04 WILL BE
$BASE

(1310)

TESVED.
&OSC;AINS THE RECEIVER CSR

THE

CURRENT

DZ11

UNDER

Ce
CZDZA-MO

| CZ0ZAN.P11

MACY11 SOA(1052)

19-JUN-84 15:45

19-JUN-84

16:22

SEQ 15

PAGE 15

616

8.4A

TAGS

SEQ 26

PAGE 26

COMMON TAGS

1106088000488888082488288880008400088088008084880084080800880080808880040

1#THIS TABL
1*USED IN

001120

SCMTAG

$TSTNM:
SERFLG:
$ICNT:
LPADR:
SLPERR:
SERTTL:
s$ITEMB:
SERMAX:
SERRPC:
SGDADR:
$BDADR:
SGDDAT:

CONTAINS VARIOUS COMMON STORAGE LOCATIONS
PROGRAM

.=1120

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

.WORD
LMORD
L.MORD
SAUTOB: .BYTE
S$INTAG: .BYTE
LMORD
.WORD
SWR:
DISPLAY: .WORD
$BDDAT:

$TKS:
$TKB:
$TPS:
$TPB:

SNAL:
SFILLS:
SFILLC:
$TPFLG:
SREGAD:

CZDZA-HO
CZOZAN. P11

19-JUN-84

077
015
000012

SREGO:
SREG1:
SREG2:
SREG3:
SREGA:
SREGS:
$TMPO:

177560
177562
177564
177566

O
O
O
O
O
O
O
O
1
O
O
O©
O©

O
O
O
O
O
O
DSMR
DDISP

.BYTE
.BYTE
.BYTE
.BYTE
.WORD

O
2
12
O
O

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

O
O
O
O
O
O
O

$TMP1:
.WORD
$TMP2:
.WORD
s$TMPS:
.WORD
$TIMES: O
.ASCII
SQUES:
SCRLF:
.ASCII

O
O
O

/v
<15

$LF:

ASCIZ

«<12»

.SBTTL

APT MAILBOX-ETABLE

1 sSTART OF COMMON TAGS

1 sCONTAINS THE TEST NUMBER
1 sCONTAINS ERROR FLAG
s sCONTAINS SUBTEST ITERATION COUNT
1 sCONTAINS SCOPE LOOP ADDRESS
1 sCONTAINS SCOPE RETURN FOR ERRORS
1 sCONTAINS TOTAL ERRORS DETECTED
s sCONTAINS ITEM CONTROL BYTE
1 sCONTAINS MAX. ERRORS PER TEST
ncom\ms PC OF LAST ERROR INSTRUCTION
1 sCONTAINS ADDRESS OF 'GOOD’ DATA
s sCONTAINS ADDRESS OF 'BAD’ DATA
s sCONTAINS 'BAD’ DATA
D- TO BE USED
-NOT
s sRESERVE

s sAUTOMATIC MODE INDICATOR
+ s INTERRUPT MODE INDICATOR
s sADDRESS OF SWITCH REGISTER
: sADDRESS OF DISPLAY REGISTER
13TTY KBD STATUS
:3TTY XKBD BUFFER
13 TTY PRINTER STATUS REG. ADDRESS
:3sTTY PRINTER BAUFFER REG. ADDRESS
3 sCONTAINS MULL CHARACTER FOR FILLS
s sCONTAINS @ OF FILLER CHARACTERS REQUIRED
A "LINE FEED"
COHMARS. AFTER
ERT
FILL
s sINS

13 "TERMINAL AVAILABLE” FLAG (BIT<07>=0=YES)

((SREGAD)+2)
Y
1+ sCONTAINS ((SREGAD)-4)
((SREGAD )+6)
'
s sCONTAINS ((SREGAD)+12)
1 sUSER DEF INED
s sUSER DEF INED
: sUSER DEF INED

nlSEl DEF INED

NUMBER OF ITERATIONS

nuSTIOI MARK

1 iCARRIAGE RETURN
;1 sLINE FEED

110088860808 08808008080000800084880848888000880000000080008080808080800000

B3
CZDZA -0
. P11
CZ0ZA

MACY11l SOA(1052)
19-JUN-84 15:45

SEQ 27

16:22 PAGE 27
APT MAILBOX-ETABLE

19-JUN-84

SMAIL :
SNSGTY:
SFATAL :
STESTN:
$PASS:

1217

38333

1218
1219
1220
1221
1222
1223
1224
1225

zg E i
333
it

1207

1208
1209
1210
1211
1212
1213
1214
1215
1216

001264
001265

1 tMESSAGE TYPE CODE

1 iFATAL ERROR NUMBER
131 TEST NIMBER
PASS COUNT

1 1CPV TYPE,OPTIONS

BITS 1% 114CPU TYPE
11704=01,1170502,11/720=0
1177008 .PDQ=07,@=10
BIT 10-REAL TIME CLOCK
8I1 9-FLOATING POINT PROCESSOR
BIT 8<MEMORY HANAGEMENT

1226

11/40=04,11/45=05

s sHIGH ADDRESS.M.S. BYTE
1 s MEM. TYPE,BLKO1

.BYTE
.8YTE

MEM. TYPE,g*z

001266

001324

001326

001330

001332

001334
001336

001340
001342

.BYTE
BYIE

(]

WORD
.BYTE

1 sMEM.LAST ADDRESS ,BLX®2
s sMIGH ADDRESS .M.S.BYTE

.BYTE
.BYTE

1 sHIGH ADDRESS.M.S.BYTE

n!!! TYPE,BLKeS

.BYTE

s sMEM.LAST ADDRESS ,BLKO3

ul!fl TYPE, I.KOA

1 sMEM.LAST ADDRESS .BLK4

ARVECT2

160010

1 1 INTERRPT V!CTWI.NS PRIORITYOL

1 s INTERRUPT VECTOROOUS PRIORITYE2
ummamss OF EQUIPMENT UNDER TEST
"

1 sCONTROLLER DESCRIPTION WORC#1
s sCONTROLLER DESCRIPTION WORD#2

001270
001271
001272
001274
001275
001276
001300
001301
001302
001304
001306
001310
001312
001314
001316
001320
001322

1227
122¢
1229
1230
1231
1232

1 1 APT MAILBOX

C3
CZDZA -0
CZ0ZAM.P11
|

1263
1264
1265
1266
1267
1268

001344
001346
001350
001352
001354
001356

1271

001360

MACY11l SOA(1052)
19-JUN-84 15:45
000000
000000
000000
000000
000000
000000

19-JUN-84

16:22

SEQ 28

PAGE 28

APT MAILBOX-ETABLE

$0DM10:
S00M11:

$00M12:
s00M1S:
$00M14 :
s$00W1S:
¢ETEND:

.
.
.
.

ADOW10
ADOM11
ADOMW12
ADOW13
14
ADDMW
ADOM135

11DEVICE DESCRIPTOR WORD®10
110EVICE DESCRIPTOR WORD#11
1 sDEVICE DESCRIPTOR WORD®12
110EVICE DESCRIPTOR WORD#13
1+DEVICE DESCRIPTOR WORD®14
1 1DEVICE DESCRIPTOR WORD®1S

D3
CZDZA-HO
CZDZAM.P11
|

MACY1l SOAC1052)
19-JUN-84 15:45

SEQ 29

19-JUN-84 16:22 PAGE 29
ERROR POINTER TABLE

1278

.SBTTL

1275

1oTHIS TABLE CONTAINS THE INFORMATION FOR EACM ERROR THAT CAN OCCUR.

1277

1oLOCATION $ITEMB. THIS NUMBER INDICATES WMICH ITEM IN THE TABLE IS PERTINENT.

1274

1276

1oTHE INFORMATION IS OBTAINED BY USING THE INDEX NUMBER FOUND IN

1278
1279

1 oNOTEL :
1 eNOTE2:

1280

1281
1282
1283
1284

o
ye
1.
e

1%? 001360

$ERRTB

1285
1266
1

1269

A=
1292 001360 000000
1293

001362

000000

IF SITEMB IS O THE ONMLY PERTINENT DATA IS ($ERRPC).
EACH ITEM IN THE TABLE CONTAINS 4 POINTERS EXPLAINED AS FOLLOWS:

EM
D+
ot
OF

1 tPOINTS TO THE ERROR MESSAGE
1 1POINTS TO THME DATA MEADER
1 sPOINTS TO THE DATA
1 sPOINTS TO THE DATA FORMAT

1PROGRAM CONTROL PARAMETERS
NEXT:
Locx:

1295

1297

ERROR POINTER TABLE

ey sADDRESS - OF NEXT TEST TO BE EXECUTED

O
0

sADDRESS FOR LOCX ON CURRENT DATA

:PROGRAM VARIABLES

ol it

1296

001364

000377

LINE:

377

JOEFAULT ALL EIGHT LINES RUNNING

1300
1301
1302
1303
1304
1305
1306

001370
001372
001374
001376
001400
001402
001404

000000
000000
000000
000000
000000
000000
000001

MODE:
SAVLIN:
XMTLIN:
XMTONT:
REGIST:
SAWC:
DZACTV:

O
O
O
O
O
O
.BLKW

tOEFAULT MAINTENANCE MODE
(LINE NUMBCR
+ TRANSMISSION LINE NUMBER
1COUNT OF WORDS IN A TRANSMISSION PATTERN
.oevn: ADORESS STORAGE LOCATION
1PROGRAM COUNTER STORAGE
.-ozu S SELECTED ACTIVE.

1308

001410

000001

OZMUM:

.BLKB 1

1299 001366 017070

1307

001406 000001

ggg 001411
1311

001412

001

001500

PAR:

17070

SAVNUM: .BYTE
1
.EVEN
ACTIVE: DZ.MAP

{PARNMETERS: 8 BITS/CHMAR,2 STOP BITS., 9600 BAUD.NO PARIT

16POINTER ONE PAST RUNNING DEVICE.

.oocm. NUMBER OF DZ11'S.

1 SWORKABI.E NUMBER.
1 TABLE POINTER.

[

CZDZA-HO
CZDZAM.P11

SEQ 30

16:22 PAGE 30
19-JUN-84
ERROR POINTER TABLE
1PROGRAM CONTROL FLAGS

001415

001416
001417
001420

001422
001424
001426
001430
001432
001434
001436
001440
001442
001444
001446
001450
001452
001454
001456
001460
001462

EIAFLG:
INIFLG:
MORFLG:
MNTFLG:
DONFLG:
.EVEN

.BYTE
.BYTE
.BYTE
.BYTE
.BYTE

1DATA VMI‘.ES

T00:
TDI:

]

0
0
0
0
O

10=EIA 100000=20MA
1PROGRAM INITIALIZATION FLAG
1PROGRAM INITIALIZATION FLAG FOR HEADER MAP
tMAINTENANCE BIT SET FLAG
1 TRANSMISSION COMPLETION FLAG

0000000000000
000

001414

LTI

END O MACRO
.SBTTL APT PARAMETER BLOCK
$110088080088008080000088000000000000000088800800000000400080080000%00

+SET LOCATIONS 24 AND 44 AS REQUIRED FOR APT
.$Xe,
=24

001462

000044

001462
001462

1§38

1312
1313
1314
1315
1316
1317
1318
1319
1320
1321

MACY11 S0A(1052)
19-JUN-84 15:45

1 sSAVE CURRENT LOCATION

13SET POMER FAIL TO POINT TO START OF PROGRAM
13FOR APT START P

1 sPOINT TO APT INDIRECT ADDRESS PNTR.

$APTHOR ; ;POINT TO APT MEADER BLOCK
.=, 8X

33RESET LOCATION COUNTER

1 1000000600060000000000000600000000000600006006000000000000000004

1SETUP APT PARAMETER BLOCK AS DEFINED IN THE APT-PDP11 DIAGNOSTIC
s INTERFACE SPEC.
001462
001462
001464
001466
001470
001472
001474

000000
001234
000132
000137
000137
000052

SAPTHD:

$HIBTS:
SMBADR:
$TSTM:

.WORD
.WORD
.WORD

$PASTM: .WORD
SUNITM: .WORD

001500

9S.
9S.

13 THWO HIGH BITS OF 18 BIT MAILBOX ADDR.
1 sADDRESS OF APT MAILBOX (BITS 0-15)
1sRUN TIM OF LONGEST TEST

ssRUN TIME IN SECS. OF 1ST PASS ON1 UNIT (QUICK VERIFY)
1 sADDITIONAL RUN TIME (SECS) OF A PASS FOR EACH ADDITIONAL UNIT

LMORD
SETEND-SMAIL/2 ;;LENGTH MAILBOX-ETABLE(WORDS)
1DZ11 STATUS TABLE AND ADDRESS ASSIGNMENTS
'

001500

O
SMAIL
90.

.=1500
DZ.MAP;

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

F3
CZDZA-HO
CZ0ZAM.P11

MACY11 SOA(1052)
19-JUN-84 15:45

SEQ 31

19-JUN-84 16:22 PAGE 3i
APT PARAMETER BLOCK

1368

1369

1370
1371
1372
1373
1374
137S

1376

001500
001502
001504
001506
001510
001512

000001
000001
000001
000001
000001
000001

1;;‘

1579
1380
1381
1382

1383
1384

138S

001514
001516
001520
001522

001524
001526

000001
000001
000001
000001

000001
000001

DZCRO:
DZvCO:
DZLVO:
LINEO:
PARO:
MANTO:

.BLKW
.BLKWw
.BLxkW
.BLkw
BLKW
.BLKW

1
1
1
1
1
1

PAR] :
MANT1:
1

.BLKW
.BLKW
.BLKW
.BLKW

BlKW
.BLKW

1
1
1
1

1
1

1394

001530
001532
001534
001536
001540
001542

000001
000001
000001
000001
000001
000001

1403

001544
001546
001550
001552
001554
001556

000001
000001
000001
000001
000001
000001

1406
1407
1408
1409
1410
1411
1412

001560
001562
001564
001566
001570
001572

000001
000001
000001
000001
000001
000001

i:{z

1415
1416
1417
1418
1419
1420
1421

1422

001574
001576
001600
001602
001604
001606

000001
000001
000001
000001
000001
000001

DZCR2:
DZvC2:
DZLV2:
LINE2:
PAR2:
MANT2:
1

1PARAME TERS
tMAINTENANCE MODE FOR THIS DEVICE

tCONTROL STATUS REGISTER FOR DZ11 NUMBER 2
tRECEIVER AND BASE VECTOR FOR DZ11 NUMBER 2
tPRIORITY LEVEL AND EIA FLAG SELECTOR
tALL LINES SELECTED
1PARAMETERS
tMAINTENANCE MODE FOR THIS DEVICE

.BLKW
.BLKW
.BLKW
.BLKW
BlKW
.BLKW

1
1
1
1
1
1

~$ANK-sssessssssssesssusssssssssssssssssss

1CONTROL STATUS REGISTER FOR DZ11 NUMBER 3
tRECEIVER AND BASE VECTOR FOR DZ11 NUMBER 3
1PRIORITY LEVEL AND EIA FLAG SELECTOR
tALL LINES SELECTED
1PARAMETERS
tMAINTENANCE MODE FOR THIS DEVICE

-- END O MACR) s=s=esssssssessssssss

.BLXKW
.BLKW
.BLKW
.BLKW
BLKW
.BLKW

1
1
1
1
1
1

~-$JANK-ssnssssssssssssssssssssssssssassansss

1CONTROL STATUS REGISTER FOR DZ11 NUMBER 4
tRECEIVER AND BASE VECTOR FOR DZ11 NUMBER 4
tPRIORITY LEVEL AND EIA FLAG SELECTOR
sALL LINES SELECTED
1PARAMETERS
sMAINTENANCE MODE FOR THIS DEVICE

-- END O MACR) ==sssssssssssssssss

DZCRS:
DZVCS:
DZLVS:
LINES:
PARS ;
MANTS:
t

1
1
1
1

DZCR4:
DZvCae:
DZLvA:
LINEA:
PARE ;
MANT4:
t

.BLKW
.BLKW
.BLKW
.BLKW
N
R
.BLKW

~$AUNK-ssssnsssssssssssssssssssssssssssssss

--END O MACRO s=ssssssssssssssssss

DZCRS:
DZVCS:
OZLVS:
LINES:
FARS:
MANTS:
$

“SJANK-ssssssssssscssssssssssssssassssssssss

1CONTROL STATUS REGISTER FOR DZ11 NUMBER 1
tRECEIVER AND BASE VECTOR FOR DZ11 NUMBER 1
1PRIORITY LEVEL AND EIA FLAG SELECTOR
sALL LINES SELECTED
3

{;2

1397
1396
1399
1400
1401
1402

END O MACR) =scsssssssssesssssas

1388
1389
1390
1391
1392
1393

+CONTROL STATUS REGISTER FOR DZ11 NUMBER 0
tRECEIVER AND BASE VECTOR FOR DZ11 NUMBER 0
1PRIORITY LEVEL AND EIA FLAG SELECTOR
tALL LINES SELECTED
1PARAMETERS
tMAINTENANCE MODE FOR THIS DEVICE
sscssssccssss

i1 -- END O MACRQ =ccccc

DZCR1:
DZvCl:
DZLVl:
LINELl:

~SJANK-sscssssnsscssssssssssssasssssssssass

-- END

.BLKW
.BLKW
.BLKW
.BLKW
LBLKW
.BLKW

1
1
1
1
)
1

~$AUNK-sssssssssssssssssssssssssssassssnsass

1CONTROL STATUS REGISTER FOR DZ11 NUMBER S
sRECEIVER AND BASE VECTOR FOR DZ11 NUMBER S
1PRIORITY LEVEL AND EIA FLAG SELECTOR
1ALL LINES SELECTED
1PARAMETERS
tMAINTENANCE MODE FOR THIS DEVICE

O MACR) =e=ssscscsssssssssss

~SJUNK-ssssscsssscsscassassarssssnsssssnnass

CZDZA -0
CZDZAM.P11
1424
1425
1426
1427
1428
1429

MACY11l 30A(1052)
19-JUN-84 15:45

001610
001612
001614
001616
001620
001622

000001
000001
000001
000001
100001
000001

19-JUN-84 16:22 PAGE 32

APT PARAMETER BLOCK

DZCR6:
DZvC6:
DZLV6:
LINE6:

PARG:
MANT6:
i

.BLKW
.BLKW
.BLKW
.BLKW

.BLKW
.BLKW

END O MACRQ

1
1
1
1
1
1

1CONTROL STATUS REGISTER FOR DZ11 NUMBER 6
+RECEIVER AND BASE VECTOR FOR DZ11 NUMBER 6
tPRIORITY LEVEL AND EIA FLAG SELECTOR
tALL LINES SELECTED
1PARAMETERS
tMAINTENANCE MODE FOR THIS DEVICE

sscccscssssesssssss
H

1433
1434
1435
1436
1437
1438

001624
001626
001630
001632
001634
001636

000001
000001
000001
000001
000001
000001

DZCR7:
DZVvC7:
DZLV7:
LINE?:

.BLKW
.BLKW
.BLKW
.BLKW

1
1
1
1

MANT7:

.BLKW

PAR7:
t

.BLKkW

END O MACRQO

tCONTROL STATUS REGISTER FOR DZ11 NUMBER 7
tRECEIVER AND BASE VECTOR FOR DZ11 NUMBER 7
tPRIORITY LEVEL AND EIA FLAG SELECTOR
tALL LINES SELECTED
1PARAMETERS

sMAINTENANCE MODE FOR THMIS DEVICE

e==sssssccssscscssss
t

1442
1443
1444
1445
1446
1447

001640
001642
001644
001646
001650
001652

000001
000001
000001
000001
000001
000001

DZCR10:
DZvC10:
DZALV10:
LINE1O:

PAR10:
MANT10:

.BLKW
.BLxW
.BLKW
.BikW

.BLKW
.BLKW

1
1
1
1
1
1

001654
001656
001660
001662
001664
001666

000001
000001
000001
000001
000001
000001

DZCR11: .BLKW
DZvC1l: .BLKW
DZLvil: .BLKW
LINE1l: .BLKW
PAR11l:
MANT11:
i

END

.BLKkW
.BLKW

O MACR)

1
1
1
1

1
1

1PARAME TERS
.mmm MODE FOR THIS DEVICE

1461
1462
1463
1464
1465

1469
1470
1471
1472
1473
1474

1478
1479

001670

001672
001674
001676
001700
001702

001704
001706
001710
001712
001714
001716

001720
001722

000001

000001
000001
000001
000001
000001

000001
000001
000001
000001
000001
000001

000001
000001

DZCR12:
DZvCi2:
DZLvVi2:
LINE12:

PAR12:
MANT12:
s

.BLKW
.BLKW
.BLKW
.BLKW

.BLKW
.BLKW

END 0 MACRO

DZCR1S: .BLKW
OZvC13: .BLKW
DZLV13: .BLKW
LINELS:

PAR1S:

MANT1S:
s

.BLKW
.BLKkW
.BLKW

END O MACR)

DZCR14: .BLKW
DZvCi4: .BLKW

1
1
1
1

1
1

1
1
1
1
1
1

1PARAME TERS
sMAINTENANCE MODE FOR THIS DEVICE

s==csecssssssssssssss

“S$ANK-osssssssssssssssssssssssssssssssssss

sCONTROL STATUS REGISTER FOR DZ11 NUMBER 12
tRECEIVER AND BASE VECTOR FOR DZ11 NUMBER 12
sPRIORITY LEVEL AND EIA FLAG SELECTOR
sALL LINES SELECTED
lPMTERS
MAINTENANCE MODE FOR THIS DEVICE

-.-..--...----....] ~ANK-or .ossssssssssssssssasssanssssssssssas

sCONTROL STATUS REGISTER FOR DZ11 NUMBER 13
tRECEIVER AND BASE VECTOR FOR DZ11 NUMBER 13
tPRIORITY LEVEL AND EIA FLAG SELECTOR
sALL LINES SELECTED
1PARAMETERS
tMAINTENANCE MODE FOR THIS DEVICE

=sesscsssssssssssss

1
1

~$JANK-ssssssassssnssessssssssssssssssansss

sCONTROL STATUS REGISTER FOR DZ11 NUMBER 11
sRECEIVER AND BASE VECTOR FOR DZ11 NUMBER 11
tPRIORITY LEVEL AND EIA FLAG SELECTOR
sALL LINES SELECTED

1460

~$/AUNK-ssssssssssssnsssssssssssssssssssssss

1CONTROL STATUS REGISTER FOR DZ11 NUMBER 10
tRECEIVER AND BASE VECTOR FOR DZ11 NUMBER 10
sPRIORITY LEVEL AND EIA FLAG SELECTOR
tALL LINES SELECTED

1451
1452
1453
1454
1455
1456

.‘m................--...--.I.......I-..-

~$JUNK-scssssssasssssssssssassassnasssssses

tCONTROL STATUS REGISTER FOR DZ11 NUMBER 14
tRECEIVER AND BASE VECTOR FOR DZ11 NUMBER 14

H3
CZDZA-HO
CZDZAN.P11

MACY1l 30A(1052)
19-JUN-84 15:45

”-M#

16:22

T PARAMETER BLOCK

DZLvVi4: .BLKW
LINE14: .BLKW

001724
001726
001730
001732

SEQ 33

PAGE 33

PAR14:
MANT14:
1

.BLKW
.BLKW

END O MACRC

1
1

tPRIORITY LEVEL AND EIA FLAG SELECTOR
tALL LINES SELECTED
1PARAMETERS
tMAINTENANCE MODE FOR THIS DEVICE

=eesccsscssssssasas
t

DZCR15: .BLKW
DZVC15: .BLKW
DZLV1S: .BLKkW
LINE1S: .BLKW

001734
001736
001740
001742
001744
001746

PAR1S:
MANT1S:
t

.BLKW
.BLKW

1
1
1
1

END O MACRQ

1
1

1CONTROL STATUS REGISTER FOR DZ11 NUMBER 15
tRECEIVER AND BASE VECTOR FOR DZ11 NUMBER 15
tPRIORITY LEVEL AND EIA FLAG SELECTOR
tALL LINES SELECTED
1PARAMETERS
tMAINTENANCE MODE FOR THIS DEVICE

es=scscsssssssssssss
3

001750
001752
001754
001756
001760
001762

DZCR16:
DZVC16:
DZLV16:
LINE16:

.BLKW
.BLxW
.BLxkW
.BLKW

1
1
1
1

MANT16:

.BLKW

PAR16:
i

.BLKW

ED 0 MACR)

DZCR17:
DZVvC17:
DZLV17:
LINEL17:

002000

PAR17:
MANT17:
t

177777

.BLKW
.BLKkW
.BLKW
.BLKkW

.BLKW
.BLKW

END O MACR)

DZ.END: 177777

1
1
1
1

1
1

..m..........................I.......-l.

1CONTROL STATUS REGISTER FOR DZ11 NUMBER 16
+RECEIVER AND BASE VECTOR FOR DZ11 NUMBER 16
UNIGITY LEVEL AND EIA FLAG SELECTOR
tALL LINES SELECTED
1PARAMETERS

mnmm MODE FOR THIS DEVICE

=sssssssssssssssass
t

001764
001766
001770
001772
001774
001776

“SANK-secsssssscsssssnsssssssssssssnsssnss

~$A/NK-ssssssssssssssssssasssssssssssssssss

sCONTROL STATUS REGISTER FOR DZ11 NUMBER 17
tRECEIVER AND BASE VECTOR FOR DZ11 NUMBER 17
sPRIORITY LEVEL AND EIA FLAG SELECTOR
sALL LINES SELECTED
1PARAMETERS
sMAINTENANCE MOOE FOR THIS DEVICE

=sssssssssssssassass

I3
CZDZA-HO
CZDZAN.P11

MACY1l S0A(1052)

19-JUN-84 15:45

16:22

19-JUN- M

SEQ 34

PAGE 34

T PARAMETER BLOCK

1DEFINITIONS FOR TRAP SUBROUTINE CALLS
tPOINTERS TO SUBROUTINES CAN BE FOUND
1IN THE TABLE IMMEDIATELY FOLLOWING THE DEFINITIONS

1514
1515
1516
1517
1518

1:00008000008008000000900800028004008000000000000800048000800048488080800008040

104400

007216

002010
002012
002014

002016

ADVANCE =TRAP +0
t

. ADVANCE

END O MACR)

ey G

=sscssssssssssssssse

sCALL TO LOOP ON CURRENT DATA HANDLER

104401
005376

SCOP1=TRAP.1 .

104402

Tm-m»g’e

104403

;P -~ M.o MACR) s=sssssscssssssssssss
tCALL TO ASCII STRING INPUT ROUTINE
mm-m"xgm

104404

3 -- m.o MACR) essssssssssssssssss
1CALL TO INPUT ERROR HANDLER
INSTER=TRAP +4

P -- m.o MACR) sssssssscssssssssss

104405

104406
011152

END

. INSTER

O MACR)

tCALL TO TELETYPE OUTPUT ROUTINE

=ssssssssssssssssss

mmo-mn:os

tCALL TO NUMERICAL DATA INPUT ROUTINE

P -- m.o MACR) s=ssssssscsssssssssss
tCALL TO SET FLAG ROUTINE
SETFLG=TRAP +6
i

.SETFLG

END 0 MACR)

s=sssssssssssssssss

1CALL TO REGISTER SAVE ROUTINE

104407

snvos-msizos

104410

: == m.o MACR) sssscsssssssssssssas
tCALL TO REGISTER RESTORE ROUTINE
RESOS=TRAP+10

006706

104411
006740

tCALL TO ADVANCE TO NEXT TEST( OR SCOPE THIS ONE)

;3 -~ m.o MACRQ e=ssscsssssssassssss
sCALL TG DATA OUTPUT ROUTINE
CONVRT=TRAP.11
i

CONVRT

END O MACR) =ssssssssssssssssss

sCALL TO DATA OUTPUT ROUNTINE WITHOUT CR/LF.

104412
006744

MYOMOIZ’T

002030

104413
007144

MVICE CLR=TRAP.13

002032

104414
007176

MRY'Wwot:Y

002034

026744

104415

’M'm”éOIS

END O MACR)

s=ssscssssssssssssss

.DEVICE.CLR

END O MACRQ)

tCALL TO ISSUE A DEVICE CLEAR

sssssssssssssssssss

1CALL TO DELAY FOR FAST CPU'S

;} -- m.o MACR) sessssssssssssssass

1CONVERT DECIMAL STRING TO OCTAL

J3
CZDZA-HO
CZDZAN.P11
1562
1563
1564
1565
1566
1567
1568
1569
1570
1571

MACY11 30A(1052)

19-JUN-84 15:45

19-JUN-84

16:22

SEQ 35

PAGE 35

APT PARAMETER BLOCK
P

END O MACR)

002036

104416
027140

PAWCH=TRAP+16
. PAUCH

002040

007164

104417

DCLASH=TRAP17

s=sssssssscssssssscs

1SET FLAG

;

END O MACR)

==sssssssssssssssss

END

=s=sssssssssssssssss

O MACRQ

ECHO OR

CABLE

JCLEAR DEVICE, SET MAINT. BIT IF I MODE

142 0 0 0 80 0R0ARR00R0RARERRERRRRCRLRRGALARCRRERSBEGLCORIRELNBRGS

IK3
CZDZA-HO

CZDZAM.P11

MACY1l S0AC1052)

19-JUN-84 15:45

19-JUN-84

16:22

PPT PARAMETER BLOCK

10Z11 VECTOR AND REGISTER INDIRECT POINTERS
1WORKING AREA

1572

1573
1574

1S7S
1576
1577
1578

PAGE 36

002042
002044
002046
002050

DZCSR:

160040

HDZTOR: 160047

1588

1589
1590
1591

002072

002074
002076
002100

DZRIV:

DZTIV:
:

;R/W

;MRITE ONLY

tDEFALT DZ VECTORS
300
tREC INTR VECTOR
JREC INTR STATUS
302
;1XMIT INTR VECTOR
304
306

1 XMIT INTR STATUS

SEQ 36

L3
16:22 PAGE 37
APT PARAMETER BLOCK

19-JUN-84

0000000000000
0O0

s TIME TABLE FOR RELATIVE TIMING TESTS

(=]

159
1595
1596
1597

MACY11l SO0A(1052)
19-JUN-84 15:45

000

CZDZA-HO
CZDZAM.P11

SEQ 37

M3
CZDZA-HO
CZDZAM.P11

MACY11l SO0A(1052)
19-JUN-84 15:45

19-JUN-84 16:22 PAGE 38
PROGRAM INITIALIZATION AND START P.

1618
1619
1620
1621

SEQ 38

PROGRAM INITIALIZATION
JLOCK OUT INTERRUPTS
1SET UP PROCESSOR STACK
1SET UP POMER FAIL VECTOR
;CLEAR PROGRAM CONTROL FLAGS AND COUNTS
‘TYPE TITLE MESSAGE

.START:

001412
001406

001126

17T

176610

000176
000174
000004
000006

001160
oo1162

208:

22¢:
216:

001415
000042
001000
001415
001255
012112

314:

29¢:

RESET
MOV
MTPS
MOV
MOV
MOV
MOV
MOV
MOV
MOV
MOV
MoV
MOVE
QR
CLR8
MOV
MOV
CLR
CLR
QR
MOV

JCLEAR THE WORLD. START NEW ENVIRONMENT
#STACK, SP
JSET UP STACK
#PR7
;LOCK OUT INTERRUPTS
OIPARON, 9924
1SET UP POMER FAIL VECTOR
#$SCOPE . 99TOTVEC
+SET vtctoa FOR SCOPE ROUTINE
0340, 9TOTVEC +2
JLEVEL7
SSERROR , DIEMTVEC
L SET VECTOR FOR ERROR ROUTINE
0340, DIEMTVEC
+2
JLEVEL7
. TRPSR , DO TRAPVEC
VSET v:croa FOR TRAP CALLS
0340, DOTRAPVEC+2
JLEVEL7
#IPURDN , BIPMRVEC
1SET vtcml FOR POMER FAIL ROUTINE
0340, DIPURVEC +2
JLEVEL7
DDMM.SAVNUM
;SAVE MUMBER OF DEVICES IN SYSTEM.
;CLEAR PASS COUNT
$PASS
;CLEAR ERROR FLAG
SERFLG
00Z.MAP ACTIVE 1GET MAP POINTER,
01,RUN
;POINT POINTER TO FIRST DEVICE.
CLEAR ERROR COUNT
SERTTL
JCLEAR LAST ERROR POINTER
$ERRPC
+SET UP FOR TEST 1
$TSTNY
0.START.SLPADR ;SET UP FOR POMER FAIL BEFORE
%nsmc STARTS
;SET UP FOR SMALL 11 SWITCM REGISTER COMPATIBILITY
;SAVE BUS ERROR PS
6,-(SP)
MOV
MOV
a.-(SP)
1SAVE BUS ERROR PC
MOV
0204 ,4
1SET UP TO TRAP TO THIS ROUTINE
P
0-1,85\R
;CAN 177570 BE REFERENCED?
{IF SO AND IT IS -1, TREAT LIKE SMITCHLESS
22¢
8EQ
+IF YES,SKIP AROUND THE SETUP
214
B8R
POP2SP
REMOVE THE TRAP FROM THE STACK
+IF NO,TRAP COMES MERE.POINT TO SOF TWARE SWR
OSUREG, SWR
MOV
SOISPREG,DISPLAY ;POINT TO SOF TWARE DISPLAY REGISTER
MOV
JRESTORE THE BUS ERROR VECTOR
(SP)e.4
MOV
(SP)e.6
MOV
1ST8
INIFLG
;TITLE ALREADY PRINTED?
1BRANCH IF YES
29¢
BNE
[
9042, 00ENDAD
;RUNNING UNDER ACT?
'IF YES DONT PRINT TITLE
314
8EQ
TYPE
DECB

MTITLE
INIFLG

JPRINT THE DIAGNOSTIC'S TITLE
1SET TME ONCE ONLY FLAG

B8PL
JSR

304
PC,SETAPT

+IF NOT, GO CHECK FOR AUTO-SIZING
JOTHERWISE, GO DO APT SIZING FROM ETABLE

NOP
CLR8

HORFLG

tMAKE SURE STATUS TABLE IS PRINTED

TSTB

$ENVM

JDETERMINE WHETHER APT SIZING SMOULD BE DONE

.mnce&n HORFLG” WITH NOP'S

N3
CZDZA-HO
CZDZAM.P11
1674

1675
1676
1677
1678

MACY11l SOAC1052)

19-JUN-84 15:45
000137

032777

001011

122737
001003
105777

100402
000137
012700
105037
005020
020027
001374
105337

004420

19-JUN-84

16:22

304 :

BIT

SEQ 39

PAGE 39

PROGRAM INITIALIZATION AND START UP.

000001

176500

000377

001415

002000

SSHR
324

1GO PRINT DZ STATUS TABLE
sRESELECT ?
+IF YES, GO SET UP THE INFORMATION
tON 1ST START; MUST ANSMER QUESTION
+IF_NOT ANSUERING QUESTIONS
1ARE U AUTO SIZING?
tNO AUTO SIZE! NO SWOO=1 ON 1ST START!

002 .RAP RO

+POINT TO THE BEGINNING OF THE MAP TABLE

0377, INIFLG
.10

176462
003244
001500
001416

164
#SW00, BSWR
32¢

32¢:

MOV

654:

CLR

001415

734

HORFLG
(RO).
RO, #0Z.END
65¢
INIFLG

+IF NO, SKIP THE INTERROGATION

{MAKE SURE A MAP GETS PRINTED
tCLEAR A TABLE LOCATION
tHAVE THE TABLE BOUNDARIES BEEN EXCEEDED?
+IF NOT ,CLEAR THE NEXT LOCATION IN THE TABLE
+INSURE NO AUTO SIZING IF QUESTIONS ANSWERED!

:THE FOLLOWING ARE PARAMETERS USED TO FILL IN THE MAP
s TABLE AND SET UP THE DIAGNOSTIC.
1GET THE BASE ADDRESS OF THE DZ11'S
33s:

.BYTE

001500

001310

-$GETPAR-ssvssssssssssssssssssssssssssssss

1CALL THE STRING INPUT ROUTINE
+POINTER TO MESSAGE TO BE PRINTED
sCALL THE OCTAL TO ASCII CONVERT ROUTINE
sLOMEST LEGITIMATE VALUE OF EXPECTED RESPONSE
sHIGHEST LEGITIMATE VALUE OF EXPECTED RESPONSE
sPOINTER TO MAP LOCATION TO BE FILLED
sMASK OF INVALID BITS FOR THIS PARAMETER

{NUMBER OF PARAMETERS TO STORE

DZCRO, $BASE

:COPY BASE ADDRESS TO ETABLE

:GET THE BASE VECTOR ADDRESS
348:

tCALL THE STRING INPUT ROUTINE
+POINTER TO MESSAGE TO BE PRINTED

INSTR

674
PARAM
300

.BYTE

3
1

sCALL THE OCTAL TO ASCII CONVERT ROUTINE
sLOMEST LEGITIMATE VALVE OF EXPECTED RESPONSE
sMIGHEST LEGITIMATE VALUE OF EXPECTED RESPONSE
+POINTER TO MAP LOCATION TO BE FILLED
1MASK OF INVALID BITS FOR THIS PARAMETER
{NUMBER OF PARAMETERS TO STORE

MOV

DZVvCOo, $VECT1

:COPY VECTOR TO ETABLE

776

0ZvCo

013737

001502

001304

-$GETPAR-sssssssssssssssssssssssssssssssss

:GET THE BUS REQUEST LEVEL
i

1727
1729

104403
003571
104405

INSTR

684

PARAM
4
7

-$GETPAR-ssscsssssssssssssssssssssssssssss

tCALL THE STRING INPUT ROUTINE
+POINTER TO MESSAGE TO BE PRINTED
tCALL THE OCTAL TO ASCII CONVERT ROUTINE
tLOMEST LEGITIMATE VALUE OF EXPECTED RESPONSE
tHIGHEST LEGITIMATE VALUE OF EXPECTED RESPONSE

CZDZA-W
CZ0ZARM.P11
1730

MACY11 SOA(1052)
19-JUN-84 15:45

002612
002t 14

SEQ 40

16:22 PAGE 40
PROGRAM INITIALIZATION AND START UP,

19-JUN-84

001504

002615

O
1

MOVe
ASLB
A5 B
ASLS
ASLB
ASLS

DZLVO, SVECT1.1
SVECT1.1
SVECT1.1
SVECT1.1
SVECT1.1
SVECT1.1

0 MACRQ

002616

+POINTER TO MAP LOCATION TO BE FILLED
tMASK OF INVALID BITS FOR THIS PARAMETER

oZLvo
BYTE
BYTE

INUMBER OF PARAMETERS TO STORE

ccscscccccscscsssess

1GET BUS REQUEST LEVEL INTO ETABLE
IALIGN THE BITS PROPERLY
IALIGN THE BITS PROPERLY
1N.IGN THE BITS PROPERLY
tALIGN THE BITS PROPERLY
tALIGN THE BITS PROPERLY

IF MODULE IS EIA OR 20 MA,
OUT ND
FI
TYPE
CLR
TST8
8PL
MOV
8IC

748
sTMP)
94 TxS
80¢
8T8, -(SP)
#177600,(SP)

BNE

834

ePL

1014

(o, ]

101%:

1ST8

8IC
(o, )
BNE
ST

&R
(o, ]
BNE
TS

102¢:

000015
176212
000102

100000

001504

001504
81¢:

[2*]
MOV
8IC
o8
BNE
8IS
8R

@IXOFF ,(SP)

84TKS
947xB,(SP)

#177600,(SP)
O$XON,(SP)
1014
(SP).
80¢

OIXON, (SP)
1024
(SP).

804

015 (SP).
81
-(SP),047P8
#8IT1S,02Lv0
0102.(9)0
804
#81I71S,02Lv0
804

1PRINT EIA MESSAGE

tUSE ¢TMP)
1 IS XEYBOARD DONE?
I
1 IF NOT, WAIT FOR

lIF YES, PUT cmnc:n ON STACK
1:0SH-80L
1STRIP DOMN CHARACTER
1:0SH-BL
1IS 1IN A mr
130SH
AR IF ND

MAIT Ffl A OWARACTER

ng-u

1GET OMARACTER
1STRIP DOMN OHARACTER
sWAIT FOR A XON?
1GET NEXT CHAR IF NOT

1 s0SH-BL
1:0SH-80L
1:0SH-B0L
3 :0SH-BML

tWAIT FOR A OMAR
1IS IT A RANDOM XON
1R IF NO
1ELSE, POP STACK
1GO GET NEXT CHAR
1IS IT <«CR> ?

1 :0SH
130SH-BL
130SH-BL
1:0SH-BL
1 30SH-BML

1POP STACK

3 30SH

1IF NOT, PRINT CHARACTER

1CLEAR EIA FLAG

+1IS IT A B?
1 IF NOT, GO BACK FOR INPUT
1IF SO, SET FLAG
1GET MORE INPUT

1GET THE MODE OF OPERATION (E.I.S)
i

INSTR

724

SETFLG

003010
003012

MANTO

END

O MACRQ

-$GETFLG-esssccsscsccsnssssscsscasssss

1CALL THE STRING INPUT ROUTINE
1POINTER TO THE MESSAGE TO BE PRINTED
1CALL THE MAINTENANCE FLAG SETUP ROUTINE
lYHIS IS THE FLAG BEING SETWP

e#esssscssssasssssssse

1GET THE NUMBER OF DZ11'S RUNNING
i

1785

003014

104403

INSTR

-0GETPAR-sccccsscsccssssssssssssscecsnanss

1CALL THE STRING INPUT ROUTINE

C4
| CZDZA-M0
CZ0Zm1. P11

MACY11 SOA(1052)
19-JUN-84 15:45

1786

003016

003740

1788
1789

003022
003024

000001
000020

1787

1790
1791
1792
1793

1794

003020

003026
003030
003031

714

1POINTER TO MESSAGE TO BE PRINTED

1
16.

ULMSY LEGITIMATE VALUE OF EXPECTED RESPONSE
JHIGHEST LEGITIMATE VALUE OF EXPECTED RESPONSE
tPOINTER TO MAP LOCATION TO BE FILLED
tMASK OF INVALID BITS FOR TMIS PARAMETER
INMFMBER OF PARAMETERS TO STORE

104405

P AR AM

001220
000
001

TP
.BYTE
.BYTE

O
1

tCALL THE OCTAL TO ASCII CONVERT ROUTINE

END O MACR) =cscccsccscscecscns

1795
1796
1797
1798
1799
1800

003032
003040

012737
012737

000377
017070

001506
001510

MOV
MOV

0377,LINEO
017070,PARO

003046
003054
003062

0127357
032777
001402

000001
000010

007214
176076

MOV
817
BEQ

#1,0L YONT
#SUOS , BSWR
404

1802
1603
1604
1605
1806
1807

003070
003076
003104
003112
003116
003120

012737
113737
113737
005337
001404
000261

000001
001220
001220
001220

MoV
MOve
MOVe
DEC
8EQ
SEC

01, S0EWH
$THP1, 020
$THP1 , SAVNUM
ImPl
614

1801 003064 004737 003274

1608
1809
1810
1811
1812
1613
1814
1815
1816
1817
1818
1819
1820
1821
1822
1823
1824
1625

404:
624:

PC,28¢

1GET_PARNMETERS

+INITIALIZE ACTIVE DEVICE SELECTION PARAMETER
1COPY THE NMUMBER OF DEVICES
1COPY A BACKUP NUFMBER
1$THP1 CONTAINS THE COUNT OF UNINITIALIZED
+ SELECTED DEVICES
1SET A BIT FLAG TO INDICATE AN ACTIVE DEVICE

1827 003224 016012 177774

MOV

-4(”5 ('2)

1GET TME EIA FLAG FROM THE PRIORITY WORD

1829 003234 051022

8IS

(RO),(R2)+

1ADD PARAMETERS TO DEVICE DESCRIPTOR WORD

003230

042712

1830

003236

012021

003240
003242
003244
003232

001312
001312
0013500
001514
001320
001222
001222

1840

003260
003264
003270

61%:

644:

177777
004374

414:

000010
000010

012021
000751
032777
001002

077777

000010

1835 003254 000137 004374
1836
1837
{:g

001222
001404

012021

1828

1831
1832
1833

001312

JSR

SOEVM
624
SOEVM, § TMP2
S$OEVM,DZACTY
m.
#0ZCR1,.R1
@400W0,

003222

006137
000771
013737
013737
012700
012701
012702
000241
006037
006237
103404
012711
000137
012011
062721
012011
062721
012021

001312
001410
001411

1SET UP DEFAMAT LINES
1SET UP DEFAMAT LPR PARAMETER
JRECEIVER ON; 9600 BAUD; 2STOP BITS; 8 BIT/CHAR
s INITIALIZE DELAY COUNT
100 YOU WANT PARNETERS?
1IF ND, SKIP THE PARAMETER CALL

ROL
B8R
MOV
MOV
MoV
MOV
MOV
acC
ROR
ASR
8CS
MOV
JP
MOV
AOD
MOV
ADD
MOV

1626

003122
003126
003130
003136
003144
003150
003154
003160
003162
003166
003172
003174
003200
003204
003206
003212
003214
003220

SEQ 41

19-JUN-84 16:22 PAGE 41
PROGRAM INITIALIZATION AND START P,

004737
105337
000137

003274
001415
004420

175706

73¢:
424

MOV

P2
P2
414
e-1,(R1)
634
(RO)+,(R1)
010,(R1).
(RO)+,(R1)
€10,(R1).
(RO)+,(R1)e
(RO)+,(R1).

8IC

077777,(R2

MOV

(N)O.(RI)O

MOV
BR
8IT
BNE

(RO)+,(R1).
&4
#SHOS, BSWR
424

JSR
DECB
JP

PC,23¢
INIFLG
164

63¢

+POINT TO THE NEXT DEVICE
1G0 DO THIS PROCEDURE AGAIN
10 OF TIMES
1COPY THE ACTIVE DEVICE PARAMETER
1SET A POINTER TO THE SPECIFIED INFORMATION
1POINT R1 TO THE REST OF THE MAP TABLE
sPOINT TO ETABLE'S DEVICE DESCRIPTOR WORDS
+sINITIALIZE THE “C” BIT FOR A ROTATION
1SKIP MAPPING SETUP FOR DEVICE O- IT'S DONE
1 ISOLATE A SELECTION FLAG IN THE ~C" BIV
+IS TMIS DEVICE SELECTED? IF YES, GO LOAD TABLE
s TERMINATE THE LIST
lm TO THE NEXT BLOCX
+ ADDRESS
.’om TO THE NEXT DZ11 ADORESS VALUE
1 VECTOR
1POINT TO THE NEXT VECTOR VALUE
ILEVEL
1LINES

1ISOLATE THAT FLAG
1PARAME TERS

tMAINTENANCE MODE

1ASK PARAMETERS ?
+IF NO, GO DO AUTO SIZING

160 SET UP FOR

0 SIZING

1G0 ASK PARAMETER
1INSURE NO AUTO SIZE IF QUESTIONS ANSWERED
1GO TO THE NEXT BLOCK

1GET THE ACTIVE LINES PARAMETER

1842
1843
1844
1845
186

MACY11 S0A(1052)
19-JUN-84 15:45

234:

003274

694

PR AN

1
s
LINEO
.BYTE

1847

.BYTE

~0GETPAR-ecccscscscsssssscsssssesccsnsssss

tHIGHEST LEGITIMATE VALUE OF EXPECTED RESPONSE

.romu TO MAP LOCATION TO BE FILLED

END O MACRQ)

CLR8

001416

SEQ 42

1CALL THE STRING INPUT ROUTINE
1POINTER TO MESSAGE TO BE PRINTED
1CALL THE OCTAL TO ASCII CONVERT ROUTINE
tLOMEST LEGITIMATE VALUE OF EXPECTED RESPONSE

INSTR

104403

tMASK OF INVALID BITS FOR THIS PARAMETER

INUMBER OF PARAMETERS TO STORE

sesccscscsssssssssse

HORFLG

{MAKE SURE THE CHANGES ARE PRINTED

1 THIS SEGMENT CHECKS TO MAKE SURE THE LINE PARAMETER JUST ENTERED

+IS LEGITIMATE IN STAGGERED MODE OPERATION IF THMAT MODE WAS SELECTED

244

ROE

27s:

TYPE

MANTO
264
LINEO,RS
RS
254
264
RS
244
, SQUES

254:

BEQ

234
27¢

001512
001506

001230
011075

1S STAGGERED THE MODE OF OPERATION?
+IF NOT, SKIP THIS SEGMENT
1GET A SCRATCH COPY OF THME ACTIVE LINES
1GET
A LINE SELECTION BITCEVEN NMPBER LINE)
+IF IT IS SELECTED accxtosszvncvext 1S 100
+IF ALL HAVE BEEN CMECKED, CONTIMUE PROCESSING
'IF IT IS O,CMECK TO SEE IF THE MNEXT IS T00
+IF THIS ONE'S O TOO, GO CMECK TME NEXT PAIR
s THIS IS AN INCORRECT PARAMETER
1GO GET THME CORRECT PARAMETER
:
FLAG ISN'T SET, THERE'S AN ERROR

JLET THE USER KNOW ABOUT IT
1GET THE NEXT FLAG

27¢

sIF IT ISN'T SET, THERE'S AN ERROR

1GO TEST THE NEXT PAIR OF FLAGS

JINITIALIZE THE “C* BIT FOR YESTING OF THE NEXT PAIR

tGET THE LINE PARAMETER REGISTER ARGUMENT
264

704
P &AM
o

104405

PARO

001

.BYTE

012702
0127035

011304

016437
000313
032713
011262

011363
062702

tHIGHEST LEGITIMATE VALUE OF EXPECTED RESPONSE
+POINTER TO MAP LOCATION TO BE FILLED

000017
001510

.BYTE

001306
001510

032416
010070
000014
000014
000014

007214
284

~-$GETPAR-cssssccscsssscssssssssssssnrasssss

tCALL THE STRING INPUT ROUTINE
+POINTER TO MESSAGE TO BE PRINTED
1CALL THE OCTAL TO ASCII CONVERT ROUTINE
ILGEST LEGITIMATE VALUE OF EXPECTED RESPONSE

INSTR

104803

003670

§§§§§§fi§§§

CZDZA-HO
CZ0ZAM.P11

16:22 PAGE 42
19-JUN-84
PROGRAM INITIALIZATION AND START UP,

0
1

END O MACR)

tMASK OF INVALID BITS FOR THIS PARAMETER
t{NUMBER OF PARAMETERS TO STORE

sessssssssssssssass

OLINEO,R2

tPOINT TO THE LINE SELECTION PARAMETER

(RS).

tUSE BAUD RATE AS AN INDEX IN DELAY TABLE

#PARO RS

1POINT TO THE CHOSEN PARAMETERS

TNDEX ON WORD BOUNDARY
tALIGN
THE DELAY COUNT FOR THIS BAUD RATE
T
u.vcm
G.YTI(M)
(R3)
PLACE IN HIGH BYTE
#10070,(R3)

(R2),14(R2)
(R3),14(R3)

14 ,R2

l’LACE EXTRA PARAMETERS INTO LOC

1LOAD THE LINES

1LOAD THE PARAMETERS
tPOINT TO THE NEXT SET

E4
CZDZA-HO
CZDZAM.P11

1898
1899
1900
1901
1902

(1)
(1)
(1)
(1)
(1)
(1)
(1)
(1)
(1)
(1)
(1)

(1)

(1)
(1)

1903

MACY11l SOAC1052)
19-JUN-84 15:45

003450
003454
003460
003462
003464

O03S30
003571
003614
003670
003740
004002
004023
004071
004137
004207
004260

004342
004374

004374

062703 000014
020327 001774
001363
000207
030600 0352123 041440 664:
030600
200
046200
042200
021600
046600
200
200
200
200
052200

042600 052116

004374

122737

1904 004402 001006
1905 004404 032777
1906 004412 001002
1907 004414 004737
1908 004420 105737
1909 004424 001021
1910 004426 105337
1911 004432 104402
1912 004436 012700
1913 004442 010037
1914 004446 012037
1915
1916
1917
1918
1919
1920
1921
1922
1923
1924
1925

004452
004460
004462
004464
004466
004470
004474
004476
004504
004506
004512

022737
001403
104411
011140
000765
005737
001026
032777
001422
104402
005000

1928
1929
1930
1931
1932

004524
004526
004532
004534
004536

101404
104402
000000
000776
017737

1926
1927

1933
1934
1935
1936
1937

1938
1939

004514
004516

004544
004550
004552
004560

004562
004564

052123
051102
047111
043105
047440
044501
055440
055440
055440
05S440
050131

000000
027737

013700
000000
032777
001407

104403
004342

053040 674:
046040 684:
051305 694:
052501 704:
020106 714:
052116 72¢:
054105
047111
052123
052123
020105 744:
051105

000377

001415

000200

174546

177777

754:

.EVEN
634:

LASCII
LASCII
LASCIZ

ASCIZ
.ASCIZ
O %P6

001312

HALT
c

Ss:
001222

000042

1s:

BEQ
TYPE
CLR

010771

174436

.ASCIZ
LASCIZ?
ASCIZ
LASCIZ
LASCIZ
LASCII
LASCII

174454

164:

17¢:

000100

ADD
(w, 4
BNE
RTS
LASCIZ

BNE
BIT
BNE
JSR
1ST8
BNE
DECB
TYPE
MOV
MOV
MOV
(w4
BEQ
CONVRT
XSTATQ
8r
ST
BME
8IT

012264
001416
001416
011050
001500
001220
001222

SEQ 43

19-JUN-84 16:22 PAGE 43
PROGRAM INITIALIZATION AND START UP,

010643

9¢:

174416
001404

001404

24:

000020

174400

3¢:

B8LOS
TYPE
HALT
B8R
MOV

MOV
HALT
BIT
BEQ

INSTR
75

OF BOTH PARAMETERS
#14,R3
lFflVE THE TABLE BOUNDARIES BEEN EXCEEDED?
RS, PARL7
+IF NOT, GO LOAD SOME MORE PARAMETERS
284
T0 CALLING BLOCK
&'W
PC
700): /
(160000:163
$S
CSR
<200>/1ST
<200>/1ST VECTOR ADDRESS (300:770): ~/
<200>/BR LEVEL (4:6): /
<200>/LINES ACTIVE BY BIT <IN OCTAL>(001:377):
<200>/DEFMAT BAUD RATE <IN OCTAL>(00:16): ~/
<200>/70 OF DZ11'S <IN OCTAL> (1:20): /
<200>/MAINTENANCE MODE/
(E))/
<200>/ [EXTERNAL <MH325>-EIA ONLY

<200>/
<200>/
<200>/

[INTERNAL <DZCSRO3-1>
[STAGGERED <M3271:-EIA ONLY
[STAGGERED <M3190>-20MA ONLY

()
(S)): 7
(b))* /

<200>/TYPE "A” FOR EIA MOD\LE OR "B” FOR 20 MA (A:B): /
<200>/7ENTER DELAY PARAMETER: /

0377, INIFLG

tONLY DO AUTO SIZE ON 1ST START

o-1,4TMP2
1s

1END OF LIST?
18R IF YES
;CALL THE OCTAL TO ASCII CONVERSION ROUTINE
;1CONVERT THE DATA AT THIS ADDRESS
1GO PRINT THE NEXT PARAMETER
1 IS PROGRAM RUNNING UNCER MONITOR
1 YES
1DESELECT SPECIFIC DEVICES??
18R IF NO.
lTYPE THE MESSAGE.
1ZERO DATA DISPLAY -

164
0BIT7,85WR
16¢
PC.AUTO.SIZE
HORFLG
14
HORFLG
+ XHEAD
40Z .MAP ,RO
RO, $THPL
(RO)+, $TMP2

Ss
2642
3¢
#5W06 , 8SWR
3¢
. MNEW
RO

SSWR, $DEVM
24
MERR3
94
SSWR ,DZACTV
DZACTV,RO

#SWO4 , BSWR
184

[
18IT7=172?
18R IF NO AUTO SIZE
1GO DO THE AUTO SIZE
tMAS THE TABLE BEEN TYPED YET?
1IF SO, DON'T TYPE IT AGAIN
t“l“ffi THAT THE TABLE WILL BE TYPED
1 TYPE MAP HEADER
1SET POINTER
sPOINT TO THE MAP LOCATION
1SET DATA

tMAIT FOR USER TO TELL WHAT DEVICES TO RUN
1IS THE NUMBER VALID?
18R IF NUMBER IS OKX,
lTELL USER OF INVALID NUMBER.
1STOP EVERY THING.
tRESTART THE PROGRAM AGAIN.
1GET NEW DEVICE PATTERN

1SHOM THE USER WHAT ME SELECTED.
sCONTINUE DYNAMIC SWITCHES.
lC’tO( TO SEE IF DELAY COUNT CHANGES
+IF NOT, GO CLEAR VECTOR AREA
5

.‘fif’m..--.-.-.----o----...-.--.---...--

1CALL THE STRING INPUT ROUTINE
tPOINTER TO MESSAGE TO BE PRINTED

F4
CZDZA-HO
CZDZAM. P11

1940
1941
1942
1943
1944
1945
1946

1947
1948
1949
1950
1951
1952
lgz
1

MACY11 S0AC1052)
19-JUN-84 15:45

004566
004570
004572
004574
004576
004577

104405
000001
177777
007214
000
001

004600
004604
004610
004612
004514
004616
004622

012700 000300
012701 000302
010120
005021
022021
022700 001000
001372

19-JUN-84 16:22 PAGE 44
PROGRAM INITIALIZATION AND START UP,

as:

1958 004624 012706
1959 004630 106427
1960 004634 005737

1972

MOV
MOV
MOV
CLR
ce
("
BNE

#300,RO
#302,R1
R1,(RO).
(R1).
(RO)+,(R1)e
#1000,R0
&4

JPREPARE TO CLEAR THE FLOATING
1VECTOR AREA. 300-776
1START PUTTING "PCe2 - MALT”
1IN VECTOR AREA.
1POP POINTERS
tALL DONE??
1BR IF NO.

1 TEST START AND RESTART

1937

1971

tCALL THE OCTAL TO ASCII CONVERT ROUTINE
tLOMEST LEGITIMATE VALUE OF EXPECTED RESPONSE
tHIGHEST LEGITIMATE VALUE OF EXPECTED RESPONSE
tPOINTER TO MAP LOCATION TO BE FILLED
tMASK OF INVALID BITS FOR THIS PARAMETER
INUMBER OF PARAMETERS TO STORE

-- END 0 MACRQ =essscssassssscsses

186:

1955

1961
1962
1963
1964
1965
1966
1967
1968
1969
1970

PARAM
1
177777
DL YONT
.BYTE O
1
.BYTE

SEQ 44

004640 001015
004642 032777
004650 001406
004652 104402
004656 012737
004664 000403
004666 013737
004674 012737
004702
004706

104402
000177

.BEGIN: MOV
MTPS
TST

001120
000340
000042
000004

174310

010667
000240

005140

005372
011542
010560
174214

005140
001126

14:
2%:
i

BNE
8IT
BEG
TYPE
MOV
BR
MOV
MOV
TYPE
JP

#STACK, SP
®R7
9842

4.
#B8IT2,85WR
14
MLOCK
ONOP, TTST
44
BRW, TTST
OCYCLE, SLPADR

1SET UP STACK
sLOCK OUT INTERRUPTS
lIS PROGRAM UNDER MONITOR CONTROL

18R _IF YES
sCHECK FOR LOCK ON TEST
18R _IF NO LOCX DESIRED.
s TYPE LOCK SELECTED.
1ADJWUST SCOPE ROUTINE.
sCONTINUE ALONG.
mut NORMAL SCOPE ROUTINE
.STMT AT “CYCLE” FIND WHICH DEVICE TO TEST

1 TYPE “"RUNNING"
lSTmT TESTING
-- END O MACR) ==sssssssrsssscssss
: -PRGEND -*sesssssssssssssssessssssssssss
JR
S$LPADR

ert
CZDZA-HO
CZDZAN. P11

MACY11l SO0A(1052)
19-JUN-84 15:45

SEQ 45

19-JUN-84 16:22 PAGE 45
END OF PASS ROUTINE

1973
1974
1975

1END OF PASS
1TYPE NAME OF TEST
1UPDATE PAS S COUNT

1977

tRESTART TEST
END OF PASS ROUTINE

1CHECK FOR EXIT TO ACT-11

1976

.SBTTL

1978
1979
1980
1981

1100800000020

6RR00Rd

G0 aRRAR00RRsdR00ERsRRRORlt0RARRRlRbDe

1o INCREMENT THE PASS NUMBER ($PASS)
1oIF THERES A MONITOR GO TO IT
1oIF THERE ISN'T JUMP TO CYCLE
$EOP:

SCOPE

CLR8
TYPE
TYPE
CNVRT
TYPE
CNVRT
INC
TYPE
CNVRT
DEC
TYPE
CNVRT
DECS
BNE
MOV8
CLR

001411

001242

SEOPCT:

$ENDCT:

RESET
S$ENDAD: JSR
NOP
NOP
NOP

oc
005102

002

XCSR:
XVEC:

1 TYPE ERRORS

11 YES
1 sRESTORE COUNTER

8042,R0

13GET MONITOR ADDRESS
1 tBRANCH IF NO MONITOR
13CLEAR THE WORLD
nGO TO MONITOR
1 $SAVE ROOM
1 sFOR

$00AGN

PC.(RO)

13ACT11

8(PC)e

.WORD

CYCLE

1
.BYTE
DZCSR

6,2

3 SHON
;RESTORE PASS COUNT

$DOAGN
(PC)e ,8(PC)

B8GT
MOV

SH0

(PC)e

.WORD

DEC

tCLEAR LAST ERROR PC
1CLEAR ERROR FLAG
aTYPE END PASS
1 TYPE CSR

s SHOM IT
sARE ALL DEVICES TESTED?
' BR IF NO B
tRESTORE THE COUNT
1:ZERO THE NUMBER OF ITERATIONS
1 s INCREMENT THE PASS NUMBER
uDOC T ALLOW A NEG. NUMBER
13LO0OP?

$PASS
€100000, $PASS

BEQ

SRTNAD:

SERFLG
MEPASS
+MCSRX
+XCSR
+MVECX
+XVEC
$PASS
+MPASSX
XPASS
‘PASS
MERRX
+ XERR
SAVNUM
$DOAGN
DZNUM, SAVNUM
$TIMES

8IC

.WORD
$EOPCT
$GET42: MOV

$DOAGN:

S$ERRPC

-PASEND-ssccssccsssssssscssssssssnsssssssss

1 tRETURN

H4
CZDZA-HO
CZDZAM.P11
2030

005104
005106
005110
005112
005114
005116
005120

MACY11l SOAC1052)

19-JUN-84 15:45
002072
000001
006
001242
000001
006

001132

19-JUN-84

16:22

SEQ 46

PAGE 46

END OF PASS ROUTINE
XPASS:

002

.BYTE

6,2

1
.BYTE

6,2

$PASS

XERR:

002

DZRIV

SERTTL

sSCOPE LOOP AND ITERATION HMANDLER
.SBTTL

SCOPE MANDLER ROUTINE

1100000000000000000000000000000000000000008000000000000008000000000

1¢THIS ROUTINE CONTROLS THE LOOPING OF SUBTESTS. IT WILL INCREMENT
1oAND LOAD THE TEST NUMBER($TSTNM) INTO THE DISPLAY REG.(DISPLAY<7:0>)
1oAND LOAD THE ERROR FLAG (S$ERFLG) INTO DISPLAY<15:08>
1¢THE SWITCH OPTIONS PROVIDED BY THIS ROUTINE ARE:
LOOP ON TEST
1eSWH1d=1
INMIBIT ITERATIONS
jeShll=]
:

¥§§§§§§§§§§§§§§§§§¥§¥§%§§§§§§5¥53

s s SCOPE=IOT

SCOPE

1.
$SCOPE :
007652
001136
013050

.SCOPE: JSR
CLR
ow
REQ

PC,.SERV.G
SERRPC
OTST1+2,(SP)
$XTSTR

|FDO OUT IF <tG> WAS MIT
1CLEAR LAST ERROR PC.
lIS THIS THME SCOPE AT THE BEGINNING OF TST1?
+IF SO, DON'T LOOP ON IT

BPL
crP8
REQ

SOVER
94TKB, #6XON
SOVER

1BR IF NO. (LOCK: MIT KEY TO0 GOTO NEXT TEST)
1 10SH
?
:1IS CHAR A RANDOM XON
18R IF YES
1)

TIST:

174016

174012

000021

174002

177776

173764

1¢:

BR
TST8

MOV

END

14
94TKS

9ITKB, -2(SP)

O MACR)

BIT
BNE

1GOTO 14
(IF LOCK SWO2=1; THMIS LOC =240)
1XKEYBOARD DONE?

ssssssssssssssssses

#81IT14,85WR
$OVER

+sLOOP ON PRESENT TEST?
13 YES IF SWlde]

ON THE “XOR" TESTER CHANGE
13IF RUNNING
TION TO A "NOP" (NOP=240)
INSTRUC
33 THIS
;1SAVE THE CONTENTS OF THE ERROR VECTOR
11SET FOR TIMEOUT
+s TIME OUT ON XOR?
; ;RESTORE THE ERROR VECTOR
13GO TO THE NEXT TEST

1 000SOSTART OF CODE FOR THE XOR TESTERGSONS

$XTSTR: BR

MOV
MOV

SPERRVEC, -(SP)
054 , IERRVEC

(SP)+,(SP)e

as:

CLR8

$ERFLG

3¢:

8IT
BNE

#8IT11,8SWR
14

177060

S¢:
105737

80177060
(SP)+ ,00ERRVEC

$SVLAD

um THE STACK AFTER A TIME OUT

(SP)+ ,DPERRVEC ; RESTORE THE ERROR VECTOR
MOV
13LOOP ON THE PRESENT TEST
$OVER
BR
TESTEROGSOS
64: ;00000END OF CODE FOR THE XOR
1 1HAS AN ERROR OCCURRED?
18R _IF NO
3¢
BEQ

001123
001123

032777
001011

TST
MOV
BR

173700

CLR

$TIMES

11ZERO THE ERRORFLAG

11CLEAR THE NUMBER OF ITERATIONS TO MAKE
NMIT IMATIWS?
18R IF YE

FHEERIEREELT

CZDZA-HO
CZDZAM.P11

MACY1l SO0AC1052)
19-JUN-84 15:45

005262
0035266
005270
005274
005302
005304
003312

005737

103037

005737
001003
112737
000002
000406

000001
005374
001122
001122
001126
001122
001126

001124
001124
001226

001240

173616

SEQ 47

PAGE 47

TST
BEQ
INC
e
BGE
1¢:
MOV
MOV
$SVLAD: INCB
MOVe
MOV
SOVER:

MOV

001417

CLR8
TST

BNE
MOV

BRYW:
$

$PASS
14
S$ICNT
$TIMES, $ICNT
S$OVER
01, $ICNT
SMXCNT, 0TIMES
STSTNM
STSTNM, STESTN
(SP), SLPADR

13IF FIRST PASS OF PROGRAM
"
INMIBIT ITERATIONS

SLPADR, (SP)

llflslclli RETURN ADDRESS

MNTFLG
MODE
du
OMAINT ,MNTFLG

JCLEAR THE MAINTENANCE BIT SETTER AFTER EACH TEST
tHAS THE MODE BEEN CHANGCD?

RTI

406

END 0 MACR)

s s INCREMENT ITERATION COUNT
1 sCHECK THE NUMBER OF ITERATIONS MADE
138R IF MORE ITERATION REQUIRED
ssREINITIALIZE THE ITERATION COUNTER
;;SET NUMBER OF ITERATIONS TO DO
1 sCOUNT TEST MUMBERS
;;SET TEST MUMBER IN APT MAILBOX
1 sSAVE SCOPE LOOP ADDRESS

$TSTNM,BDISPLAY ;;DISPLAY TEST NUMBER

MOV

34:

001417
001370
000010

16:22

SCOPE MANDLER ROUTINE

001242
001124
001226

013716

19-JUN-84

-0 0SS

SSS eSS ESEseSNSNSSSSSESEsesS

+IF NOT INTERNAL
, GO DO
TEST
;IF INTERNAL MODE NOW, SET THE MAINTENANCE BIT
1GO DO THE TEST

sssssssssssssssssss

: S

1sMAX. NUMBER OF ITERATIONS

tCHECK FOR FREEZE ON CURRENT DATA
. ................................

032777
001405
005737
001402
013716
000002

032777
001403
062716

001000

173554

001362
001362
010000

.SCOP1: BIT
BEQ@

14
173530

.TJYPE:

1¢:

.SBTTL

TST
BEQ
MOV
RTI

BIT
BEQ
A0
RTI

#SH09, BSWR
1

1 IS SWO9=1(SET)?
1BR IF NOT SET.

LOCK
13

1IS THER A TIGHMT LOOP SPECIFIED?
+IF NO, RETURN
1IF YES, GOTO THE ADDRESS IN LOCK.
1G0 BACK.

#5u12, 8SWR
1
#2,(SP)

s INMIBIT ALL PRINTOUT?2?
+IF NOT, GO TYPE
1SKIP OVER MESSAGE POINTER

LOCK,(SP)

tRETURN TO WHERE PROCEDURE WAS INVOKED

TYPE ROUTINE

110000606000660040000008080808080806480008480848000000040886800800080

toROUTINE TO TYPE ASCIZ MESSAGE. MESSAGE MUST TERMINATE WITH A O BYTE.
1oTHE ROUTINE WILL INSERT A NUMBER OF NULL CHARACTERS AFTER A LINE FEED.

SNULL CONTAINS THE CHMARACTER TO BE USED AS THE FILLER CHARACTER.
$FILLS CONTAINS THE NUMBER OF FILLER CHARACTERS REQUIRED.

soNOTEL:
1 oNOTE2:

$FILLC CONTAINS THE CHARACTER TO FILL AFTER.

s *NOTES:

soCALL:
1#1) USING A TRAP INSTRUCTION

l:m
]

005440
005444

105737

100002

001177

TYPE

1
L

TYPE
MESADR

$TYPE:

TSTB
BPL

.MESADR

1 tMESADR IS FIRST ADDRESS OF AN ASCIZ STRING

$TPFLG
14

13IS THERE A TERMINAL?
13BR IF YES

2143
2144

2145
2146
2147
2148
2149

2150

19-JUN-84 15:45
000000
000430
010046
017600

19-JUN-84

TYPE ROUTINE

14:

000001

001254

132737

000100

001255

001403
010037

004737
000000
132737
001003
112046
001005

005726
012600
062716
000G

122716
001430
122716

005510
006012

001255

614:
624:

24:

604:
3s:
000011

001006
005726

104402
001231
105037
000755
004737
123726
001350
013746

TST

RTI

8EQ

TST
TYPE

CLR8

005652
001176

Ss:
64:

001174
74:

105366

DECB
BLY

222

002770
004737

105337

000770

SEQ 48

PAGE 48

122737

001011

16:22

*3%3 &3 LR

2141
2142

MACY11l S0AC1052)

3834°

C2ZDZA-HO
CZDZAN.P11

1]
RO, -(SP)

82(SP),RO

OAPTENV, $ENV
624
OAPTSPOOL
, $ENVM
4
62

RO,614

zC.MTYS
OAPTCSUP
, SENVM
604

(RO)+,-(SP)

(SP)e

02,(SP)
T, (SP)
es
OCRLF,(SP)

S$
(SP)e

$CHARCNT
2¢

PC,$TYPEC
;:ILLC.(SP)O
SNULL
, -(SP?

1 sHALT MERE IF NO TERMINAL

131GET ADDRESS OF ASCIZ STRING
1 sIRUNNING IN APT MODE
11NO0,GO CHECK FOR APT CME
1sSPOOL MESSAGE TO AP
CHECK FOR CME
1 1NO,GO
NSE“P MESSAGE ADDRESS FOR APT
1 sSPOOL MESSAGE TO APT

u'tm ADORESS

APT CONSOLE SUPPRESSED

uVES SKIP TYPE OUT

3 1PUSH CHARACTER TO BE TYPED ONTO STACK

nfl IF IT ISN'T THE TERMINATOR
13
IF TERMINATOR POP IT OFF THE STACK

nfiSTG! RO

PC
13sADJUST RETURN
1) RETURN

1 1BRANCH IF <HT>
1 sBRANCH IF NOT <CRLF>
11POP <CR><LF> EQUIV
:1sTYPE A CR AND LF

1 sCLEAR CHARACTER COUNT
1 3GET NEXT CHARACTER
1360 TYPE THIS CHARACTER
+3IS IT TIME FOR FILLER CHARS.?
13IF NO GO GET NEXT CHAR.
13GET @ OF FILLER MS NEEDED

1(SP)

PC.$TYPEC
S$CHARCNT
7¢

+300 NOT COUNT AS A COUNT

sHORIZONTAL TAB PROCESSOR
84:
9¢:

112716

132737

001372

2187

2191

000724

105777

173306

017746
042716

122716

173302
177500
000023

105777

173262

001012

2196

$TYPEC:

1014:

MOVE
JSR

¢ ,(SP)
PC,$TYPEC

TST
BR

2¢

8IT8

#7, $SCHARCNT
b1

(SP).

1 sREPLACE TAB WITH SPACE
13 TYPE A SPACE
1 sBRANCH IF NOT AT
1:TAB STOP
1s1POP SPACE OFF STACK
1 3GET NEXT CHARACTER

8PL
MOV
8IC
cHP8
BNE

1578

: sICHAR IN KYBD BUFFER?
11BR IF NOT
1 1GET CHAR
1 1STRIP EXTRANEOUS BITS
1 1WAS CHAR XOFF
11BR IF NOT

1MJD001
1MJD001
1MJD001
1MJD001
1MJD001
1MJDO01

TST8

1 stWAIT FOR CHAR

1MJD001

CZDZA-HO

CZDZAM.P11
2197
2198
2199

MACY11l SO0A(1052)
19-JUN-84 15:45
100375
117716

042716

122716
001366

19-JUN-84

TYPE ROUTINE

000021

102¢:

105777
100375
126627

173240

116677
122766
001003
105037

000002
000015

122766

000012

000406

001402
105227

10¢:

1¢:

8IC

1014
847KB,(SP)
#177600,(SP)

11GET CHAR

000001,
000001

SATY4:
SATYC:

001254

001255

1¢:

24:

001234
006160

34:

177776
44:

sMJDO001

@4XON, (SP)
1014

sMJDOO1
s1MJDO01
sMJUDO001

(SP)e

1 3FIX STACK

TST8

8t TPS

1 sWAIT UNTIL PRINTER IS READY

1MJD001
sMJD001

(w, ]
BNE

BPL
Cre
BEQ
MOVve
(o, )
ONE
CLR8
BR
(o) o]
BEQ
INCB

104
2(SP),#$XON
$TYPEX
2(SP),84TPB
OCR,2(SP)
1
SCHARCNT
S$TYPEX
OLF,2(SP)
S$TYPEX
(PC)e
O
PC

uIS cnm\cm A RANDOM XON?

IF YES
llLW CHAR TO BE TYPED INTO DATA REG.
11IS CHARACTER A CARRIAGE RETURN?

13IS CHARACTER A LINE FEED?
1 1BRANCH IF YES
1 sCOUNT THE CHARACTER
MMACTEI! COUNT STORAGE

APT COMMUNICATIONS ROUTINE

$11988008080080808088084888488848888480484088200040888848848080888888000

SATY1:
SATYS:

sMJDOO1

13STRIP IT
1iWAS IT XON?
11BR IF NOT

SCHARCNT: .WORD
$TYPEX: RTS

.SBTTL

SEQ 49

PAGE 49

ePL
MOVe

173256
177600

005726

001420

16:22

MOVB
MOVB
"R
MOVB

MOV
MOV
TST8
1]
)
(o,
BNE
8ITE
BEQ
MOV
ADD
TST
BNE
MOV

TST8

BNE
SuUB
ASR
MOV
MOV
BR
MOV
ADD
MOV
JSR
.WORD

01, $FFLG
1,8MFLG
SATYC
01, ¢FFLG

MFLG
S¢

1370 REPORT FATAL ERROR
1370 TYPE A MESSAGE

1370 ONLY REPORT FATAL ERROR

13PUSH RO ON STACK
1 1PUSH R1 ON STACK
1 sSHOULD TYPE A MESSAGE?

OAPTENV, $ENV

34
SAPTSPOOL , $ENVM

(RO)«

1 sGET MESSAGE ADOR.
1 sBUMP RETURN ADDR.
11SEE IF DONE W/ LAST XMISSION?
s3IF NOT: MWAIT
+3PUT ADDR IN MAILBOX
1 sFIND END OF MESSAGE

g:. $MSGTYPE

13SUB START OF MESSAGE
1 1GET MESSAGE LNGTH IN WORDS
1 sPUT LENGTH IN MAILBOX
13 TELL APT TO TAKE MSG.

94(SP),RO
02,4(SP)

;F:SGTYFE

RO, $MSGAD
4
$MSGAD
, RO
RO
RO, $MSGLGT

48
94(SP),
02,4(SP)

177776, -(SP)
:C."YPE

11PUT MSG ADDR IN ISR LINKAGE
1 1BUMP RETURN ADDRESS
1 1PUSH 177776 ON STACK
11CALL TYPE.MACRO

sMJDOO01

sMJDO001

s RANOO1
s RANOO1

L4
CZDZA-HO
CZDZAM.P11

PR
PR PP PR LR ERSRORRM LR ¥30 ¥

2253
2254

2257

2259

2261

006162
006162
006166
006170

006174
006176

MACY11l 30A(1052)

19-JUN-84 15:45
105737

006250

005737
001413
005737
001375
017637
062766
005237
105037
105037
105037

001254

001416

19-M-“

SEQ 50

PAGE SO

T COMMUNICATIONS ROUTINE

S¢:
10¢:

11¢:

001234
000004

16:22

001236
000004

124:

012601

000207

$MFLG:
SLFLG:
SFFLG:

CLRS
CLR8
MOV
MOV

1 sSHOULD REPORT FATAL ERROR?
1sIF NOT: BR
1 sIRUNNING UNDER APT?
13IF NOT: BR
s sFINISHED LAST MESSAGE?
WAIT
13IF NOT:
1 sGET ERROR ¢
1 18UMP RETURN ADDR.
1sTELL APT TO TAKE ERROR
1 sCLEAR FATAL FLAG
13CLEAR LOG FLAG
1 3CLEAR MESSAGE FLAG
n” STACK INTO R1
ug STACK INTO RO

.BYTE
.BYTE
.BYTE

1 sFATAL FLAG

TST8
BEQ
TST
BEQ
ST
BNE
MOV
ADD
INC

$FFLG
124
S$ENV

124

$MSGTYPE
114

SA(SP), SFATAL
SP)

CLR8

RTS

APTSIZE=200
APTENV=001
APTSPOOL =100
APTCSUP=040

006274

011272

172652

MOV
MOV
ADD
.INST1: TYPE

.MSG:

1¢:

TST8
BPL

OINBUF R4
o7,R3
94TKS

8IC8

000023

1014¢:

172622

(0, o]
BNE

vST8

BAL
MOVe
8I1IC8

(0, o)
BNE
TST8

000021

834:

cP8

BNE

1ST8

000015

94(SP), .MSG
02

MOVE

172646

172626

MOV
MOV

R4,

102¢:

BR
OB
BEQ

1014
94TKB,(R4)

#200,(R4)

#4XON,(R4)
1014

(R4).

14
@$XON,(R4)

1024
(R4).
14

#13,(R4).
INSTR2

1SAVE R3 ON STACK
1SAVE R4 ON STACK
1GET THE ADDRESS OF THE MESSAGE TO BE PRINTED
sPOINT TO INSTRUCTION AFTER ADDRESS POINTER
1PRINT THE MNESSAGE
sMESSAGE IS POINTED TO FROM HERE
'POINT R4 TO THE INPUT BUFFER
1SET THE MAXIMUM NUMBER OF CHARACTERS ALLOMED
tHAS A CHARACTER BEEN RECEIVED?
+IF NO, KEEP WAITING FOR IT
+IF YES, SAVE IT IN THE INPUT BUFFER
sKEEP ONLY THE 7-BIT ASCII INFORMATION
1 s0SH-BML
1IS IT A XOFF?
31 :0SH
18R IF NOT

tWAIT FOR A CHARACTER

1 sDSH-BML

1GET CHARACTER
1STRIP DOMN CHARACTEP
tMWAIT FOR A XON?
1GET NEXT CHAR IF NOT

1 :0SH-BML
1:0SH-BML
1:0SH-BML
1:10SH-BML

tWAIT FOR A CHAR

1 :OSH

1POP STACK

1 s0OSH-BHL

1 :0SH

1 :0SH-BML
1IS IT A RANDOM XON
1 1DSH-BHL
1BR IF NO
1 :0SH-BHL
1ELSE, POP STACK
1 :0SH-BHL
1GO GET NEXT CHAR
1IS IT <«CR> ?
1IF SO, TERMINATE THE INPUT SEQUENCE

M4
CZDZA-H0
CZOZAM.P11

2314

105777
100375
017777
005303
001332

012604
012603
010346
010446
10“0;
00071
012604
012603

2315
2316

2317
2318

APT COMMUNICATIONS ROUTINE

TST8

F1F

172562
172552

SEQ 51

PAGE 51

172554

24
84TKB,8¢TP8
R3
1

MOV

(SP)+,R3
RS, -(SP)

TYPE
B

. SQUES
LINST1
(SP)+.R4

.INSTE: MOV

001230

84 TPS

BPL
MOV
DEC
BNE

MOV
MOV
RTI

(SP)+,R3

tRESTORE R3
tRETURN TO THE MAIN PROCEDURE

sCONVERT ASCII STRING TO OCTAL

011272
000015

PARAM]
:

18:

000067

;SAVE RS ON THE STACX
1SAVE R4 ON THE STACK
1GET THE SETUP INFORMATION POINTER

2813

006402
006406
006410
006416

16:22

2312

19-JUN-84 15:45

19-JUN-84

LI TEELELLE

23509
2310
2311

MACY11l SOAC1052)

AGAIN

THE MABER THE CHARACTER REPRESENTS

TENATE THESE BITS TO THE ALREADY EXISTING STRING

1IS THE NEXT CHARACTER A CARRIAGE RETURN?T
+IF SO, GO SEE IF NUMBER IS WITHIN LIMITS

000015

sCLEAR BIT POSITION O, MOVE EXISTING STRING TO LEFT
tCLEAR POSITION 1, MOVE STRING TO LEFT AGAIN
FOR
ROOM E
tMOVE THE STRING ONE MORE TIME TO MAK

sNEXT THREE BITS
1G0 GET THE NEXT CHARACTER

PARERR: INSTER
o

B8R

PARAML

s THERE WAS AN ERROR... GO PRINT MESSAGE AGAIN
s TRY GETTING THE PARAMETERS AGAIN

+TEST TO SEE IF NUMBER IS WITHIN LIMITS
006566
006572
006574

020537
101373

103770
133705
001365

LIMITS: cw
B8MI

ce
8LO
8IT8
BNE

RS, HILIM
PARERR

RS,LOLIM
PARERR
LOBITS,RS
PARERR

SSAGE

SET IN THE RESWLT?

1IF SO, GO PRINT THE MESSAGE AGAIN

N4
CZDZA-H0
CZDZAM.P11

MACY11l SOAC1052)

19-JUN-84 15:45

19-JUN-84

1STORE NUMBER AT SPECIFIED ADORESS

HEHE EElt
salld Dicns

2366

2368
2369
2370
2371
2372
2373
2374
2375
2376
2377
2378
2379
2380
2381

SEQ S2

PAGE 52

APT COMMUNICATIONS ROUTINE

2365

2367

16:22

006610
006614
006616

18:

006645

MOV
MOV
ADD
DECB
BNE
MOV
MOV
RTI

LoLIn: O
MILIMN: O
DEVADR: 0
LOBITS: .BYTE
.BYTE

DEVADR , R4
RS,(R4).
02,.RS
ADRCNT
14
(SP).,
(SP)e,

tPOINT TO THE LOCATION WHERE THE RESULT WILL BE STORED
1STORE THE RESWLT
sCALCULATE THE NEXT DATUM
sREDUCE COUNT OF STORED RESWLTS. IS IT EXCEEDED?
tIF NOT, GO STORE THE NEXT DATUM
tRESTORE R4
tRESTORE RS

O
O

;1LOMEST ACCEPTABLE VALUE
+HIGHEST ACCEPTABLE
LOCATION WHMERE RESULT WILL BE STORED
s INCORRECT BITS MASK
sCOUNT OF ITEMS TO BE STORED

tRETURN TO THE MAIN PROGRAM

aSlVE’CWTESY THAT FAILED AND RO-RS
SAVOS: MOV

4(SP),SAVPC

:1SAVE R7 (PC)

:SAVE RO-RS

SVOoS:

MOV
MOV
MOV
MOV
MoV
MOV
RTI

RS, $REGS
R4, SREGA
RS, SREG3
R2, $REG2
R1, $REG1
RO,

SAVE RS
1SAVE R4
1SAVE RS
1 SAVE R2
1SAVE R1
1SAVE RO
iLEAVE

;RESTORE RO-RS

.RESOS: MOV
MOV
MOV
MOV
MOV
MOV
RTI

$REGO,RO
$REG1,.R1
$REG2,R2
SREG3,.R3
SREGA ,R4
SREGS RS

1RESTORE RO
tRESTORE R1
tRESTORE R2
1RESTORE R3
1RESTORE R4
tRESTORE RS
sLEAVE

;CONVERT OCTAL NUMBER TO ASCII AND OUTPUT TO TELEPRINTER
.......................

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

104402
010046
010146
010346
010446
010546
017601
062766
012137
112105

001231

000012

007114

000012

.CONVR: TYPE
.CNVRT: MOV
MOV
MOV
MOV
MOV
MOV
ADOD
MOV
MOV8
1s:

. SCRLF
RO, -(SP)
R1,-(SP)
RS, -(SP)
R4, -(SP)
RS, -(SP)

812(SP),.R1
02.,12(SP)
(R1)e+ ,MROCNT
(R1)+,RS

;1PRINT A CARRIAGE RETURN
1 SAVE
1SAVE R1
1SAVE R3
1SAVE R4
1SAVE RS
PLACE THE ADDRESS OF THE ARGUMENTS IN Rl
1POINT TO WHERE MAIN PROGRAM WILL RESUME
:GET NUMBER OF WORDS TC BE PRINTED
;GET THE NUMBER OF CHARACTERS TO BE PRINTED

112100
013104

110537

007116

177770

3s:

000060

011376
007116

S¢:

' GET

22623.5
RS, -(SP)

sAND FINALLY A THIRD TIME

tREDUCE CHARACTER COUNT .ARE ALL CHARACTERS

34
®DATA,RS

(SP)+,(RS).
CHRONT

BINMRD:

1REDUCE COUNT.

tRETURN TO THE MAIN PROGRAM
INMBER OF CHARACTERS TO PRINT

tNUMBER OF SPACES TO PRINT

.BYTE

sncm :

THE MUMBER OF SPACES TO PRINT

TM WORD TO BE CONVERTED
'
1COPY THE CHMARACTER COUNT
1COPY THE ARGUMENT WORD AGAIN
1ISOLATE THREE BITS TO BE TREATED AS A CHARACTER
tMAKE AN ASCII CHARACTER OUT OF THEM

1MOVE THEM

011376
007114

33333R30ARIRARTAIR REGddenagas

19-JUN-84 15:45

SEOQ 33

19-JUN-84
16:22 PAGE S3
&P T COMMUNICATIONS ROUTINE

a®2
<
TM

CZDZA-H0
CZoZAn.P11

MACY11 SOA(1052)

1 TRAP DISPATCH SERVICE
1ARGUMENT OF TRAP IS EXTRACTED

~0 USED AS OFFSET TO OBTAIN POINTER

lYO SELECTED SUBROUTINE

1SAVE RO. USE RO TO FIND TRAP ROUTINE
1GET TRAP ADDRESS
1GET TRAP

MOV

007122
007124
007130
007132
007134
007136
007142

MOV
TST
MOVe
ASL
MOV

RTS

)
,RO
. TRPTAB(RO

1DEVICE CLEAR ROUTINE
1ISSUE A DEVICE CLEAR
2476

007144

.DEVICE,

1GET RIGHT BYTE OF TRAP(TRAP OFFSET)
POSITION OFFSET FOR TABLE INDEXING
1PLACE INDEXED ADODRESS OF TABLE IN RO

1 TRANSFER TO THAT ADDRESS AND RESTORE OLD RO

.
|

|
|
|

CZDZA-HO

CZ0ZMM.P11
2477
2478
2479

2481

2483

007144
007152
007160
007162

MACY11l SOA(1052)
19-JUN-84 15:45

19-JUN-84

SEQ 54

OAGE 54

APT COMMUNICATIONS ROUTINE

172670
172662

032777
032777
001374

16:22

8IS

€OCLR, BDZCSR

1SET DCLR

BNE

48R IF NO

8I1

RTI

SOCLR.G8DZCSR

;OID IT CLEAR?
JEXIT ROUTINE

JROUTINE TO MANDLE MAINTENANCE BIT SETTING WITM DEVICE CLEAR
'

007164
007166
007174

001417

172646

.DCLASM: DEVICE .CLR

007214

BISB

MNTFLG.BDZCSR

MOV
MoV

RO, -(SP)
DLYCNT ,RO

(SP)s+,RO

RTI

.DELAY;

007176
007176

16:

;ISSUE A DEVICE CLEAR

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

DEC
BNE
RTI

DLYCNT: .WMORD

RO
14

;LOAD THE MAINTENANCE BIT IF IT IS I MODE
JRETURN TO CALLING ROUTINE

1SAVE RO
1SET COUNT

sDELAY
B

JRESTORE RO

ILEAVE ROUTINE

JPATCHABLE LOC FOR MORE TIME

;ADVANCE TO MEXT TEST MANDLER
'

013716
005037
000002

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

LADVANCE:MOV

001360
001362

CLR
RTI

NEXT,(SP)

LOCX

;CRUNCH STACK WITHM ADDRESS OF SCOPE CALL

JRESET TIGMT LOOP ADDRESS

JOMECX TO SEE IF OLD TEST GETS REPEATED

JERRCR MANDLER
'

004737
032777
001406
105777
100003
032777
001113
021637
001404
011637
105037
104407
011605
162703
011504

110437

007652

010000

$ERROR: JSR
8IT

220

1STE

171720
000207

171712
171672

X8x:

001136
001136
001123

001134

1 504
06

042704
062704
012437
012437
011437
105737

171716

177001

030312
007466
007512
001123

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

18;

gAY
MOVE
BIT
BNE
cre
8€Q
PV
CLR8
SAVOS
ROy
SuB
MOV
MOVE
ASL
ADD
ASL
8IC
ADO
MOV
MOV
MOV
TST8E

PC,SERV.G
0512, BSMR
84TPS

XBX
0207,80TP8
oSu1S, BS\WR
HALTS
(SP), $ERRPC
14
(SP). $ERRPC
$ERFLG

(SP),RS
"2,
(RS), R4
Re,siTE'®
R4
(RS).Re
R4
0177001 ,R4
0.ERRTAS R4
(R4)+ ,ERRMSG
(R4)+.DATAMD
(R4 ),DATABP
S$ERFLG

JFIND OUT IF <G> WAS MIT
1BELL ON ERROR?

18R IF NO BELL
1 TTY READY

;J00N'T WAIT IF TTY NOT READY
;OELETE ERROR PRINT OUT?
18R IF NO PRINT OUT WANTED
JMAS THIS ERROR FOUND LAST TIME?
18R IF YES
JRECORD BEING MERE
|PREPARE HEADER
1SAVE ALL PROC REGISTERS
GET THE PC OF ERROR
1GET ADDRESS OF TRAP CALL
1GET ERROR INSTRUCTION
;COPY TEST NUMBER FOR APT MANDLING
JMAT BY TWO
JOOUBLE IT
JMAT AGAIN
CLEAR JUNK
1GET POINTER
GET ERROR MESSAGE
;GET DATA MEADRER
JGET DATA TABLE

JPUSH A BELL AT THE TTY

1 TYPE HEADER

D5
CZDZA-H0
CZDZAM. P11
2333
2534

007362
007364

007370
007372
007376
007402

007406
007410
007414
007420
007424
007430

MACY11l 30A(1052)
19-JUN-84 15:45

001403
0035737

001044

104462
102402
005737

001402

104402
104402
104412
104402
104412
104808
104412
104402
112737
005737
001402

19-JUN-84

BEQ
TS7

007312

BNE

010766
010754
007644
011043
007636
010716
003072
001231

TYPE

MASTEX

007466

18:

001123

+MCSRX
_XCSR
s

0-1,8ERFLG

. 3]

WTBS.FNM

TYPE

TYPDAT: TST

B8€Q

000042

CONVRT
DATABP: O
RESREG: RESOS

171354

001126

RESREG

1i¢:

BPL
'&VT

1¢:

XTSTN:

GIENDAD
, 9042
14
BSWR

18R IF NO.
3 SHOW

DATA TABL

aLmK UP HERE
1OHECX TO SEE v‘cm ACT-11 MODE
ON

SERTTL

1UPDATE ERROR COUNT
IGOTO TOP OF TEST?
1BR IF YES
aTO NEXT TEST?
1BR IF NO
1SET FOR NEXT TEST

8IT
BEQ
MOV
MOV
JP

05“10.“
24
NEXT, SLPADR
, SP
OSTACK
SSLPADR

.BYT

DATA HEADER

1BR IF NO HALT ON ERROR
.'s&mmn IN DATA DISPLAY

M LR

.tm

EXITER
2(SP),8DISPLAY

..I‘Y

RTI
24:
ERTABO: 1
BYTE
SAVPC

ERROR MESSAGE

171344

1 TYPE

lDATA TABLE?

8s:

EXITER: INC

1GIVE A CR/LF
sND MORE MEADER UNLESS NO DATA TABLE.
1IS THERE AN ERROR MESSAGE?
18R IF NO.

DATARP

SITEMB,7¢
PC.IATYS

(», 4
BEQ

lTYFE PC.

1SHOM IT

;1DATA HEADER?
1BR IF NO

MOV8
JSR

24:

1SHOM IT

TYPOAT

DATAD

;.”TBN.‘ENV

LMORD

1AND TYPE ANOTHER

[

z‘

MALTS:

TS7

171372

ERTABO

l'?tfl

DATAMD: O

001254

LMISTN

TYPE
ONVRT
TYPE

BEQ

18R IF YE

XTSTN
o

ERRMSG: O
WTBS.FNM:
ST

007500

SCRLF

ONVRT
TYPE

TYPE

78:

TYPE

CNVRT

007540

1TYPE A C“IKI RETURN

LOCx

104402

122737

. JCRLF

TYPOATY

TST

TYPE

18R IF YES

100ES Dl?l TABLE EXIST?

001231
001231
001362

104402

000000
005737
001402
104411
000000
104410

TYPMSG

DATABP

TYPMSG: TYPE

177777

SEQ 55

PAGE SS

APT COMMUNICATIONS ROUTINE

000000

003737
001402

16:22

6.2
2.2

1RESET SP
1GOTO SPECIFIED TEST
1RETURN

ES
MACY11l SOA(1052)
19-JUN-84 15: 435
022737

001002
000137
017746
042716

122716

001012

122716
001366

000021

122716

000021

122726

001150
032777
001333
017737
013777
1044052
104412
104402

105777
100375

017746
042716

010060
010070

010072
010076
010100
010104
010110
010112
010120

102¢:

74:

171206

171174

010312
171164

010312
010272
010304
010314
171150

18:

171144
177600

111¢:

171120
177600

000021

122716
001002
005726
000747

000021

122726

000015

000241

84 TS
1014
8478, (SP)

#177600,(SP)
OIXON, (SP)

004000

171124

105777
100375
016677

1014:

000007

105777
100375
117716

001472
003077

102¢

1014

O$XON, (SP)
74

(SP).

000023

042716
122716
001366

#177600,(SP)
@IXOFF ,(SP)

171250
177600

122716

001012

9ITKB, -(SP)

177600
000023

171254

001002
005726
000553

0177570, SWR
994
64

001160

010270
171274

105777
100375
117716

042716

010036

177570

07,(SP).

-4

001122

2589
2590
2591
5%
2593
259
2595
2596
2597

112¢:

64
méNTKS

24:

171052

IMAIT FOR A CHAR

1GET THE CHAR
1STRIP CHAR
1IS IT A XON
18R IF NO

s sOSH-BHL
1 30SH-BL
130SH-BL
3 sDSH-BHL
s s0SH-BHL
s s0SH-BHL

1IS IT RANDOM XON ?
NOT
IF R
1B
1POP STACK
E
XON CHAR
1IGNOR

3 10SH
3 s0SH
1:0SH
1:0SH

1IS IT *G?
+IF NOT, IGNORE INPUT

'
'
'
:

1WAIT FOR DONE.
'

1STRIP CHAR
1IS IT A XOFF
1BR IF NO

sWAIT FOR A CHAR

0177600.(5’)
@$XON,(SP)
111¢

1GET THE CHAR
1STRIP CHAR
+IS IT A XON
1BR IF NO

@4XON,(SP)

+1IS IT RANDOM XON ?

84
(SP).

015,(SP).
Ss

171054
171060

1IS THE SWITCH REGISTER HARDWIRED?
1IF SO, IGNORE *G
3 s0SH-BHL
1OTHERWISE, GET THE LAST CHARACTER TYPED
1STRIP CHAR
s s0OSH-BHL
1IS IT A XOFF
3 s0SH-BML
18R IF NO
1 sDSH-BHL

1SAVE (SWR).

177776

SEQ 56

19-JUN-84 16:22 PAGE 56
APT COMMUNICATIONS ROUTINE

pE8anEg %aRg R3REs: R 333333331 8:3 33!3 :g 38 3 zgagzxag

CZDZA-HO
CZOZAM.P11

BSWR
oozps

-2(SP),947TPB

1BR IF NOT

1POP STACK

1 IGNORE XON CHAR

—

FS
CINZA-HO
CZOZAN.P11
25¢5

2647
2648

H i 343 I

M A

2649

010122
010126

010132
010136
010140
010146
010150
010156
010160
010166
010174
010200
010202
010206
010212
010216

010220
010224
010226
010232
010236
010242

MACY11l SO0A(1052)

19-JUN-84 15:45

006177
006177
006177

103713
026627
002707

19-JUN-84

000060

8SWR
SSWR
fiSlfl

026627
003303

177776

000067

042766
056677

105777
100375

177770
177776

170764

177776
170764

017746
042716
122716
001012

170760
177600
000023

105777
100375

170740

042716

177600

8Cs
c
BLY

cp
B8GT
12¢:

1214:

122716
001366

000021

010244
010250
010252
010254

122716
001002
005726
000747

000021

010256

010262
010264
010270

122726
001310
104402
000207

000015

10¢:

001231

010272
010300

03645.

020200

051450
000057

SEQ 57

051127

8IC

94TKB, -(SP)
#177600,(SP)
OXOFF ,(SP)
1224

TST8
8PL
MOV

TSTB
8PL
MOVE

84TKS
1214

CrP8
BNE

@4XON, (SP)
1214

1STRIP CHAR
1IS IT A XOFF
18R IF NO
tWAIT FOR A CHAR

84TK8,(SP)

#177600,(SP)

@4$XON, (SP)
104
(SP).

S¢:
64:

CPe
BNE
TYPE
RTS

015,(SP).
24
SCRLF
PC

894:

ASCIZ

<200>? (SWR)=/?

.EVEN

NOT
IF R
1B

124

’é;éfl

1
.BYTE
904
LHMORD
ASCIZ

.SBTTL

POMER DOWN AND UP ROUTINES

904 :

000057

84TKS
. -4

(CMPB
BNE.
TST
B8R

88¢:

000

-2( SP), 067
14

0tCc<?>, -2(SP)
-2(SP), 8SWR

8IC

122¢:

-2(5’) 60

8IC
8IS

CPe
BNE

170734

010314

ROL
ROL
ROL

171032
171026
171022
177776

000001
006
010312
000000
036457

PAGE 57

APT COMMUNICATIONS ROUTINE

117716

010304
010306
010310
010312

16:22

6.0
O
/=77

1424068828428 085000¢0200000400800486082000¢022040202000RE000000000
0

010320
010326
010334
010336
010340
010342
010344
010346
010350

012737
012737

010046
010146

010246
010346
010445
010546
017746

010464
000340

170604

000024
000026

OOWN ROUTINE

$PWRON: MOV
MOV

OSILLUP, BOPURVEC ;;SET FOR FAST UP
0340, 00PURVEC+2 ;PRIO:
7

MOV
MOV

RO, -(SP)
R1,-(SP)

MOV

8SWR, -(SP)

MOV
MOV
MOV
MOV

R2,-(SP)
3 «-(SP)
R4, -(SP)
RS, -(SP)

11PUSH RO ON STACK
11PUSH R1 ON STACK
11PUSH R2 ON STACK
11PUSH RS ON STACK
11PUSH R4 ON STACK
11PUSH RS ON STACK
11PUSH 8SWR ON STACK

G5
CZDZA-HO
CZOZM1.P11
2701
2702

2703
2704

2705

MACY11l SO0A(1052)
19-JUN-84 15:45

010354
010360
010366
010370

010637
012737

000000
000776

010470
010372

2713
2714
2715
2716
2717
2718
2719

2720

2721
2722
2723
2724

2725
2726
2727
2728
2729

010372
010400

010404
010410
010414
010416
010422
010424
010426
010430
010432
010434
010436
O3(asd

0104352
010454
010456
010460
010462
010464
010466

010470
010472
010535
010560
010574

010643
010667
010716
010724
010732
010743
010754
010766
010771
011043
011050
011075
011140
011142
011144
011146

011150

012737
013706
005037

005237
001373
012677

012605

012604
012603
012602
012601
012600
012737
012737

104402
010472
012716
012106

000002
000000
000776

010464
010470

010470
010470

avt

nw mvec uSET UP VECTOR

SP, $SAVRé6

1 1SAVE SP

1 tHANG UP

1POMER UP ROUTINE

SPWRUP: MOV

S4ILLUP,DOPURVEC llSEYSSOR FAST DOWN

1¢:

$SAVRS
$SAVRG
14

170536

010320
000340

tadialndbstimtnd

2707

MOV

000024

1202080008800 40000000004002400000840005000000400800400000000000RES

2706

2708
2709
2710
27111
2712

SEQ S8

19-JUN-84 16:22 PAGE %8
POMER DOMN AND UP ROUTINES

MOV
CLR
INC
BNE
MOV
MOV
MOV
MOV
MOV
MOV
MOV
MOV
MOV

$SAVREG , sP

11GET

(SP)+,85WR

1sPOP STACK INTO 8SWR

(SP)+.R4

1sPOP STACK INTO R4

(SP)+,RS

(SP)+,R3
(SP)+,R2

(SP)+.,R1

(SP)+,RO

s sHWAIT LOOP FOR THE TTY
1 sMAIT FOR THE INC
130F WORD
13POP STACK INTO RS

1sPOP STACK INTO R3
1sPOP STACK INTO R2

3 3POP STACK INTO R1

13POP STACK INTO RO

0340, SIPVRVEC 2 13PRIO:7

.HWORD
MOV
SPMRAD: .WORD

MPFAIL

1 sREPORT THE POMER FAILURE
1 sPOMER FAIL MESSAGE POINTER

RESTART

1 sWESTART ADDRESS

SILLUP: MALT

;s THE POMER UP SEQUENCE WAS STARTED
BEFORE THE POMER DOWN WAS COMPLETE
13
.2
131PUT THE SP MERE
<200>/PWR FAILED. RESTART AT LAST TEST /
<200>/7END PASS CZDZA-H /
/
<200>/RUNNING

SPWRMG:

TYPE

RTI

$SAVRG: O
MPFAIL: .ASCIZ

MEPASS:
MR
MERR2:
MERRS:

MOCK:

.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ

.ASCIZ

/VEC: /

MPASSX:
:
MTSTN:
MASTEX:
MNEW:
MERRPC:
XMEAD:

.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ

.EVEN

.ASCIZ

XSTATQ: 2

.EVEN

<200>/PROGRAM INDICATES NO DEVICES PRESENT./

<200>/7INSUFFICIENT DATA!/
¢2°0’/L9CK ON SELECTED TEST/

.ASCIZ

MBADLN:

1 sRESTART AT RESTART

.ASCIZ

MCSRX:

MVECX:

(PC)+,(SP)

.BYTE
s$TMPL
.BYTE
s$TMP2

;TEST NO: /
=

;sgo»/SET SWITCH REG TO DZ11'S DESIRED ACTIVE./

<200>/MAP OF DZ11 STATUS/<200>
<200>/ILLEGAL ENTRY IN STAGGERED MODE/<200>
6.3
6,2
-$SETFLG-*osensnssnssasssssssassssananas

ITNIS ROUTINE ESTABLISHES WHICH MAINTENANCE MODE THE DEVICE IS IN
..................................................

JE-EXYERNAL LOOP BACK

HS
CZDZA-+0
CZDZA . P11

MACY11 SOAC1052)
19-JUN-84 15:45

2740

1 I=INTERNAL
LOOP BACK

' S'STW‘D LOOP BACK

2741

2742 011152 017605 000000

011272

2743

011156

042737

000040

2747
2748

011200
011204

105037
000422

001417

2751
2752
2753
2754
2755

011216
011222
011230
011232
011240

013715
112737
000410
122737
001007

011266
000010

001417

000123

011272

2757
2758

011246
011252

105037
062716

.SETFLG: MOV
8IC

("0 o]
BNE
MOV

2744 011164 122737 000105 011272
2745 011172 001005
2746 011174 013715 011264
2749 011206 122737 000111
2750 011214 001006

2756

2759

2760
2761
2762
2763
2764

2765

011242

011256

011260
011262
011264
011266
011270

013715

000002

011272 4&4:

5¢:

011270

001417
000002

7%:

104404
000733
000200
000000
100000

64:
14:
28:
34:
i

CLR8
BR
(") o)
BNE
MoV
MOV
B8R
o8
BNE
MOV
CLR8
AL
RTI

INSTER
B8R
LMORD
MORD
'MORD

-- END

&(SP),RS

040, INBUF

o' E, INSVF
44
14,(R3)
MNTFLG
74
& I, INBUF
S¢
24,(R3)
OMAINT ,MNTFLG
74
'S, INBUF
64

2767

2777

2778
2779
2780
2781
2782
2783
2764
2785
2786
2787
2768
2789
2790
2791
2792
2793

1IS IT EXTERNAL LOOP BACK ?
1NO
1YES STORE INFO
1SET MAINT BIT =0
1GET OUT
1IS IT INTERNAL LOOP BACK ?
INO
1 YES STORE INFO
;SET UP THE MAINTENANCE FLAG LOADER

MNTFLG
02,(SP)

34,(RS)

.SETFLG
200
O
100000

IRETRY
301770
(EXTERNAL= E
sINTERNAL
= I
'STAGGERED = S

O MACRQ s=ssssssssssssssces

{

-$BUFFER-=sessscssssssssssssssssssasanssss

1BUFFERS FOR INPUT-OUTPUT

2773
2774
577;2

1PICK UP ADDRESS OF TAG

1STRIP LOMER CASE

1GET OUT
+IS IT STAGGERED LOOP BACK ?
IWHAT 2
1 YES srm INFO
+ZERO BITS
1POP AROUND

2766

2770
2771
2772

SEQ 59

19-JUN-84 16:22 PAGE 59
POMEP. DOWN AND UP ROUTINES

011272
011334

000000
011334
000000

011376

011376
000000
011440

011440

011637

011444
011452
011460
011466
011470
011474
011476
011504
011506
011510
011514
011522
011526
011534
011536
011540

162737
017737
022737
001003
011637
000412
022737
001401
000000
011637
017737
062716
017766

000002
000000
000000

INBUF:
.=, +40
TEP:

.=, +40
MDATA:
.=, +40
011536

000002
000060
106427

011536
011540
011540

011536
000016
000002
000004

011540

011536
000002

O
©

SET.PS: MOV

011536
106437

14:

24:
34:
a4

SUB
MOV
(= 4
BNE
MOV
BR
cP
BEQ
HALT
MOV
MOV
ADD
MOV
RTI
0
0

(SP),3¢

02,34
834,44
0106427 .44
14
(SP),3¢
24
#106437,4¢
.04
JRESERVED INSTRUCTION NOT “MTPS*
(SP),3¢
834,34
#2,(SP)
834,2(SP)

15
CZDZA -HO

CZDZAM.P11

MACY11l S0A(1052)

19-JUN-84 15:45

PAGE 60

16:22

19-JUN-84

POMER ODOWN AND UP ROUTINES
-

END O MACRQ

sessssssccsccssssass
it ~8CYCLE-=sscncsncsssssssssssssssssssss

.aoume USED TO “CYCLE” THROUGH UP TO SIXTEEN DZ11'S
1THIS ROUTINE SETS UP THE CONTROL ADDRESS FOR THE DIAGNOSTIC
tAND RUNS THE SPECIFIED DZ11'S.

THIS ROUTINE oMUSTe

l* RUN FIRST BEFORE ENTERING THE DIAGNOSTIC FOR THE

1SETUP NECESSARY.
001404

DZACTYV

010574

+MERR2

001414
030306

g 323 3

167174

011772
011774
011776
012000
012002

001412

—

011670
011672
011700
011704
011710
011714
011722
011730
011734
011740
011744
011750
011754
011756
011764
011766

001412
001412

(7]

$ EEEBERYRUCRORCREREGRRRERS

011644

011636

001412

3oM 8333 333338 933RRRBARIEAR

001412
001412

g\‘N.DZACTV

@®

001406

011640
0116350
011654
011662

.2
$MXCNT, $TIMES

001226
001404

>p3]

005374
001406

011542
011546
011550
011554
0113556
011560
0113566
011574
011576
011600
011604
011610
011616
011624
011626
011634

RUN
€14 ,ACTIVE

€0Z .END,ACTIVE
14

SZ.M.ACTM

RUN

ACTIVE,RO

014 ,ACTIVE

#0Z.END,ACTIVE

tARE ANY DZ11'S TC BE TESTED?
18R IF OX.
.m DZ11'S SELECTED!!
1STOP THE SHOM.
sDISQUALIFY CONT.

URST“ THE m OF ITERATIONS TO MAKE
+IS THIS ONE "ACTIVE"
18R IF GOOD ONE FOUND.

1UPDATE POINTER
1CATCH CARRY FROM RUN
tUPDATE ADORESS POINTER.
tHAVE ME PASSED THE END OF THE MAP?
+IF NO, KEEP GOING; NOT ALL TESTED FOR.
' RESET ADORESS POPOINTER ’
JKEEP LOOKING FOR ACTIVE DZ11

1GET ADDRESS POINTER.
1UPDATE.
tALL DONE?
18R IF NO.

tRESTORE POINTER.

(QO)O.DZRIV
(RO)+ ,DZPRT
DZPRT«1,.EIAFLG
#8IT1S,.0ZPRT
(RO)+,LINE
(RO)+,PAR
(RO)+ ,MODE
PC.DZLEV
B

sLOAD SYSTEM CTRL. REG
1LOAD VECTOR
sLOAD PRIORITY

1SET UP LINE DZ LINES ACTIVE
1SET UP PARANMETERIZATION
1SET UP MAINTENANCE MODE
1SET WP

tARE WE UNDER MONITOR CONTROL?
1IF YES, SKIP THIS SETWP
1IF SWOl1=1, GET STARTING TEST ¢
tBR IF NO TEST IS TO BE INPUTTED

(CALL THE STRING INPUT ROUTINE
+POINTER TO MESSAGE TO BE PRINTED
tCALL THE OCTAL TO ASCII CONVERT ROUTINE
tLOMEST LEGITIMATE VALUE OF EXPECTED RESPONSE

INIG!ST LEGITIMATE VALUE OF EXPECTED RESPONSE

CZDZA-HO0
CZDZAM.PLL

16:22 PAGE 61
MACY11 SOAC1052) 19-JUN-84
POMER DOWN AND UP ROUTINES
19-JUN-84 15:45

2850 012004
2851 012006
2852 012007

001122
000
001

2654
28SS
2856
2857
2858
2859
26060
2061
2062
2063

012010
012014
012020
012022
012030
012032
012040
012042
012046
012054

012700
022710
001020
022760
001014
023760
001010
010037
062737
104402

2065
2066
2067
2068
2869
g;g

012062
012064
012070
012072
012076
83{&

005720
020027
001351
104402
000733
012737

2872
g;z

012106

000177

28S3

2064

012060

000412

013046
000004
000002

001122

000004

001126
000002
001231

001126
64:

023740
001230
013046

167014

001126

$TSTNM
O
BYTE
1
BYTE

SEQ 6

tPOINTER TO MAP LOCATION TO BE FILLED
tMASK OF INVALID BITS FOR THIS PARAMETER
iNUMBER OF PARAMETERS TO STORE

-- END O m ssssssesssssseREReS

Ss:

012737

;: :

MOV
cp
BNE
(o, 4
BNE
o, 4
BNE
MOV
ADD
TYPE

#TST1,.RO
4,(RO)
(1]
#12737,2(R0O)
64
$TSTNM,4(RO)
64
RO, SLPADR
02, SLPADR
. SCRLF

TST
cP
BNE
TYPE
BR
MOV

(RO).
RO,#TLAST.10
S¢
. SQUES
74
#TST1, SLPADR

RESTART : JMP

1IS THIS THE TEST ?
1 IF NOT, DON'T PROCESS NUMBER
1SAVE PC
1POP OVER SCOPE

S$LPADR

1PREPARE TEST ADDRESS

1GO START TESTING.¢¢sWARNING'!esse
s THIS JUMP IS USED BY POMER UP ROUTINE!!!!

K5
CZDZA-HO
CZDZAM.P11

MACY11l SO0A(1052)
19-JUN-84 15:45

-ROUTINE USED TO SET UP THE DIAGNOSTIC VIA APT,
IF BIT? IN THE ENVIRONMENT MODE ($ENVM) BYTE IS SET,
THE PROGRAM WILL LOAD ITS PARAMETERS FROM THE ETABLE.

2875
2876
2877
2878
2879

SETAPT: MOV
MOV
MOV
8IC

001500
001310

177007

A LR R L

001305

177770
001320
001312
GO1404

14:

2¢:

000010
000010

L R

3s:
001314

B
EREEPEN R
3
8

SEQ 62

19-JUN-84 16:22 PAGE 62
POMER DOWN AND UP ROUTINES

100000
100000

177772
177776

177777
001256

001160

as:

S¢:

MOVE
RORS
RORS
RORS
RORS
RORS
8IC
MOV
MoV
MOV
ROR
8CS
BEQ
TST
ADO
ADD
BR
MOV
MOV
MOV
MOV
MOV
B8PL
8IS
8IC
CLR
BR
MOV
MOV
RTS

00Z .MAP ,RO
$BASE ,R1
$VECT1,R2
0tC<770> ,R2

+POINT TO THE DEVICE MAP TABLE
1BUILD DEVICE ADORESSES IN R1
1BUILD DEVICE VECTORS IN R2
1STRIP AWAY OTHER INFORMATION

$VECT1.1,R3
R3
R3
R3
R3
R3
0*C<7>,R3

sLOAD THE INTERRUPT PRIORITY FROM R3
tALIGN THE NMUMBER
tALIGN THE NUMBER
tALIGN THE NUMBER
tALIGN THE NUMBER
tALIGN THE NUMBER
tREMOVE ALL BUT BUS LEVEL NUMBER
sPOINT TO THE BEGINNING OF DEVICE PARAMETERS
1GET THE MAP OF ACTIVE DEVICES
1SAVE THE BIT MAP
+GET A DEVICE SELECTION BIT
UP A MAP
TED,
GO SET
+IF IT IS SELEC
OUT OF SETUP
GET
SELECTED,
ARE
MORE
+IF NO
+POINT TO NEXT DEVICE DESCRIPTOR
1SET UP THE NEXT ADORESS
1SET UP THE NEXT VECTOR GROUP
1GO SEE IF MORE DEVICES REMAIN
1LOAD DEVICE ADORESS
1LOAD THE VECTOR ADDRESS
1LOAD THE INTERRUPT PRICRITY LEVEL
tGET THE NUMBER OF LINES IN OPERATION
1LOAD DEVICE PARAMETERS
+JF 20MA MODE SELECTED, SET IT WP
;SET THE 20MA FLAG IN DZLWN
THE FLAG IN DZPARN
1DEFAULT OPERATION TO INTERNAL MAINTENANCE
1GO BUILD THE NEXT ADORESS
1 TERMINATE THE DEVICE MAP
1SET TO SOFTWARE APT SWITCH REGISTER

#400W0, R4
$DEVM, RS
R3.DZACTV
RS
34
S
(R4).

#10,R1
€10,R2
14
R1,(RO).
R2,(RO).
R3,(RO).
$COM1,(RO)
(R4)e,(RO).
4y
#100000, -6(RO)
€1000n0, -2(RO)
(RO).
24
e-1,(RO)
O4SUREG, SWR

tRETURN TO PRINT STATUS TABLE

soROUTINE USED TO "AUTO SIZE" THE DZ11
1oCSR AND VECTOR.
soNOTE: THE CSR MAY BE ANY WMERE IN THE FLOATING
e

o
1o

1 @

ADORESS RANGE (160000:163700)

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

AUTO.SIZE:

105337
012702
012703
005022
022702

001415
001500
001320

RESEY
DECB

CSRMAP: MOV
MOV
14:

CLR
cP

INIFLG

1INSURE A BUS INIT
1SHOM THAT I WAS HERE

(R2).
#0Z .END ,.R2

1ZERO ENT
1ALL DONE?

007 .MAP ,R2
#400W0 ,R3

1LOAD MAP POINTER.
tPOINT TO ETABLE DEVICE DESCRIPTOR WORDS

LS
CZDZA-HO

3T HEREE SRR B LT EPRFRR

CZDZAM.P11

MACY11 SOAC1052)

19-JUN-84 15: 45

19-JUN-84 16:22 PAGE 63
POMER OOMN AND UP ROUTINES
BrE

001374
105037
012702
012701
012737
032711
052761
005000
005711
100403
005300
001374
000443
032761
001437
032711
001454
005000
032711
032711
001446
032711

24:
78:

CLR8
MOV
MOV
MoV

DM
00Z.MP R2
#160000,R1
6 8, Ded4

CLR

Ml
DEC
BNE
ke
81T
erg
81T
BEQ
CLR

8
RO
7
X
#MIT7,4(R1)
X
#ITS,.(R1)
34
RO

BCQ
81T
Be@

34
#20,(R1)

INC
BNE

RO
.-12

CLR
CLR

(R1)
4(R 1)

MoV

”5,.(R2).

BMNE
[} ¢

9
#BIT1S, -2(R2)

MoV
MOV
CLR
MOV
INCB
0, .-}
B-Q
ADD
ow
BidE

#17070,(R2)
(R2)+,(R3).
(R2)
o-1,(R2)
oZnuM
920, 0Z28M
1004
#10,R1
#163700,R1
24

TST8

DZMUM

8IS
8IS
ST

8IS
8IT

001404
104414
005200
001372
000437
005011
005061

DELAY

#MITS,.(R1)
MBIT7,4(R1)

1BR IF NO
1SET OCTAL NUMBER OF DZ11°'S TO O
1SET FOR FIRST ADDRESS TO BE TESTED

1SET FOR NON-EXISTENT DEVICE TIME OUT
1TRY TO SET MASTER SCAN ENABLE
1TRY TO TRANSMIT ON LINE 7

(R1)

#20,(R1)
020,(R1)

.12

JASSUFE IT'S NOT A DZ11
+IS LINE 7 ENABLE STILL SET? IT SHMOWLD BE
+IF IT'S NOT, ASSUME IT'S NOT A DZ11
+IS MASTER SCAN ENABLE STILL SET?
+IF NOT, ASSUME IT'S NOT A DZ11
1SET DEVICE CLEAR
1SMOULD STAY SET FOR A WMILE IF DZ
sBR IF NOT DZ11
tWAIT FOR BIT TO CLEAR
1BR WEN CLEARED

s8IT NOT CLEARED! MUST NOT BE DZ11

1GET RID OF MASTER SCAN ENABLE
;GET RID OF LINE 7 ENABLE
sAT MS';VOM Iv IS ASSUMED M? R1 HOLDS A DZ11 CSR ADDRESS.
R1,(R2).
1STORE CSR IN CORE TABLE.
ST
’O
(IZ)O
8IS
81T

177400
177400
100000
000377

177776

017070

94:

177777

001410

000010

163700
1004 :

001410

001410
001411
000001

001404

44:

BEQ
MOV8
MOV8
MOV
DEC
BEQ

0177400,4(R1)
9177400,4(R1)

Ss
OZNuUM,R1
R1, SAVNUM
#1.DZACTVY
R1
ErY]

FLAG

1SET THE DEFAMAT LINE SELECTION PARAMETER
1SET THE DEFALT PARAMETERS
1COPY PARAMETERS INTO ETABLE DESCRIPTOR
1SET THE DEFAMLT MODE OF OPERATION
1ARE MAX

.
lVES DON’T LOOK FOR ANY MORE
+UPDATE CSR POINTER ADORESS
1BR IF MORE ADDRESS TO CHECK.

tMERE ANY DZ11°'S FOUNC AT ALL?
1ERROR AUTO SIZER FOUND NO DZ11'S IN THIS SYS.
1SAVE NUMBER OF DEVICES

M5
MACY11 SOAC1052)

19-JUN-84 15:45

2{&"

001310
001314

”.

000004
001312

010574

012530

VECMAP:

000340
013000
001500
000300
000302

DZCRO, $8ASE

+POINT TO TME ADDRESS OF FIRST DEVICE

06,004
DZACTYV, SOEVM
VEOW

tRESTORE TRAP VECTOR
1SAVE ACTIVE ncxsm
1GO FIND TME VECTOR

sMAKE DATA DISPLAY ZERO
1STOP THME SHOM

MANTO, $COM1

-4
=t

000410

POMER DOMN AND UP ROUTINES

001404

001500
001512
000006
001404

SEQ &4

PAGE 64

. MERR2

.2
034,(SP)

18:

24:

sENTERED BY NON-EXISTENT TIME-OUT
l‘flfll TO MAINSTREAM

sFLOATING VECTURS START MERE.
PC OF IOT INSTR

R1,(RO).
o4,(R1).
1

001404

1OISABLE CONT. SM.

#300,R0
0302,.R1

(RO)+,(R1)e
R1,#1000

001000

sNOTIFY OPR THAT NO ozu S FOUND.

1SET I0T TRAP PRIORITY TO 7
1SET I0T TRAP VECTOR

002 .M .R2

000004

+INDICATE TO ETABLE WMAT MODE IS BEING USED

0340, 9022
44,0020

1SET SOF TWARE POINTER

1START FILLING VECTOR AREA
tMITH . +2; JOT

sADD 2 TO RO +R1
tMAS TME VECTOR AREA BEEN EXCEEDED?
1OR IF MORE TO FILL

DZACTV.R4

1STORE TEMPORARILY

b
SO

tORING OUT A BIT
(OR IF ALL DONE

1ZERO CPVU PRIO
‘IYIQOIITS.KQZ)
(R2).R1
1GET CSR
fil".d(il)
sSEY THE TCR BIT!

.2
#300,2(R2)
014, .R2
F

000C14
000010

000007

012770

001502
005122

001304

RTS
;s

sATTEMPT TO FORCE AN INTERRUPT

sST&L

FOR TIME TO INTERRUPY
|&MT ASSUME 300 AND FIX DZ11 LATER

34,(SP)

1POP SOF TWARE POINTER
I1KEEP GOING
lfif VECTOR ADDRESS
;1POINT BACK TO THE CORRECT VECTOR
:
JUNK
1POP IOT JUNK OFF STACK
1SET FOR RETURN

DZvCO, $VECT1

;COPY VECTOR OF FIRST DEVICE INTO ETABLE

sALL DONE WITH "AUTO SIZING"

(SP),2(R2)

010,2(R2)
07,2(R2)

[
(a}

013737
012737
013737

16:22

000261
006137
000772
013737

19-JUN-84

3330333333828
S33ER3RA
§§§§§§£§§39§§§§§§§
éééig

ELLELELLE
LRRLOK2E

FEREREERERSEEEEEE
eI SRERRRARRENININININN

CZDZA-H0
CZOZAM.P11

END O MACR)

¢.SCOPE,.IOTVEC

;RESTORE THE SCOPE TRAP

s=sscsssssssssssssss

N5
CZDZA-HO
CZOZMAM.P11

MACY11l SOAC1052)
19-JUN-84 15:45

SEQ 65

19-JUN-84 16:22 PAGE 65
CZDZA DZ11 DEVICE DIAGNOSTICS.

3038

3039

-UNIBUS -esesssssssssssssssssnssssssssssss

..u-....-.....................-..

106600000000000000000000¢ TEST 1 000000000000000000008000000000
1oTHIS TEST PROVES THE SLAVE SYNC RESPONSE
+oDURING A READ OR WRITE TO THE FOLLOWING ADDRESS:

3041

3042

3043

3045

s:e

BOAE
3047

3048

013046

3051
3052
3053
3054
3055

3056
3057
3058
3059
3060
3061
3062
3063

3064
3065
3066
3067
3068
3069

3070
3071

3072
3073
3074
307S

013056
013064
013072
013100
013106

013112
013114
013116
013120
013122
013130
013134
013136
013140
013142
013144
013152
013156

013160

013162
013164

013166
013174
013200
013202

3076
3077
3078
3079
3080
3081

013204
013206
013210
013216
013222
013224

3084
3085

013232
013234

3082
3083

3086

3087
3088
3089
3090
3091
3092

3093

013226
013230

012737
012737
012737
012737
013700

01323
013224
000340
013106
002042

001360
000004
000006
001362

011001
000240
005010
000240
012737 013130
013700 002046
011001
000240

001362

013152
002056

001362

005010
000240
012737
013700
011001

TST1:
s

18:

2s:

3s:

022626
104001
104401
002111

;:LOAD THE MUMBER OF THIS TEST

MOV
MOV
MOV
MOV
MOV

OTST2 ,NEXT
54,4
#PR7,6
#14,L0CK
DZCSR,RO

sPOINT TO THE START OF THE NEXT TEST
1SET TRAP VECTOR
1SET PRIORITY TO LEVEL 7
1SET RETURN IF SW09-11
1+SET ADDRESS TO TEST

MOV
NOP
CLR
NOP
MOV
MOV
MOV
NOP

013174
002062

001362

4%:

000004

024 ,L0CK
OZRBUF ,RO
(RO),.R1
(RO)

#34,L0CK
DZTCR,RO
(RO),.R1

CLR

(RO)

;WMRITE THE ADDRESS

MOV
MOV
MOV

44 ,L0CK
D2MSR, RO
(RO),R1

1SET RETURN ADDRESS
1SET ADDRESS TO TEST
tREAC FROM ADDRESS

CLR
(RO)
NOP
MOV
6.4
CLR
6
ADVANCE
(SP).R1
MOV

tWRITE THE ADDRESS
:
1SET TRAP CATCHER BACK TO NORMAL

1SCOPE THIS TEST
1SAVE PC OF TRAP
cP
(SP)+,(SP)+
1POP TRAP OFF STACK
ERROR
1
soNO SLAVE SYNC RESPONSE.
SCOP1
1 SWO09=17
JP
(R1)
iRTI
--END O MACR) s=sssssssssassssssss
[ «$X]-sssssssssssssssssssssssssssss
1088860860600066000088888 TEST 2 0000000040000 00000000000000000
1¢THIS TEST PROVES THAT BIT “DCLR"
1#CAN BE SET AND THAT IT WILL CLEAR
1#8Y ITSELF AFTER A PERIOD OF TIME.

S¢:

(RO)

tREAD THE ADDRESS
tWASTE TIME
sMRITE THME ADDRESS
tWASTE TIME
1SET RETURN ADDRESS FOR SWO9
1SET ADDRESS TO TEST
1READ THE ADDRESS
3

1MRITE THE ADDRESS
(WASTE TIME
1SET RETURN ADDRESS FOR SWO9
1SEY ADDRESS TO TEST
tREAD THE ADDRESS

ROP

000006
000006

(RO),R1

CLR
NOP
MOV
MoV
MOV
NOP

000240

005010
000240
012737
005037
104400
011601

®1,8TSTNM

NOP

005010

012737
013700
011001

SCOPE

MOV

-- END O MACR) sesssssssssassssssss

000240
000240

3 -$Xl-sssssssssscssssssssssssssssss

TEST 1

1 19006000060860008C08004000000080080080000000080086008808808800880800¢

000004

3049 013050 012737 000001 001122

3050

DZCSR, DZRBUF, DZITCR, DZMSR

{

i:e

TEST 2

-$Xl-ssssssssssssssssssssnssasssss

B6
MACY11 SOAC1052)
19-JUN-84 15:45
000004
012737

012737
013700
012705
010310

19-JUN-84 16:22 PAGE 66
CZDZA DZ11 DEVICE DIAGNOSTICS.

000002

oo01122

013322
002042
000020

001360

T1ST2:
i

011004

020504

001401
104002

14:

SCOPE

ILOAD THE MUMBER OF TMIS TEST

mvgv

02,0TSTMM

MoV
MOV
MOV
MOV
MOV
o
8EQ

OTSTS, NEXT
OZCSR, RO
OOCLR,RS
R3,(RC)
(RO),R4
RS.Re
14

POINT TO THE START OF TME MEXT TEST
1SET POINTER
1SET DCLR
IMRITE OCLR INTO DZCSR
1READ BACX DZCSR
10ZCSR Ox?
+IF IT IS SET SKIP THME ERROR
CALL

CLR
CLR
MoV
- 3]

RS
RS
(RO).R4
34

1SET EXPECTED 10 O
1OUAL LOOP COUNTER
1IS OCLR CLEAR?
+IF YES , GO TO TME MNEXT TEST

24
R2
24

1 THE COUNTER
MAS THE TIME EXPIRED?
IF NO, GO TEST BIT AGAIN
MAS THE TOTAL TIME EXPIRED?
1 IF MO, OHECK THE BIT AGAIN
10CLR FAILED TO QLEAR

sscesccssscssssssne

1o0OCLR SMOWLD BE SET..MOMENTARILY
2
ERROR
DISAPPEAR
IT
tNOW LETS WATOM
CLR
R2
T COUNTER T0 O

F{E

BNE
DEC
BNE
ERROR

+IF_NO,COUNT1 OF 65535 TICKS

}THE

WORD CREATED 8Y THE IFPEDIATE O WILL B€

.:um--......-..........--........-..ooo.

‘

~e000300000000SSONSRESRSSSRRAES

1000006600008000000000000 TEST 3 ceeeccccccsssccccesssscsscscee

1oTEST TO VERIFY THAT BIT “MAINT" CAN
168€ SET. TMEN VERIFY THMAT BIT "MAINT~ CAN
1o8E CLEARED (MRITTEN TO A ZERO). AND FINALLY
“mlfl THAT AFTER BEING SET AGAIN IT CAN BE
1oCLEARED BY A "DEVICE M~O;Z
'

s:e

«00000SSSONSSEPSRSESSSREYTEREES

TEST 3

1100000000000800000000000600000000000000000000000000000000800000000

013%22
013324

000003

001122

013332
013340
013344

013414
002042
000010

001360

TSTS:
s

013332
013354
013336

013362
013364
013366
013370
013372
013374
013376
013400

1¢:

24:

SCOPE

MOV

03,4TSTRN

1LOAD THE NMUMBER OF THIS TESTY

MoV
MoV
MOV
MoV
NOV
P
BEQ

OTSTA NEXT
DZCSR, RO
OMAINT RS
R3, (RO
(RO),Re
R3,.R4
18

tPCINT TO THE START OF THE NEXT TEST
1GET BASE ADORESS
+SET BIY
+SET SET IN DEVICE
JREAD THE BIT FROM DEVICE
tMAS BIT SET?
1OR _IF YES

8IC
NOV
8EQ
MOV
CLR

R3,(RO)
(RO),.Re
24
R3, -(SP)
RS

1CLEAR THE BIT.
+READ DEVICE
1OR IF BITS WERE CLEARED.
1SAVE THE BIT
1SET EXPECTED RESWLTS TO0 O

END O MACR)

ERROR

ERROR
MOV
MOV

=esccsscsscsssssess

2
(SP)+ RS
RS,.(RO)

16817 R/ FAILURE

1#81IT FAILED Y0 CLEAR
IRESTORE THE BIT.
1SET THE BIT AGAIN

C6
' CZDZA-MO

| CZDZAM.P11
.

3150

3153

|
|
|

3151
31352
3154
35155
3156
3157
35158
3159

013402
013404
013406
013410
013412
013414

MACY11l SO0A(1052)

19-JUN-84 15:45

19-JUN-84

CZ0ZA Dlll DEVICE DIMS?XCS

DEVICE.CLR
MOV
(RO),Re
8EQ
34
RS
CLR

104413

011004
001402
005005
104002

ERROR

3175
3176
77
3178
31
3180
3181
35182
35183
3184
3185
3186
5187
3188
35109
3190
3191
3192
35193
2004
5195
3196
3197
35198
35199
3200
3201

3202
3203
3204
3205

.m..o....o.oo.-ooo.o-oo..o.o.o...o-oo-

1oTEST TO VERIFY THAT BIT “MSENAS”

s:e

..u-.............................

TEST &

110000000000000000000000000000000000000000000000000000008000000005

3169

35173
35174

1o8IT NOT CLEARED BY DEVICE CLEAR

.oooooooooo“ooooooo“oa: ‘;ESY.Q @800606000000000000065000050000

3165
3166
3167
3168

5172

1 ISSUE DEVICE CLEAR
IREAD THE BIT.
tOR IF BIT CLEARED BY INIT (DEVICE CLEAR)
+SET EXPECTED TO ZERO

[}

3160
3161
35162
3163
3164

35170
5171

16:22

SEQ 67

6
PAGE

001122
013306

TST4:
t

001360

1¢:

24:

SCOPE

MoV

04, 4TSTIN

iLOAD THME MUMBER OF THIS TEST

MoV

OTSTS NEXT

sPOINT TO TME START OF TME MNEXT TEST

END 0 MACR)

MoV

DZCSR, RO

8EQ

3¢

SISENAB ,
MOV
R3,(RO)
MOV
(RO),Re
[l
R3.R4
ow
14
84Q
2
ERROR
R3,(RO)
8IC
v
(RO),.Re
24
6@
MOV
R3,-(SP)
RS
CLR
2
ERROR
(SP)+,RS
MoV
R3,.(RO)
MoV
DEVICE.CLR
(RO).R4
MoV

CLR
ERROR

ecccccsssssssssesse

RS
2

1GET BASE ADDRESS

+SET BIT
+SEY SET IN DEVICE
JREAD THE BIT FROM DEVICE
IWAS BIT SET?
1OR IF YES
16817 R/ FAILURE
1CLEAR THE BIT.
+READ DEVICE
1R IF BITS MERE CLEARED.
1SAVE THE BI7
+SET EXPECTED RESWLTS T0 O
1o8IT FAILED TO0 CLEAR
JRESTORE THE BIT.
1SET THE BIT AGAIN
+ISSUE DEVICE CLEAR
1READ THE BIT.

tOR IF BIT CLEARED BY INIT (DEVICE CLEAR)
+SET EXPECTED TO ZERO
1#8IT NOT CLEARED BY DEVICE CLEAR

END O MACR)

=ccscsssssssssssasse

END O MACR)

eesscssssscssssssss
i ~IMRRM-sccscccscsscssssssscescssssssnssanns
Xl -eccccescscscsansssssscsscsnes
i

1000006606000000000000000 TEST S ee0ececescscccssccsssccsssccce

;oTEST TO VERIFY THAT BIT "SILOEN" CAN
1oBE SET. THEN VERIFY THAT BIT "SIL&N" CAN
1oBE CLEARED (WRITTEN TO A ZERO). AND FINALLY
UOMIFY THAT AFTER BEING SET AGAIN IT CAN BE
1oCLEARED BY A "DEVICE CLEAR"
'

TEST S

-$X]-scccssssssssssssssscsnssasssss

D6
CZDZA-w0
CZDZAM.P11
m

MACY11l SOAC1052)
19-JUN-84 15:4S

1 0 0 0 0 0 0 00000000000000000000A0000000000000000000000000000000

3207
3208

013506
013510

000004
012737

3210
3211
3212
3213
3214

013516
0135524
0135530
013534
013536

012737 013600 001360
013700 002042
012705 010000
010510
011004

3209

5215
3216
3217

3218
3219
3220
3221
3222

013540
013542
013544

3224
3225
3226
3227

013562
013564
013566
013570

012605
010510
104413
011004

3231

013600

3226
3229
3230
3252
3233
3234

013560

013572
013574
013576

001122

104002

040510
011004
001404
010546
005005

3223

000005

TSTS:
P

020504
001401

013546
013550
013552
013554
013556

SEQ 68

19-JUN-84 16:22 PAGE 68
CZDZA DZ11 DEVICE DIAGNOSTICS.

SCOPE
m!gvmos. STSTNM

MOV
MOV
MOV
MOV
MOV
oP
BEQ

14:

104002

ERROR

8IC
MOV
BEQ
MOV
CLR

ERROR

F{ H

001402
005005
104002

3s:
t
i

3235

OTSTE , NEXT
DZCSR,RO
OSILOEN,RS
RS,(RO)
(RO),Re
RS.Re

tPOINT TO THE START OF THE NEXT TEST
1GEY BASE ADDRESS
1SET BIT7
1SET SET IN DEVICE
tREAD THE BIT FROM DEVICE

19817 R/W FAILURE

1¢

1WAS BIT SET?
YES

RS,(RO)
(RO),R4
24
RS, -(SP)
RS

1CLEAR THE BIT.
+READ DEVICE
1OR IF BITS MERE CLEARED.
1SAVE THE BIT
1SET EXPECTED RESWLTS T0 O

MOV
(SP)+,RS
MoV
RS,.(RO)
DEVICE.CLR
MOV
(RO),.R4
BEQ
CLR
ERROR

1LOAD THE MUMBER OF THIS TEST

sssscsrscssssesnses

3¢
RS
2

1o8IT FAILED TO CLEAR

IRESTORE THE BIT.
1SET THE BIT AGAIN
1ISSUE DEVICE CLEAR
IREAD THE BIT.

sOR IF BIT CLEARED BY INIT (DEVICE CLEAR)
1SET EXPECTED 70 ZERO
1817 NOT CLEARED BY DEVICE CLEAR

-- END O MACR) =escscsscscassssnscsse
-- END O MACR) =sccscscscssssances
3 -MRRY -ssssssssasssssssssnssscssnsssssssss

’

3236

«§X]l-ssssscssssssscssssssssnssssass

10086066000000000000000808 TEST 6 000000000000000000000000000000

3237
3238
3239
3240
3241

1oTEST TO VERIFY THAT BIT "RIE" CAN
1#0E SET. THEN VERIFY THAT BIT “RIE" CM
soBE CLEARED (MRITTEN TO A ZERO). AND FINALLY
lomlfY THAT AFTER BEING SET AGAIN IT CAN BE
1 *CLEARED BY A "DEVICE CLEAR"

3242

3243

t§

s:» TEST 6

3244
3245
&_"

013600
013602

000004
012737

3248
35249
3250
3251
3252
3253
3254
3255
3256
3257
3258
3259
3260
3261

013610
013616
013622
013626
013630
013632
0.13634
013636
013640
013642
013644
013646
013650
013652

012737
013700
012705
010510
011004
020504
001401
104002
040510
011004
001404
010546
005005
104002

000006

001122

013672
002042
000100

001360

~8XZ-vecccscscsccsssccscssasnssans

33 CLRAGGORLHRELROCROERAERORLERERO0REGENOBACOEOEDBONALOLBERBDGNAES
T1S76:
SCOPE
mrlgv
06,4TSTNM
sLOAD THE NUMBER OF THIS TEST
;

1¢:

MACR)

MOV
MOV
MOV
MOV
MOV
(o, 4
BEQ
ERROR
8IC
MOV
B8EQ
MOV
CLR
ERROR

essscssssssssssssss

OTST7 ,NEXT
sPOINT TO THE START OF THE NEXT TEST
DZCSR,RO
1GET BASE ADDRESS
ORIE,.RS ;SET BIT
.5.(.0)
1SET SET IN DEVICE
(RO),.R4
sREAD THE BIT FROM DEVICE
RS.R4
1MAS BIT SET?
34
1BR IF YES
2
18817 R/W FAILURE
RS,(RO)
1CLEAR THE BIT.
(RO),R4
1READ DEVICE
24
18R IF BITS WERE CLEARED.
RS, -(SP)
1SAVE THE BIT
RS
1SET EXPECTED RESWLTS TO O
2
1#BIT FAILED TO CLEAR

E6
MACY11l S0A(1052)

19-JN-84 15:45

19-JUN-84

16:22

SEQ 69

PAGE 69

CZDZA DZ11 DEVICE DIAGMNOSTICS.

012605
010510
104413

as:

011004
001402
005005
104002

MOV
(SP)+,RS
R3,(RO)
MOV
DEVICE.CLR
MOV
(RO),.R4
870
34
RS
CLR
2
ERROR

IRESTORE THE BIT.
1SET THE BIT AGAIN
+ISSUE DEVICE CLEAR
1READ THE BIT.
18R IF BIT CLEARED BY INIT (DEVICE CLEAR)
1SET EXPECTED TO ZERO
1#8IT NOT CLEARED BY DEVICE CLEAR

.:um.-.-.......-.-...-----o.-.o-o..-o---

«D000SSSOSN OSSPSR SESSESS

1000000000000000000000008 TEST 7 se0secssssssccscccsscscssnccses

1oTEST TO VERIFY THAT BIT "TIE” CAN
1oBE SET. THEN VERIFY THAT BIT "TIE* CAN
1o8E CLEARED (MRITTEN TO A ZERO). AND FINALLY
1oVERIFY THAT AFTER BEING SET AGAIN IT CAN BE
1 oCLEARED BY A "DEVICE CLEAR”
t§

s:e

~$XZ-escsssscsssssssssssssssssnses

TEST 7

1 1000000000000000000000000000000000000000000000000000000000000000

013672
013674

000004
012737

013702
013710
013714
013720
013722
013724
013726
013730
013732
013734
013736
013740
013742
013744
013746
013750
0137352
013754
013756
013760
013762
013764

012737
013700
012705
010510

001122

013764

TST7:

MOV

001360

MOV

MOV
MOV
MOV

011004
020504
001401

040510
011004
001404
010546

14:

104002
010510

104413

24:

011004
001402

104002

SCOPE

MoV

1LOAD THE NUMBER OF THMIS TEST

#TST10,NEXT

sPOINT TO THE START OF THE NEXT TEST

DZCSR,RO

1GET BASE ADDRESS

OTIE,RS ;SET BIT
1SET SET IN DEVICE
RS,(RO)
tREAD THE BIT FROM DEVICE
(RO),Re

RS.R4
ow
14
B8EQ
2
ERROR
RS,(RO)
8IC
MOV
(RO).R4
24
BEQ
RS, -(SP)
MOV
RS
CLR
2
ERROR
MV
(SP).,RS
RS,.(RO)
MOV
DEVICE.CLR
MOV
(RO).R4

8EQ
CLR
ERROR

07,4TSTNM

3¢
RS
2

tMAS BIT SET?
YES
18R _IF

18817 R/W FAILURE
1CLEAR THE BIT
+READ DEVICE
18R IF BITS WERE CLEARED.
1SAVE THE BIY
+SET EXPECTED RESWLTS TO 0O
1#8I7 FAILED TO CLEAR
JRESTORE THE BIT.
1SET THE BIT AGAIN
1 ISSUE DEVICE CLEAR
IREAD THE BIT.

s8R IF BIT CLEARED BY INIT (DEVICE CLEAR)
+SET EXPECTED TO ZERO
1#8IT NOT CLEARED BY DEVICE CLEAR

END

O MACR)O

s==ssssssssssscsssss

END

O MACR)O

=ssssssscssssssssss

[

-$TCR-ssssncssccasssesssssasssussssssssssssasnns
..xz-.....................I.l.....

100000000000606000000000¢ TEST 10 ¢00000s0000s00000000.000000000

1oTHIS TESTS THAT ALL OF THE FOLLOWING

;oBITS CAN BE: SET, CLEARED, CLEARED BY “DEVICE CLEAR *
1#BITS TESTED ARE:

s TCRO, TCR1, TCR2, TCRS, TCR4, TCRS, TCR6, TCR7 sssnsannss
§

~$X2-eessccsssssssssssss

|
I

F6
CZDZA-HO
CZDZAM. P11

MACY11l SOAC1052)
19-JUN-84 15:45

3318
3319
3320

$321

3322

3323
3324
3325
3326
3327
3326

3329
3330
3331
3332
3333
3334
3335
3336
3337
3338
3339
3340
3341
3342
3343
3344
3345
3346

3347
3348
3349
3350
3351
3352
3353
3354
3355

3356

013764

013766

013774
014002
014006
014012
014020
014022

014024
014030
014032
014034
014036
014040
014042
014046
014050
014052
014054
014056
014060
014062
014064
014066
014070
014074

014076
014100
014102
014104
014106
014110
014112
014114
014116

000004

y:e

012737

000010 OO1122

012737
013700
012705
012737
010510
011004

014122 001360
002056
000001
014020 001362

042704
020504
001401
104002
040510
011004
042704
005704
001404
010546
005005

104002
012605
010510
104413
011004
042704
005704

001404
010546
005005
104002
012605
104401
106305
001341
005037

SEQ 70

19-JUN-84 16:22 PAGE 70
CZDZA DZ11 DEVICE DIAGNOSTICS.

14:

24:
177400

3s:
177400

as:

3357
X358

MOV

010, 9TSTNM

1LOAD THE NUMBER OF TMIS TEST

MOV
MOV
MOV
MOV
MOV
MOV

OTST11,NEXT
DZTCR,.RO
#TCRO,RS
#14,L0CK
RS,(RO)
(RO),R4

tPOINT TO THE START OF THE NEXT TEST
1SET DEVICE ADORESS
1SET EXPECTED RESWLTS
1SET FOR SWO9
1SET THE BIT
tREAD THE BIT FROM THE DEVICE

-- END O MACRQ) e=eecscsccsssssssssss

177400

001362

TEST 10

1190000000000 000¢ 0000000000000 00000000000000000000000000008008080400
TST10: SCOPE

8IC
o
B8EQ
ERROR
8IC
MOV
8IC
TST
B8EQ
MOV
CLR

0C<377> R4
RS.Re
24
2

RS,(RO)
(RO),R4

0tC<377> R4
Fa
3¢
RS, -(SP)
RS
2
ERROR
MoV
(SP)+,RS
MOV
RS.(RO)
DEVICE.CLR
MOV
(RO),R4
8IC
#tC<377>,R4
TST
B8EQ
MOV
CLR
ERROR
MOV
SCoP1
ASLB
BNE
CLR

Ra
&4
RS, -(SP)
RS
2
(SP)+,RS
RS
14
LOCK

tCLEAR MIGM BYTE
sWAS BIT Ox?
18R
1#8IT FAILED TO SET
1CLEAR THE BIT
tREAD THE REGISTER
1CLEAR HIGM BYTE
18ITS CLEAR?
1BR IF YES
1SAVE GOOD RESWLTS
1SET EXPECTED 70 O

s oREPORT BIT NOT CLEAR
JRESTORE RS
1SET THE BIT AGAIN.
1 ISSUE DEVICE CLEAR
tREAD THE REGISTER
1CLEAR MIGH BYTE
1BITS CLEAR?

18R IF YES
1SAVE GOOD RESWLTS
1SET EXPECTED T0 O
1 oREPORT BIT NOT CLEAR
IRESTORE RS
sLOCK ON BIT? SET SW09-1
1CHANGE TO NEXT BIT
sCONTINUE TESTING
tMAKE SURE TIGMT LOOP IS CLEANED WP

-- END O MACR) sssssscssnsssssssss

$TCR-ssssssscccsssssssssssasssssssssssssasssssss
«$X]-vsssssssssssssssssssssasassss

3359
3360

100800680000000000000000¢ TEST 11 ¢0000000essscssssssnsssssceses
1oTHIS TESTS THAT ALL OF THE FOLLOWING

3362

1#8ITS TESTED ARE:

1#8ITS CAN BE: SET, CLEARED, CLEARED BY "RESET INSTR #NOTe DEVICE CLEAR *

3361

s DTRO, DTR1, DTR2, DTRS, DTR4, DTRS, DTR6, DTR?

3363

3364

1¢THIS TEST IS NOT DONE IF MODUWLE IS 20MA VERSION

3367
3368

s:e TEST 11
§10000600006000000000000000000000000000000000008000800800800080080000
TST11:
SCOPE

s“s

3369

3370

3371
3372
3373

014122

000004

014124

012737

000011

001122

014132
014140
014144

012737
013700
012705

014304
002056
000400

001360

..u---....-----...-n-.-...-.....-

MOV

011,8TSTNM

1LOAD THE NUMBER OF THMIS TEST

MOV
MOV
MOV

OTST12,NEXT
DZTCR,RO
#0TRO,R3

tPOINT TO THE START OF THE NEXT TEST
1SET DEVICE ADDRESS
1SET EXPECTED RESWLTS

-- END 0 MACR) =eccscsccssasssases

3428

014164
014166
014170
014172

012737
105737

100001
104400
010510
011004
105004
020504

014166
001414

MOV

001362

TST8

8PL

ADVANCE

14:

001401

RS,(RO)
&N).M

CLR8

BEQ
MoV
CLR

34
RS, -(SP)
/S

MoV
MOV

(SP)+,RS
RS.(RO)

TST

ERROR

010510
104413
011004
1000
030510
001001
104002
104401
006305
001347
012710
005005
005227
001373
000005
011004
105004
005704
001401
104002
005037

34:

RS,R4

ERROR

44:

SCoP1

177400

Sé:

RS,.(RO)

44
2

RS
14
#177400,(RO)
RS
&0
Ss

MOV
CLR8

(RO),.R4
R4

eeQ

. o8

TST

ERROR

CLR

001362

(RO).R4
R4

ASL
BNE
MOV
CLR
INC
BNE

RESET

1SET FOR SWO9
120MA OR EIA
18R _IF EIA
1EXIT TESY
1SEY THE BIT
JREAD THE BIT FROM THE DEVICE
1CLEAR LOW BYTE
uus 8IT Ox?

2
RS,(RO)

DEVICE.CLR

MOV
CLR8
8IT
BNE

000000

MOV
MOV
CLR8
o
BEQ

ERROR
8IC

2¢:

#14,L0CK

EIANFLG

014150
014156
014162

R
HH
PR P R

3374
3375
3376
3377
3378
3379

CZ0ZAM.P11

SEQ 71

19-JUN-84 16:22 PAGE 71
CZDZA DZ11 DEVICE DIMSTICS

CZDZA -HO

MACY11 SOAC1052)
19-JUN-84 15:45

LOCK

llITS CLEAR?
18R IF YES

RESWLTS
1 SAVE
+SET EXPECTED T0 0

1 SREPORT BIT NOT CLEAR
IRESTORE R3S
1SET THE BIT AGAIN.
1ISSUE DEVICE CLEAR
tREAD THE REGISTER
sCLEAR LOM BYTE
tWAS BIT CLEARED BY DEVICE.CLR?
tBR IF NO (IT SMOULON'T BE CLEAR)
1#8IT CLEARED BY DEVICE.CLR
sLOCK ON BIT? SWO9-1
tCHANGE TO NEXT BIT
+IF_NOT DONE LOOP
1SET ALL DTR BITS
1CLEAR LOCATION FOR ERROR PRINTOUT
+ACT DELAY LOOP FOR
tRESET INSTRUCTION

1OTR BITS CLEAR?
+IF YES CONTINUE
1IF NO PRINT ERROR

tMAKE SURE TIGHT LOOP IS CLEANED WP
i

IMRR-sscscssnssssscsssssssssasssasassssssss
~$X1-escsccsnccscssssscsssnnssnssns

1068660606006006006000088 TEST 12 000000000000 000000000000000000

1¢THIS TEST PERFORMS RESET TESTING &
1oTESTING OF WRITE ONLY OR READ ONLY BIT
u TEST BITS “ROONE, BIT11, 01710. 8179, BITS, BIT2, BIT1
8170, SIL“" READ ONLY AND THAT TROY IS
A LINE IS SELECTED AND MSENAB IS SET.
ZERO UNTIL
l‘
'

s:e

«$Xl-onssscssssssrsssnssssssnssssss

TEST 12

§110688800480008080080048800486008008880080080000000080080080000088002

014304
014306

000004

012737

000012

001122

TST12:
}

SCOPE

MOV

END

012,4TSTNM

O MACR)

ssesssssssssses

tLOAD THE NUMBER OF THIS TESTY

H6
CZDZA-HO

CZDZAM.P11

MACY11 SOAC1052)
19-JAN-84 15: 45

014314
014322
014326
014330

012737
013700
005005
012710

014334
014336
014340
014342
014346
014350

011004
001401
104002
012710
011004
001401
104002
012705
005077

0143352
014354
014360
014364
014372
014376
014402
014404
014406
014410
014412
014414
014416
014420
014422

014422
002042

MOV

001360

CLR

027607

MOV
BEQ
ERROR
MOV
MOV
BEQ
ERROR
MOV

14:

24:

CLR
8IS
8IS
8IS
CLR
MOV
(o,
BEQ

165464

032777

0352710
052705
005002
011004
020504
001404
104414
005202
001372
104002

SEQ 72

19-JUN-84 16:22 PAGE 72
CZDZA DZ11 DEVICE DIAGNOCSTICS.

3s:

INC
BNE

OTST1S, NEXT
DZCSR,RO
RS

tPOINT TO THE START OF THE NEXT TEST
1SET ADDRESS TO RO
1SET EXPECTED 10 ©
OROONE +BIT11+8IT10+8IT9+8IT8+81IT72+B1IT1+8BIT0-SILOAL,(RO)
IWRITE THE BITS
(RO),.R4
tREAD BACK THE BITS
1BR IF NONE ARE SET.
14
108ITS MERE SET.
&
OTRDY,(RO)
MTMV T0 WRITE TROY
TROY
1READ
(RO),.R4
g.

1BR IF NOT SET
3 ®

OTROY, RS
SDZLPR
#TCRO,8DZTCR

1SET EXPECTED BIT
1LOAD LINE O
+SET TCR BIT

MSENAB, (RO)

MMSENAB,
R2
(RO),R4
RS,.R4

1SET SCAN ENABL
1SET COUNTER TO ZERO
tREAD THE REGISTER
18IT SET?

1STALL TIME
sUPDATE COUNTER

soTROY NOT SET!

1BR IF YES

t1BR IF COUNTER NOT DONE

48:
..u..-.....................-‘....

106066666680600008086000¢ TEST 13 eeeeeessssssssssssssssssssssse

1oTHIS TEST PERFORMS RESEY TESTING AND
s1oTESTING OF READ ONLY AND WRITE ONLY BITS
1 IN REGISTER DZCSR
soVERIFY THAT *TIE”,

"SILOEN”", "RIE”, "MSENAB",

16ARE THE ONLY R/W BITS IN THE DZCSR.

"MAINT"

1oTHEN VERIFY THAT A RESET WILL CLEAR THESE BITS

1oTHIS TEST ALSO CHECXS BYTE OPERATIONS ON THE CSR
3

s:¢

«$X]-scssssssssssssssssssssssssnsss

TEST 13

110000600060060060006000000000000000000000000000000000000000808000

014422
Ola424

000013

001122

014432

014552

001360

014440
014442

014452
014456
014460
014462
Cledss
018466

014470
014472

014474

014476

TST1S:

SCOPE

mr(ow

013,4TSTNM
S90S

177757
050150

1¢:

tPOINT TO THE START OF THE NEXT TEST

MOV

OTST14 ,NEXT

MOV
MOV
MOV
MOV
cP
BEQ

1SET UP FOR ERROR MESSAGE
DZCSR,RO
0'C¢0Cl.l>.(l0) 1TRY TO WRITE
OTIE!SILOEN!RIE
!MSENAB !MAINT RS ;MAKE EXPECTED
s ACTUAL
(RO),.R4
009 EXPECTED VS ACTUAL
R4 ,RS
14
1 YES

CLRS
CLR8
MOV
P
BEQ

(RO)
RS
(RO),Re
R4 RS
3¢

DEVICE.CLR

002042

;1LOAD THE NUMBER OF THIS TEST
DREES

ERROR

1 sNO

1CLEAR LOMER BYTE OF CSR
lSET EXPECTED
1READ CSR BITS
1COMPARE ACTUAL TO EXPECTED
mmcu IF SAME

16
CZDZA -HO
CZDZAM. P11
3486
3487
3488
3489
3490
3491
3492
3493

3494
3495
3496
3497
3498
3499
3500
3501
5502

3503

TEO4
3505

MACY11 SOAC1052)
19-JUN-84 15:45

014500 104002
014502 012710 177737
014506 105077 165332
014512 012705 000150

34:

014552

104002
012710
005005
0035227
001373
000005
011004
001401
104002

ERROR
MOV
CLR8

2
#+C<DCLR>,(RO)
SHOZCSR

MOV
o
BEQ

(RO), R4
R4 RS
4

MOV

014516 011004
014520 020405
014522 001401

014524
014526
014532
014534
014540
014542
014544
014546
014550

177757

as:

000000

Ss:

ERROR
MOV
CLR
INC
BNE
RESET
nov
BEQ
ERROR

2s:

s:e

3511

3516
3517
3518

3519

3520

3521

3522
3523
3524
3525
3526

3527
3528
3529
3530
3531
3532

3533
3534

3535
3536

3537
3538
3539
3540
3541

(RC),.R4
s
2

1BRANCH IF CSR IS CLEAR
'I’ NOT PRINT ERROR

-$MRUD-scccsscscssssssssssssssasss
«$§Xl-sssssssnssssssssssssssssassnss

1¢THIS TEST PERFORMS RESET TESTING AND
1oTESTING OF READ ONLY REGISTER DZROUF
1oAND TESTING OF WRITE ONMLY REGISTER DZLPR

3510

g{;

2
#*C<DCLR>,(RO)
RS
0
S¢

RS
1SET RS TO EXPECTED RESWLTS
+READ CSR
tACTUAL = EXPECTED?
1BRANCH IF SAME
1OTHERWISE PRINTOUT ERROR
RESET CSR BITS
1SET RS TO EXPECTED RESWLTS
sDELAY TIMER FOR
le 11 COMPATIBILITY
1 ISSUE BUS INIT
tREAD CSR REGISTER

1660600060000000000800000¢ TEST 14 ¢00000000000000000000080000s000

3507
3508
3509
3512

ORIE !MSENAB !

1OTHERWISE PRINT ERROR
.!s:t CSR BITS
‘CL! MIGH BYTE OF CSR

3506

3513

SEQ 73

19-JUN-84 16:22 PAGE 73
CZDZA DZ11 DEVICE DIAGNOSTICS.

014552

014554

014562

014570
014572

014576

014600

014606

014610
014614
014616
014620
014622

014624
014626
014632
014634
014636
014640
014642

000004

000014

001122

012737

014642

001360

011005

177777

042705
020405
001401
104002
010403

104000

005103
010377
011004
020405
001401
104002

TST14:
:

SCOPE

mrto)v

014,4TSTNM

1LOAD THE NUMBER OF TMIS TEST

MOV

#TST1S NEXT

sPOINT TO THE START OF THE NEXT TEST

(RO),RS

1SET EXPECTED

MACR) esssssssessesssssass

DEVICE.CLR
MOV
DZRBUF ,RO

002046

9012777

011004

~$XZ-ssscsscsssssssssssssssssasssas

}1106086088880000088800808080800000008080000000000008800000000880888800

012737
104413
013700

TEST 14

MOV

165244

MOV

O-I.QM

8IC
cP
BEQ
ERROR
MOV

m&m!.ITll RS ;0ITTO
R4 ,RS
1O ACTUAL VS EXPECTED
14
01? YES.GO CONTINUE PROCESSING
2
1ERROR- BIT PATTERN NOT CORRECT
R4,R3
1GET A COPY OF THE ACTUAL BIT PATTERN

ERROR

4
2

MOV

1s:
165220

24:
i

1CLEAR D211
1SET UP FOR ERROR MESSAGE

com
MOV
MOV
[
BEQ

-- END

(RO),.R4

R3
RS,80ZLPR
(RO), R4
R4,RS

s TRY TO WRITE ALL 1°'S

s ACTUAL

+GET THE LOGICAL INVERSE OF THE BIT PATTERN
ITRY TO WRITE
+sACTUAL
1CP ACTUAL VS EXPECTED
+IF YES, GET OUT OF THIS TEST
1 *NO

O MACRQ =esssssesssssssssss

i
§

-MRWD-eescessssssssssassssssssasss
-8Xl-vecscccsssscssssssssssssssses

108000000000000000000000e TEST 15 eeeescccssecessssssscsssesscsse
1oTHIS TEST PERFORMS RESET TESTING AND
s¢TESTING OF READ OMLY REGISTER DZMSR
1#AND TESTING OF WRYTE ONLY REGISTER DZTDR
§ ~8XZl-esccscssssssssssssssasssansasnse

T BRI
R S v gLise :

CZDZA-HO
CZDZAM.P11
3543
3545

3547

3549

MACY11l SOAC1052)

19-JUN-84 15:45

SEQ 74

19-JUN-84 16:22 PAGE 74
CZDZA DZ11 DEVICE DIAGNOSTICS.
yte

TEST 1S

11000000008000084808008008000048400000088800000008880804800800000000

014642
014644

000004
012737

014652
014660
014662
014666
014670
014676
014700
014702
014704
014706

012737
104413
013700
011005
012777
011004
020405

014710

014712
014716

014720
014722
014724
014726

000015

001122

014726

001360

TST1S:
it

END O MACRQ

165170

CO1401

010403
005103

010377

011004

14:
165150

020405
001401

104002

#15,9TSTNM

1LOAD THE NUMBER OF THMIS TEST

=essssscsssssssasss

MOV
OTST16,NEXT
DEVICE.CLR
MOV
DZMSR,RO
MOV
(RO),RS
MOV
#-1,8DZTOR
MOV
(RO),R4
e
R4,RS
BEQ
14
2
ERROR
MOV
R4 ,R3
R3
com
R3,8DZTOR
MOV
(RO),R4
MOvY
R4,
e
4
8EQ
ERROR
2

002062

immmm

SCOPE

MOV

END O MACR)

tPOINT TO THE START OF THE NEXT TEST
+CLEAR DZ11
1SET UP FOR ERROR MESSAGE
1SET EXPECTED
1TRY TO WRITE ALL 1'S
s ACTUAL
1CMP ACTUAL VS EXPECTED
+IF YES,GO CONTINUE PROCESSING
1oERROR- BIT PATTERN NOT CORRECT
tGET A COPY OF THE ACTUAL BIT PATTERN
1GET THE LOGICAL INVERSE OF THE BIT PATTERN
1 TRY TO WRITE
s ACTUAL
1CMP ACTUAL VS EXPECTED
+IF YES, GET OUT OF THIS TEST
1 oNO

=ssssssssssssssssss

-.xz.................-..-.........

1666666600600080084800088 TEST 16 ¢00000000244008000000000800008

soVERIFY THAT IF ME ARE IN "STAGGERED” MODE
soTHAT SETTING "DTR” FOR A LINE WILL

1oBRING UP "RING” AND “CARRIER” FOR THE
1oASSOCIATED LINE IN WHICH ME ARE STAGGERED!
3¢ LINEO DTR= LINE1 RING AND CARRIER
1 LINEL DTR= LINEO RING AND CARRIER
3¢ LINE2 DTR= LINES RING AND CARRIER
3¢ LINES DTR= LINE 4 RING AND CARRIER
'

s:¢

-.xz...............-...........-..

TEST 16

110608030600060408080808080080008000808000880880888880880880000000

014726
014730

014736
014744
014752
014756
014760
014762
014766
014770
014772
014776
015002
015004
015012

012737

000016

001122

012737
012737

015122

001360

105737
100001

015016

001414

100405
013737
000177

10¢:
000001
001370

001360
164110

001126

SCOPE

MOV

016, $TSTNM

1LOAD THE NUMBER OF THIS TEST

MOV

OTST17,NEXT

tPOINT TO THE START OF THE NEXT TEST

END 0 MACR)

MOV

001362

013700
104413
012702
005737

TST16:

sssssssssssssssssss

#14,L0CK

TST8
EIAFLG
10¢
8PL
ADVANCE
DZMSR, RO
MOV
DEVICE.CLR
R3
CLR

MOV
TST
BMI
MOV
P

1 ,R2
MODE
14

NEXT, SLPADR
S$LPADR

tUSE THIS ADDRESS IF A TIGHT SCOPE LOOP IS SELECTED

1EIA OR 20MA?
1BR IF EIA
1EXIT TEST
1SET REGISTER
+ INIT DZ11
1ZERO LINE NUMBER
1SET POINTER
tARE WE IN STAGGERED MODE?
1YES WE ARE!
tLEAVE THIS TEST! NOT STAGGERED
1EXIT

K6
CZDZA-H0
CZDZAM.P11
3598
3599
3600
3601
3602
3603
3604
3605
et

MACY11l SOA(1052)
19-JUN-84 15:45

015016
013022

130237

001004
005203
106302

18:

001364

2%:

103372
104400

010204

032703

001402

3607

3s:

000001

3608
3609
3610

3611

150277

140277

3620

3621
3622
3623
3624

8IT8
R2.LINE
34
BNE
R3
INC
ASLB
R2
8cC
1
ADVANCE
R2,R4
MOV
8IT
#B8ITO,R3
44
BEQ
R4
ASR
S¢
BR

1 TEST THIS LINE?
1 YES
ILINE @
1GET NEXT LINE
IKEEP TEST
1ADVANCE THMIS TEST
1SAVE BINARY BIT FOR LINE ¢
1GET STAGGERED COMPANION LINE
1BR IF LINE EVEN
1ADJUST LINE
:

CLR
8IS8

RS
R4 RS

1SET EXPECTED
[

8Is8
B8IS8

R4 ,RS
R2,8DZTCR

i
1SET DTR

MOV
ow
BEQ
ERROR
8IC8

(RO),.R4
RS.R4
64
2
R2,80ZTCR

tREAD MSR REGISTER
sOK?
s YES
1oERROR IN RING OR CARRIER
tCLEAR DTR

MOV
BEG
CLR

(RO),.R4
74
RS

ASL

Sé:

3612
3613
3614
3615
3616
3617
3618
3619

SEQ 75

19-JUN-84 16:22 PAGE 75
CZDZA DZ11 DEVICE DIAGNOSTICS.

164772

DELAY

64:

164754

DELAY

ERROR
SCoP1

74:

3627

tADJUST LINE

1CABLE DELAY

1READ MSR
18R IF THEY CLEARED
+SET EXPECTED 70 O
1#8ITS NOT CLEARED
1LOCK ON SIGNAL?
tCONTINUE TEST

-.:‘z-......-........lll.........-l

10000660045080845000000006¢ TEST 17 essssssssssssssssssssssssssses

s¢TEST TO VERIFY THAT IF IN "EXTERNAL“
soMODE; SETTING DTR FOR SELECTED LINES
soMILL BRING UP “"CARRIER” AND “RING"

soFOR THAT SAME LINE. NOTE: IF YOU MAVE

1¢SELECTED MODE AS "EXTERNAL"; THE M325 TEST CONNECTER
soMUST BE USED ON ALL SPECIFIED LINES.
1oLINES MAY BE SPECIFIED BY SWRO3=1
1oAND SMROO=1 AT START TIME OR ALTERING

1oSTATUS MAP,

s:e

‘

-.xz-.............I..'.........-.I

TEST 17

1 1006066000600480008884800000000008480880040880888888800800808000000¢

015122
015124
015132
015140
015146
015152
015154
015156
015162
015164

012737

000017

001122

012737
012737

015260
015174

001360
001362

105737
100401

105737
100774
013700

001370

001414
002062

TST17:
$

SCOPE

MOV

#17,4TSTNM

;LOAD THE NUMBER OF THIS TEST

MOV

#TST20,NEXT

tPOINT TO THE START OF THE NEXT TEST

T1ST8

MODE

END

O MACR)

MOV

1¢:
24:

=sssssssssssssssssse

#34,L0CK

B
B8MI
ADVANCE
EIAFLG
TSTB
1
BMI
DZMSR ,RO
MOV

;USE THIS ADDRESS IF A TIGHMT SCOPE LOOP IS SELECTED
1EXTERNAL
?

1BR IF YES
1EXIT TEST
1YOU BETTER BE IN
1EIA MODE FOR THIS TEST.
1SET REGISTER

L6
CZDZA-HO
CZDZAR1.P11
3655
3657

015170
015174

MACY11l SOA(1052)
19-JUN-84 15:45
012702

130237
001003

SEQ 76

19-JUN-84 16:22 PAGE 76
CZDZA DZ11 DEVICE DIAGNOSTICS.

000001
001364

34:
48

3659

Ss:

3661

164634

64:

164616

7¢:

MOV
01 ,.R2
8178
R2.LINE
BNE
S
ASLB
R2
3¢
8CC
ADVANCE
CLR
RS
8IS8
R2.RS
SkiAB
RS
81IS8
R2.RS
R2,8DZTCR
8IS8
DELAY
MoV
(RO),.Re
»,
RS.Re
Br @
64

1SET LINE POINTER
+LINE SELECTED?
18R IF YES
sNEXT LINE
tCONTINUE TEST
sADVANCE THIS TEST
1SET EXPECTED
’
[l
[
1SET DTR
1CABLE DELAY
READ MSR
18ITS OK?
1OR IF YES

8IC8
DELAY
MOV
Bl @
CLR

1CLEAR DTR
1CABLE DELAY
sREAD MSR
18R IF BITS CLEARED
sCLEAR EXPECTED LOC.

ERROR

ERROR
SCoP1
BR

R2,8DZTCR

(RO).R4
7%
RS
2

1CARRIER OR RING ERROR

18ITS NOT CLEARED.
sLOCK ON LINE?
sCONTINUE TEST
3

-:;&I‘E..-.......--.-..--.-.-----.----.--

-eS0S000

SN SOSSSSSSSSSSSSSSSESSS

§1000008600006000060000088 TEST 20 ¢0200000000000000000008800088802
3¢ THIS TEST VERIFIES THAT TRDY IS SET WHEN A LINE

3¢ IS READY TO BE LOADED, ANL THAT THE LINE SPECIs FIED IN BITS 8-10 OF DZTSR CORRESPOND
s TO THE LINE SELECTED IN 2%0‘
.

s:¢

«.BONSSSSNSSSSSSSSSESESSSSESEEESES

TEST 20

11000808808888800068080008828800080088008000080828800508808880080808080800s

012737

001122

012737
104413
013700

001360

0035037
012702

130237

001420
0350277

052710

032710
001004
104414

;LOAD THE NUMBER OF THIS TEST

1¢:
2¢:
34:

011004

8IT

#TROY,(RO)

BNE

INC
BNE

H4
34

MOV

(RO),.R4

DELAY

001372

104003

#TST21 ,NEXT
MOV
DEVICE.CLR
DZCSR, RO
MoV
! TROY RS
OMSENAB
MOV
SAVLIN
CLR
MOV
,.Re
R2,LINE
8IT8
3¢
BER
8IS
R2,8DZTCR
OMSENAB, (RO)
8IS
ra
CLR

ERROR

tPOINT TO THE START OF THE NEXT TEST
1ISSUE A "DEVICE CLEAR" (RESET)

1SET POINTER

1START THE EXPECTED LINE NUMBER AT 0
1SET UP FOR ERROR PRINTOUTS
sUSING R2 AS A BIT POINTER, POINT TO LINE O
1IS THIS LINE SELECTED?
1IF NO, SKIP THE STARTUP
1SET THE GO BIT FOR THIS LINE
1START THE SCANNER
1SET FOR DELAY
1 TX READY?

1BR IF YES
s1DELAY

1¢TX NOT READY!

1GET THE LINE POINTED TO BY THE SCANNER

M6
CZDZA-HO
CZDZM4.P11

MACY11l S0A(1052)
19-JUN-84 15:45

SEQ 77

19-JUN-84 16:22 PAGE 77
CZDZA DZ11 DEVICE DIAGNOSTICS.

ce
BEQ

5710
3711
3712

ERROR

S¢:

5713
3714
3715
3716
377
3718
3719

R4 ,RS
5S¢
2

ADO
#400,RS
DEVICE.CLR
SAVLIN
INC
ASLB
R2
ecc
it

+IS THE LINE NUMBER WHAT IT SHOWLD BE?
+IF YES,GO WORK ON THE NEXT LINE
1oLINE NUMBER DID NOT MATCH TCR BIT

tPOINT TO THE NEXT EXPECTED LINE
1ISSUE A "DEVICE CLEAR" (RESET)
1ADJUST FOR NEXT LINE
tPOINT TO THE NEXT LINE.ARE ALL LINES TESTED?
+IF NOT,
DO THE NEXT LINE
-.xz-...-.........................

3720
3721

10000680808800080600808088 TEST 2] 060000000008000400000000800800¢

1oTEST TO TRANSMIT ONE CHAR AND

5722

3723

3724

mmcmmt WILL BE TURNED ON
nOElT TIME. TMIS IS THE FIRST TIME ANY
1*DATA IS CHECKED IN THE RECEIVER.
soUSING SWITOM NINE WITH TMIS TEST CREATES A TIGHT SCOPE LOOP
M
OF CHARACTERS.
TS STREA
A STEADY
1oMMICH TRANSMI

3725

3726

3727

35728

s:o

-'u-..........'......-.........l.

TEST 21

% 3 ;‘“‘.%‘“““..“0“‘.“...‘.......“.‘“‘........‘.‘.‘.‘.‘“

000021

001122

015742
015720

001360
001362

sT2l:
3

MOV

021,4TSTNM

1LOAD THE MUMBER OF THIS TEST

MOV
MOV

oTST22 ,NEXT
0164 ,L0CK

tPOINT TO THE START OF THE NEXT TEST
sUSE THMIS ADDRESS IF A TIGHMT SCOPE LOOP IS SELECTED

END O MACR)

s=ssssssssssssssssss

tILINEUP-sscssssssssssssscssssssssssssssss

3
i

1s:
2¢:

as:

S¢:

64:

sCLEAR DEVICE AND SET MAINT BIT IF I MODE

END O MACR)

MOV

=esssssssssssssssss

PAR,R1

o1,R2

iPICK UP PARAMETERS

PICK UP INIT POINTER

8IT
6eQ
MoV
INC
ASLS
8cC
CLR

R2,LINE
<4
R1,8DZLPR
R1
R2
14
SAVLIN

MOV

OMSENAS , BDZCSR IST.Y SCANNER

-- END

36:

164306

OCLASH

~0MRESEY-ccsccsssssssssssssssssssssss

1SHOULD THIS LINE BE SET W ?
1NO
1SET UP LINE PARAMETERS
sPOSITION POINTER TO THE NEXT LINE
1GOT "EM ALL ?
+IF NO, GO SET UP THE NEXT LINE
tCLEAR LINE ¢ INDICATOR

0 MACR) =scssscssssssasssss

8IS

,R2

1LINE POINTER

81T
BEQ
MOV

R2,LINE
144
RS, 8DZTCR

sVALID LINE ?
iNO SET UP NEXT LINE
1SET TCR BIT

BEQ

3¢

+IF YES, ALLOW TIME FOR TROY TO SET

8IT

ORDONE ,SDZCSR

ERROR
CLR
8IT
BNE

20
RS
OTROY,8DZCSR
74

INCB
BNE

RS
64

DELAY

;75 REC DONE = 0 ?

1oREC DONE SHOWD = 0

;
CZDZA-H0
CZDZMm . P11
3766

MACY11 SOAC1052)
19-JUN-84 15:45

015544

104003

SEG 78

19-JUN-84 16:22 PAGE 78
CZDZA DZ11 DEVICE DIAGNOSTICS.
ERROR

1+*TROY FAILED 7O SET!

1LOAD CHARACTER
UFK.ETE“’ECTED LINE ¢

MOve
MOV

0252 ,8DZTDR
SAVLIN,.RS

3770 015560 105737 001371
3;;1 015564 001406

TST8
BEQ

MODE -1
10¢

3773

sME MUST NOW INVERT THE LAST BIT OF THE LINE NMUMBER

$767 015546 112777 000252
015554 013705 001372
3768
3769

164312

7¢:

3772

3774

377S
3776
3777
3778

015566 006205
015570 103402
015572 000261
015574 000401

3779
3780

015576
015600

000241
006105

5782
3783
3784
3765

015602
015604
015610
015614

000305
152705
052705
005003

sS781

3786
3787
3768
3789
3790
3791
3792

015616
015624

015626

015630
015632
015634
015636
3793 015642
3794 015644
3795 015646
3796 015650
3797 015652
37986 015656
3799 015662
3800 015666
3801 015670
015672
3803 015674
3804 015676
3805 015700
3806 015702
3807 015704
3808
3809
g{g

015712
015714
015716

032777
001004

8s:
9:
;P

000200

164216

001401
104020
104400

164204

12%:

138:
144
15¢:

164200
001372
001372

17¢:

000200

3818
3820

3821

99
RS

SWAB
RS
BISB - #252.RS
8IS
SOVALID,RS
R3
CLR

8IT
BNE

OROONE , BDZCSR
124

INC
BNE
ERROR
MOV
ow
BEQ
ERROR
SCOP1
8IC
INC
MOV
ASL
ASLB
8cC
CLR
DELAY
INCB
BNE
BIT

R3
114
4
SDZRBUF ,R4
R4 ,RS
13¢
6

DELAY

164130
1684:

-0 SSNSeS NS eSS SeSSSSeSessSeEsESESSS

1IS THIS TEST IN STAGGERED MODE?
1IF NOT, SKIP STAGGERED SETUP
:

1GET THE LAST BIT INTO THE CARRY BIT
+IF IT IS SET, 'GO CLEAR IT
+IF IT IS CLEAR SET IT MERE
1SKIP THE CLEARING

tCLEAR THE CARRY BIT (INVERSION OF LINE PARITY)
1GET THE NEW BIT BACK INTO RS

R2,8DZTCR
SAVLIN
SAVLIN,RO
RO
R2
3¢
R3
RE
174
ORDONE , SDZCSR
16¢
.

BEQ
ERROR
20
ADVANCE

sMOVE THE LINE MUMBER TO THE UPPER BYTE
1ADD CHARACTER
s+ADD DATA VALID

~
s *RDONE FAILED TO SET!
t1LOAD THE VALUE ACTUALLY RECEIVED

1COMPARE ACTUAL VS EXPECTED. ARE THEY THE SAME?
1IF YES, GO DO THE NEXT LINE
1oND CAT
S DID NOT COMPARE
;CHECXKX TO
JF SMITCH NINE IS SET
;CLEAR TCR BIT FOR THAT LINE.
:INC EXPEC
LINE
1SET WP
ACTER OFFSET
tMAKE THE OFFSET A POMER OF TWO
1SHIFT THE LINE POINTER. ARE ME ALL DONE?
:IF NO, GO AROUND AGAIN FOR NEXT LINE
1 THIS CODE MAS
INSERTED
170 DETECT A PROBLEM FOUND IN FAULT
s INSERTION. IF AN ERROR OCCURS MORE
s THAN ONE WORD WAS RECIEVED ON
tLINE 7.
1GO TO NEXT TEST

;TIGHT SCOPE LOOP FOR THIS TEST. LOOP TRANSMITS CHARACTERS ONLY

;:g
3814
3815
3816
3817

114:

104414

005203
001371
104004
017704
020405
001401
104006
104401
040277
005237
013700
006300
106302
103302
005003
104414
105203
001375
032777

CLC
ROL

RS
8s

-~ END O MACR) s=sssssssssussssssss

10¢:

000252
100000

ASR
8CS
SEC
[

015720
015726
015730
015736

015740

032777
001774
112777
104401

000744

100000

164114

000252

164130

164:

BIT
BEQ
MOVe
SCoP1

#TRDY,8DZCSR
164
#252,8D0ZTDR

144

1IS TRANSMITTER READY?
1 IF NOT, WAIT FOR IT
t1LOAD THE CHARACTER
;1LOOP AGIN IF SW09=1

;OTHERWISE, GO PICK UP THE TEST NORMALLY

{

-$Xl-ssssssssssssrsssssssssssanass

;18086888808 88880008008008 TEST 22 ¢00000000000000080000000000000

B7
CZDZA -#0

CZDZAM.P11

|
|

MACY11 SOAC1052)

19-JUN-84 15:45

19-JUN-84

CZDZA DZ11 DEVICE DIAGNOSTICS.

3822

1o TMIS TEST PROVES THAT THE TRANSMITTER TRANSMITS
1 6OMARACTERS (FLAG MODE)AND TME RECEIVER RECEIVES (FLAG MODE)

3838

3824
3825

.o(oc LINE AT A TIME
BASED UPON VALID LIMES)
1eTHIS IS THE FIRST TIME TMAT ALL DATA IS OECXED

E8.26

ire

3827

3408

015742
C1S744

000004
012737

000022

001122

3832
3833

015752
015760

012737
012737

016270
016074

001360
001362

3836

015766

104417

3838
5839
3840

015770
015774
016000

013701
012702
030237

001366
000001
001364

3842
3843
3844
3845
3846

016006
016012
016014
016016
016020

010177
003201
106302
103370
003037

164040

3848
3849
3850
3851
3852
3853
3854

016024
016030
016032
016036
016040
016042
016030

012700
003020
700
001374
003000
013737
012702

001422

3856
3857
3858

016062
016066
016070

030237
001465
010277

001364

3860
3861
3862
3863
3864

016102
016104
016106
016110
016116

001401
104020
003003
032777
001004

3834
383S
3837

35841

3847

3835

3859

3865

3866
3867
3868
3869

g;g

3872
g;z

016004

016054

016074

016120

016122
016124
016126
016130

016136

016142
016146

001402

032777

013705
105737
001406

<Xl -oscssscsenssscscssnssssssssene

MOV
MOV
i

000080

163762

001400
163760

3s:

000200

163740

4¢:

100000

163724

64:

001372
001371

163730

tPOINT TO THE START OF THE MNEXT TEST
tUSE THIS ADDRESS IF A TIGMT SCOPE LOOP IS SELECTED
1LINEUP -cccccccnssccsccnccnccscnsnsscnsss
1 ~MRESEY -vcccccesscescsssscsssssccess

1CLEAR DEVICE AND SET MAINT BIT IF I MODE

MOV
MOV
8IT

PAR,R1
01.R2
R2,LINE

1IPICK UP PARAMETERS
1PICK UP INIT POINTER
1SHOULD THIS LINE BE SET WP ?

MOV
INC
ASLS
8CcC
CLR

R1,802LPR
R1
R2
14
SAVL W

1SET UP LINE PARAMETERS
1POSITION POINTER TO THE NEXT LINE
1GOT 'EM ALL ?
+IF NO, GO SET UP THE NEXT LINE
1CLEAR LINE ¢ INDICATOR

MOV
QLR
ov
BMNE
CLR
MoV
MoV

0700, RO
(RO).
#STOP,RO
. -6
RO
om.tcxsv
o .R2

tPOINT TO THE DATA AREA
1CLEAR A DATA WORD
+FINISHED ?
sNO
1CLEAR OFFSET
1SAVE FOR ERROR MSG
ILINE POINTER

8IY
BEQ
MOV

R2,LINE
144
R2,8DZTCR

tVALID LINE ?
sND SET UP NEXT LINE
1SET _TCR BIT

£ Q

S¢:

8IS

8IY
BEQ
ERROR
CLR
8IY
BNE
DELAY

001422

OTST23 NEXT
#44,10Cx

+NO

-- END O MACR) eccccccssesssascane

001462
002046
000001

1LOAD THE MUMEFR OF THIS TEST

eccscscscsccssscsssss

OCLASH

2¢

022,0TSTNM

-- END O MACRQ ecssccsccccscsssccsse

18:

001372

MACRQ

74:

INCB
ONE
ERRCR
MOve

MOV

1S78
8EQ

m @DZCSR

ORDONE ,8DZCSR

3¢
20
RS
OTRDY,8DZCSR
7

RS
6
3
TOO(RO),8DZTOR

SAVLIN,RS

MODE - 1
104

;START SCANNER

;IS REC DONE ~ 0 ?

+IF_YES, ALLOW TIME FOR TROY YO SET
1oREC DONE SMOWD - 0

1oTROY FAILED TO SET!

;LOAD CHARACTER

.mgt&mcm LINE ¢
P

-SEESSSSNEEsNEEEEEEsEEsEEsEEsEREREES

1IS TMIS TEST IN STAGGERED MODE?
+IF NOT, SKIP STAGGERED SETUP

JME MUST NOW INVERT THE LAST BIT OF THE LINE NUMBER

g;z
3877

TST22: SCOPE
m"ofl

104414

1035205
001371
104003
116077

[

TEST 22

1 0 0 0 20 0 006060000000006020062000068003200¢C00008000028
000008

3829
”ugo
1

SEQ 79

16:22 PAGE 79

016150

006205

ASR

1GET THE LAST BIT INTO THE CARRY BIT

C7
CZDZA -0
| CZOZAM.P11

[

WA o=

)

s878
3879

MACY11l SOA(1052)
19-JUN-84 15:45

016132
016134
016156

°§!~J
LG §4

1 IF IT IS SET, GO CLEAR IT
1IF IT IS CLEAR SET IT MERE
1SKIP THE CLEARING
1CLEAR THE CARRY BIT (INVERSION OF LINE PARITY)
lfi? THE NEW BIT BACK INTO RS
tMOVE THE LINE MUPMBER TO THE UPPER BYTE
1ADD CHARACTER
sADD DATA VALID

016164
016166
016172
016176
016200
016206
016210
016212
016214

108

SHaR
8ISe
gg

RS
TOO(RO).RS
mum RS

118;

817
BE

mc GDZCSR

INC
&£

21
114

001422
100000

163634

END O MACRQ

DELAY

013216

ERROR

12¢:

163622

13¢:

001422

016260
016262
016264

001362

12¢

1oRDONE FAILED TO SET!

SDZRO\F R4
R4,.RS

sLOAD TME VALUE ACTUALLY RECEIVED
1COMPARE ACTUAL VS EXPECTED. ARE THEY THE SAME?

ERROR

1oM0

SCoP1
TM8
.5 3
8I1C
INC
MOV
ASL
ASLB
8cC
CLR

148
15¢:

163610
001372
001372

seccccccccscscocnne

MOV
(o, 4
B Q

016232
016236

13¢

TOO(RO)
a4
R2,.8DZTCR
SAVL IN
SAVLIN,.RO
R2
3
LOCx

1IF YES, GO DO TTMTMME MEXT LINE

DATA/CONTENTS DID NOT

sOECK TO SEE IF SWITOM NINE IS SET
3
SINARY PATTERN FOR THMIS LINE
1GO 'ROUND AGAIN FOR MNEXT OMARACTER
tCOLEAR TOR BIT FOR THMAT LINE
s INC
LINE
1SEY UP OARACTER
SETY
sMAKE THE OFFSETY A POMER OF TWD
sSHIFT THE LINE POINTER. AFE WE ALL DONE?
1IF NO, GO AROUND AGAIN FOR NEXT LINE
JMAKE SURE LOCX IS CLEAR FOR MNEXT TEST
'

..u-...........................I.

1000000000000000000000000 TEST 23 ceeeeccccsccccsscsccccsccccose

soTHIS TEST WILL PROVE THAT EACH RECEIVING LINE CAN
soBE DISABLED BY SETTING TME RCVON BIT TO ZERO
soFOR EACH LINE IN THE LPR REGISTER. IT ALSO
soVERIFIES THMAT MASTER CLEAR WILL ZERO DVALID FOR
1 sOMARACTERS STORED IN TTME 2%0
'

s:e

AR PR R

TEST 23

110000600600000000000000000000000000000000000000000000000000000800

3921

000004
012737

000023

001122

3923

012737

016622

001360

003037
104417
013701
042701
012702
010177
005201

001372

3931
3932

8s:
94:

016246

3911
3912
35913
3914
3915
3916
3917
3918
3919

8Cs
SEC
88
CLC
ROL

016160
016162

016220
016224
016226
016230
016232
016234
016240
016242

SEQ 80

19-JUN-84 16:22 PAGE 80
CZDZA DZ11 DEVICE DIAGNOSTICS.

103037

106302
103373

001366
010000

163512

TS123:

14:
2¢:

SCOPE

MoV

023,4TSTNM

sLOAD THE NUMBER OF THIS TEST

MOV
CLR8
CLR
OCLASM
MOV

OTST24 NEXT
OONFLG
SAVLIN
PAR,R1

tPOINT TO THE START OF THE NEXT TEST
+INITIALIZE FOR FIRST TEST LOOP
1ZERO LINE NO. FOR ERROR REPORT
1EXECUTE MASTER CLEAR
1STORE DEFALT PARAMETERS

MOV
MOV
INC

,R2
R1,80ZLPR
R1

+INIT LINE POINTER
1LOAD LINE PARAMETER REGISTER
1SET R1 FOR NEXT LINE

tALL LINES LOADED?

RIC

ORCVON,R1

ASLB

8CC

1CLEAR RCVON BIT

1SHIFT R2 TO NEXT LINE

D7
| CZDZA-HO

CZDZAN.P11
016346

012701
013702

010277
0352777
005005
005777
100404
104414

3934
3935
3936
3937
3938
3939

MACY11l SOA(1052)
19-2N-84 15: %

3941

005205
001372
104003

3943
3344
3945

000252
001364
163474

000040

02%2.R1
LINE
. R2
R2,.8DZTCR
.BDZCSR

DELAY

Ss:

INC
B€

RS
4

MOVve
MoV
8I1C

SOICSR.RS
o1,R3
RS
o*Cc?>

ERROR

214

163412

a2
RS
204
R3.R2
[}
gz.uman

001420

TST8

DONFLG

81
BR

RS.R2
3

FILE

BHE
an
mOove

163404

163364

74:

84:

001372
10¢:

11¢:

12¢:
13¢:

@DZITCR
RS
RS
.1}

8PL
CLR

10¢
SAVLIN

EFROR

@DZCSR

MOV
BPL
SR

SDZRBF R4
114
R4

MOV

R4, SAVLIN

INCB
MOV
B8R
CLR

DONFLG
PAR,R1
14
RS

INC
BNE

RS
13¢

8IC

177770
001372
001420
001366

DELAY

124
7
R1.8DZTDR

INC
BNE

1S7T8

163334

163324

CLR
CLR

ERROR
R

DELAY

R4
0*C<7>
17
10¢

DEVICE.CLR

163244

NOP
NOP

1ST8
BPL

tLOAD TRANSMITTING CHARACTER
ICOY ACTIVE LINE BITS
1LOAD TCR BITS
SET SCANNER

@DZCSR

ASLS
DEC
SE
817
BNE
8ICs

:
208

3949

016566
016570
016572
016576

MoV
MOV
MoV
8IS
CLR
TSY

177770

3947

ELE LT EMEREREREM
L L L L EPRNEPERER

163452

163444

163430

SEQ 81

19-JUN-84 16:22 PAGE
8
CZOZA DZ11 DEVICE oxnmsncs

SDZCSR
144

T_TRANSH. FLAG
1IF LINE O
TCR BIT
NEXT
TO
RS
+POINT
R3 POINTS
UNTIL
RS
sDECREMENT
BIV
TCR
CT
070 CORRE
tMAS THIS LINE

%CED?

1IF YES CLEAR TCR BI7

IF MORE LINES SET BRANCH
IF ALL LOADED IS TMIS SECOND PASS
IF YES BRANCH TO SECOND PART OF TEST
OTHERWISE CONTIMUE WITH FIRST PART
TRANSMIT CHARACTER

1CLEAR FLAG FOR THIS LINE
1G0 WAIT FOR NEXT LINE
tCLEAR TCR BITS
1CLEAR DELAY COUNTER
mut FOR LAST CHARACTER
s INCREMENT DELAY COUNTER
lIF NOT FINISHED CONTINUE WAITING
sROONE BIT SET?
+IF NO CONTINUE
+IF YES SET LINE NO. TO ZERO
0

ERROR

+IF DVALID IS ZERO BRANCH
1 IF SET THEN
1 ISOLATE LINE NO. IN R4
1SET SAVLIN FOR ERROR REPORT
tDATA VALID SHMOULD NOT BE SET
1G0 READ SILO AGAIN
1PREPARE FOR SECOND PART OF TEST
tMOVE DEFAMAT PARAMETERS TO R1
1GO LOAD LPR REGISTER
s INIT DELAY COUNTER
tWAIT FOR LAST CHARACTER
170 BE RECEIVED
1DELAY FINISHED?
1IF YES EXECUTE MASTER CLEAR
1ROONE SET?

1 IF NOT BRANCH

E7
CZDZA-HO

CZDZAM.P11

MACY1l S0A(1052)
19-JUN-84 15:45

016600
016604
016606
016612
016614
016620
016622

005037
104020
017704
100003
005037
104017

19-JUN-84

16:22

SEQ 82

PAGE 82

CZDZA DZ11 DEVICE DIAGNOSTICS.

001372

SAVLIN

+IF_YES THEN PRINT OUT

MOV
8PL
CLR

SOZRBUF ,R4
154
SAVLIN

clifi SILO
1DATA VALID SET?
+IF_YES THEN PRINT OUT

ERROR

144

163234

CLR

001372

ERROR

15¢:

1 REPORT

1ERROR REPORT
'

..xz...........................-..

.ooooono““““oouuoo TEST 28 00000000000000000008460000000808

1oTHIS TEST WILL PROVE THA
1¢ 1) THE TRANSMITTER '“N( BIT* WORKS
1 2) THE RECEIVER CAN FLAG "FRAMING ERRORS”
1 3) THE RECEIVER Cfil FLAG "PARITY ERRORS”
A TIME WILL BE EXERCISED.
1oONLY ONE LINE AT
BE EXERCISED UNLESS
NOT
WILL
TEST
1¢THIS
1oCONNECTED BY AN H32S, M3271, OR M3190 CONNECTOR
.

1:¢

..u-.-..'.-.........‘............

TEST 24

11000000000800000888882° " 0800008048000 0008000008080000048400000008808000¢

016622
016624

016632

016640
016646
016652

001122

017100
016736
001370

TST24:

001360
001362

016766
016772

;LOAD THE MUMBER OF THIS TEST

MOV
MOV

OTST2S, NEXT
#34,L0CK

l’OINTmTO
THE START OF THE NEXT TEST
1SET

12¢

|IF So.seflrf' THIS TEST

TST

016656

016736
016742
016744
016730
016754
016762

024, $TSTNM

BeQ

016654
016662
016666
016672
016676
016700
016704
016706
016710
016712
016716
016722
016730

SCOPE

MOV

14:
2¢:

163104

END O MACR)

MOV
8IS
MOV
BIT

3s:

1ARE E u\m IN INTERNAL MODE?

tufl DEVICE AND SET MAINT BIT IF I MODE

s=e=ccssssssssssassss

INC
ASLB
8cC
CLR

PAR,R1
1PICK UP PARAMETERS
SCDDPAR !PARITY,R1 ;FORCE ODD PARITY
1PICK UP INIT POINTER
#1,R0
RO,LINE
1SHOULD THIS LINE BE SET WP ?
24
+IF NOT,DON'T SET IT WP
R1,80ZLPR
tOTHERWISE, SET UP LINE PARAMETERS
R1
RO
1GOT "EM ALL ?
14
1NO
tCLEAR LINE ¢
SAVLIN

8IS
MOV
8IT
BEQ
MOV
MOVE

OMSENAB,BDZCSR
DZRBUF ,REGIST
R2,LINE
114
R2,8DZTCR
R2,8HDZTOR

MOV

SAVLIN,RS

8EQ

MOV

163112

001400

OCLASM

MODE

MOvVE

1578

BEQ

0 ,R2

sLINE POINTER

#377,8DZTOR

+SET BREAK BIT
1LOAD CHARACTER

MODE +1

;SET MASTER SCAN ENABLE
;SAVE FOR ERRR MESSAGE

+SET TCR BIT

|FM‘§YEG!P€CYED DATA
1IS THIS TEST IN STAGGERED MODE?

+IF NOT, SKIP STAGGERED SETUP

JME MUST NOW INVERT THE LAST BIT OF THE LINE NUMBER
016774

ASR

tGET THE LAST BIT INTO THE CARRY BIT

33333333838 RRRERRERG00000Cppa
AR RRARRANERAY g g

CZDZA-HO
CZOZAM.P11
4047

4049

MACY11 SOAC1052)

19-JUN-84 15:45

16:22

Ss:
64:

8CS
SEC
B8R
CLC
ROL

74:

SwWAB
&Ij

RS
1PUT LINE NUMBER IN UPPER BYTE
.cgv&mwm:rm.as 1ADD EXPECTED

8s:

8IT
BNE

ORDONE
, BDZCSR
9

INC
BNE
ERROR
MOV

R4
84
4
SDZRBUF ,R4
R4,RS
104
6
SOZTOR

CZDZA DZ11 DEVICE DIAGNOSTICS.

016776
017000
017002
017004
017006

017010
017012
017016
017020
017026
017030
017032
017034
017036
017040
017044
017046
017050

130000
163014

017056
017060
017064
017070
017072
017074

163002

9s:

163012

10¢:

001372
162766

11¢:

001362

12¢:

END O MACRQ

DELAY

017052

SEQ 83

PAGE 83

19-JUN-84

[
BEQ
ERROR
CLR8
SCoP1
INC
8IC
ASLB
8cC
CLR

+IF IT IS SET, GO CLEAR IT
1IF IT IS CLEAR SET IT HERE
1SKIP THE CLEARING
tCLEAR THE CARRY BIT (INVERSION OF LINE PARITY)
1GET THE NEW BIT BACK INTO RS

s=ssssccscssesssssss

SAVLIN
R2,8DZTCR
R2
3¢
LOCX

1oRDONE FAILED TO SET!
1 ACTUAL

1CP ACTUAL VS EXPECTED. DO THEY MATCH?
CLEAN WP
+IF YES,
1oDATA/CONTENTS FAILED TO COMPARE
1CLEAR BREAX BITS
1LOOP?
sINC LINE ¢
tCLEAR TCR BIT
tMAKE SURE LOCX IS CLEAR FOR NEXT TEST

.:&zuTSf..-.--..-...-..-.--.o.-.----.

100000660660000000000000¢ TEST 25 ¢00000600000000000000000000000

s¢ THIS TEST VERIFIES THAT THE DEVICE DOES NOT INTERRUPT
soWMILE THE PROCESSOR STATUS IS SET EXACTLY
1oTO WHAT THE DZ11 PRIORITY IS SET TO.
soDEFALT PRIORITY IS AT S‘§§QO).
;

s:e

017100
017102

000004
012737

000025

001122

017110

012737

017410

001360

017116

104417

017120
017124
017130
017134
017136
017142
017144
017146
017150

013701

017154
017160

030306
001364

MOV

025,4TSTNM

MOV

#TST26 ,NEXT

24:

162670

tLOAD THE NUMBER OF THIS TEST

-- END O MACR) =sssssssesssssssssss

14¢:

001372

106437
113777

TEST 25

DCLASM

END

0 MACR)

MOV

162710

-SSSSESSSESSESSSSSEsESEEEESEES

H 18008860 0880800048008800800800000008000800000080008800000088000002
TST25:
SCOPE

001366
000001
001364

sCLEAR DEVICE AND SET MAINT BIT IF I MODE

sesssssscessssassss

PAR,R1

1PICK UP PARAMETERS

tPOSITION POINTER TO THE NEXT LINE

MOV
BIT
BEQ
MOV

#1,R2
R2,LINE
2¢
R1,80ZLPR

ASLS

INC

8CC
CLR

END 0 MACRQ

MTPS
MOV

tPOINT TU THE START OF THE NEXT TEST

1 SLINEUP -esccsscsssssssssssssssssssssssass
t ~SMRESET-scsnssssssssnsssssssnsnsssss

14
SAVLIN

sPICK UP INIT POINTER
1SHOULD THIS LINE BE SET WP ?
1NO
1SET UP LINE PARAMETERS
1GOT 'EM ALL ?

+IF NO, GO SET UP THE NEXT LINE
tCLEAR LINE # INDICATOR

=ssscssssesssssssss

S00ZPRT
LINE,SDZTCR

1SET CPU STATUS TO DZ11 PRIO,
1ENABLE THE VALID LINES

G7
CZDZA -H0
CZ0ZMAM.P11
4102
4103
4104
4105
4106
4107
4108
4109
4110
4111

4112
4113
4114
4115
4116

4117
4118
4119
4120
4121
4122
4123
4124
4125
4126
4127
4128
4129
4130
4131

4132
4133
4134
4135
4136
4137

4138
4139
4140

4141
4142
4143

&G4k
4145
4146
4147
4148
4149
4150
4151
4152
4153
4154
4155
4156
4157

MACY11l SO0A(1052)
19-JUN-84 15:45

34:

017166

017166
017174
017202
017210
017216

012777
012777
013777
013777
052777

017224
017226
017234
017236
017240
017242

005003
032777
001403
000240
000240
000412
104414
005205
001366

MOV
MOV
MOV
MOV

017256

017264
030306
030306
040040

100000

8IS

74:
162544

012777
012777
013777
013777
052777

017374
017402
030306
030306
000140

162572

113777
005005
032777
001403

001422

162524

000200

162470

162534
162552
162506

e=ssscssscssssssssss

BEQ

INC
BNE

RS
44
:‘

1¢TROY NOT SET!

ERROR
o
BR

10
(SP)+,(SP)e
8¢

1¢TRANSMITTER SHOULD NOT INTERRUPT
1POP FOR FAKE RTI
1CONTINUE TEST

oP
8IC

(SP)+,(SP)e
OTIE,8DZCSR

1POP FOR FAKE RTI
l‘f&g”fifm INTERRUPT ENABLE

MOV
MOV
MOV
MOV

#114,80Z71IV
124 ,80ZRIV
OZPRT,SDZRIS
OZPRT,8DZTIS

ERROR

8s¢:

OTIE!MSENAB,SDZCSR ;ENABLE THE DEVICE

DELAY

64:

#TROY,S8DZCSR

'cf.”

.SM.QZM

8IT

SROONE
, BDZCSR

-SSSSSsesSsssssssEsEREESSRERES

1SET UP THE TRANSMITTER INTERRUPT VECTOR
1SET UP THE RECEIVER INTERRUPT VECTOR
1SET THE INTERRUPT VECTOR STATUS
$SET _TRANSMITTER INTERRUPT PRIORITY

13¢

INC
BNE

RS
L
4
13¢
10
(SP)+,(SP)e
134
12

DELAY

BR
ERROR
oP
BR
ERROR

;PUT ANY RANDOM CHARACTER IN TRANSMITTER BUFFER

104

B8R

ERROR

12¢:
-

sssesssssssssssssss

NOP
NOP

114:

s oRECEIVER SHOULD NOT INTERRUPT

m.‘l’smflm!'m.flzcg 1ENABLE THE DEVICE

BEQ

10¢:

1SET UP THE TRANSMITTER INTERRUPT VECTOR
1SET UP_ THE RECEIVER INTERRUPT VECTOR
1SET THE INTERRUPT VECTOR STATUS
1SET_TRANSMITTER INTERRUPT PRIORITY

flm

104003
000405

~$INTSET -vesccccsssccsssssscscnssssnss

CLR
8IY

S¢:

064 ,8DZT1IV
074 ,80ZRIV
DZPRT,GDZRIS
OZPRT,SDZTIS

END O MACRQ

NOP
NOP

104010
022626
000402
104012
022626
042777

SEQ 84

19-JUN-84 16:22 PAGE 84
CZDZA DZ11 DEVICE DIAGNOSTICS.

(SP)e+,(SP)e

DEVICE.CLR

1oNO RX DONE! (NOT SET)

sCONTINUVE TEST
1oTRANSMITTER SHOULD NOT INTERRUPT
1POP FOR FAKE RTI
sCONT TEST
1 oRECEIVER SHOULD NOT INTERRUPT

1POP FOR FAKE RTI

+ISSUE DEVICE CLEAR (RESET)

END

O MACR)

sssssssssssssssssss

END

O MACRQ)

==sssssss. sssssssss

}

-LVLTST-esccssssssansscsansnssnacsnss

{

~$XZ-esesssscssssssssssssssnncnsss

196000806000006000400808¢ TEST 26 0004400000000008000000008000080

H7
CZDZA -0
| CZ0ZAM.P11

MACY11l SOAC1052)
19-JUN-84 15:45

19-JUN-84 16:22 PAGE 35
CZDZA DZ11 DEVICE DIAGNOSTICS.

1o THIS TEST VERIFIES THAT THE DEVICE DOES INTERRUPT

4158
4159
4160
4161
4162

1oWMILE THE PROCESSOR STATUS IS SET TC EXACTLY
1« LEVEL LOWER THMAN THE DZ11. DZ11 PRIORITY

1oDEFAULT TO LEVEL S MINUS ONE LEVEL IS LEVEL 4.
3

1:e

4163

4164

4165

4166
4167
4168
4169

4170
4171
4172
4173
4174
4175
4176
4177
4178
417
4180

4181
4182
4183
41548
4185
4186
4187
4188
4189
4190
4191

4192
4193
4194
4195
4196
4197
4198
4199

-.u..........................-..-

TEST 26

1100000000000 0000000000000000000000000000000080000800000088000800000

017410

001122

017412

017736

017420

TST26:
P

001360

SCOPE

mvgv

026, $TSTNM

1LOAD THE NUMBER OF TMIS TEST

MOV

OTST27 NEXT

tPOINT TO THE START OF THE NEXT TEST

sssssssssssssssssss

1SLINEUP -essscssssssssssnsssssssssssusassss
i

017426

017430
017434
017440
017444
017446
017452
017454
017456
017460

001366

017464
017470
017476

030310
001364

017476
017504
017512
017520
017526

017570
017606
030306

14:

001364

162400

24:

001372

OCLASH

END O MACRQ

tCLEAR DEVICE AND SET MAINT BIT IF I MODE

=scscssssssssssssse

MOV
MOV
8IY
BEQ
MOV
INC
ASLB
8CC
CLR

PAR,R1
o1,.R2
R2,LINE
24
R1,8DZLPR
R1
R2
14
SAVLIN

IPICK UP PARAMETERS
sPICK UP INIT POINTER
sSHOULD THIS LINE BE SET WP ?
1NO
1SET UP LINE PARAMETERS
sPOSITION POINTER TO THE NEXT LINE
1GOT 'EM ALL ?
+JF NO, GO SET UP THE NEXT LINE
1CLEAR LINE ¢ INDICATOR

MTPS
MO'/8

SNLESS]
LINE,SDZTCR

tMAKE CPU ONE LEVEL LOMER THAN DZ11
1ENABLE THE VALID LINES

END O MACR) e=sssssssssssssssse

MOV
MOV

MOV

017534

as:

100000

MOV
8IS

END

CLR
BIT
BEQ
NOP

flm

S¢:

001365

000411

042777
106437

030310

162242

64:
74:

104012
022626
042777
012777

DELAY

INC
BNE

mfl

104003

162222
017720

162250

8¢:

064 ,802T1IV
#74,80ZRIV

DZPRT, 8DZRIS

~0IMTSET-sscsccsssssssssssnssssssssss

1SET UP THE TRANSMITTER INTERRUPT VECTOR
1SET UP THE RECEIVER INTERRUPT VECTOR

1SET THE INTERRUPT VECTOR STATUS

1SET TRANSMITTER INTERRUPT PRIORITY
DZPRT,8DZTIS
OTIE !MSENAB ,BDZCSR ;ENABLE THE DEVICE

O MACR) sssssssssssssssssss

NOP

104414

~SMRESETV-sscscssscsssssssssssssssssss

gIfiDY .8DZCSR

;‘

RS
&%

1*TRANSMITTER FAILED TO INTERRUPT

1¢TROY NOT SET!

BR
ERROR
c
8IC

#TIE,SDZCSR
SNLESS]1
8¢
12
(SP)+,(SP)+
OTIE,S0ZCSR

tREMOVE THE INTERRUPT FROM THE STACK
tDON’'T LET ANY MORE INTERRUPTS OCCUR
tMAKE CPU ONE LEVEL LOWER THAN DZ11
|RETW TO THE NORMAL FLOW
1oRECEIVER SHOULD NOT INTERRUPT
1POP FOR FAKE RTI
tRESET TRANSMITTER INTERRUPT ENABLE

MOV

#114,8027IV

1SET UP THE TRANSMITTER INTERRUPT VECTOR

POP2SP
8IC

~$INTSETV-ssescssssssssssssssnncnsssss

17
MACY11l S0AC1052)
19-JUN-84 15:45

MOV
MOV
MOV

4214 017626 012777 017726 162236
4215 017634 013777 030306 162232
4216 017642 013777 030306 162230

4217
‘21.

017650 052777 000140

162164

4219 017656 113777 001422
4220 017664 005005

162202

4221
4222

017666
017674

4223
4224
4225
4226

017676
017700
017702
017704

4228

017710

4227

4229

017706

017712

4230
42351
4232

017714
017716
017720

4234

017724

4233

4235
4236

4237

4238

4239
4240

017722

032777
001404

162146

94:

000240
000240
104011

10¢:

11¢:

022626

000403

017734

104413

12¢:

162106

13¢:
i
i

MOVE
CLR

BIT
BEQ

ORIE !MSENAB ,BDZCSR ;ENABLE THE DEVICE

700, 8DZTOR
RS

SDZCSR

tREMOVE THE INTERRUPT FROM THE STACK
IW T ALLOW ANY MORE INTERRUPTS

DEVICE.CLR

017736

017740

000004

012737

000027

001122

020370

001360

4257

017746

012737

4260

017754

104417

4262
4263
4264
4265
4266
4267
4268

017756
017762
017766
017772
017774
020000
020002

013701
012702
030237
001402
010177
005201
106302

4261

4269

s ISSUE DEVICE CLEAR (RESET)
3

«$X]-ossrssssssssssssssssscsssasss

-8X7-vccssssscsscsssscssscnssssssas

106000860008080000000000¢ TEST 27 e¢e0ecesss000ssesssccssssssssss
1oTHIS TEST VERIFIES TMAT TME RECEIVER WILL
1o INTERRUPT BEFORE THE TRANSMITTER EVEN
1oTHOUGH THE TRANSMITTER WAS ENABLED
ufflS?. SET PS TO LEVEL 7,
1oGET RDONE AND TROY TO SET;
1oSET TX IE AND RX IE;
|M’$~MCT"YOWT'I‘SY

4251

4258
4259

1POP FOR FAKE RTI
;CONT TEST

-- END O MACRQ sesssssssssssssssss
-- END O MACR) =ssssssesssssssssss

4043
4044
4245
446
4247
4248
4249
4250

4256

1 *RECEIVER FAILED TO INTERRUPT

soND RX DOME! (NOT SET)
1CONTINUE TEST
1oTRANSMITTER SHOULD NOT INTERRUPT

13¢

4241

4255

1PUT ANY RANDGM CHARACTER IN TRANSMITTER BUFFER

ORDONE , BDZCSR
10¢

(SP)e,(SP).
13¢

4242

4252
4253
4254

1SET UP THE RECEIVER INTERRUPT VECTOR
1SET THE INTERRUPT VECTOR STATUS
1SET TRANSMITTER INTERRUPT PRIORITY

mm' SscscesSSSSSSRGaEEES

104004
000406
104010
022626
005077

EPD.(IJS

0124 ,80ZRIV
DZPRT,SDZRIS
OZPRT,BDZTIS

000413
104414
005205
001365

017726
017730

017734

000200

SEQ 86

19-JUN-84 16:22 PAGE 86
CZDZA DZ11 DEVICE DIAGNOSTICS.

&g’ig’gfig’gfi

CZDZA-HO
CZDZAN.P11

020004

103370

001366
000001
001364

162052

s:e TEST 27
1 19006606000060060000000000000000000000000000000800000000000000000
TST27:
SCOPE
i

027, 4TSTNM

MOV

OTST30,NEXT

DCLASM

-- END

14:

MOV

1LOAD THE NUMBER OF TMIS TESTY

-- END O MACR) =ssssssscssssssssses

tPOINT TO THE START OF TME NEXT TEST

1SLINEUP -eccccccscscscssscssnsssscssscsscsss
it ~-0MRESET-scccccccccccsccssssncssssssnss

tCLEAR DEVICE AND SET MAINT BIT IF I MODE

O MACRQ eesccsscsssssssssas

MOV
MOV
8I7
BEQ
MOV
INC
ASLS
8CcC

PAR,R1
o ,.R2
R2,LINE
24
R1,8DZLPR
R1
R2
14

PICK UP PARAMETERS
PICK UP INIT POINTEF
1SHOULD THIS LINE BE SET WP ?
1NO
1SET UP LINE PARAMETERS
1POSITION PCINTER TO THE NEXT LINE
1GOT 'EM ALL ?
1IF NO, GO SET UP THE NEXT LINE

J7
CZDZA-HO
CZDZAM.P11
4270
4271
4272

4273

§3835033500a00000R08

4274
4275
4276
277
4278
427

MACY11l SOAC1052)
19-ANi-84 15:45

020006

075037

001372

020012

012777
013777
012777
013777
052777
012702
030237
001004
005237
106302
000771
106427
000240
000240

020242
030306
S20332

020034

110277

005777
100001

104017
105777

100001
104020
005005
005004
005777
100404
104414
C05204
001372

104003
105077

005004
032777
001004
104414
005204
001371
104004
005777
100401

03033<
000040
000001
001364

161772
3s:

001372
4%:

000340

106427

CLR

SAVLIN

tCLEAR LINE @ INDICATOR

MOV
MOV
MOV
MOV
8IS
MOV

084 ,8DZRIV
OZPRT,S8DZRIS
0124,80271IV
OZPRT,8DZTIS
AB
, 8DZCSR
OMSEN
01,.R2

1SETUP INTERRUPT STUFF

BNE
INC
ASLB
BR

&4
SAVLIN
R2
34

-- END O MACRQ s=esssccsscssssssasse

1euse

8IT

MTPS
NOP
NOP

sRECEIVER DONE BIT SHOULD NOT BE SET

TST

S8DZCSR

sWAIT FOR TRODY
18R IF READY
$STALL TIME

DELAY

:
1004

161656

64:

161640

000100

161626
161620

000137

020336

017704

161600

“RBUF

. o4

RS
R4

100¢

R4
99¢

CLR8
CLR

SDZTOR
4

ERROR

BIT
BNE

TST

S8DZCSR

8MI

1 TROY FAILED TO SET

E
, BDZCSR
ORDON

R4
6

ERROR

INC
BNE

1sRDONE FAILED TO SET!

nggns OONE BIT = 1 ?

. o4

TRANS DONE FAILED TO SET
3oNO
DONE BIT =1
RECEIVER
AND
TRANSMITTER
BOTH
THAT
sNOM
FLY
FUR
THE
WATCH
AND
ENABLES
T
INTERRUP
usgt

ERROR

8I
8IS
MTPS

#TIE,SDZCSR
ORIE,SOZCSR
0

NOP
NOP
ERROR
ERROR

000240
000240
104007
104011

R2,8DZTCR

INC
BNE

DELAY

T¢:

#PR7

BPL

8MI

161712

1LINE POINTER
tVALID LINE ?

ERROR

CLR
CLR

161704

@DZCSR

BPL
Ss:

TST8

TST

161720

R2,LINE

1SET TCR BIT
sVALID DATA?
:IT BETTER NOT BE SET
sDATA VALID SHOULD NOT BE SET
tRECEIVER DONE ?

MOVE

161750
161734

104003
0352777
052777

SEQ 87

19-JUN-84 16:22 PAGE 87
CZDZA DZ11 DEVICE DIAGNOSTICS.

1o TRANSMITTER FAILED TO INTERRUPT

7
11

134

1oRECEIVER FAILED TO INTERRUPT
1GET OUT

1CHECK BR LEVEL

:SSCEIVER INTERRUPT ROUTINE
SOZRBUF ,R4

s ACTUAL

IK7
CZDZA-HO
CZDZAM.P11
4326
4327

020246
020250

4328
4329

020252

4330
4331

020256
020262

4332

MACY11 SOAC1052)
19-JUN-84 15:45
010403
000303
042703

177770

105737
001406

001371

4335
4336
4337

4338
4339
4340
4341

4342
4343
4344
4345

4346
4347
4348

4349
4350

4351
4352
4353
4354
4355
4356
4357
4358
4359

:gg

020264
020266
020270
020272
020274
020276

020300
020304

020306
020310

006203
103402
000261

000401
000241
006103
020337
001401

020330

104015
042704
120504
001401
104005
040277
022626
000402

020332

104011

020334

022626

020314
020316
020320

020322
020326

020336
020344
020352
020356
020364

042777
013777
005077
013777
005077

9¢:
10%:
1

001372

11%:

12¢:

040100
002074
161516
002100
161510

ASR
8Cs
SEC
B8R
CcLC
ROL

R3
94
R3

1SKIP THE CLEARING
tCLEAR THE CARRY BIT (MRSIU‘ OF LINE PARITY)
1GET THE NEW BIT BACK INTO
R

P
BEQ

R3,SAVLIN
. o4

1IS THTS A VALID LINE
1 YES

161476
161520

104

15
0tC<377> R4
RS,Re
. o4
S
R2,8DZTCR

13¢:

161512

1¢'ROONE SHOULD NOT SET.

s:¢
020370

020372

000004

1GET THE LAST BIT INTO THE CARRY BIT
+IF IT IS SET, GO CLEAR IV
+IF IT IS CLEAR SET IT HERE

soINVALIL LINE
1STRIP JUNX

000030

001122

020556

001360

012737

4377

020406

104417

4379
4380

020410
020414

013701
012702

020420

030237

TEST 30

“$Xl-sesssssssssssssssssssssssssas

1 250 80830 0 0080842802400002000800040000000R0RRARRRLARRRGRRRRABARD

012737

020400

4381

S SSNSEE SN EEEES PSS SSSSSsESSENSERESSS

106608080888408008000408¢ TEST 30 ¢0202504088048280808008080888002
1¢TEST TO VERIFY THAT 'RDONE DOES NOT SET
soIF THE SCANNER IS DISABLED.
soTURN ON SCANNER, WAIT FOR TROY,
1oTURN OFF SCANNER, TRANSMIT A CHARACTER

4374

4378

1IS THIS TEST IN STAGGERED MODE?
+IF NOT, SKIP STAGGERED SETUP

8
1DATA COMPARE ?
BEQ
1 YES
ERROR
1#DATA DOES NOT COMPARE
8IC
1CLEAR TCR BIT
POP2SP
tREMOVE HE INTERRUPT VECYG FROM THE STACK
B8R
13¢
tGO GET OUT OF INTERRUPT MODE
s TRANSMITTER INTERRUPT SVC ROUTINE
ERROR
11
s+THE RECEIVER INTERRUPT FAILED
170 OVERRIDE THE TRANSMITTER
POP2SP
tREMOVE THE INTERRUPT VECTOR FROM THE STACK
8IC
#TIE!RIE,SDZCSR lCLEm INTERRUPT ENABLES
MOV
DZRIS,SDZRIV
tRESTORE TRAPCATCHER
CLR
SOZRIS
MOV
DZTIS,8DZ7IV
CLR
8DZTIS
-

161530

4369

4375
4376

MODE +1
114

ERROR
8IC

177400

4368

:g;g

TSTB
BEQ

;

-- END O MACRQ e=sssssssssnsssssses

4367
4371

ISTRIP AN

tME MUST NOW INVERT THE LAST BIT OF THE LINE NUMBER

4362
4363
4504
4365
4566

4370

BIC

R4 ,R3
R3
#tC<7>,R3

MOV
SWAB

4333
4334

SEQ 88

19-AUN-84 16:22 PAGE 88
CZDZA DZ11 DEVICE DIAGNOSTICS.

TST30:
§

001364

MACRQ)

MOV

001366
000001

SCOPE

mmv

1¢:

#30,4TSTNM

1LOAD THE NUMBER OF THIS TEST

#TST31,NEXT

tPOINT TO THE START OF THE NEXT TEST

=ssssssssssssssssss

DCLASM

'.Lm.-.-..-..---.-...-.-.-.-----.o...~$MRESET-sssssssassnssssssssasssssss

1CLEAR DEVICE AND SET MAINT BIT IF I MODE

END O MACR) s=sssscsssssessssess

MOV
MOV

BIT

PAR,R1
#1,R2

R2,LINE

1PICK UP PARAMETERS
1PICK UP INIT POINTER

1SHOULD THIS LINE BE SET WP ?
-

L7
CZDZA-HO

CZoZAM.P11

MACY11l SOAC1052)
19-JUN-84 15:45
001402

161420

24:

001372

000040

000001
001364

161370

34:

001372

161356

as:

161334

S5¢:

000040
161334

161314

64:
74:

000200

SEQ 89

19-JUN-84 16:22 PAGE 89
CZDZA DZ11 DEVICE DIAGNOSTICS.

161272

8¢:

24
R1,80ZLPR

R1
R2
14
SAVLIN

1NO
1SET UP LINE PFIAMETERS
+POSITION POINIER TO THE NEXT LINE
1GOT ‘EM ALL ?
+IF NO, GO SET UP THE NEXT LINE
tCLEAR LINE # INDICATOR

81S
MOV
8IT
BNE
INC

QuSL.

OMSENAB ,BDZCSR
R2
n,
LINE
R2,
4
SAVLIN
g

; TURN ON SCANNER
+INIT LINE COUNTER
sFIND A VALID LINE
+IF WE FOUND ONE GO TO TEST
+ IF _NOT
1KEEP LOOKING

MOVe

R2,

;SET TCR BIT

BEQ
MOV
INC
ASLS
ocC
CLR

CLR
TST
BMI
DELAY
INC
BNE
ERROR
8I1C
CLR8
CLR

DELAY

INC
BNE
8IY
BEQ
ERROR
ADVANCE

RS
SDZCSR
64

@DZTCR

+IS TROY SET
sCON'T TESTING IF IT IS
+IF IT NOT MAIT A WMILE

RS
S¢
3
tME WAITED LONG ENOUGH-ERROR
OMSENAB, GDZCSR ;TURN OFF
SDZTOR
1 TRANSMIT A CHARACTER
1CLEAR COUNTER
RS
RS
74
ORDONE, SDZCSR
84
20

sWALIT SUFFICIENT TIME FOR

sROONE TO SET

;RDONE SET
+IT SHOULDN'T BE -CONTINUE
+IF IT IS THERE'S AN ERROR
-

-GS0 SSSSENSSSSSSEESEESSSESSESS

106000060000000000000000¢ TEST 31 seeesssscssnssssssssssscssssss
1oTHIS TEST VERIFIES OVERRUN AND SILO ALARM

1oONE LINE AT A TIME

- BASED UPON VALID LINES

soAS EACH OF THE FIRST 16 CHARS ARE SENT; SILO ALARM IS
BE CLEARED. ON THE 16TH CHAR THE PROGRAM THEN
TO STED
soTE
SILO ALARM TO SET. THEN THE ENTIRE
1oEXPECTS
+oSILO IS FILLED AND AN OVERRUN IS EXPECTED ON THE 65TH
1oCHAR PULLED OUT OUT THE SILO.
soUSING SWITCH NINE FOR THIS TEST SENDS 20. CHARACTERS
1oON DZ LINE PREVIOUSLY SELECTED CONTINUOUSLY WHILE SWO9-1.
soUSED TO SCOPE SILO ALARM :\inSES. ETC.
;-

1:e

020556

020574

012737

000031

001122

012737
012737

021304
021210

001360
001362

104417

-SSPSESeSSESSSSsSsEESESESESEES

TEST 31

X 0800000880006 80080800000800008800680880888087088800888008008484008000002
TST3S1:
SCOPE
i

MOV

031,4TSTNM

tLOAD THE NUMBER OF THIS TEST

MOV

#TST32,NEXT

tPOINT TO THE START OF THE NEXT TEST

END

0 MACRQ

MOV

oCLASM

ssssssssssssssssass

€184 ,L0CK

1SET FOR LOOP

{SLINEUP -scscscscsassssssssscssssssssssnans
~-SMRESET -sccscsscssssssssssnssscasass
it

tCLEAR DEVICE AND SET MAINT BIT IF I MODE

END O MACR) =ssssssssscssssssss

M7
CZDZA-HO

CZ0ZA1.PIL
4438
44139
4440
444
4442

4443

020604
020610
020614

MACY11l SOA(1052)
19-JUN-84 15:45
013701

001366
000001

14:

001364
161224

2%:

LL84

4447

818
4449
4250
4451
4452

44353
4454
445
4456
4457
44548

4459

Akt
|

&4 70
4471
ALz
4473
4474
4475
&4 0%
4477
4478
a8 79

001372

001462

001364

161142
161122

001422
001422
000017

3¢:

161104

161110

Ss:
64:

7¢:

161044

aniy

161026

440
4491
4492
4493

161152

o21172
001372

100000

000102

MOV
MOV

8IT

BEQ
MOV

INC
ASLB
8cC
CLR

: -- END O

001422

000001
010040

SEQ 90

19-JUN-84 16:22
CZDZA DZ11 DEVICE DIAGNOSTICS.

8¢:
9¢:

10¢:

MOV
CLR
ow
BNE
CLR
MOV
8IS
8IT
B
JP
MOV
ASL
MOV

TST8

8PL
ERROR
CLR
CLR
BIT
fdE
DELAY
INCB
BE
£HR0OR
MOV8

INC
ow
BMIS
8IT
B8rQ
ERROR
Br
CLR
8IT
BNE
DELAY
INC
BMNE
ERHIR

INC
c

BNE
CLR

PAR,R1

0 ,R2
R2,LINE
44

R1,8DZLPR
R1

R2
14

SAVLIN
#TD0, RO

(RO)+
R0
#510P.

\PICK UP PARAMETERS

JPICK UP INIT POINTER
1SHOULD THIS LINE BE SET UP ?
1NO
1SET UP LINE PARAMETERS
1POSITION POINTER TO THE NEXT LINE
1GOT 'EM AL ?
+IF NO, GO SET UP THE NEXT LINE
sCLEAR LINE @ INDICATOR

sPOINT TO THE DATA AREA
tCLEAR A DATA WORD
.&mm ?

ol ,.R2
OMSEN
! SILOEN,
AB

R2,.LINE
.*6
Frd)

SAVLIN,RO

R2,.8DZTCR
@DZCSR
. o8

R3
Ré
OTROY ,SDZCSR

sSTART SCANNER € SET SILO ENABLE

s\%m LINE?

tMAKE POMER OF TWO
BIT
ET
TCR
+S
1 ?
DONE = C
+RE
+REC DONE SHOWLD NOT = 1
+SET CHARACTER COUNT

R4
g‘

1*TROY FAILED TO SET

TOO(RO) ,8DZTDR
TDO(RO)

t1LOAD A CHARACTER

OSfLM. .8DZCSR

1SILO ALARM = 0 ?
s YES

:3.015 ¥

13
10¢

1SET UP NEXT CHARACTER
116 CHARACTERS ?

1oSILO ALARM SHOULD NOT = 1
tUNTIL 16. DATA CHARACTERS

#SILOAL ,8DZCSR
10¢

R4
S8

#66. ,R3
S¢
R4

1oSILO ALARM FAILED TO SET!
1SILO ALARM SHOULD =1 AFTER 16.
1DATA CHARACTERS
1INC CHAR COUNT
.:omsco SENDING CHARACTERS ?
’

N7
CZDZA-H0
CZDZA1.P11

MACY11 SOA(1052)
19-JUN-84 15:45

SEQ 91

19-JUN-84 16:22 PAGE 91
CZDZA DZ11 DEVICE DIAGNOSTICS.
DELAY
INCB

104414

021040
021042
021044

105204
001375

021046

013705

001372

021052
021056

001406

105737

001371

. -4
BNE
tNOM LETS READ THE SILO
MOV

SAVLIN,RS

tMAKE EXPECTED LINE ¢

TST8

MODE
1
13¢

+IS THIS TEST IN STAGGERED MODE?
+IF NOT, SKIP STAGGERED SETWP

8EQ

-$STAG-+osssssnsssssssssssssssssssssssssss

+ME MUST NOW INVERT THE LAST BIT OF THE LINE NUMBER
021060

11¢:
124:
13¢:

100000
160740

144

oM
8Cs
SEC
BR
CLC

RS
11¢

ROL

SLAB
8IS
MOV

8 qQ
160720

000077

15¢:

8IT

164:

INC

000101

12¢

®OVALID,RS
, R4
SDZRBUF

R4,RS

154

OSILOAL ,8DZCSR

16¢
16
RS
RS, 063.
144
RS
SOVRRUN
RS, #65.
144

, R4
SDZRBUF

160670

R4
17¢

160666

17s:

001372

22%:

B8IC
SCOP1
8Cs
JP
ADVANCE

020670

17
R2,80ZTCR

SAVLIN
R2
. *6
34

+GET THE LAST BIT INTO THE CARRY BIT
+IF IT IS SET, GO CLEAR IV
+IF IT IS CLEAR SET IT HERE
1SKIP THE CLEARING
tCLEAR THE CARRY BIT (INVERSION OF LINE PARITY)
lfiT THE NEW BIT BACK INTO RS
1PUT IN UPPER BYTF
sADD DATA VALID
sACTUAL
z%}lfl vS. EXPECTED
'

;1*DATA/CONTENTS DID NOT COMPARE
5%0 ALARM= 0 ?

.mlonc OZRBUF DID NOT CLEAR SILO ALARM
1UP CHARACTER
sLAST SILO CHAR ?7....64TH CHAR

CHAR
sADD 1 MORE FOR THE CLOBBERED
+ADD OVERRUN TO EXPECTED
;LAST CHARACTER ?

1FOR GOOD MEASURE
sDATA VALID SHOUWLD = 0
i YES
sDATA VALID SMOWD = 0
;CLR TCR BIT
1LOOP?
;1INC EXPECTED LINE
|5XT LINE
'

1 YES

1GO TO NEXT TEST

s TIGHT SCOPE LOOP FOR THIS TEST. SENDS 20. CHARACTERS
sON DZ LINE PREVIOUSLY SELECTED CONTINUOUSLY WHILE SWO9-1.
;USED TO SCOPE SILO ALARM PULSES, ETC.
021210
021216

021232
021236
021244

052777
012777
012737

052777
106427

010040

021274

160620

160624
160652

001216

160576

184:

BIS
MOV

OMSENAB ! SILOEN,S8DZCSR ; SETUP DEVICE
9204 ,80ZT1V
1SETUP TRANSMITTER VECTOR

8IS
BIS

R2,8DZTCR

MOV

MTPS

920.,4THPO

:;IE.”ZCSR

1 TEMPORARY COUNT OF CHARACTER BURST

1ENABLE LINE
1ENABLE INTERRUPTS
1LOMER PRIORITY

B8
| CZDZA-HO

CZDZAM.P11

MACY11 SOA(1052)

19-UN-84 15:45

000001

005337

001374

19-JUN-84

19¢:

001216

000002

021164
000232

SEQ 92

PAGE 92

CZDZA DZ11 DEVICE DIAGNOSTICS.

160564

WAIT
DEC
B

g‘?‘": 050040 1603554
000137
112777

16:22

20¢:

sTMPO

tALLOM INTERRUPTS

IREDUCE COUNT. ALL CHARACTERS SENT?

eI1C .

194

hfl' NO,

OSILOEN!MSENAS! T Olé’ l‘:t SILO COUNTER, CLEAR STROBE

Nad
HOV8

17
0232,80ZTOR

m. !m T0 WHMERE YOU LEFT OFF
.soo A CHARACTER

RTI

WAIT FOR MORE

&I..% MORE CHARACTERS TO COME
'

-00 0000000000000 0EsEsEsssERESS

10000028000060000000000000 TEST 32 eecececcccccsccscscscecsccsces

1oTHIS TEST THMAT “SILO ENABLE" WILL INMIBIT
1oRECEIVER INTERRUPTS AND THAT ON THE
1016TH CHAR THAT ~SILO ALARM" WILL CAUSE AN
1o INTERRUPT WITH "RIE” SET.

1oTHIS IIILL 00 ALL mcm‘tzms ONE AT A TIME.
’

1:e

-908eNseessecEsEssEsEEsRRSEEST

TEST 32

1060 0 0EN00C0E00E0R0000R0G0CH00000H00C00NG08000000600OBARDERGOBEGO

0000G#
012737

000032

001122

012737
012737

021666
021410

001360
001362

TST32: SCOPE
mlgv
g

032, 4TSTNM

LOAD THE MUMBER OF TMIS TEST

OTSTIS, NEXT
034,L00x

sPOINT TO THE START OF THE MNEXT TEST
1SET FOR LOOP

MACR)

MOV
MOV

ecccccsesssscsssass

.‘Lm-..o...o.oo......o.--...-.---...-o

~-0MRESET -2ccccsscsssceccsssscnssasses

104417
013701
012702
030237
001402
010177

005201
106302
103370
003037
012700
005020
022700
001374
005000
012702
012777
012777
0352777

030237
001002
000137
003777
100773
106427
013700

006300
010277

001366
000001
001364

1¢:

160476

2¢:

001372

001422

001462
000001
021630
000340
010140
001364
021646
160376

000000
001372
160366

160454
160450
160410

3¢:

OCLASH

END O MACR)

MOV
MV
8Iv
B8EQ
MOV

INC
ASLS
ecC
CLR

lm DEVICE AND SET MAINT BIT IF I MODE

e=cscsccssccssssssss

PAR,R1
1.R2
R2,LINE
24
R1,802LPR

R1
R2
14
SAVLIN

END O MACRQ

1PICK UP PARAMETERS
PTCX 1@ INIT POINTER
1SHOLD THIS LINE BE SET WP ?
1NO
1SET UP LINE PARAMETERS

iPOSITION POINTER TO THE NEXT LINE
1GOT "EM ALL ?
1IF NO, GO SET UP THE NEXT LINE
tCLEAR LINE @ INDICATOR

s=cccscsscscscessesse

MOV
CLR
o
ONE
CLR
MoV
MoV
MOV
8IS

0700 ,RO
sPOINT TO THE DATA AREA
(RO).
1CLEAR A DATA WORD
#STOP,RO
1F INISHED ?
.
. -6
1NO
RO
1CLEAR OFFSET
0 ,.R2
iLINE POINTER
0114 ,80ZRIV
1SET FOR UNEXPECTED INTER.
#PR7,8DZRIS
SET PRIO.
OMSENAR ! STLOEN!RIE , BDZCSR

8IY
B
P
1S7
oMI
MTPS
MOV

R2,LINE
. +6
224
SOZRBUF
. -4
0
SAVLIN,RO

ASL
MOV

RO
R2,80ZTCR

1START SCANNER € SET SILO ENABLE

sVALID LINE?
1 YES
1 TRY NEXT LINE
1EMPTY THE SILO
1OR IF DATA VALID IS SET!
1SET PROCESSOR PRIORITY TO O
IMAKE OFFSET

I1MAKE POMER OF TWO
1SET TCR BIT

C8
CZDZA -0
CZDZM4.P11
4606

4607

BH08
4609
4610
4611
4612

4613
4c14
4613
4616
4617
4618
4619

1 3 P

&6}

021470
021472
021300
021502

MACY11l S0A(1052)

19-JUN-84 15:45
003004
032777
001004
104414
005204
001371
104003
116077
003260
022760
001406

100000

19-JUN-84

16:22

Ss:
64:

[« W\
fI
el

CZDZA DZ11 DEVICE DIAGMNOSTICS.

160342

DELAY

INC
001422
001422
000017

160346

74:

001422

B
ERROR

mOve
INC
?::

Re
OTROY ,8DZCSR
7
R4

&4
3

) ,8DZTOR
TOO(RO
TOO(RO)
:IS.TOO(RO)

soTROY FAILED TO SET

1LOAD A OHARACTER
1SET UP NEXT CHARACTER
115 OHARS YET?
1SILO ALARM = 0 ?

032777

001401

104013

000750
012777
032777
001774
016077
OUS004
032777
001005
104414
005204
001371
104014
000410

SEQ 93

PAGE 93

021636
100000

160314
160256

001422

160272
160236

8%:

94:

EretOR

aR
MoV
g:

S¢
0124 ,8DZR1IV
OmY.OlC”

'CY: '

TW(N).QITN

817
ENE

OSILM @DZCSR
104

INC
BNE

a4
G4

17s

DELAY

ERROR

10¢:

116:

160212

12¢:
17¢;

001372

224:

021410
001362

NP
N
ERROR
B

1SET NEW VECTOR
JREADY FOR 16T+ CHAR
tLOAD THE 16TH CHAR,

soSILO ALARM FAILED 70O SET!
1SILO ALARM SHOULD =1 AFTER 16.
1DATA CHARACTERS
1STALL

17¢

(w,

(SP)+,(SP).

ERROR

' YES

1oSILO ALARM SMOULD NOT = 1
tUNTIL 16. DATA CHARACTERS

sSILO ALARM NOT INTERRUPTING.
;sCONTINUE TEST.

.FME RTI

sRX SMOULD NOT INTERRUPT
s CONTINUE
1GOOD INTERRUPT TO HERE.
aCLI TCR BIT

o
8IC
SCOP1

(SP)e+,(SP).
R2,.8DZTCR

ASLS

ISXT LINE

JP
CLR

3¢
LOCK

1 YES

INC

SAVLIN

1LOOP?

|DC EXPECTED LINE
’

tCLEAR TIGMT LOOP FOR NEXT TEST

D8
CZDZA -H0

CZ0ZAM.P11

MACY11l S0A(1052)

19-JUN-84 15:45

4650
4651

..xz....I..............I.I.I‘.....

§EEERSSTESEIRASERERREERRREREES :

1000000600000000000000000 TEST 33 ¢eescescscesscsscsescscccscscee
1oTHIS TEST RUNS ALL LINES FULL BORE

1#8ASED UPON QUALIFIED LINES

4553

1o, . THIS IS AN INTERRUPT TEST ON THE RECEIVER AND
s:e

TEST 33

«00000000PONNORNPeSSeSSREESRESS

110000000000000600000000800000000000000000000000000800000000000007

000033

001122

022474

001360

TST33:

1LOAD THE MUMBER OF THIS TEST

MoV

OTST34 NEXT

U’OM TO THE START OF THE NEXT TEST

OCLASH

END O MACR)

.m DEVICE AND SET MAINT BIT IF I MODE

160114

:{.OZLN

INITL:

022214

022116

000100

022114
007214

022114

022444

CLR
(w,
BNE
MOV
MOV
MOV
MOV
8IS

160104
160100

160074
160070

8IS

160016
160010
160016

8IS

SNAP:

67¢:
684 :

3s:

;SET UP REC INTR VELTOR

OTXSVC,8DZTIV

;SET UP TRANS INTR VECTOR

#PR7, 8OZRIS

#PR7,80ZTIS
ORIE . DZCSR
OTIE,S8DZCSR

OMSENAB ,BDZCSR

666

DLYCNT,(PC).

INC
BNE

684
e|
RXTCR
3
ouT
664
674

OJP

FINI

ERROR
ERROR

1SET UP LINE PARAM REGISTER

ORXSVC,8DZRIV

INITL

CLR

1GOT 'EM ALL ?
1NO
1CLEAR TRANS DATA POINTER £ REC POINTERS

LINE, OZYCR
.fl.ESSl

MOV
0
DEC
BNE

1SET IMAGE OF TCR BITS
iPICK UP PARAMETER
1 1PICK P INXIT POINTER
1'900&0 THIS LINE BE SET W

RO
INIT
#TD0,RO
(RO).
#STOP RO

MOVe
MTPS

TST8
BNE

022472

022372

MOV
INC
ASLB
8CC
MOV

SEV-eccscscsssascscsssssssnsssss

essccscscsssccssases

001364

001462

022110
022114

033,4TSTNM

LINE ,RXTCR
PAR,R1
1,R0
R.LM

022472

001422

022102

SCOPE

MOV

MOV
RSTART: MOV
MOV
INIT:
g;

001364
001366

001364
030310

4705

SEQ 94

16:22 PAGE 94
19-JUN-84
CZDZA DZ11 DEVICE DIAGNOSTICS.

7
11

1 TRANS INTR SVC ROUTINE

sFINISHED ?

sNO, CONTINUE CLEARING
1STATUS

1STATUS

4SET REC INTR ENABLE

$SET TRANS INTR ENABLE

;SET MASTER SCAN ENABLE

1SET TCR BITS...UP UP AND ANWAY !
sALLOW INTERRUPTS

$1SET FOR DELAY

tWAIT FOR ALL RECIEVERS TO FINISH
'

1*TRANSMITTER FAILED TO INTERRUPT
1eRECEIVER FAILED TO INTERRUPT

042703
010304
010337

177770
001372
000001

001364

001422
001422

157666

157644

Ss:

1TRANS INTR ?

SHOZCSR,R3

1oTRANSMITTER FAILED
1SAVE IT

. o4
3

o*Cc<?>
RS

RS.R4
RS, SAVLIN

o1 ,.R2

157616

1578

-t

157570

@DZCSR
. o8

R4
SDZRB\F

R4 ,R3
[}]
#*C<?7> RS
R3,SAVLIN

05}1.0&.‘2(:&
. ®

[EE

.08

8IY
e8rQ
Sé:

001364
001372
001442

. ®

001442
177400

1SAVE IT

1STRIP JUNK
1SAVE LINE NUMBER

-%Lo ALARM?
:

1SILO ALARM SHOWLD NOT =1
uoven VALID SET?
YES
1

...DATA VALID WAS'NT SET

tRECEIVER ERROR FLAG/S WERE SFT
1SET UP POSITION POINTER

$ YES

ERROR

8IC

sREC DONE ?
1 YES
1FALSE INTERRUPT

tRE POSITION POINTER
1GO 'ROUND AGAIN
tLINE VALID ?

8IT

BEQ

sADJUST LOCATION FOR ERROR PRINTOUT
1SET UP POSITION POINTER
1IS IT THIS LINE ?

23
1YOU LOSE
oo:mmrmwm.m

070000

1 YES
sNO,INVALID LINE!!!!
1MAKE POMER OF 2
1LOAD CHARACTER
1SET UP NEXT CHARACTER
tLAST CHARACTER ?
1YES .CLEAR TCR BIT

JREC_INTR SVC ROUTINE

RXSVC:

157622

177770
001372
020000

@DZCSR

yNOW TEST FOR LINE @ ETC

105303
100402
006302
000774
030237
001001
104010
006304
116477

TSY

012702

TXSVC:

e
G L

157712

SEQ 95

PAGE 95

CZDZA D0Z11 DEVICE DIAGNOSTICS.

157720

117703

16:22

g 353

005777
100401
104003

19-JUN-84

LEEEE

MACY11l SOAC1052)
19-JUN-84 15:45

323

CZDZA-HO
CZDZAM.P11

4
TRO(RS),RS
#Cc<377>
R4

+INVALID LINE ¢
1GET THE LINE NUMBER AGAIN
tUSE R3S AS A POINTER IN THE DATA TABLE
1D0ES THE DATA CHARACTER COMPARE ?
1 YES
1SAVE EXPECTED
1CLEAR JUNK

Ep——

F8
CZDZA-H0
CZoZA1.P11

MACY11l SOAC1052)
19-JUN-84 15:45

19-JUN-84 16:22 PAGE 96
CZDZA DZ11 DEVICE DIAGNOSTICS.

4762

4763

104005

105763

001002
040237
012716
000002

001442
001442

ERROR
INC
1ST8
BNE
8IC
MOV

24:

022472

RTI

001372

001364

RS
SAVLIN
#1,.R2

Brd

e
BEQ

001372

103363

013777
005077

CLR
CLR
MOV
BIT

18:

104027

013777

R2,RXTCR
OSNAP,(SP)

1FINISH UP ROUTINE

001401

005237
005723

S
TRO(RS)
TR(K6 RS) JALL

Laald
MTPS
DEVICE.CLR

106427
104413

012702
030237
001405

002074
157416
002100
157410

SEQ 96

24:

FINI:

RXTCR:

+ZERO LINE DONE INDICATOR,
tRESET THE BACKGROUND TIMING LOOP

1STOP _ALL INTERRUPTS
1CLEAR ALL INTERRUPTS AWAY

l'V:-IO LINE ?

#400, TRO(RS)
. o8

l%&ilm A BINARY COUNT PATTERN ?

INC

SAVLIN

ASLB
8CC

fe
14

MOV
CLR
MOV
CLR

DZRIS,S8DZRIV
SOZRIS
DZTIS,8DZTIV
8DZTIS

(R3).

#)VNCE

SET UP FOR NEXT CHARACTER

D“S DONE ?

R2,.LINE

ERROR
TST

1R2 = LINE ¢ BY BIT POSITION
tR4 = ACTUAL DATA
tRS = EXPECTED DATA
1oNO, DATA DOES NOT COMPARE

i
3

sTHE LINE FAILED TO RECEIVE A FULL
1BINARY COUNT PATTERN
1SET UP FOR NEXT LINE
1ADD 2
1SET UP NEXT LINE POINTER
sFINISHED ?

tRESTORE TRAPCATCHER

1GO TO THE NEXT TEST

1RX IMAGE OF TCR BITS
s

-.u...................-.-...-...-

LENGTHS. EACH NEW PARAMETER SHOWLD
1 sDECREASE IN TIME FROM THE PREVIOUS PARAMETERS SELECTED.
1oTHE TIME IS CHECKED AGAINST THE LAST PARAMETER USED
16 AND A LOMER TIME IS EXPECTED ON THE CURRENT PARAMETER.
1 SPARAMETERS ARE

s¢

EIGHT BITS/PER/CHAR - THO STOP BITS AT

THEN, 9600 BAUD - TWO STOP BITS AT

S0, 75,

2400,

110, 134.5, 150, 300, 600, 1200, 1800, 2000
3600 , 4800, ?7200, 9600 BAUD.

SEVEN, SIX, FIVE BITS/PER/CHAR.
1oAFTER EACH LINE HAS F INISHED ALL THE ABOVE PARAMETERS
joTHE NEXT SELECTED LINE IS THE TESTED.
i

4817

s:e

TEST 34

-.xz-....................-........

001122

022504
022512

012737
012737

001226
001360
001362

001372
001374
010070
001216
010070
001422

§g§

012737

000004

TST34:

02,4TIMES

OTST3IS, NEXT
034,L0Cx

OFFSET
SAVLIN
MTLIN

001216

001364

14:

023202

24:

001374
025214
001216

023202
023202

1LOAD THE NMUMBER OF TMIS TEST

tPOINT TO THE START OF THE MNEXT TEST
1SET FOR LOOP

tRESET TMIS VARIABLE
JRESET LINE NUMBER INDICATOR

tUSE THIS WORD TO TELL WMAT LINE TRANSMITTED
JUSE §TMPO AS A BIT POINTER

névmsso:exomnmro 7¢ ;BUILD TEMPORARY PARAMETERS
om LINE

+IS THIS LINE ACTIVE?
1IF SO, GO GET STARTED
M!SSO!EIM!WTO 74 ;LOAD PARAMETERS TEMPORARILY
sPOINT TO THE DATA AREA
#700,RO

(RO)+

001462

001374

034,0TSTNM

385053 ARIS23RT §acecaas
.

4821

022474
022476

tCLEAR A DATA WORD

05;0.'0

.rmmm ?

XMTLIN
0,74

.'om TO THE NEXT LINE TO TRANSMIT
(MAKE SURE TEMPORARY PARAMETERS POINT TO O

WMiLSEnT‘."

.nno DESIRED LINE NUMBER

$THPO
14

sPOINT TO THE NEXT LINE
1PROCESS THE NEXT LINE
lYESY TO SEE IF THIS TEST GETS REPEATED
t

010000
001370

8IC

023202
157170

TST

cLC

ORCVON, 74
10.0&’!

MODE
100¢
984

023202
010000

177770
001374

001422
001462

984:

:
1004

994
74

1ZERO PARAMTERS FOR TX LINE
1LOAD PARAMTERS FOR TX

1 STAGGERED?
18R IF NO
1SET WP LINE
B

1BR IF LINE JAS EVEN
|PREPARE TO MKE LINE EVEN
s CONT INUE
1PREPARE TO MAKE LINE 00D
1SET ALTERED LINE

ORCVON, 74
74 ,8DZLPR
74 ,SAVLIN
0*C<7>,SAVLIN

1SET RX ON
1LOAD RX PARAMETERS
tADJUST LUCATION FOR ERROR PRINTOUT
;STRIP JUNK

XMTLIN,7¢
74 ,REGIST
#T00,RO
(RO)«
oszov.ao

1SET LINE UP AGAIN
oSN! PARAMETERS FOR PRINTOUT
POINT TO THE DATA AREA
1CLEAR A DATA WORD
.:’oms»co ?

0,7

R2
001220
001224

~MRESET-ccsccssassssssssssnsssssasss

tCLEAR DEVICE AND SET MAINT BIT IF I MODE

8
P

SRELERRRERRRRRGNGNAN0RSALECHEEERERCLARERERRERRRERACS :

4818
4819

MACY11l SOA(1052)
19-JUN-84 15:45

CZDZA-HO
CZOZAM.P11

SEQ 97

19-JUN-84 16:22 PAGE 97
CZDZA DZ11 DEVICE DIAGNOSTICS.

R3
sTMPL
$THP3

1CLEAR OLD LINE ¢

uUSE R2 TO COUNT TOTAL NUMBER OF TRANSMISSIONS

tUSE RS TO COUNT TOTAL NUMBER OF RECEPTIONS
sINITIALIZE THE TIMER
+INITIALIZE THESE BITS ALSO

H8
CZDZA-H0
CI0ZMM.P11

MACY11l SOAC1052)
19-JUN-84 15:45

4874
487S
4876
4877
4878
4879

023014 012737
023022 012777
023030 012777
023036 013777
023044 013777
023052 113777

4881

023066

4880

4882
4883
4804
4885
4806
4887

4888
4889
4890
4891
4892

4893
4894
4895
4896
4897
4898
4899
4900
4901
4902
4903

023060

052777

023072
023100
023102
023106
023110
023114

032777
001407
005237
001371
105237
001366

023116
023120
023124
023126
023134
023140
023144
023150
023152
023160
023162
023170
023172
023200
023202

106427

104011
004737
104401
062737
013700

042700
022700
001010
032737
001602
162737
000625
062737
000621

000020
02463C
025002
030306
030306
001216

040140

000000

000100

SEQ 98

19-JUN-84 16:22 PAGE 98
CZDZA DZ11 DEVICE DIAGNOSTICS.
001376
157046
137034
157030
157026
1356776
156754

156742

4%:

001224
S¢:

000002
023202

025214

000030

023202

000010

023202

000400

023202

170377
007000

000000

020, XMTCNT
OXMTSRYV,8DZTIV
ORXISR1,8DZRIV
CZPRT,GDZRIS
OZPRT,E8DZTIS
$TMPO,SDZTCR

MTPS

[]

ERROR
JSR
SCOP1
&0
MOV

11
PC.SERV.G

8IS

001220

007652

MOV
MOV
MOV
MOV
MOV
MOV

64:
74:

8IT
B8EQ
INC
BNE
INCB
BNE

8IC
oP
BNE
B8IT
8EQ
SuB
BR
ADD
BR
0

1SET HOW MANY CHARACTERS TO TRANSMIT

1START THE VALID LINE

OTIE!RIE !MSENAB,BDZCSR

ORIE,BDZCSR
S¢
TPL
45
sTHP3
R
.2 OFFSET
$,RO

tLOMER THE PRIORITY TO ALLOW INTERRUPTS

1IS ROUTINE DONE?
sWHEN ALL IS DONE RX IE IS CLEARED IN ISR.
.co.m TIME
1CONTINUE TEST
1OOUBLE COUNT
1CONTINUE TEST
s INTERRUPTS NOT FINISHED
1<tG>?
1LOOP?

0'C¢ 17+400>,R0
#<16¢400> ,RO
6%
0BIT4.BITS, 74
24
BIT3, 74
3¢
€400, 74
3¢
5

4204

4905

-PARTST -ssscscsssssssssssssssssssssasssass
~$XZ-essssencsscssssssssssssssnsss

100066068608660860800800068 TEST 35 080000000800 00000008008000480000

4906
4907
4908
4909

16 THIS TEST VERIFIES THAT EVEN PARITY WORKS
4 FOR ALL ODD LINES SELECTED AND THAT 0DD PARITY WORKS FOR ALL
s EVEN LINES SELECTED.
s6THE MAIN FUNCTION OF THMIS TEST IS TO VERIFY

4912

18700ARE TN "STAGGERED" MODE.

4910
4911

soTHAT “PE* (PARITY ERROR) CAN BE FLAGGED BY
JoTHE UARTS. THIS TEST WILL NOT BE DONE UNLESS

4913
4914
4915

1640(8) CHARS ARE USED FOR THIS TEST.
JoALL SELECTED LINES WILL BE ENABLED
JoAT THE SAME TIME!

4916

4917
4918
4919

4920

4921

4922
4923
4924

4925

023204

023206
023214
023222

023226

000004

012737

000035

001122

012737
005737

023456
001370

001360

100112

4926 023230 104417
4927

4928
4929

023232
023236

013701
042701

001366
000200

~$Xl-essssscscsssssssscssasssssass

s:¢
TEST 35
J180RR62060CHVEENRBROBLE0RHIEERALHACRATBNERORBGGARSLERGEBLBRARESES
TST3S:
SCOPE
t

MOV

#35,6TSTNM

tLOAD THE NUMBER OF THIS TEST

MOV
TST

#TST36,NEXT
MODE
-1

tPOINT TO THE START OF THE NEXT TEST
1IS THIS STAGGERED MODE?

-- END O MACR) s=ssssssscsssssssass

B8PL
t

DCLASM

+IF NOT, DON'T DO THIS TEST
i

~IMRESET-sccccccscsssscssssansssnnsas

JCLEAR DEVICE AND SET MAINT BIT IF I MODE

-- END O MACRQ) e=sssssescsssssssas

MOV
8IC

PAR,R1
#0D0PAR ,R1

JUSE R1 TO BUILD PARAMETERS TO BE LOADED
tMAKE SURE ODD PARITY ISN'T SET

14:

032701
001002
052701
010177
042701

2¢:

3s:

8IS
MOV
8IT
BEQ
BIT
BNE
8IS
MOV
8IC
INC
ASLB

8cC
CLR
CLR
CLR
CLR
CLR
MOV
MOV
CLR
[ d

001376

CLR
MOV
MoV
MOV
'.?g
t

156436
156410

S¢:

64:

OXMTSRV,8DZTIV
OPARESE
, BOZRIV
OZPRT,8DZRIS
OZPRT,S8DZTIS

USE R2 TO COUNT TOTAL NMUMBER OF TRANSMISSIONS
112-10-84 ECB REV I
112-10-84 ECB REV I
USE RS TO COUNT TOTAL. MUMBER OF RECEPTIONS
TRANSMIT

A BINAR

~$INTSET -sssssssssssosssssssssssssssss

1SET UP THE TRANSMITTER INTERRUPT VECTOR
l“; UP THE RECEIVER INTERRUPT VECTOR

s=ssssssssesssssssss

INC

COUNTO

INCB
BPL

COUNT1
S¢

ADVANCE

IF ME'RE NOT DONE, GO CHECK THE NEXT LINE

TER
ORIE ! TIE!MSENAB,BDZCSR ;ENABLE THE DEVICE

BEQ

ERROR

INE

.-‘

LINE,SDZTCR

8vs

X7 PMLITY TO EVEN

MOVE THE BIT POINTER IN R2 TO THE NEXT LINE

MOV8
MTPS
BIT

POINT

1
SAVLIN
Re
COUNTO
COUNT1
R3
€40, XMTCNT
#T00,RO
(RO).
#STOP,RO

END O MACR)

DELAY

104011

OPARITY,RL
o1,R2
R2,LINE
34
#8ITO,R1
4
#0DOPAR ,R1
R1,8DZLPR
#0DOPAR ,R1
R1
R2

8
8

001411

000100
000001
001364

052701
012702
030237

19-JUN-84 15:45

SEQ 99

19-JUN-84 16:22 PAGE 99
CZDZA DZ11 DEVICE DIAGNOSTICS.

MACY11l SOAC1052)

0
ORIE,SDZCSR

sENABLE ALL SELECTED LINES
tALLOW INTERRUPTS
sWHEN RX DONE; RIE WILL =0
18R IF ALL DONE
3 33 2-10-84 ECB REV 1

S¢

1oRX FAILED TO FINISH (INTERRUPT)
1 ADVANCE LOOP
i

~PARTST-sssccsssscsscsssssssssssasssnssns

«§Xl-ssusssssssscsssssssssssssasss

160000666000606066660600¢ TEST 36 000000080008000000000000000000

1¢THIS TEST VERIFIES THAT ODD PARITY WORKS FOR ALL ODD LINES

s¢ SELECTED AND THAT EVEN PARITY WORKS FOR ALL EVEN LINES SELECTED
1oTHE MAIN FUNCTION OF THIS TEST IS TO VERIFY
1oTHAT “PE” (PARITY ERROR) CAN BE FLAGGED BY

1oTHE UARTS. THIS TEST WILL NOT BE DONE UNLESS
1eYOU ARE IN “STAGGERED" MODE.
1040(8) CHARS ARE USED FOR THIS TEST.
soALL SELECTED LINES WILL BE ENABLED
1oAT THE SAME TIME!

1:¢

TEST 36

«$X]-ssssssssssssssssssssssssnasss

J8
CZDZA-HO
CZ0ZAM.P11

MACY11l SO0A(1052)
19-JUN-84 15:45

023456

023460

023466
023474
023500

000004

012737

000036

001122

012737
005737
100112

023730
001370

001360

104417

013701
042701
052701
012702
030237
001411
032701
001402
052701
010177
042701
005201
106302
103361
005037
005002
005037
005037
005003
012737
012700
005020
022700
001374
005000

001366
000200
000100
000001
001364

000200
156302
000200

SCOPE

mngv

24:
34:

024632
024634

001376

MOV
MOV
CLR
(o, 4

001462

BNE

CLR

156242
156230
156224
156222
156156

113777
106427
032777

001364
000000
000100

156164
156136

S¢:

024632

024634
64:
i

;LOAD THE NUMBER OF THIS TEST

OTSTS7 ,NEXT
MODE
64

tPOINT TO THE START OF THE NEXT TEST
1IS THIS STAGGERED MODE?
afi.g&pq DO THIS TEST

SeSseSESSOSSOREEERES

-0

NPENPeNNSSSeSPaSERESSS

tCLEAR DEVICE AND SET MAINT BIT IF I MODE

mm'

MOV
8IC
8IS
MOV
BIT
BEQ
BIT
BEQ
8IS
MOV
BIC
INC
ASLB

#36,8TSTNM

MDSI.ASH

8CC
CLR
CLR
CLR
CLR
CLR

001372

T E L

mm'

MOV
TST
BPL

000001

024636
0244560
030306
030306
040140

104400

14:

012777
012777
013777
013777
052777

001410
104414
005237
102770
105237
100365
104011

TST36:

000040
001422

SEQ 100

19-JUN-84 16:22 PAGE 100
CZDZA DZ11 DEVICE DIAGNOSTICS.

SeSSSESeSSSSSEESSES

PAR,R1
S#ODDPAR . R1
PARITY ,R1

o ,.R2
R2,.LINE
1)
#IT0.R1
24
OCODPAR ,R1
R1,8DZLPR
S0DDPAR ,R1
R1
R2

14
SAVLIN
R2
COUNTO
COUNT1
R
&40, XMTCNT
#TDO,RO
(RO)+
#STOP ,RO
.6
RO

tUSE R1 TO BUILD PARAMETERS TO BE LOADED
tMAKE SURE ODD PARITY ISN'T SET
tMAKE SURE PARITY IS TURNED ON
tUSE R2 AS A LINE POINTER
1IS THIS A VALID LINE?
+1IF NOT, SKIP TO THE NEXT LINE
1IS THIS LINE AN ODD LINE?
IT'S EVEN, USE EVEN PARITY
[l
+IF IT'S ODD, USE ODD PARITY
iLOAD THE LINE PARAMETER REGISTER
1SET UP THE NEXT PARITY TO EVEN
;tPOINT TO THE NEXT LINE
tMOVE THE BIT POINTER IN R2 TO THE NEXT LINE

+IF WE'RE NOT DONE, GO CHECK THE NEXT LINE
;CLEAR THE LINE NUMBER INDICATOR
sUSE R2 TO COUNT TOTAL NUMBER OF TRANSMISSIONS
: $312-10-84 ECB REV I
: 132-10-84 ECB REV I
tUSE RS TO COUNT TOTAL NUMBER OF RECEPTIONS

'
7 A BINARY COUNT PATTERN(00-40)
s1POINT TO THE DATA AREA
tCLEAR A DATA WORD
s1FINISHED ?
'

0%gSET
'

-0

SSNSSSSSSSSERRESSS

MOV
OXMTSRY,8DZTIV ;SET UP THE TRANSMITTER INTERRUPT VECTOR
MOV
OPARESE ,BDZRIV ;SET UP THE RECEIVER INTERRUPT VECTOR
MOV
DZPRT ,8DZRIS
1SET THE INTERRUPT VECTOR STATUS
MOV
DZPRT,8DZTIS
1SET TRANSMITTER INTERRUPT PRIORITY
mo‘x,smnmtmm.wzcsa 1ENABLE THE DEVICE
eSS

MOV8
MTPS
BIT

BEQ
DELAY
INC
BYS
INCB
BPL
ERROR
END

ADVANCE

NSSSESEEEES

LINE,SDZTCR
®0
#RIE,SDZCSR
68

COUNTO
S¢
COUNT1
1)
11

O MACR)

1ENABLE ALL SELECTED LINES
tALLOW INTERRUPTS
tWHEN RX DONE; RIE WILL =0
1BR IF ALL DONE
: 13 2-10-84 ECB REV 1

1oRX FAILED TO FINISH (INTERRUPT)
1 ADVANCE L.OOP

sesssssssssssssssss

K8
CZDZA-HO
CZOZAM.P11

MACY11 SOAC1052)
19-JUN-84 15:45

5040

S042

21-FEB-84

S043

1 ECB

S045

1o SPEEDS.

S044

S046

s:¢

S0S53

IF NEITHER AVAILABLE, THEN TEST IS NOT RAN.

IT LOOKS FOR EITHER A KW1lL OR KXWiiP.

IF EITHER IS AVAIL.

023730

000004

000037

001122

023740

012737

004712

001360

S060 023746
S061 023752
S062 023756
S063 023764
S064 023770
S06S 023776
S066 024004
S067 024010
S068 024014
S069
5070

106427
013700
012737
012701

000G00
000004
024022
177546
024076
000340
024106
024104
000100

Ssg;%

024020

000472

SO073
S074
SO07S
S076
S077
S078
S079
5080
S081
S082

024022
024024
024032
024040
024046
024052

022626
012737
012737
012737
012701
012761

024066
024076
000340
172540
177777

024060

012711

000133

S085
S086
S087

024066
024070
024074

022626
010037
104400

S089
%

024076
024102

005237
000002

S092
S093
”’50945

024104
024106
024110

000000
000000
000000

023732

012737
012737
005037
005037
012711

TEST 37

-.xz-.-..................--.......

1100600008600088008880800080884800088008048888048408008088480488004808808

012737

SOS8

1 THEN THE TEST IS RAN.

1o1. INSTEAD OF JUST LINE O AT ALL BAUD RATES.

ssgsso
1

5057

TMIS TEST ADDED IN ORDER TO TEST CRYSTAL

18-JUN-84
1¢ KR
1* ADDED NUMBERS IN TTABLE AND NOW TEST ALL LINES AT ALL BAUD RATES

5048
5049

S056

1¢ BAUD RATE TIMING TEST.
1.

S047

S0SS

«§Xl-sssrsssssssssssssssssssssanss

10008008000066440048000008¢ TEST 37 ¢00ese00000000000800000000000s

S041

S054

SEQ 101

19-JUN-84 16:22 PAGE 101
CZDZA DZ11 DEVICE DIAGNOSTICS.

TST37:

037,4TSTNM

1LOAD THE NUMBER OF THIS TEST

MOV

@$EOP ,NEXT

sPOINT TO THE END-OF -PASS HANDLER

MTPS
MOV
MOV
MOV
MOV
MOV
CLR
CLR
MOV

®0
804,RO
9104 ,904
0177546 ,R1
OCLKSRV,90100
0340, 90102
BCOUNT
CCOUNT
#100,(R1)

TCCONT

sOROP PRIORITY TO O
s SAVE CONTENTS OF LOCATION 4.
1SET TO TRAP IF NOT KWiiL
1GET KW1iL ADORESS.
;SET FOR INTERRUPT.
tPRORITY 7 ON INTERRUPT,
tOUR OMN CLOCK TICK COUNTER
1CHAR SENT COUNTER
s THIS WILL CAUSE A BOMB TO OCCUR IF
s THE KW1lL DOES NOT EXIST
18UT IF ITS THERE, THEN WE'RE STARTED.

e
MOV
MOV
MOV
MOV
MOV

(SP)+,(SP)e
9204, 504
OCLKSRV,90104
9340, 80106
#172540,R1
#-1,2(R1)

MOV

#133,(R1)

B8R

TCCONT

e
MOV

(SP)+,(SP)e
RO, 84

sREADJUST STACK, NO CLOCKS AT ALL!
tRESTORE LOCATION 4
1GET OUT.

CLKSRV: INC
RTI

CCOUNT

1CLOCK INTERRUPTS TO MERE, UPDATE COUNT.
s THEN EXIT.

CCOUNT: .WORD
BCOUNT: .WORD
DCOUNT: .WORD

O
O
O

s INCREMENTED BY CLKSRV. #CLOCK TICKS.
tUSED BY TCCONT AS TIMER.
tUSED BY TCCONT AS TIMER.

--END O MACR) =ssssssssssssssassss

000004
000100
000102

000004
000104
000106

10¢:

000002

Ssgz 024064 000450
000004
024104

SCOPE

MOV

204

ADVANCE

lSTMT TEST

tREADJUST STACK
1SET TO TRAP IF NO KW11P
;SET FOR INTERRUPT.
tPROITY 7 ON INTERRUPT,
1KW11P ADDRESS.
1SET THE @ OF COUNTS FOR INTERRUPT (1)
sNOTE, IF KW11P DOES NOT EXIST, THEN
ME WILL BOMB FROM THIS PLACE.
1SET INTERRUPT ENABLE,UP COUNT ,REPEATED
1 INTERRUPT,LF CLOCK, AND RUN.

.SYRT TEST.

L8
CZDZA-H0
CZ0ZAM.P11

MACY11l 30A(1052)
19-JUN-84 15:45

SEQ 102

19-JUN-84 16:22 PAGE 102
CZDZA DZ11 CEVICE DIAGNOSTICS.
i

5096

+ THESE NUMBER WHERE WORKING GREAT ON A PDP-11/24 RUNNING AT 60 HERTZ

5097

5098
5099
5100
5101
5102

+TTABLE: .WORD

MORD

3
'
:

5103
5104
5105

5106

5107
5108

S.,

7.,

.MORD
.MORD
MORD

11., 13.
13., 15.
15., 17.

z’-. uo

”I. “.

LMORD

199., 202.

MORD

239., 242.

LMORD

.MORD
MORD
MORD

'
'
'

339., 362.
479., 482.
719., 722.

939., 9%62.

1COUNT OF CHARS OUT FOR 350 BAUD
CHARS OUT FOR 75 BAUD
1 COUNT
+COUNT OF CHARS OUT FOR 110 BAUD
1COUNT OF CHARS OUT FOR 134.3 BAUWD
1COUNT OF CHARS OUT FOR 150 BAUD

tCOUNT OF CHARS OUT FOR 300 BAUD
1COUNT OF CHARS OUT FOR 600 BAUD
1COUNT OF CHARS OUT FOR 1200 BAUD
1COUNT OF CHARS OUT FOR 1800 BALD
1COUNT OF CHARS OUT FOR 2000 BAUD

1COUNT OF CHARS OUT FOR 2400 BALD
1COUNT OF CHARS OUT FOR 3600 BAUD
tCOUNT OF CHARS OUT FOR 4800 BAUD
sCOUNT OF CHARS OUT FOR 7200 BAUD
tCOUNT OF CHARS OUT FOR 9600 BAUD

+ THESE NUMBER WMERE MODIFIED SO THEY WOULD WORK ON A
AS 60 HERTZ
1/70)
AS MELL
+ S0 MERTZ MACHINE (TESTED ON POP-1
s AT 9600 BAUD THERE IS ABOUT 17¢ ERROR.
THE ERROR.
: THE LOMER THE BAUD RATE THE LESS
.-

TTABLE:

ENDTTB

.MORD
LMORD

5., 7.
7., 12.

om
.MORD

13-. No
15., 21.

MORD

59., 76.

LMORD
LMORD

179., 220.
199., 244,

MORD
.MORD
LMORD
MORD
.MORD
=,

239.,
339.,
479.,
719.,
939.,

292.
436.
S580.
868.
1156.

sCOUNT OF CHARS OUT FOR S0 BAUD
sCOUNT OF CHARS OUT FOR 75 BAUD
tCOUNT OF CHARS OUT FOR 110 BAUD
;COUNT OF CHARS OUT FOR 134.5 BAUD
1COUNT OF CHARS OUT FOR 150 BAUD
tCOUNT OF CHARS OUT FOR 300 BAUD
1COUNT OF CHARS OUT FOR 600 BAUD
1COUNT OF CHARS OUT FOR 1200 BAUD
1COUNT OF CHARS OUT FOR 1800 BAUD
1COUNT OF CHARS OUT FOR 2000 BAUD

1COUNT OF CHARS OUT FOR 2400 BAUD
sCOUNT OF CHARS OUT FOR 3600 BAUD
sCOUNT OF CHARS OUT FOR 4800 BAUD
1COUNT OF CHARS OUT FOR 7200 SAJD
tCOUNT OF CHARS OUT FOR 9600 BAUD
D
OF TTABLE
tEN

3 CHECK OUT THE CLOCK
13

024216

177750

TCCONT: MOV

024106

CLR
MOV

RO, 964

CCOUNT

tRESTORE LOCATION 4.
1START WITH LINE CLOCK AT ZERO COUNT
130-18MS LOOPS TO WAIT

M8
MACY11 SOAC1052)

TST

108:

024104

024110

CCOUNT

204
OCOUNT
10¢
BCOUNT
10¢
(R1)

024106

155562
000001

155562
o24112
40%:

155546

024106
024104

024104

155512
000101

024106

155526

024106
024106

007400

ADVANCE
'

1CLEAR CLOCX
sCLOCK NOT WORKING RIGHT- ABORT TEST
tNOY THE FALT OF THE D2!

IN TTABLE THEN THE LINE IS OX, ELSE ERROR

BRERE A38823E] &5 27383

000074

tWAIT FOR COUNT TO GO TO 1 TO AVOID
tUSING THAT DANGEROUS FIRST COUNT!
1BUT AS A SAFE GUARD,
tOON'T MANG MERE

TTING CHARACTERS TO ALL 8 LINES AT ALL BAUD RATES.
OF CHARACTERS TRANSMI TTED IS BETWEEN THE

33 83 33 333 § a!

-é;--

003737
001010
005237
001372
005237
001367
005011
104400

R TR

45
19-JUN-84 15:4

SEQ 103

19-JUN-84 16:22 PAGE 103
CZDZA DZ11 DEVICE DIAGNOSTICS.

#30,8DZCSR
#30,R0
01,R3

1SET MSE AND MAINT.
1SET BAUD RATE 50, 8 BIT CHAR LEN
sMOLDS CURRENT LINE, START AT LINE O

RS,8DZTCR
OTTABLE .R2

;ENABLE THE NEXT LINE TO XMIT
1GET TABLE OF EXPECTED RESWLTS

RO, SDZLPR
BCOUNT
CCOUNT

tUPDATE THE BAUD RATE AND NEXT LINE
sREUSE TIMER AS XMIT CHAR COUNTER
COUNTER
tCLEAR CLOCKX INTERRUPT

m . .m
604
SDZCSR
S04
#101,8DZTOR
BCOUNT
S0¢
(R1)

:00 THIS LOOP FOR 60 CLOCKX TICKS
sEXIT WHEN THAT OCCURS.
sREADY TO XMIT A CHAR?

sUPDATE XMIT COUNT, SHOULD NOT OVERFLOM.
s IF NO OVERFLOW, CONTINUE
+IF OVERFLOW, CLOCK COULD BE BAD, CLEAR IV
+ABORT THIS TEST IF CLOCX 10-2.°

1GET NEXT PAIR OF NUMBERS
sMIT END OF TTABLE?
sNO, CONTIMUE TESTIMG THIS LINE
1BRING THE BAUD RATE BACK TO 50
sAND GET NEXT LINE MNUMBER
;MOVE ONTO THE NEXT LINE

+IF NOT DONE WITH ALL LINES THEN CONTINUE

1ELSE STOP CLOCX
tAND DO THE NEXT TEST

s+ ERROR - COUNTER NOT IN THE RANGE OF THE NUMBERS IN TTABLE

N8
CZDZA-HO
CZDZAM.P11
3208
5209
5210
se11
el
S213
S214
Se1s 5216

MACY11 SOA(1052)
19-JUN-84 15:45
005011
011237

016237

024104

000002

177770
001372

704:

024110

007652

S217

CLR
MOV
MOV
otCc?>,
8IC
RO, SAVLIN
MOV
ERROR
20
JSR
PC,.SERV.G
ADVANCE

<G
;100 NEXT TEST

IRECEIVER SERVICE ROUTINE(PARITY TEST ONLY)

5218
5219

SDZRBUF ,R4

155362

Se21

SwAB

8IC
MOV

177770

001372

10¢:

010000

TST
M1
ERROR

155226

000100

155212

13¢:
COUNTO:
COUNTL:

3835&&222555532

124:

== (2]

@ m

177400
177400

=4 b4
-O

001442

cCOoOD®

11¢:

001442

o*C<7>
R

R1,SAVLIN
R4

OZRBUF ,REGIST

000377
001442
110000
001442

R4 ,.R1
R1

ASL
8IY

001400

§ EEESHUNYS

SEQ 104

19-JUN-84 16:22 PAGE 104
CZDZA DZ11 DEVICE DIAGNOSTICS.

R4,RS

1WAS DATA VALID?
1BRANCH IF YES
am DATA VALID NOT SET!
sALIGN IT ON A WORD BOUNDARY
tPARITY ERROR SMOULD BE SET. IS IT?
+IF SO, GO CHECK CHARACTER
tSEYWFGfl!M'ESSNZ

0377,RS

TROCR1),RS
1GET THE CORRECT CHARACTER
SOVALID!PARER,RS ;BUILD WHAT WAS EXPECTED
;sERROR- DID NOT GET CORRECT INFORMATION
6
TRO(R1),.R4
JCHECK THE CMARACTER. IS IT CORRECT?
124
:IF SO, GO SET UP NEXT CMARACTER

TRO(R1).RS
#*C<377>
RS
0*C<377>
R4
TRO(R1)
R3

COUNTO
COUNT1

;LOAD THE CHARACTER FOR ERROR REPORTING

;CLEAR SIGN EXTEND
;REMOVE THE JUNK FROM R4, THE ACTUAL CHARACTER
;DATA ERROR
:SET UP THE NEXT CHARACTER
;ADD TO THE TOTAL RECEIVED COUNT

O#TIE,SDZCSR

13¢
R2,R3
134

ORIE,SDZCSR

1DISABLE RECEIVER INTERRUPTS
1GO BACK TO RECEIVER WAIT LOOP

l TRANSMITTER INTERRUPT SERVICE
117701
100411
013700

155202
001372

XMTSRV: MOVB

SAVLIN,RO

1GET THE LINE NUMBER. IS THE TRANSMITTER
sREALLY READY? IF SO, GO L.OAD THE CHARACTER
+ADJUST LOCATION SAVLIN

B9
CZDZA DZ11 DEVICE DIAGMOSTICS.

020650 042701 177770
026654 010137 001372
020660 104003
020662 010037 001372

024666 042701 177770
024674
024702

116177

005261

001422
001422

18;
155164

8IC
ERROR
MOY

8IC

agfi

19-AN-84 15:45

CZDZAM.P11

024706 72376, 001376 001422
024714 00.7'S
024716 012700 000001
024722 006201
024724 005301
2s:
024726 100802
024730 006300
024732

0*Ce7> A1

n.smna

m*:mn
Tm(ll)m

TOO(R1)

JISOLATE TME LINE MUMBER
+FOR ERROR PRINTOUT
1o TRANSMITTER NOT READY- FALSE INTERRUPT
JRESET SAVLIN T0D PREVIOUS VALUE

sISOLATE
THE LINE MUPOER A WORD BOUNDARY
IMAKE SURE IT NEFERENCES

1LOAD THE CURRENT CHARACTER
FOR TMIS LINE

l!? UP NEXT CHARACTER FOR THIS LINE

100000000000000000000000000000000000000000000000000000000000000

1202000006000

000774

oe
g
¥
ASR
DEC
BT
ASL
TM

30000000000

0000000 CRAIGRBANILGPNEHBOBAOBNOBOH6S

XMTONT, TDOCR1)
o
01,20
R1
R1
¢
RO
24

s(REV. FO: DELETED

;MAVE ME DOME ALL PATTEANS ON TMIS LINE?
+SET UP A DESELECTION POINTER
1GET TME LINE MUPBER AGAIN
JREDUCE TME COUNT. WAS THIS TME LINE?
+IF SO, GO DISABLE TME ENABLE BIT FOR IT
sMOVE TME POINTER TO TME NEXT LINE

+IF NOT, KEEP ON TRANSMITTING

1G0 OMECK THE NEXT LINE

024752

155116
s:
8ICB
RO.EDZTCR
:OISABLE THE LINE POINTED TO 8Y RO
024740 001003
B
as
sIF MORE LINES ARE ACTIVE , GO CONTINUE TRANSMIT
024742 042777 040000 155072
c
#TIE,8DZCSR
1IF NOT. ODISABLE TRANSMITTER INTERRUPTS
.“...‘.....“.‘.‘...........‘.‘.‘..“.‘.....‘.‘..‘..‘.“.“‘.0....0
024750 005202
as:
TM
R2
{UP THE MPBER OF TRANSMISSIONS
(REV. FO)

PR
T SR

SEQ 105

MACY11 SOAC1052) 19-JUN-84 16:22 PAGE 105

CZDZA-MO

'...‘............‘..‘...“.“.‘....‘..‘..........‘.‘..‘..‘......O"

000002

RTI

JRETURN TO THME TIMING LOOP

s RELATIVE TIME BUILDING ROUTINE
024754

012737

024762
024766
024772

006037
006037
005337

024776
025000

001371
000207

000004

001224
001220
001222

001222

BOUVILD:

14:

MOV

4,472

BNE
RTS

14
PC

ROR
ROR
DEC

TP
sTPL
sTP2

sROTATE 4 BITS BACK INTO $TMP1

1GET THE BITS FROM $TMPS, THE MIGH BYTE
1OF THE RELATIVE TIME COUNTER. PUT THEM BACK
sINTO 6TMP1 USING THE CARRY BIT WITH
tROTATE INSTRUCTIONS

+REDUCE COUNT. ALL BITS BACKX? IF NOT, GET MORE
sflm TO CALLING TEST

INC

C9o
19-JAUN-84 15:45

SEQ 106

16:22 PAGE 106
19-JUN-84
CZDZA DZ11 DEVICE DIAGNOSTICS.

IRECEIVER SERVICE ROUTINE

1¢:

070000

24:

002046

177770
OB 482

=t
2131

001842

23255 Jagrnpagansgasye

155030

TST8

177400

001372
001372
001442

8IY
[3]

001442

Ss:

68:

0235214
025214
002102

002102

TST
ey
TS7

001220

002102

001372
001372

000140

154630

[

RTI

8§§§83

104023
032704
001403
013700

RXISR1:

33 ¢

104004
017704
100401

155034

74:

OFFSET: O

105777
100401

HR
R T

| CZDZAM.P11

MACY11l SOA(1052)

=4 b=t

CZDZA-HO

SDZCSR

+IS THME RECEIVER REALLY READY?

xr S0, GO SERVICE IT

SDZROLF . R4
24
23

1SAVE THE RECEIVER INFORMATION
+IF IT WAS VALID, GO PROCESS
IT
JERROR- DATA VALID WASN'T SET

+IF NOT, GO CONTIMUE PROCESSING

nctm DOME FLAG ISN'T SET

GOVRRUN
! FRMERR 1PARER A4 (ARE ANY ERROR FLAGS SET?

DZRBUF , RO
Re,R1
Rl

#*Ce?> Rl

1SET UP FOR ERROR AEPORTING
- RECEIVER ERROR FLAG

1COPY TME RECEIVER DNFORMATION

SET

sGET THE LINE WMPBER IN THE LOMER BYTE

sISOLATE THE LINE WMPDER

.n.wl IT ON A NORD SOUNDARY

.xr $0,G0 CONTINUE

0*C<377>.R4
SAVLIN
<
TRO(R1)
RS
020, TRO(R1 )
<5
R2,RS3

+ISOLATE THE ACTUAL CHARACTER
1GET THE LINE MUMDER OF THE RECEIVER ERROR
sALIGN IT CORRECTLY FOR REPORTING
1e0ATA ERROR
1SET UP THE MEXT EXPECTED CHARACTER
s INCREMENT THE COUNT OF RECEIVED CMARACTERS
{MAVE ALL CMARACTERS BEEN RECEIVED?
+IF NOT, GO RECEIVE SOME
sMAVE ME RECEIVED ALL OMARACTERS?

A4, TROCRL)
TROCR1) RS
0*C<377>,RS
R1,SAVLIN

TME OWRACTER WAT IT mo o€?

1GET \MAT WAS EXPECTED FOR m REPORTING
1ELIMINATE PROPAGATED SIGN

+IF SO,GO DETERMINE THE TIMING
1GO CONTINUE TIMING AND ALLOM INTERRUPTS

PC,BUILD
JGET THE RELATIVE TIME (SIGNIFICANT BITS)
OFFSET RO
1GET POINTER
$THP1, THTBL(RO) ; SAVE THIS TEST'S TIME
OFFSET
+FIRST TEST?
7
.xr NOT, GO CHECK THE TIME
-(RO)
INT0 THE PREVIOUS TIME TAKEN
m(uo).mn .xs ms TIME WMAT IT SHOWLD BE?

m(am.ns
lsu:hsnxzt.m

+IF SO, GO TO TME MEXT TEST
'PLACE WMAT WAS EXPECTED IN RS
1GET THE LINE NUMBER OF THE RECEIVER

s TINING ERROR

IMMUSMLMW

ORIE IMSENAB , BDZCER

;DISABLE TME DEVICE

JRETURN T0 THE PROGRAM

D9
19-JUN-84 15:45

10211 ECHO/CABLE TEST

1eSTARTING PROCEDURE
solOAD PROGRAM

1oLOAD ADDRESS 000210
18PRESS START

[}

WILL TYPE DZ11 ECHO/CABLE TEST

1oFOR THE DZ11 TO BE TESTED, FMGED B8Y <«CARRIAGE RETURN>
1oPROGRAM WILL TYPE “LINE NUMBER-"
1oTYPE IN THE LINE NUMBER TO BE TESTED (IN OCTAL)
1, FOLLOWED BY <CARRIAGE RETURN>
1oPROGRAM WILL TYPE “BAUD RATE-”

lo"PE IN THE BAUD RATE OF THE DZ11 TERMINAL
1¢,FOLLOWED BY <CARRIAGE RETURN>
1oTHE FOLLOWING BAUD RATES ARE ACCEPTED IN DECIMAL
110

135

150

(ROUNDED OFF

134.5)

fagEausyss

CZDZAM.P11

SEQ 107

16:22 PAGE 107
CZDZA DZ11 DEVICE DIAGNOSTICS.

19-JUN-84

| CZDZA-MO

MACY11l SOA(1052)

:O&L OTHERS ARE REJECTED
1oPROGRAM WILL TYPE “ECHO*

“CABLE TEST" TO INDICATE THAT TESTING HAS STARTE

1 PROGRAM MTI&IZA;IOC
INTERRUPT

1SET UP PROCESSOR STACK
1SET UP POMER FAIL VECTOR
1CLEAR PROGRAM FLAGS AND COUNTS

012706
012737
005037
005037
005037

025216
027412
001242
001132

005037

027416

105037

XSTART ;

001120

001123

001126

MOV

O#STACK, SP

1SET UP PROCESSOR STACK

MOY
CLR
CLR
CLR
CLRS
CLR

OXSTART, SLPADR
STFLG
$PASS
SERTTL
$ERFLG
LAST

lSET UP IN CASE OF POMER FAIL
1CLEAR TEST START FLAG
1CLEAR PASS COUNT
1CLEAR ERROR COUNT
1CLEAR ERROR FLAG
1CLEAR LAST ERROR PC

MTPS

PR7

1LOCK OUT INTERRUPTS

E9
CZDZA-HO
CZ0ZAM.P11
5405

5406
S407
5408
5409
5410
5411
5412
5413
5414

5415

5416

MACY11l SOAC1052)

19-JUN-84 15:45

225260
0235266
025270
0235274
025300
025306
025312
023314
023316

S417

5418
5419
5420
S421

032777
001465
012701

012702
010221
095022
022122
020127
001372

000001

153672

VEC)1:
VEC2:

000300
000302

1%:

81T

#5M00, BSWR

CLR
)

(R2).
(R1)+,(R2)e

BEQ
MOV
MOV
MOV

ce
BNE

001000

INSTR

104403

027444
104405
000300
000770
002072
003
004

R1, #1000
14

770

.BYTE

104403
027466
104405
160000
163700

DZRIV
3
4

INSTR

MREGAD
PELAH

002042
007
001

.BYTE

160000
163700
DZCSR
7
1

MOV
ADD
MOV
MOV
ADD
MOV

013737

062737

013737

013737
062737
013737
003237
013737
062737

DZCSR,DZRBUF
02, DZROUF
DZRBUF ,DZLPR
DZRBVF ,DZT
02,0ZTCR
DZTCR,MDZTCR

m D
ore
02,0ZTOR
ADD

153510

001427
104403
027652
104416
027410
104403
027574
104415

OTHER:

MOV
8IT
8€Q

INSTR

DZTOR,DZMSR
1
. BSWR
#SMO
XBEGIN

MMICH
PANCH
WOHFLG

.BYTE
LINEX:

1IF SWO0=1, GET NEW VECTOR
1AND CSR
IRESTORE TRAPCATCHER
+IN FLOATING VECTOR AREA
1UPDATE THE POINTERS

1INPUT ADDRESS OF DEVICE VECTOR
"
tMESSAGE "VECTOR ADDRESS1CONVERT STRING TO OCTAL
sLOW LIMIT
sMIGH LIMIT
sLOCATIONS TO BE FILLED
1ILSB MASK
tNFMBER OF LOCATIONS
+INPUT ADDRESS OF DEVICE CSR
m *CONTROL REGISTER ADDRESS-*
.w STRING TO OCTAL
LOW LIMIT
JMIGH LIMIT
sLOCATIONS TO BE FILLED
1ILSB MASK
sNUMBER OF LOCATIONS
1BEGIN BUILDING DEVICE ADODRESSES
.rm THE READ DAFFER ADDRESS
sREMEMBER THAT THIS IS ALSO LINE PARAMETER REG.
10EGIN BUILDING TRANSMITTER CONTROL REGISTER

sFORM THE TRANSMITTER CONTROL REGISTER POINTER
+BEGIN FORMING TRANSMITTER DATA REGISTER

1FORM THE TRANSMITTER DATA REGISTER

JRESELECT OF TEST?
+IF NOT, SKIP ASKING WHICH ONE
1INPUT WMICH TEST YOU ARE RUNNING
oEOO&C‘.E

INSTR
MSPEED

tMESSAGE "BAUD RATE-*

0.
9600.
LINESP

sLOW LIMIT
LIMIT
MIGH
1LOCATION TO BE FILLED

1CONVERT DECIMAL STRING TO OCTAL

PARMD

027412

S8 MASK

DEVICE.CLR

tCLEM DEVICE

INSTR
MLINE

1INPUT LINE NUMBER
tMESSAGE “LINE NUMBER-"
1CONVERT STRING TO OCTAL
LOW LIMIT
tHIGH LIMIT

CLR

PARAM

025516

OTHER
0300, R1
0302, R2
R2,(R1)+

MVECTOR
PAERAN
300

013737
032777

SEQ 108

19-JUN-84 16:22 PAGE 108
CZDZA DZ11 DEVICE DIAGNOSTICS.

STFLG

AR PROGRAM START FLAG

0235520
0235522
023523

SAVLIN

001372

000
001

004537

5461
5462
5463
Sa64
5465

S467

5469
5470
SAT1
S472
SAT3
5474
SATS
5476
SAT7
SA78
SAT9

.BYTE

027214

JSR

000340
001120
027414
027410

XBEGIN: MTPS

027412

001126

§EERSEEE

14:

TEST1:

000001

027434
027432
027430

5490
5491
5492
5493
S 54
5495
5496
5497
5498
5499

027762
154132

§eegse £
5510

5513
5514
5515
5516

24:

007652
000377

104413
013737
053737
052737
013777

153214

14
STFLG

+MCABLE

BNE
comM

14
STFLG

TST

TYPE

STFLG

+MTERM

sLOCATION TO BE FILLED
1LSB MASK
tNUMBER OF LOCATIONS

1LOCK OQUT INTERRUPTS
1SET UP PROCESSOR STACK
1CLEAR TIMEOUT
lEOO OR CABLE TEST ?

nC&E TEST

tARE YOU LOOPING ?

1 YES
1NO
1 TYPE CABLE TEST

1SET UP ECHO TEST
1ARE YOU LOOPING ?
1 YES
sNO
s TYPE ECHO TEST
1START TESTING

JP
SILPADR
s THIS TEST WILL ACCEPT 1 CHARACTER AT A TIME
s(IN INTERRUPT MODE) AND TRANSMIT THAT SAME CHARACTER,
tONE LINE AT A TIME, ANY LINE O THRU 7 (OCTAL)
DEVICE.CLR

MOV
MOV
MOV

01,8TSTNM
NUMTCR,8DZTCR
NUMLIN,PAR

MOV
MOV
CLR
MOV

PAR, SDZLPR
OMSENAB
, BDZCSR
R4
MQUICK
RS

8MI

DEC
BNE

R4
3¢

CLR
MOV
BNE
JSR

B
(RS)+,8DZTDR
3
PC,.SERV.G

BEQ

TESTL

TST

154136

STFLG

14
OTEST1, SLPADR

DELAY

3503

WOHFLG

BR
MOV

8IS

001366

5501

5511

4
OTEST2, SLPADR

TYPE

027412
027729
153276

5481

BEQ
MOV
TST

24:

oPR7

#STACK, SP
LOCKUP

BNE
com
001126

RS,SET

MOV
CLR
TST

027412
027745

025630
027412

SEQ 109

1
19-JUN-84 16:22 PAGE
CZDZA DZ11 DEVICE DIWSTICS

ERROR

1CLEAR D211

SPEED,PAR

1SET TCR BIT
1SET PARAMETERS
1SET BAUD RATE
stLOAD PARAM,
1SET SCANN ENABLE

SDZCSR

1 TROY?

1SET MESSAGE BUFFER
18R IF YES
IHAIT
'

1NO TROY SET! WMY?
sRESET COUNTER TO O
1LOAD CHAR

0377,85WR

1RE-DO0 QUICK BROWN?
1BR IF REPEAT PATTERN

DEVICE.CLR

MTPS
MOV

#PRT
OXEOP ,NEXT

1LOCK OUT INTERRUPTS

001366
001366

MCV

NUMLIN,PAR

001366
154036

8IS

1SELECT LINE @ € SET INTERRUPT ENABLE
1SET LINE SPEED AND
JCHARACTER LENGTH (TRANS. € REC.)
tMAKE SURE RECEIVER IS TURNED ON
tLOAD THE LINE PARAMETER REGISTER

000340
026724

001360

027432
027430
010000
001366

DEVICE.CLR

8IS

CZDZA-HO
CZOZAM.P11

MACY11l SOA(1052)
19-JUN-84 15:45

SPEED,PAR

ORCVON,PAR

PAR,SDZLPR

G9
CZDZA-HO
CZOZMR1.P11

SS17
SS18

026014

MACY11 mxgsa)
19-JUN-84 15:4
012777
013777

106437

5519

3321

026070
027436
030310

012777
104402
105777
100373
005777
004737
000137

000140
027612
153112

105777
100401
104004
017737
100401
104023
032737

153746

154050
154044
154000

18:

153106

007652

027440
027440
177600
174377
027440
001372

OINTSVC,80ZRIV ;SET UP INTERRUPT SERVICE
PRIO, BOZRIS
JAND LEVEL
SOLESS1
1ALLOW INTERRUPTS
ORTE {SENAB . BDZCSR
"é‘.fl
RECEIVER INTERRUPT ENABLE

TST8

@4TKS

TYPE

8PL
ST
JSR

,MOHAR

14
PC,SERV.G
94 TK8

LINEX

ANY CHARACTER*”

VIF SOMBODY MITS A KEY- GET NEW LINE ¢

;LOOP MERE
JCLEAR CHAR
{MAKE SURE IT WASN'T <1G>
1

s THE FOLLOMING IS THE RECEIVER INTERRUPT SVC ROUTINE

INTSVC: Ls‘;n

ozcsa

s TEST REC. FLAG

w‘ LRECDAT

JERROR - INTERRUPT NOT CAUSED BY FLAG

ERROR
8IT

23
#BITIS.RECDAT

sNON- VALID CHMARACTER
;CHMECK FOR FRAMING ERROR

ERROR

;EITHER SOMBODY MIT THE

ERROR

027440
027440

001401
104025

MOV
MOV
MTPS
MOV

025500

153742

SEQ 110

19-JUN-84 16:22 PAGE 110
CZDZA DZ11 DEVICE DIAGNOSTICS.

BEQ

MOVE
MOVE

027442
011272
011272
027440

8IC

8IC
SWAB
g

027440

« ®

«®

.ol

RECDAT, TBUF
RECDAT.INBUF

, INBUF
01C<177>

0174377 ,RECOAT
RECDAT
saxl.m.uscon

1BR IF NO ERROR

: "BREAK KEY” OR YOU MAVE AN ERROR!
;MOVE CHARACTER TO OUTPUT AREA
;MOVE CHMARACTER TO CHECK FOR *C

;STRIP JUNK PLUS PARITY
;SAVE ONLY LINE

NUMBER

;D0ES THE LINE @ COMPARE?

« ®

011272

ERROR

153642
000003

012777

027434
153606

153626

1¢:
106:

027442

153614

2¢:

000140

153572

153562

1 oMRONG LINE NUMBER

OMSENAB,BDZCSR
INBUF,e8
14

OXEOP, (SP)

sCRUNCH STACK

CLR
MOV
TST
8MI
INC
BNE

RS
NUMTCR,8DZTCR
8DZCSR
24
RS
104

s INITIALIZE DELAY
;ENABLE THE LINE
s TRANSMITTER READY?
+IF YES BRANCH
+ INCREMENT DELAY
JDELAY DONE?

MOV
%'1'

JRESTART THE RECEIVER
ORTE ! MSENAB , DZCSR
8DZTCR
JCLEAR TCR BIT

DEVICE.CLR

026724

113777

MOV
OP8
BNE

ERROR
MOVE

3
TBUF,G8DZTDR

;START THE TRANSMITTERS SCANNER
1IS IT A tC ?
1NO

s TRANSMIT READY NOT SET!
s TRANSMIT THE CHARACTER

s THIS TEST TRANSMITS A BINARY COUNT PATTERN
IVIA INTERRUPT MODE TO THE RECEIVER

106427
012737
012737

000002

026724

001122
001360

026272
026300

.THE LINE UNDER TEST MUST BE TERMINATED WITH THE TEST CONNECTOR
#PR7
YEST2: MTPS
1DISABLE INTERRUPTS
#2,0TSTNM
OXEOP ,NEXT

H9
CZDZA -0

CZDZAM.P11
S573
S574
5575
5576
S577
5578
SS9

EXaBERRREEEEREREREEERERRREREEYIINAGEULYRLLR

53381

026306

MACY11l SO0A(1052)

19-JUN-84 15:45

SEQ 111

19-JUN-84 16:22 PAGE 111
CZDZA DZ11 DEVICE DIAGNOSTICS.
DEVICE.CLR

104413

1oTEST TO VERIFY THAT SE 1TING DTR FOR A GIVEN LINE

1oWILL BRING UP "CO" AND "RING"
FOR THE SAME LINE
.ofl! DIST PNL MUST HAVE JUMPER FROM DTR TO RQST TO SEND

026310

012737
113777
005005

026316
027434

001362
153534

18:

'lasfl ORDER FOR THIS TEST TO WORKX!
014,L0CK
1LOOP
MOVE
NUMTCR, 8HDZTCR 1SET DTR

CLR

CWA8

81S8

027434

8IS
DELAY

027434

MOV
(o,
BE@

153514

ERROR

24:
34:

027430
027432

001366
030310
027434
105777

000137

MOV
MOV
MOV
MOV
CLR
CLR
MOV
MTPS
MOV

153400
153372

152474

SPIN:

152470
007652
025500
027414

14¢:

104011

QUITS:

026724
027414
153306
017737
032737
001401
104024

153302

MOV
8IS
8IS

027436

SPEED,PAR

MD‘.P&
ORCVON, PAR

sBUILD EXPECTED
1PUT IN MIGH BYTE
i

tWAIT FOR CABLE DELAY
tREADY MODEM BITS
tARE THEY OKX?
18R IF YES
+IS THE TEST CONMECTOR ON?
tHAS RIGHT LINE BEEN SELECTED?
+IF SO- YOU HAVE A PROBLEM!
l'gfl BITS NOT RIGHT

1SELECT LINE ¢ £ REC.
INTERRUPT ENABLE
1ENABLE THE RECEIVER FOR THIS LINE

OTIE {RIE 1MSENAS, QICQ 1SET TRANSMITTER INTERRUPT ENABLE

OINTREC, SDZRIV
PRIO, QZRIS
OINTRAN,8DZTIV
PRIO, QZ? IS
R1
R2
PAR,BDZLPR
SN ESS]
NUMTCR,8DZTCR

1SET P INTR SERVICE
1SET UP LEVEL
1SET UP INTR SERVICE
1SET UP LEVEL
sRX DATA POINTER- SET T0 O
1 TX DATA POINTER- SET T0 O
1SET THE PARAMETERS AND TURN ON RECEIVER
1ALLOW INTERRUPTS
1SET UP TCR BIT

1 YOU RETURN HERE AFTER EVERY RECEJVER INTERRUPT

88TKS

94TKB

BPL

1¢

JSR
JP
INC
BNE

PC,.SERV.G
LINEX
LOCKUP
SPIN

XEOP
LOCKUP

ERROR
11
DEVICE.CLR

TST8
8MI

027440

SDZMSR, R4
RS.R4
F

TST8

INTREC: CLR

027440

NUMTCR,RS

SCoP1
DEVICE.CLR

8IS

027436

NUMTCR,RS

ERROR

SDZCSR

. o4

MOV
B8MI
ERROR

SDZRBUF ,RECDAT
. o4
3

ERROR

BIT
BEQ

fiIT“ RECDA |

¢
A KEY- GET A NEW LLINE
1 IF SOMEBODY MITS
MIT
tBR IF NO KEY
3

tMAKE SURE IT MASN'T <tG>
1SW02=1

lDC TIMEOUT FLAG
+IF NOT O RETURN SP INNING

s oRECEIVER FAILED TO INTERRUPT
1CALL FOR END OF PASS
;1CLEAR TIMEOUT FLAG
1 TEST REC DONE
1 YES
1oFALSE INTERRUPT
1SAVE WCRD

1oNON VALID CHARACTER
1DATA OVERRUN ?
1 NO
1¢YES

CHECK CABLE/TERMINATOR

19
CZDZA-HO
CZDZAM.P11

MACY11l SO0A(1052)
19-JUN-84 15:45

032737
001401

104025
032737
001401
104026

110103
042705
113704
042704
020504
001401

104005

042737
000337
023737
001401

104015
120127
001003

026710
026714
026720
026722

020000
010000

19-JUN-84 16122
CZDZA 0211 DEVICE DIAGNOSTICS.
81T
BEQ

027440

027440
001372

012716
000403
105201
012716
006002

026516

005777

153132

026464

153146

.oVES

1DATA ERROR

MOVe
8IC
MOVe
8I1C
(n, 4
BEQ

R1,RS
0*Cc<377> ,R3
RECDAT R4
0*C<377> R4
10K?
RS.R4
. o4

8IC

0174377 ,RECDAT

SkAB

RECDAT

BrFQ

.ol

1¢:
24:

PARITY ERROR ?

1oYES

ERROR

000377

#8IT12,.RECDAT
. o8

' NO

ERROR

027440

1FRAMING ERROR ?

ERROR

027440

#BIT13,RECDAT
. o84

ERROR

8IT
BEQ

027440

177400
027440
177400

174377

SEQ 112

112
PAGE

BNE
MOV
BR
INCB
MOV
RTI

INTRAN: TST
Ml

ERROR

MOVE
INCB
RTI

1NO

1SET EXPECTED
1CLEAR MIGH BYTE
1GET FOUND
1CLEAR MIGM BYTE

1SAVE ONLY LINE NUMBER

SAVLIN,RECDAT

+DOES THE LINE @ COMPARE ?

s oMRONG LINE ¢
iLAST CHARACTER ?
1NO
1CRUNCH STACK

R1,0377

1
SQUITS,(SP)
24
R1
OSPIN,(SP)
SDZCSR
. o8

P YES

1UPDATE EXPECTED DATA
1CRUNCH STACX

s TEST TRANSMIT FLAG

R2,8DZTOR
B
1RETURN

tUPDATE TX DATA

J9
CZDZA-HO
CZDZAM.P11

MACY11l SO0A(1052)
19-JUN-84 15:45

5661
5662

1END OF PASS
tRESTART TEST

5663
5664
5665
5667

5669
5670
5671
5672
S673
S674
5675
5676
S677
S678
5679
5681

SEQ 113

19-JUN-84 16:22 PAGE 113
CZDZA DZ11 DEVICE DIAGNOSTICS.

XEOP:

027416
001123
025530

027130
027132
027134
027136
027137
011272
000015

RSTRT:

TYPE

MPASS

CLR
CLR8
JP

1 TYPE NAME OF TEST

LAST
SERFLG
XBEGIN

t1CLEAR LAST ERROR PC
;1CLEAR ERROR FLAG

1CONVERT DECIMAL ASCII STRING TO OCTAL
(SP).RS
(RS)+,68
MOV
(RS)+,78
MOV
(RS)., 88
MOV
MOVB
(RS)+,9¢
(RS)+,108
MOVE
MOV
RS,.(SP)
CLR
PS
OINBUF R4
MOV

.PARMD; MOV

24:

1¢:

000071

(0, ]

015,(R4)

(R4),0'9

BEQ
cP8
BLY

B8GT
8ICB
CLR
BISB

000015

.1
(R4),.0'0
34

3¢
¢'0,(R4)
R
(R4)+,R2

R2,RS

cP8
BEQ
ASL
MOV
ASL
ASL
ADD
BR

#15,(R4)
&4
RS
1 X2
;SAVE X2
RS.,R2
1 X4
RS
RS
1 X8
;TIMES 10
R2,RS
13

2¢

INSTER

;TEST TO SEE IF NUMBER IS WITHIN LIMITS
027132

027130

027136

4%:

BHI
cp
B8LO
BITE
BNE

RS,7%

3¢
RS,64
3¢
94.RS
3¢

1STORE NUMBER AT SPECIFIED ADDRESS
027134

MOV

84.R4

027137

ADD
DECB

02,RS
10¢

K9
CZDZA-HO
CZ0ZAM.P11
ST17
S718
S719

5720

MACY11l S0A(1052)
19-JUN-84 15:45

027124
027126
027130
027132

027134
027136
027137

SEQ 114

19-JUN-84 16:22 PAGE 114
CZDZA DZ11 DEVICE DIAGNOSTICS.

BNE

001372
000002
000000
000000
000000
000

64:
7¢:
84:
9¢:

10%:

000

RT1

0
0
0
.BYTE O

.BYTE O

1COMPARE THE FIRST CHARACTER IN THE TELCTYPE INPUT
1BUFFER TO THE CHARACTERS "E” AND “C".
1IF THE CHARACTER IS "E” CLEAR THE FLAG
1IF THE CHARACTER IS “C” SET THE FLAG
027140
027144
027152
027160
027162
027164
027166
027174
027176
027202
027206
027210
027212

017605
142737
122737
001002
105015

000000
000040
000105

000103

112715

062716

011272
011272

011272

177777

000002

. PAWCH : MOV
8ICB
CcrP8
BNE
CLR8
BR
14
cP8
BNE
MOVE
24:
ADD
3s:

104404
000752

RTI

INSTER
BR

&SP).RS
40, INBUF
¢'E,INBUF
1
(RS)
24
¢’ C,INBUF
3
¢-1,(RS)
02.(5’)
.PANCH

1SET FOR LOMER CASE INPUT
+IS IT *E” ?
;000

$IS IT *C” ?
13177

;RETRY

; THIS ROUTINE CONVERTS LINE SPEED (LINESP) AND

sLINE NUMBER (SAVLIN) FOR DZLPR, DZTCR AND DZCSR
lfiGISTER USAGE .
027214
027222
027232
027236
027242

027244
027246
027252
027256
027262
027264
027266
027270
027274
027302
027306

013737
013700
005037
012702
005300
100402
006302
000774
012701
010237
022137
001407
005721
001373
104402
012705
000402
011137
000205

001372
001372
027434
000001

027310
027434
027426

027432

SET:
XTCRO:
XTCR1:

SET1:

1¢:

NUMTCR
o1,.R2

;SAVE SAVLIN
;1COPY THE LINE NUMBER FOR LOOP CONTROL
1SET A DEFAULT OF LINE O OR NO LINES
1SET A BIT POINTER TO THE FIRST LINE

BMI
ASL
B&

SET1
R2
XTCR1

aIF SO, R2 POINTS TO THE RIGHMT LINE
1IF NOT, MOVE THE POINTER TO THE NEXT LINE
aGOSEEIFTNISLDE IS THE ONE

MOV
cP
BEQ

R2.NUMTCR
(R1)+ ,LINESP
]

;1COPY THE CORRECT BIT POINTER

(R1)e
14
+MINVAL
;?Aw.as

1IS IT THE END OF TABLE?
s NO
;INVALID BAUD RATE,BEGIN AGAIN
1JUMP TO BAUD THRU RS

(R1),SPEED

1SET UP BAUD RATE

DEC

MOV

TST
BNE

TYPE
gv

027536
027430

MOV
MOV
CLR
MOV

24:
3:

MOV
RTS

SAVLIN,.NUMLIN
SAVLIN,RO

OTABLE2,R1

1REDUCE THE INDICATOR.IS IV MINUS YET?

L9
CZDZA-HO
CZDZAM.P11
S773
ST74
ST7S
S776
ST77
5778

027310

MACY11l S0A(1052)
19-JUN-84 15:45

SEQ 115

19-JUN-84 16:22 PAGE 115
CZDZA DZ11 DEVICE DIAGNOSTICS.
TABLE2:

000062

010070
000113
010470
000156
011070
000207
011470

1 THE FOLLOWING IS A TABLE OF LEGAL BAUD RATES (8 BITS/CHAR)
.WORD
. WORD

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

000226
012070
OO0A 54

.WORD
. WORD

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

012430
001130
013030

0
WOFLG:
STFLG: O
LOCKUP: O

LAST:

O
O
O
110.
6307

NUMLIN:

100

NUMTCR:

PRIO:
047324
051124

046101
035103
020104

TOATA:
RDATA:
BYTONT:
LINESP:
SPEED:

240

RECDAT: 0
O
TTMOF:
MVECTO: .ASCIZ
MREGAD: .ASCIZ
MPASS:
.ASCIZ

MINVAL:
MLINE:
MSPEED:

.ASCIZ
.ASCIZ
.ASCIZ

50.

10070
75.
10470
110.
11070
13S.
11470
150.
12070
300
12430
600.
13030
1200.
13430
1800.
14030
2000.

14430
2400.

15030
3600
15430

4800.

16030
7200.
16430

9600.

17070
’1 .0

150 BAUD

nsm
:

1110 BAUD
1 TWO STOP BITS
11354.5 B8AUD
s TWO STOP BITS
1150 BAUD
;1 TWO STOP BITS
1300 BAUD
tONE STOP BIT
1600 BAUD
;ONE STOP BIT
11200 BAUD
tONE STOP BIT
118600 BAUD
;ONE STOP BIT
12000 BAUD
;tONE STOP BIT
12400 BAUD
sONE STOP BIT
13600 BAUD
tONE STOP BIT
14800 BAUD

sOE STOP BIT
1 7200 BAUD

lOE STOP BIT

19600 BAUD
'

1 TABLE TERMINATOR
1ECHO OR CABLE FLAG

1PROGRAM START FLAG
1 TIMEOUT FLAG
iLAST ERROR PC

tDEFAULT BAUD RATE

sDEFALT 110 OA\D 8 BITS/CHAR,
1FOX, 2 STOP BIT
1DEFAULT VALUE, fiC INTERRUPT ENABLED
sDEFAULT VALUE,TCR BIT O
1DEFAULT DEVICE PRIORITY S

<200>/VECTOR ADDRESS- /
<200>/CONTROL fiGISYER ADDRESS- /
<200>/PASS DONE./

<200>/INVALID BAUD RATE - /
<200>/LINE : /
- /
<200>/BAD RATE

M9
CZDZA-HO
CZDZAM.P11

027612
027¢S2
027720
027745
027762
027771

052200
053600
052200
200
006777
124
006777
030100

050131
044510
051105
040503
1 m
042510
177

19-JUN-84 16:22 PAGE
1
CZDZA D0Z11 DEVICE DIMSTICS

0201035
044103
044313
046102

177412

050440

MCMAR:
MMICH:
MTERM:

MCABLE:
MOUICK:

030310
030310
030310

.ASCIZ
.ASCIZ
.ASCIZ

.ASCIZ
.ASCII
.ASCII
ASCII

177412

ID’E~l!ifi!£!glghi!fisgi-‘iflsgsgsz§§s§sl.’§~l,Lfl1E(fi’§i'1HE!§!§1§¥§!§!HE !E!HE-‘!Hgls

00066

MACY11l SOAC1052)
19-JUN-84 15:45

SEQ 116

<200>/TYPE A CHAR. ON DZ11 TERMINAL
/
<200>/WMICH TEST ? ECHO m CABLE (E OR C) /
<200>/TERMINAL ECHO TEST 7/

<200>/CABLE TEST /
<377><15>¢377><377><12><377><377>
/THE QUICK BROMN FOX JUWMPED OVER THE LAZY DOGS BACK 0123456789/
<377><15>¢377><377>¢12><377><377><¢377><0>

802288080000 ¢R0RARERSCBERREEANRL0RLRGEEDREREGEABREROBEROSRESR

A0 RERA0RECEARARMRONLLER0PEE08AERERRENSREGEIREBREGALEDS

sUTILITIES

s THIS UTILITY CALCULATES PRIORITY LEVEL,SETS UP CSR'S,SETS UP VECTORS.
DZLEV: ASL
DZPRT
1BUILD PRIORITY IN MS LOCATION
ASL
OZPRY
flfim ARITHMETIC SMIFTS, ROTATE
ASL
DZPRT
'
THE PRIORITY LEVEL PAST
ASL
DZPRTY
l
THE BIT POSITIONS CORRE
ASL
DZPRT
SPONDING TO TME CONDITION CODES
MOV
DZPRY,LESS1
.mvt THIS TO LESS1
SUB
#1,LESS]
1CREATE Tl( ‘XY LOMEST PRIORITY
B8IC
#37,LESS]1
;INSURE THAT THE TNZVC BITS ARE CLEAR
MOV
OZRIV,.RO
tPLACE THE BASE VECTOR ADDRESS IN RO
£00)
#2,.RO
tCALOUWLATE THE RECEIVER INTERRUPT STATUS ADDR.
MOV
RO,DZRIS
1STORE IT MERE
AT
#2,.R0
stCALCULATE THE TRANSMITTER INTERRUPT VECTOR
MOV
RO,DZTIV
037“ IT HERE
ADD
02.R0
sCALCULATE THE TRANSMITTER VECTOR STATUS ADDRESS
MoV
RO,DZTIS
OST“ IT HERE
s THIS SEGMENT SETS UP POINTERS FOR THE GIVEN DZ11. $BASE IS THE BASE ADDRESS
;:OF THE CEVICE
MOV
$BASE ,RO
;:COPY THE ADDRESS BEING LOADED
MOV
RO,DZCSR
: XXX0
INC
R
MOV
RO,HDZCSR
§ XXX1
INC
RO
MOV
RO, DZRBUF
§ XXX2
MOV
RO,DZLPR
§ XXX2
INC
RO
MOV
RO , HDZRBUF
3§ XXX3
MOV
RO, HDZLPR
§ XXX3
RO
INC
§ XXX4
RO,DZTCR
MOV
RO
INC
MOV
RO ,MDZTCR
1 XXXS
INC
RO
MOV
RO, DZMSR
§ XXX6
MOV
RO,DZTDR
3§ XXX6
RO
INC
§ XXX7
RO, HDZMSR
MOV
XXX7
§
RO, HDZTOR
MOV
DZPRT:
LESS1:

RTS

PRS
PR4

sLEVEL TO ALLOW INTERRUPTS

NS
CZDZA-H0
CZDZA1.P11

MACY11l SOAC1052)
19-JUN-84 15:45

19-JUN-84 16:22 PAGE 117
CZDZA DZ11 DEVICE DIAGNOSTICS.

5870
S871 030312 000000

1ERROR ERROR TABLE
1ERROR 0
0
.ERRTAB :

S87S 030320 030540

EM1
om1

S872
g;}

S876

030314
030316

030322

000000
000000

032045

0
o

DMl

1 ERROR

g;z

030324

032276

S879

030326

030613

Em2

1ERROR 2

S883

030334

030641

EM3

1ERROR 3

S880
S881
S884
S885

030330
030332

030336
030340

032070
032310

032123
032326

oH2
012

OH3
oT3

S888
”Sl”

030344
030346

032123
032326

030700

EM4

{ERROR 4

S891

030350

030727

EMs

tERROR S

S895

030356

030360
030362

032135
032334

030736

EM6

:ERROR 6

5899

030364

031014

EM7

{ERROR 7

5903

030372

031055

EMS

:ERROR 10

5907

030400

031117

EM9

1ERROR 11

5911

030406

031155

EM10

1ERROR 12

S887

S89%2
w
5896
505.9”7
5900
5901

5904
msvos
5908
m
5912
sS:{:

5915

030342

030352
030354

030366
030370

030374
030376

030402
030404
030410
030412

032135
032334

032123
032326

032123
032326
032123
032326

032123
032326

OH3
oT3
DHe
DT4

[Pl
DT4

OH3
oT3

DH3
oT3
DH3
T3

DH3
oT3

5916
SS:};

030416
030420

030414

031214

EM13

tERROR 13

5919

030422

031245

EM14

1ERROR 14

5923
5924
5925

030430
030432
030434

031277
000000
000000

EM1S
0
0

:ERROR 15

5920
%

030424
030426

032123
032326

DH3
oT3

SEQ 117

CZDZA-H0
CZDZAM.P11
a2

B10

16:22 PAGE 118
MACY11 SOAC10S2) 19-JUN-84
CZDZA DZ11 DEVICE DIAGNOSTICS.
19-JUN-84 15:45
031341
032123
032326

EM16
eSS

S931 030444 031412

(3,18}

032326

oTs

S927
$S928
mso
59

S932

;;:.s

030436
030440
030442

030446

030450

032123

0TS

1ERROR 17

S93S 030452 031450

£H20

S939 030460 031511

(3,731

JERROR 21

S943 030466 031541

EM22

JERROR 22

S947 030474 031603
S948
S$949

030476
030500

032123
032326

(3,73

;ERROR 23

$951
S952
S953

030502
030504
030506

031633
0321°3
032326

2zt
o3
0T3S

S95S
S956
S957

030510
030512
030514

031661
032123
032326

£HZS
]
oT3

S959

030516

030520
030522

032123
032326

031711

EM26

S963
5964
S96S

030524
030526
030530

031740
032123
032326

(3,73}
OM3
oT3

S967
S968
S969

030532
030534
030536

032010
032243
032374

EM30
D
076

S$936
g:z

S940
S941
S944
S94S

S960
S961

030454
030456

030462
030464

030470
030472

032123
032326

032164
032352
032135
032334

3
oT3

5]
0TS
Dbt
oT4

D3
oTS

oM3
oT3

S€0

-118

C10
| CZ0ZAM.P11
$971

S972

030540
030613

030641

030700
030727
030736

031014

031033
031117

031155

031214

031243
031277
031341
031412
031450
0313511
0313541
031603
031633

MACY11l SOA(1052)
19-JUN-84 15:45
047200

020117
22
031124
041303
OA0504
030332

19-JUN-84 16:22 PAGE 119
CZDZA DZ11 DEVICE DIAGMNOSTICS.

046123
044507
047101
044503
040524
020061
080522 031316
0471235 034105
04232 042503
047123 034103
st Y 020117
04453 047314
021501 0445324
042322 042101
0-0101
044303
040314

§8§§8
By ENARIRIRYY

| CZDZA-MO

Enl:
e

l!”z MESSAGES
.ASCI
.ASCIZ

emMs:

.ASCIZ

(1, .1}

.ASCI2

€6
e

.ASCIZ
.ASCIZ

ens:
e

.ASCIZ
.ASCIZ

(1, B
(2, N
eM0:

es:

e16:
enr:
0
el
or2:
ees:

(3,7 1

ees:
6
er?:
EM30:
oMl:
D R:
oS
:
OMS:
v

.EVEN

DT1:

ASCIZ
LASCI2
.ASCIZ

.ASCIZ
.ASCIZ2
.ASCIZ
.ASCIZ
.ASCIZ2
.ASCIZ
.ASCIZ
.ASCIZ
¢
.ASCIZ
.
.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ

001372

001

001214
001212

001

<200>/RECEIVER DOMNE SMOWLD NOT BE SET/
<200>/RELATIVE TIMING ERROR./

<200>/7M0DEN SIGNAL ERROR ON cnu TEST/

<200>/PARITY
OCCURRED/
<200>/FULL BINARY COUNT PATTERN NOT RECEIVED/
<200>/8AUD RATE TIMING TEST ERROR/
<200>/TRAP PC DZ11 REG/
<200>/7EXPECTED FOUND REGISTER/
<200>/7LINE ND./
<200>/7EXPECTED FOUND LINE/
<200>/TX LINE PREVIOUS TIME ACTUAL TIME PARAMETER/
<200>/MIGH
LOW
COUNT LINE/

6.3
6.1

.BYTE

6.1

.BYTE

6.1

SAVLIN

DT4;

000003

<200>/READING DZAAF DID NOT CLEAR SILO ALARM/
<200>/0ATA VALID SMOWLD NOT OE SET/

6.4

SREGO

DTs:

<200> N\NEXPECTED TRANSMITTER INTERRUPT/
<200>/RECEIVER FAILED TO INTERRPT/
<«200>/7UNEXPECTED RECEIVER INTERRPT/
<200>/SI1L0 ALARM SET TOO SOON/
<200>/7S1L.0 ALARM FAILED 70 SET/
<200>/7ACTION DETECTED ON INVALID LINE./

3
.BYTE
SREGA

001

<200>/TRANSMITTER FAILED TO INTERRPT/

1DATA TABLES FOR ERROR MESSAGES

F
.BYTE
SREG1

SREGS

001

<200>/RECEIVER DOME NOT SET/
<200>/DATA COMPARISON ERROR/
<200>/0211 *RECEIVER \FFERe ERROR/

.ASCIZ

$REGO

oT2:

<200>/ND SLAVE SYNC RESPONSE FROM DZ11 REGISTER/
<200> MEGISTER R/W FAILURE?
<200>/TRANSMIT READY (TROY) NOT SET/

3
SREGS

SREGA

3.1

6.4

6.1

SEQ 119

D10
| CZDZA-MO

CZDZM1. P11
032346
032350
032352
032354

MACY11l S0A(1052)

19-JUN-84 15:45

003

001372
000004

003
001372
006
001214
006
001220
006
001400
000004
006
024110
006
024104
006
024106
001
001372

.BYTE
SAVLIN

001

005

oTS:

007
001

0Té6:

.BYTE

$REGS
.BYTE
$THP)
.BYTE
REGIST
4

OCOUNT
.BYTE

001

CCOUNT

001

.BYTE

001

3,1

SAVLIN

o011

001

SEQ 120

19-JUN-84 16:22 PAGE 120
CZDZA DZ11 DEVICE DIAGNOSTICS.

SAVLIN

3.5

6,7
6,1
tFOR BAUD RATE ERROR MESSAGE

6,1

1,1

1HIGH COUNTER

1LOW COUNTER
tACTUAL XMIT COUNT
sTHE LINE NUMBER ERROR OCCURED ON
INDIVIDUAL BAUD RATES

OLYTBL: 2450

1560
1120
7350
660
330
150
60
40
30
20
10
1
1
B
1

'TIME FOR
S0 BAUD
'TIME FOR
75 BAUD
+TIME FOR 110 BAUD
1TIME FOR 134 BAD
1 TIME FOR 1350 BAUD
+TIME FOR 300 BAUD
1TIME FOR 600 BAUD
1 TIME FOR 1200 BAUD
:TIME FOR 1800 BAUD
1TIME FOR 2000 BALD
1TIME FOR 2400 BAUD

1 TIME FOR 3600 BAUD
' TIME FOR 4800 BUAD
1 TIME FOR 7200 BAUD
' TIME FOR 9600 BAUD
1 TIME OF DELAY FOR 19200 BAUD

032456

001512

001512
000001

CORMAX ;

. *MANTO
100000

sDELAYS WERE COMPUTED TO ALLOW MAXIMUM TIME AT EACH BAUD RATE
11745 WITH BIPOLAR
sFOR ALL TESTS TO FUNCTION CORREC TL Y
TEST
1740 AND 11/10.
€D
JMEMORY, TME TIMES MERE ALSO

E10
CZDZA-HO
CZDZAM.P11

MACY11l SOAC1052)
19-JUN-84 15:45

= 160010

1208

ACTIVE

12v8
1311¢
1208

2
e

HE T

ADDMW13= 000000
ADOM14= 000000
ADOM15= 000000

cEES R RN R RARRARARARA
R ARARAANANANY

= 000000

ADDOM1 = 000000
ADDM10= 000000
ADDM11= 000000

1249

1208

2145
22730
2147

3388

ACDM1 =

SEQ 121

19-JUN-84 16:22 PAGE 122
CROS S REFERENCE TABLE -- USER SYMBOLS

1907

796¢

2817

2819+

2824

2825«

2826

2829+

3377
5159

3589
5187

3603
5202

3650
5215

3659

3810

4413

22740

2563

2816+

2381¢

2275¢

4538

4795

4843

4970

F10

AVECT1= 000000
AVECT2= 000000

025462
8AUD
BCOUNT 024106
SBINMRD 007120
8IT0 = 000001
8IT00 = 000001
8ITO1 = 000002
8IT02 = 000004
8IT03 = 000010
8ITO4A = 200020
B8IT0S = 000040
8IT06 = 000100
81707 = 000200
8ITO8 = 000400
8IT09 = 001000
= 000002
8IT1
B8IT10 = 002000
8IT11 = 004000
010000
020000
040000
100000
000004
000010
000020
000040
000100
000200
000400

L
-

=
=
=
=
=
=
=

@®

=
=
=
=

8IT12
8IT13
8IT14
8IT1S
8IT2
BITS
BIT4
BITS
8IT6
8IT7
BIT8

BPTVEC= 000014

1208
1208
S446¢
5066
2437¢
9134

SEQ 122

19-JUN-84 16:22 PAGE 123
CROSS REFERENCE TABLE -- USER SYMBOLS
1247
1248
3766
5093¢
993
913
912
911
910

$2232883

MACY11l SOAC1052)
19-JUN-84 15:45

CZDZA-HO
CZ0ZAM.P11

S150«

S156¢

5176

S5184e

5189

5191

5972

995

997

999

1036

1055

3433

3605

4934

1056

3433
986
3433
1031

987

1021

1022

1023

1024

1032

1047

1066

1078

2083

3632
5629
3017
1769
1962
1038
1059

5626
2834
3433
4896
4896

995
964
1031

1077
1030

1026
972
973
974

1079
3336

97
1002

1057
1039

1766

1003

3019
987

1018

1020

1022

1024

1076

2944
985
3433
986
3433

987

1019

1020

1023

1024

5179

5209«

S972

2546

2617

2937

1073

5149

19954

1997

S012¢
S013+

S5033¢
5035e

5152

S246¢
S247

S177e

32544
5255¢

3017

2936

1041

005372

24540

4898

1060

1013

1010
1011
962
1030
962
1031

2967

R——

G10
CZDZA -0
CZDZAM.P11
= 001000
Co1L
= 002000
Co2
= 004000
CoS
= 010000
Coa
= 027000
CoS
= 040000
Co6
= 100000
CO7
= 000013
CR
CRLF = 000200
CSRMAP 012272
011542
CYCLE
DATABP 007512
DATAHD 007500
DCLASM= 104417
DCLR

= 00002)
024110
DDISP = 177570
DELAY = 104414
DEVADR 006642
DEVICE= 104413

DH1
o2
o3

032045
032070
032123

O
o5
OH6
DISPLA
DISPRE
OLYONT
DLYTBL
DONFLG
DSMR
=
DTRO =
DTR1
=
DTR2
=
DTRS
=
DTR4
=
DTRS
=
DTR6
=
DTR7
=
oT1
012
oT3

032135
032164
032243
001162
000174
007214
032416
001420
177570
000400
001000
002000
004000
010000
020000
040000
100000
032276
032310
032326

D74
DTS
076
OVALID=
DZACTV
DZCRO

0352334
032352
032374
100000
001404
001500

MACY11l SOA(1052)
19-JUN-84 15:45

16:22 PAGE 124
CROSS REFERENCE TABLE -- USER SYMBOLS

10640
1065¢
1066¢
1067¢
1068¢
1069¢
1070¢
8286
829¢

2210
2162

2220
2220

2531
2530
1566¢

2022
2534
2554
3740

2805¢
2358
25574
3336

1557¢

2477
S154¢
1179
2954

1484

K404

4509

2927¢
1968

4594

9MSe

S094¢
3941

2332«
15540
3693
5617
5876
5880
S654
5956

3892
3940
5968
11790
1141¢
1798
1892
13200
8340
10440
1045¢
10460
1047¢
1048¢
1049¢
10304
1051¢
3877
S881
3883

5957
3893
5941
5969
975¢
13066
1370¢

SEQ 123

19-JUN-B84

45594

3964

2368
2484
3714
59726
S5972¢
5888
3960

3896
S972¢
58720
1658+
1658
1892¢
5972
3924«
1178
3373

S972¢
3972¢
3889

3961
3897
5972¢
5972¢
3322
1811s
1701

2561¢
3926

4018

2478
35210

3100
5972

3475

34351

3615

3982

2379¢
3130
3985

3188
415¢

5900
5964
Bkl

S904
5972¢
S972¢

2095«

2573

1943

]
ELE

3956

3978+

5901

3963
5945
3784
1932e

1705

3621

3487

3495

36635

3671

3705

3343
5487

3394
5508

5511

3473

5916

5920

5928

5913

5917

5921

5929

4513

3236
2893«

2984

5032

5498

5584

4238

4776

3302
S454

5912

4053

2805

4575

3788

4305

4141

2495¢

3763

44356

4297

4116
4964

59720
S5972¢

1933
1812

4377

“an

4664

3865

4846

3890

4407

4468

3517
5551

3548
SS73

3591
5593

5932

5936

5948

5952

5933

5937

5949

5953

2993

3012

4691

2811

H10
CZDZA-H0
CZ0ZAM.P11
DZCR1

DZCR10
DZCR11
DZCR12
DZCR13
DZCR14
DZCR1S
DZCR16
DZCR17
DZCR2
DZCRS
DZCR4
DZCRS
DZCR6
DZCR7

DZCSR

MACY11l SOAC1052)
19-JUN-84 15:45

001514

001640
001654
001670
001704
001720
001734
001750
001764
001530
001544
001560
001574
001610
001624

002042

1379¢

1442¢
1451¢
1460¢
1469¢
1478¢
1487¢
1496¢
1505¢
1388¢
1397¢
1406¢
14150
14240
14330

1575¢

549
2838
1579¢

0ZALV0O

001504

1372¢

DZLv4e
DZLVS

DZLV6é
OZLV?

DZMSR
DZvuM
DZPRT

DZRBUF

4581e

001520
001644
001660
001674
001710

1381¢
T
1453¢
14620.
14710

002062
001410
030306

1583¢
1308¢
2632¢

002046

DZRIS

002074

DZRIV

002072

DZTCR

002056

2478

2485«

3967

3988

4031

405S

4404¢
4617

4410
4623

4454e
4627

4217«

030100
002052

001724
001740
001754
001770
001534
001550
001564
001600
001614
001630

2477«

4211

DZLEV
DZAPR

DZLV12
DZLV1S
DZLvi4
DZLV1S
DZLV16
DZLV17
DZLV2
OZLVS

2026

3494

4398
4607

oZAvVl
DZLV1O
0ZLvV1il

1813

Ra74

3939

1480¢
14894
14308
1507¢
1390¢
1399¢
1408¢
1417¢
14264
1435¢

SEQ 124

19-JUN-84 16:22 PAGE 125
CROSS REFERENCE TABLE -- USER SYMBOLS

5320+
3828¢
3443¢

3733«

4221

3757

4236

5761

4276+
4461
4683¢

3035

3099

4108+

4111

3786

429

4466
4684«

3135

3173

4126¢

4132+

4482
4706

4318
4731

454496
4739

3807

3814

4293

4303

4476
4685«

3835

4309

3859
4136
4314¢

5530

5548

3356

5562«

5597«

5620

5655

S847¢

3520¢

3528

3746

3842¢

3930¢

4023«

40%e

4177

4671¢

4849+

4860¢

4937«

S00Se

S17Se

3073
1639
2633

3549
1303«
2034«

3590
2003
4100«

36353
2932¢
4106

4957

5439«
2973«
4107

S024

3585
2974
4130

S025

S5861e
2980
4131

2982
4189

1730

3211

1734

1766«

1769«

5432+

5828«

5492«

5829«

3249
4191
4315«

5427

3287
3888
4194

4206+

4882

49%8¢

4356+
4553¢

S430

4215

S831e

4216
S832¢

4273
S833

4287
5433

4325
SS33

4514
S623

4791

4792+

4877+
4791

4190
5830«
4061

5852«

4877

4878

1577¢
;.Sgg

3061
4600

3518
4734

5792
5221

3853
3232

3894
3307

39N
S312

3992
5430¢

4032
5431

1569¢

4106¢

4130¢

4189«

4215«

4273«

4357

4358+

45%e

1588¢
4876«
1581¢
403S¢

2029
4955«
3067
4068¢

2031¢
5023+
3324
4101¢

4105¢
3419
3372
4184+

4129+
SS17¢
3444¢
4286+

4188«
5598
3700«
A4349¢

4214+
35836
3756+
43962

4272¢

4357«

4593«

4622+

4679+

3797«
4460

3838+
AS32e

3901
4547+

3936+
4605s

4643+

4956+«

S024¢

5518+

5399«

3838e

S$493+

4442e

56049

;izg.

4389+
4595+

4383+

SS16¢

S432

3431
3937«

3954«

3962+

4686+

110
CZDZA-M0
CZ0ZM4.P11

002066

DZTOR

DZTIS

002100

DZTIV

002076

(174’

DZvCO
DZvCl
DZVC10
0ZvC1l
DZvCl2
DZvC13
DZvCi4
DZvC1S
DZVC16
DZVC17?
DZvC2
DZVCS
DZvCe
DZVCS
DZVC6

MACY11l SOAC1052)
19-JUN-84 15:45

[

Y YYY1

001302
001516
001642
001656
001672
001706
001722
001736
001752

SEQ 125

19-JUN-84 16:22 PAGE 126
CROSS REFERENCE TABLE -- USER SYMBOLS
5028«

$172¢

S283¢

5433«

S434¢

S43S

5437

3767«

4131e

3816
5183«
4216+

3869
$270e
4275»

3959«
S437«

4359

4037«
S438«

4134

4723+
4190¢

4360

4682+

4219+
5303

4793

4104

4128e

4187

4213¢

42749

4359

454Se

4681

4793«

4875+

1716

1720

1685
1367¢

2817

2826
1682
3587

2930
1912
3651

2819

2829

2879

2927

2933

4879
S857«
35S1e

4613

4107
S601¢
5840e

4960s

3558
4625
$842e

5439

001766
001332
001546
001562
001576
001612

1633+

S972¢
597260
$972¢
5972¢
$972¢
5972¢
S972¢
59720
59720
$972¢
59720
$972¢
5972¢
5972¢

TT8= 024206

5972¢
5972
S972¢
5972
S5972¢
59724
5972
59724
5972¢
5195

3375
4832

1634+

5555¢

5563

4301+

440Ss

44724«

4794+

4878«

4957«

5561+

S658¢

4954+

S862+
S022+

J10
CZDZA-HO
CZDZAM.P11
ERRMSG 007466
ERRVEC=
ERTABO

MACY11l SOA(1052)
19-JUN-84 15:45

SEQ 12¢

19-JUN-84 16:22 PAGE 127
CROSS REFERENCE TABLE -- USER SYMBOLS
2549
2070
25849

2552¢

2071

2073+

4745

5310

2076+

23756

4790¢

1908

1910»
S261

5849«

3670+

S435¢

S436+

5579+

5859+

2378¢
2220
2743+

LT
58654+
2744

2749

2754

27700

5541

5542+«

5549

1666+«

1677

1687+

1837«

1903

2760

5699
1725

5742

1776

1785

1844

1879

1938

2845

1632+
S810¢
4687+

3034+
5519+

S605+

5833+

S834e

S83Se

3598

3655
4780

3698
4278
4830

3744
4381
4932

3754
4391
4960

1860

1888

1853«

394S

1711

41584
4753

S814¢
5613
1849

LINESP

LINELO
LINELL
LINEL2
LINELS
LINELS
LINELS
LINELG
LINEL?

LINES
LINES
LINES
LINE6

001616

4709

3856

4455

5028

3935

4579

S732+

S414

4023

4597

4033

5733

K10
CZDZA -0
CZDZAN.PL1

LINE?

LOBITS

LOCX

001632

006644

001362

LOCKUP 027414
006636
LOLIN
= 000000
LPO
= 000001
LP1
= 000002
LP2
= 000003
LPS
= 000004
LP4
= 000005
LPS
= 000006
LP6
= 000007
LP7
MAINT = 000010
MANTO
MANT1
MANT10
MANT11
MANT12
MANT1S
MANT14
MANT1S

MANT16
MANT17
MANT2
MANTS
MANT4
MANTS

001512
001526
001652
001666
001702
001716
001732
001746

001622
001636
010766

MCHAR
MCSRX

027612
010716

MDATA

MEPASS
MERRPC
MERRX
MERR2
MERRS
MINVAL
MLINE
MLOCK

011376

010535
011043
010743
010574
010643
027536
027564
010667

010771

MODE

001370

MPASS
MPASSX
MPFAIL

MQUICK
MR

MREGAD

14360
2333
1293%¢

2363
2112

2330

5614
2361

3586
LA LB

3647«

2380¢
2114
3737
5619«
2377¢

4433

4572

3072+

3326«
4649¢

3355
4824¢

3374«
5578

3413«

2752¢
3770

2757e
3872

4015

4040

4330

4500

4850

4923

3489

3695

5701

3753

3855

3937

4031

4108

2538

3907«

4014+

3136
2991

3476
5972

3489

2101+
2837+

2485
3594

2747+
548

3445

3446

3476

3833¢
5809¢

3060+

4071e

3054«

2501«

3066+

993¢

2101

1779

2752
1858

011075
027745

MNEMW

MNTFLG

19-JUN-84 15:45

SEQ 127

19-JUN-84 16:22 PAGE 128
CROSS REFERENCE TABLE -- USER SYMBOLS

001762
001776
001542
001556
001572
001606

MANT6
MANT7
MASTEX

MBADLN
MCABLE

MACY11l S0A(1052)

001417

27300
27740

027522
010732
010472

027762
010560
027466

L10
CZDZA-HO
CZDZAM.P11

027574

MSPEED

027720
001000
010754
027444

MTERM
MTITLE
MTSTN
MVECTO

010724
027652
001360

MVECX
MMICH
NEXT

MACY11l SOAC1052)

19-JUN-84 15:45

NOLIST= sssses

NMLIN 027432
NUMTCR 027434
ODOPAR= 000200
OFFSEY 025214
ONESTO= 000000

4217

4132
S026
5447
S481
1150¢

5493

4276
5520

4389

4404

4854

4544

4553

30S1e

3134«
3646«
4823«

3172«
3692+
4922+

3210«
3736+

4990+

3248+
3832¢
S058+

S606

$760+

5819¢

5337

4997
S348¢

S753«

3927

3979

4020

5512«

$513¢
1940

5548

5562

5597

5443
1292¢
3472
4257

4571

3098+
3596
4562

5490

$7S1e

S817¢

4936

4938

5335

474S
3742
4996

5310

001366

5490«

5491«

5492

PARAM = 104405

1713

1727

1787

1846

1681

4745

2343

5230
2353¢

5236
2360

5310
2362

2364

4930

4998

1884

1889

3030
5601

4205
58204

4235

4350

4355

PARAM1
PARER =
PARERR
PARESE
PARITY=
PARMD =

006506
010000
006562
024460
000100
104415

PAR1
PAR10
PAR11L
PAR12
PAR1S
PAR14
PAR1S
PAR16
PARL17T
PaR2
PRR3
PARS
Pass
PAAE

001524
001650
001664
001700
001714
001730
001744
001760
001774
001540
001554
001570
001604
001620

PRIO

PAR7
PAMCH =
PIRQ
=
PIRQVE=
POPRO =

001510

POP2SP= 022626
PRIO
PRO

1899

001634
104416
177772
000240
012600

POP1SP= 005726

027436
= 000000

000040

4880

4958

2541
S415
1993

025442
OTHER
022372
ot
OVRRUN= 040000
PAR

SEQ 128

19-JUN-84 16:22 PAGE 129
CROSS REFERENCE TABLE -- USER SYMBOLS

1656
5599

3923
5510

3323«
4013+
5572

3371«
4085+

3430«
4168+

5515+

5516

4379
5594+

4478
5595«

4577
5596+

2847

5416

5424

5458

4173

M10
CZDZA-HO
CZDZAM.P11
PR2

MACY11l SOA(1052)
19-JUN-84 15:45

= 000100

000140
000200
000240
000300
000340

PRS
PR
PRS
PR6
PR7

=
=
=
=
=

PS
PSM

= 177776
= 177776

PUSHRO=
PUSH1S®
PUSHOS=
PURVEC=

QUITS

1122

010046
005746
024646
000024

1629«

2693«

1638+

026516

1959«

RCVON = 010000

027422

3757
S821¢
4032+

001400
007514
RESTAR 012106
RESVEC= 000010

REGIST

RESOS = 104410
RIE
= 000100
=
=
=
=

000001
000002
000004
000010

3786
S
L

3807
5543«

3476
5030

2811

2814¢

4763«
3715«

47960

4283

4594

2702

2708+

2720+

4859

$S15

5596

§5448

5545

4035
5623«

4136

4315

4356

4595

4683

4181«

3846+

3870
4270«

3902

S265e

S267

4775

5398

4303

4410

S466-

2721+

5632

S637

S642¢

4882

4958

$972

4865«

ROATA

ROOME = 000200
RECDAT 027440

RINGO
RING1
RING2
RINGS

SEQ 129

19-JUN-84 16:22 PAGE 130
CROSS REFERENCE TABLE -- USER SYMBOLS

4132
5346

4217
5520

5597

RINGA = 000020
RINGS = 000040

RING6 = 000100
RING7 = 000200

RLO
=
R.1
=
RL2
=
RLS
=
RL4
=
RLS
=
RL6
=
RL7
=
RSTART
RSTRT

000000
000400
001000
001400
002000
002400
003000
003400
021714
026740

RXISR1

325002
022214
022472
001372

Ribd

RXTCR
SAVLIN

001406

SAVMUM 001411
SAVPC
001402
SAVOS = 104407

3750¢

3799

4534«

464Se
5263

S010e
S7S1
2001

2519

2823+

4713«

4738

4756

5323«

3925«

4778«

S324e

4387+
4786+

$343¢s

3969

4393«
4826+

S344e

N10
CZDZA-HO
CZDZM1.P11

MACY11 SOAC1052)

19-JUN-84 15:45

SERV.G 007652
027214
SEY
SETAPT 012112
SETFLG= 104406
SET.PS 011440
027246
SET1
SEVEN = 000020
SEVENS= 000060
SILOAL= 020000
SILOEN= 010000
= 000010
SIX
SIXS = 000050
022044
SNAP
SPACNT 007117
027430
SPEED
C26464
SPIN
STACK = 001120

3676

5796

3817

230

25904

2613

Se14

5505

5525

3433
3212

4476

4627

4739

=
=
=
=
=
=
=
=
=
=
=
=
=

=
=
=
=
=
=
=
=
=
=
=
=
=
=
=
=

4617

4553

4595

4533

4554

4644

1932
2614
5506

1935
2615+«

1962
2640+

Sé612

4770

5313

5615
1628
5455«

000001
000001
000002
000004
000010
000020
000040
000100
000200
000400
001000
000002
002000

004000
010000
020000
040000
100000
000004
000010
000020
000040
000100
000200
000400
001000
001000
003400
001400

4518
4544

3476

001462
006654
001160

STOP
SVO5
SWR

SW1l
SW12
SW13
SWl4
SW1S
SW2
SW3
SW4
SWS
SWé6
SW7
S8
SW9
$110
$1200
S134

3400

S751¢
2879¢
1778
27770
S759¢

027412
STFLG
STIKLMT= 177774

SW0
SW00
SW01
SW02
SW03
SWO4
SWOS
SW06
SNO07
SW08
SWo9
S\l
SH10

3352

3084
SS’;

SCOP1 = 104401

SEQ 130

16:22 PAGE 131
CROSS REFERENCE TABLE -- USER SYMBOLS

19-JUN-84

5768

S815¢

2581
S474e

5397
S478

5467
5480«

58084

4589

4677

4835

4868

1675
2117
2654

1679

1799
2513

1833
2571

1675

1935
1922
876

2578
2117
2513

8s1¢

877¢
8766
1019¢

1020¢

2576
2110

1833

2700

2713«

2841

4950

5018

1905

1922
2578
5405

2576
2912+

1927

B1ll
CZDZA-HO

CZDZAM.P11

10210
10250
10320
10260
10270
10220
10260
1029¢
10170
10230
10300
10180
10310
S7S9

027442
024206

SS40e
S071

= 000020
= 000040

10400
104160

TBITVE= 000014
TORO
TOR1L
TOR2
TORS

TR
TORS

= 000001
= 000002
= 000004
= 000010

TOR6 = 000100
TOR7 = 000200
TOATA

027420

001424

001432

001422

9180

10360
1037¢
10380
10390

4829

4832

S7740

SS61
S083
3325

38220
51480
3444

58110

3869
4675

S4870
SS700

SS507

9510
4880

3288
4958

023730
000000
000400
001000
001400

2066
594
Ge0
3618
.00

59720

THTBL
002102
TPVEC = 000064
TRAPVE= 000034

15960
)
9240

5336¢

001426
001430

05
06
07
TEIGHT
TO®
TEST1
TEST2
TFIVE

TIE

001434
001436
001440
002140
011334
025630
026266
002146

= 040000

TKVEC = 000060

=
=
=
=

002000
002400
003000
003400

—

TLe
LS
L6
L7

=
=
=
=
=

TLAST
TLO
TL1
L2
L3

13230
8615

;
3848
4625

D2
TO3

10420
1043¢

13240

3885
4723

3899¢
4724e

4134
4833

4219
4866

4448
4948

4472
S016

4473«
S270

4587
S271e

4S13
S27S

4614e

3476
S026

4108
S248

4126
S285

4191
5597

4206

4211

4314

4356

4548

4SS3

4684

5340

5342

5703

5761

3814

3863

4111

4194

4466

4607

4623

13250
13260

1327¢

13280
1329¢
1330¢
16140
27720
S477
Sa71
16170
9250

9630
9640
9458
9660

CROSS REFERENCE TABLE -- USER SYMBOLS

19-JUN-84 15:45

$150 * 002000
$1800 = 004000
$19200« 007400
S2000 = 004400
$2600 = 005000
S300 = 002400
$3600 = 005400
S4890 = 006000
= 000000
SS0
S60C = 003000
$7200 = 006400
= 000400
STS
S9600 * 007000
TABLE2 027310
TOF
TCCONT

SEQ 131

MACY11 SOAC1052) 19-JUN-84 16:22 PAGE 132

1635¢

3438

1636

3442

3695

TM1
1

Cll
| CZDZA -40

| CZOZAM.P11

MACY11l SOAC1052)
19-JUN-84 15:45

TRTVEC= 000014

001442

001444

TSEVEN
TSIX
TST1
TST10
TST11
TST12
TSTIS
TSTI4

002142
002144
013046
013764
014122
014304
014422
014552

TR2
TRS
TMR
RS
o6
TR?

TSTIS
TST16
TST17
TST2
TST20
TST21
TST22

TST23
TST24

TST2S
TST26
TST27
TSTS
1ST30
TST31
TSTS2
TSTS3
TSTS4
TSTSS
TST36

TSTS7
TST4

001446
001450
001452
001454
001455
001460

919

13310
5326
13320
1333¢
13340
133350
13360
1337¢
1338¢
16150
16160

19-JUN-84

16:22

SEQ 132

PAGE 133

CROSS REFERENCE TABLE -- USER SYMBOLS

4758

4760

4766

2854

2870

30480

4767

4782

S235

5238

5240

5244.

5318

1867
2318
2618

1911
2411
2676

1924
2444
2722

1929
2336
2807

1964
25387
2843

1969
2540
2863

2541
2868

5320

5326¢

1991

1993
2545
S47S

014642
014726
015122
013236
015280
015404
015742

016270
016622

017100
017410
017736
013322
020370
020556
021304
021666
022474
023204
023456

5972

023730
013414

TSTA0 = esesee
TSTS
013506
1ST6
013600
TST?7
013672

TTABLE
TIST

024112
005140

TMOSTO=
TXSVC
TYPDAT
TYPE
=

000040
022116
007502
104402

TYPMSG
7110
71200

007372
002106
002120

2353
1665
1999
2351
5321

2358¢
1743
2165
2356
5665

1866
22835
2616
5765

1990

2543
2995

D11
CZDZA-HO
CZ0ZM . P11
T134
7150
T1800
T2000
12400
7300
75600

002110
002112
002122
002124
002126
002114
0021

TS0

002102

MACY11 SOAC1052)
19-JUN-84 15:45

0021

74800

1600
17200
TS
79600
VEOW

002116
002134
002104
002136
012654

WMRDONT
WTBS.F

007114
007470

1602¢
1603¢
1607¢
16080
16990
16040
16100
1611¢

1599¢

1605¢
1612¢
1600¢
1613¢

30020

S405¢
S407¢
S44S

5469

025530
007260
XCSR . 005072
XEOP ¥ 026724

S44)
2509

S466¢
2511

XHEAD

1911

025260
025270
027410

veCl
VEC2
WOMFLG
XBEGIN
XBX

2419
2550

XERR ;

005114

1992
$510
2000

XMTONT
XMTLIN

001376
001374

13036
13020

011050

024636

XMTSRY
XPASS
XSTART
XSTAT@

005106
025216

011140

4875
1997
1146
1918

XTSThN

007644

2542

= 160210

13680

YYy

= 000500

= 000020

XTCRO
XTCR1

XVEC

027222
027236

005100

SAPTHD

001462

SATYC

006030

STS20
S7TSSe

1994

1485¢
13680
1485¢
13680
14850
1350

SASTAT= esessss U

2254

SATY1L

006004

22438

SATYE
SAUTOB

006022
001154

SATYS

$BASE
$8DADR
$60DAT
sCOM1
sCOM2
SCHARC
SCMTAG
$CM1
=

006012

001310
001142
001146
001314
001316
006000
001120
000006

SEQ 133

19-JUN-84 16:22 PAGE 134
CROSS REFERENCE TABLE -- USER SYMBOLS

2225

S807¢

244Se
2553¢

24530

20240
5552
2033¢

2546
S$S572

S618

S5665¢

4874¢
4827¢

4947¢
4837+«

S01Se
4839

S27S
4564

13956

14040

14130

14226

14310

14400

1449¢

1458¢

14670

14760

14040

14130

14220

14310

1440¢

1449¢

1458¢

14670

14760

14040

14130

1422¢

14310

1440¢

1449¢

1458¢

1467¢

14760

2880

2990¢

S846

27300

4954
20300
$397¢
27300

5669
2513%¢

S022

52610

S399

S7S8

2587¢

20270
13770

14940
13770
14940
13770
14940
1356¢

13866

15030
13860
15030
13860
15030

1512¢
13956
1512¢
13956
1S12¢

2269

22278

2150

22240

1249¢
1170¢
1172¢
12516
1252¢
2167+
1158¢
1190¢

1705«

2830+

2904

2991+

2177«

2184

2212¢

2217¢

11916

1192¢

1193¢

1194¢

22260
1175¢

2566

1195¢

119%6¢

E1ll

« 000014
= 000006
001262

SCRAP = 177777

MACY11 SOA(1052)

19-JUN-84 15:45

1190¢
1188¢
11964
1223%¢

LR 2 ST

CZDZA-HO0
CZOZAM P11

SEQ 134

16:22 PAGE 135
CROS S REFERENCE T ABLE -- USER SYMBOLS

19-JUN-84
1191¢
1190
1197¢

1192¢

1193¢

1194¢

1196¢

1199

1200¢

30410
320810
3568

30460
3312¢
3579¢

3088¢
33180
36304

3093¢
3359¢
3¢al0

40080

46510
2166
1814

1195¢

11964

3122¢
3366¢
36810

3129¢
3417¢
3687¢
42430

41630
4905¢

31604
37210

40740
46570
2220
2891

40804
48004
241l
2928

4157¢

1808«
2014
3052¢
3323
5587¢

1810
20204
3098
33240
36486

1811

1927

2993e

3371

3134
3372¢

3172
34310

2016¢

40864
4823

2769

4168
48240

4169¢
4922

2232
2147

2236
2152

2563
2234

1969«

2045

2079

2081e

2307¢
1988+

2055+

2515

2517

2035

2575

2254

2263+

4085
46630

2220

4817¢
2536

2271¢

2537

4917¢

2547

42520
49740

2676

37310

43620
49850

2843

3196¢
34670
38210

4369¢

S041¢
2863

3827¢

32360
35116
39116

44270

4559

3211¢

3249¢
3547
39240

5053¢

4990

4374
4991¢

43754
5058

4432

2518¢

2532

2548+

S403e

5668+

3173¢
3472
3738¢

3210

34730

3832

32430
3537¢
3918¢

44150

3248
3517¢
3923
44330

3736

2106

3167¢

3516
3834¢

5059¢

4571

F11
CZDZA-HO
CZDZAM.P11
SHIBTS
$IONT
S$ILLWP
$INTAG
sITEMS
SLF
SLFLG

001462
001124
010464
0011355
001134

001232
006247
001126

001130
001266
001272
001276

MACY11l SOA(1052)

19-JUN-84 15:45

1357¢

19-JUN-84

16:22

CROSS REFERENCE TABLE -- USER SYMBOLS

1162¢

2087«
2708

2088
27270

11664

252%¢
2220

2565

2692
11766
1203¢

2264

1163¢

SEQ 135

PAGE 136

22700

1647¢

2105

3597

$399s

SA71e

1970

209%4¢

1358

1362

2093

2145

2230

2265«

2269¢

2246

2258

2245Se

2238

1968+

2090«

3372¢
3568
3827
4169¢

3417
3580
38340
4243

3425
3587¢
3911

5053

S5059¢

59720

50940
56420

31300
36886

31686
37320

2062

2066

1630

S477¢

2096

Sa82

2105

2580e

2582

2861+

2862+

2870«

2872

3135¢
3312
3511
3693¢

3160
3318

3167

31734

3537

3542

4375¢
4905

4074
4427
492%

3517¢
5721

44330
4974

4559
4985

44280

2262+

3458
3641
39240
4362

3467
36484
3999
4369

32060
38284

32440
3919¢

32820
4009

3319¢
4081¢

34260
42534

4370¢

2077

2089

2095¢

2023

2032

2106

5401+

1637

2692¢

2720

1866

2220

2318

2868

2395«
2394+
2393«
2392¢
2391«
2390

2400
2401
2402
2403
2404
2405

5972
5972

1640¢

2708¢

2220

1995¢

1998«

5972
5972

34310

3122
3281
34730

3630

3918

200Se¢

2006«

33240

3731
40866

3512¢

3359

37380
4157
4566
4991¢

35434

4567

G1l1
19-JU4-84 15:45

20220
2701e
1631
2004
2074
1133¢

SEQ 136

16:22 PAGE 137
19-JUN-84
CROSS REFERENCE TABLE -- USER SYMBOLS
2709
2052¢
2053
2092¢
1138

2710+

2711e

2729¢

§§§3=

005070
010470
005122
000000
005320
$SVPC - 000040
$SWMR
= 164000
$RTNAD
$SAVRG
$SCOPE
$SETUP=
$SVLAD

MACY11 SOAC1052)

1982

[

CZDZA-HO
CZOZAM.P11

808

2077

3830

3321
4083

2004
2082
3369
4166

2091
2063
3324
2189

2015
2083
3428

2021

3470

2023
2105
3514

4430

2726
3345
4569

2291

2297

4255

4372

2105
2191
Sé611
2196

2810¢
2198

4822¢

2220

2295

4841«
1805«

4879
1913e

4872+

1915

2734

$297+

3130
3369¢
3688
41660

3132¢
3426
36509
4253

31700
3468
37340

2512¢

2643e

2047
3583

2048
3096
3644

2049
3132
3690

4820

4920

2311

2593

2600

2612

2619

2626

5336

$340

3244

32466

$SUREG

$TKS

jeg

sTHP2

$THPO
TP

$TESTN
$TIMES
$ T8

001172
001177
001170

4918

005176
000020

0015.4

4370
4988¢

43720

2850
3514+

2859
354Se

35140
3919
44300

3543
39210

4567

3096
36448

3132«
3690+

2641

001466
001122

005440
003652
006002
001246
001472
001260
001304
001306
000023
000021

45208

3470¢

2095
3369¢
4166+

2106
3428«
425Se

3470e
4372

3049+
3583«

4430¢

4569+

4660+

2884

3033«

4820

4920«

2630

2633

2183
2215

2169
2208

1541¢

1113
1306¢

1734s

1736+

1737¢

1738«

1739«

2881

2193
1759

2293
2200

2595
2207

2623
2220

2659
2299

2303

1523¢

1526¢

1530
1550¢

1532¢
1551

1533
1553¢

1535¢
1554

1556

1538¢

1565¢

1529¢
1548
1568¢

1536

1562¢

1527
1547¢
1566

1116¢
1308¢

1133
1346

11340
1347¢

1136¢
13490

1138¢
1351¢

11400
1366¢

1143¢
1370¢

1145¢
1371¢

1149¢
1372¢

1157¢
1373¢

1557

H11
CZDZA -0

CZ0ZAH.P11

MACY11l S0A(1052)

19-JUN-84 15:45

13740

16:22 PAGE 138
CROSS REFERENCE T ABLE -- USER SYMBOLS

19-JN -84

13756
1397¢
14160

14356
143540
14730
1492¢
1678
277160

4310
4624
4869
5640

25000

24126
2411¢
24844
24880
24768
S871¢
23166
2281¢
2319
22864
23276
56720
S731¢
24000
23864

027140

205460

005376
011152

ssssse

001462

2224

21104
27424
16260
1635
2470
2117¢

2227
1351

1379¢
1398¢
1417¢
14360
14550
14740
1496¢
1902¢

27730

4343

4647

4951

5645

5743
3034

2761
1647
2465¢

1381¢
1400¢
1419¢
1438¢

1382¢
14010
14200
14420

13830
1402¢
14240
14430

14610
1480¢
1499¢
2106
2809
4456

14620
14810
135004
2220
2933
4462

3331
5972¢

5534

4720

4732

1392¢

14110

14330
1452¢
14710
1490¢
2728
4783

5630

111
19-JUN-84 15:45

CZDZAM.P11

COMMEN
ENDCOM
ERROR

928¢
928¢
822¢

3141
3332
3532
3868

3105

3268
3486
3$mM1

4311
4612
4784

9284
9280
9286
9284
928¢

3642

4986
7960

PRGEND
PRGFRT
PUSH
REPORT

7960
7964
9284
7966

POP

SC
SCOPE

SC1
SETPRI
SETUP
SKIP
SLASH
SPACE
STARS
SWRSU

TYPBIN
TYPDEC
TYPNAM
TYPNUM
TYPOCS
TYPOCT
TYPTXT

$BUFFE
$CYCLE
$EOP
$GETFL
$GETPA
$HEADE
$INTSE
$ JUNK

SLINEV
SLVLTS

9286

7960
823¢
3582

7960
9284
9284
9284
928¢
9286
9284
3094

3732

1131
3130

7960
7964
7964
7960
7964
7960
7964
7960
1494
7966
7960

S641

5345
5646

4119
4308
4531
4765

3512
4658

3543
4818

3581
4918

4747

3168
3919

4164

4253

4370

4428

3245

3283

3320
4254

4371

4429

3427

3469
4568

3513
1659

3544
4819

2124
3512
4658

2222
5543

4818

2690
3581

4918

2706
3642

4986

3047
3638

5054

1449

1458

1467

1476

1485

3282

2714

2250

2694

2700

3131

3169
3920

1207

1343

3207

3266
5625

3261
3480
3766

4064
4300
4520
4755

4292
4517

4721

3319

4010

4082

4165

4164

1345
3319
4253

1352
3367

4370

1980
3426

4428

3168
3919

4081

1973
1775
1694

1709

1724

1784

1842

877

1937

2844

4102

4127

4185

4212

4953

1404

5021
1413

1422

1431

4169

4258

4375

4434

4573

9284

9284
92846
9284
9286
9284
9284
928¢

1153

3712

3235
X454
3759

5560

2713

3733

4919

3230

5243
5622

5213

5532

PASEND

4708

3185
3391
3623
3970
4223
4463

§8%

NEWTST

3179
3383
3619
3944
4209
4412

3147

4149
4348
4640

4121

ESCAPE
GETPRI
GETSMR
MAT

SEQ 138

19-JUN-84 16:22 PAGE 140
CROSS REFERENCE TABLE -- MACRO NAMES

5313

3367

MACY11l SO0A(1052)

CZDZA -0

3368

4567

5501
5657

2766

1503

3738
4072

1377

3834

4155

1386

1395

1440

J11
MACY11l S0A(1052)
19-JUN-84 15:45

$MRESE
$MRR
S$MRRY
sMRD
$MSG

S$PARTS
$SCOPE
$SETFL
$STAG
$STAGF
$TCR
$TLINE
$ TRPOE
$TSTN
$UNIBU
S$VARIA
$xZ

$SCMRE
$SCMTH

$$ESCA
$ SNEWT

$ $SKIP
-EQUAT
.HEADE
.SETUP
.$ACT1
.SAPTB
. SAPTH
. SAPTY
. $CATC
- $CMTA
. SEOP
. $ERRO
. SPOME

. $SCOP
. $TRAP
.$TYPE

7960

4993

7966
7960
7960
7960

7966
7966
7966
7966
7964
7966
7966
7964

1563
7968

3641
4985

7968
7960
7968

3311
3640
4242

49584

11514
11510
9284
928¢

3642

4986
9284
7964
7964
7966

7968
7964
7964
7966
7968
7966
7966
7960
7966
7966
7966
7960

5739

3415

3120
3504
2730
4903

2036
2736
3769

3835

4017

4087

4151

3158
3535

3196

3234

3272

4039

4329

4499

1533

3871

3357

1524

1527

1530

3046
3687

3093
3731

3129

3827

3167
3918

3040

3045
3358

3087
3365
3720

3416
3730

5053
3039
1148

3317

3680

4251
5040
1190
1196
3047
3688
5054
818
799

1129
1205¢
1341
2220
1151
1978

2121

4237

4259

4376

4435

4574

4663

4844

4925

1536

1539

1542

1545

1548

1551

1554

1557

1560

4163

3281

3318
4252

4369

4427

3425

3467
4566

3511
4657

5542
4817

3580
4917

3159

3166

3910
4565

3917
4650

3197
3510

3536

3242
3567

3273
3578

4799

4504

4156
4916

3280
3629

4656

3235
3541
4073
4816

4162
4973

3282

3319
4253

4370

4567

3512
4658

3543
4818

3581
4918

4972

3310
3679
1521

1566

4170

4361

4368

4414

1191
1197

1192
1198

1193
1199

3130

3168

3732

3828

3919

3243

3121

3128
3457

4426

4558

§ %

CZDZA-HO
CZDZAM.P11

SEQ 139

19-JUN-84 16:22 PAGE 141
CROSS REFERENCE TABLE -- MACRO NAMES

1195

4081

4164

3366

3367

3426

4428

K11
CZDZA -H0

CZCZAN.P11

. ABS.

MACY1l S0A(1052)

19-JUN-84 15:45

19-JUN-84

CZDZAM,CZDZAM/CRF 7SOL/NL : TOC=CZDZAM.P11
RUN-TIME: 24 19 2 SECONDS
RUN-TIME RATIO: 132/46-2.8
CORE USED: 38K (7S PAGES)

PAGE 142

CROSS REFERENCE TABLE -- MACRO NAMES

032456

ERRORS DETECTED:

16:22

SEQ 140