Digital PDFs

AH-8783H-MC

February 1985

141 pages

Original

7.6MB

view download

OCR Version

6.6MB

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_bw.pdf

OCR Text

FEB

Bzll

[

i
il
mi...
1

[

1985

MACY11l 30A(1052)

19-JUN-84 15:435

19 AN-84

PAGE 1

SEQ

V-X. VY. XU N YV T VY

CZOZA -+0
CZ0ZAn .P1]

16:22

IDENTIFICATION

PRODUCT CODE
:

AC-8781M-MC

PRODUCT NAME:

CZOZA40 DZ11 LN ASYNC MUX

PRODUCT DATE:

JUNE

MAINTAINER:

MC-DIAGNOSTIC ENGINEERING

TSTS

1984

TME DFORMATION IN V-OS OOCUMENT IS SUBJECT

OHANGE

WITHOUT

NOTICE AND SMAL T BE CONSTRUED AS A COMMITMENT BY DIGIYN.
EQUIPMENT CORPUR2(ION. OIGITAL EQUIPHMENT CORPORATION ASSUMES
NO
RESPONSIBILITY FOR ANY ERRORS THAT MAY AFPEAR IN THIS DOCUMENT.
NS IS ASSUMED FOR THE USE IR RELIABILITY
" JILITY
ND RESPO
¢ ON EQUIPMENT THMAT IS NOT SUPPLIED 8Y DIGITAL
OF SOFTWA
OR ITS AFFILIATED COMPANIES.

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

OIGITAL

poe

UNIBUS

0eC

OECUS

DECTAPE

MASSBUS

Cl
CZDZA -40
CZDZmn. P11
45
46
' B

50
S1
52

S3
54
S5
56
S7

S8
59
60
61
62
63
64
65
65
67
68
69
70

72
73
74

76
77
18
79

80
81
82
83
84

MACY11

SOA(1052)

19-UN-84 15:4F

84
19 AN

16:22

SEQ
2

PAGE 2

ABSTRACT

THME

FUNCTION OF THE DZ11 DIAGNOSTICS IS TO VERIFY THE

OPTION

OPERATES

ACCORDING TO SPECIFICATIONS.
THE OIAGNOSTICS ALSO VERIFY THAT THE 0Z11
OPERATES IN ITS ENVIRONMENT SUCHM AS THE SYSTEM IN WMICH IT IS INSTALLED.
PARNETERS MAY BE SUPPLIED 10 THE PROGRAM BY

EITHER

‘AUTO

SIZING'

INPUT FROM THE USER ON THE CONSOLE BY MAVING SWOO=1 AT START TDME.
AUTO
SIZING WILL O OONE OMLY THE FIRSYT TIME THE PROGRAM IS STARTED AND
OETECT
THE AUTOSIZER IS DESIGMED 71O
SWO7+0 AND SMO0=0 AND SWOS=0.
0211 DEVICE AODRESSES AND VECTORS AND TO DETENMINE WETMER THE DZ11 THAT
ALL REMAINING PARAETERS DEFAULT
IS OETECTED IS AN EIA OR 20MA BOARD.
10 CERTAIN VALUES (SEE SEC.8.5).
CONSOLE INPUT MAY BE CONTROLLED AT ANY
START TIME TMAOUGH THE USE OF SWOO, SWO3, SWO4, AND SWO6 (SEE SEC. 4.1.1
FOR A DETAILED DESCRIPTION OF THESE SWITOHES).

CURRENTLY THERE IS ONE STANDALONE OIAGNOSTIC (CZDZA), ONE SYSTEM
:?TEI;‘)C Xt/,glgblfl). AND AN OMLINE OVERLAY FOR DZITA (ITEP) - DZDZB.
CZDZA WILL TEST ALL PARTS OF THE D0Z11 SUCH AS CABLES, DIST P .,
INTERFACE MODWLE ITSELF.

REQUIREMENTS
EQUIPHMENT
ANY POP1L FAMILY CPU (MITH MINIMUM 8K MEMORY)

ASR 33 (OR EQUILIVALENT FOR CONSOLE)
0211
INTERFACE MOD\LE (M7819(EIA), M7814(20MA))
H3271
ST"SGCRED TURNAROUND CONNECTOR FOR EIA MODULE.
H3190
STAGGERED TURNAROUND CONNECTOR FOR 20MA MODULE.
H325
CABLE TURNAROUND AND DIST PNML TESTING FOR EIA MODWLE.
M31S5

NOTE:

THIS MAY BE SUBSITUTED FOR WN325.

A STAGGERED TURNAROUND CONNECTOR IS NEEDED IN ORDER TO TEST

PARITY AND BREAX LOGIC.

TrE

D1
CZDZA -0
. PLY
CZOZA+
85
86

MACY11l S0A(1052)

19-JUN-84 15:45

19 JUN-84

2.2

88
89

SEQ 3

PAGE 3

STORAGE

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

LOADER

RESIDE.
LOCATION 1500 THRU 2000 ARE ESPECIALLY TO BE NOTED AND TO BE
UNTOUCHED 8Y OPERATOR AFTER PARAMMETERS HAVE BEEN INPUT FROM CONSOLE
(SW00=1);
OR AFTER
THE ‘'AUTO SIZING' MAS BEEN DONE.
THESE LOCATIONS

90
91
%2
93
94

MAY BE CHANGED IF THE

USER

PARNMETERS ARE REQUIRED.

9"
96
97
98
99

UNDERSTANDS

THEIR

MEANTNG

AND

DIFFERENT

LOAGING PROCEEOURE
ME THOD

ALL PROGRAMS ARE IN ABSOLUTE FORMAT AND ARE LOAXED USING
THE
LOADER.
NOTE:
IF
THE ODIAGNOSTICS ARE ON A MEDIA
SUCH

100
101
102
103
104
105
106
107
108
109

JMAGTAPE ,DECTAPE, OR CASSETTE;

INSTRUCTIONS

WHILH MAS BEEN PROVIDED ON THAT SPECIFIC MEOIA.

FOR

THE

ABSOLUTE
AS OISk

MONITOR

ABSOLUTE LOADER STARTING ADORESS ¢500

110
111

MEMORY

¢ SIZE

4K
8x
12

17
37
57
77
117
137
157

16K
20K
24K
28K

112
113
114
115

116

117
118
119
120
121
122
123
124
125
126

16:22

3.1.1

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

3.1.2

DEPRESS 'LOAD ADDRESS'

3.1.3

DEPRESS 'START KEY'
LOADING INTO CPU)

KEY ON CONSOLE AND RELEASE.

CONSOLE

AND

RELEASE

(PROGRAM

SHOULD

NOW

El
CZDZA -0

CZOZAM.P11

MACY11 SOA(1052)

19-AN-84 15:45

19-JUN-84

16:22

SEQ 4

PAGE 4

127
128

129

130

131

STARTING PROCEEDURE
A.

132

133

134
135

136

137

138

SET SWITCH REGISTER TC 000200

DEPRESS 'LOAD ADORESS' KEY AND RELEASE

SET SWR TO ZERO FOR 'AUTO SIZING'
INPUT FROM CONSOLE TERMINAL.

START IF SWO7=1 AND SwW00-0

OEPRESS 'START KEY' AND RELEASE, THE PROGRAM WILL TYPE MAINDEC

AND

PROGRAM

NAME

NAME (IF THIS WAS THE FIRST START UP OF THE PROGRAM OR

PARAMETERS WERE CHANGED BY SWOO=1) AND ALSO THE FOLLOWING:

139

‘MAP OF DZ11 STATUS’

160100
000300
000005

1500
1502

141
142

1504
1506
1510
1512

143
144
145
1‘?
14

148
149
150
151
lgg
{gg

FIRST

USER PARAMETER

THE PROGRAM MILL DEFAMALT TO CONSOLE PARAMETER INPUT (SWOO=1).

140

OR SET SWOO=1 FOR

000377
017070
00000C

THE ABOVE IS ONLY AN EXAMPLE! THWIS WOULD INDICATE THE STATUS TABLE
STARTING AT ADO.
1500 IN THE PROGRAM,
THE STATUS TABLE MUST BE
VERIFIED By THE USER IF AUTO SIZING IS DONE. FOR INFORMATION OF STATUS
TABLE SEE SECTION 8.4 FOR HELP.
THE PROGRAM WILL TYPE "RUNNING” AND PROCEED TO RUN THE OIAGNOSTIC.
4.1

CONTROL SWITCH SETTINGS

156
igz

NOTE:

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

159
160
161
162
163
164
165
166

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

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

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

169
170
171
172
173
174

SW 06
SW 05
SW O4
SW 03
SW 02
eeSW 01

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

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 TESY
RESTART PROGRAM AT SELECTED TEST

177

FOR

17°
bR

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

167
168

132

178

181

182

SW 07

oSW 00

SET:

NO AUTO SIZE. IF 1ST START OF PROGRAM AFTER LOADING THE
OPERATOR MUST INPUT ADDRESS AND VECTOR FROM CONSOLE.

GET USERS PARAMETERS FROM CONSOLE

ECHMO OR

SWITCH

CABLE TESTS

SET TO 1 ALLOWS

(PROGRAM STARTED AT LOC. 210)

THE USER TO

THIS

TYPE IN THE VECTOR AND THE

OF EITHMEFR THE ECHO OR CABLE TEST, BAUD RATE, AND THE LINE NUMBER
UNDER TEST,

F1
CZOZA-HO

CZDZAM.P11
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216

217
218
219
220
221
222
223
224

225
226
227
228
229
230
231
232

MACY1l 30A(1052)

19-AN-84 15:45

19 JUN-84

4, 1. 1

16:22

SEQ S

PAGE S

SWITCH REGISTER CONTROL OF PARAMETER INPUT yROM CONSOLE
SW 00

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

BASE DEVICE ADDRESS,

BASE VECTOR ADORESS,

BUS REQUEST LEVEL, DECLARE EIA OR 20MA MODWLE, MODE OF NPERATION
CEXTERNAL ,INTERNAL, OR STAGGERED), AND THE MUMMBER OF DZ11°'S THAT
ARE RUNNING.
PARAMETERS:

USING
THIS
SWITCH
ALONE DEFAMATS THE FOLLOWING
ALL 8 LINES ARE SET TO BE TESTED ON EACH DZ11,
THE

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

FOR
THE MAJUORITY
OF TESTING IS SET AT EIGMT BITS PER CHARACTER
WITH TWO STOP BITS.

SW 03

EXTRA PARAMETER INPUT

SETTING

THIS

SWITCHM

THE OELAY PARAMETER
OF THE DIAGNOSTIC TESTS.
ADJUSTED TO THE BAUD RATE GIVEN BY THE USER.

SW 04

START P TIME

PROVIDES
THE
USER WITH THE ABILITY TO SET THE LINES ACTIVE FOR
TESTING AND TO SET THE DEFAULT
BAUD RATE USED
FOR THE MAJUORITY

IS AUTOMATICALLY

SELECT DELAY PARAMETER. THE DELAY PARNETER THIS SWITCHM CONTROLS
DETCRMINES THE LENGTH OF TIME THE PROGRAM STALLS WAITING FOR A
THIS DELAY
CHARACTER TO BE COMPLETELY TRANSMITTED OR RECEIVED.
COUNT IS AUTOMATICALLY SET TO PROVIDE ENOUGH DELAY TIME FOR THE
OEFAMAT BAUD RATE SPECIFIED WHEN RUNNING THE PROGRAM ON AN 11/45
WITH BIPOLAR MEMORY.
WHEN RUNNING THIS PROGRAM ON A FASTER
PROCESSOR THE DELAY PARAMETER SHOULD BE ADJUSTED PROPORTIONALLY
HIGHER THAN THE FOLLOWING DEFAULTED VALUES:

2450
1560
1120
0750
0660
0330
0150
0060
0040
0030
0020
00190
0001
0001
0001
0001

sTIME FOR
SO BAUD
;TIME FOP
7S BAWD
;TIME FOR 110 BAUD
1 TIME FOR 134 BAUD
;TIME FOR 150 BAUD
;TIME FOR 300 BAUD
;TIME FOR 600 BAUD
1 TIME FOR 1200 BAUD
;TIME FOR 1800 BAUD
1 TIME FOR 2000 BAUD
1 TIME FOR 2400 BAUD
1 TIME FOR 3600 8ALD
1 TIME FOR 4800 BAUD
1TIME FOR 7200 BAUD
1 TIME FOR 9600 BAUD
;TIME FOR 19.2 KBAUD

see NOTE see

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

9600 BAUD IS THE SPECIFIED MAXIMUM,

Gl
CZOZA -0
. P11
CZOZA
233
234
235
236
237
238
239
240

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

19-AN-84

16:22

4.1.2

SWITCH REGISTER RESTRICTIONS
SW 06

258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278

TYPED

OUT

FOR

SETTING

THE

IF
THE
SET
IN

PLEASE NOTE THAT A

SWITCH

MESSAGE

EQUAL

TO DZ11'S

SYSTEM MWAS FOUR 0Z11S;
BITS
LOC
°'DZACTV'
FROM
THE
SWITCH

REGISTER.
USING
THIS
SWI TCM( SW06 )
ALTERS
THAT
LOCATION; THEREFORE IF FOUR DZ11S ARE IN THE SYSTEM ¢eeDO NOTees
SET SWITCHES GREATER THAN SW 03 IN THE UP POSITION.
THIS WOWD
BE A FATAL ERROR.
DO NOT SELECTY MORE ACTIVE DZ11iS THAN HMAS BEEN
GIVEN INFORMATION ABOUT IN PARAMETER INPUT (SWO0O-=1)
LOAD ADDRESS 200
START WITH SW 06-1

PROGRAM WILL TYPE MESSAGE

SET THE BINARY NUMBER OF 0Z11S OESIRED ACTIVE EXA®PLE:
1-1
0Z11;
3-2 0211;
7-3 DZil;
17-4 DZ11 375 DZ11 ETC/AA PRESS

“m

METHOD:

(=Tal.
B J

243

250
251
252
253
254
255
256
257

RESELECT DZ11'S DESIRED ACTIVE.

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

241
242

244
245
246
247
248
249

SEQ
6

6
PAGE

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

SW 01

RESTART PROGRAM AT SELECTED TEST

IT IS STRONGLY SUGGESTED

THAT
AT LEAST ONE PASS HAS BEEN MADE BEFORE TRYING TO SELECT A
TEST THAT IS NOT IN THE ORDER OF SEQUENCE THE
REASON BEING
IS
THAT
THE
PROGRAM HMAS
TO
CLEAR
AREAS AND SET UP PARAMETERS.
NOTE:
IF RUNNING MATIPLE DOZ11'S;
THE DZ1l YOU DESIRE
710 B¢

UNDER TEST MUST BE SELECTED BY THE USE OF SWO6 BEFORE LOCKING ON
THE TEST.
IN OTHER WORDS;
EACH TIME THE
PROCRAM
IS
STARTED;
THE
FIRST DZ11 WILL BE SELECTED TO BE UNDER TEST UNLESS SW06 IS
USED TO SELECT ONLY ONE.

SWw 09

LOOP ON CURRENT DATA:
THIS SWITCH WILL ONLY 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.

SW 04

SELECT DELAY PARAMETER: THIS SWITCH SHOWL.D BE USED

WITH

CARE

AS TOO SMORT 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,
THE SMORTEST PARAMETER IS 1; THE LONGEST ACCEPTED IS
2,1 SET,
177776.

(SEE SEC. 4.1.1)

H1
CZDZA-HO
P11
CZDZ. AH

MACY11 30A(1052)

19-UN-84 15:45

19-JUN-84

4.1.3

16:22

7
SEQ

PAGE 7

SWITCH REGISTER PRIORITIES

N E W

ERROR SWITCHES

SW 12
SW 13
SW 1S
SW 08
SW 10

DELETE PRINT OUT/PELL ON ERROR.
DELETE ERROR PRINIOUT,
HALT ON THE ERROR.
GOTO BEGINNING OF THE TEST(ON ERROR).
GOTO NEXT TEST(ON ERROR).

SCOPE SWITCHES

W W

own

SEREEERERERERESYRYLSE

3.
4.2

SW 09 (IF ENABLED BY 'SCOP1°').
THE

TEST

IF AN ‘e’

NO. ON AN ERROR REPORT (EX.

IS PRINTED IN FRONT OF

oTEST

NO.

10 ) SwW09 IS

INCORPORATED IN THAT TEST AND THEREFORE SWO9 IS eUSUALLYe
THE
BEST SWITCH FOR THE SCOPE LOOP (SW14=0, SW10=0, SW09=1, SWO08-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 +HARDe
ERROR
(CONSTANT);
SWO8 IS BEST.
FOR INTERMITTENT ERRORS EITHER START THE PROGRAM WITH SWO1 AND
SWO2 SET WHICH WILL ALLOM THE USER TO LOCK ON A SELECTED TEST,
OR ELSE SET SWi4 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 AODRESS

SA 200 - ADORESS 200 IS FOR NORMAL EXECUTION OF THE DIAGNOSTIC.
THIS
WILL
00 THE MAJUOR TESTING NECESSARY FOR VERIFICATION OF

SA 210 - CABLE/ECHO - TERMINAL TESTS.

STARTING AT ADORESS 210 WILL GIVE

THE USER THE OPTION TO VERIFY THE EIA CABLES AT THE DIST PNL OR
fll;;l A TRUE LINC TO ANY DEC SUPPORTED TERMINAL SUPPORTED BY
1.

317

UNDER

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

FOUR

NOTE:

IF ADORESS 000042 IS NON-ZERO THE PROGRAM ASSUMES

AFTER eALLe
ACT11 OR XXDP CONTROL AND MWILL ACT ACCORDINGLY.
AXQ{LABLE DZ11'S ARE TESTED THE PROGRAM WILL RETURN TO ' XXDP' OR
'

-11'.

OPERATING PROCEDURE

I1
CZDZA -HO
CZDZAM. P11
329
330
331
332
333
334
335
336
337
338
339
340
341
342
343
344
345
346
347
348
349
350
351
352
353
354
355
356
357
358
359
360
361
362
363
364
365
366
367

MACY11 30A(1052)

19-JUN-84 15:45

19-JUN-84

5.1

16:22

SEQ 8

PAGE 8

NORMAL START OF OIAGNOSTIC
ON THE FIRST START OF THE DIAGNOSTIC AT ADORESS
200;
IF
AJTO
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 DZ1l
CSR
IN
THE
TESTING TO BEGIN AT,
RANGE:
160000:163700

“1ST VECTOR ADORESS (300:770):

“BR _EVEL (4:6):
TYPE

RANGE 300:770

WISM

FIRST

ODZ11

THE

SYSTEM

THAT

THE

ABOVE

*
THE

PRIORITY

LEVEL

INFORMATION HAS BEEN GIVEN ABOUT.
"TYPE

YOU

YOU MUST TYPE IN THE VECTOR OF THE

UNDER TEST.

OSYSTEM

*A” FOR EIA MOOWWLE OR

THME

OZ11

RANGE 4 OR 5 OR 6.

"B8" FOR 20MA (A:B8):

TYPE ~A” IF RUNNING A DZ11-A,8,.F (EIA).
TYPE 8~ IF RUNNING A DZ11-C,.D,F (20MA).
TYPING A <CR> DEFAMLTS TO EIA MOOULES.
“MAINTENANCE MODE

(EXTERNAL
(INTERNAL
(STAGGERED
[STAGGERED

<H323>-EIA ONLY
<DZCSRO3=1>
<H3271>-EIA ONLY
<H3190>-20MA ONLY

(
(
(
(

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

J1
CZOZA-HO

CZ0ZAH.P11
368
369
370
3N
372
373
374
375
376
377
378
379
380
381
382

383
384
385

386
387
388
389
390
391
392
363
394
395
396
397
398
399
400
401

352
403
404
40S
406

407
408

MACY11 30A(1052)

19-JUN-84 15:45

19-UUN-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.
ssesesnss

SWOS=]l

SYSTEM.

RANGE

THEN esesesses

IF SWO3=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))..

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

THIS GIVES THE USER A CHANCE TO CHANGE

THE

DEFAMAT

BAUD

RATE

USED IN APP. 90 PERCENT OF THE TEST. BAUD RATE CMOICES ARE:
*00"(
SO BAUD),”"01"(
7S5 BAUD),"02"( 110 BAUD),"03"( 134 BAUD),
*04>( 150 BAUD), "0S5~( 300 BAUD), "06"( 600 BAUD),"07~(1200 BAUD),
*10"(1800 BAUD), ~117(2000 BAUD), "12"(2400 BAUD ), "13~(3600 BAUD),
*14~(4800 BAUD), ~15"( 7200 BAUD), "167(9600 BAUD),"177(19.2 KBAUD)
LOW DEFAULT BAUD RATES ARE NOT SUGGESTED SINCE THEY LENGTHEN THE
TIME TO COMPLETE A PROGRAM PASS DRAMATICALLY.
ees NOTE ees

SPEED SELECY CODE 17 CAN BE USED TO SELECT 19.2¢ BAUD, BUT TMIS
SPEED IS NOT SPECIFIED B8Y DEC., AND SHOULD NOT NORMALLY BE USED.

000080080080080000800080808080848888

IT IS IMPORTANT TO NOTE THAT ALL DZ11'S IN THE SYSTEM MUST BE
ALSO ALL THE EXTRA
CONTIGIOUS FOR BOTH ADORESS AND VECTORS.
PARAMETERS OTHER THAN CSR AND VECTORS ARE GIVEN TO THE

EXISTING

IF NOT ALL DZ11'S ARE SAME PRIORITY OR IF
0Z11'S IN THE SYSTEM.
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 SWOO=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.

K1
CZOZA -HO

CZDZAM .P11
409
410
411
412
413
414
415
416
417
418
419
420
421
422

423

MACY11 30A(10S2)

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 WOULD BE:
WITH THE SWR EQUAL TO 003.

NOTE:

Lbl
-

LOAD ADDRESS

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

210;

START

"BAUD RATE",

“LINE”

*VECTOR ADORESS
- "
YOU TYPE VECTOR WITH A <CR>.

“CONTROL REGISTER ADORESS-"

424

425
426

SEQ 10

PAGE 10

YOU TYPE IN OZCSR UNDER TEST.

"WHICH TEST ?

ECHO OR CABLE (E OR ()"

LETS DO THE CABLE TEST FIRST.
TO(':ER

EIA

VERSION

eTHIS TEST IS ONLY TO BE DONE ON

THE DZ11 NOT THE 20MA VERSION”.,

TYPE “C*

<CR>

“BAUD RATE-

TYPE EXTHER SO,

3600, 4800,
“LINE:

110,

135,

150,

300,

600,

7200, 9600 FOLLOWED BY <CR>

1200 1800, 2000,

2400,

YOU TYPE THE LINE WHICH HAS

EITHER O,

1, 2, 3, 4, S, 6,

THE

H325

TEST

CONNECTOR.

(TYPE

7) PROGRAM WILL THEN PRINT:

“CABLE TEST”

AND IF EVERYTHING IS WORKING;

THE FOLLOWING WILL BE PRINTED:

.
“PASS DONE

TO CHANGE LINES;

HIT ANY PRINTING KEY ON YOUR CONSOLE

TERMINAL

WHILE THE PROGRAM IS RUNNING AND THE FOLLOWING WILL BE PRINTED:

“LINE:

NOW CHANGE THE M32S 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
CZ0ZAM. P11
452
463
464

465

466
467
468
469
470

471
472
473
474
475
476
477
478
479
480
481
482

483

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

19 MN-84

5.3

16:22

SEQ 11

PAGE 11

ECHO TEST

IF PROGRAM HAS ALREADY BEEN STARTED AT 210 AND THE

HAVE
002.

BEEN
TYPED IN;
JUST LOAD ADORE
PROGRAM WILL PRINT:

“WHICH TEST ?

AND

ADDRESS

ECHO OR CABLE (E OR C)”

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

PH "GRAM WILL PRINT:

“BAUD RATE-"

TYPE BAUD RATE AT WHICH THE TERMINAL IS SET 'HAT IS CONNECTED TO
THE D211 OIST PML.
BAUD RATE CHOICES ARE: 50, 7S5. 110, 135, 150
300, 600 , 1200,
1800,
2000, 2400, 3600, 4800, /200, 9600. THE

PROGRAM WILL THEN PRINT:
LINE:

TYPE Tt _ LINE THE TERMINAL IS CONNECTED TO AT THE OIST PNL

484

THE

485
486

"TERMINAL ECHO TEST”

487

VECTOR

7 219 AND START WITH SWR EQUAL TO

“RLGRAM WILL PRINT:

o AT

THIS POINT

THEN

THE MESSAGE:

“THE QUICK owudN FOX JAMPED OVER THE LAZY DOGS BACK 0123456789*

IF
SHOULD BE PRINTED ON THE TERMINAL CONNECTED TO THE 0Z11.
THIS MESSAGE IS DESIRED TO BE CONTINIOUSLY OUTPUT;
SET THE SWR
TO 377 (SWR=377) WMILE IT IS BEING OUTPUT

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 SHOULD BE ECHOED BACK ON
eeIF YOU HIT CNTRL C <tC> ON THE DZ11 TERMINAL
THE TERMINAL.
THE PROGRAM WILL PRINT:

“PASS DONE. "

ON THE CONSOLE TERMINAL

AND

THE

“QUICK

BROWN

FOX*

WILL

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

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

“LINE:

“ AND WAIT FOR A RESPONSE.

M1
CZDZA-HO
CZDZAH .P11
S12
513
S14
515
516

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

19-JUN-84

5.4

16:22

SEQ 12

PAGE 12

PROGRAM AND/OR OPERATOR ACTION

THE
VARIETY OF PROGRAM CONTROL SWITCHES PROVIOED IN THIS DIAGNOSTIC
PACKAGE
IS DESIGNED TO PROVIODE THE USER
MWITH A WIDE RANGE OF TROUBLE
-

S17

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

S18

RESTRICTIONS.

(SEE SEC. 4.1, 4.1.1, 4.1.2, 4.1.3)

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 LOOX IN THE PROGRAM LISTING FOR THAT TEST NUMBER AND THEN NOTE THE
PC OF TME ERROR REPORT.
THE REASON FOR THE ERROR REPORT WILL BECOME
CLEARER WHEN READING THE COMMENTS IN THE PROGRAM LISTING.
ERRORS

AS DESCRIBED PREVIOUSLY THERE WILL ALWAYS 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

WHICH IS TO GIVE THE OPERATOR AN INDICATION OF THE ERROR.
6.2

ERROR

MESSAGE

ERROR RECOVERY

IF FOR SOME REASON THE DZ11 SHOULD 'MANG THE BUS' (GAIN CONTROL OF B8US
SO THAT CONSOLE MANUAL FUNCTIONS ARE INKIBITED) AN INIT OR POMER DOWN/P
IS NECESSARY FOR OPERATOR TO REGAIN CONTROL OF CPU.
IF THIS SHOWD
HAPPEN;
LOOK IN LOCATION '$TSTNM'
(BYTE 1122) FOR THE NUMBER OF THE
TEST THAT WAS RUNNING AT THE TIME OF THE CATASTROPHIC ERROR.
IN THIS
WAY THE OPERATOR WILL HAVE 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
CZDZA-HO
CZDZAM.PL11
555
556
557
558
559
560
S61
562
563
564
565
566
567
568
569
570
S71
572
S73
S74
S75
576
577
578
S79
580
581
582
583
584
585
586
587

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

19-JUN-84

7.2

16:22

SEQ 13

PAGE 13

OPERATING RESTRICTIONS
PARAMETER MUST BE INPUT FROM USER OR APT IF

“AUTO SIZING" IS NOT USEOD.

MISCELLANEOUS

EXECUTION TIME

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

MESSAGE

(PROVIDING

NO ERRORS AND SW12=0) WITHIN 2 MIN. THIS IS ASSUMING SWii=1 (INHIBIT
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
POP11 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.
8.2

PASS COMPLETE

NOTE:
oEVERYe TIME THE PROGRAM IS STARTED;
THE TESTS WILL RUN AS IF
THIS IS TO 'VERIFY NO sHARDe
Zu's (DELETE ITERATIONS) WAS UP (=1).
ERRORS’ AS SOON AS POSSIBLE.
THEREFORE THE FIRST PASS
-EACH TIME
PROGRAM IS STARTEDWILL BE A 'QUICK PASS’' UNTIL ALL DZ11‘'S IN SYSTEM
ARE TESTED.
WHEN THE DIAGNOSTIC HAS COMPLETED A PASS THE
AN EXAMPLE OF THE PRINT OUT TO BE EXPECTED.

END PASS CZDZA-H

NOTE :

(CSR:

160010

VEC: 300

PASSES: 000001

FOLLOWING

ERRORS:

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

THEY ARE ONLY FOR THIS EXAMPLE.

VALUES

FOR

Be
CZOZA -0
CZOZAM P11
588
589
$90
S9
592
593
594
595
596
597
598
599
600
601
602
603
604
605
606
607

MACY11l 30A(1052)

19-AN-84 15:45

19-JUN-84

16:22

PAGE

KEY LOCATIONS

SLPADR (1126)

CONTAINS THE ADORESS
{;Esg:}égl COUNT
IS

(1360)

RUN

(1406)

CONTAINS THE ADORESS OF THE NEXT TEST TO BE PEFORMED.
CONTAINS THE NUMBER OF THME TEST NOW BEING PEFORMED.

STSTNM (1122)

THE BIT

CURRENTLY

‘RUN’'

BE ING

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

ALWAYS

POINTS

TESTED.

ONE

PAST

THE

EXMPLE :

1304/00°0000001000000 MEANS THAT DZ11 NO.OS IS THE

STATUS MAP
(1300)-(2000)

NOW RUNNING.

THESE LOCATIONS CONTAIN THME INFORMATION NEEDED

TO 16 (DECIMAL) D211S SEQUENTIALY.

g?&vgghfl AND STATUS CONCERNING

DZACTV (1404)

EACH BIT SET

$BASE

$gsc¥nms THE RECEIVER CSR

608
609
610
611

612
613
614
615

SEQ 14

(1310)

TMIS

LOCATION

0211

(RUN)

0211

TEST

TMEY CONTAIN THE

CONFIGURATION

INDICATES

THAT

THE

ASSOCIATED O0Z11 WILL BE TESTED IN TURN.
EXAPLE:
(DZACTV) 1300/0000000000011111 MEANS THAT DZ1i1
NO.
00,01,02,03,08
WILL BE TESTED.
EXAMPLE:
(DZACTV)
%gts)?éooooooooooooxooox MEANS TMAT DZ11 NO.
00,08 WILL B€
OF

TME

CURRENT

DZ11

UNDER

Ce
CZDZA -+0
. P11
CZ0ZAn

MACY11 30A(1052)

19-UN-84 15:45

19 AN-84

16:22

PAGE

SEQ 15

616

617
618
619
620
621
622
623
624

8.4A

MORE ON THAT

'STATUS TABLE'

(1500-2000)

"MAP OF D231 STATUS’

160100
000300
000003
000377

1300
1302
1304
1506

017070
000000

1310
1512

625

626
627

628
629
630
631
632
633
634
635
636
637
638
639
640
641
642
643

THE

ABOVE

INFORMATION WILL BE

1300

160100

1502
1504

000300
000005

1506

000377

1510

017070

1512

000000

644

645
646
647
648
649
650
651
652
653
654
655
656

657
658
659
660

REPEATED FOR EACH OF UP TO 16 CZ11'S IN

THE SYSTEM( TMESE WILL FOLLOW UNDER TMIS TABLE).

EXPLANATION:
mssggrgf SYSTEM CONTROL REGISTER FOR TME 1ST DZ11

1IN

TMIS IS VECTOR 'A° FOR TME FIRST DZ11 IN THE SYSTEM.
THIS REPRESENTS THE BUS INTERRUPT PRIORITY LEVEL OF
THE
0Z11.
BIT1S OF THIS LOCATION INDICATES EITHER EIA OR
20MA, IF BIT1S=0 MODWE SHOULD BE AN M7819, IF BIT15-1
MODULE SHOMLD BE AN M7814.

T‘tfi%g?a?! GINARY REPRESENTATION OF WHAT LINES

ARE

THIS IS THE PARAMETER LOCATION USED IN MOST OF THE
IV INDICATES PARAMETERS OF: RX ON, SPEED SELECT
TESTS.
16 (9600 SAUD) EIGHT BITS PER CHAR, AND TWO STOP BITS.
THE USER MAY ALTER THE STOP BITS AND THME SPEED, BUT THE
REMAINING PARAMETERS SHOULD BE LEFT ALONE.
THIS LOCATION IS USED TO LOAD THE DZ11 LINE PARAMETER
REGISTER FOR EACH LINE.
THE MEANING OF THE BITS SET IN
THIS LOCATION IS THE SAME AS THE FUNCTION OF THE RELATED
GITS IN THE DEVICE LINE PARNMETER REGISTER.
THIS LOCATION WILL CONTAIN EITHER ALL ZEROS INDICATING
THAT
INTERNAL LOOP WAS SELECTED AS MODE OF OPERATION OR
IT WILL CONTAIN 100000 IMDICATING THAT ~STAGGERED MODEWAS SELECTED OR IT WILL CONTAIN 000200 INDICATING THAT
"EXTERNAL* WAS THE MODE SELECTED.

THE ABOVE IS REPEATED FOR EACH DZ11 IN THE SYSTEM.,
THE TABLE IS
FILLED B8Y AUTO SIZING OR 8Y THE MANUAL PARAMETER INPUT PROGRAM

AS DOESCRIBED PREVIOUSLY.
LOCATIONS MAY BE ALTERED
SPECIFIC CONFIGURATION.

ALSO IF
BY HAND

DESIPED B8Y USER,
THE
(TOGGLED IN) TO SUIT THE

De
. CZDZA -HO

| cz0ZAM.P11

MACY11l 30A(1052)

19-JUN-84 15:45

16:22

19-JUN-84

SEQ 16

PAGE 16

661

662
663
664
665

8.5

ees METHOD OF AUTO SIZING eee

8.5.1

FINDING THE CONTROL STATUS REGISTER.

666

THE PROGRAM WILL START AT ADORESS

667

668
669
670

671
672
673
674
675
676
61
678
679
680
681
682
683
684
685
686
687
698
689
690

700
701
702
703
704
705
706
707
708
709

710
711
712

START

‘REFERENCING'

ATTEMPTED TO OE SET AND THE "TCR” B1IT7 FOR LINE 7 IS SET.

THE

~“TROY" IS THEN

TESTED TO BE SET AND BOTM "TCRO7~ AND “MASTER SCAN ENABLE” ARE TESTED 10
BE STILL SET. IF ALL OF TMIS WORKED; THEN A “DEVICE CLEAR” IS ISSUED
TESTING THAT THE BIT CAN BE READ BACK AND THAT AFTER SOME TIME IT7 SELF
IF ALL OF THE ABOVE WORKED; THIS ODEVICE IS ASSUMED TO BE A
CLEARS.
DZ11. IF ANY O THE ABOVE FAILED; UPDATING OF THE POINTER IS DONE AND
THE SEQUENCE IS REPEATED.

NOTE:

IF THE PROGRAM DOES NOT FIND YOUR DZ11;

SOMETHING IS WRONG

AUTO SIZING SHOULD NOT BE OONE.
AFTER IDENTIFYING A DZ11 THE PROGRAM THEN ATTEMPTS TO SET ALL DTR

AND

BITS
IN DEVICE REGISTER 4,
IF ANY DTR BITS DID SET THE MODWLE IS ASSUMED T0
&fimafl;‘gll MODULE (M7819) OTHERWISE THE STATUS MAP ENTRY IS SET FOR 20MA
8.5.2

FINDING THE VECTOR

THE VECTOR AREA (ADORESS 3v0-776) IS FILLED WITH THE INSTRUCYION IOT AND
BIT14 AND BITS (TX INTERUPT ENABLE AND MSTSCAN
(NEXT AOORESS).
‘,+2'
“TCRO7~ IS THEN S¥ . A DELAY IS MADE
ENABLE) ARE SET INTO TME DZCSR.
AND IF NO INTERUPT OCCURES (BECAUSE OF A BAD DZ1.) THE PROGRAM ASSUMES
VECTOR ADORESS 300 AND THE PROBLEM SHOULD BE FIXED IN THE DOIAGNOSTIC.

691
0?22

693
694
695
696
697
698
699

160000 AND

ADORESS IN THE POINTER.
IF A NON-EX MEMORY TRAP OCCURES, THE POINTER
(MOLDING 160000) IS UPDATED BY 10 AND THE ABOVE IS REPEATED UNTIL
ADDRESS 163700 IS REACHMED.
IF A 'SLAVE SYNC RESPONSE' WAS ISSUED BY THE
D0Z11 (OR ANY OTMER DEVICE) (NO NXM TRAP),
"MASTER SCAN ENABLE- IS

ONCE THE PROBLEM IS FIXED; THE PROGRAM SHOULD BE RE-SETUP AGAIN TO GET
CORRECT VECTOK. IF AN INVERUPT OCCURRED; THE ADORESS TO WHICH THE DZ11
IF THE
INTERUPTEC T0 IS PICKED UP AND REPORTED AS THE VECTOR. NOTE:
AND
PROBLEM
A
IS
THERE
YOU;
VECTOR REPORTED IS NOT THE VECTOR SET UP BY
AUTO SIZING SHOWLD NOT BE DONE.

8.5.3

PARAMETER ASSUMPTIONS.

ON TO SIZE THE REST OF
RE NEED TO BE TURNED
WOULD
SINCE TOO MUCH HARDMA
THE
VARIATIONS.
REMAINING
THE
ASSUME
MUST
PROGRAM
THE
THE PAKAMETERS;
RESULT IF NOT TO YOUR SPECIFIC CONFIGURATION MAY BE ALTERED BY NAND
(TOGGLE IN) IF DESIRED). IN THIS WAY 95 PERCENT OF THE PARAMETER SETWP
WAS DONE BY THE PROGRAM, AND 3 PERCENT BY YOU.
THEREFORE:

1)
2)
3)
4)

BUS PRIORITY IS SET TO LEVELS.
ALL EIGHT LINES ARE ASSUMED TO BE TESTED.
OEFAULT BAUD RATE IS SET 70O 16 (9600 BAUD).
MODE OF OPERATION IS "INTERNAL MOOE".

FOR ALL PARAMETER ADJUSTMENTS PLEASE REFER TO SECTION 8.4A FOR GREATER DETAIL.

E2
CZOZA -HO
CZ0ZAM.P11

MACY1l 30A(1052)

19-JUN-84 15:45

19-UUN-84

16:22

S€EQ 17

PAGE 17

713
714

7115
716
77
718
719
720
721
722
723
724
725

9.0

RUNNING THE DZ11 ODIAGNOSTIC UNDER APT

9.1.1

THE APT INTERFACE

CZDZA HAS BEEN REDESIGNED TO BE COMPATIBLE WITH THE APTAUTOMATED PRODUCT TEST SYSTEM.
IT CAN BE RUN AS A STANDALONE
DIAGNOSTIZ OR IN EITHER OF THE APT MODES.
CERTAIN VARIABLES
IN THE ORIGINAL APT MODULE WERE REASSIGNED TC THE AREAS SET
ASIDE FOR APT

740
741
742
743
744
745
746
747
748
749

750

751

THESE

VARIABLES

GENERALLY

THE OIAGNOSTIC USES SEVERAL VARIABLES IN THE REGION

SUBTITLED

BEGIN WITH A DOLLAR SIGN ($), E.G.,

726

727
728
729
730
731
732
733
734
735
736
737
738
739

INTERFACING.

9.1.2

NEW

SOEVM,

$BASE.

SETTING UP THE DIAGNOSTIC USING APT
‘APT MAILBOX-ETABLE'.

THESE VARIABLES ARE:

$SWREG -

USED IF A SOFTWARE SWITCH REGISTER IS DESIRED

WHIIE

$VECT)

USED TO SPECIFY THE INTERRUPT LEVEL

THE

FIRST

UNDER APT

VECTOR ADORESS

AND

$BASE

USED TO INDILATE BOTTOM ADDRESS OF DZ11 UNDER TEST

$OEVM

A BIT MAP REPRESENTING WHICH DZ11'S WILL BE TESTED

$COM1

USED TO INDICATE WHICH LINES TO RUN ON ALL DZ11'S

$ODMWO

EACH OF THE
$DDW WORDS DESCRIBES THE PARAMETERS
(LPR) FOR A PARTICWAR DZ11, GOING UP TO 16 DZ11'S

Fe
CZDZA-HO
CZDZAN. P11
752

73
754
755

756

757
758

759
760
761
762

763

764
765
766
767
768
769

MACY11l 30A(1052)

19-JUN-84 15:45

19-JUN-84
9.1.3

16:22

PAGE

SEQ

RUNNING UNDER APT

THE USER SHMOULD BE FAMILIAR WITH
THE
APT
SYSTEM,
THE
APT
TIMING PARAMETERS FOR
THE
D0Z11 OIAGNOSTIC WERE BASED ON AN

117840 PROCESSOR.
IT MAY BE NECESSARY TO ADD A FEW
SECONDS IF THE OIAGNOSTIC IS OUT ON AN 11/05 PROCESSOR.

ALL OF THE VARIABLES MENTIONED IN SECTION 9.1.2 SHOWLD BE
UP PRIOR TO RUNNING THE DIAGNOSTIC UNDER APT,

SET

NOTE

BE SURE $BASE POINTS TO THE FIRST 0Z11 BEFORE RUNNING

BASED ON THESE VALUES, THE DIAGNOSTIC WILL SET UP THE STATUS
TABLE.
THE USER IS THEN FREE TO MONITOR UNDER APT AS NORMAL.

G2
CZOZA -0
CZOZA.P11

MACY11 30A(1052)

19-JAUN-84 15:45

770
m
772
773
774
775
776
777
778
779
780
781
782
783
784

19-JUN-84

16:22

10.0

SEQ 19

PAGE

CHANGE HISTORY
NOTE: HISTORY STARTS WITH REV., FO

REV

CHANGE DESCRIPTION

FO:

ALTER TRANSMITTER INTERRUPT SERVICE ROUTINE
TO ALLOW MORE TIME FOR THE TCR BIT TO CLEAR BEFORE

LOMERING THE B8US PRIORITY TO ENABLE DZ11 INTERRUPTS.

GO:

MAY 1981 - INCORPORATE XON/XOFF FEATURES (BY ASSEMBLING WITH
LATEST SYSMAC - CS) AND CHANGE ~.=~ CODE MODIFIERS AT END
OF PROGRAM FROM ABSOLUTE ADORESS MODE TO RELATIVE. ALSO, THE
DEFAULT BAUD RATE WAS CHANGED TO 9600 BAUD, SINCE 19.2x BAUD IS
NOT SUPPORTED, AND TEST 34 WAS CHANGED TO REMOVE 19.2K TESTING.

HO:

JUNE 19684 - ADDED BAUD RATE TIMING TEST.

785

786

787

788

789
790
791
792

m‘gs CHARACTERS TRANSMITTED IS WITHIN A RANGE, THE TEST
LL

793
794
795
796

797

798
799

.TITLE

1 «MAYNARD,

MASS.

01734

IR
.

:.THIS PROGRAM WAS ASSEMBLED USING THE POP-11 MAINDEC SYSMAC
; SPACKAGE (MAINDEC-11-DZQAC-CS), JAN, 1981.
1 8

$TN=]

811
812
813
814
815
816
817
818
819

823
824
825

-PRGFR7 -ssssssessscssnsssessssscanassssss

CZDZA-HO

1 sCOPYRIGHT (C) 1976,1984
1o0IGITAL EQUIPHMENT CORP.

800
801
802
803
804
805
806
807
808
809
810

821

ADOED IN OROER

TO TEST CRYSTAL SPEEDS.
TRANSMITTS CHARACTERS TO ALL 8 LINES
AT ALL BAUD RATES (EXCEPT 19200 BAUD) FOR 1 SECOND AND IF THE

tPRESS START

1PROGRAM WILL TYPE "CZDZA-HO/<200>/CZDZAMO DZ11 LN ASYNC MUX TSTS 1PROGRAM WILL TYPE "RUNNING” TO INDICATE THAT TESTING HAS STARTED

;AT THE END OF A PASS, PROGRAM WILL TYPE PASS COMPLETE MESSAGE

1AND THEN RESUME TESTING

.SBTTL
001120

BASIC DEFINITIONS

1¢INITIAL ADDRESS OF THE STACK POINTER ses 1120 see

STACK=

.EQUIV
.EQUIY

1120

EMT,ERROR
IO0T,SCOPE

1 1BASIC DEFINITION OF ERROR CALL
1 1BASIC DEFINITION OF SCOPE CALL

1 SMISCELLANEOUS OEFINITIONS

826
827

828
829
830
831
832
833
834
835
836
837

838
839
840
841
842

843

844
845
846
847
848
849
850
851
852
853
854
855
856
857
858
859
860
861
862
863

864
865
866
867
868
869
870
871
872
873

874

875
876
877
878
879
880
881

19-JUN-84 15:45
000011
000012

000015
000200
177776

177774
177772
177570
177570
000000
000001
000002
000003
000004
000005
000006
0V0007
000006
000007

SEQ 20

16:22 PAGE 20
19-JUN-84
BASIC OEFINITIONS
HT=

LFe

CRLFe

200

CRe
PSe

177776

.EQUIV PS,PSW
STKLMTe 177774

PIRQ

OSWR=
00ISP.

177772

177570
177570

1 1CODE FOR HMORIZONTAL TAB
11CO0E FOR LINE FEED
1 1CODE FOR CARRIAGE RETURN
11CODE FOR CARRIAGE RETURN-LINE FEED
1+ 1PROCESSOR STATUS WORD
13STACK LIMIT REGISTER
1 1PROGRAM INTERRUPT REQUEST REGISTER
1 tHARDMARE SWITCH REGISTER
1 tHARDWARE DISPLAY REGISTER

1 8GENERAL PURPOSE REGISTER DEFINITIONS

RO=

R2=

Rle

R3e

R4-

3
4

RSe
R6=

]
%6

SP=
PCe

R7=

s 1IGENERAL REGISTER
s iGENERAL REGISTER
1 1GENERAL REGISTER
s sGENERAL REGISTER
1 1IGENERAL. REGISTER
+ tGENERAL REGISTER
1 1GENERAL REGISTER
s $GENERAL REGISTER
s s1STACK POINTER
1 sPROGRAM COUNTER

1 *PRIORITY LEVEL DEFINITIONS

000000
000040
000100
000140
000200
000240
000300
000340

PRO=
PR1-

100000

SW1Se

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

PR2e=
PR3e

PRA =
PRSPRG=
PR7»

0
40
100
140
200
240
300
340

s sPRIORITY LEVEL

1 sPRIORITY LEVEL
1 sPRIORITY
1 sPRIORITY
1 sPRIORITY
1 1PRIORITY

LEVEL
LEVEL
LEVEL
LEVEL

s sPRIORITY LEVEL
1 1PRIORITY LEVEL

1¢'SWITCH REGISTER” SWITCH OEFINITIONS
100000

SWi4=
SWi3s

40000
20000

SWoeSWo1
SWo0=

4
2
1

SWl2=
SWile
SW10=
SWw09+>
SWo8SWo7=
SWo6=
SWOS.
SWo4
Swo3=

.EQUIV
.EQUIV
L.EQUIV
LEQUIV
.EQUIV

LEQUIV

10000
4000
2000
1000
400
200
100
40
20
10

SW09,Sw9
SWO8,SwW8
SWO7,SW7
SWO6,SwWé
SWOS,SWS
SWO4,SW4

~NOVNBLWN=-O

CZOZA-HO
CZDZAM.P11

MACY1l 30A(1052)

I2
CZDZA 9
CZDZM4. P11

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

.EQUIV
.EQUIV
EQUIV
.EQUIV

882
883
884

885
886
887
888
88S

890
891
892
893
894
895
896
897
898
899
900
901
902
903
904
905
906
907

908
909
910
911
912
913
914
915
916
917
918
919
920
921
922
923
924
925
926

927

928
929

930
931
332
933
934
935
936
937

16:22 PAGE 21
19-JUN-84
BASIC OEFINITIONS

010000

000010

B8IT1S=
8IT148IT138IT128IT1le
8IT1081709~
8IT088IT07B8IT06=
B8I105B8I704-

81703
8IT0281701~
8I700=
LEQUIV
.EQUIV
EQUIV
.EQUIV
.EQUIV
.EQUIV
.EQUIV
.EQUIV
.EQUIV

.EQUIV

000010
000014
000014
000014

SWOS, SW3
SWOo2, SWe

SWO1,SWl
SW00, SWO

BIT DEFINITIONS (BITOO TO BIT1S)
100000

40000

20000
10000

4000

2000
1000

400

200
100

20
10
4

e
1

81709,8179
8I708,.8178
8I7107,8177
8I706.8176
8IT05,81ITS5
BIT04,81IT4
B8IT03,8IT3
8IT02,81IT2
8I701.81IT1
8I700,8IT0

1#BASIC “CPU” TRAP VECTOR ADORESSES
ERRVEC= 4
11 TIME OUT AND OTHER ERRORS
1 sRESERVED AND ILLEGAL INSTRUCTIONS
RESVEC= 10
117" BIY
TBITVEC=14
1 s TRACE TRAP

TRTVEC=- 14

BPTVEC~ 14
IOTYECs 20

1 tBREAPOINT TRAP (BPT)
$ 1 INPUT/0UTPUT TRAP (IOT) ¢eSCOPEes

000034

EMTVEC= 30
TRAPVEC=34
TKVECs 60

1 1IEMULATOR TRAP (EMT) «+ERRORses
11"TRAP” TRAP
11 7TTY KEYBOARD VECTOR

000240

PIRQVEC=240

1 1PROGRAM INTERRUPT REQUEST VECTOR

000024

PURVEC= 24

TPVEC.

: sPOMER FAIL

;1 TTY PRINTER VECTOR

1 INSTRUCTION DEFINITIONS
005746
005726

010046
012600
024646

PUSH1SP=5746

1DECREMENT PROCESSOR STACK 1 WORD

POPRO=12600

tRESTORE RO FROM STACK

POP1SP=3726
PUSHRO=10046
PUSHRSP=24646

1 INCREMENT PROCESSOR STACK 1 WORD
1SAVE RO ON STACK
;DECREMENT STACK TWICE

SEQ 21

Je
CZDZA-HO

. P11
CZDZAM
938
939
940
941
942
943
944
945
946
947
%3
949
950
951
952
953
954
955
956
957
958
959
960
961
962
963
964
965
966
967
968
969

970
971
972
973

974
975
976
977
978
979
980
981
982
983
984
985
986
987
988
989
990
991
992
993

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

16:22 PAGE 22
19-JUN-84
GENERAL DEFINITIONS AND EQUIVALENCES
POP2SP=22626

1 INCREMENT STACK TWICE

10211 CONTROL AND STATUS REGISTER OEFINITIONS
BIT DEFINITIONS
1 (DZCSR)
'

000010

------------------------------

MAINT « BIT3

1MAINTENANCE MODE ENABLE

OCLR=BIT4
MSENAB=BITS

1DEVICE CLEAR
iMASTER SCAN ENABLE

ROONE=BIT7

+RECEIVER DONE

RIE=BIT6

SILOEN= BIT12
SILOAL = BIT13
TIE=BIT14
TROY=BIT1S

(RECEIVER INTERRUPT ENABLE

;SILO ALARM ENABLE
;SILO ALARM

s TRANSMITTER INTERRUPT ENABLE
1 TRANSMITTER READY

$XON=21
$XOFF =23

10ZCSR WORD DEF INITIONS
'

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

+ TRANSMIT LINE O

TLO=0

TL1=8IT8
001000
001400
002000
002400
003000
003400

TL2=BIT9
TL3=BIT9!BIT8

1 TRANSHIT LINE 1

s TRANSMIT LINE 2
; TRANSMIT LINE 3
1 TRANSHIT LINE 4
TL4=BIT10
TLS=BIT10!'BIT8
;TRANSMIT LINE 5
TL6=BIT10!BIT9
; TRANSMIT LINE 6
TL7=BIT10!BIT9!BITS ; TRANSMIT LINE 7

1DZRBUF BIT DEFINITIONS
010000
020000

100000

PARER-BIT12
FRMERR=BIT13

OVRRUN=BIT14
OVALID=BIT1S5

1PARITY ERROR
1FRAME ERROR

sOVERRUN ERROR
sOATA VALIOD

1DZRBUF WORD OEF INITIONS
'

001000

001400

002000
002400
003000
003400

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

RLO=0
RL1-BIT8
RL2=8IT9
RL3=BIT9!BIT8
RL4=8IT10
RLS=BIT10!8IT8

sRECEIVER LINE O
JRECEIVER LINE 1
+RECEIVER LINE 2
;RECEIVER LINE 3
tRECEIVER LINE 4
RECEIVER LINE S

RL6-BIT10!B8IT9
;RECEIVER LINE 6
RL7=8IT10!8IT9!6IT8 ,RECEIVER LINE 7

10ZLPR WORD DEFINITIONS

000001

LPO=0

LP1=BITO

1LINE PARAMETER O
tLINE PARAMETER 1

5EQ 22

I<e
CZDZA-MO
CZDZAM.P1)

MACY11l 30A(1052)

19-JUN-84 15:45

19-JUN-84

SEQ 23

PAGE 23

16:22

GENERAL DEFINITIONS AND EQUIVALENCES

000002
000003
000004
000005
000006
000007

LP2-8]IT1
LPS=BIT1!BITO
LP4=8IT2

000000
000010
000020
000030

FIVE=0
SIX=BITS

1LINE PARAMETER 2
;LINE PARAMETER 3
1LINE PARAMETER 4

LPS=BIT2!BITO
;LINE PARAMETER 5
LP6=BIT2!BIT1
;LINE PARMMETER 6
1LINE PARAMETER 7
LP7=81T2!8IT1!8ITO
+FIVE BITS/CHAR,1 STOP BIT
1SIX BITS/CHAR,1 STOP BIT
1SEVEN BITS/CHAR,1 STOP BIT
SEVEN=BI T4
EIGHT=BITA!BITS ;EIGHT BITS/CHAR,1 STOP BIT
FIVES=BITS

SIXS=BITS!BITS

tFIVE BITS/CHAR,2 STOP BITS

;SIX BITS/CHAR,2 STOP BITS
1SEVEN BITS/CHAR, 2 STOP BITS
EIGHTS=BITS!8ITA!BITS
;EIGHT BITS/CHAR, 2 STOP BITS
SEVENS=BIT5:!81T4

PARITY=BIT6

tPARITY ENABLED

TWOSTOP=BITS
EVEPAR=0
RCVON=BIT12

1ENABLE RECEIVER (RECEIVER ON)

ODOPAR=BIT?7
ONESTOP=0

$50=0

1027
1028
1029
1030
1031
1032
1033
1034
1035
1036
1037
1038
1039
1040
1041
1042

1043
1044
1045
1046
1047

1048
1049

S75=81T8
S110-81T9
S134-8179!BIT8
S$150=-81T710
S300-81I710:!8178
S600-81I710:81I79
$1200=8IT10!8IT9!8IT8
S$1800=81IT11
$2000-8IT11!BI78
S$2400-8I711:!BIT9

1000 PARITY ENABLED
tONE STOP BIT ENABLED
1TWO STOP BITS ENABLED
1EVEN PARITY ENABLED
1 SPEED 50 BAUD
1 SPEED 75 BAD
1 SPEED 110 BAUD

1SPEED 134.5 BAUWD
1SPEED 150 BAUD
s SPEED 300 BAUD
1 SPEED 600 BAUD
;SPEED 1200 BAUD
+SPEED 1800 BAUD
1 SPEED 2000 BAUD
1 SPEED 2400 BAUD
$3600-81T11!BIT9!BIT8
;SPEED 3600 BAUD
$4800-81711:!81I710
1 SPEED 4800 BAUWD
$7200=81T711!B8I7T10!BIT8
;SPEED 7200 BAUD
$9600=8I711!B8IT10!8IT9
;SPEED 9600 BAUD
$19200-8IT11!8IT10!8I79!BITS
1SPEED 19200 BAWD

$OZTCR BIT DEFINITIONS
'

000010
000029

000100
000200
001000
002000
010000
020000

TCRO=BITO
TCR1=81T1
TCR2=8BIT2
TCR3-B81IT3
TCR4=BIT4
TCR3=RITS
TCR6=B1T6
TCR7=8177
DTRO=BITS
OTR1-BIT9

OTR2=RIT10
DTR3+81T11
OTR4=81IT12
OTRS=BIT13

1 TCRO

s TCRY

1 TCR2

;1 TCR3
;1TCR4
s TCRS

1 TCR6
1 TCR?

sDTRC

;1DTR1

1DTR2
;1OTRS
;1DTRA
tDOTRS

SEQ 24

PAGE 24

GENERAL DEFINITIONS AND EQUIVALENCES

DTR6=8IT14
OTR7=8IT15

10TR6
10TR?

;OZMSR BIT DEFINITIONS
'

000001
000002
000004
000010
000020
000040

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

RINGC=BITO
RING1-8IT1
RING2=BIT2
RING3=8IT3
RINGA=BIT4
RINGS=8ITS
RING6=BIT6
RING7=81T7
C00-8178

C01-8179

C02+-8IT10
CO3-81T11
CO4=BIT12
C05-81T13
CO6=81IT14
CO7=8IT15

1RING
1RING
1RING
1RING
1RING
1RING
1RING
1RING

INDICATED
INDICATED
INDICATED
INDICATED
INDICATED
INDICATED
INDICATED
INDICATED

ON
ON
ON
ON
ON
ON
ON
ON

1 BREAK FOR LINE

1 BREAK FOR
1 BREAK FOR
1 BREAK FOR
1 BREAK FOR
1 BREAK FOR
1BREAK FOR
1 BREAK FOR

LINE
LINE
LINE
LINE
LINE
LINE
LINE

V¢
Ve
Ve
Ve
Ve
We
T
B
W
Be
B¢
G
6

1089

1090
1091
1092
1093
1094
1095
1096
1097
1098
1099
1100
1101
1102

V¢

:TABLE OF LOOP AROUND FUNCTIONS (M325)
1087

LINE
LINE

1CARRTER PRESENT ON LINE
1CARRIER PRESENT ON LINE
1CARRIER PRESENT ON LINE
1CARRIER PRESENT ON LINE
1CARRIER PRESENT ON LINE
1CARRIER PRESENT ON LINE
1CARRTER PRESENT ON LINE
1CARRIER PRESENT ON LINE

1DOZTOR BIT DEFINITIONS
BRX0=8IT8
BRX1+81T9
BRK2-81T10
BRX3«BIT11
BRX4=BIT12
BRKS=B8IT13
BRK6-BIT14
BRK7=BIT15

LINE
LINE
LINE
LINE
LINE
LINE

~NOAURB WO

1052
1053
1054
1055

040000
100000

16:22

~NOVNAUWN-O

1050
1051

19-JUN-84

~NOVNB WO

CZDZA-HO
P11
CZOZ. AM

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

M2
CZDZA-HO
CZOZAM.P11

MACY11 3CA(1052)

19-JUN-84 15:45

19-JUN-84

1:1000800006000060000800000000000000000000000008000000048000000000000040

1104
1105
1106
1107
1108

‘

1 THE STANDARD "TRAP CATCHER" IS PLACEL

1BETWEEN ADDRESS O TO ADORESS 776.
1IT LOOKS LIKE “PCe2 HALT",
‘

1124

1125
1126

1127

1128
1129
1130
1131
1132
1133
1134
1135
1136
1137
1138
1139
1140
1141
1142

1143
1144
1145
1146
1147
1148
1149
1150
(2)

.=0

000000

1112
1113
1114
1115

1123

--------------------------------------------------------------------

1100000000000000000000060400088000800008000408000000000008800480008000800

1111

1121
1122

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

1 TRAPCATCHER FOR ILLEGAL INTERRUPTS

1109
1110

1117
1118
1119
1120

SEQ 25

PAGE 25

TRAPCATCHER FOR UNEXPECTED INTERRUPTS

1103

1116

16:22

i STANDARD INTERRUPT VECTORS
‘

000010
000012

000022

000030
000032
000034
000036

000010

.=10

000020

.=20

011440
000340

005122
000340
010320
000340
007230
020340

--------------------------

SET.PS
PR7

1FAKE "MTPS* INSTRUCTION TRAP
iMAKE SURE PS IS PRIORITY ?

. SCOPE
PR7
$PWURON

1SCOPE LOOP HANDLER
tHANDLE AT PRIORITY 7
1POMER FAIL MANDLER

. TRPSRY

1GENERAL HANDLER DISPATCH SERVICE

340
$ERROR
340

007122
000340

.SBTTL

1 SERVICE AT PRIORITY LEVEL 7
1ERROR HANDLER
1SERVICE AT PRIORITY LEVEL 7

340

ACT11 HOOKS

1SERVICE AT PRIORITY LEVEL 7

1 1000800860000006000800000000000000000000000000080000000888000000¢

000040

1HOOKS REQUIRED BY ACT11
$SVPCe,

005056

$ENDAD

131)SET LOC.46 TO ADORESS OF SENDAD IN .SEOP

000000
000040

.WOROD
O
.=$SVPC

112)SET LOC.S52 TO ZERO
i+ RESTORE PC

000046

. =46

000052

.=52

.=174

000174

000174
000176

000000
000000

000200

000137

002150

000137

025216

000210

001000

000200

000210

001000

005200

OISPREG:0
SWREG: O

055103

.=200

.=210

055104

.=1000

MTITLE:

1SAVE PC

1 SOF TWARE DISPLAY REGISTER FOR SWITCHLESS 115
1SOF TARE SWITCH REGISTER FOR SWITCHMLESS 115

.START

1GO TO START OF PROGRAM

XSTART

1GOTO CABLE TEST/ECHO TEST

.ASCIZ

<200>¢12>/CZDZA-HO/<200>/CZDZAH0 DZ11 LN ASYNC MUX TSTS /<200>

Ne
CZDZA-H0
CZOZAH P11

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

1178
1179
1180
1181
1182
1183
1184
1185
1186
1187
1188
1169
1190
1191
1192
1193
1194
1195
1196

1197
1198
117
1200
1201
1202
1203
1204
1205
1206

COMMON TAGS

1180808000288 00800¢4808800800%040002404004080000008880088080800808440

1#THIS TABLE

1sUSED IN THE
001120

001120
001120
001122
001123
001124
001126
001130
001132
001134
001135
001136
001140
001142
001144
001146
001150
001152
001154
001155

1161

.SBTTL

001156

001204

001210
001212
001214
001216
001220
001222
001224
001226

001230
001231
001232

$TSTNM:
SERFLG:
S$ICNT:
LPADR:
SLPERR:
SERTTL:
sITerB:
SERMAX:
SERRPC:
$GDADR:
$80ADR:
$GDOAT:
$80DAT:

SAUTOB:
$INTAG:

SWR :

001160
001162
001164
001166
001170
001172
001174
001175
001176
001177
001200
001202

SCMTASL:

DISPLAY:
$TKS:

CONTAINS VARIOUS COMMON STORAGE LOCATIONS
PROGRAM.

.*1120

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

.MORD

.WORD

177560

$TKB:

177562

$TPB:

177566

$TPS:

SNALL:
SFILLS:
SFILLC:
$TPFLG:
SREGAD:

1151
1152
1153
1154
1155
1156
1157
1158
1159
1160

MACY11 30A(1052)

19-JUN-84 15:45

SEQ 26

19-JUN-84
16:22 PAGE 26
COMMON TAGS

SREGO:
SREG1:
$REG2:
SREGS:
SREGA:
SREGS:
$TMPO:
s$TMP1:
$TMP2:

077
015
000012

$QUES:
SCRLF:
$LF:

sTMPS:
STIMES:

O
O
O
O
O
O
O
O
1
O
O
O
O
O
O
O
O
O
O

DSMR

DOISP

1 1CONTAINS THE TEST NUMBER
1 sCONTAINS ERROR FLAG
1 sCONTAINS SUBTEST ITERATION COUNT
1 sCONTAINS SCOPE LOOP ADORESS
1 sCONTAINS SCOPE RETURN FOR ERRORS
1 sCONTAINS TOTAL ERRORS DETECTED
+ sCONTAINS ITEM CONTROL BYTE
1 sCONTAINS MAX. ERRORS PER TEST
1 sCONTAINS PC OF LAST ERROR INSTRUCTION
+ sSCONTAINS ADORESS OF ‘GOOD’ DATA
1 sCONTAINS ADORESS OF ‘BAD’' DATA
+ sCONTAINS °'GOOD’ DATA
1 sCONTAINS ‘BAD’ DATA
-NOT TO BE USED
1 sRESERVED-

s sAUTOMATIC MODE INDICATOR
+ 1 INTERRUPT MODE INDICATOR
: sADDRESS OF SWITCH REGISTER
1 1 ADORESS OF DISPLAY REGISTER

13TTY KBD STATUS

31 7T7Y XKBO OUFFER

177564

.BYTE
.BYTE
.BYTE
.BYTE
.MORD

0
2
12
0
O

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

O
O
O
O
O
O
O
O
O

ASCII
.ASCII
ASCIZ

/v
<15
«<12»

_WORD
O

1 sSTART OF COMMON TAGS

13 TTY PRINTER STATUS REG.
;1TTY PRINTER BUFFER REG.

ADORESS
ADORESS

1 1CONTAINS ML CHARACTER FOR FILLS
s sCONTAINS ¢ OF FILLER OHARACTERS REQUIRED
1 1INSERT FILL OHARS. AFTER A "LINE FEED”
13 "TERMINAL AVATLABLE” FLAG (B8IT<07>=0=YES)
: iCONTAINS THE ADDRESS FROM
1 sWHICH (SREGO) WAS OBTAINED

+ sICONTAINS ((SREGAD)+10)
1 sCONTAINS ((SREGAD)+12)
s sUSER DEF INED
1 sUSER DEF INED
1 sUSER DEF INED
1 sUSER DEF INEO
1iMAX, NUMBER OF ITERATIONS
1 1QUESTION MARK
1 1ICARRIAGE RETURN
1 1LINE FEED

1100088000888 0080000080880808080808008000088880800800000808008848840800

.SBTTL

APT MAILBOX-ETABLE

B3
CZOZA -0
. P11
CZ0ZAn

MACY11l S0A(10352)

19-JUN-84 15:45

19-AN-84

16:22

SEQ 27

PAGE 27

APT MAILBOX-ETABLE

..........“......‘..‘.‘.....O..‘..“...........‘.‘..‘..0.‘..0.“

.EVEN

001246
001230
001292
001254
001254
001255
001236

001260
001262

001264

001265

000000
000000
000009
000000
000000
00000C
000000
000000
000
000
000000
000000
000000

001234
001234
001236
001240
001242
001244

SMAIL:

$MSGTY:
SFATAL:
STESTN:

.WORD
.WORD
.WORD

.MWORD
SPASS:
SOEVCY: .WORD
.WORD
SUNIT:
SMSGAD: .WORD
$NSGLG: .WORD
SETABLE:
SENV;
.OYTE
SENVM:
.OBYTE
S$SUREG: .WORD
SUSMR:
SCPUOP:

1e
1®
1e
ie
10
10

$MAIS1:
MTYPL:

.WORD
.MORD

.BYTE
.BYTE

AMSGTY
AFATAL
ATESTN

APASS
ADEVCY
ANTT
AMSGAD
AMSGLG
ACNY
AENVM
ASMREG
A _SWR
ACPUOP

AMAMS]
AMTYPL

1 1PASS COUNT
;0EVICE COUNT
11170 UNIT NMABER
(;MESSAGE ADORESS
; MESSAGE LENGTM
1 1 APT ENVIRONMENT TABLE
1 tENVIRONENT BYTE
1 ;ENVIRONMENT MODE BITS
u»? SWITCHM REGISTE!
1 1USER SWITOHES
;:CPVU TYPE, OPTIONS

'C'U TYPE
11/0.'01 11705202.11/7200
11/70'“.PN°07.0'10
817 10-REAL TDE OLOCXK
8IY 9=FLOATING ~OINT PROCESSOR
8IT O=MEMORY MANAGEMENT

8ITS &

MEN.TYPE OYTE

-- (MIGH BYTE)

SO0 NSEC M0S=003

.WMORD

AMADRL

;MIGH ADDRESS,BLKOL

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

SMAMS2:

.BYTE

AWMS2

;MIGH ADDRESS .M.S. BYTE

001326
001330
001332
001334
001336
001340
001342

R Hodusls

SMADRL:

160010

i®

MiYPl, .eviIE

SMADR2: .MORD
sSMANMSS: .OYTE
sNTYPS: .OYTE
SMADRS: .WORD
ArsSe: .BYTE
mMTYP4: .BYTE
SMADRG;: MORD
SVECT1: .WORD
SVECT2: .WORD

SBASE:
SOEVM:
sCOM1:
SCOM2:
¢00MO;:
$0DM1:

s00M2:
¢DOMS:
S00W4;:
00WS:
600W6:
$00W7:
$O0M8:
$00W9:

11/740-04,11/450%

;;M13M ADDRESS.M.S. BYTE
4 MEM. TYPE ...KOI

001266

001324

1262

i MESSAGE TYPE CODE
FATAL ERROR NUMBER
;TEST NUIMBER

900 NSEC CORE=001
300 NSEC SIPOLAR=002

i®
1e

1 1APT MAILBOX

.WORD
.MWORD
.MORD
.WORD
.WORD
.MORD

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

ATYP2

MEM.LAST w o3 BYTES,THIS WORD AND LOW OF ~TYPE~ ABOVE

u'fl‘ TYPE, wua

AMADR2 ;MEM.LAST ADDRESS.BLK®2
AWSS ; HIGH ADDRESS .M.S.BYTE
; MEM. TYPE ,BLKOS
AMTYPS
AMADRS ;MEM.LAST ADDRESS.OLKOS
4 ;HIGH ADDRESS.M.S.BYTE
MAMMSA
,
TYPE ,BLKMM
MEM
AMTYPE
MEN.LAST ADDRESS.BLKS4
AMADRA
1 INTERRUPT VECTOROL1.0US PRIORITYS]
AVECT1
AVECT2 ; 1INTERRUPT VECTORO0US PRICRITY®2

ABASE
ADEVM
ACDWL
ACDMR
ADOWO
ADOW1
ADOM2
ADOW3
ADOW4
ADOWS
ADDUS
ADOM7
ADOWS
ADOW9

1 1BASE ADDRESS OF EQUIPMENT UNDER TEST
1 sDEVICE mAP
1 iICONTROLLER DESCRIPTION WORC#)
1 tCONTROLLER DESCRIPTION WORD#Z2
1 10EVICE OESCRIPTOR WORD#O
1 1DEVICE DESCRIPTOR WORD®)L
1 1OEVICE OESCRIPTOR WORD#Z
1 tOEVICE OF-CRIPTOR WORD®S
s 1OEVICE DESCRIPTOR WORDS4
1 t1OEVICE DESCRIPTOR WORDES
1 sOEVICE DESCRIPTOR WORD#G
1 1OEVICE DESCRIPTOR WORD®7
1 1OEVICE DESCRIPTOR WORO#8
1 1OEVICE DESCRIPTOR WORD®9

1263

1264
1265
1266
1267
1268
1269
1270

1271
1272

MACY11

30A(1052)

19-JUN-84 15:45

19 JUN-84

16:22

SEQ 28

PAGE 28

APT MAILBOX-ETABLE

001344
001346
001350
001352
001354
001356

$00W10:
$00M11:
00M12:
sO0M1S:

001360

SETEND:

s00M14 :
$00W1S:

355558

CZOZA -0
. P11
CZOZAM

ADOW10
ADOM11
ADOW12
ADOW13
ADOW14
ADOM1S

1 10EVICE
1 tOEVICE
1 sOEVICE
1 1OEVICE
1 sDEVICE
1 1DEVICE

DESCRIPTOR
DESCRIPTOR
DESCRIPTOR
DESCRIPTOR
DESCRIPTOR
OESCRIPTOR

WORD#10
WORDe11
WORD#12
WORD#13
WORD#14
WORDO1S

D3
CZOZA-HO
. P 11
CZOZm4

MACY11 30A(1052)

19-AN-84 15:45

SEQ 29

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

.SBTTL

1273
1274
1275
1276

10 THIS TABLE CONTAINS THE INFORMATION FOR EACH ERROR THAT CAN OCCUR.

1278

1 oNOTEL:
1 oNOTE2:

1oTHE INFORMATION IS OBTAINED 8Y USING THE

1279

1280
1281
12682

1296
1297
1298
1299
1300
1301
1302
1303
1304
1305
1306
1307
1308
1309
1310
1311

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

1 tPOINTS TO THE ERROR MESSAGE

1 tPOINTS TO THE DATA HEADER

1 1POINTS TO THE DATA FORMAT

1 1POINTS TO THE DATA

1283

1264
12685
1206
1287
1268
1289
1290
129
1292
1293
1294
1295

INDEX NUMBER FOUND IN

1oLOCATION SITEMB. THIS NUMBER INDICATES WHICH ITEM IN TH- TABLE IS PERTINENT.

1277

$ERRTE

001360

1PROGRAM CONTROL PARAMETERS

001364
001366

001370
001372
001374
001376
001400

000377
017070

:
:
:

001402
001404
001406
001410
001411
001412

NEXT:
LOCK;

001360
001362

:
:
001500

1ADORESS OF NEXT TEST TO BE EXECUTED

1ADORESS FOR LOCX ON CURRENT DATA

377
17070
0
0
O
0
0
0
LBLKW
1
.BLKB 1}
.BYTE 1

1OEFALT ALL EIGHT LINES RUNNING
1PARAMETERS: 8 BITS/CHAR,2 STOP BITS. »%00 BAUD,NO PARIT
10EFALT MAINTENANCE TM00t
sLINE NUMSCR
1 TRANSHISSION LINE NUMBER
tCOUNT OF WORDS IN A TRANSMISSION PATTERN
1OEVICE ADORESS S /ORAGE LOCATION
1PROGRAM COUNTER STORAGE
1e0211°'S SELECTED ACTIVE.
1oPOINTER ONE PAST RUNNING DEVICE.
1sOCTAL NUMBER OF DZ11°'S.
1 SWORKABI.E NUMBER.

: DZ.MAP

1 TABLE POINTER.

E3
CZDZA -0
CZOZAH P11

1312
1313
1314
1315
1316
1317
1318

1319
1320
1321
1322
1323
1324
1325
1326
1327
1328
1329
1330
1331
1332
1333
1334
1335
1336
1337

1338
1339
1340
1341
1342
1343
1344
1345
1346
1347
1348
1349
1350
1351
1352
1353
1354
1355
1356
1357

1358
1359
1360
1361
1362
1363
1364
1365
1366
1367

MACY11l 30A(10352)

19-JUN-84 15:45

SEQ@ 30

16:22 PAGE 30
19-UUN-84
ERROR POINTER TABLE

1PROGRAM CONTROL FLAGS
¥

EIAFLG:

001414
001415
001416
001417
001420

INIFLG:
HORFLG:
MNTFLG:
ogV‘EhG:

.BYTE

.BYTE
.BYTE
.BYTE
.BYTE

1DATA VARIABLES

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

O
O
O
O

T00:
T01:

LMORD
LMORD

O
O

T03:

.MORD

T02:

LMORD

TD4:
T0S:

LMORD

O
O

TR1:
TR2:

LMORD
LMORD

O
O

.MORD

LMORD
MORD

TRS:

TR :
TR?:

STOP:
1

MORD
LMORD
END

.SBTTL

s PROGRAM INITIALIZATION FLAG
1PROGRAM INITIALIZATION FLAG FOR HMEADER MAP
tMAINTENANCE BIT SET FLAG
s TRANSMISSION COMPLETION FLAG

.MORD

LMORD
.MORD

TRS:
TRA :

100000+20MA

06:
T07:

TRO:

10=€IA

O
O

O MACRQO

s=sccesscscnsnsassesse

APT PARAMETER BLOCK

1 90 68080 8 0800000000000000800800080000000808000080008800008400100

1SET LOCATIONS 24 AND 44 AS REQUIRED FOR APT

1 0860806080 8000000800008000000000800000000800808080280008008000000

.8X=,

001462

001462
001462

. =24
200
. =44

;1 SAVE CURRENT LOCATION
11SET POMER FAIL TO POINT TO START OF PROGRAM
11FOR APT START P
1 ,POINT TO APT INDIRECT ADORESS PNTR,

.=.8X

3 RESET LOCATION COUNTER

SAPTHOR ; ;POINT TO APT HMEADER BLOCK

150000884000866880004800800000000000008008000000000480000600000800800

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

SAPTHD:

001234
000132
000137
000137

$HNIBTS:
SMBADR:
$7STM:
SPASTM:

.WORD
.WORD
_WORD

.WORD
SUNITM: .WORD

001500

.*1500
DZ.MAP:

s3TWO HIGH BITS OF 18 BIT MAILBOX ADOR.
1 sADDRESS OF APT MAILBOX (BITS 0-15)
1sRUN TIM OF LONGEST TES?T

95.
13RUN TIME IN SECS. OF 1ST PASS ON 1 UNIT (QUICK VERIFY)
1sADDITIONAL RUN TIME (SECS) OF A PASS FOR EACH ADDITIONAL UNIT
95,
. WORD
SETEND-$MAIL/2 ; LENGTH MAILBOX-ETABLE(WORDS)
10Z11 STATUS TABLE AND ADDRESS ASSIGNMENTS

001500

O
SMATL
90.

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

F3
CZOZA-HO
CZOZAM.P11

1389
1390
1391
1392
1393
1394
1395
1396
1397
13968
1399
1400
1401
1402

1403

1404
1405
1406
1407
1408
1409
1410
1411
1412

001530
001532
001534
001536
001540
001542

000001
000001
000001
000001
000001
000001

1415

1416
1417
1418
1419
1420
1421
1422
1423

MANTL:

.BLKW

o
s

.BLKW

-- END 0 MACR)

OZCR2:
0ZvC2:
OZLV2:
LINE2:

.BLKW
.BLKW
.BLKW
.BLKW

MANT2:

.BLKW

PAR2:

sescasascsssasssasns

.BLKW
.BLKW
.BLKW
.BLKW

Pt et Pus

MACRQO

DZCRY:
0ZvCl:
DZLVl:
LINEl:

PAR] :

.BLKW

-- END

.BLKW
0O

MACRO

tALL LINES SELECTED

1PARAME TERS

tMAINTENANCE MODE FOR THIS DEVICE

ssssssssssssssssses

sssssssssecassssssss

001574
001576
001600
001602
001604
001606

~$A/NK-sessnsssnssanssssusssasassssssasssnss

sCONTROL STATUS REGISTER FOR DZ11 NBER 3
1RECEIVER AND BASE VECTOR FOR DZ11 NUMBER 3
1PRIORITY LEVEL AND EIA FLAG SELECTOR

sALL LINES SELECTED

s PARAMETERS

MANTS:
.BLKW
tMAINTENANCE
END O MACRO ssensncssccacssssss
s

001560
001562
001564
001566
001570
001572

~$ AN -esssscssnccnasssssssssssssnsasssenss

sCONTROL STATUS REGISTER FOR DZ1l NUMBER 2
+RECEIVER AND BASE VECTOR FOR DZ11 NUMBER 2
tPRIORITY LEVEL AND EIA FLAG SELECTOR
sALL LINES SELECTED
s PARAMETERS
1MAINTENANCE MODE FOR THIS DEVICE
:

.BLKW
.BLKW
.BLKW
.BLKW
.BLKW

~$ AN -9ssnassnansesncsssssssnasansessenasns

tCONTROL STATUS REGISTER FOR DZ11 NUMBER 1
1RECEIVER AND BASE VECTOR FOR DZ11 NUMBER 1
tPRIORITY LEVEL AND EIA FLAG SELECTOR

Pmo

-- END

DZCR3:
DZVC3:
oALvVS:
LINES:
FARS:

001544
001546
001550
001552
001554
001556

000001
000001
000001
000001
000001
000001

1413

1414

.‘m-.............I...II.II..I.II.llI.II.

+CONTROL STATUS REGISTER FOR DZ11 NUMBER O
IRECEIVER AND BASE VECTOR FOR DZ11 NUMBER 0
1PRIORITY LEVEL AND EIA FLAG SELECTOR
IALL LINES SELECTEOD
1PARAME TERS
tMAINTEAHANCE MODE FOR THIS DEVICE

000001
000001
000001
000001
000001
000001

MANTO:

.BLKW
.BLKW
.BLKM
.BLKW
LBLKW

Vo Pt Pt P

001514
001516
001520
001522
001524
001526

DZCRO:
0ZVCO:
oALVvO:
LINEO:
PARO:;

b Pt Puo po

1379
1380
1381
1382
1383
1384
1385
1386
1387
1388

000001
000001
000001
000001
000001
000001

=0 (oo

1378

001500
0013502
0013504
001506
001510
001512

b Pt Pt Pt Puo puo

1373
1374
1375
1376
1377

[}

000001
000001
000001
000001
000001
000001

DZCR4:
DZVvCa:
DZLVA:
LINES:

PARA;
MANTS:

-- END

DZCRS:
DZVCS:
DZLVS:
LINES:

PARS:
MANTS;
t

END

.BLKW
.BLKW
.BLKW
.BLKW
.BLKW
. BLKW
0

1372

APT PARAMETER BLOCK

put

1371

SEQ 31

PAGE 3i

o 0=t Pt Pu

1370

16:22

MACRQ

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

+MAINTENANCE MODE FOR THIS DEVICE
'

. BLKW
.BLKW
.BLKW
.BLKW
.BLKW
.BLKW
O

MACRQ)

MODE FOR THIS DEVICE

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

sessascssassscsssss

o 0t gt po Pt Pt

1368
1369

MACY11 30A(1052)

19-JUN-84 15:45

19 JUN-84

AN -scsssesncnsacsssnsnsssassssssasnsass

1CONTROL STATUS REGISTER FOR DZ11 NUMBER 5
JRECEIVER AND BASE VECTOR FOR DZ11 NUMBER S
tPRIORITY LEVEL AND EIA FLAG SELECTOR

tALL LINES SELECTED

1 PARAME TERS

1MAINTENANCE MODE FOR THIS DEVICE

=vecscscasssscsssnsse
{

~SANK-sccsnesscsessasssasvoasoassasavsanes

G3
CZDZA-HO
CZDZAH.P11
1424
1425
1426

1427
1428
1429

021610
001612
001614
001616
001620
001622

MACY11 30A(1052)

19-JUN-84 15:45
000001
000001
020001
(00001
00001
000001

1430
1431

1432

1433

1434

1435
1436
1437
1438
1439
1440
1441
1442
1443
1444
1445
1446
1447
1448

001624
001626
001630
001632
001634
001636

001640
001642
001644
001646

001650
001652

000001
000001
000001
000001
000001
000001

1449

1450
1451

1452
1453
1454
1455
1456
1457
1458
1459
1460
1461
1462
1463
1464

1465

1466

001654
001656

001660
001662
001664
001666

001670
001672
001674
001676
001700
001702

000001
000001
000001
000001
000001
000001

1467

1468
1469

1470
1471
1472
1473
1474
1475

001704
001706
001710
001712
001714
001716

000001
000001
000001
000001
000001
000001

1476

1477
1478
1479

001720
001722

000001
000001

19-JUN-84

16:22

SEQ 32

PAGE 32

APT PARAMETER BLOCK

LINEG:

BLKW
BLKW
BLKW
BLKW

L
1
1
1

MANTG;

BLKW

)

DZCRe:
DZVvC6:
DZLVG:
PARG;

-- END

DZCR7:
DZVC7:
DZLVT:
LINE?7:

PAR?:
MANT7:

-- END

0ZCR10:
0Zv(C10:
OZLV10:
LINELO:

PAR10:
MANT10:

-- END

OZCR11:
(174 /88 1
DZLV1l:
LINELL:
PARL1]:
MANT11:

-- END

DZCR12:
pZvCie2:
oaLvie:

LINEL2:

PAR12:

MANT12:

0O MACRQO

1
]}
1
1

BLKw

BLKW
0

MACRQ

PARLS:
MANTLS:

-- END

OZCR14:
0ZvCia:

1PARAME TERS

1MAINTENANCE MODE FOR THIS DEVICE

sssssscssasasssssas
’

LBLKW
LBLKW
LBLKW
BLKW

LBLKW
LBLKW
BLKW
LBLkKW

)
1
1
1

BLKW

BLKW
0

MACRO

)

tPARAME TERS

1MAINTENANCE MODE FOR THIS DEVICE

ssssssccssssssssess

1
1
1
1

BLKW

BLKW
0

MACR)

1PARNETERS

1MAINTENANCE MODE FOR THIS DEVICE

essssssessasssassss

1
1
1
1
1}
1}

1 PARAME TERS

sMAINTENANCE MODE FOR THIS DEVICE

sssesssssasssanssses

1}
1
1

. BLKW

BLKW
.BLKW
0

MACR)

1
1

=ssssascasssssasasas

1
1

~-$ AN -0sr.000s0snssnuscnccsannanssssasscanss

tCONTROL 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

ssecsassasssssesassse
{

BLKW
.BLKW

~SANK-sessssscosnnsassasssssssssssssssnnss

tCONTROL STATUS REGISTER FOR DZ11 NUMBER 12
tRECEIVER AND BASE VECTOR FOR DZ11 NUMBER 12
+PRIORITY LEVEL AND EIA FLAG SELECTOR
sALL LINES SELECTED
1 PARAME TERS
tMAINTENANCE MODE FOR THIS DEVICE
}

BLKW
.BLKW
.BLKW

AN -ssssssnssssnsssasnsssssssassanansnsas

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

{

BLKW
BLKW
BLKW
.BLKW
BLKW
BLKW

~$ANK-vscesnasasssssnessssssssnssesssansasss

1CONTROL STATUS REGISTER FOR DZ11 NUMBER 10
(RECEIVER AND BASE VECTOR FOR DZ11 NUMBER 10
tPRIORITY LEVEL AND EIA FLAG SELECTOR
tALL LINES SELECTED

.BLKW
LKW
BLKW
BlkW

- /ANK-oscssssssnasssessssnssanssasssesanss

tCONTROL STATUS REGISTER FOR DZ11 NUMBER 7
tRECEIVER AND BASE VECTOR FOR DZ11 MASBER 7
+tPRIORITY LEVEL AND EIA FLAG SELECTOR
sALL LINES SELECTED

-- END O MACRQ)

DZCR13:
pZVvC13:
DZLV1S:
LINELS:

BLKW

1CONTROL STATUS REGISTER FOR DZ11 NUMBER 6
(RECEIVER AND BASE VECTOR FOR DZ11 NUMBER 6
1PRIORITY LEVEL AND EIA FLAG SELECTOR
tALL LINES SELECTED

~OANK-sssescssennsassssnnnnsnassnasscssass

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

H3
CZDZA-H0
CINZAH. P11

1480
1481

1482
1483
1484

001724
001726

001730
001732

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

000001
000001

OZLvie: .BLKW
LINE14: .BLKW

PAR14: .BLKW
MANT14: .BLKW
t

END O MACRC

)
1

1
1

1‘2

1487
1488
1489
1490
1491
1492
1493
14

1502

001734
001736
001740
001742
001744
001746

000001
000001
000001
000001
000001
000001

esescancnccscssssasas

001750
001752
001754
001756
001760
001762

000001
000001
000001
000001
000001
000001

~SA/NK-90cnsasscassassssssascsssnnsssanssass

1CONTROL STATUS REGISTER FOR DZ11 NUMBER 1S
1
DZCR1S: .BLKW
0ZVC13: .BLKW
1
tRECEIVER AND BASE VECTOR FOR DZ11 MUBER 15
OZLV1S: .BLKW
1
tPRIORITY LEVEL AND EIA FLAG SELECTOR
1ALL LINES SELECTED
)
LINELS: .BLKW
1PARAME TERS
)
PAR1S: .BLKW
MANT1S: .BLKW
1
1MAINTENANCE MODE FOR THIS DEVICE
1
-- END O MACRQ esscsssssssccssesses
DZCR16:
DZVC16:
DZLV16:
LINELG:
PAR16:
MANT16:
:

.BLKW
.BLKW
.BLKW
.BLKW
.BLKW
.BLKW

ED 0 MACR)

1505
1506
1507
1S08
1509
1510

001764
001766
001770
001772
001774
001776

000001
000001
000001
000001
000001
000001

DZCR17: .BLKW
DZVC17: .BLKW
oALvV17: .BLKW
LINEL7: .8k
PARL7:
.BLKW
MANT17: .BLKW

1513

002000

177777

DZ.END:

igié

1PARAMETERS
1MAINTENANCE MOOE FOR THIS DEVICE

155?“3
1

tPRIORITY LEVEL ANC EYA FLAG SELECTOR
tALL LINES SELECTED
f

l‘rs

1496
1497
1498
1499
1500
1501

SEQ 33

19-JUN-84 16:22 PAGE 33
APT PARAMETER BLOCK

END O MACRO

177777

)
1
1
]
1
1

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

sessscssssecssasaass

]

1
1
1
1
1
1

~$JNK-sscsancassessensssnssssssscassassnnsnass

«$A/NK-ssossscnnosssssassnssanssesssssssuss

sCONTROL STATUS REGISTER FOR DZ11 NUMBER 17
tRECEIVER AND BASE VECTOR FOR DZ11 NMMBER 17
1PRIORITY LEVEL AND EIA FLAG SELECTOR
sALL LINES SELECTED
1PARNETERS
tMAINTENANCE MOOE FOR THIS DEVICE

ssssssacercsssaasss

13
CZOZA-HO
CZ0ZAN.P11

19-JUN-84 15:45

16:22

SEQ 34

PAGE 34

APT PARAMETER BLOCK

1:680008000800800000004908000048008000008080004040008400080004880080000000
N
N
Y
L
W
A AP I
R S I N I
I
IR
T I S S

104400

007216

002010
002012

002014
002016

ADVANCE =TRAP «0
t

END

MACRQO

SCQI-TR”SE%’I

104402
005422

TYFE'TR”;e’E

104403

INSTR'TR”I;‘STR

END O MACRQO

END O MACRO

END

O MACRQ

104404
006426

INSTER=TRAP +4

104405

PMM-ng

104406
011152

SETFLG=TRAP+6

002022

104410
006706

002024

104411
006740
104412
006744

104413

007144

END

. INSTER

O MACRQO

END

O MACRQ

.SETFLG

END O MACRQ

SAVOS=TRAB.7 _
;

002030

. ADVANCE

104401
005376

104407

1543

1547
1548
1549
1550
1551
1552
1553
1554
1555
1556
1557
1558
1559
1560
1561

19-UUN-84

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

1514
1515
1516
1517
1518
1519
1520
1521
1522

1545

MACY11l 30A(1052)

END

SAV!

O MACRO

END

O MACRQ

CONVART=TRAP+11
i

.CONVRT

END O MACRQ

END

O MACRQ

002032

104414
007176

104415
026744

PMOTR»éOIS

002034

END O MACRO

cesscacscassscnanss

tCALL TO TELETYPE OUTPUT ROUTINE
s=ssscscssssasasssses

1CALL TO ASCII STRING INPUT ROUTINE

eesscsssssassasssse

1CALL TO INPUT ERROR HANDLER

escessascasssessses

sCALL TO NUMERICAL DATA INPUT ROUTINE
sssceccscscsssasesse

iCALL TO

SET FLAG ROUTINE

sscessanassssesanae

sCALL TO REGISTER SAVE ROUTINE

sesccsscsssesssssses

sCALL TO REGISTER RESTORE ROUTINE

esscesesssnseassssas

JCALL TG DATA OUTPUT ROUTINE

ssvasscssssansssass

tCALL TO DATA OUTPUT ROUNTINE WITHOUT CR/LF.

=sssecsescssasesnass

.DEVICE.CLR

END O MACRO

tCALL TO LOOP ON CURRENT DATA HANDLER

DEVICE.CLR=TRAP+13
DELAY=TRAP+14

=veccassesesssscassas

CNW'T-TQPOIZ‘r
;

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

RESOS'm”ééégs
1

JCALL TO ISSUE A DEVICE CLEAR

sesccessssseansssss

sCALL TO DELAY FOR FAST CPU'S
sevecmsssssesessess

tCONVERT DECIMAL STRING TO OCTAL

J3
CZDZA-HO
CZ0ZAH.P11

1571

19-JUN-84

002036
002040

END

MACRQ

104416
027140

PAWCH=TRAP+16
.PAWCH

104417

DCLflSH'TRSSC:;"

007164

SEQ 35

PAGE 35

APT PARAMETER BLOCK
P

1562

1563
1564
1565
1566
1567
1568
1569
1570

MACY11 30A(1052)

19-JUN-84 15:45

16:22

END

MACRQ

MACRO

sssssscscssssessssss

1SET FLAG

ECHO OR

CABLE

=sssssssasssssasssssse

1CLEAR DEVICE, SET MAINT. BIT IF I MODE
sscssscsescssssvsscses

1:0680600400848060080088080088080808000000040080009000200020448000008000488

I<3
CZDZA-HO

CZoZAn.P11
1572
1573
1574
1575
1576
1577
1578
1579
1580
1581
1582
1583
1584

1585
1586
1587
1588
1589
1590
1591
1592
1593

MACY11 30A(1052)

19-JUN-84 15:45

16:22 PAGE 36
19-JUN-84
PPT PARAMETER BLOCK

IRECT POINTERS
VECTOR AND REGISTER INDIRECT
‘10211 INCCARER
R/

tWRITE ONLY

1WRITE ONLY

1IR/M
1R/M

1READ ONLY
tREAD ONLY
sWRITE ONLY
sMRITE ONLY

10EFALT D2 VECTORS
tREC INTR VECTOR
.REC INTR STATUS
1 XMIT INTR VECTOR
1 XMIT INTR STATUS

SEQ 36

L3
CZOZA-HO
CZDZAN.P 11

199
1600
1601
1602

1603

16:22 PAGE 37
19-JUN-84
AP T PARAMETER BLOCK
1TINE TABLE FOR RELATIVE TIMING TESTS

002102
002102
002104
002106
002110
002112
002114
002116
002120

002122
002124

002130
002132
002134
002136
002140
002142
002144
002146

TMTBL

150:
T7S:
T110:

0000000000000
0O

1594
1595
1596
1597
1598

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

T134:
T150:
7300:
1600:
T11200:
71800:
12000:
12400:
73600:
T4000:
17200:
79600
TEICHT:0
TSEVEN: O
TSIX:
0
TFIVE
0

SEQ 37

M3
CZOZA-HO

CZ0ZAM.P11

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

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

1618
1619
1620
1621
1622
1623

1PROGRAM INITIALIZATION
1LOCK OUT INTERRUPTS

1SET P PROCESSOR STACK
1SET WP POMER FAIL VECTOR

1CLEAR PROGRAM CONTROL FLAGS AND COUNTS
1 TYPE TITLE MESSAGE

1624

106427

012737

012737
012737
012737
012737
012737
012737
012737

113737
005037
105037
012737
012737
005037
0050387
005037
012737

b-]

#STACK, SP

O4ERROR , BIENTVEC
1SET VECTOR FOR ERROR ROUTINE
iLEVEL 7
0340, DOEMTVEC 2
¢. TRPSR , B0TRAPVEC
1SET VECTOR FOR TRAP CALLS
0340, 00TRAPVE(C 2
sLEVEL 7
@ $PURDN , DOPURVEC
+SET VECTOR FOR POMER FAIL ROUTINE
1LEVEL 7
0340, BOPURVEC .2
1SAVE MUMBER OF DEVICES IN SYSTEM.
OZNUM, SAVNUM
1CLEAR PASS COUNT
$PASS
S$ERFLG
1CLEAR ERROR FLAG
00Z .MAP ACTIVE
|QT MAP POINTER.
1 ,RUN
S$ERTTL

;POINT POINTER TO FIRST DEVICE.
1CLEAR ERROR COUNT

O.START, SLPADR

;SET UP FOR POMER FAIL BEFORE

S$ERRPC
$TSTNM

001126

j1CLEAR THE WORLD. START NEW ENVIRONMENT
1SET WP STACK

PR7
1LOCK OUT INTERRUPTS
C$PURON , 8024
1SET UP POMER FAIL VECTOR
04SCOPE , 8010TVEC
1SET VECTOR FOR SCOPE ROUTINE
sLEVEL 7
0340, 00I0TVEC.2

|CLEM LAST ERROR POINTER
1SET UP FOR TEST 1

s TESTING STARTS

FOR SMALL 11 SWITCH REGISTER COMPATIBILITY
002354
17T

176610

012737
012737

000176
000174

001160
001162

012637

012637
105737
001010
023727
001402

002436

105337
105737
100006
004737

002442
002444

000240
000240

002424

6,.-(SP)

013746
013746
012737
022777
001402
000407

000004
000006

4,-(SP)
0204 .4
€-1,85WR
208:
:
224
2l4:

001415

000042
001000

001415
001255
012112

:SAVE BUS ERROR PS

1SAVE BUS ERROR PC
tSET UP TO TRAP TO THIS ROUTINE
1CAN 177570 BE REFERENCED?

+IF SO AND IT IS -1, TREAT LIKE SWITCHLESS
1 IF YES,SKIP AROUND THE SETUP
tREMOVE THE TRAP FROM THE STACK
+IF NO,TRAP COMES MERE.POINT TO SOF TWARE SWR
OSUREG, SWR
OOISPR£G OISPLAY aPOINY TO SOFTWARE DISPLAY REGISTER
ESS:;O
P
tRESTORE THE BUS ERROR VECTOR

224
214

INIFLG
294
9042, 0$ENDAD
314

1 TITLE ALREADY PRINTED?
1BRANCH IF YES
1RUNNING UNDER ACT?
+IF YES DONT PRINT TITLE

INIFLG
SENVM

1SET THE ONCE ONLY FLAG
1OETERMINE WHETHER APT SIZING SHOWD BE& DONE

HORFLG

tMAKE SURE STATUS TABLE IS PRINTED

+JMTITLE

31¢:
:
294

1PRINT Tt DIAGNOSTIC'S TITLE

1 IF NOT, GO CHECK FOR AUTO-SIZING
304
lOTO'ERUISE. GO DO APT SIZING FROM ETABLE
PC,SETAPT
sREPLACE "CLRB HORFLG” WITH NOP'S

1649
1650
1651
1652
1653
1654
1655
1656
1657
1658
1659
1660
1661
1662
1663
1664
1665
1666
1667
1668
1669
1670
1671
1672
1673

001412
001406

v
w

012706

1629

RESET

8380338383333 3

.START:

002150

1625
1626
1627

SEQ 38

CLR8

CZDZA-HO
CZ0ZAM . P11

FACY11 SO0A(1052)
19-AN-84 15:45

1674

002446

000137

004420

1677

002462

122737

000377

167S 002452 032777 000001
1676 002460 00101}

1678 002470 001003
1679 002472 105777 176462
2
1680 002476 1004,
1681 002500 000137 003244
1682 002504 012700 001500
1683 002510 105037 001416
1684
1685
1636
1687

1688

002514
002516
002522
002524

005020
020027
001374
105337

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

176500

30%:

32¢4:
654 :

001415

1GO PRINT DZ STATUS TABLE

8Iv
BNE

#5400, BSWR
324

sRESELECY ?
1IF YES, GO SET UP THE INFORMATION

BNE
1S78
8M1
P
MOV
CLR8

.+10
8SuWR
324
734
402 .1 RO
HDRFLG

1IF NOT ANSMERING QUESTIONS
tARE U AUTO SIZING?
sNO AUTO SIZE! NO SWOO=1 ON 1ST START!
1IF NO, SKIP THE INTERROGATION
1POINT TO THE BEGINNING OF THE MAP TABLE
IMAKE SURE A MAP GETS PRINTED

Cr8

001415

002000

164

CLR
0,
BNE
DECB

0377, INIFLG

(RO).
RO, 002 .END
65¢
INIFLG

tON 1ST START; MUST ANSMER QUESTION

tCLEAR A TABLE LOCATION
tHAVE THE TABLE BOUNDARIES BEEN EXCEEDED?
1IF NOT ,CLEAR THE NEXT LOCATION IN THE TABLE
$INSURE NO AUTO SIZING IF QUESTIONS ANSMERED®

1689
1690

;THE FOLLOWING ARE PARAMETERS USED TO FILL IN THE MAP
;TABLE AND SET UP THE DIAGNOSTIC.

169§

1GET THE BASE ADDRESS OF THE DZ11'S

1691
169

1694
1695

33s:

002530

1696
1697
1698
1699
1700
1701
1702
1703

002530
002532
002534
002536
002540
002542
002544
002545

104403
003464
104405
160000
163770
001500
007
001

i;g

002546

013737

1704

001500

001310

002554

1711
1712
1713

002554
002556
002560

1718
179

{;go
1

INSTR
664
PARAM
160000
163770
0ZCRO
.BYTE
.BYTE

7
1

Hov

DZCRO, $BASE

;:COPY BASE ADORESS TO ETABLE

END O MACRQ sescesasssssesansss

002562
002564
002566
002570
002571

002572

344

104403
003530
104405

1727
1728

1729

300
776
02ZvCo
.BYTE

001

013737

;

INSTR
678
PARAM

000300
000776
001502
003
;

001502

001304

END

.BYTE
O

MACRQ

MOV

-0GETPAR-sscssssssssscanassssssssasssnnssns

sCALL THE STRING INPUT ROUTINE
;POINTER TO MESSAGE TO BE PRINTED
;CALL THE OCTAL TO ASCII CONVERT ROUTINE

tLOMEST LEGITIMATE VALUE OF EXPECTED RESPONSE
+HIGHEST LEGITIMATE VALUE OF EXPECTED RESPONSE
;POINTER TO MAP LOCATION TO BE FILLED
1MASK OF INVALID BITS FOR THIS PARAMETER

3
1

1INMPBER OF PARAMETERS TO STORE

e=ssssssssesssssasnss

0ZVCO, sVECT1

;1COPY VECTOR TO ETABLE

1GET THE BUS REQUEST LEVEL

{;gg

1724
1725
1726

-6GETPAR-sccnssssssusssasssssssscannasnssss

;GET THE BASE VECTOR ADORESS

1709

1714
171S
1716
1717

tCALL THE STRING INPUT ROUTINE
1POINTER TO MESSAGE TO BE PRINTED
1CALL 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
;MASK OF INVALID BITS FOR THIS PARAMETER
iNMBER OF PARAMETERS TO STORE

i;Ox?
1710

SEQ 39

002600
002602
002604
002606

002610

104403
003571
104405
000004

000007

INSTH
684
PARAM
4

3 -$GETPAR-sesssssssncssesansssasssassussssns
tCALL THE STRING INPUT ROUTINE
{PCINTER TO MESSAGE TO BE PRINTED

tCALL THE OCTAL TO ASCII CONVERT ROUTINE
1LOMEST LEGITIMATE VALUE OF EXPECTED RESPONSE

{HIGHEST LEGITIMATE VALUE OF EXFECTED RESPONSE

B4
CZDZA -

CZ0ZM1.P11

MACY11 SOA(10S2)

19-AN-84 15:43

1730
1731
1732

002612
002014
002615

001504
000
001

1734
1735
1736
1737

002616
002624
002630
002634

113737
106337
106337
106337

1733

1738
1739

1740
1741
1742

1743
1744
1745

1766
1747
1748
1749

1750
1751

002640
002644

002650
002654
002660

002664
002666
002672
002676
002702
002704

002710
002712
002716
002722
002726

1758
1759
1760

002732
002734
002740

1761
1762
i763
1764
1765
1766
1767
1768
1769
1770
1771

1772
1773
1774
1775

1776
1777
1778
1779
{;?i

002730

002742
002744
002746
002752
002754
002760
002766
002772
002774
003002
003004

104402
(095037
105777

100373
017746
042716
122716
001014
105777

100373
117716
042716
122716
001366

1785

SEQ 40

PAGE 40

PROGRAM INITIALIZATION AND START UP.

001504 001305
001303
001305
001305

ozZLvo
BYTE
BYTE

O
1

MOVe
ASLS
ASLD
ASLS

OZLVO, $VECT1.1
SVECT1.}
SVECT1.1
IVECTL1.1

1POINTER TO MAP LOCATION TO BE FILLED

(MASK OF INVALIO BITS FOR THIS PARAMETER

INPBER OF PARAMETERS TO STORE

-- END O MACRQ eevcsccscsassesserne

ASLS
ASLS

001305
001305

SVECT1.1
SVECT1.1

TYPE
QLR
1ST8
oPL
MoV
8IC
ovs

744
2
AL
84 TXS
804
NG, -(SP)
0177600,(SP)
OXOFF ,(SP)

176250
177600
000021

8PL
"oV
8I1C
ove
ONE

101¢
o8, (SP)
0177600,(SP)
OIXON, (SP)
1014

000021

B8R
ove
BNE

004260
001220
176300

804 :

176274
177600
000023
101¢:

176254

000752
122716
001002

005726
000745
122726
001414
014677
042737
122726
001332
0352737
000726

e
TSTB

TS7

005726

1GET BUS REQUEST LEVEL INTO ETABLE
tALIGN THE BITS PROPERLY
tALIGN THE SITS PROPERLY
tN.IGN THE BITS PROPERLY
IALIGN THE BITS PROPERLY
sALIGN THE BITS PROPERLY

83s:

000015

102¢:

176212
100000
000102

001504

100000

001504
81¢:

L
aR
COrP8
8EQ
MOV
8IC
o8
ONE
8IS
OR

3¢
84 7TKS

(SP).

80¢
OIXON, (SP)
1024

(SP).
804
01S,(SP).
81.
-(SP),8¢TP8
#8I713,02Lv0
0102,(SP).
204
ABIT15,02Lv0
804

1PRINT EIA MESSAGE
IUSE ¢ TM" P}

11S XE
1 IF NOT, WAIT FOR IV
1IF YES, PUT CHARACETR ON STACK
1STRIP OOMN OHARACTER
1IS 11 A XOFF?
AR IF
)\ §
tWAIT FOR A OMARACTER

TER
1GETY
1STRIP DOMNY CHMARACTER
sWAIT FOR A XON?
1GET NEXT CHAR IF NOT
1POP STACK
sMAIT FOR A OMAR
1IS IT A RANDOM XON
i0R IF NO

1ELSE, POP STACK

1GO GET NEXT O
1IS IT <«CR> ?
1IF SO, GEY ouT
1IF NOT, PRINT CHARACTER
sCLEAR EIA FLAG
1IS IT A 8?2
1 IF NOT, GO BACK FOR INPUT
1IF SO, SET FLAG
1GET MORE INPUT

3 30SH-BrL
1:0SH-0L
1 sOSM
1 30SH-0L
s 30SH-BL

3 s0SH-00L
s s0SH-O0L
1305H-00L
3 s0OSH-BML
s 10SH
110

s sOSH-BML
1:0SH-BL
1 10SH-B0L
$ 10SH-BML

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

003004
003006
003010
003012

104403
004002
104406
001512

INSTR
724
SETFLG
MANTO

-SGETFLG-ovesccsnssscancessaccncasorsns

tCALL THE STRING INPUT ROUTINE
1POINTER TO THE MESSAGE TO BE PRINTED
sCALL THE MAINTENANCE FLAG SETUP RUUTINE
1 THIS IS THE FLAG BEING SETUP

-- END O MACRQ cecccccccsansascens

tGET THE NUMBER OF DZ1.'S RUNNING

i;gg
1784

16:22

+FIND OUT IF MODULE IS EIA OR 20 MA,

1752
1753
1754
1755
1756
1757

106337
106337

19-JUN-84

003014

104403

INSTR

-0GETPAR-sscacssncssssscsansssnncnsannnanss

1CALL THE STRING INPUT ROUTINE

C4
CZOZA -HO
CZOZAM.P11
1786

1787

1788
1789

1790
1791
1792

1793
1794
1795
1796
1797

1798

1799

003016
003020
003022
003024
003026
003030
003031

MACY11 S0A(1052)

19-JUN-84 15:43

19-JUN-84

16:22

PROGRAM INITIALIZATION AND START P,

(POINTER TO MESSAGE TO BE PRINTED
tCALL THE OCTAL TO ASCII CONVERT ROUTINE
ILOMEST LEGITIMATE VALUE OF EXPECTED RESPONSE

714
PARAM
1

003740

104405

000001
000020

16.
s$THP)
.BYTE

001220
000
001

END

BYTE

O
1

MACRQ

012737
0127%7

001306

MOV
MOV

0377,LINEO
017070,PARO

003046

012737
032777

007214
176076

nov

€1,0L YONY

0EQ
JSR
MoV

404
PC.23¢
01, $0EW

MOve
OEC
8€EQ

sTIP], SAVINUM
ML
614

ROL
8R
MOV
Mov
MOV
MoV
MOV

0EWTM
624
SOEWM,
6 TIP2
SOEVM,DZACTYV
#0ZCRO,RO
#0ZCR1
. R1
0400W0 ,R2

ROR
ASR
8Cs
MOV
N, 4
MOV
ADD
MoV

sTHP2
sTIP2
414
e0-1,(R1)
634
(RO).,(R1)
€10,(R1).
(RO)+,(R1)

001310

001402

004737
012737

001312
001410

113737
113737

05337
001404
000261
006137
000771
013737
013737
012700
012701
012702
000241
006037
006237
103404
012711
000137
012011
062721
012011
062721
012021
012021
016012

042712
051022

012021
012021
000751
032777
001002
000137

004737
103337
000137

8IY

001411

nOve

624:

SEC

001312
001312
001312
0013C
001514
001320

001222
001404

61$:

001222
001222
177777

004374

000010

ADD
MOV
MOV

000010

HOv

1771774
or17777

000010

004374
003274
001415

004420

175706

73s¢:

424

, BSWR
0SWOS

sTHP1
. 0D

€10,(R1).
(RO)+,(R1)e
(RO)+,(R1)»

-4(Rh0), (h2)

8IC

oTT1777,(R2

MoV
MOV

(RO)O.(RI)O
(RO)+,(R1)e

8IS

(RO).(R2).

644

ONE
JP
JSR
0EC8
MNP

424
634
PC,25¢
INIFLG
164

817

HIGHEST LEGITIMATE VALUE OF EXPECTED RESPONSE
1POINTER TO MAP LOCATION TO BE FILLED
tPMASK OF INVALID B1ITS FOR TMIS PARAMETER
INIMBER OF PARAMETERS TO STORE

=eccsceccccscessascsesne

003032

003040

SEQ 4)

PAGE 4}

, BSWR
0SUO03

+SET UP DEFALT LINES
1SET UP DEFALLT LPR PARAPETER
{RECEIVER ON; 9600 BAUD; 2STOP BITS; 8 BIT/CHMAR
s INETIALIZE OELAY COUNT
100 YOU MANT PARAPETERS?
1IF N0, SKIP TME PARNYETER CALL

1GET PARAFETERS

+DATIALIZE ACTIVE OEVICE SELECTION PARNETER
:COPY TME MNBER OF DEVICES
1COPY A BACP NMPBER
s $TIP1 CONTAING TME COUNT OF UNINITIALIZED
: SELECTED DEVICES
1SET A BIT FLAG TO INDICATE AN ACTIVE DEVICE
+POINT TO TME MNEXT DEVICE
1GO DO TMIS PROCEDURE AGAIN
10 OF TIMES
1COPY THME ACTIVE DEVICE PARAMETER
1SET A POINTER TO TTME SPECIFIED INFORPATION
;POINT Rl TO THE MEST OF THE MAP TABLE
;POINT TO ETABLE'S DEVICE DESCRIPTOR WORDS
sINITIALIZE TTME “C” BIT FOR A ROTATION
1SKIP MAPPING SETUP FOR DEVICE O- IT'S DOME
+ISOLATE A SELECTION FLAG IN THE ~C* B8IT

:IS TMS DEVICE SELECTED? IF YES. GO LOAD TABLE
s TENINATE THE LIST

16O TO THE NEXT BLOCK

1 ADORESS

nPOM 7O THME NEXT DZ11 ADORESS VALUE
1 VECTOR
1POINT TO THE NEXT YECTOR VALUE
ILEVEL
1ILINES
tGET THME EIA FLAG FROM THE PRIORITY WORO
+ISOLATE THAT FLAG
PARAMETERS TO DEVICE DESCRIPTOR WORD
:
1PARAME TERS
sMAINTENANCE MODE
1ASK PARAMETERS ?
1IF NO, GO DO AUTO SIZING
1GO SET UP FOR AUTO SIZING
1GO ASK PARAMETERS
tINSURE NO AUTO SIZE IF QUESTIONS ANSWERED
160 TO THE NEXT BLOCK

1GET THE ACTIVE LINES PARAMETER

D4
CZ0ZA-HO
CZ0ZAn . P11
1842
1843

003274

1644
1845
18 6
1647

003274
003276
003300
003302

1848
1849
1850
1851
185>

1853
1854

003304
003306
003310
©o%:il

003312

MACY11 S0A(1052)
19-AN-0e 15:45

19-JMUN-84 16:22 PAGE 42
PROGRAM INITIALIZATION AND START UP.
234

000377
001506
000
001

00,416

1855
1856
185/

1858
1859
1660
1661
1662

1863
1664
18665
18066
1867
1868
1869
1870
1871
1872
i:;i

1877
1878

O0u3316
003322
003324
003330
003332
003334
003336
003340
003342
003346
003352
003354
003356
003360
003362
003364

NOS737
100021
013703
OUG0C3
103410
001414
006203
103373
104402
1044062
000750
001772
006203
103370
000241
000761

O
1

CLRS

HORFLG

END O MACRQ

1HIGHEST LEGITIMATE VALUE OF EXPECTED RESPONSE
tPOINTER TO MAP LOCATION TO BE FILLED
$MASK OF INVALID BITS FOR THIS PARAMETER
INMPBER OF PARAMETERS TO STORE

escccccscsscesesesse

IMAKE SURE THE CHANGES ARE PRINTED

001512
001506

244:

001230
011075

27s:
25¢:

TS7
8PL
MOV
ROR
8Cs
BEQ
ASR
8CC
TYPE
TYPE
B8R
8EQ
ASR
8CC
cLC
B8R

MANTO
¢
LINEO,RS
R3
258
264
R3S
244
« SQUES
JBADLN
234
2a7¢
R3
ams
244

+IS STAGGERED THE MODE OF OPERATION?
+IF NOT, SKIP THIS SEGMENT
1GET A SCRATOM CCPY OF THE ACTIVE LINES
1GET A LINE SELECTION BIT(EVEN NMUMBER LINE)
1 IF IV IS SELECTED, OMECKX TO SEE IF TME MNEXT IS T0O

+IF ALL MAVE BEEN CHECKED, CONTINUE PROCESSING
+IF IT IS O,OMECK TO SEE IF THE NEXT IS T00
+IF THIS ONE‘'S O 700, GO CHECK THE NEXT PAIR
1 THIS IS AN INCORRECT PARAMETER
sLET THE USER KNOW ABOUT I7
1GO GET TME CORRECY PARAMETER
1IF ANOTHER FLAG ISN'T SET, THERE'S AN ERROR
1GET THE NEXT FLAG
+IF IT ISN'T SET, THERE'S AN ERROR
1 INITIALIZE THE ~C~ BIT FOR YESTING OF THE NEXT PAIR
1GO TEST THE NEXT PAIR OF FLAGS

1GET THE LINE PARAMETER REGISTER ARGUMENT
003366

264:

1879
18680
1881
1882
1883
1684
1885
1886

003366
003370
003372
003374
003376
003400
003402
003403

104403
003670
104405
000000
000017
001510
000
001

1888
1889
18690
1891
1892
1893
1894
1695
1896
1897

003404
003410
003414
003416
003420
003426
003430
003434
003440
003444

012702
012705
011304
006304
016437
000313
032713
011262
011363
062702

1887

LY
LINEO
.BYTE
.BYTE

1 THIS SEGMENT CHECKXS TO MAKE SURE THE LINE PARAMETER JUST ENTERED
1IS LEGITIMATE IN STAGGERED MODE OPERATION IF THAT MODE WAS SELECTED

{:;5
6

-SGETPAR-eccassccsocssesssosscsscsccnansass

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
694
PARAM
1

104403
003614
104405
000001

105037

SEQ 42

;

001506
001510

032416
010070
000014
000014
000014

007214
284

-$GETPAR -esooseccsassccssscossssansresssss

INSTR
704
PARAM
0
17
PARO
.BYTE
.BYTE

O
1

MOV
MOV
MOV
ASL
MOV
SWAB
8IS
MOV
MOV
ADO

OLINEO,R2
{POINT TO THE LINE SELECTION PARAMETER
#PARO RS
1POINT TO THE CHOSEN PARAMETERS
(R3),R4
tUSE BAUD RATE AS AN INDEX IN DELAY TABLE
R4
1ALIGN
THDEX ON WORD BOUNDARY
OLYTBL(R4) ,OLYCNT ;SET THE DELAY COUNT FOR THIS BAUD RATE
(R3)
tPLACE IN MIGH BYTE
#10070,(R3)
{PLACE EXTRA PARAMETERS INTO LOC
(R2),14(R2)
1LOAD THE LINES
(R3),14(R3)
1LOAD THE PARAMETERS
1POINT TO THE NEXT SET
€14 ,R2

END O MACRO

tCALL THE STRING INPUT ROUTINE
1POINTER TO MESSAGE TO BE PRINTED
1CALL THE OCTAL TO ASCII CONVERT ROUTINE
tLOMEST LEGITIMATE VALUE OF EXPECTED RESPONSE
tHIGHEST LEGITIMATE VALUE OF EXPECTED RESPONSE
(POINTER TO MAP LOCATION TO BE FILLED
tMASK OF INVALID BITS FOR THIS PARAMETER
INUMBER OF PARAMETERS TO STORE

ss.secscanscascasasss

E4
CZO2A-HO

CZDZAM.P11

b Pt

Pt ot

LT LW LA
AL
(WANP AW LW LWL

Pub Pt b Pub Pub Pt et Pt et P

NN NN NONNPNPNPNNN
NN

1898
1899
1900
1901

003450
003434
003460
003462
003464
003530
003571
003614
003670
003740
004002
004023
004071
004187
004207
004260
004342

004374
004374
004402
004404
004412
004414
004420
004424
004426

004432
004436
004442

MACY11 30A(1052)
19-AN-84 15:45

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

000014

001774

032123
032123
051102
047111

043105
047440
044501
055440
055440
055440
0535440
030131
052116

041440
053040

031305
020106
032116
034105
047111
032123
052123
020105
051105

000377

001415

000200

174546

012264
001416

:
664
67s:
684

694:
704:
714:
72¢%:

744

754

.EVEN
634

16%:

001416
011050

177777

Ss:
01222

17¢:
1%

000042

000100

000020

ASCIZ
ASCIZ
ASCI?
LASCIZ
ASCIZ
ASCIZ
ASCII
ASCITI
.ASCII
ASCII
ASCIZ
.ASCIZ

/
<200>/1ST CSR ADORESS (160000:163700):
/
<200>/1ST VECTOR ADDRESS (300:770):
/
<200>/BR LEVEL (4:6):
/
<200>/LINES ACTIVE B8Y BIT <IN OCTAL>(001:377):
/
HM0>/DEFMAT BAUD RATE <IN OCTAL»>(00:16):
«go">/0 OF DZ11'S <IN OCTAL> (1:20):
/
<«200>/MAINTENANCE MODE/
<200>/ [EXTERNAL <H325>-EIA ONLY
(E))/
<200>/ [INTERNAL <DZCSRO3-=1:
(1))
(S)): 7
<200>/ ([STAGGERED <H3271:-EIA ONLY
<200>/ (STAGGERED <H3190>-20MA ONLY
(5)): /
<200>/TYPE "A” FOR EIA MORLE OR "B~ FOR 20 MA (A:8):

RTS

ASCIZ

001404

174400

<200>/ENTER DELAY PARAMCTER:

tONLY DO AUTO SIZE ON 1ST START

8IT
BNE
JSR

#BI77,8SWR
164
PC,AUTO.SIZE

18177=122
18R IF NO AUTO SIZE
1GO DO THE AUTO SIZE

BNE
DECB

14
HORFLG

TYPE IT AGAIN
+IF SO, DON'T
tMIC‘TE THAT THE TABLE WILL BE TYPED

MOV
MOV
MOV
o
BEQ
CONVRT

002 .MAP ,RO
RO, 07!91
(RO)., $THP2
0-1.‘"’2
14

1SET POINTER
1POINT 7O THE MAP LOCATION
1SET DATA
sEND OF LIST?
18R IF YES
tCALL THE OCTAL TO ASCII CONVERSION ROUTINE

B8R

S¢

1GO PRINT THE NEXT PARAMETER

3¢
#SUW06 , BSWR
3¢
MINEW
RO

s YES
1DESELECT SPECIFIC DEVICES??
18R IF NO.
1 TYPE THE MESSAGE.
1ZERO DATA DISPLAY
sWAIT FOR USER TO TELL WHAT DEVICES TO RUN
1IS THE NAUMBER VALID?
1BR IF NUMBER IS OX.
1 TELL USER OF INVALID NUMBER.
1STOP EVERY THING.
tRESTART THE PROGRAM AGAIN.
1GET NEW DEVICE PATTERN

1578

XSTATQ
TST

34:

94:

JRETURN TO CALLING BLOCK

:2:7.1"1‘1.5

HALT
BIT

001312

2084

1 .. OF BOTH PARAMETERS
I(HAVE THE TABLE BOUNDARIES BEEN EXCEEDED?
+IF NOT, GO LOAD SOME MORE PARAMETERS

24:

174454

010643
174416
001404

014 ,R3
RS, PARL7

BNE
817
8EQ
TYPE
CLR
HALT
cre
8LOS
TYPE
HALT
BR
MOV

010771

174436

ADD
ce
BNE

TYPE

001500
001220
001222

SEQ 43

PAGE 43

« XHEAD

9042

OSWR, $0EVH
rd)
.MERRS

MOV

9
SSWR ,DZACTV
OZACTV,RO

8eqQ

#SWO4 , BSWR
184

INSTR
75

1HAS THE TABLE BEEN TYPED YET?
1 TYPE MAP HEADER

;1CONVERT TME DATA AT THIS ADORESS
1 IS PROGRAM RUNNING UNCER MONITOR

1SHOM THE USER WHAT HE SELECTED.

tCONTINUE OYNAMIC SWITCHES.
1CHECK TO SEE IF DELAY COUNT CHANLES
1IF NOT, GO CLEAR VECTOR AREA
t

-0GETPAR.ssecsascsssnssaansasccansnsssnnss

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

Fa
CZOZA -0
CZ0ZAH .F11
1940
1941

004566
004570
004572
004574

004576
004577

004600
004604
004610
004612
004b14
004616
004622

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

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

PARAM

104405

001

012700
012701
010120
005021
022021
022700
001372

18¢:

000300

as:
001000

tCALL THE OCTAL TO ASCII CONVERT ROUTINE

1
17
OLYCNT
.BYTE
‘BYTE

O
1

MOV
MOV

#300,RO
#302,R1

1PREPARE TO CLEAR THE FLOATING
tVECTOR AREA. 300-776

(R1).
(RO)+,(R1).
#1000,RO
44

1IN VECTOR AREA.
1POP POINTERS
tALL DONE??
18R IF NO.

000001
1771777
007214
000
END

MACRQ

MOV

tLOWEST LEGITIMATE VALUE OF EXPECTED RESPONSE
¢MIGHEST LEGITIMATE VALUE OF EXPECTED RESPONSE
+POINTER TO MAP LOCATION TO BE FILLED
tMASK OF INVALID BITS FOR THIS PARAMETER
JNBER OF PARAMETERS TO STORE

e=sscsccescscsssssne

R1,(RO).

CLR
cP
(o) 4
BNE

SEQ 44

1START PUTTING “PCe2 - MALTTM

tTEST START AND RESTART
'

004630
004634

004650
004652
004656

1967
1969
1970
1971
1972

004674
004702
004706

012706
106427
005737
001015
032777
001406
104402
012737

001120
000340
000042

013737
012737

005372
011542
010560
174214

000177

000004

010667
000240

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

BEGIN: MOV

OSTACK, SP

1SET UP STACK

817
8EQ

08172,85WR
14

sCHECK FOR LOCX ON TEST
s8R IF NO LOCX DESIRED.

MTPS
TST
BNE.

174310

TYPE

005140
005140
001126

14:
2s:
i

oPR7
0042
et

,MLOCK

;LOCX OUT INTERRUPTS
1 IS PROGRAM UNDER MONITOR CONTROL
18R IF YES
s TYPE LOCK SELECTED.

MOV
BR
MOV
MOV

ONOP , TTST
24
BRW, TTST
OCYCLE,SLPADR

sADWUST SCOPE ROUTINE.
sCONTINUE ALONG.
tPREPARE NORMAL SCOPE ROUTINE
;START AT ~“CYCLE” FIND WHICH DEVICE TO TEST

JAP

8S$LPADR

1START TESTING

TYPE

END

MACR)

stTYPE "RUNNING*

ssecasesesssascssss

~-PRGEND -sosssssssscsasscssssasasansuss

G4
CZDZA -0
CZDZAN. P11
I

MACY1l 30A(1052)

19-JUN-84 15:45

1END OF PASS

1973
1974
1975
1976

1977

.SBTTL

1978

1979
1980
198i
1982
1983
1984
1985
1986
1987
1988
1989
1990
1991
1992

1993
1994

1995
1996
1997
1998
1999
2000
2001
2002
2003

SEQ 45

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

1TYPE NAME OF TEST
1UPDATE PASS COUNT
1CHECK FOR EXIT TO ACT-11
1RESTART TEST

END OF PASS ROUTINE

1100060000000000000000000000000000000000000000000000000004800008000

1o INCREMENT THE PASS NUMBER ($PASS)
1oIF TMERES A MONITOR GO TO IV
1oIF THERE ISN'T AP TO CYCLE
$EOP:

004712
004712
004714
004720
004724
004730
004734
004740
004 744
004750

004760
004764
004770
004774

SCoPe

CLR
CLR8

001136
001123
010535
010716
003072

TYPE
TYPE
CNVRT
TYPE
CNVRT

010724
005100
001242
010732
005106
001242
010743
005114
001411
001410
001226
001242
100000

INC
TYPE

CNVRT

001411

$EOPCT:

$ENDCT:

(PC).

.WORD

B8GT
MOV

WORD
$EOPCT

$ENDAD: JSR
NOP
NOP
NOP

XCSR:

XVEC:

002

,XPASS

O€EC

RESET

oce

sRAISE PASS COUNT
1 TYPE PASSES

SAVNUM
$D0AGN
OZNUM, SAVNUM
$ TIMES
$PASS

8EQ

$RTNAD:

$PASS
+MPASSX

MEPASS
+MCSRX
,XCSR
HMVECX
, XVEC

DECB
BNE
HOV8
CLR
INC

$GET42: MOV

$DOAGN:

1CLEAR LAST ERROR PC
1CLEAR ERROR FLAG

$PASS

8IC

001242

$ERRPC
$ERFLG

DEC

TYPE
CNVRT

.WORD

MERRX
,XERR

€100000, $PASS
1

1 TYPE END PASS
s TYPE CSR
1SHOM IT
1 TYPE VECTOR
1SHOW IT
tSHOM I7

tRESTORE PASS COUNT
1 TYPE ERRORS
+SHOM IT

(ARE ALL DEVICES TESTED?
tBR IF NO.
tRESTORE THE COUNT
1 1ZERO THE NUMBER OF ITERATIONS
1+ s INCREMENT THE PASS NUMBER
;sDON'T ALLOW A NEG. NUMBER

13L00P?

$DOAGN
(PC)e,.8(PC).

13 YES
1 sRESTORE COUNTER

8042 ,RO

13GET MONITOR ADORESS

$DOAGN

PC.(RO)

(PC).

CYCLE

.BYTE
OZCSR

6,2

.BYTE

3,2

-PASEND-ossesceconasssescscnssssonsssasssss

1 1BRANCH IF NO MONITOR
1 sCLEAR THE WORLD

1160 TO MONITOR
1 1SAVE HOOM
1 :FOR
11ACT11
1 1RETURN

H4
CZOZA -0
CZDZAM.P11)
2029
2030
2031
2032
2033
2034
2035

005104
005106
005110
005112
Q05114
005116
005120

MACY11 S0A(1052)

19-JUN-84 15:45
002072
000001

XPASS:

006

002

000001
006

002

001242

001132

SEQ 46

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

XERR :

DZRIV
1

.BYTE
$PASS

1
.BYTE
S$ERTTL

6,2

1SCOPE LOOP AND ITERATION HANDLER
'

.SBTTL

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

SCOPE HMANDLER ROUTINE

1100000000000080000008008000800000008000000000000480000000008080000

1oTHIS ROUTINE CONTROLS THE LOOPING OF SUBTESTS. IT WILL INCREMENT
1oAND LOAD THE TEST NUMBER($TSTNM) INTO THE OISPLAY REG.(DISPLAY<7:0>)
1oAND LOAD THE ERROR FLAG ($ERFLG) INTO DISPLAY<13:08>
1oTHE SWITCH OPTIONS PROVIDED BY THIS ROUTINE ARE:

LOOP ON TEST
INMIBIT ITERATIONS

1oSk14=1
1eSkllel
soCALL

1+ s SCOPE=I0T

SCOPE

$SCOPE :

005122

007652
001136
013050

.SCOPE: JSR
CLR
ov
8EQ

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

s"'m OUT IF <*G> WAS MIT
tCLEAR LAST ERROR PC.
IIS THIS THE SCOPE AT THE BEGINNING OF TST1?
1 IF SO, W' LOOP ON 1T

8PL
(o) o)
B8EQ
MOV

S$OVER
98 TKB, 04 XON
S$OVER
847xB, -2(SP)

18R IF N’J. (LOCX: HIT XEY TO GOTO NEXT TEST)
lIS M anom XON ?
1 sOSH
10R IF YE
31 10SH

BIT
BNE

eBIT14,@SWR
SOVER

TIST:

174016
174012

000021

174002

177776

173764

1¢:

BR
TST8

END

1¢
84 TKS

O MACR)

IGO 01
(IF LOCX SWO2=1; THIS LOC =240)
lxim OONE?

ssscessacsssssesass

15LOOP ON PRESENT TEST?
13 YES IF SWlde-}

1 0OS6OSTART OF CODE FOR THE XOR TESTER“O“

1IF RUNNING ON THE "XOR"” TESTER CHANGE
HTHIS INSTRUCTION TO A *"NOP~ (NOP=240)
S0ERRVEC, -(SP) ;1 SAVE THE CONTENTS OF THE ERROR VECTOR
MOV
MOV
054, 00CRRVE(
11SET FOR TIMEOQUT
TST
90177060
s s TIME OUT ON XOR?
(SP)+ , 00ERRVEC HRESTWE THE ERROR VECTOR
MOV
11GO TO THE NEXT TEST
$SVLAD
BR
11CLEAR THE STACK AFTER A TIME OUT
(SP)e,(SP)e
e
S5¢:
(SP)+ ,B0ERRVEC ;;RESTORE THE ERROR VECTOR
MOV
11LO0P ON THE PRESENT TEST
$OVER
B8R
64: ;00000END OF COOE FOR THE xon TESTERGGIIO
1 1HAS AN ERROR OCCURRED?
$ERFLG
1578
24:
8EQ
34
+sBR IF NO
$XTSTR: BR

005224

177060

2077
2078
2079

2081

2083

000004

001123
001123
001226

as:

173700

3%:

CLR8

CLR
8IT

BNE

$ERFLG

+ 1 ZERO THE ERROR FLAG

11BR IF YES

$TIMES
#8IT11,8SWR

1 1CLEAR THE NUMBER OF ITERATIONS TO MAKE
1 1 INHIBIT ITERATIONS?

14
CZOZA-HO
CZOZAM.P11

2085

2086
2087
2088
2089
2090
2091
2092

2093
2094
2095
2096

2097

2098
2099
2100
2101
2102
2103
2104
2105
2106
2107
2108
2109
2110
2111
2112
2113
2114
2115
2116
2117
2118

MACY11 30A(1052)
19-AN-84 15: 45

005262
005266
005270
005274
005302
005304
005312

095320
005324
003332
005336
005344

005737

001242

003237
023737
002015
012737
013737
105237
113737
011637
013777

001124
001226

105037

001417
001370

112737

000010

001406

013716

005737
001003
000002
000406

000001
005374
001122

001122

001126
001122
201126

SEQ 47

16:22 PAGE 47
19-JUN-84
SCOPE HMANDLER ROUTINE

TST

001124
001124
001226
001240
173616

001417

8EQ
INC
Ccp
8GE
1$:
MOV
MOV
$SVLAD: INCB
MOVe
MOV
¢OVER: MOV
MOV

14
$ICNT
$TIMES, $ICNT
$OVER
01, $ICNT
SMXCNT, $TIMES
STSTNM
S$TSTNM, STESTN
(SP), SLPADR
$TSTNM,BDISPLAY
S$LPADR, (SP)

$PASS

11
IF FIRST PASS OF PROGRAM

3¢:

MNTFLG
MODE

ICLENQ THE MAINTENANCE BIT SETTER AFTER EACH TEST
tHAS THE MODE BEEN CHANGCD?
1IF NOT INTERNAL , GO DO A TEST
IIF INTERNAL MODE NOW, SET THE MAINTENANCE BIT

CLRE
TST
BNE
MOV8

BRW :
1

RTI

END

406
O

44
GHAINT ,MNTFLG

MACRO

1GO DO THE TEST

seccccsassnsassenss

$MXCNT: S

000005

i
INMIBIT ITERATIONS
+ s INCREMENT ITERATION COUNT
1sCHECK THE NUMBER OF ITERATIONS MADE
118R IF MORE ITERATION REQUIRED
NfiMTIN.IZE THE ITERATION COUNTER
;;SET NUMBER OF ITERATIONS TO DO
lcm TEST NUMBERS
llSET TEST NUMBER IN APT MAILBOX
11SAVE SCOPE LOOP ADORESS
;;0ISPLAY TEST NUMBER
lflslcxli RETURN ADORESS

1 sMAX, NUMBER OF ITERATIONS

1CHECK FOR FREEZE ON CURRENT DATA
'

005376

005412
005414

005430
005436

032777
001405
005737
001402
013716
000002
032777
001403
062716
000002

001000

173554

.SCOP1: BIT
8eQ
TST

001362
001362
010000

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

14:

173530

.TYPE:

8EQ
MOV
RTI

BIT
8eQ
ADD
RTI

1¢:

L.SBTTL

#SHO9,@SWR
14

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

LOCK, (SP)

1 IF NO, RETURN
1IF YES, GOTO THE ADDRESS IN LOCK.

#SH12, BSWR
14
02,(SP)

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

LOCK

11IS THER A TIGHT LOOP SPECIFIED?

1G0 BACK,

tRETURN TO WHERE PROCEDURE WAS INVOKED

TYPE ROUTINE

1 1060608060006460600800080808800600080060008080000040080460680880¢

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 CHARACTER TO BE USED AS THE FILLER CHARACTER.
S$FILLS CONTAINS THE NUMBER OF FILLER CHARACTERS REQUIRED.

soNOTEL:
s SNOTE2:

SFILLC CONTAINS THE CHARACTER TO FILL AFTER.

1 oNOTES:
se

soCALL;
t1e1) USING A TRAP INSTRUCTION

l‘m
L

1 e

005440
005444

105737

100002

001177

TYPE

+MESADR

1 tMESADR IS FIRST ADDRESS OF AN ASCIZ STRING

$TPFLG
14

131S THERE A TERMINAL?
11BR IF YES

TYPE

MESADR

$TYPE:

TST8
8PL

J4
CZ0ZA-HO
CI0ZAM.P11
2141
2142
2143
2144
2145
2146
2147
2148
2149
2150
2151
2132
2153
2154
2135
2156
2157
2158
21359
2160

2161
2162
2163
2164
2165
2166
2167
2168
2169
2170
2171
2172
2173
2174
2175
2176
2177
2178
2179
2180
21681
2182
2183
2184
2185
2186

2187
2188
2189
2190
2191
2192
2193
2194
2195
2196

MACY11l 30A(1052)

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

122737

001011
132737
001405
010037
004737
000000

122716

001430
122716
001006
005726
104402
001231
105037

000755
004737
123726

001350
013746

105356
002770
004737
105337
Q00770

16:22

TYPE ROUTINE

1s:
000001

001254

000100

001255

005510
006012

001255

614:
624

24:
604:
3s:
000011

005652
001176

Ss:
64:

001174
78:

005652

SEQ 48

PAGE 48

HALT

132737
001003
112046
001005

005726
012600
062716
000002

19-UUN-84

B8R
MOV
MOV
crP8
BNE
BIT8
BEQ
MOV
JSR
. WORD
8178
BNE
MOV8
BNE
TST
MOV
ADO

34
RO, -(SP)

CP8
BEQ
crP8
BNE
TST
TYPE
$CRLF
CLR8

OMT,(SP)
84
OCRLF ,(SP)

RT1

B8R

JSR
crP8
BNE
MOV

DECB

BLY
JSR
DECB
BR

82(SP) ,RO

OAPTENV, $ENV
624
SAPTSPOOL
, $ENVM
624
RO,614
SC.OATYS
OAPTCSUP
, SENVM
604

(RO)+,-(SP)

(SP).
(SP)+,RO

#2,(SP)

St
(SP).

;EHARCNT

PC.$TYPEC
;leLC.(SP)O
$NULL, -(SP?

1(SP)

64
PC.$TYPEC
;SHflRCNT

s sHALT MERE IF NO TERMINAL

s tLEAVE
$ sSAVE RO

1 1GET ADODRESS OF ASCIZ STRING
1 tRUNNING IN APT MODE

1 1NO,GO CHECK FOR APT CONSOLE
s 1SPOOL MESSAGE TO APT
1 1NO,GO CHECK FOR CONSOLE
1 1SETUP MESSAGE ADODRESS FOR APT
1 1SPOOL MESSAGE TO APTY
1 sMESSAGE ADORESS
1 1APT CONSOLE SUPPRESSED
1 1 YES,SKIP TYPE OUT
1 1PUSH CHARACTER TO BE TYPED ONTO STACK
$13BR IF IT ISN'T THE TERMINATOR
1 1IF TERMINATOR POP IT OFF THE STACK
1 tRESTORE RO
$ tADJUST RETURN PC
s 1RETURN

1 1BRANCH IF <MHT>

; 1BRANCH IF NOT <CRLF>
<CR><LF>» EQUIV
1iPOP
11TYPE A CR AND LF

1 1CLEAR CHARACTER COUNT
1 1GET NEXT CHARACTER
131GO TYPE THIS CHARACTER
13IS IT TIME FOR FILLER CHARS.?
1sIF NO GO GET NEXT CHAR.
11GET @ OF FILLER CHARS, NEEDED
1 sAND THE NULL CHAR,
s sDOES A NULL NEED TO BE TYPED?
11BR IF NO--GO POP THE NWLL OFF OF STACK
11G0 TYPE A NAL
1 100 NOT COUNT AS A COUNT
1 1 LOOP

tHORIZONTAL TAB PROCESSOR
112716
004737

132737

001372
005726
000724

105777

100022
017746
042716

84:

000007

173306

$TYPEC:

173302
177500

000023

105777

173262

1014

,(SP)

MOVS
JSR
8178
BNE

PC,$TYPEC
07, $CHARCNT
94

B8R

rd)

TST8

84TKS
104

TST

122716

001012

9¢:

8PL
MOV
8IC
crP8
BNE
TST8

(SP).

1 sIREPLACE TAB WITH SPACE
11 TYPE A SPACE

$ tBRANCH IF NOT AT
13 TAB STOP
1 1POP SPACE OFF STACK
1 1GET NEXT CHARACTER

841KB, -(SP)

1 1CHAR IN KYBD BUFFER?
13BR IF NOT
1 sGET CHAR

84TKS

s tWAIT FOR CHAR

»177600,(SP)
#IXOFF ,(SP)
1024

1 1STRIP EXTRANEOUS BITS
1 1WAS CHAR XOFF
$11BR IF NOT

:MJD001
1MJ0001
;1MJD001
1 MJD00]
1MJDO01
1 MJD001
;1MJD001
1 MJO001

<4
CZDZA-+0
CZOZAH P11

2219
2220

005764
005766
005774
005776
006000
006002

042716

122716

001366

TYPE ROUTINE

ePL
MOVe

173256
177600

000021

102%:

005726

105777
100375
126627

173240

000021

001420

116677
122766
001003
105037
000406

122766
001402
105227

10s¢:

000015

173222
000002

000012

000002

1%:

.SBTTL

1014

8IC

84TKB,(SP)
#177600,(SP)

#4XON, (SP)
1014

1 1IGET CHAR
11STRIP IT
1 1WAS IT XON?
1sBR IF NOT

TSTY

(SP).

1 1FIX STACK

TS78

88 TPS

1 1WAIT UNTIL PRINTER IS READY

cMP8
BNE

8PL
o, o]
B8EQ
Move
CP8
BNE
CLRB
B8R
o, )
8EQ
INCB

$SCHARCNT: .WORD
$TYPEX: RTS

000000
000207

SEQ 49

PAGE 49

104
2(SP),
04 XON
sTYPEX
2(SP),84TP8
#CR,2(SP)
14
SCHARCNT
$TYPEX
OLF ,2(SP)
$TYPEX
(PC)e
O
PC

111S CHARACTER A RANDOM XON?
1 1BRANCH IF YES
1:LOAD CHAR TO BE TYPED INTO DATA REG.
111IS CHARACTER A CARRIAGE RETURN?
1 sBRANCH IF NO
HE’E‘?;-CLEAR CHARACTER COUNT
)

11IS CHARACTER A LINE FEED?
$ sBRANCH IF YES
1 sCOUNT THE CHARACTER
1 sCHARACTER COUNT STORAGE

APT COMMUNICATIONS ROUTINE

1 160060808888008808080840468888008008840084048800008888048088888248048

112737
112737

SATYL:
SATYS:

000001

SATY4:
SATYC:

112737
010046
010146

105737
001450
122737
001031

132737

001425
017600
062766
005737

006110
006116
006124

006132
006134
006142
006150
006154
006160

001375
010037
105720
001376
163700
010037
012737
000413
017637
062766
013746
004737

001254
000100
000002

14:

001234

001250

24:

001250
001252

000002

177776
005440

01, 4FFLG
01, FLG
SATYC
01, 0FFLG

MOV
MOV
TST8
BEQ

1 sPUSH RO ON STACK
11PUSH R1 ON STACK
SMFLG
1sSHOULD TYPE A MESSAGE?
BR
S¢
+3IF NOT:
SOAPTENV, $ENV
: sOPERATING UNDER APT?
34
11IF NOT: BR
SAPTSPOOL , $ENVM s sSHOULD SPOOL MESSAGES?
BR
3¢
13IF NOT:
O
84(SP),R
s sGET MESSAGE ADOR.
02.,4(SP)
1 18UMP RETURN ADOR.
:P:SGTYPE
1 1SEE IF DONE W/ LAST XMISSION?
WAIT
131F NOT:
IN MAILBOX
ADDR
RO, $MSGAD
11PUT
(RO).
1 sFIND END OF MESSAGE

8178
8€Q

001255

TST

7578

ASR

MOV

001234
006160

3s:

44:

1170 REPORT FATAL ERROR
1170 TYPE A MESSAGE

MOV8
MOVe
BR
MOV

2203

100375
11776

16:22

3 -} g8

2201
2202

005702
005704
005710
005714
005720
005722
005722
005724
005724
005730
005732
005740
005742
005750
005756
005760

19-JUN-84

g 3

2197
2198
2199
2200

MACY11 30A(1052)
19-JAN-84 15:45

MoV

MOV
JSR
.WORD

24
$MSGAD ,RO
RO
RO, $MSGLGTY
o4, $MSGTYPE
S¢
44
94(SP),
02,4(SP)

177776, -(SP)

PC.4TYPE
0

1170 ONLY REPORT FATAL ERROR

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

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

1 MJD001
s MJDO001
sMJDOO1L
sMJD001
sMJD001
sMJ0001
;1MJD001
1MJDOO01

1MJDOO01L

s RANOOL
s RANOO1

2253
2254
2255
2256
2257
2258
2239
2260
2261
2262
2263

006162
006162
006166
006170
006174
006176
006202
006204
006212
006220
006224
006230
006234
006240
006242
006244
006246
006247
006250

19-JUN-84 15:45
105737

006250

005737
001413
005737
001373
017637
062766
005237
105087
105037
105087
012601

001254

001416

19-JUN-84

16:22

SEQ 50

PAGE 30

APT COMMUNICATIONS ROUTINE
S4:
10¢:

11¢:

001234

MOV

001236
001234

1S18
8EQ
1ST
8eQ
1S7

12¢:

006247

012600
000207

RTS

.BYTE
.BYTE
.BYTE
.EVEN
APTSIZE =200
SMFLG:
SLFLG:
$FFLG:

$FFLG
124
SENV
>
124
$MSGTYPE
114

94(SP), SFATAL
2.4(SP)
$MSGTYPE
$FFLG
SLFLG
MFLG

(SP)e ,R1
(SP)+,RO

OOOR

CZDZA-HO
CZOZAN.P11

MACY1l 30A(1052)

1 sSHOULD REPORT FATAL ERROR?
13IF NOT:

13IF NOT:

11IF NOT:

WAIT

1 tRUNNING UNDER APT?

1 tFINISHED LAST MESSAGE?

1 1GET ERROR ¢
116U RETURN ADDR.
11 TELL APT TO TAKE ERROR

1 1CLEAR FATAL FLAG
1 sCLEAR LOG FLAG
t siCLEAR MESSAGE FLAG
s 1POP STACK INTO R1
1 sPOP STACK INTO RO
1 {RETURN

1 sMESSG. FLAG
11LOG FLAG
13FATAL FLAG

APTENV=001
APTSPOOL =100
APTCSUP=040

.INSTR:

010346

010446

017637
062766
104402

000004
000002

012704
012703
103777

011272
000007

100375
117714
142714
122714

001014

105777
100375
117714
142714
122714

001366

172652

006274
0CN004

84(SP), .MSG
.INSTL:

OINDBUF R4
#7,.R3

1¢:

172646

000200
000023
172626

101¢:

172622
000200
000021

105724

122714
001002

000021

83¢:

000015

:
1024

105724

000745
122724
V01417

02,4(SP)

98TKS
1
00TKB,(R4)
#200,(R4)
O4XOFF ,(R4)
834
94TKS
101¢
8T8, (R4)
€200, (R4 )
O4XON,(R4)
101¢
(R4).
1
O$XON,(R4)

1024
(R4).
14

INSTRZ

1SAVE R3 ON STACK
1SAVE R4 ON STACK

1GET THE ADDRESS OF THE MESSAGE TO BE PRINTED
tPOINT TO INSTRUCTION AFTER ADORESS POINTER
1PRINT THE MNESSAGE
{MESSAGE IS POINTED TO FROM ERE
tPOINT R4 TO THE INPUT BAFFER
1SET THE MAXIMUM NUMBER OF CHARACTERS ALLOMED
tHAS A CHARACYER BEEN RECEIVED?
1IF NO, KEEP WAITING FOR IV
1IF YES, SAVE IT IN THE INPUT BUFFER
IKEEP ONLY THE 7-BIT ASCII INFORMATION
3 :0SH-BHL
1IS IT A XOFF?
1 10SH
i8R IF NOT
3 1OSH-BML
1HWAIT FOR A CHARACTER
1 ;OSH-BML
10SH-BHL
1
1GET CHARACTER
s0SH-BML
1
CHARACTEP
DOMN
1STRIP
sWAIT FOR A XON?

3 10SH-BHL

$tGET NEXT CHAR IF NOT
1POP STACK
tWAIT FOR A CHAR

1 10SH-BHL
1 sOSH
1:105H

1GO0 GET NEXT CHAR

: 1DSH-BHL

1IS IT A RANDOM XON
tBR IF NO
tELSE, POP STACK

3 1DSH-BHL
: 10SH-BHL
1 :0SH-BHL

1IS IT «CR> ?
1IF SO, TERMINATE THE INPUT SEQUENCE

M4
CZDZA -HO
CZ0ZAM.P11

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

2309
2310

006402
006406

105777
100375

2313
2314
2315
2316
2317
2318
2319
2320
2321

006420
006422
006424
006426
006430
006432
006436
006440
006442

001332
012604
012603
010346
010446
104402
000715
012604
012603

2311 006410 017777
2312 006416 005303

2322

2323

006444

001230

006446
006450
006452

010546
010446
016605

006456
006462
006466
006472
006476
006502
006506
006310
006514
006520
006322
006326
006330

012537
012337
012337
112337
112337
010566
003005
012704
122714
001420
121427
002415
121427

2344

006336

2346
2347

2345
2348
2349
2350
2351
23352

2333

ggg;

000004
006636
006640
006642
006644
006645
000004

2359
2360
2361
2362
2363
2364

1ECHO THE CHARACTER BACK
1REDUCE THE NUMBER OF CHARACTERS RECEIVED

+IF WE DON'T MAVE 7, GO GET SOME MORE
1IF WE MAVE 7, RESTORE R4
IRESTORE R3
1SAVE R3 ON THE STACK
1SAVE R4 ON THE STACK
tPRINT A QUESTION MARK,.. WHAT S GOING ON?
1GO PRINT THE MESSAGE AGAIN
1RESTORE R4
1RESTORE R3
iRETURN TO THE MAIN PROCEDURE

PARAM: MOV
MOV
MOV

RS, -(SP)
R4, -(SP)
4(SP),RS

000067

142714

000060

8IC8

060,(R4)

1ISOLATE THE MUFMBER THE CHARACTER REPRESENTS

006544
006550

000015

0063352
006554
006556

122714
001406
006305
006305
006305

8EQ
ASL
ASL
ASL

213,(R4)
LIMITS
RS
RS
RS

1IS THME MEXT CHARACTER A CARRIAGE RETURNT
1IF SO, GO SEE IF NMUBER IS WITHIN LIMITS

006560

000760

1¢

PARAM]

006334

006342

006362
006564

003012

132405

011272
000015
000060

eGT

81s8

PARERR: INSTER

104404

000750

(RS)+,LOLIM
(RS)e MILIM
(RS)+ ,DEVADR
(R3).,LOBITS
{RS)+, ADRCNT
R3,4(SP)
R3
OINBUF R4
013.(R4)
Py
(R4, 060
PARERR
(R4), 067

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

MoV
MOV
MOV
MOVE
MOVE
MOV
PARAML: CLR
MOV
oPe
8EQ
18:
oPe
LY
CrPe

2356

2338

BNE
MOV
MOV
.INSTE: MOV
MOV
TYPE
BR
INSTR2: MOV
MOV

S$TKB, 80 TP8
R3
14
(SP)+ R4
(SP)+,R3
R3,-(SP)
R4, -(SP)
. SQUES
JINST)
(SP)+.R4
(SP)e N3

1 IF NOT, CHECK TO SEE IF THE CHARACTER CAN PRINT
+IF WE CAN'T, WAIT UNTIL WE CAN

po--cc-c----secccesooarocnaon-

2330
2331
2332
2333
2334
2335
2336
2337
2338
2339
2340
2341
2342
2343

MOV
DEC

88 TPS
24

1CONVERT ASCTI STRING TO OCTAL

2325

2327
2328
2329

172554

1578
BPL

RTI

000002

2324

2326

2s:

172562

172552

SEQ S1

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

(R4)¢,RS

1SET THE LOM LIMIT FOR THE INPUT
1SET THE HIGH LIMIT FOR THE INPUT
1SAVE THE ADORESS WHERE TME RESWLT WILL BE STORED
1GET THE MASX OF THE INCORRECT BITS
1GET THE COUNT OF ITEMS T0O BE STORED
tPOINT TO WMERE MAIN LINE PROGRAM WILL RESUME
s INITIALIZE THE ASCII TO OCTAL RESWLT WORD
tPOINT TO THE INPUT BUFFER
1IS THIS CHARACTER A CARRIAGE RETURN?
1IF SO, PRINT THE MESSAGE AGAIN
1IS THIS OHARACTER BELOW THE NUMERIC RANGE?
+IF SO, GO PRINT THE MESSAGE AGAIN
1IS THIS OMARACTER ABOVE THE MUMERIC RANGE?
1IF SO, GO PRINT THE MESSAGE AGAIN

1CONCATENATE THESE BITS TO THE ALREADY EXISTING STRING

1CLEAR BIT POSITION O, MOVE EXISTING STRING TO LEFT
1CLEAR POSITION 1, MOVE STRING TO LEFT AGAIN
tMOVE THE STRING ONE MORE TIME TO MAKE ROOM FOR
INEXT THREE BITS
1GO GET THE NEXT CHARACTER

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

1TEST TO SEE IF MUAMBER IS WITHIN LIMITS

006566
006572
006574
006600
006602
006606

020337
101373
020537
103770
133705
001365

006640
006636

006644

oe
1DOES RESULT EXCEED ITS MAXIMUM CORRECT VALUE?
RS ,HILIM

LIMITS: CHP
B8MI
cP
8LO
8IT8
BNE

PARERR
RS,LOLIN
PARERR
LOBITS,RS
PARERR

+IF YES., GO PRINT THE MESSAGE AGAIN
1IS THE RESULT LOWER THAN ALLOWED?
+IF YES, GO PRINT THE MESSAGE AGAIN
1ARE ANY INCORRECT BITS SET IN THE RESWLT?
1IF SO, GO PRINT THE MESSAGE AGAIN

N4
CZDZA-HO
CZDZAMH. P11

MACY11l 30A(1052)

19-JUN-84 15:45

19-JUN-84

16:22

APT COMMUNICATIONS ROUTINE

2365

1STORE NUMBER AT SPECIFIED ADORESS

2366

2367
2368
2%69
2370

2371
2372
2373
2374
2375
2376
2377
2378

SEQ 52

PAGE 52

006610
006614
006616
006630

006634
006636
006644
006645

013704
010524
062705
105337
001372
012604
012605
000002

1¢:

MoV
MOV
ADO

0ECe
BNE
MOV
MOV
RTI

DEVADR ,R4
RS,.(R4).
2,RS

ADRCNT
14
(SP).,R4
(SP)+.RS

0
0
DEVADR: 0

HILINM:

LOBITS:
ADRCNT :

.8YTE
.BYTE

{REDUCE COUNT OF STORED RESW.TS.

+IF NOT, GO STORE THE NEXT DATUM
sRESTORE R4
;RESTORE RS
;RETURN TO THE MAIN PROGRAM

IS IT EXCEEDED?

tLOWEST ACCEPTABLE VALUE

LOLINM:

000000
000000
000000
000
000

sPOINT TO THE LOCATION WHERE THE RESWULT WILL BE STORED
1STORE THE RESWLT
;CALCULATE THE NEXT DATUM

O
O

+HIGHEST ACCEPTABLE
LOCATION WHERE RESWLT WILL BE STORED

+INCORRECT BITS MASK
1COUNT OF ITEMS TO BE STORED

1SAVE PC OF TEST THAT FAILED AND RO-RS
016637

000004

001402

.SAVOS: MOV

4(SP),SAVPC

1 SAVE R? (PC)

;SAVE RO-RS
006654

006670
006674
006700
006704

010537
010437
010337
010237
010137
010037

001210
001206

MOV
MOV
MOV
MOV

RS, $REGS
R4, $REGA
R3, $REGS
R2, $REG2

001202

MOV

RO, $REGO

SVO0S:

001214
001212

rov
RTI

R1,SREG]

;1SAVE RS
;sSAVE R4
$SAVE RS

s SAVE R2
1SAVE R1
1 SAVE RO
;LEAVE.

t{RESTORE RO-RS
006706
006712
006716
006722
006726
006732
006736

013700
013701
013702
013703
013704
013705

MOV

RO
$REGO,

MOV
MOV
MOV
MOV

$REG2,R2
SREG3 R3S
S$REGA R4
$REGS RS

MOV

RTI

$REGL1,R1

1RESTORE RO
tRESTORE R1
sRESTORE R2
sRESTORE R3
1RESTORE R4
1RESTORE RS
;LEAVE

;CONVERT OCTAL NMUMBER TO ASCII AND OUTPUT TO TELEPRINTER
2410
2411
2412
2413
2414
2415
2416
2417
2418
2419
2420

006740
006744
006746

006752
006754
006756
006762
006770
006774

104402

010046
010146
010346
010446
010546
017601
062766
012137

112105

.CONVR: TYPE
.CNVRT: MOV

001231

MOV

MOV
MOV
000012
000002
007114

000012

1$:

MOV
ADOD
MOV
MOV

. SCRLF

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

R3,-(SP)
R4, -(SP)
812(SP),R1
02,12(SP)
(R1)+ ,WROCNT
(R1)+,RS

1PRINT A CARRIAGE RETURN

1SAVE
;sSAVE
1SAVE
1SAVE
1SAVE

RO
R1
R3
R4
RS

1PLACE THE ADDRESS OF THE ARGUMENTS IN Rl
POINT TO WHERE MAIN PROGRAM WILL RESUME
1GET NUMBER OF WOROS TC BE PRINTED
1GET THE NUMBER OF CHARACTERS TO BE PRINTED

006776
007000
007002
00700%
007010
007014
007020
007022
007024
007026
007030

112100
013104
110387
010403
042703
062703
110346
006004

007032
007034
007040
007042
007046
007030
007052
007054
0oL 7060
00262
007064
007066
007072
007076
007100
007102
007104
007106

001365
012703

007120

2459

2467
2469
2470
2471
2472
2473
2474
2475

2476

SEC 33

PAGE 33

APT COMMUNICATIONS ROUTINE

RS.C!.CNT

3s:

000060

006204
006204
005305

007116

011376
007114

3¢
(RS)
JHDATA

64:

WROCNT

32223

105013

001374

THE NEXT OME.
+IF NO, GO GUILD
sNOW POINT TO WHERE NMUMBER WILL BE PRINTED FROM
tSTORE THE COHARACTER, STARTING WITH THE MOST
REDUCE
ARE ALL CHARACTERS TRANSFERRED?

Ss:

000040

112723
105300

(SP)+,(RS).
CHRONT

001404

011376

112623
105337
001374
103700

34
®DATA,RS

1GET THE NUMBER OF SPACES TO PRINT
1COPY THME WORD T0 BE CONVERTED
1COPY THE CHARACTER COUNT
1COPY THE ARGUMENT WORD AGAIN
lISG.ATE THREE BI7S TO BE TREATED AS A CHARACTER
(MAKE AN ASCII CHARACTER OUT OF THEM
1SAVE THAT CHARACTER
(MOVE THE NEXT THREE BITS INTQ PLACE
tMOVE THEM AGAIN
sAND FINALLY A THIRD TIME
.ltnut':‘t’ CHARACTER COUNT .ARE ALL CHARACTERS

WROONT:

REDUCE T E

WE JUST BUILTY

COUNT. ARE ANY MORE WORDS LEFT?

T
THEM
1 JF YES, GO CONVER

tRETURN TO THE MAIN PROGRAM
iNMAMBER OF CHARACTERS TO PRINT
tNUPBER OF SPACES TO PRINT

CHRONT

B8INMRD:
s TRAP DISPATCH SERVICE
1ARGUMENT OF TRAP IS EXTRACTED
+AND USED AS OFFSET TO OBTAIN POINTER

ITO SELECTED SUBROUTINE

2463
2465

177770

16:22

®*

007110
007112
007_:4
0071:6
007117

007116

2421
2422
2423

19-JUN-84 15:45

19-JUN-84

CZDZA-HO
CZ0ZAM.P11

MACY11 S0A(1032)

007122
007124
007130
0071382
007134
007136
007142

.TRPSR: MoV
MOV
TST

MOVe

2(SP) RO
-(RO)
(RO),RO

ASL

RTS

MOV

)
RO
. TRPTAB(RO

10EVICE CLEAR ROUTINE
lISSlI A DEVICE CLEAR
007144

.DEVICE. CLR

1SAVE RO, USE RO TO FIND TRAP ROUTINE
1GET TRAP ADORESS
1GET TRAP

1GET RIGHY BYTE OF TRAP(TRAP OFFSET)
tPOSITION OFFSET FOR TABLE INDEXING
1PLACE INDEXED ADDRESS OF TABLE IN RO

1TRANSFER TO THAT ADDORESS AND RESTORE OLD RO

C5
MACY11 SOA(1052)
19-AN-84 15:45
007144 0352777 000020 172670

CZDZA-~0
C20ZMmn . P11

2478 007152 032777 000020

2479 007160 001374
2480 007162 000002

172662

14:

2481

2482
0

2488

007176

2489 007176

2490

007200

2492

007206

2494
2495

007212
007214

2491

007204

104413
153777 001417
000002

010046

013700

005300

172646

007214

1¢:

001376

2516
2517
2518
2519

2520
2321
2522

2523
2524
2525

2526
2527

2528

2529
253C
2531
2532

18R IF NO
1EXIT ROUTINE

10ID IT CLEAR?

1ISSUE A DEVICE CLEAR
le THE MAINTENANCE 81T IF IT IS I MODE
IRETURN TO CALLING ROUTINE
1SAVE RO

MoV

RO, -(SP)

DEC

sDELAY

MoV

(SP).,RO

1RESTORE RO

MoV

BNE

OLYONT RO

i¢

1SET COUNT

1LEAVE ROUTINE
1PATOMABLE LOC FOR MORE TIME

sADVANCE TO tEXT TEST MANDLER
R L

007216
007222
007226

013716
005037
000002

. ADVANCE ; MOV
CLR
RTI

001360
001362

NEXT,(SP)
LOCX

R R R

sCRUNCH STACK WITHM ADDRESS OF SCOPE CALL
tRESET TIGHT LOOP ADORESS
1CHECK TO SEE IF OLD TEST GETS REPEATED

;ERRCR MANCLER
focceemmecoenn

2504
2505

2507
2508
2509
2510
2511
2512
2513
2514
2515

1¢

RTI
DLYCNT: .WORD

000002
000001

g::

2506

ONE
RT1

T
R
Fe
R,

2497

2500
2501
25025023

1SET DCLR

60OCLR,B80ZCSR

OCLRSH:MVICE CLR
MNTFLG,.8DZCSR
8IS
RTI
.DELAY:

2493 007210 012600
2496

¢DCLR, 8DZCSR

IWTM TO HANDLE MAINTENANCE BIT SETTING WITH DEVICE CLEM

2484 007164
2485 007166
2486 007174
2487

8IS

007230
007234
007242
007244
007250
0072%2
007260
007266
007270
007274
007276
007302
007306

007310
007312
007316

007320
007324
007326

007330
007332

007336

007342
007346
007352
007356

004737
032777
001406
105777
100003
112777
032777
001113
021637

001404
011637
105037
104407

011605
1627035
011504

110437
006304
061304

006304
042704
062704

012437
012437
011437
105737

007652
010000

171716

171720

000207
020000

001136
001136
001123
000002

001134

177001
030312

007466
007300
007312
001123

171712
171672

SERROR: JSR
8I7
8EQ
1ST8
oPL
(0 ]
XBX:
e1rv
BNE
ow
1¢:

0EQ
[, ]
CLRB
SAVOS

3333557573353

2477

SEQ S4

19-UUN-84 16:22 ©OAGE 5S4
APT COMMUNICATIONS ROUTINE

PC.SERY.G
SM12, BSUR
xBXx
8t TPS
XBX
9207,007P8
oSu1S, BSWR
MALTS
(SP), $ERRPC

FIND WT IF <G> WAS MIT
1BELL ON ERROR?
;OR IF NO BELL
1 TTY READY,
1OON'T WAIT IF TTY NOT READY.
1PUSH A DELL AT THE TTY,
;10ELETE EMROR PRINT OUT?
tBR IF ND PRINT OUT WANTED.
1WAS THIS ERROR FOUND LAST TIME?

(SP),RS

1GET THE PC OF ERROR

14
(SP). ERRPC
SERFLG
#2,R3

1OR IF YES
tARECORD BEING MERE
1PREPARE MEADER
1SAVE ALL PROC REGISTERS

(R3), R4
R4, 0ITEIS

1GET ADORESS OF TRAP CALL
1GEY ERROR INSTRUCTION
sCOPY TEST NUMBER FOR APT MANDL ING

(R3),R4

tO0UBLE I7

0177001 ,R4
¢ .ERRTAS R4

(R4 )+ ,ERRMSG
(R4)+,0ATAHD
(R4) ,DATABP
$ERFLG

MAT BY TWO

MAT AGAIN
1CLEAR JUNK
1GET POINTER

1GET ERROR MESSAGE
1GET DATA HEADRER
1GET DATA TABLE
1 TYPE HEADER

007370
007372
007376
007402

007406
007410
007414
007420
007424
007430
007434
007440
007444
007450
007456
007462
007464
007466
007470
007470
007474
007476
007300

001403
005737
001044

19-AN-84

16:22

0EQ
187

007312

007466

TYPMSG

DATABP

TYPMSG:

001231
001231
001362
010766
010754
007644
011043
007636
010716
003072
001231
177777

18:

MISTN
+XTSTN
+MERRPC

JERTABO

.MCSRX

+XCSR
001123

MTBS.FM:

007500

DATAD:
TYPDAT:

RESREG:

HALTS:

007540
Ts:

8s:
26:

171372

ERRMSG
WTBS.FH

11IS THERE AN ERROR MESSAGE?
18R IF NO.

171354

DATAD

DATABP

RESREG

002

001126

24
$ITEMS, 74

PC.SATYAS
0
8¢

::evmo.ma

2(SP),SDISPLAY
S$ERTTL

BSWR
, 08
#5U
14

NEXT, SLPADR
1¢:
24:

ERTABO:
XTSTN:

002

GAPTENV, $ENV

SUIO.ISUR

171344

IND MORE HEADER UNLESS NO DATA TABLE.
1 TYPE

SSHR
EXITER
EXITER:

1SHMOM IT
1 TYPE PC.
1SHOM IV

1GIVE A CR/LF

DATABP:
001254

1OR IF YES
1D0ES DATA TABLE EXIST?
1OR IF YES.
1 TYPE A CARRIAGE RETURN
1AND TYPE ANOTHER

. $CRLF

TYPOAT

007512

001360
001120
171272

SEQ SS

PAGE S35

APT COMMUNICATIONS ROUTINE

a»

007362
007364

MACY11 30A(1052)
19-AN-84 15:45%

[ X

CZ02A -0
CZ0Zm¢.PL)

SP
#STACK,

S$LPADR
6,2

2,2

ERROR MESSAGE

1DATA HMEADER?
18R IF NO
1 TYPE

DATA HEADER
H
1DATA TABLE?
18R IF NO.
3§SHOM
OATA TABLE
3
sRESTORE PROC REGISTERS
1IS APT RUNNING?
1SXIP APT CALL IF WNOT
;1COPY ERNOR NUMBER
sCALL APT SERVICE
;ERROR NUMBER STUCK HERE
;LOCK UP HERE

1CHECK YO SEE IF IN ACT-11 MODE
1IF SO, MANDLE ACCORDINGLY
(HALT ON ERROR?
s8R IF NO MALT ON ERROR
aw ERROR PC IN DATA DISPLAY
'

1UPDATE ERROR COUNT
;1GOTO TOP OF TEST?
1BR IF YES
1GOTO NEXT TEST?
1BR IF NO
1SET FOR NEXT TESY
tRESET SP
1GOTO SPECIFIED TEST
1RETURN

ES
CZOZA-H0
CZ0ZAM P11
007650

007652
007660
007662
007666
007672
007676
007702

007704
007710
007712
007716
007722
007726
007730
007734
007736
007740

2616

2617

2619

2633

2635
2636
2637
2638
2639

2641
2642
2643

MACY11 30A(1052)
19-JUN-84 15:435
001122
022737
001002
000137
017746
042716
122716
001012

105777
100375
117716

177570

122716

000021

001002
005726
000553

122726
001150
032777
001335
017737
013777
104402
104412
104402
105777

000007

017746
042716
122716

171144
177600
000023

010034
010040
010042
010046
010052
010056

105777
100375
117716

171124

122716
001366

010060
010064
010066
010070

001002
005726
000747

010072
010076
010100
010104
010110
010112
010120

001012

101¢:

TST®
B8PL

MOVe
8IC
(=)
ONE
102¢:

7¢:

171174
010312
010272
010304
010314
171150

010312
171164

122716

000021

9¢:

111¢:

112¢:

000015

105777
100375
016677

171060

8¢:

171054
177776

24:
171052

@IXOFF ,(SP)
102¢

88 TKS
1014

847Tx8,(SP)
0177600, (SP)
O4XON, (SP)
101¢

1IS THE SWITCH REGISTER HAROWIRED?
1IF SO, IGNORE *G
3 10SH-BHL
1OTHERWISE, GET THE LAST CHARACTER TYPED
1STRI® CHAR
1 sDSH-BHL
1IS IT A XOFF
L
3 sOSH-Br
BL
1R IF NO
3 10SH-

I1WAIT FOR A CHAR
1GET THE CHAR
1STRIP CHAR

+IS IT RAMDOM XON ?
18R IF NOT
1POP STACK
1 IGNORE XON CHAR

O
BNE

07,(SP).
64

1IS IT vG?
1 IF NOT, IGMORE INPUT

BNE
MOV
MOV
TYPE
CNVRT
TYPE

SERV.G
85WR, 904
904, BSWR
.89¢
884
914

1ST8
oPL
MOV
81C
(0 o)
BNE
TST8

8PL
MO8
8IC
ces
BNE
CrvPB

(SP).

04000,
88 TXS

tRX BUSY?

1BR IF YES
1SAVE (SWR).
§
1§
3

88 TKS
.-4
947x8B, -(SP)
0177600,(SP)
O$XOFF ,(SP)
112¢

1MAIT FOR DONE.

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

1 10SH-BL
s 10SH-8L
1 s0SH-BHL

84 TKS

sWALIT FOR A CHAR

s s0SH-BHL
1 10SH-BML
1 10SH-BHL
;1 1OSH-BHL
s 10SH-BHL
s 1DSH-BHL

1114
847K8,(SP)
#177600,(SP)
@$XON,(SP)
111¢

1IS IT A XON
18R IF NO

O$XON, (SP)

+IS IT RANDOM XON ?

BNE

8¢

(o) )
8EQ
CLR
7578
8PL
Eflg

015,(SP).
-1
8SWR
84TPS
.-4

L
1 s0SH-Br
HL
1 s0SH-B
110SH -8B

1IS IT A XON
1BR IF NO

QIXON, (SP)
74

8IT

1%:

SWR
0177370,
994
64
847x8, -(SP)
#177600,(SP)

O
BNE

1S7

122726

000241

SERV.G: O
BNE
JP
994 :
MOV
81C

CrPe

171206

042716

001472
003077

$TSTNM

ONE

004000

171120
177600
000021

SEQ 56

PAGE 56

1S7

007742
oL7746
0077350
007756
007760
007766
007774
010000
010004
010010
010014
010016
010022
010026
010032

100375

001160

171254

171250
177600
000021

16:22

APT COMMUNICATIONS ROUTINE

010270
171274
177600
000023

042716

122716
001366

19-JUN-84

(SP).

-2(SP),847TP8

1GET THE CHAR

1STRIP CHAR

tBR IF NOT
1POP STACK

1 IGNORE XON CHAR

11054
31 sOSH
1 s0OSH
1 10SH

010174

010200
010202
010206
010212

042766
056677

103777
100375

177776

000060

177776

000067

177770
177776
170764

177776
170764

010216

017746
042716
122716
001012

170760
177600
000023

010220
010224
010226
010232
013236
010242

105777
100375
117716
042716
122716
001366

170740

010244
010250
010252
010254

001002
005726
000747

1
0tCcT>,-2(SP)

-2(SP), BSWR
“IKS

12¢:

ST, -(SP)

89¢:

.EVEN
88¢:

121%:

170734
177600

000021

122716

000021

1224%:

010256
010262
010264
010270

122726
001310
104402

000015

10¢:

001231

Ss:

010272
010300

020200
03645

051450
000057

010304
010306
010310
010312
010314

000001
006
010312
000000
036437

000207

64:

051127

s
3

1ERROR
3
s
'

g 3 % 323 %3 3% A3

010146
010130
010136
010160
010166

8SWR
OSWR
ASWR
14

1710%2
171026
171022

-4

010132
010136
010140

006177
006177
006177
103713
026627
002707
026627
003303

APT COMMUNICATIONS ROUTINE

2646
2647

010122
010126

SEQ 57

PAGE 57

16:22

904:
91¢;
EVEN

.SBTTL

'
:
3
3
:

0177600, (SP)
O$XOFF ,(SP)

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

84TKS
1214
84TKB, (SP)
#177600,(SP)
O4XON, (SP)
1214

sWAIT FOR A CHAR

O$XON,(SP)

1IS IT RANDOM XON ?
1BR IF NOT
1POP STACK
s IGNORE XON CHAR

1224

104
(SP).
124

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

1 s0SH-B8HL
1 10SH-8HL
$10SH-BML
1 10SH-BML

3 10SH-31L

s s0SH-BHL
1 :0SH-BHL
1 10SH-BHL
1 :0SH-BHL
3 sDSH
1 10SH
s 10SH
3 10SH

015,(SP).

» SCRLF

<«200>? (SWR)=/?

.BYTE

6,0

. WORO
.ASCIZ

0
//?

904

POMER DOWN AND UP ROUTINES

§ 1000060006000 000006000000000600000000000000000008000680000000000

010320
010326
010334
010336
01340
010342
010344
010346
010350

012737
012737
010046
010146
010246
010346
010446
010546

017746

010464
000340

170604

000024
000026

1POMER DOWN ROUTINE

$PURON

333333338

2585

19-JUN-84

@»

C2NZA-HO
CZDZAN. P11

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

GILLUP ,O0PURVEC ;;SET FOR FAST P
0340, 00PWRVEC 2 ; PRIO:?7

R1,-(SP)

RS, -(SP)
8SWR, -(SP)

ON STACK
ON STACK
ON STACK
ON STACK
11PUSH R4 ON STACK
1 1PUSH RS ON STACK
11PUSH 8SWR ON STACK

11PUSH RO
11PUSH R1
11PUSH R2
11PUSH R3

G5
CZOZA-HO
CZOZAM. P11

2713

2714
27115
2716
2717
2718
2719
2720
2721
2722

2723
2724
27125
2726
27127

2728
2129
2730
(2)
(2)
(2)
(2)
(2)
(2)

(2)
(2)
(2)
(2)
(2)
(2)
(2)
(2)
(2)
(2)
(2)
2731

2732
2733
2734

2735
2736
2737
2738
2739

010354
010360
010366
010370

010637
012737
000000
000776

010470
010372

16:22

SEQ S8

PAGE 78

POMWER DOMN AND UP ROUTINES
MOV
MOV
MALT

000024

SP, $SAVR6

1SAVE SP

SIPWRUP, OOPHRVEC llSEY UP VECTOR
. -2

1 1HANG UP

110000006000000080400000000000002004800008000400000040800280000080040¢

010372
010400

010404
010410
010414
010416
010422
010424
010426
010430
010432
010434
010436
010444
0104352
010454
010436
010460
010462
010464
010466

010470
010472
010535
010560
010574
010643
010667
010716
010724
010732
010743
010734
010766

010771
011043

011050
011075

011140

011142
011144
011146

011150

012737
013706
005037
003237
001375
012677
012605
012604
012603

010464
010470
010470
010470

012737
012737
104402
010472
012716
012106

010320
000340

012602
012601
012600

1POMER UP ROUTINE

SPWRUP: MOV
MOV
CLR

14:

170536

051303
042326
040320
103
042324
020032
200
120
046600
200
011140
000002
006
001220
006
001222

047111
047514
033122
035103
031323
031122
032123

033103
050101
046111
003

043040
020104
044316

031107

0453503
031303
0351117
047040

020124
047440
042514

RTI

WALT
B8R
$SAVRG: O
MPFAIL: .ASCIZ
MEPASS: .ASCIZ2
MR;
.ASCIZ
MERR2:
.ASCIZ
MERR3:
.ASCI1Z
Mocx:
.ASCIZ
SILLUP:

051127
047105
047125

INC
BNE
MOV
MOV

MoV
MOV
MOV
MOV
MoV
MOV
MOV
TYPE
SPWRMG: . HORD
MOV
$PWRAD: .WORD

000002
000000
000776

sadial

2701
2702
2703
2704
2705
2706
2707
2708
2709
2710
27111
2712

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

19-JUN-84

MCSRX:

MVECX:
MPASSX:
MERRX:
MISTN:
MASTEX:
MNEW;
MERRPC:
XHEAD:
:
VEN
XSTATQ:

.ASCIZ

.ASCIZ2
.ASCIZ2
.ASCI2
.ASCIZ
.ASCIZ
.ASCI2
.ASCI2
.ASCIZ
.ASCI2
2

.BYTE

sTHP)

002

.EVEN

$THP2

OSILLUP,QOPURVEC ;SET FOR FAST DOWN
$SAVRS , SP
1sGEY SP
$SAVRS
13WAIT LOOP FOR THE TTY
$SAVRS
1 IWAIT FOR THE INC

14
(SP).,85WR
(SP)+ RS
(SP)+ R4
(SP)+,R3
(SP).,R2
(SP)+,R1
(SP)+,RO

$3OF WORD
1sPOP STACK
13POP STACK
1 1POP STACK
31POP STACK
1:POP STACK
$)POP STACK
1 3POP STACK

INTO 8SWR
INTO RS
INTO R4
INTO R3
INTO R2
INTO R1
INTO RO

SIPURON, mc $3SET UP THE POWER DOWN VECTOR
0340, 0PWRVEC+2 ; 1PRIO:
7

MPFAIL
(PC)+.(SP)
RESTART

3 sREPORT THE POMER FAILURE

s sPOMER FAIL MESSAGE POINTER
1 sRISTART AT RESTART
s s<ESTART ADORESS

s sTHE POMER UP SEQUENCE WAS STARTED
ts BEFORE THE POMER DOWN WAS COMPLETE
1sPUT THE SP MERE
<200>/PWR FAILED. RESTART AT LAST TEST /
.-2

<200>/7END PASS CZDZA-H
/
<200>/RUNNING

<200> /PROGRAM INDICATES NO DEVICES PRESENT./
<200>/INSUFFICIENT DATA!/

<200>/7L0CK ON SELECTED TEST/

/CSR: /7
/VEC: /
/PASSES: /

/ERRORS: /
/TEST NO: /
/¢

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

<200>/HAP OF D211 STATUS/<200>

<200>/ILLEGAL ENTRY IN STAGGERED MOOE/ <200>
6,3

6.2
-$SETFLG-o9sesanssnanssnsnssssssnsasssas

.THIS ROUTINE ESTABLISHES WHICH MAINTENANCE MOOE THE DEVICE IS IN
;E-EXTERNAL LOOP BACK

HS
MACY11 S0A(1052)

CZOZA-HO

CZ0ZAr. P11
2740
2741
2742

2743
2744

2745

2746

2747

2748

2749

2750
2751
273

2753

19-JUN-84 15:45

SEQ 59

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

1 I=INTERNAL LOOP BACK
0111352
01223¢
011164
011172
011174
011200
011204
011206
011214
011216
011222
011230
011232
011240
011242
011246

0112352
011236
011260
011262
011264
011266
011270

122737

000000
000040
000105

105087

011264
001417

122737

000111

112737

011266
000010

001417

000123

011272

017605
042737

0010035
013713
000422

001006
013715

000410

122737
001007
013715
105037
062716
000002
104404
000733

011272
011272

011272

1PICK UP ADDRESS OF TAG
tSTRIP LOWER CASE
1IS IT EXTERNAL LOOP BACK ?
1 NO
s YES STORE INFO
1SET MAINT 8IT <0

SETFLG: MOV
IC
a, L]
BNE
MOV
CLR8
B8R

S¢:

1GET OUT

lzg IT INTERNAL LOOP BACK ?

()
]

BNE
mov
MOVve

1 YES STORE INFO
1SET UP THE MAINTENANCE FLAG LOADER
1GET OUT
1IS IV STAGGERED LOOP BACK ?

24,(R3)

B8R

o,
]

1WHAT 2

BNE

1 YES STORE INFO
1 ZERO 8ITS
1POP AROUND

MOV

011270
001417

7s:

000002

64:
1¢:
28:
3s:

000200
000000

CLR8

ADD
RTI

;RETRY

INSTER
BR
. WORD
. WORD
WORD

1DITTO

1EXTERNAL =

;INTERNAL = I
100000
sSTAGGERED = S
] - m.o MACRQ =ssssscccssssessssse

100000

{

-$OUFFER-sccnnsscncscnsnnscansansssssssssss

1BUFFERS FOR INPUT-OUTPUT
011272

011334
011376

011440
011444
011452
011460
011466
011470
011474

2787
2789

2791
2792
2793

011476
011504
011506
011510
011314
011522
011326
011534
011536
011540

INBF:
.*.+40

000000
011334
000000
011376
000000
011440

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

011336
106427

011536
011540

TEMP:
.".+80
MDATA:
.o, +40

SET.PS:

MOV
SUB
MOV
cP
BNE
MOV
8R
cw
BEQ

011540

011336
106437

011336

000016
000002

011540

011536

14:

24:
3s:

44:

HALT
MOV
MOV

ADD
MOV

RTI

(SP),3¢

02,34

834,44

.44
0106427

14
(SP),3¢

9106437,
44
Y|

(SP),3¢
834,34

#2,(SP)

sRESERVED INSTRUCTION NOT “MTPS*

934 ,2(SP)

I5
CZDZA-HO
CZ0ZAn.P11

MACY11l 30A(1052)

19-JUN-84 15:45

19-JUN-84

SEQ 60

PAGE 60

16:22

POMER OOWN AND UP ROUTINES
t

END

MACRQ

esescssassassrsssses
t

-0CYCLE-ovccncsnsasncsansnnnssonasnses

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

18E RUN FIRST BEFORE ENTERING THE DIAGNOSTIC FOR THE
1SETUP NECESSARY.
'

001404

011600
011604
011610
011616
011624
011626
011634

001406
001406
000014

011576

2819

011636
011640
011644
011630

011654

011662

011670
011672
011700
011704
011710
011714
011722
011730
011734
011740
011744

011730
011754
011736
011764
011766
011772
011774
011776
012000
012002

CYCLE:

010574
005374
001406

001500
001406
001406
001412
000014

001500
001310
002072
030306
030307
100000
001364
001366
001370
030100

001226
001404

1s:

001412
001412
001412

24:

001412
001412
001412

3s:

001414
030306

DZACTVY

TYPE
HALT

MERR2

8IT

* -2
SMXCNT, $ TIMES

g\‘N.DZACTv

RUN
RUN
014 ACTIVE

€0Z .END,ACTIVE
14

:(‘)Z.W.ACTIVE
RUN
RUN
ACTIVE,RO

014 ACTIVE

#0Z.END ,ACTIVE
3

002 .MAP ACTIVE
(RO)+, $BASE
(RO)+ ,0ZRIV
ODZPRT«1 ,EIAFLG
08IT71S,0ZPRT
(RO)+ ,LINE
(RO)+ ,PAR

(RO)-+ ,MODE
PC.OZLEY
8042

000042

BSWR
, 01
#SW

167174

001231

TST

$3235 833333 IE3RATTARILRANR 33

2810

011542
011546
0113530
011554
011556
0113560
011566
011374

4
74:

. SCRLF

1ARE ANY DZ11'S TG BE TESTED?

18R IF OX,
sNO DZ11'S SELECTED!!
1STOP THE SHOM.
;1DISQUALIFY CONT. SW.

tRESTORE THE NMUMBER OF ITERATIONS TO MAXE
1 IS THIS ONE “ACTIVE”
18R IF GOOD ONE FOUND.

sUPDATE POINTER
1CATCH CARRY FROM RUN

tUPDATE ADDRESS POINTER.
tHAVE WE PASSED THE END OF THE MAP?
+IF NO, XKEEP GOING; NOT ALL TESTED FOR.
tRESET ADDRESS POINTER.
{KEEP LOOKING FOR ACTIVE D211
tUPDATE POINTER.
;CATCH CARRY,
1GET ADDRESS POINTER.
1UPDATE.,
sALL DONE?
18R IF NO.
tRESTORE POINTER.
1LOAD SYSTEM CTRL. REG
sLOAD VECTOR
1LOAD PRIORITY
1515 G ‘al“

tCLEAR FLAG

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

1ARE WE UNDER MONITOR CONTROL?
1IF YES, SKXIP THIS SETWP
1IF SWO1+1, GET STARTING TEST ¢
tBR IF NO TEST IS TO BE INPUTTED
i

-0GETPAR-scscscesacsccnussscccsssscnnsanss

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

{HIGEST LEGITIMATE VALUE OF EXPECTED RESPONSE

CZDZA-HOL1

CZDZAM.P
2850
2851
2852
2853

2854
2855
2856
2857
2858
2859
2660
2061
2062

2063
26064
2065
2066
2867
2868
20669
g:;g
2872
2673

012004
012006
012007

012010
012014
012020
012022
012030
012032
012040
012042
012046
012054
012060

012062

PAGEUP 61ROUTINES
MACY1l 30A(1052) 19-JUN-84 16:22 AND
001122
000
001

104402
000412

005720

013046
000004
000002

001122

000004

001126
000002
001231

001126

020027
001351
104402
000733
012737

023740

012106

000177

167014

S¢:

012737

012064
012070
012072
012076
8{3{&

64:

001230
013046

SEQ 6

POMER DOWN

19-JUN-84 15:45

012700
022710
001020
022760
001014
023760
001010
010037
062737

001126

;:'

$TSTRNN
.BYTE
.BYTE

0O
1

MOV
ce
BNE
ce
BNE
ce
BNE
MOV
ADO

#1ST1,RO
o4, (RO)
64
012737,2(RO)
64
$TSTNM,4(RO)
64
RO, SLPADR
#2, SLPADR

END O MACRQ

TYPE
B8R
TST
ce
BNE
TYPE
B8R
MOV

RESTART: P

1POINTER TO MAP LOCATION TO BE FILLED
tMASK OF INVALID BITS FOR THIS PARAMETER
INUPBER OF PARAMETERS TO STORE

s=sescascscsscnsssss

. SCRLF
8¢
(RO).
RO,#TLAST.10
S
. SQUES
74
€TST1, $LPADR
8$LPADR

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

1PREPARE TEST ADORESS

1G0 START TESTING.sseWARNING!esss

1 THIS JUMP IS USED BY POWER UP ROUTINE!!!!

IKS
CZDZA-HO
CZ0ZAH.P11

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

SEQ 62

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

1 -ROUTINE USED TO SET UP THE DIAGNOSTIC VIA APT,
¢ IF BIT? IN THE ENVIRONMENT MOOE (SENVM) BYTE IS SET,
+ THE PROMRAM WILL LOAD ITS PARAMETERS FROM THE ETABLE.

2875

001500

012132
012136
012140
012142
012144
012146
012150
012154
012160
012164
012170
012172
012174
012176

113703
106003
106003
106003
106003
106003
042703
012704

001305

SETAPT: MOV
MOV

001310
001304
177007

-} (s

-4

177770
001320

001312
001404

1¢:

24:

000010
000010

3s:

001314

100000
100000

1777

001256

177772
177776

001160

44:

S¢:

(@)

012700
013701
015702
042702

33BCRn833383%884R03333 333335

012112
012116
012122
012126

RTS

00Z .MAP RO
$BASE ,.R1

SVECT1
. R2
0tC<770>
,R2

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

$VECT1.1,R3

sLOAD THE INTERRUPT PRIORITY FROM R3

R3
otC<7> ,R3

, R4
0$00W0
$DEVM,RS
RS.0ZACTY
RS
34
St
(R4).
10,R1
010,R2
1¢
R1,(RO).

R2,(RO).

R3.(RO).
$COWL,(RO)

(P%)e,(RO).

[Y]

9100000, -6(RO)
100010, -2(RO)

(RO)»

2¢

SISUREG
, SWR

REMOVE

sPOINT TO THE BEGINNING OF DEVICE PARAMETERS
THE MAP OF ACTIVE DEVICES
MAP

VICE SELECTION BIT
IS SELECTED, GO SET UP A MAP

ARE SELECTED, GET OUT OF SETUP

XT DEVICE DESCRIPTOR

NEXT ADORESS
:
NEXT VECTOR GROUP
1SET
1GO SEE IF MORE OEVICES REMAIN
1LOAD DEVICE ADORESS
1LOAD THE VECTOR ADORESS
;LOAD THE INTERRUPT PRICRITY LEVEL
1GET THE MUIBER OF LINES IN OPERATION
1LOAD DEVICE PARAMETERS
1IF 20MA MODE SELECTED, SET IT WP
1SET THE 20MA FLAG IN DZLWN
1CLEAR THE FLAG IN DZPARN
1OEFAULT OPERATION TO INTERNAL MAINTENANCE MODE
1GO BUILD THE NEXT ADORESS
1 TERMINATE THE DEVICE MAP
1SET TO SOFTWARE APT SWITCH REGISTER
tRETURN TO PRINT STATUS TABLE

1oROUTINE USED TO "AUTO SIZE~ THE DZ11
1sCSR AND VECTOR.

1oNOTE: THE CSR MAY BE ANY WHERE IN THE FLOATING
t®
ADORESS RANGE (160000:163700)
e
AND THE VECTOR MAY BE ANY WHERE IN THE

2920

FLOATING VECTOR RANGE (300:770)

012264
012266
012272
012276
012302
012304

000005

105337

012702
01£703
003022
022702

001415
001300
001320
002000

AUTO.SIZE:
RESET
0€ECe
CSRMAP: MOV
MOV
CLR
14:
ce

INIFLG
007 .MAP R2

1INSURE A BUS INIT.
1SHOW THAT I WAS HERE
iLOAD MAP POINTER.

(R2).
#0Z .END,R2

1 ZERO ENTIRE mMAP
1ALL DONE?

#400W0 ,R3

tPOINT TO ETABLE DEVICE DESCRIPTOR WORDS

LS
CZDZA-HO

CZ0ZAM.P11
2931
2932
2933
2934

2933

2936
2937
2938
2939
2940
2941
2942
2943
2944
2945
2946
2947
2948
2949
2950
2951
2952
2953
2954
2935
2956
2957
2958
2959
2960
2961
2962
2963
2964
2963
2966

2957

2968
2969
2970
2971
2972
2973
2974

2975

2976

2977

2978

2979
2980

2981
2982

2983
2964
2985
2966

012310
012312
012316
012322
012326
012334
012340
012346
012330
0123352
012334
012356
012360
012362
012370
012372
01237¢

MACY11 30A/1052)
19-JUN-84 15:45
001374

105037

012702
012701
012737
0352711
052761
005000
005711
100403

001410

001500
160000

012646
000040
000200

24:
74:

8s:

BNE
CLR®
MOV
MOV
MOV
8IS
8IS
CLR
TST

08IT3,(R1)

8I77,4(R1)
34

RO
#20,(R1)

18R IF NO

tSET OCTAL NMUFMBER 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
1 TRY TO TRANSMIT ON LINE 7

tUSE RO AS A COUNTER

tHAS TRANSMITTER READY COME WP?
+IF SO, GO GET A FINAL CHECX
1REDUCE COUNT. TIME P?
1IF NOT, KEEP WAITING
1ASSUWE IT'S NOT A DZ11
1IS LINE 7 ENABLE STILL SET? IT SHOWD BE
+JF IT'S NOT, ASSAME IT°'S NOT A D211
11S MASTER SCAN ENABLE STILL SET?
+IF NOT, ASSUME IT'S NOT A D211
1SET DEVICE CLEAR

.12

tSHOULD STAY SET FOR A WMILE IF DZ
s8R IF NOT DZ11
sWAIT FOR BIT TO CLEAR
18R WHEN CLEARED

INC
BNE
B8R
CLR
CLR

RO
.-12
34
(R1)
4(R1 )

:8I7 NOT CLEARED! MUST NOT BE DZ11
1GET RID OF MASTER SCAN ENABLE
1GET RID OF LINE 7 ENABLE

MoV

R1,(R2).

MoV

3,(R2).

ONE

DELAY

020,(R1)

;AT THIS PCINT IT IS ASSUMED THAT R1 HOLDS A DZ11 CSR ADORESS.
TS7

177400
177400

000004
000004

100000
000377
017070

177776

8IS
81Y

9¢:

8IS
MoV

MOV
MOV
R

177777

34:

163700

:
1004

001410

001404

(R2)+

#177400,4(R1)
#177400,4(R1)

#8IT1S, -2(R2)
0377,(R2).

#17070,(R2)
(R2)+,(R3).
(R2).

o, 4
BNE

oM
920,028
1004
010,R1
0163700,R1
24

1578

OZNuUM

INCB
ovs

001410

000010

001410
001411
000001

(R1)

8I7

817
8EQ

8EQ
8IT
8EQ

001410
000020

#8IT3,(R1)
#8IT7,4(R1)
RO

8¢
RO
74
3

8IS
8Iv

000004

14
(174, V)
oDZ .MAP R2
0160000,R1
064,004

B8MI
DEC
BNE
B8R

8EQ
CLR

000005

SEQ 63

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

8EQ
ADO

8EQ
HOVe
MOVe
MOV

S¢
OZnuM,
R1
R1,SAVNUM
01,0ZACTV

8€Q

984

DEC

1STORE CSR IN CORE TABLE.
1POP OVER VECTOR STORE AREA
1SET TME DEFAAT BUS LEVEL
sTRY TO SET ALL OTR BITS

1IF ANY SET ASSUME EIA BOARD
sIF NONE SET ASSUME BOARD IS
120 MA, SET 20 MA FLAG
1SET THE DEFALTY LINE SELECTION PARAMETER
1SET THME DEFALT PARANMETERS
1COPY PARNETERS INTO ETABLE DESCRIPTOR
1SET TME DEFAMAT MODE OF OPERATION
s TERMINATE LIST
sUPODATE DEVICE COUNTER
sARE MAX. NO. OF DEV FOUND?
1YES DCN'T LOOK FOR ANY MORE.
tUPDATE CSR POINTER ADORESS

1R IF MORE AODRESS TO CHECK.
(MERE ANY DZ11'S FOUNC AT ALL?
tERROR AUTO SIZER FOUND NO DZ11'S IN TMIS SYS.
1SAVE NUMBER OF DEVICES

000410
104402
005000
000000
000776
012716
000002

001404

001500
001512
000006
001404

001310
001314
001312
S¢:

010574

012530

6s:

012737
012737
012702
012700
012701
010120
012721
022021

000340
013000
001300
000300
000302

VECMAP:

013704
000241
006004

001404

18:

000004
001000

248:

103036
106427

012772
011201
112761

&
o
013030
013036
013044

%83 23323333%

013737

020127
101771

3031

3033
3034
3035
3036
3037

000261
006137
000772
013737
013737
012737

005200
001376
012762
000005
062702
000733
011662
162762
042762
022626
012716
000002
013737

012737
000207

000300

3s:

000C14
44

000010
000007

012770
001302
003122

001304

S¢:

#3833 ~e3BERaRZ 3333R3NE0I18398244
¢

2991

012572
012574
012600
012602
012610
012616
012624

19-JUN-84 15:45

SEQ &4

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

F
R R TR i3
£55% AV

2987

MACY11l 30A(1052)

CZOZA -H0
CZOZAM.P11

END

DZACTV

OZCflO $8ASE

sPOINT YO THE ADORESS OF FIRST DEVICE

06,004
DZACTY, SOEVM
VEOW

tRESTORE TRAP VECTOR
1SAVE ACTIVE REGISTER
1GO FIND THE VECTOR NOM.

.-2
034 ,(SP)

1STOP THME SHOM
;1OISABLE CONT. SM.
tENTERED BY NON-EXISTENT TIME-OUT
tRETURN TO MAINSTREAM

0340, 90022
44,8020

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

#300,R0
0302.R1

sFLOATING VECTJURS START MERE.
s1PC OF I0T INSTR.

MANTO, $COM1

.MERR2
RO

002 .MAP ,R2
R1,(RO).
oTM,.(R1).
(RO)+,(R1).
R1, #1000
1¢

1INDICATE TO ETABLE WHAT MODE IS BEING USED

sNOTIFY OPR THAT MO DZ11°'S FOUND.
1MAKE DATA OISPLAY ZERO

1SET SOF TWARE FPOINTER

1START FILLING VECTOR AREA
MITH . e2; I07
sADD 2 TO RO R}
HAS TME VECTOR AREA BEEN EXCEEDED?
1R IF MORE TO FILL

DZIACTV.R4

1STORE TEMPORARILY

1ORING OUT A 817

(R2),R1
#MI177,4(RY)

1GEY CSR
1SET THE TCR BIT!

Ss
18R IF ALL OONE
0
1 ERO CPU PRIO
MBIT14.81ITS,(R2)

.-2
0300,2(R2)

014 R2
2¢

(SP),2(R2)

€10,2(R2)
07,2(R2)

034,(SP)

DZvCO, ¢VECT]

#.SCOPE,IOTVEC

MACRQ

tATTEMPT TO FORCE AN INTERRUPT

lSY&L

FOR TIME TO INTERRUPT
sI'gIMWY ASSUME 300 AND FIX DZ11l LATER
'

1POP SOF TWARE POINTER
{XKEEP GOING

1GET VECTOR ADORESS

sPOINY BACK TO THE CORRECT VECTOR
tCLEAR JUNK
tPUP IOT JUNK OFF STACK
1SET FOR RETURN

1COPY VECTOR OF FIRST DEVICE INTO ETABLE

;RESTORE THE SCOPE TRAP

tALL DONE WITH "AUTO SIZING"

ssecsssassssssssssss

N5
MACY11 30A(1052)

CZDZA -HO

CZOZAM.P11

19-JUN-84 15:45

3038
3039
3040
3041
3042

1oTHIS TEST PROVES THE SLAVE SYNC RESPONSE
+SDURING A READ OR WRITE TO THME FOLLOWING ADORESS:
DZCSR, OZRBUF, DZTCR, OZMSR
e

3043

3045

3032
3053
3054
3035
3056
3057
3058
3059
3060

3061
3062
3063
3064
3065
3066
3067
3068
3069
3070
3071
3072

3073
3074
3075
3076
3077
3078
3079
3080
3081
3082
3083
3084
3085
3086
3087
3088
3089
3090
3091
3092
3093

-:{xflzxm-...-..-a.---..-..-...-....---.--

;ooooooooooooooooooooooo: TEST 1 ¢60000000000000000000000000000¢

3044

3046
3047
3048
3049
3050
3051

SEQ 65

19-AN-84 16:22 PAGE 63
CZOZA 0Z11 DEVICE DIAGNOSTICS.

i:¢

-$X2-osessascsscssssssnsssesvensss

TEST 1

100800080 0808¢C0888808808000080008800008808088000800000088008000

013046

013050
013056
013064
013072
013100
013106
013112
013114
013116
013120
013122
013130
013134
013136
013140

013142
013144

013132
013156
013160
013162
013164
013166
013174
013200
013202
013204
013206
013210
013216
013222
013224
013226
013230
013232

013234

000004
012737

012737
012737
012737
012737
013700
011001

000240
005010
000240
012737
013700
011001
000240
005010
000240

012737
013700

011001
000240
005010
000240
012737
013700
011001
000240
005010
000240
012737
0035037
104400
011601
022626
104001
104401
000111

001122

013236
013224

001360

013106
002042

001362

TST1:
:

18:

SCOPE

Mov

01,8TSTNN

tLOAD THE NUMBER OF THIS TEST

MoV
MoV
MoV
MOV
MOV
MoV

OTST2,NEXT
34,4
#PR7,6
#14,L0CK
DZCSR,RO
(RO),R1

tPOINT TO THE START OF THE NEXT TEST
1SET TRAP VECTOR
+SET PRIORITY TO LEVEL 7
1SET RETURN IF SW09-=11
+SET _ADDRESS T0 TEST
1READ THE ADORESS

CLR
NOP
MOV
MoV
g

(RO)

1MRITE THE ADDRESS
(WASTE TIME
1SET RETURN ADORESS FOR SWO9
+SET ADDRESS TO TEST
;READ THE ADORESS

END

O MACRQO

NOP

013130

013152

013174
002062

001362

24:

3¢:

cesscssansssessessas

024 ,L0CK
OZRBF ,RO
(RO).R1

;

CLR
NOP
MOV
MoV
g

434 ,L0CK
OZTCR,RO
(RO),R1

(MRITE THE ADORESS
IWASTE TIME
1SET RETURN ADORESS FOR SwWO9
1SEY ADORESS TO TEST
1READ THE ADORESS

'C‘L’e

(RO)

;MRITE THE ADORESS

MOV

044 ,L0CK
OZMSR, RO
(RO),R1

1SET RETURN ADORESS
1SET ADORESS TO TEST
1REAC FROM ADORESS

'C‘L'R’

(RO)

{WRITE THE ADORESS

Efl;

6.4

1SET TRAP CATCHER BACK TO NORMAL

(RO)

Ss:

tMASTE T

ADVANCE
(SP),R1
MOV

END

ERROR
SCoP1
JP
O

MACR)

(SP)+,(SP)+
1

(R1)

1 SCOPE THIS TEST
1SAVE PC OF TRAP

1POP TRAP OFF STACK

soNO SLAVE SYNC RESPONSE.
1SW09=17
sRTI

sessssessssnssssassss
-‘xz-........--..-....--.......--.
‘

1066660886605406000800880¢ TEST 2 ¢088008840804008020000040880828

1oTHIS TEST PROVES THAT BIT “DCLR”
;1¢CAN BE SET AND THAT IT WILL CLEAR
18BY ITSELF AFTER A PERIOCDO OF TIME.

;:e

TEST 2

B6
-0

A
I CZOZ
P11
CZOZ.An

MACY11l SOA(1032)

19-AN-84 15:43
000004

012737

000002

001122

013246
013234

012737
013700
012703
010310

013322
002042
000020

001360

013276
013300
013302
013304
013306
013310
013312
013314
013316
013320
013322

SEQ 66

PAGE 66

CZDZA 0211 DEVICE OIAGNOSTICS.

013236
013240

013260
013264
013266
013270
013272
013274

16:22

19-JUN-04

011004
020304
001401
104002

1812:

18:

005002
005003
005003

02,0TSTNN

1(LOAD THE NUMBER OF TMIS TEST

OTSTS NEXT
RO
OZCSR,
SOCLR,RS
R3,(RO)
(RO),Ne
RSN
;‘

1POINT TO THE START OF TME MEXT TEST

tNOM LETS MATOM IT DISAPPEAR

24:

011004
001403

SCOPE

nov
1 -- END O
MOV
MOV
nov
oV
MoV
o®
8eQ
QR

R3S

CLR
MoV
EQ

(RO).R4
34

003203

INC

001374
005302

ONE
DEC
ONE

24
Re
24

‘001372

104002

3¢:

ERROR

1SEY POINTER
1SET OCLR
1WRITE OCLR INTO OZCSR
tREAD BACK DZCSR
1DZCSR OX?
1IF IT IS SET SKXIP THME ERROR CALL
160CLR SHOWLD OE SET. MOMENTARILY

1SET COUNTER TO O
1SEY EXPECTED 10 O
sOUAL LOOP COUNTER
1IS OOLR CLEAR?
+IF YES , GO TO THME MEXT TEST
+IF NO,COUNT 1 OF 63333 TIOKS
+THE WORD CREATED BY TTME DIMMEDIATE O WILL B€E
1 THE COUNTER
MAS THE TIME EXPIRED? IF MO, GO TEST 8IT AGAIN

1HAS

TOTAL TIME EXPIRED?

1IF NO, OHECK THE BIT AGAIN
1sOCLR FAILED TO CLEAR
t

-y -sccccccccescncncnssscssnsnesssnrocs

-$X]-ovs30scccnsescssnnscsssssecasns

160006008000000000000000¢ TEST 3 seeeeesccsssscossesessscssscnces

1oTEST TO VERIFY THMAT B8IT “MAINT" CAN
s1oBE SET. THMEN VERIFY TMAT BIT7 "MAINT- CAN
s o0 CLEARED (MRITTEN TO A ZERO). AND FINALLY
$oVERIFY THMAT AFTER BEING SETV AGAIN 1T CAN BE

toCLEARED B8Y A "DEVICE CLEAR”
3

s:e
013%22
013324

3141

35143
5145
3146
3147
3148
3149

013332
013340
013344
013330
013332
013334
013336
013360
013362
013364
013366
013370
013372
013374
013376
013400

012737

012737
013700
012705
010310
011004

001122

013414

1S73:
1

001360

001401

040310
011004
001404
010346

1¢:

104002
010510

TEST 3
SCOPE

nov

03,8TSTIN

1LOAD THE MUMBER OF THIS TESY

MoV
MoV

OTST4 NEXTY
RO
DZCSR,

tPCINT TO THE START OF THE NEXT TEST

nov
MOV
ov
SEQ

R3,(RO)
(RO),Ne
RS. N4
14

81C

R3,.(RO)

ERROR

1SET SET IN DEVICE
tREAD TTME BIT FROM DEVICE
tHAS BIT SEY?
OR IF YES
16817 RN FAILURE
1CLEAR TME BIT.
sAEAD DEVICE
tOR IF BITS WMERE CLEARED.
1SAVE THE BIT
1SET EXPECTED RESWLTS TO O
1o81I7 FAILED 70 CLEAR
{RESTORE THE BIT.
1SET THE BIT AGAIN

0 0 MACRD

000010

2s:

-$X]-vccsesvscscssesssscsssssenssns

ERROR

NOV
0c0
MOV
CLAR
MOV
MOV

sccccccccsscsseccns

MAINT,

(RO),.R4
2¢
R3,-(SP)
RS
(SP). RS
R3.(RO)

Cé
CZODZA -0
CZ0ZAn P11
3150
3151
3132
3133
3154
3155
3156
3157
3158
3159
3160

MACY11l 30A(1032)

19-JUN-84 15:45

013402
013404
013406
013410
013412
013414

19-AN-04 16:22 PAGE 67
CZ0ZA D211 OEVICE OIAGNOSTICS.

OEVICE.CLR
MoV
(RO),.Ra
0EQ
34
Lz
QR
2
ERMROR

104418

011004
001402
005005
104002

.
1

END

END O MACRQ

O MACRQ

1ISSUE DEVICE CLEAR
IREAD T BT,
tOR IF BIT CLEARED B8Y INIT (DEVICE CLEAR)
1SET EXPECTED TO ZERO
16817 NOT CLEARED By DEVICE CLEAR

ccccccccccsccscsnene

ecvcsencesecserossnes
t -0MARN-ccc0ccccncncesnsssroscnenssanassasss
3§

-0Xl-seccscccccssncssassaccocsosve

10000000000600000000600020 TEST 4 000000000000000000000000000000

1oTEST T0 VERIFY THAT BIT “MSENAS" CAN
1o8E SET. TMEN VERIFY TMAT BIT “MSENAS" CAN
1o0F CLEARED (MRITTEN TO A ZERO). AWD FINALLY
1oVERIFY THAT AFTER BEING SET AGAIN 1T CAN BE

316l

3162
3163
3164
3165
3166
3167
3168
3169
5170
3171
172
3173
3:74
3175
3176
5n”n
3178
L3,)
3180
3181
35182
3133
5184
3185
3186
3187
3188
3189
3190
3191
3192
3193
3194
3195
3196
3197
3196
3199
3200
3201
3202
3203
3204
3205

SEQ 67

1sCLEARED BY A "DEVICE CLE!:;I
-

1:¢o

-G EESEE00E0000000800RNGRERRRRS

TEST 4

'g.............‘............“.‘........‘.......................0

013414
013416
013424
013432
013436
013442
013444
013446
013450
013432
013434
013436
013460
013462
013464
013466
013470
013472
013474
013476
013500
013502
013504
013506

001122

012737
012737
013700
012703
010310

013506

TST4:
1

001360

04, 4TSTIN

ILOAD THE MUMBER OF THIS TEST

MoV

OTSTI MEXT

1POINT TO TME STARTY OF THE NEXT TEST

MOV
oP
8EQ
ERROR
8I1C

(RO),.Re
R3.Re
14
2
R3,(RO)

(READ TTME BIT FROM DEVICE
1WAS BIT SET?
1OR IF YES
16817 R/ FALLURE
tQLEAR THE BIT.

8EQ

END

O MACRO

MoV
"oV
MOV

011004

001401
104002
040310
011004
001404
010346

SCOPE

MoV

1¢:

010310
104413
011004
001402

2¢:

104002

OZCSR, RO
OMSENAS , RS
R3,(RO)

(RO).Re

R3,-(SP)
RS
CLR
2
ERROR
(5P)« RS
MoV
RS.(RO)
MOV
DEVICE.CLR
nov
(RO).R4
MOV

104002

occcccescsesccnsasee

8EQ

CLR
ERROR

3¢

RS
2

END O MACRQ

END O MACRO

1GET BASE ADDRESS
1SET 817
1SET SET IN DEVICE

+READ DEVICE

iR IF BITS MERE CLEARED.

1SAVE NE 817

1SET EXPECTED RES\LTS T0 O
16817 FAILED TO CLEAR
(RESTORE THE BI1T,
1SET THME 81T AGAIN
1 ISSUE DEVICE CLEAR
1READ THE BIT.

18R IF 8I7 CLEARED 8Y INIT (DEVICE CLEAR)

1SET EXPECTED 70 ZERO
1o8IT7 NOT CLEARED BY DEVICE CLEAR

ecscscsssassssssasse
ssssesccscvsasacess
' .:um-..o...-.o...-.o-...u.-..-..-.-----'

eSO

0NDOO0S SOOGS0

OOBRES

10060066000600000006000000 TEST S e00s00000000000000000000000000
;oTEST TO VERIFY THAT BIT ~SILOEN" CAN

160E SET. THEN VERIFY THAT BIT “SILOEN" CAN
1680 CLEARED (WMRITTEN TO A ZERO). AND FINALLY
1SVERIFY THAT AFTER BEING SET AGAIN IT CAN BE
1oCLEARED BY A "DEVICE CLEAR"
§

s:0

TEST S

~8XZl-vcccnccevsasssasssssccssassene

D6
CZOZA-+0
CZ0ZAM . P11
3206

MACY11 SOA(1032)
19-JUN-84 13:45

1 10000000000000000008000008000000A00000000000006000000000006000000

3207
3208

013506
013510

000004
012737

000005

001122

3210
3211

013516
013324

012737
013700

013600
002042

001360

3217

013544

3209

3212
3213
3214
3215
3216

3218
3219
3220
3221
3222

3223
3224
3225
3226
3227
3228
3229
3230
3231

3282
3233

013330
013534
0133536
013540
013342
013546

013350
013552
013554
013336

013560
013362
013564
013366
0133570
013572
013574
013576
013600

012705
010510
011004
020304
001401

TSVS:
P

010000

104002

1¢:

0403510

011004
001404
010346
003003

104002
012605
010510
104413
011004
001402
005005

24:

104002

3s:
t
$

3236

MOV
MOV

OTST6 NEXT
0ZCSR,RO

1POINT TO TME START OF THE NEXT TEST
1GET BASE ADORESS

MoV
MoV
MOV
oe
8EQ

OSILOEN,RS
R3,(RO)
(RO),R4
RS.Re
14

81C

RS,(RO)

ERROR

MoV
8EQ
MoV
LR

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

ERROR

ERROR
2
MoV
(SP)+,RS
MOV
RS,.(RO)
OEVICE.CLR
MOV
(RO).Re
8EQ
L
QR
RS

1SET BIT
1SET SET IN DEVICE
+READ THE BIT FROM DEVICE
tWAS BIT SET?
18R IF YES
10817 R/ FAILURE

tCLEAR THE BIT

+READ DEVICE
i1OR IF BITS MERE CLEARED.
1SAVE THE BIT7
+SET EXPECTED RESWTS 10 O

1e8IT FAILED TO CLEAR
RESTORE THE 817,
1SET THE BIT AGAIN
1ISSUE DEVICE CLEAR
IREAD THE BIT.
18R Ir BIT CLEARED BY INIT (DEVICE CLEAR)
1SET EXPECTED TO ZERO
168IT NOT CLEARED BY DEVICE CLEAR

~0MRRY-ocscccsssessssscssasnaancssnnannass
-8XZl-esssecncsccssssssessnnnscaanns

soTEST TO VERIFY THMAT BIT "RIE~ CAN
1#80€ SET. THEN VERIFY TMAT BIT "RIE” CAN
1o80E CLEARED (MRITTEN TO A ZERO). AND FINALLY
1oVERIFY THAT AFTER BEING SETV AGAIN IT CAN BE
1 oCLEARED BY A "DEVICE CLEAR”

3243

s+ TEST 6
013600

000004

013602

012737

000006

001122

3248
3249
3250
3251
3252
3253
3254

013610
013616
013622
013626
013630
013632
013634

012737
013700
012705
010510
011004
020504
001401

013672
002042
000100

001360

3236
3257
3258
3259
3260
3261

013640
013642
013644
013646
013630
013652

040510
011004
001404
010546
005005
104002

013636

104002

-8XZ-scscsccsscecssseccasnnsavanns

1100000006006800000000000060000000060000000000080080000000080080000

3246

3255

tLOAD THE MUPMBER OF THIS TEST

1800080000080000000000000 TEST 6 0000000020000000000000000000000

3242

3247

05, 4TSTNM

MACRC eseccssresessesssssse

;
3}

3237
3238
3239
3240
3241

3245

SCOPE
E'O'gv

-- END O MACRQO sesasscsscasasenssse
-- END 0 MACRO cececssscsscesssanses

3234
3235

3244

SEQ 68

19-UAN-84 16:22 PAGE 68
CZOZA 0211 DEVICE OIAGNOSTICS.

1876:
1

SCOPE

MOV

06,8$TSTN

sLOAD THE NMUMBER OF THIS TEST

MOV
MoV
MOV
MOV
MOV
e
8EQ

OTST7,NEXT
tPOINT TO THE START OF THE NEXT TEST
DZCSR,RO
1GET BASE ADORESS
ORIE,RS ;SET BIT
RS, (RO)
+SET SET IN DEVICE
(RO),R4
tREAD THE BIT FROM DEVICE
RS.R4
tMAS BIT SET?
14
187 IF YES

8IC
MOV
8EQ
MOV
CLR
ERROR

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

-- END O MACRQ esasccsassssessnses

14:

ERROR

10817 R/W FAILURE

tCLEAR THE BIT.
1READ DEVICE
1BR IF BITS WERE CLEARED.
1SAVE THE BIT
1SET EXPECTED RESWTS TO O
168IT FAILED TO CLEAR

E6
CZOZA -0
CZ0OZAM.P11
3263

MACY11l 3S0A(1052)

19-JN-84 15:45

013654

0136356
013660
013662
013664
013666
013670
013672

19-JUN-84

SEQ 69

PAGE 69

16:22

CZ0ZA 0211 OEVICE DIAGNOSTICS.

012605
010510
104413

24:

011004
001402
005003
104002

MOV
(SP)+ RS
RS, (RO)
MOV
OEVICE.CLR
MOV
(RO).R4
8%Q
34
CLR
RS
ERROR

(RESTORE THE BIT.
1SET THE BIT AGAIN
1 ISSUE DEVICE CLEAR
IREAD THE BIT.
1OR IF BIT CLEARED BY INIT (DEVICE CLEAR)
1SET EXPECTED TO ZERO
16817 NOT CLEARED 8Y DEVICE CLEAR

' i. END O MACRQO eescecccsssncscssssns
t

END

O MACRO

sacsccesassesssscss
'

-:am....--.......-..------......-.-.-o--

-GN 000SCNN0EENSESRAREsRsERRRS

10000068608 00805600000006060 TEST 7 0660020000000 000000600000008000

1oTEST TO VERIFY THAT B17 “TIE”~ CAN
1eBE SET, TMEN VERIFY THAT BIT “TIE” CAN
1o8E CLEARED (MRITTEN TO A ZERO). AND FINALLY
1oVERIFY THAT AFTER BEING SET AGAIN IV CAN BE
1oCLEARED BY A "DEVICE CLEAR"
]

1:e

..xz-............................l

TEST 7

TR § T

'....‘...‘..........““‘........“..‘......“.‘..‘..‘...‘.“....

013672
013674
013702
013710
013714
013720

013722
013724
013726
013730
013732
013734
013736
013740
013742
013744
013746
013750
013752
013754
013756
013760
013762
013764

001122

012737

013700
012705
010510
011004

013764

002042

TST7:
:

001360

001401

040510

011004
001404

1¢:

010346

104413
011004

2s:

104002

oT,.4TSTNN

MOV
MoV
MOV
MOV
MoV
o
8€Q

1POINT TO THE START OF THE NEXT TEST
0TST10,NEXT
1GET BASE ADORESS
DZCSR,RO
OTIE,RS ;SET BIT
RS,(RO)
1SET SET IN DEVICE
tREAD THE BIT FROM DEVICE
(RO),R4
1MAS BIT SET?
RS.R4
18R IF YES
18

8IC
MOV
8€EQ
MOV
CLR

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

ERROR

=scccsscssscssennss

(SP)+ RS
v
RS,(RO)
MoV
DEVICE.CLR
(RO), R4
MoV

B8EQ

001402

1LOAD THE NUMBER OF TMIS TEST

MOV

FND O MACRO

ERROR

104002
010510

SCOPE

CLR
ERROR

3¢

RS
2

END

O MACRQO

MACRO

16817 R/ FAILURE

;CLEAR THE BIT
1READ DEVICE
1BR IF BITS WERE CLEARED.
1SAVE THE BI7
$sSET EXPECTED RESWLTS T0 O
1o8I7 FAILED TO CLEAR

IRESTORE THE BI1T.
1SET THE 81T AGAIN
1ISSUE DEVICE CLEAR
1READ THE BIT.

1BR IF BIT CLEARED BY INIT (DEVICE CLEAR)
1SET EXPECTED TO ZERO
1o8IT NOT CLEARED B8Y DEVICE CLEAR

ss=esssscescssasssss

ssssscscssasssnasss
-‘Tm-.-........-......-....-.‘...-...--.......'
e$Xl-sesssessescenssssnssssnssassss

106680000866668000000600¢ TEST 10 668600800008 0000s0008380000000s
1oTHIS TESTS THAT ALL OF THE FOLLOWING

1o8ITS CAN BE;: SET, CLEARED, CLEARED BY "DEVICE CLEAR *
1o8IT7S TESTED ARE:

s¢ TCRO, TCR1, TCR2, TCR3, TCR4, TCRS, TCR6, TCR?
'

-‘xz-.............-.I....-......-.

F6
CZOZA-H0
. P11
CZOZAM
3318
3319
3320
3321
3322

3323

3324
3325
3326

3327

MACY11l 30A(1032)

19-AN-84 15:45

19-JUN-84

SEQ 70

PAGE 70

16:22

CZDZA 0Z11 DEVICE DIAGNOSTICS.

TEST 10

1100000600000 000¢00000800000000800000008000800000002000800080800000

013764
013766

000004
012737

013774
014002
014006
014012
014020
014022
014024
014030
014032
014034
014036
014040
014042
014046
014050
014052
014054
014056

012737
013700
012705
012737
010510
011004
042704

014060
014062
014064
014066
014070

014074
014076

014100
014102
014104
014106
14110
014112
014114
014116

020304

000010

0011¢2

014122
002056
000001
014020

001360
001362

TST10:
i

1¢:

1LOAD THE NUMBER OF TMIS TEST

MOV
MoV
MoV
MOV
MOV
MOV

OTST11,NEXT
OZTCR,RO
#TCRO,R3
014,L0CK
R3,(RO)
(RO),R4

sPOINT 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

CcP
BEQ

RS.Re
24

{WAS BIT Ox?
18R _IF YES

8IC
MOV
8IC

R3,(RO)
(RO),R4
0tC<377>,R4

MACRQ

8IC

177400

1S7

3¢:
177400

eosesccssssecsssssee

01C<377> R4

ERROR

2%:

104413

011004
042704
005704
001404
010546
005005
104002
012605
104401
106305
001341
005037

€10, $TSTNM

END

001401

104002
040510
011004
042704
005704
001404
010546
005005
104002
012605
010510

SCOPE

MOV

001362

1o81IT FAILED TO SET.

tCLEAR THE BIT
tREAD THE REGISTER
tCLEAR HIGH BYTE
181ITS CLEAR?

6EQ
34
MOV
R3,.-(SP)
CLR
RS
2
ERROR
MoV
(SP)+,RS
MOV
R3,(RO)
DEVICE.CLR
(RO),.R4
MOV
01Cc377> R4
8IC
TST
R4
6€EQ
44
MOV
RS, -(SP)
RS
CLR

18R IF YES
1SAVE GOOD RESWLTS
1SET EXPECTED 10 O
1 oREPORT BIT NOT CLEAR
IRESTORE RS
1SET THE BIT AGAIN,
1 ISSUE DEVICE CLEAR
1READ THE REGISTER
1CLEAR HIGH BYTE
t18ITS CLEAR?
tOR IF YES
1SAVE GOOD RESWLTS
1SET EXPECTED T0 O

MOV
SCoP1
ASLS
BNE
CLR

IRESTORE R3
sLOCX ON BIT? SET Sw09-1
tCHANGE TO NEXT BIT
1CONTINUE TESTING
tMAKE SURE TIGHT LOOP IS CLEANED WP

ERROR

4s:

1tCLEAR HIGH BYTE

END

(SP)+,RS

RS
14

MACRO

LOCX

1 8REPORT BIT NOT CLEAR

ssesscessansassasss

{

~$TCR-esscsccncccssancssscrcsnsassrsasssssascssnsuss
-8X2-seosssssssssasssssanssssnssss

100000060000000000000000¢ TEST 11 ¢00000000000000000000000000000
1oTHIS TESTS THAT ALL OF THE FOLLOWING

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

s DTRO, DTR1, DTR2, DTR3, DTR4, DTRS, DTR6, DTR?
1¢THIS TEST IS NOT OONE IF we IS 20MA VERSION
:

1:¢

<"sEcSSeEssesScEsacaASaAEENSSREnS

TEST 11

110000000000000008000800800080000800080008008008880080888000000840000

014122
014124

014132

014140
014144

TST11:

012737

000011

001122

012737
013700
012705

014304

001360

SCOPE

Mov

011,0TSTNM

1LOAD THE NUMBER OF THIS TEST

MOV
MOV

OTST12, NEXT
OZTCR,RO
#0TRO,RS

+POINT TO THE START OF THE NEXT TEST
1SET DEVICE ADORESS
1SET EXPECTED RESW.TS

END

MOV

MACRQ

ssesseccsccasassses

CZDZA-H0
CZ0ZAmM. P11

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

$374
337S
3376
3377
3378
S379

014150 012737 014166
014156 105737 001414
014162 100001
014164 104400
014166 010510
014170 011004

3383

014200

3380
3381
3382

3384
3335

3386
3387
3388
3389
3390
3391
3392
3393
3394
3395
3396
3397
3398
3399
5400
3401
3402
3403
3404

3405
3406
3407
3408
3409
3410
3411
3412
3413

3414

014172
014174
014176

105004
020504
001401

014202
014204

040510
011004

014206
014210
014212
014214
014216

014220
014222
014224
014226
014230
014232
014234
014236
014240
014242
014244
014246
014250
014254
014256
014262
014264
014266
014270
014272
014274
014276
014300

1s:

CLR8
0,
B8EQ

R4
RS.R4
4

81C
MOV

RS,(RO)
(RO),.R4

ERROR

F{H

CLR8
TS7
8EQ
MOV
QAR

105004
005704
001404
010546
005005
104002
012605
010510
104413
011004
105004
030510
001001

001375
000005
011004
105004
005704
001401
104002
005037

€14,L0CK
MOV
EIAFLG
7578
1
8PL
ADVANCE
RS,(RO)
MOV
(RO),.Ra
MOV

001362

104002

104002
104401
006305
001347
012710
005005
005227

SEQ

17-AUN-84 16:22 PAGE 71
CZOZA 0211 DEVICE DIAGNOSTICS.

44
177400
S¢:

001362

3415
3416

R4
Re
34
RS, -(SP)
RS

2
ERROR
MoV
(SP)+,RS
MOV
RS.(RO)
DEVICE.CLR
(RO),R4
CLR8
4
817
RS, (RO)
BNE
4
ERROR
2
SCoP1
ASL
RS
BNE
MOV
€177400,(RO)
CLR
RS

000000

INC
BNE
RESET
MOV
CLR8
TST
B8EQ
ERROR
CLR

€0
S

(RO),R4
R4
R4
. o8
2
LOCK

1SET FOR SWO9
120MA OR EIA
1BR IF EIA
1EXIT TEST
1SEY THME BI7
1READ THE BIT FROM THE DEVICE
1CLEAR LOW BYTE
1WAS BIT OK?
1BR IF YES

16817 FAILED TO SET.

1CLEAR THE BI7
tREAD THE REGISTER

tCLEAR LOW BYTE
18ITS CLEAR?
1BR IF YES
1SAVE GOOD RESWLTS
sSET EXPECTED 70 O

1 oREPORT 817 NOT CLEAR
1RESTORE RS
1SET THE 81T AGAIN.
1 ISSUE DEVICE CLEAR
tREAD THE REGISTER
1CLEAR LOW BYTE
1MAS BIT CLEARED BY DEVICE.CLR?
1BR IF NO (IT SHOULDN‘'T BE CLEAR)
1o8IT CLEARED B8Y DEVICE.CLR
1LOCK ON BIT? SWO9=1
1CHANGE TO NEXT BIT
+IF NOT DONE LOOP
1SET ALL OTR BITS
sCLEAR LOCATION FOR ERROR PRINTOUT

+ACT DELAY LOOP FOR
1RESET INSTRUCTION
1ISSUE A BUS INIT
sREAD REGISTER
sCLEAR LOW BYTE
;10TR BITS CLEAR?
s IF YES CONTINUE
1IF NO PRINY ERROR
tMAKE SURE TIGHT LOOP IS CLEANED UP

-- END O MACRO esscssssasasasessas

t
t

IMRR.sssesnanssscscssssnsssansssssnsssannus
Xl -sccscssssscesssnsssvesanssess

3417
3418
3419

1088000080000806006000008 TEST 12 0000¢000000000800808000088000000
1oTHIS TEST PERFORMS RESET TESTING €
1oTESTING OF WRITE OMLY OR READ ONLY BIT

3421
;:gg

1.
L)

3420

1o TEST BITS "ROONE, BIT1i, 8IT10, BIT), BITS, BIT2, BIT1

BITO, SILOAL” ARE READ ONLY AND THAT TROY IS
ZERO UNTIL A LINE IS SELECTED AND MSENAB IS SET.

3424

3425
3426

3427

3428

3429

s:e

014304

014306

000004

012737

«$XZ-ossescsnssssessasssnsunsssnss

TEST 12

;.“.“‘....“““...‘...“‘..““.....“““‘..“‘..‘...‘..‘....

000012

V1122

TST12:
§

SCOPE

MOV

END

MACRO

012,$TSTNM

1LOAD THE NUMBER OF THIS TESY

ssccssscessnssseses

H6
CZOZA -0
CZ0ZAM.P11
3430
3431
3432
3433
3434
3435
3436
3437
3438
3439
3440
3441
3492

3443
3444

3445
3446

3447
3448
3449
3450
3451
3452
3453
3454
3455
3456
3457
3458
3459
3460
3461
3462
3463
3464
3465
3466
3467
3468
3469
3470
3471
3472
3473

3474
3475

3476
3477

3478
3479
3480
3481
3482
3483
3484
3485

MACY11 30A(1952)
19-N-84 15:45

014314
014322
014326
014330

012737
013700
005005

014334
014336
014340
014342
014346
014350
014332
014354
014360
014364
014372
014376
014402
014404

011004
001401
104002
012710
011004
001401
104002
012705
005077
052777
032710
052705
005002
011004
020504
001404
104414
005202
001372
104002

014406
014410
014412
014414
014416
014420
014422

012710

014422
002042

MOV
MOV

001360

MOV
8EQ

OT3T1S NEXT
tPOINT TO THE START OF THE NEXT TEST
OZCSR,RO
1SET ADORESS TO RO
RS
1SET EXPECTED Y0 O
OGROONE «8IT11+8IT108IT9.8IT8.8IT2+8IT18IT0.SILOAL,(RO)
IWMRITE TTMTME BITS
(RO),Ra
tREAD BACKX THE BITS
t1OR IF NONE ARE SET.
14

OTROY,(RO)

tATTEMPT TO MRITE TROY

CLR
MOV

027607

ERROR

100000

1¢:

MOV

MOV
B8EQ

(RO),Rae
2¢

100000
165466

2s:

MOV
CLR
8IS
8IS
8IS
CLR
MoV
ow
8EQ
DELAY
INC
BNE

OTROY RS
SOZLPR
#TCRO,8DZTCR
OMSENAS, (RO)
OMSENAB ,RS
Re
(RO),R4
RS.R
44

000001

SEQ 72

19-JUN-84
16:22 PAGE 72
CZOZA DZ11 DEVICE DIAGNCSTICS.

ERROR

165464

3¢:

4%;
1

ERROR

R2
34
2

END 0 MACRO

;‘CIYS WERE SET.

tREAD TROY
18R IF NOT SET

1SET EXPECTED BIT
tLOAD LINE O
1SET TCR BIT
'
1SET SCAN ENABLE
1SET COUNTER TO ZERO
tREAD THE REGISTER
1817 SET?
18R IF YES
sSTALL TIME
tUPDATE COUNTER
s8R IF COUNTER NOT DONE.
ssTROY NOT SET!

..................:u

1000008600000000000000008 TEST 13 e0eeesss0s0ss00008000000000000

1oTHIS TEST PERFORMS RESET TESTING AND
;1oTESTING OF READ ONLY AND WRITE OMLY BITS
s IN REGISTER DZCSR
1oVERIFY THAT *TIE~, "SILOEN”, "RIE”, "MSENAB“, "MAINT"
toARE THE ONLY R/W BITS IN THE DZCSR.
1oTHEN VERIFY THAT A RESET WILL CLEAR THESE BITS
1oTHIS TEST ALSO CHECKS BYTE OPERATIONS ON THE CSR
§

1:e

-$X2l-ecescssssssnssnsnsssssnsassss

TEST 13

§110008060888806040800080040800800808000000088808000000880008000080000

014422
014424

014432
014440
014442
014446
014452
014456
014460
014462
014464
014466
014470

014472

014474
014476

000013

001122

014552

001360

TST1S:
t

SCOPE

MOV

013,6TSTNN

1LOAD THE NUMBER OF THIS TEST

MOV

OTST14, NEXT

(POINT TO THME START OF THE NEXT TEST

MOV
MOV
MOV
MOV
cP
8EQ

1SET UP FOR ERROR MESSAGE
DZCSR, RO
#1C<DCLR>,(RO)
;TRY TO WRITE
OTIE!SILOEN!RIE
!MSENAB !MAINT RS ;MAKE EXPECTED
(RO),R4
s ACTUAL
R4 RS
lCPP EXPECTED VS ACTUAL
14
1 YES

CLR8
CLRE
MOV

(RO)
RS
(RO),R4

END

O MACRQ

sscccacsssscssssesnss

DEVICE.CLR

002042

177757
050150

1¢:

ERROR

ce
8eQ

1oNO

R4 ,RS
34

1COMPARE ACTUAL TO EXPECTFD
1BRANCH IF SAME

tCLEAR LOMER BYTE OF CSR
1SET EXPECTED
tREAD CSR BITS

16
CZO2A-H0
CZOZAM . P11Y

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

3486

014500

104002

3488
3489

014306
0143512

105077
012705

014516
012320
014322

011004
020405
001401

3487 014502 012710 177757
3490
3491
3492
3493
3494
3495
3496
3497
3498
3499
3500
3501
3502

3503

3504

0143524
014526
014532
014534
014540
014542
014544
014546
014550

014552

104002
012710
0050035
003227
001375
000005
011004
001401

165332
000150

177757

as:

000000

Ss:

104002

1:¢
014552

014554

000004

000014

001122

014642

001360

014562
014570

012737
104413

3519
3520
3521

014576
014600
014606

011005
012777
011004

3528
3529
3530
3531

3532
3533
3534

3539
3536

3537
3538
3539

3540
3541

(RO),Re
R4 RS
44

1SET RS TO EXPECTED RESWLTS
1READ CSR
1ACTUAL = EXPECTED?
1BRANCH IF SAE

(RC),Re
rd
2

1 IF NOT PRINT ERROR

2
0tC<DCLR>,(RO)
RS
&0
S4

1OTHERWISE PRINTOUT ERROR
;RESET CSR BITS
1SET RS TO EXPECTED RESWUTS
1DELAY TIMER FOR
tACT-11 COMPATIBILITY
1 ISSUE BUS INIT
+READ CSR REGISTER
1BRANCH IF CSR IS CLEAR

-MR\D-=scssscscssnccasssssnsssces

«$X]l-oscsssserancsssscsssnscncnsasnes

014572

013700

014610
014614
014616
014620
014622
014624

042705
020405
001401
104002
010403
005103

014640

104002

014626
014632
014634
014636
014642

010377
011004
020405
001401

;}

TEST 14

-$Xl-asccscssssssssnssnssssssssnss

10000808 808868008000680080880000088000008000200008000004008480000

012737

3516
5517

3522
3523
3524
3525
3526
33527

MOV
), 4
8EQ

1oeTHIS TEST PERFORMS RESET TESTING AND
1oTESTING OF READ OMLY REGISTER DZROUF
1eAND TESTING OF WRITE OMLY REGISTER DZLPR

3510

3518

1CLEAR MIGH BYTE OF CSR
@OZCSR
ORIE !MSENAB !MAINT RS

1806000060000000040800088 TEST 14 ¢0000ee0es00s00000s00800000000

3511

3515

CLR8
MOV

#*C<DCLR>,(RO) RESET CSR BITS

3507
3508
3509

3514

3506

3512

ERROR

2s:

1OTHERWISE PRINT ERROR

MOV

ERROR
MOV
CLR
INC
BNE
RESET
MV
8EQ

3505

3513

SEQ 73

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

TST14:
i

002046

177777

165244

104000

1¢:

165220

24:
:

SCOPE

MoV

END O MACRQO

€14,8TSTNM

1LOAD THE NUMBER OF THIS TEST

=essccccscvscssenas

MOV
0TST1S NEXT
DEVICE.CLR

tPOINT TO THE START OF THE NEXT TEST
1CLEAR D211

MOV
MOV
MOV

(RO),.RS
0-1,80ZLPR
(RO) R4

1SET EXPECTED
s TRY TO WRITE ALL 1°'S
s ACTUAL

1 oNO

MCV

OZROUF ,RO

8IC
o, 4
BEQ
ERROR
MOV
com
MOV
MOV
ow
8EQ

SOVALID!BIT11.RS ;DITTO
R4.RS
1O ACTUAL VS EXPECTED
1¢
13F YES,.GO CONTINUE PROCESSING
2
1oERROR- BIT PATTERN NOT CORRECT
R4 .RS
1GET A COPY OF THE ACTUAL BIT PATTERN
R3
1GET THE LOGICAL INVERSE OF THE BIT PATTERN
R3,8DZLPR
1TRY T0 MRITE
(RO),Re
1 ACTUAL
R4 RS
1O ACTUAL VS EXPECTED
24
+IF YES, GET OUT OF THIS TEST

ERROR

END O MACRO

1SET UP FOR ERROR MESSAGE

sescsssccscccsssssss

it
i}

~-$MRD-cesescsccsssnsansssscssanse
-8XZ-2ssscscssassnssnsasnsssannses

1066600080000008600800808 TEST 1S 000000004000000080080008000000
1eTHIS TEST PERFORMS RESET TESTING AND
1o TESTING OF READ OMLY REGISTER D2MSR

1¢AND TESTING OF WRYTE ONLY REGISTER DZTOR
{ -$X]-ecccssassscsssascssnnsnccssss

J6
CZDZA -0
CZOZAM P11
3542
3543
3544
3545
3546

3547
3548
3549
3550
3551
3552
3553
3554
3555
3556
3557
3558
3559
3560
3561
3562
3563

3564
3565
3566
3567
3568
3569
3570
3571
3572
3573
3574
3575
3576
3577

MACY11 3S0A(1052)
19-AN-84 15:45

19-AN-84

16:22

SEQ 74

PAGE 74

CZDZA 0211 DEVICE OIAGNOSTICS.

1:¢

TEST 1S

1 0 0 080 0 006058848008008000084000800000000000808080480400000480000

014642
014644

000004
012737

014652

012737
104413
013700
011005
012777
011004

014660
014662
014666
014670
014676
014700
014702
014704
014706
014710
014712
014716
014720
014722
014724
014726

000015

001122

014726

001360

T1ST1S:
i1

END

002062

177777

165170

1$:
165150

001401

104002

O MACRQ

015,0TSTNM

1LOAD THE NMUMBER OF THIS TEST

woesssscssesssncess

MOV
oTST16,NEXT
DEVICE.CLR
MOV
ODZMSR, RO
MOV
(RO),RS
MOV
#-1,80ZTOR
MOV
(RO),R4
e
R4 RS

tPOINT TO THE START OF THE NEXT TEST
tCLEAR DZ11
1SET UP FOR ERROR MESSAGE
1SET EXPECTED
1 TRY TO WRITE ALL 1'S
s ACTUAL
1O ACTUAL VS EXPECTED

MOV
MOv
e
8tEQ
ERROR

1 TRY TO WRITE
1 ACTUAL
+CP ACTUAL VS EXPECTED
1IF YES, GET OUT OF TMIS TEST
1 oNO

8EQ
ERROR
MOV
con

€oieClL

104002
010403
005103
010377
011004
020405

SCOPE

MOV

END

14
2
R4 ,R3
R3
R3,80ZTDR

(RO),R4
R4 ,RS
24
2

0 MACRO

1IF YES,GO CONTINUE PROCESSING
1«ERROR- BIT PATTERN NOT CORRECT
1GET A COPY OF THE ACTUAL BIT PATTERN
tGET THE LOGICAL INVERSE OF THE BIT PATTERN

=essssasssssssanscs

-‘xz-..-......-...--.--.-......-.-

16006068860600800800468800 TEST 16 0000600000000084008000088000002
tsVERIFY THAT IF ME ARE IN "STAGGERED” MODE

;oTHAT SETTING “DTR” FOR A LINE WILL
1sBRING UP "RING” AND “CARRIER” FOR THE
1oASSOCIATED LINE IN WMICH ME ARE STAGGERED!
t¢ LINEO DTRe LINE1 RING AND CARRIER
1 LINEL OTR= LINEO RING AND CARRIER
1 LINE2 OTR= LINES RING AND CARRIER
1¢ LINES ODTR= LINE 4 RING AND CARRIER
e

1:e

ETC...

-$Xl-essscsscscsssssssassssnnasssa

TEST 16

3 ]...‘.‘..“‘..““..““.‘..“"...‘.“‘........“..‘.“‘...“‘.

014726
014730

000004
012737

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

012737
012737
105737
100001
104400
013700

104413

005003
012702
005737
100405
013737
000177

000016

001122

015122
015016
001414

001360
001362

000001

001370
001126

SCOPE

MOV

END O MACRQ

MOV

TS7T8

10¢:

002062

001360
164110

TST16:

016, $TSTNM

1LOAD THE NUMBER OF THIS TEST

OTSTL7 NEXT

1POINT TO THE START OF THE NEXT TEST

EIAFLG

1EIA OR 20MA?
18R IF EIA
1EXIT TEST
1SET REGISTER
+INIT D211
1 ZERO LINE NUMBER
1SET POINTER
tARE WE IN STAGGERED MOOE?
1YES WE ARE!
tLEAVE THIS TEST! NOT STAGGERED
1EXIT

s=sesssssssssasssssn

#14,L0CK

10¢
8PL
ADVANCE
DZMSR, RO
MOV
DEVICE.CLR
R3
CLR
1,R2
MOV
TS7
MOOE
14
8MI
NEXT, SLPADR
MOV
S$LPADR
JHP

tUSE THIS ADDRESS IF A TIGHT SCOPE LOOP IS SELECYED

K6
CZOZA-HO
CZ0ZAr . P11

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

3598 015016

3599
3600
3601
3602
3603
3604
3605
3606

3607
3608
3609
3610
3611
3612
3613
3614

3615

3616
3617

3618
3619
3620
3621
3622
3623
3624
3625
3626
%z

1¢:

130237 001364

015022 001004
015024 005203
015026 106302
015030 103372
015032 104400
015034

010204

015044
015046
015050
015052
015054
015056
015060
015062

006204
000401
006304
005005
150405
000305
150405
150277

015036 032703
015042 001402

015066

015070
015072

015074
015076
015100
015104
015106
015110
015112
015114
015116
015120

104414

2%:
3

000001

43 :
S¢:

164772

011004
020504

001401
104002
140277
104414
011004
001402
005005
104002
104401
000741

64:

164754

7¢:

R4
S¢
R4
RS
R4 RS
RS
R4 RS
R2,84DZTCR

MOV
oP

(RO),R4
RS.R4

DELAY

s CABLE DELAY

BEQ
ERROR
8IC8
DELAY
MOV
8EQ
CLR
ERROR
SCoP1
B8R

64
2
R2,.80ZTCR

(RO),R4
74
RS
2
24

10STATUS MAP,

015122

015124

3646

015132

3648
3649
3650
3651

015146
015152
015154
015156

3652
3653

ASR
BR
ASL
CLR
81S8
SKAB
81s8
81S8

1 TEST THIS LINE?

1 YES
iILINE @
1GET NEXT LINE
I1KEEP TESTING
1ADVANCE THIS TEST
1SAVE BINARY BIT FOR LINE ¢
1GET STAGGERED COMPANION LINE
18R IF LINE EVEN
tADJUST LINE
'
tADJUST L INE
1SET EXPECTED
'
8
'
1SET DTR

tREAD MSR REGISTER
10K?

s YES
1oERROR IN RING OR CARRIER
1CLEAR DTR
1CABLE DELAY
tREAD MSR
18R IF THEY CLEARED
1SET EXPECTED 10 O
1o81IT7S NOT CLEARED
1LOCK ON SIGNAL?
1CONTINUE TEST

1oMODE; SETTING DTR FOR SELECTED LINES
soWILL BRING UP “CARRIER” AND “RING"
;oFOR THAT SAME LINE. NOTE: IF YOU HAVE
1oSELECTED MODE AS "EXTERNAL~; THE H325 TEST CONNECTER
1oMUST BE USED ON ALL SPECIFIED LINES.
1oLINES MAY BE SPECIFIED 8Y SWRO3-1
;16AND SWROO=1 AT START TIME OR ALTERING

3644

3647

R2.,LINE

106600060658000450000886068 TEST 17 0000068060808800000808080000000
1oeTEST TO VERIFY THAT IF IN “EXTERNAL“

3630
3631
3632
3633
3634
3635
3636
3637
3638

3645

8178

34
BNE
R3
INC
R2
ASLS
14
8cC
ADVANCE
R2,R4
MOV
#8IT0,R3
817
44
8EQ

-$l-sesssessssssssasssssssanansas

3629

3639
3640
3641
3642
3643

SEQ 75

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

015140

015162
015164

000004

012737

000017

001122

012737

015260

001360

105737
100401
104400
105737

001370

012737

100774
013700

015174

001414
002062

' -$Xl-vosasssssssssussaasssesssnasns

;e TEST 17
3 '.....‘...‘.‘..““..“..“.“““‘.‘.‘.““..“‘.‘..‘...‘..‘..‘
TST17:
SCOPE
i

001362

1¢:
2s:

MOV

017,47STNM

;LOAD THE NUMBER OF THIS TEST

END O MACRO sscsscscscssssssasss

MOV

0TST20,NEXT

tPOINT 1O THE START OF THE NEXT TEST

MOV

#34,L0CK

tUSE THIS ADDRESS IF A TIGHT SCOPE LOOP IS SELECTED

B8MI
MOV

14
OZMSR,RO

1EIA MODE FOR THIS TEST.
1SET REGISTER

1578
MODE
8MI
24
ADVANCE
EIAFLG
TS7T8

1EXTERNAL?
18R IF YES
1EXIT TEST
1YOU BETTER BE IN

L6
CZOZA -0
CZ0ZAM . P11

3654
3655
3656
3657
3658
3659
3660
3661
3662
3663
3664
3665
3666
3667

3668
3669
3670
3671
3672
3673
3674
3675
3676
g;z

015170
015174
015200
015202
01520
015206
015210
015212
015214
015216
015220
015224
013226
0135230
013232
0135234
015236
015242
015244
015246
015250
015252
015254
015256

MACY11 30A(1052)
19-AN-84 15:45

012702
130237
001003
106302
103373
104400
005005
150205
000305
150205
150277
104414
011004
020504
001401
104002
140277
104414
011004
001402
005005
104002
104401
000751

000001
001364

01.R2
MOV
R2.LINE
8118
S¢
BNE
R2
ASLB
3¢
8CC
ADVANCE
RS
CLR
R2.RS
8Is8
RS
SWAB
8IS8
R2 RS
R2,80ZTCR
8IsS8
DELAY
(RO),R4
MOV
RS.R4
0,

34:
4%

Ss:
164634

B8€EQ
ERROR
8IC8
OELAY
MOV
8EQ
CLR
ERROR
SCoP1
BR

64:

164616

7¢:

64
2
R2,8OZTCR
(RO).R4
T¢
RS
2
44

3679

3692
3693
3694

3695
3696
3697
3696
3699

3700
3701
3702
3703
3704
3705
3706
3707
3708
3709

~$TLINE-oesccacesassessasssssssnsnssassss
-‘xz-......-.-.--.--...-...---.-..

160080000000006606006008¢ TEST 20 60000060000000000¢000000080003
1o THIS TEST VERIFIES THAT TROY IS SET WMEN A LINE
1 IS READY TO BE LOADED, ANl TMAT THE LINE SPECIi1 FIED IN BITS 8-10 OF DZ'°SR CORRESPOND
te TO TME LINE SELECTED IN DZTCR

3686

1OR IF (ES
;CARRIER OR RING ERROR
1CLEAR DTR
1CABLE DELAY
1READ MSR
18R IF BITS CLEARED
1CLEAR EXPECTED LOC.
;18ITS NOT CLEARED.
1LOCK ON LINE?
;CONTINUE TEST
3

3681
3682
3683
3684
3685

3689

1SET LINE POINTER
1LINE SELECTED?
1BR IF YES
INEXT LINE
1CONTINUE TEST
s ADVANCE TMIS TEST
1SET EXPECTED
'
'
'
1SET DTR
sCABLE OELAY
1READ MSR
18ITS OX?

3680

3687
3688

SEQ 76

19-UJUN-84 16:22 PAGE 76
CZOZA DZ11 OEVICE OIAGNOSTICS.

015260

015262

015270
015276
015300

015304
015310
0:5314
015320
015324

015326
015332
015336
015340
015344
015346
015350
015352
015354
015356

000004

s:e TEST 20
s '.‘.‘...‘.‘..‘.‘.“...‘.‘“‘...‘..“.‘.......‘....‘......‘.‘.‘.‘

012737

000020

001122

012737
104413
013700

015404

001360

012705
005037
012702
130237
001420

050277
052710
005004
(032710
001004
104414
005204
001372
104003
011004

-$Xl-oensassasssssssennsnsnssssess

TST20:
:

002042

100040
001372
000001
001364

1¢:

164524
000040

2s:

100000

3¢:

SCOPE

mrlgv

020, $TSTNM

1LOAD THE NUMBER OF THIS TEST

sessscessscasssssen

MOV
OTST21 ,NEXT
OEVICE.CLR
MOV
DZCSR,RO

1POINT TO THE START OF THE NEXT TEST
1ISSUE A "DEVICE CLEAR” (RESET)
1SET POINTER

8IS
8IS
CLR
817
BNE
DELAY
INC
GNE
ERROR
MOV

1SET THE GO BIT FOR THIS LINE
1START THE SCANNER
1SET FOR DELAY
1 TX READY?
1BR IF YES
s DELAY
s COUNTER
1BR IF «<>0!
3eTX NOT REALCY!
1GET THE LINE POINTED TO BY THE SCANNER

MOV
CLR
MoV
8ITe
8ERQ

MMMSENAB
! TROY RS
SAVLIN
01,Re
R2.LINE
S¢

R2,8DZTCR
+(RO)
R4
OTROY, (RO)
4
R4
3¢
3

(RO).R4

;START THE EXPECTED LINE NUMBER AT O
1SET UP FOR ERROR PRINTOUTS
tUSING R2 AS A BIT POINTER, POINT TO LINE O
1 IS THIS LINE SELECTED?
1IF NO, SKIP THE STARTUP

M6
SEQ

CZOZA-HO
CZOZAH.P11
3710
3711
3712

3713

3714
3715
3716

3717
3718
5719

015360
015362
015364
015366

015372
013374
015400
015402
015404

MACY11l 30A(1032)

19-JUN-84 15:45

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

020405

104413

0035237
106302
103346

R4 RS

1IS THE LINE NUMBER WHAT 1T SHOWLD BE?

ERROR

i1oLINE NUMBER DID NOT MATCH TCR BIT

8EQ

001401

104002
062705

000400

S5¢:

ADO
INC

ASLB

8CC
--

+IF YES,GO WORK ON THE NEXT LINE

#400,RS

DEVICE.CLR

001372

END

SAVLIN

MACRO

1POINT 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, GO DO THE NEXT LINE

...-.-.-.-----....;xz

3720
3721
3722

10080600800080088604s0888 TEST 21 ¢0eeee00000000000000000000000s

3724

1eAT A TIME.

1oTEST TO TRANSMIT ONE CHAR AND
1oRECEIVE ONE CHAR ON ONE LINE

3723

3738

3734
3735
3736

37137

3188
3739
3740
3741
3742
3743
3744

3745

3746
3747
3748
3749
3750
3751
3732
3733
3754
37335

3736
3757
3738
3759
3760
3761
3762

3763
3764
3765

THE CHAR IS "232~ AND

1oALL SELECTED LINES WILL BE TURNED ON
1oONE AT A TIME. TMIS IS THE FIRST TIME ANY
1oDATA IS CHECKED IN THE RECEIVER.
toUSING SWITCH NINE WITH THIS TEST CREATES A TIGMT SCOPE LOOP
1 SWHICH TRANSMITS A STEADY szmm OF CHARACTERS.

3725
3726
3727

3728
3729
3730
L Y4
)1
3732

1:o

-¥XZl-vescncsnscsccssssnscassessass

TEST 21

1 80 60 0 800808800880808000400000800800800040000080000080008004068080004s

015404
015406

000004
012737

000021

001122

013414
015422

012737
012737

015742
015720

001360
001362

TST21:
;

SCOPE

mflgv

MACRQ

021, 4TSTNM

;1LOAD THE NUMBER OF THIS TEST

015722, NEXT
€164 ,LOCK

POINT TO TME START OF THE NEXT TEST
l\‘& THIS ADDRESS IF A TIGHT SCOPE LOOP IS SELECTED

sesscessessssassesss

MOV
MoV

s SLINEUP -senssscsesesscsscoscnsnassansssss
;i

015430

104417

015432
015436
013442
015446
0135430
013454
013436
013460
015462

013701
012702
030237
001402
010177
005201
106302
103370
0035037

015466
015472
015500
015504
015506
015512
0133520
013522
013524
013526
015534
015336
015540
015542

012702
032777
030237
001462
010277
032777
001401
104020
005005
032777
001004
104414
103205
001371

001366

000001

001364

18:

164376

2s:

000040
001364

164344

000200

100000

OCLASM

END

MOV

MACRO

MOV
2;

MOV
INC

164342

END

164322

164306

Ss:
6¢4:

PAR,R1
o ,R2

g.LM

R1,80ZLPR

PICK UP PARAMETERS

PICK UP INIT POINTER

l%flkfl THIS LINE BE SET WP ?
]

1SET UP LINE PARAMETERS

1POSITION POINTER TO THE NEXT LINE

1GOT ‘EM ALL ?

CLR

SAVLIN

tCLEAR LINE ¢ INDICATOR

MACRQ

MOV
3¢:

tCLEAR DEVICE AND SET MAINT BIT IF I MOOE

vovnmessassscessssss

ASLS

8cC

001372

000001

~-$MRESEY -ccnscesnssnascnsasssssesesasas

815
8Iv
8EQ

MOV

cscsssssessscanssass

1 ,R2

1LINE POINTER

Rc,80ZTCR

1SET _TCR BIT

OMSENAB
. B8DZCSR
R2,LINE
144

8IT

ORDONE ,SDZCSR

ERROR
CLR
817
BNE

20
RS
OTROY,80ZCSR

INCB
BNE

RS
64

8EQ

OELAY

+IF ND, GO SET UP THE NEXT LINE

S¢

;START SCANNER
tVALID LINE ?
iNO SET UP NEXT LINE
;75 REC DONE = 0 ?

+IF YES, ALLOW TIME FOR TROY TO SET
1oREC DONE SHOWD = O

N6
MACY11 30A(1052)

CZ0ZA-HO

. P11
CZ0Zm1
3766

3767

3768
3769
3770
37711
3772
3773
3774
3775
3776
3777

3778
57179
3780
s781
3782
3783
3784
3785
3786
3787

3788
3789
3790
391
3792

3793

3794
3795
3796
3797
37968
37199
3800
3001
3802
3803
3804
3805
3806
3807
3808

3809
3810
3811
3812
3813
3814
3815
3816
3817
3818
3819
3820
3821

19-JUN-84 15:45

0153544
015546
0153554

104003
112777
013703

000252
001372

015560
015564

001406

105737

001371

SEG 78

19-JUN-84
16:22 PAGE 78
CZOZA 0Z11 OEVICE DIAGNOSTICS.

164312

7¢:

ERROR

1oTROY FAILED TO SET!

MOve
MOV

0232,8DZTOR
SAVLIN,RS

1LOAD CHARACTER
IF“.ETEmX’ECTED LINE ¢

1S78

MOOE -1

1IS THIS TEST IN STAGGERED MODE?

BEQ

108

S8 ESeeEPsENsESsTSsUSsETsSRSEERRERES

1IF NOT, SKIP STAGGERED SETUP

(ME MUST NOW INVERT THE LAST BIT OF THE LINE NUMBER
015566
015570
015572
0135574
013576
015600

8s:
9s:
;

0135602
015604
015610
013614
015616
015624
015626
015630
015632
015634
015636
015642
015644
015646
0156350
013632
015656
015662
0135666
015670

10¢:

000252

100000

000200

164216

11$:

ASR
8Cs
SEC
OR
cLC
ROL

tGET THE LAST BIT INTO THME CARRY BIT
+IF IT IS SET, 'GO CLEAR IV
+IF IT IS CLEAR SET IT MERE
1SKIP THE CLEARING
1CLEAR THE CARRY B1T (INVERSION OF LINE PARITY)
1GET THE NEW BIT BACK INTO RS

SWAB

(MOVE THE LINE NUMBER TO THE UPPER BYTE

g{g

gVKID.RS

+ADD DATA VALID

8IT
BNE

OROOMNE
, BDZCSR

INC
BNE
ERROR

R3
114
4

1oROONE FAILED TO SET!

c
8EQ

R4,RS
134

;1COMPARE ACTUAL VS EXPECTED. ARE THEY THE SAME?
+IF YES, GO DO THE NEXT LINE

END

12¢:

13%:

164200
001372
001372

144
15¢:

IS8

015674
015676
015700
015702
015704
015712
015714
015716

17¢:

000200

MOV

ERROR

SCoP1

164130
18¢:

sssssessssusessscss

252 .RS

1ADD CHARACTER

124

SDZROUF , R4

1LOAD THE VALUE ACTUALLY RECEIVED

soNO CATA/CINTENTS DID NOT COMPARE

s OHECK TO

IF SWITCH NINE IS SET

e8IC
INC
MOV

R2,8DZTCR
SAVLIN
SAVLIN,RO

tCLEAR TCR BIT FOR THAT LINE.
+INC EXPECTED LINE
$SET UP CHARACTER OFFSET

8CC
CLR
DELAY
INCB
BNE
8IT
BEQ

3¢
R3

:IF NO, GO AROUND AGAIN FOR NEXT LINE
1 THIS CODE MAS BEEN INSERTED
170 DETECT A PROBLEM FOUND IN FAULT
1 INSERTION. IF AN ERROR OCCURS MORE
s THAN ONE WORD WAS RECIEVED ON
;LINE 7.

ASL
ASLB

013672

MACRO

DELAY

164204

ERROR

ADVANCE

RO
Re

R3
174
OROONE ,80ZCSR
.
18¢
20

(MAKE THE OFFSET A POMER OF TWO
tSHIFT THE LINE POINTER. ARE WE ALL OONE?

1GO TO NEXT TEST

; TIGHT SCOPE LOOP FOR THIS TEST. LOOP TRANSMITS CHARACTERS ONLY
015720
015726
015730
015736
015740

032777
001774

112777

104401
000744

100000

164114

000252

164130

164:

81T
8EQ
MOV8
SCOP1
BR

#TROY,BDZCSR
168
#252,80ZTOR

144

1IS TRANSMITTER READY?
+IF NOT, WAIT FOR IT
tLOAD THE CHARACTER
sLOOP AGIN IF SWO9=1
tOTHERWISE, GO PICK UP THE TEST NORMALLY
]

-‘xz---......-..-r-----....--.--.-

10008660080006084608808080 TEST 22 ¢4404600080088880580080824880000

B7
- w0
CZOZA
P11
CZoZ.An

MACY11 30A(1032)
19-2UN-84 15:43

1o TTMMIS TEST PROVES THAT THE TRANSMITTER TRANSMITS
1 6OMARACTERS (FLAG MODE)AND TE RECEIVER RECEIVES (FLAG MODE
)
1o(ONE LINE AT A TIME
BASED UPON VALID LINES)
1eTHIS IS TE FIRST T
E m:;zu DATA IS O€CXED

ER I 1 3 3 e§aedes 441344

3822
3823

SRR U

SEQ 79

16:22 PAGE 79
19-AN-04
CZOZA 0211 OEVICE DIAGNOSTICS.

1te

- 0000000000 0C00000000000000C0TS

TEST 22

1 0 0 0 0 0 0 080000000000000000000000000000000000000800000500000

015742
C15744

000004
012737

000022

001122

015732
015760

012737
0127%7

016270
0160’4

001360
001362

1S122:
it

SCOPE

MoV

022,8TSTNN

1ILOAD THE NUMDSR OF IS TEST

MOV
MOV

OTST23 , NEXT
44,1 00K

sPOINT TO THE START OF TME MEXT TEST
1USE THIS ADORESS IF A TIGMT SCOPE LOOP IS SELECTED

END

O MACRO

eecscsosassscsscscss

'.Lm-......-.....o..o.oo.-ooo.....-oo-

015766

104417

015770
015774
016000

013701
012702
030237
001402
010177
003201
106302
103370
003037

001366

012700
0035020

001422

016004
016006
016012
016014
016016
016020
016024

016030
016032
016036

016040
016042
016030
016034
016062
016066
016070
016074
016102
016104
016106
016110
016116
016120
016122
016124
016126
016130

022700

001374
003000
013737
01202
032777

030237
001465
010277
032777
001401
104020
0030035
032777
001004

18:

001364
164040

2s:

001372

001462

000001
001364
163762

100000

001400

163760

163740

163724

Ss:

4%
Ss:

64:

OCLASH

END

tCLEAR DEVICE AMD SET MAINT B8IT IF I MODE

O MACRQ

ecescsscesccassacer

MOV
MOV
g;

PAR,R1
01,R2
g&:.Lm

1IPICK UP PARNETERS
IPICK UP INIT POINTER
lmo THIS LINE BE SET WP ?

MOV
INC
ASLS
8cC
CLR

R1,802LPR
R1
R2
14
SAVL (W

SEY UP LINE PARAMETERS
170517104 POINTER TO THE NEXT LINE
1GOT 'EM ALL ?
1IF ND, GO SET UP THE NEXT LINE
1CLEAR LINE @ INDICATOR

MOV
QaRr
s,
BNE
CLR
MOV
MOV
8IS
eIY
BEQ
MOV
.4
8€Q

0TDO,RO
(RO).
oST0P RO
.-6
RO
OZROWF ,REGIST
01.R2
OMSENAS , 80ZCSR
R2,LINE
149
R2,80ZTCR
ORDONE , 8DZCSR
S

1POINT TO THE DATA AREA
1CLEAR A DATA WORD
sFINISHED ?
sNO
1CLEAR OFFSET
1SAVE FOR ERROR MSG
1LINE POINTER
lST*Y SCANNER
tVALID LINE ?
sND SET UP NEXT LINE
1SET TCR 817
1IS REC OOME ~ O ?
1IF YES, ALLOW TIME FOR TROY V0O SET

QLR

END

MACRO

ERROR

817
ONE

DELAY

104414
1052035

~6MRESEY -vcnsccnseccscnncacncesscnnss

essscsccsssscesases

1oREC DONE SHOWLD = O

OTROY ,8DZCSR

001371

INCS
ONE

RS
6

016136

013705

001422
001372

move
MOV

TOO(RO),80ZTOR
SAVLIN,RS

;LOAD CHARACTER
s'N.ETEmWECYED LINE ¢

016142
016146

001406

105737

001371

1578
8EQ

MODE - 1
104

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

104003
116077

163730

74¢:

ERRCR

1oTROY FAILED TO SET!

tME MUST NOW INVERT THE LAST BIT OF THE LINE NMUMBER
016150

006205

ASR

1GET THE LAST BIT

INTO THE CARRY BIY
-~

C7
CZDZA -%0
CZ0OZA1 P11
3878

3879

UL
R R U .

3881

016132
016134
016136

016160
016162

MACY11 SOA(1032)
19-UN-84 15:45

oCsS
SEC
OR

+IF IV IS SET, GO CLEAR I7
1IF IT IS CLEAR SET IT HERE
1SKIP THE CLEARING

ROL

L -]

1GET THE MEW BIT BACK INTO RS

SWAD
oIS8

RS
TOO(RO) RS

017

ORDONE
, BDZC SR

103402

000261
000401
000241

8s:

006105

016164
016166
016172
016176
016200
016206
016210
016212
016214
014216
016220
016224
016226
016230
016232
016234
016240
016242
016246
016252
016236
016260
016262
016264

SEQ 80

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

END

10¢:

001422
100000

O MACRO

alj

163634

11$:

INC
ONE
12¢:

13¢:

001422

001362

MOVE TME LINE NUMBER 10 THE UPPER BYTE
tADD OHARACTER
1ADD DATA VA ID

124

[}]
114

ERMOR

SCoP1
NGB
ONE
8IC
INC
MOV
ASL
ASLB
8cC
CLR

14¢;
15¢:

163610

001372
001372

:gvnm.ls

ERROR

MoV
o, 4
8EQ

iCLEAR THE CAARY 817 (INVERSION OF LINE PARITY)

secccocscnccascscnnse

ONE

DELAY

163622

SOZRBUF . A4
N4, RS
13¢
TOO(RO)
49
R2,.8DZTCR
SAVL IN
SAVLIN,RO
RO
R2
3¢
LOCx

1oRDONE FAILED TO SET!

1LOAD THE VALUE ACTUALLY RECEIVED
1COMPARE ACTUAL VS EXPECTED. ARE THEY THE SAME?
.rr YES, GO DO NE MNEXT LINE

DATA/CONTENTS DID MOT COMPARE

l“fl 70 SEE IF SWITOM NINE IS SETV
1 INCREMENT SINARY PATTERN FOR TMIS LINE
@ *‘ROUMD AGAIN FOR MEXT OHARACTER
.m TCR BI7V FOR THAT LINE.
sINC EXPECTED LINE
1SEY WP OARACTER OFFSET
MAE THE OFFSET A POMER OF TWO
tSHIFT TTMME LINE POINTER. AFE ME ALL DONE?
1IF NO, GO AROUND AGAIN FOR NEXT LIMNE
PAKE SURE LOCX IS CLEAR FOR NEXT TEST
'

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

1000000000000000000000000 TEST 23

0000000000000 00000000000000e

1oTHIS TEST WILL PROVE THMAT EACH RECEIVING LINE CAN
1o0E DISABLED OY SETTING THE RCVON 81T TO ZERO
1oFOR EACH LINE IN THE LPR REGISTER.
IT ALSO
1oVERIFIES THMAT MASTER CLEAR WILL ZERO DVALID FOR
1 SOMARACTERS STORED IN T gnz.o
'

j:¢

XA A

NN NN NNNNNENNNNRNSLH.)

TEST 23

110000000060600000000000000000000000008000000000000008000800000000

016270
016272

000004
012737

016300
016306
016312
016316
016320
016324
016330
016334
016340
016342
016344

012737
103037
003037
104417
013701
042701
012702
010177
003201
106302
103373

000023

001122

016622
001420
001372

001360

001366
010000
000001
163512

1S723:
s

SCOPE

MoV

023, 0TSTNN

1ILOAD THE MUPMBER OF THIS TEST

MOV
CLR8
CLR
DCLASM

OONFLG
SAVLIN

0TST24 ,NEXT

1POINT TO THE START OF THE NEXT TEST
JtINITIALIZE FOR FIRST TEST LOOP
1ZERO LINE NO. FOR ERROR REPORT
1EXECUTE MASTER CLEAR

AIC

MRCVON,R)

ASLB
8CC

R2
2

END

O MACRO

MOV

1¢:
2s:

MOV
MoV
INC

sessssasccscnesssnss

PAR,R1

01.R2
R1,80ZLPR
R1

1STORE DEFALT PARAMETERS

1CLEAR RCVON BI7

1 INIT LINE POINTER
1LOAD LINE PARANMETER REGISTER
1SET R1 FOR NEXT LINE
(1SHIFT R2 TO NEXT LINE
1ALL LINES LOADED?

D7/
P11

MACY11 30A(1052)
19-J2N-84 15:45

016346
016332
016336
016362

016370

016372
016376
016400
016402
016404
016406
016410
016414
016420

016424
016426
016430
016432

016434
016436

016440
016444
016446

016452
016454
016436
016462
016464

016466

016472
016474
016476

016300

016502
016306
016510
016514
016516
016522
016324
016326
0163532
016536
016540
016342

016346
016532
016354
016356
016560
018562
016364
016366
016570
016572
016576

19 JUN-84

16:22

CZDZA D211 OEVICE OIAGNOSTICS.

MoV
MOV
MoV
8IS
QLR

02%2.R1
LINE . R2
R2,8D02TCR
, 8DZCSR
OMSENAS
"

)¢
DELAY

012701
013702
010277
0352777
005003
003777
100404
104414
0035205
001372
104003
117705
012703
042705
001403
106303
003305
001375
030302
001007
140377
001331
105737
001040

000252
001364
163474
000040

110177

163404

64:

163364

7¢:

B8R
CLR

8s:

DELAY

000404

040302
000741
003077
005005
104414
005205
001373

105777
100003

003037
104020
017704
100007
000304
042704
010437
104017
000766

103237

013701
000666
003005
104414
005205
001373

163444

105777
100003

as:

187

. R2
R3
Y]
RS, 8D0ZTCR
3¢

ONE
B8R

124
7

]
eI

104

001372

12¢:
13¢:

OONFLG

R1,8DZTDR
RS.R2

1 TRANSMIT CHARACTER

SDZROLF R4
114
R4

nov

R4, SAVLIN

8R
INCS
MOV
B8R
CLR

104
OONFLG
PAR,.R1
1¢
RS

INC
BNE

RS
13

DEVICE.CLR
1878
BPL

8DZCSR
144

1ROONE SET?
s IF NOT BRANCH

L1}
@DZITCR

INC
ONE

RS
1]

PL
CLR

104
SAVLIN

ERROR

11¢:

L}]
ns
204

1SET SCANMNER
1INIT DELAY COUNTER
1 TROY SET?
1 IF YES BRANCH
1IF NOT THEN WAIT
+ INCREMENT DELAY COUNTER
1OELAY DOME?
'IF YES TROY FAILED 7O SET
1MOVE LINE NO. INTO RS
1 IMIT TCR POINTER
1ISOLATE LINE NO.
sIF LINE O GO TEST TRANSH, FLAG
+POINT RS TO NEXY TCR BI7
tOECREMENT RS UNTIL R3 POINTS
tTO CORRECT TCR BIT
1MAS THIS LINE OEEN SERVICED?
1IF NOY GO SEND OARACTER
1IF YES CLEAR TCR BIT
1IF MORE LINES SET BRANCM
1IF ALL LOADELC IS THIS SECOND PASS
1 IF YES BRANCH TO SECOND PART OF TEST
tOTHERWISE CONTINUE WITH FIRST PARTY

mov
oPL
SWUAB

QLR

8IC

177770

SOICSR,
RS
o1,R3
0*Ce<?> RS

tLOAD TRANSMITTING CHARACTER
1COPY ACTIVE LINE B1TS
iLOAD TCR BITS

O.EM FLAG FOR THIS LINE
.Go WAIT FOR NEXT LINE
tCLEAR TCR B1ITS
1CLEAR DELAY COUNTER
tWAIT FOR LAST CHARACTER
s INCREMENT DELAY COUNTER
lIF NOT FINISHED CONTINUE WAITING
sROONE BIT SET?
1IF NO CONTINUE
s+IF YES SET LINE NO. TO ZERO
1AND PRINT ERROP
READ SILO
1IF OVALID IS ZERO BRANCH
1IF SET THEN
;ISOLATE LINE NO. IN R4
1SET SAVLIN FOR ERROR REPORT
1DATA VALID SHMJLD NOT BE SET
1GO READ SILO AGAIN
1PREPARE FOR SECOND PART OF TEST
1MOVE DEFAMAT PARNMETERS TO R1
1GO LOAD LPR REGISTER
+INIT DELAY COUNTER
tMAIT FOR LAST CHARACTER
170 BE RECEIVED
1DELAY FINISHED?
11IF YES EXECUTE MASTER CLEAR

1878

001372

163244

[ 34§
BNE
.3 (e
ONE

1ST8

163334

001420
001366

2190

ASLS
0€EC
ONE

001420

163324

204:

163412

a8
3

nove
Moy
8IC

218:

SDZICSR

o
ERROR

S¢:

000001
177770

104413

000240
000240

163452

163430

SEQ 81

PAGE 81

DELAY

@DZCSR
20

#1C<7> R4
17

E7/
CZOZA -0
CZOIAM.P11

3990
3991
3992
3993
3994
3995
3996

3997

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

0'6600 005037
016604 104020
016606 017704
016612 100003
016614 005037
016620 104017

CLR
ERROR
MOV
8PL
CLR
ERROR

001372
144

163234

001372
15¢:

016622

3996

1 3) THE RECEIVER CAN FLAG "PARITY ERRORS”
toONLY ONE LINE AT A TIME WILL BE EXERCISED.
1oTHIS TEST WILL NOT BE EXERCISED UNLESS

1sCONNECTED BY AN H32S, M3271, OR M3190 CONNECTOR
]

1:¢

016622

000004

016624

012737

000024

001122

4013

016632

012737

017100

001360

4015
4016

016646
016652

005737
001510

001370

4017

016640

012737

4018

016654

104417

4020

016656

013701

4024

016676

001402

4019

4021
4022
4023

4025
4026
4027
4028
4029
4030
4031
4032
4033

4034
4035

4036
4037
ggg
4040
mé

016662
016666
016672

016700
016704
016706
016710
016712
016716
016722
016730
016736

016742
016744

016750
016754
016762
016766
016772

052701
012700
030037

010177
0035201
106300
103370
005037
012702
052777
013737

110277
112777
013705
105737
001406

001371

163104

024, 4TSTNM

;LOAD THE MUMBER OF THIS TEST

MOV

0TST2S ,NEXT

tPOINT TO THE START OF THE NEXT TEST

787
8EQ

MODE
124

$1ARE ME RUNNING IN INTERNAL MODE?
lIF SO, SKIP THIS TEST

MOV

034 ,L0CK

OCLASM

1SET . OR LOOP

~-MRESET -svesosnsnncsssenssssscsssnse

sCLEAR DEVICE AND SET MAINT B8IT IF I MODE

-- END O MACRQ seccssesscaccsssses

2s:

163112
001400

SCOPE

MOV

--END O MACRO sessccsssascssssssess

18:

163146

163106
163114
000377
001372

000300
000001
001364

001372
000001

TST24:

001362

001366

030237

4043
4045

016736

000040
002046
001364

001446
010277

-$XZ-osssessusancsssssessassssnnss

TEST 24

1100080400600 00800680000°° 000800000000 00000000080000000000008080000¢

4011

4014

-$X]l-evencasnescascencssssnsnsanoses

1¢ 1) THE TRANSMITTER "BREAX BIT" WORKS
1o 2) THE RECEIVER CAN FLAG “FRAMING ERRORS”

4008

4012

1IF YES THEN PRINT OUT
1 REPORTY
lREAD SILO
1OATA VALID SET?
1IF YES THEN PRINT OUT
1ERROR REPORT
{

4007

4010

SAVLIN
20
SOZRBUF R4
15¢
SAVLIN
17

19000006600046060608406008 TEST 24 000000000000000008000000000000
1oTHIS TEST WILL PROVE THAT:

3999
4000
4001
4002
4003
4004
4005
4006
4009

SEQ 82

19-AUN-84 16:22 PAGE 82
CZDZA D211 DEVICE DIAGNOSTICS.

3s:

MoV

PAR,R1

1PICK UP PARNMETERS

8EQ

1IF NOT,OON'T SET 1T WP

8IS
MOV
8IT

mfl!FHITY al 1FORCE O0DD PARITY
01,R0
sPICK UP INIT POINTER
“O.LM
sSHOULD THIS LINE BE SET WP ?

MOV
INC
ASLB
acC
CLR
MOV
8IS
MOV

R1,802LPR
R1
RO
1¢
SAVLIN
o1 ,R2
SMSENAB ,BDZCSR
OZRBUF ,REGIST

MOV
MOVe
MOV

114
R2,8DZTCR
R2,8HD2TOR
#377,802T0R
SAVLIN,RS

1SET TCR BIT
1SET BREAK BIT
1LOAD CHARACTER
'M:ETiGXPECTED DATA

TS78
BEQ

MODE + 1
74

1 IS THIS TEST IN STAGGERED MOOE?
1 IF NOTY, SKIP STAGGERED SETUP

817
B8EQ
MOV

R2,.LINE

tOTHERWISE, SET UP LINE PARAMETERS
t:GOT "EM ALL ?
s NO
tCLEAR LINE ¢
sLINE POINTER
SET MASTER SCAN ENABLE
1SAVE FOR ERRR MESSAGE

-0

SOS0SE0EGOEESS00ONS0SASRESEOREREES

(ME MUST NOW INVERT THE LAST BIT OF THE LINE NUMBER
016774

006205

ASR

tGET THE LAST BIT INTO THE CTARRY BIT

F7
CZOZA -0
CZOZA P11
4046

4047

4048

4049

4050
4051
4052

4053

4054
4055
4056

4057

4058
4059
4060

4061
4062

4063

4064

4065

4066

4067
4068

4069
4070
4071
4072
4073

MACY11 30A(1052)

19-AN-84 15:45

016776
017000
017002
017004
017006

017010
017012

017016
017020
017026

017030
017032

017034
017036
017040
017044
017046
017050
017052
017056
017060
017064
017070
017072
017074

16:22

S¢:
64:

8cs
SEC
B8R
CLC
ROL

SwAB

BIT

ORDONE,GDZCSR

CZDZA DZ11 OEVICE DIAGNOSTICS.

103402

000261
000401
000241

006105
000305
052705
005004
032777

001004

104414
005204
001371
104004
017704

020405

END

130000
000200

163014

86:

BNE

OELAY

INC
BONE
ERROR
MOV

163002

163012

10¢:

001372
162766

114:

001362

12¢:

O MACRO

BIS

001401

104006
105077
104401
005237
040277
106302
103321
005037

SEQ 83

PAGE 83

19-JUN-84

sessccscssncsscnssns

tPUT LINE NUMBER IN UPPER BYTE
SOVALIDIPARER!FRFERR,RS 1ADD EXPECTED

9¢

R4
84
4
SOZRBUF ,R4

R4,RS

104
6
@OZTOR

BEQ
ERROR
CLR8
SCoP1
INC
8IC

SAVLIN
R2,8DZTCR

CLR

LOCK

ASLB
8cC

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

1oROONE FAILED TO SET!
1 ACTUAL

1O ACTUAL VS EXPECTED. DO THEY MATCH?
+IF YES, GO CLEAN WP
1 oDATA/CONTENTS FAILED YO COMPARE
1CLEAR BREAX BITS
1LOOP?
+INC LINE @
1CLEAR TCR BIT

{MAKE SURE LOCX IS CLEAR FOR NEXT TEST
$

-LVLIST -sseenasscesncenansnanesssnsss

-$XZ-scccsscssnsesssssassnssasesssna

108000080400 0004400000008 TEST 25 $00006000000000080086080088008080

4074
4075
4076
4077
4078
4079

;¢ THIS TEST VERIFIES THAT THE DEVICE DOES NOT INTERRUPTY
s oWHILE THE PRUCESSOR STATUS IS SET EXACTLY
1070 WMAT THE DOZ11 PRIORITY IS SET TO.

1eDEFAMLT PRIORITY IS AT
j:o

S (240).

-$XZl-vcosssassssssnsssscusssassess

TEST 25

] ]“.‘.“.......“‘.‘..........‘..“.“...““.‘.".“.......‘.“

4100
4101

017100
017102

000004
012737

000025

001122

017110

012737

017410

001360

017116

104417

017120
017124
017130
017134
017136
017142
017144
017146
017150

013701
012702
030237
001402
0310177
003201

017154
017160

106302
103370

005037

106437
113777

TST2S:
1

001366
000001
001364

16:

162710

24:

001372
030306
001364

162670

SCOPE

MOV

025,8TSTNH

MOV

075726 ,NEXT

END O MACRO

sesssssscesssssnsss

MOV
MOV
BIT
BEQ
MOV

PAR,R1
01,R2
R2.LINE
24
R1,80ZLPR

ASLS

8cC
CLR

MOve

sPICK UP PARAMETERS
sPICK UP INIT POINTER
JSHOULD THIS LINE BE SET UP ?
+NO
1SET UP LINE PARAMETERS

tPOSITION POINTER TO THE NEXT LINE
1GOT 'EM ALL ?

1
SAVLIN

1IF NO, GO SET UP THE NEXT LINE
1CLEAR LINE # INDICATOR

S#0ZPRT

1SET CPU STATUS TO DZ1l PRIO,

END O MACRQO

MTPS

~-MRESEV-vssnansnenssusnsssssnanssass

+CLEAR DEVICE AND SET MAINT BIT IF I MODE

0 MACRQO

INC

tPOINT TU THE START OF THE NEXT TEST

1SLINEUP -essescscsasssssssssscassscscnssnsns

]

OCLASM

END

1LOAD THE NUMBER OF THIS TEST

sesasassescsasassss

sevessssccssssscsss

LINE,S0ZTCR

1ENABLE THE VALID LINES

G7
CZOZA -0
CZ0ZAM.P11
4102
4103
4104

4105
4106

4107
4108
4109
4110
4111
4112

4113

4114
4115
4116
4117
4116
4119
4120
4121

4122
4123
4124
4125

4126
4127
4126
4129

4130

4131
4132
4133
4134
4135
4136
4137
4138
4139
4140

414}
4142

4143
4144
4145
4146
4147
4148
4149
4150
4151

4152
4153
4154

4155

4156
4157

MACY11 30A(1052)

19-AUN-84 15:45

19-JUN-84

CZDZA DZ11 OEVICE DIAGNOSTICS.
3¢:

017166

017174
017202
017210
017216
017224
017226

017234
017236

017240
017242
017244
017246
017250
017252
017254
017256
017260
017262
017264
017266
017270

012777
012777
013777
013777
052777
005005
032777
001403
000240
000240
000412
104414
005205
001366

017256
017264

030306
030306
040040
100000

162616

162606

END

8IS
O

064 ,80271V
#74,80ZRIV
DZPRT,BDZRIS
OZPRT,802ZT1S

MACRQ

S¢:

64:
7s:

104012
022626
042777

040000

162544

017276
017304
017312
017320
017326

012777
012777
013777
013777
052777

017374
017402
030306
030306
000140

162572

017334
017342
017344
017352
017354
017356
017360
017362
017364
017366
017370
017372
017374
017376
017400
017402
017404
017406
017406

113777
005005
032777
001403

001422

162524

000200

162470

8¢:

162554

162552
162506

94:

11%:

12¢:
138

1SET
1SET
1SET
1SET

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

OTIE !MSENAB,BDZCSR ;ENABLE THE DEVICE
sssrosescsscesssasns

8€Q

S¢

B8R

INC
BNE
fim

PS
44
:

1oTROY NOT SET!

ERROR
e
BR

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

16TRANSMITTER SHOULD NOT INTERRUPT
tPOP FOR FAKE RTI
1CONTINUE TEST

oP
8IC

(SP)+,(SP)e
OTIE,GDZCSR

1POP FOR FAKE RTI
anfent“graurm INTERRUPT ENABLE

MOV
MOV
MOV
MOV
8IS

0114 ,80271V
1SET UP THE TRANSMITTER INTERRUPT VECTOR
0124 ,80ZRIV
1SET UP THE RECEIVER INTERRUPT VECTOR
OZPRT, 8DZRIS
1SET THE INTERRUPT VECTOR STATUS
1SET TRANSMITTER INTERRUPT PRIORITY
OZPRT,80ZTIS
ORIE !MSENAS ,BDZCSR ;ENABLE THE DEVICE

'C?:‘

;SOO.I’ZTM

81T

$ROONE
, BDZCSR

BIT

OTRDY,802CSR

DELAY

ERROR

END

MACRQ)

tSRECEIVER SHOULD NOT INTERRUPT
.

90000000 0EGoSADESIEIIOEEESESS

esssecsssssrssssesnes

tPUT ANY RANDOM CHARACTER IN TRANSMITTER BUFFER

10¢

8€Q
NOP
NOP

104:

~SINTSET-aesescasncscssssscsnscnncasne

CLR

NOP
NOP

000402

104413

MOV
MOV
MOV
MOV

162702
162670
162664

104003
000405
104010
022626

000240
000240
000412
104414
003205
001366
104004
000405
104010
022626
000402
104012
022626

SEQ 84

PAGE 84

16:22

134

INC
BHE
ERROR
BR
ERROR

RS
ot
4
134
10

1oNO RX DONE! (NOT SET)
sCONTINUE TEST
18TRANSMITTER SHOULD NOT INTERRUPT

BR
ERROR

134
12

sCONT TEST
tSRECEIVER SHOULD NOT INTERRUPT

DELAY

ce
(o,

(SP)+,(SP)e
(SP)e+,(SP)e

OEVICE.CLR

1POP FOR FAXE RTI

1POP FOR FAKE RTI

1ISSUE DEVICE CLEAR (RESET)

END

O MACRO

secscssescsscasensss

END

O MACRO

sssosscss. sscsssses
§

-LVLTST -ccsescscasscccscansussnncsass

-$Xl-vscnssscscnssnassassenanssasnss

1806666000000860606000688 TEST 26 0000000600800008000000808880880

H7
CZDZA -0
CZ0ZAM.P11

MACY1l 30A(1052)

19-JUN-84 15:45

19-JUN-84

16:22

CZOZA DZ11 OEVICE DIAGNOSTICS.

1o TMIS TEST VERIFIES THAT THE OEVICE DOES INTERRUPT

4158
4159
4160

1oMMILE THE PROCESSOR STATUS IS SET TC EXACTLY

1oONE LEVEL LOWER THAN THE DZ11. DZ11l PRIORITY
1eDEFAMAT TO LEVEL S MINUS ONE LEVEL IS LEVEL 4.

4161

4162
4163
4164
4165
4166
4167
4168
4169
4170
4171
4172
4173
4174

4175

4176
4177
4178
4179
4180
4181

4182
4183
4184
4185
4186

4187
4188
4189
4190
4191
4192
4193
4194
4195
4196
4197
4196
4199
4200
4201
4202

4203
4204
4205
4206
4207
4208
4209

4210
4211
4212
4213

SEQ 85

PAGE 35

1:0

~8X1-oscsccsncessvnssnsscesssssssss

TEST 26

110000008000000080004000080000000000000080000808000008000080000004000

017410
017412

000004
012737

017420

0127%7

T§7T26:

001122

017736

SCOPE

;LOAD THE NUPBER OF THMIS TEST
026, $TSTNR
MOV
1
-- END O MACRQ cssscssscssenccssss
OTST27 ,NEXT

MOV

001360

tPOINT YO THE STARY OF THE NEXT TEST

'.Lm..Il...........l.l.........‘.....-

017426

104417

017430
017434
017440
017444
017446
017452
017454
017456
017460

013701
012702
030237
001402
010177
005201
106302
103370
005037

017464
017470
017476

106437
113777

017476
017504
017512
017520
017526

012777
012777
013777
013777
052777

017334
017536
017544
017546
017550
017352
017554
017356
017560
017562
017564
017566
017570
017572
017600
017604
017606
017610
017612

005003
032777
001404
000240
000240
104007
000416
104414
003205
001365
104003
000411
022626
042777

017620

012777

001366
000001
001364

14:

162400

as:

001372

030310
001364

162360

tCLEAR DEVICE AND SET MAINT BIT IF I MODE

OCLASM

seseccssccsssssncess

--END O MACRO

MoV

PAR,R1

ASLB

MOV
8IT
8EQ
MOV
INC

END

8cC
CLR

M0'/8

1IPICK UP PARAMETERS

01,.R2
R2,LINE
24
R1.80ZLPR
Rl

1PICK UP INIT POINTER
sSHOULD THIS LINE BE SET WP ?
+NO
1SET UP LINE PARAMETERS
tPOSITION POINTER TO THE NEXT LINE

14
SAVLIN

$1IF NO, GO SET UP THE NEXT LINE
1CLEAR LINE ¢ INDICATOR

1GOT ‘EM ALL ?

esssssssssssesanssse

O MACRQ

MTPS

SMLESS]

LINE,SDZTCR

sMAKE CPU ONE LEVEL LOWER THAN DZ11

;1ENABLE THE VALID LINES
i

106437

000402
104012
022626
042777

017370
017606
030306
030306

100000

162372
1623€0
162354
162352
162306

162276

MOV
MOV
MOV
MOV
:

4%:

8IS

END

8EQ

sflm

;‘

030310

162242

162222
01772¢

162250

8¢:

1o TRANSMITTER FAILED TO INTERRUPT

RS
44
g‘

1oTROY NOT SET!

POP2SP
8IC

OTIE,BDZCSR

tREMOVE THE INTERRUPT FROM THE STACK
tOON'T LET ANY MORE INTERRUPTS OCCUR

8¢
12
(SP)e+,(SP)e
OTIE,Q0ZCSR

sRETURN TO THE NORMAL FLOW
1 oRECEIVER SHOULD NOT INTERRUPT
1POP FOR FAKE RTI
n“fiLT;S?BHITYER INTERRUPT ENABLE

€114 ,80ZTIV

1SET UP THE TRANSMITTER INTERRUPT VECTOR

MTPS

74:

#TROY, 8DZCSR

INC
BNE

gflm

64:

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

sscssssssessnasssess

R3S

DELAY

-.mgt..-....-....----.--.-.-.--..-

OTIE !MSENAB ,80ZCSR ;ENABLE THE DEVICE

CLR

NOP
NOP

S5¢:

064 ,80271V
074 ,80ZR1IV
OZPRT,8DZRIS
OZPRT,80ZT1S

O MACRQO

BIT

~$MRESET -onocesronnssnsscnasonnnssssns

BR
ERROR
crp
eIC

mOv

SLESS)

tMAKE CPU ONE LEVEL LOMER THAN DZ11

T YIYTEIY NI

RR SRR

LN E

YRR ]

17
CZ0ZA-HO
CZOZAN P11

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

4214 017626 012777 017726
4215 017634 013777 030306
4216 017642 013777 030306
017650

052777

000140

162164

4219
4220

017656
017664

113777
005005

001422

162202

000200

162146

4223
4224

017676
017700

4221
4222

4225

017666
017674

017702

032777
001404

4230
4231
4232
4233
4234
4235
4236

017714
017716
017720
017722
017724
017726
017730

4238

017734

104413

4239

017734

E'OQ(IJS

9¢:

11¢:
12¢:

162106

13¢:

4240

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

ssecscssescacncsasss

tPUT ANY RANDOM CHARACTER IN TRANSMITTER BUFFER

817
8EQ

T00,8DZTOR
RS
E
, BDZCSR
ORDON
10¢

ERROR

1 oRECEIVER FAILED TO INTERRUPT

INC
BNE
ERROR
8R
ERROR
oe
[]
POP2SP
QLR

RS
94

B8R
OELAY

10¢:

0124 ,80ZR1V
DZPRT,80ZRIS
OZPRT,80ZT1S

ORIE !MSENAB ,BDZCSR ;ENABLE THE DEVICE

MACRO

MOove
CLR

104011

005205
001365
104004
000406
104010
022626
000403
022626
005077

4237

NOP
NOP

000413
104414

017704
017706

017710
017712

000240
000240

4226
4227

4228
4229

MOV
MOV
MOV

162236
162232
162230

4217

4218

SEQ 86

19-JUN-84 16:22 PAGE 86
CZOZA 0Z11 DEVICE OIAGNOSTICS.

13¢

4
13¢
10
(SP)+,.(SP).
134

8DZCSR

DEVICE.CLR

END O MACRQ

soND RX DOME! (NOT SET)
tCONTINUE TEST
1oTRANSMITTER SMOWLD NOT INTERRUPT
1POP FOR FAKE ARTI
;CONT TEST
tREMOVE THE INTERRUPT FROM THE STACK
tOON'T ALLOW ANY MORE INTERRUPTS
1 ISSUE DEVICE CLEAR (RESET)

sscsssecsssssnssses

-- END O MACRQ escscsscsccsasassssse

4241

4242

-$X]-ossrcssssnanasssssessseannses

4243
4244
4245
4246
4247
4248

160088006000608000800000¢ TEST 27 ee0ceess00s00ss00s00000000000s
1oTHIS TEST VERIFIES TMAT THE RECEIVER WILL
1o INTERRUPT BEFORE THE TRANSMITTER EVEN
1oTHOUGH THE TRANSHITTER WAS ENABLED
1oFIRSY,
SET PS TO LEVEL 7,
16GET RODONE AND TROY TO SET,

4250

1osCLEAR PS AND EXPECT RX TO INTERAUPT FIRSTY

4249

1oSET TX JE AND RX IE;

4251

i:e

4252
4253

4254

4255

4256

4257
4258

017736

017740
017746

000004

012737

000027

001122

012737

020370

001360

4260 017754 104417
4261

4263
4264

4265

4266
4267
4268
4269

017756

017762
017766

017772

017774
020000
020002
020004

013701

012702
030237

001402

010177
005201
106302
103370

-$X]-osccscascsacsssscsassssassne

3 '.“‘..“‘.....“.‘....‘.‘..“‘.‘.......“..‘...‘.....“‘..‘....

TST27:
i

4259

4262

TEST 27

001366

000001
001364

162052

1¢:

2s:

SCOPE

MOV

027, 4TSTNM

1LOAD TME MUPGER OF TMIS TEST

MOV

0TST30,NEXT

{POINT TO TME STARY OF W€ MEXT TEST
1LINEUP -cocssesncssccscscnancanssnassssse

END

O MACRO

OCLASM

secscsnscccccssncace

END O MACRQO

~RESET -coccsccscssncncsecnsssccseas

LCLEAR DEVICE AMD SET MAINT QIT IF I MODE

e=esccsccessessenss

MOV

PAR,R1

iPICK UP PARAMETERS

8€EQ

1NO

MOV
817
MOV
INC
ASLB
e8cC

€1 ,.R2
R2,.LINE
R1,80ZLPR
R1
R2
1

PIOK UP INIT POINTER
1SMOULD THIS LINE BE SET WP ?
1SET UP LINE PARNE TERS
1POSITION PCINTER TO THME MNEXT LINE
1GOT 'EM ALL ?
1IF NO, GO SET UP THE NEXT LINE

J7
CZDZA-H0
CZ0ZAM.P11
4270
4271
4272

4273
42174

275

4276
277
4278

427
4280

4281
4282

4203
4264
4285
4266

4287

4268
4289
4290
4291

4292

4293

4294
£295
4296
4297
4298
4299
4300
4301
4302
4303
4304
4305
4306
4307
4308
4309
4310
4311
4312
4313
4314
4315
4316
4317
4318

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

020006

075037

001372

020012
020020
020026

012777
013777
012777

020242
030306
3SXN332

020034

013777
052777
012702
030237
001004
005237
106302

000771
106427

000240
000240

110277
005777
100001
104017
105777
100001

O030<
000040
000001
001364

162052
162046
162042
leush
161772

005777
100404
104414

005204
001372
104003
105077
005004
032777
001004
104414
005204

000200

100401

1SETUP INTERRUPT STUFF
'
'

tRECEIVER DONE BIT SHMOUWLD NOT BE SET

TST
8MI
OELAY

S8DZCSR
100¢

tMAIT FOR TROY
18R IF READY
tSTALL TIME

6¢4:

7¢:

161640

08¢ ,80ZRIV
DZPRT,8DZRIS
0124 ,802T1IV

ERROR

001371

104004
005777

tCLEAR LINE @ INDiCATOR

ecessasecenssacncasne

5¢:

100¢:
161656

MOV
MOV
MOV

SAVLIN

1SET TCR BIT
1VALID DATA?
+IT BETTER NOT BE SET
1DATA VALID SHOULD NOT BE SET
tRECEIVER DONE ?

99¢:

161712

MACRQO

R2,8DZTCR
SDIRBUF
. o4
17
8DZCSR

161750
161734

161704

MOV8
TST
B8PL
ERROR
TST8

001372

161720

CLR

34:

000340

END

MOV
8IS
MOV
8IT
BNE
INC
ASLB
B8R
MTPS

104020

005005
005004

SEQ 87

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

NOP
NOP

8PL

CLR
CLR

OZPRT,80ZTIS
B
, BDZCSR
OMSENA
#1,R2
R2,LINE
44
SAVLIN
R2
3
#PR7

. o4

RS
R4

INC
BNE
ERROR
CLR8
CLR
8IY
BNE
DELAY
INC

R4
994

ERROR
TST

4
8DZCSR

tLINE POINTER
tVALID LINE ?

;

; TROY FAILED TO SET

3
S0ZTDR

R4
, 8DZCSR
#RDONE
74
R4

BNE

8MI

. *4

1sROONE FAILED TO SET!
1 TRANS OONE BIT = 1 ?
1 YES

TRANS DONE FAILED TO SET
1eNO
3
ERROR
OONE BIT =1
RECEIVER
AND
ER
TRANSMITT
BOTH
sNOM THAT

104003

052777
052777
106427
000240
000240

040000
000100
000000

000137

020336

017704

161600

1SET INTERRUPT ENABLES AND WATCH THE FUR FLY
8IS
#TIE,80ZCSR
8IS
®RIE,B0ZCSR

161626
161620

104007
104011

8¢:

MTPS
NOP
NOP

ERROR
ERROR

7
11

134

1*TRANSHITTER FAILED TO INTERRUPT
1 sRECEIVER FAILED TO INVERRUPT
1GET OUT

1CHECK BR LEVEL

tRECEIVER INTERRUPT ROUTINE

MOV

SDZRBUF ,R4

1 ACTUAL

—

I<7
CZDZA-H0
CZDZAM.P11
4326

4327

4328
4329
4330
4331
4332
4333
4334
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
4360
4361
4362
4363
4364

020250
020252

020256

MACY11 30A(1052)
19-JUN-84 15:45
010403
000303
042703

177770

105737

001371

001406

MOV
SWAB
8I1C

R4 ,R3
R3
#tCc7>,RS

1STRIP JUNK

TST8

MOOE + 1

11S THIS TEST IN STAGGERED MOOE?

8eQ

114

-8STAG-essscscnnnccnnsrnsssncscsnsssansnas

$IF NOT, SKIP STAGGERED SETUP

1WE MUST NOW INVERT THE LAST BIT OF THE LINE NUMBER
006203
103402
000261
000401
000241
006103

020337

001401

104015
042704
120504

94:
10¢:
t

BR
CcLC
ROL

10¢

$IF IT IS CLEAR SET IT MERE
1SKIP THE CLEARING
1tCLEAR THE CARRY BIT (INVERSION OF LINE PARITY)
1GET THE NEW BIT BACK INTO R3

R3,SAVLIN

1IS THTS A VALIO LINE

ERROR

1eINVALI.

END

11%:

001372

Ccs8
8€Q

ERROR

040100

161476
161320

002100

161512

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

esscssssssnssssseas

. od

0tC<377> R4

RS,R4
. o4
S

1 YES

LINE

1STRIP JUNX

tOATA COMP.\RE ?
1 YES

18DATA DOES NOT COMPARE

8IC
R2,80ZTCR
tCLEAR TCR BI7
POP2SP
tREMOVE HE INTERRUPT VECTOR FROM THE STACK
B8R
13¢
1GO GET OUT OF INTERRUPT MOOE
1 TRANSMITTER INTERRUPT SVC ROUTINE

12¢:

161510

MACR(Q

8IC

161530

002074
161516

BEQ

177400

104011

022626
042777
013777
005077
013777
005077

R3
9¢

SEC

001401

104005
040277
022626
000402

ASR
acs

ERROR

POP2SP
8IC
MOV
CLR
MoV
CLR

13%:

1 THE RECEIVER INTERRUPT FAILED

170 OVERRIDE THE TRANSMITTER
sREMOVE THE INTERRUPT VECTOR FROM THE STACK
OTIE !RIE,BDZCSR ICLEm INTERRUPT ENABLES
OZRIS,8DZRIV
IRESTORE TRAPCATCHER
SDZRIS
DZTIS,80Z71IV
80ZT1S
'

-SSP ANASSO NSO

NN EEESSSS

108080600880 6000808000808 TEST 30 ¢0002304040004508000008802000800¢08

1oTEST TO VERIFY THAT ‘ROONE DOES NOT SET
1oIF THE SCANNER IS DISABLED.

1¢TURN ON SCANNER, MAIT FOR TROY,
t1osTURN OFF SCANNER, TRANSMIT A CHARACTER

4365

4366
4367
4368
4369
4370
4371
4372
4373
4374
4375
4376
4377
4378
4379
4380
4381

SEQ 88

19-JUN-84
16:22 PAGE 88
CZDZA 0Z11 OEVICE OIAGNOSTICS.

19’ ROONE SHOULD NOT SET.

s:¢

-8X1l-sscssasesssssssscsssscsssssss

TEST 30

$110800080088088080088888848488008008800000880800408808404000008000

020370
020372

000004
012737

000030

001122

020400

012737

020556

001360

TST30:
i

SCOPE

MOV

€30, $TSTNM

1LOAD THE NUMBER OF THIS TEST

MOV

0TST31,NEXT

tPOINT TO THE START OF THE NEXT TEST

END

O MACRO

ssesssssssesesnsses

tSLINEUP -ssossssssnasssnssscssssasassssasnss
<-$MRESET-ssssccssssvnnsnansssesanssss

020406

104417

020410
020414
020420

013701
012702
030237

{

001366
001364

14:

OCLASM

END

MOV

MOV
BIT

MACRO

1CLEAR DEVICE AND SET MAINT BIT IF I MOOE

=ssessesasssscscassess

PAR, R1

01,R2
R2.LINE

sPICR UP PARAMETERS

1PICK UP INIT POINTER
sSHOUWLD THIS LINE BE SET UP ?
-

L7
CZOZA-¥0

CZ0ZAM. P11

MACY11 30A(1052)

19-JUN-84 15:45
0N1402

4382
4383

010177

005201
106302

103370

005037

052177
012702
030237
001004
003237

106302
000771
110277
005005
005777
100404
104414
003205
001372
124003
042777
105077
005005
104414
005205
001375
032777

4397

001401
104020
104400

19-JUN-84

CZDZA DZ1t DEVICE DIAGNOSTICS.
8EQ

161420

24:

001372

000040

000001
001364

3¢:

161334

Ss:

161314

6¢:
7¢:

000200

161272

84:

1GOT

ocC
CLR

14
SAVLIN

END

MACRO

OMSENAB,BDZCSR ; TURN ON SCANNER

R2
LINE

MOV

R2,

S8DZTCR

ADVANCE

'EM ALL

ecvosacsssscscsnsnas

o],
R2,
4
SAVLIN

CLR
TSY
enI
DELAY
INC
BNE
ERROR
8IC
CLR8
CLR
DELAY
INC
BNE
8IT
B8EQ
ERROR

1SET UP LINE P/ IAMETERS
1POSITION POIN.ER TO THE NEXT LINE
1IF NO, GO SET UP THE NEXT LINE
1CLEAR LINE @ INDICATOR

MOV
8IT
BNE
INC

g:LB

161356

1NO

R1,80ZLPR
R1

8is

161370

MOV
INC

ASLB

001372

000040
161334

SEQ &9

PAGE 89

16:22

RS
SDZCSR
6

s INIT LINE COUNTER
sFIND A VALID LINE
+IF WE FOUND ONE GO TO TEST
+IF NOT
1 KEEP LOOKING

;SET TCR BITY

1 IS TROY SET
tCON'T TESTING IF IT IS
tIF IT NOT WALIT A WHILE

RS
S
3
tME WAITED LONG ENOUGH-ERROR
OMSENAB, QOZCSR ;TURN OFF SCANNER
1 TRANSMIT A CHARACTER
@DZTOR
1CLEAR COUNTER
RS
sWAIT SUFFICIENT TIME FOR
tROONE TO SET
RS
74
OROONE, BDZCSR ROONE SET
1 IT SHOULON'T BE -CONTINUE
8s
20
1IF IT IS THERE'S AN ERROR
-.xz-...................-.-......-

1086000860008000000000¢04¢ TEST 31 06000000088008080808080000080000

1oTHIS TEST VERIFIES OVERRUN AND SILO ALARM
1oONE LINE AT A TIME - BASED UPON VALID LINES
S SILO ALARM IS
ARE SENT;
1oAS EACH OF THE FIRST 16 CHAR
1oTESTED TO BE CLEARED. ON THE 16TH OHAR THE PROGRAM THEN
10EXPECTS SILO ALARM TO SET. THEN THE ENTIRE

1oSILO IS FILLED AND AN OVERRUN IS EXPECTED ON THE 65TH

1oCHAR PULLED OUT OUT THE SILO.
1oUSING SWITCH NINE FOR THIS TEST SENDS 20. CHARACTERS
1sON DZ LINE PREVIOUSLY SELECTED CONTINUOUSLY WHILE SWO9-1.
1oUSED TO SCOPE SILO ALARM PLLSES, ETC.
3

i:e

TEST 31

[X] 0000008000048 086200808008000808806008088¢808807086800880800000808488¢00
TST31:
SCOPE

020556
020560

012737

000031

001122

020574

012737
012737

021304
021210

001360
001362

020602

104417

000004

e$Xl-esvncscsancssnassssssssssasss

MOV

031,4TSTNM

tLOAD THE NUMBER OF THIS TEST

MOV
MOV

OTST32,NEXT
0184 ,L0CK

1POINT TO THE START OF THE NEXT TEST
1SET FOR LOOP

END

O MACRQ

DCLASM

END O MACR)

=ssssesssssssesssses

'.LI“{’-..--......----...-----.--------.l
~-$MRESET -evascssccssnsscsscccasasananess

tCLEAR DEVICE AND SET MAINT BIT IF I MOOE

sscssccssesssnensss

4441
4442

4443
4444

4445
4446
4447
4448
4449
4450
4451
4452
4453
4454
4455
4456
4457
4458
4459
44560
4461
4462
4463
4464
4465
4466

4467

4468
4469
4470
4471
4472
4473
4474
4475
4476
4477
4478
4479
4480
4481
4482
4483
4484
4483
4486

020604
020610
020614

013701
012702
030237
001402
010177
0035201
106302
103370
005037

001366
000001
001364

012700
005020
022700
001374
005000
012702
052777
030237
001002
000137
013700
006 300
010277

001422

105777
100001

161152

34¢:

021172
001372
161142
161122

48
:

161104

Ss:
64:

#1.R2

R1,80ZLPR
R1

2%:

PAR,R1

R2.LINE
24

18:

001462

END

Re
14
SAVLIN

O MACR)

001422
001422
000017

161110

Ts:

161044

161026

8s:
9t

#700,R0O

1SET UP LINE PARAMETERS
sPOSITION POINTER TO THE NEXT LINE
1GOT 'EM ALL ?
t1IF NO, GO SET UP THE NEXT LINE
1CLEAR LINE ¢ INDICATOR
s1POINT TO THE DATA AREA

(RO).
oSTOP,RO

sCLEAR A DATA WORD
sFINISMED ?

CLR

1CLEAR OFFSETY

8IS
8IT

R2.LINE

sVALID LINE?

SAVLIN,RO
RO
R2.8DZ7TCR

tMAKE OFFSET
tMAKE POMER OF TwO
1SET TCR BIT

.-6

sNO

1,R2
sLINE POINTER
OMSENASB ! SILOEN, 8DZCSR
sSTART SCANNER € SET SILO ENABLE
.6
228

OECSfl

s YES
s TRY NEXT LINE

tREC DONE = 1 ?

. &

20
:z

;REC DONE SMOWLD NOT = 1}
1SET CHARACTER COUNT

OTROY ,8DZCSR

3
TOO(RO),8DZTOR

;1sTROY FAILED T0 SET
;LOAD A CHARACTER

RS.01S.
8t

116 CHARACTERS ?

TOO(RO)

1SET UP NEXT CHARACTER

¢SILOAL,80ZCSR

:SILO ALARM = 0 ?

1oSILO ALARM SHOULD NOT = 1
tUNTIL 16. DATA CHARACTERS

104

3 YES

#SILOAL ,8DZCSR
10¢

000102

s1NO

CLR

R4
9

10¢:

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

sesccscescasscasssss

Re
6s

4487
4488
4489

4490
4491
4492
4493

MOV

001372

100000

SEQ 90

PAGE 90

CZOZA DZ11 OEVICE DIAGNOSTICS.

161224

000001
010040
001364

16:22

4438
4439
4440

19-JUN-84 15:45

19-JUN-84

gfi 235338

CZDZA-HO
CZ0ZIA. P11

MACY11 30A(1052)

#66. .R3
St
R4

16SILO ALARM FAILED TO SET!
1SILO ALARM SHOWLD =1 AFTER 16.
1DATA CHARACTERS
1INC CHAR COUNT
n:'nINISOED SENDING CHARACTERS ?
'

N7
CZOZA -0
. P11
CZ0Zm
4494
4495
4496

4497
4498

4499

4500
4501
4502
4503

MACY11 30A(1052)

19-JUN-84 15:45

SEQ 91

16:22 PAGE 91
19-JUN-84
CZDZA DZ11 OEVICE DIAGNOSTICS.
DELAY

021040
021042
021044

104414
105204
001375

021046

013705

001372

021052
021056

001406

105737

001371

R4
INCB
.-4
BNE
1NOW LETS READ THE SILO
MOV
SAVLIN,RS
1MAKE EXPECTED LINE o
'

1578

8EQ

MODE -1

-$STAG-sessssssssssasssssssscsascnsnnssasnss

+1IS THIS TEST IN STAGGERED MOOE?
1IF NOT, SKIP STAGGERED SETUP

;oE MUST NOW INVERT THE LAST BIT OF THE LINE NUMBER
021060
021062
021064

021072

000261
000401
000241
006105

021074
021076
o21102
021106
021110
021112
021114
021122
021124
021126

000305
052705
017704
020405
001401
104006
032777
001401
104016
003203

021140
021144
021150
0211352
0211356
021160
021162
021164
021170
021172
021176
021200

101762
005205
052705
120527
001754
017704
005704
100001
104017
040277
104401
0035237
106302
103402
000137
104400

021066
021070

021130
021134
021136

021202
021206

ASR

006205
103402

120527

8Cs

114

SEC

124

ROL

148

SWAB
8IS
MOV
cP
8EQ

RS
SOVALID,RS
F
R4
SDZROU
R4,RS
15¢

154

8IT

#SILOAL ,8DZCSR

s ACTUAL
sACTUAL VS. EXPECTED
1 YES
1 sDATA/CONTENTS OID NOT COMPARE
13‘1.%‘0 ALARM= O ?

;READING OZRBUF DID NOT CLEAR SILO ALARM

SOVRRUN
RS

sADD 1 MORE FOR THE CLOBBERED CHAR
1ADD OVERRUN TO EXPECTED

1FOR GOOD MEASURE
sovg;A VALID SHOWLD = O

12¢:
;:

13¢:

160720

16¢:

000077

+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)

B8R

11¢:

100000
160740

1GET THE LAST BIT INTO THE CARRY BIT

cLC

END

O MACRQ

ERROR

8EQ

ERROR

000101

160670

17¢:

001372

224:

020670

164

RS
RS, 063.
144
RS

cP8
8EQ
MOV

RS, 065.
144
SDZRBUF ,R4

8PL

17¢

TS7

160666

INC
CrPe
8L0S
INC
8IS

ERROR

8IC

R2,80ZTCR

INC
ASLB
8Cs
JP

SAVLIN
R2
. *6
34

SCOP1

ADVANCE

1GET THE NEW BIT BACK INTO RS

ssssccsssnnssessass

;PUT IN UPPER BYTF
sm DATA VALID

1UP CHPRACTER
tLAST SILO CHAR ?7....64TH CHAR

:LAST CHARACTER ?

tOATR VALID SHOWWLD = O
tCLR TCR BIT
1LOOP?
1 INC EXPECTED LINE
tNEXT LINE

s YES

1GO TO NEXT TEST

1 TIGHT SCOPE LOOP FOR THIS TEST. SENDS 20. CHARACTERS
sON DZ LINE PREVIOUSLY SELECTED CONTINUOUSLY WHILE SW09=1.
;USED TO SCOPE SILO ALARM PULSES, ETC.
021210
021216
021224
021232
021236
021244

052777
012777
012737
050277
052717
106427

010040
021274
000024

160620

160624
160652

001216

160576

18¢:

8IS
MOV
MOV
8IS
8IS

MTPS

OMSENAB
! SILOEN,BDZCSR
;SETUP DEVICE
1SETUP TRANSMITTER VECTOR
9204 ,80Z71IV
1 TEMPORARY COUNT OF CHARACTER BURST
€20.,4THPO
1ENABLE LINE
R2,80Z7CR
1ENABLE INTERRUPTS
#TIE,S802ZCSR

1LOWER PRIORITY

B8
CZOZA-w0
CZ0ZAM. P11

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

4550
4551
4552

021250
021252
021256

000001
003337
001374

*S54

021266

104401

19¢:

001216

WAIT
0€EC
ONE

4SS3 021260 042777 050040 160554

4SS5S
4556
4557
4558

021270
021274
021302

000137
112777
000002

021164
000252

160564

20¢:

021304

0000C4

000032

001122

021314
021322

012737
012737

021666
02.410

001360
001362

457S

021330

104417

4577

021332

013701

4573

4576

4378
4379

021336
021342

4580
4581
4382
4583
4384
4385

021346
021350
021354
O02135¢
021360
021362

4387

021366
021372

4586

4508

4589
45%0
4391
4392
4593
4594
4595
4596

4597
43598
4599
4600
4601
4602

4603
4604
4605

tl%g MORE CHARACTERS TO COrME
1

-000080000000000000CRRRERRERSS

021374
021400
021402
021404
021410
021416
021424

021432
021436
021440
021444
0214%0
021452

021456
021462
021464

012702
030237

001402
010177
005201
106302
103370
003037

012700
003020

000001
001364

001422

030237
001002
000137
003777
100773
106427

001364

021630

000340
010140

021646

160376

000000
001372

160366

160454

160450
160410

SCOPE

"oV

032, 6TSTNM

1ILOAD THE MUMBER OF THMIS TEST

MOV
MOV

OTSTSS, NEXT
034,100

1POINT TO THE START OF TME NEXT TEST
1SET FOR '_OOP

-- END O MACRO =vwcscsccsccccascass

001372

000001

1¢:

160476

001462

1S7T32:

001366

022700
001374
005000
012702
012777
012777
05c777

013700
006300
010277

-$X]-sccsncscscaccsnscsncacsnssnes

TEST 32

$ 1000800060060 060008008000800000000000000000000000000000000000000

012737

4574

v m RETURN TO WERE YOU LEFT OFF
|m A CHARACTER

s:e

021306

4571
4572

174
0252,.80ZT0R

.Qlé, IRESET SILO COUNTER, CLEAR STROBE

00P AGAIN?

10THIS TEST THAT ~SILO ENABLE" WILL INMIBIT
1sRECEIVER INTERRW’TS AND THAT ON THE
1616TH CHAR THAT ~SILO ALAAM" WILL CAUSE AN
1o INTERRUPT WITH "RIE~ SET.
soTHIS WILL DO ALL SELECTED LINES ONE AT A TIME.

4566

4570

JSP
MOVe

tALLOW INTERRUPTS
¢REDUCE COUNT., ALL CHARACTERS SENT?
IF MO, WAIT FOR MORE

1000008000000006000800000 TEST 32 000000000000800000000000000000¢

4565

4569

”nm!mlf

RTI

4560
4561
4562
4563
4564

4568

sTHPO
19¢

eIC

sCor1

@359

4567

SEQ 92

19-UAUN-84 16:22 PAGE 92
CZOZA D211 DEVICE OIAGNOSTICS.

DCLASH

END O MACR)

MoV

"oV
eIv

[ 1]
MoV
INC
ASLS
ecC
QR

s SLINE\P -o0cccnsaresccssconnnancscssnnccee

-MRESEY-vcasscsnsanssnsacsssscsncnes

1CLEAR DEVICE AND SET MAINT BIT IF I MODE

eessescesccnssocsse

PAR,R1

1PICK P PARMETERS

24
R1.802LPR
R1
R2
14
SAVLIN

ng UP LINE PARNETERS
1POSITION POINTER TO THE NEXT LINE
1GOT ‘EM ALL ?
s IF MO, GO SET UP THE NEXT LINE
1CLEAR LINE ¢ INDICATOR

01 ,R2
R2.LINE

PICY @& TINIT POINTER
lm TMIS LINE BE SET WP ?

-- END O MACRO ceossccssscsccassasns

3¢:

MoV
QR

o
ONE
CLR
MoV
MOV
MOV
) ¢3

)4
BNE
JP
187
M1
MTPS

MOV
ASL
MOV

0700,R0
(RO).

sPOINT TO THE DATA AREA
1CLEAR A DATA WORO

R2,LINE
. +6
224
SOZROF
. -4
€0

sVALID LINE?
1 YES
1 TRY NEXT LINE
1EMPTY THE SILO
1BR IF DATA VALID IS SET!
1SET PROCESSOR PRIORITY TO O

oST0P RO
sFINISHED ?
.6
1ND
RO
1CLEAR OFFSET
o1 ,R2
ILINE POINTER
011¢ ,8DZR1IV
1SET FOR UNEXPECTED INTER.
OPR7 ,80ZRIS
1SET PRIO.
OMSENAB ! STLOEN!RIE , SDZCSR
1START SCANNER € SET SILO ENABLE

SAVLIN,RO
RO
R2.8DZTCR

IMAKE OFFSET
1MAKE POMER OF TwWO
1SET TCR 8I7

C8
CZDZA-HO
CZDZAn. P11
021470
o21472
021300
021302
021504
021306
021310
021312
021320
021324
o133
021534
021342
021544

3313343

021346
021330
021336
021364
0213566
021374
021376
021604
021606
021610
021612
021614
021616

4649

021620
021622
021624
021626
021630
021632
021634
021636
021640
021644
021646
021632
021654
021656
021662

MACY11l SOA(1032)

19-AMN-84 15:43
005004
032777
001004

100000

160342

Se:

6s:

001406
0os711?
001401

INC

001422
001422
000017

160346

012777

032777
001774
016077
005004
032777
001003
104414
005204
001371
104014
000410

000240
000240
104000
000404
022626
104012
000401
022626
040277
104401
003237
106302
103402
000137
005037

160314
160256

001422

160272
160236

8s:

(1}
3
TOO(RO
), 8DZTOR

OSILOAL ,802CSR

agégo ALARM = 0 ?

ERROR

10SILO ALARM SHMOMLD NOT -« 1

. -]

. o4

MoV
8Iv
8EQ
oV
CLR

0124 ,80ZR1IV
OTROY ,8DZCSR
.8
TOO(RO
), 8DZTOR
fe

ONE

10¢

817

ERROR
R

R4
94

14
17¢

NOP

NOP
ERROR

118:

B8R
oe

12¢:

B8R
ow
8IC

17¢
(SP)e ,(SP).
R2,8D2TCR

INC
ASLB
[ o
JP

SAVLIN
R2
.6
3¢
LOCX

17¢:

001372

224 :

ERROR

SCoP1

CLR

tUNTIL 16. DATA CHARACTERS

1SET NEW VECTOR
sREADY FOR 16T CHAR
tLOAD THE 16TH OHAR.

OSILOAL ,8D2CSR

176
(SP)e ,(SP).

160212

soTROY FAILED TO SET

015.,TOO(RO)

TOO(RO)

INC
NE

021410
001362

OTRDY ,802ZCSA
14]

GEQ

OELAY

104 :

1LOAD A CHARACTER
1SET UP NEXT CHARACTER
115 CHARS YET?

INC
817

160300

021636
100000

e
ERROR
nove

001422

104013

000730

cLe

tn
ONE

OELAY

104414

005204
001371
104003
116077
0035260
022760

SEQ 93

16:22 ¢AGE 93
19-JUN-84
CZOZA 0211 OEVICE OIAGNOSTICS.

1oSILO ALARM FAILED TO SET®
sSILO ALARM SMOWLD =1 AFTER 6.
10ATA OHWARACTERS
$STALL

1SILO ALARM MOT INTERRUPTING.
sCONTINUE TEST.
tFAKE RTI

sRX SMOULD NOT INTERRUPT
s CONTY INUE
sGOOD INTERRUPT TO MERE.
sCLR TCR BIT
1LOOP?
1INC EXPECTED LINE
INEXT LINE
1NO
s YES

;CLEAR TIGHT LOOP FOR MNEXT TEST

D8
CZOZA -0
CZ0ZAM P11
4650
4651
4652
4553
4654
4655
4656
4657
4658
4659

MACY11l 30A(1052)

19-JN-84 15:45

1000000¢00000000000008000

[]

1:¢

021676

012737

022474

001360

4664

021704

104417

4666

021706
021714
021720
021724
021730
021732
021736

013737
013701
012700
030037

4668
4669

4670
46171
4672
4673
4674
4673
4676
4677
4678

(7%,)
4680
4681
4682

TEST 33

TST3S:

001122

4667

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

110000080800080000080000000000000080000000008000000000000000000000

000033

4665

TEST 33 00000000000000000000000000s0¢00¢

..THIS IS AN INTERRUPT TEST ON THE RECEIVER AND

000004
012737

4663

~0X2-escnnssccncsesnsnsssssssscsse

10THIS TEST RUNS ALL LINES FULL BORE
tOASEO UPON QUALIFIED LINES

021666
021670

4660
4661
4662

SEQ 94

16:22 PAGE 94
CZOZA DZ11 OEVICE DIAGNOSTICS.

19-JUN-84

000001
001364

022214

4684

~ 85
4686
4687
003037
013727
000000
003337
001373

022102
022104
022106
022110
022114

022472

MOV

0TSTS4 NEXT

POINT TO THE START OF THE NEXT TEST

END

MACRQ

OCLASM
O

ssescsccscscsssnsse

MACRQO

MOV

LINE ,RXTCR
RO, LINE

INITY:
160104
160100
160074
160070
160024
160016
160010
160016

BIT

INC
ASLB
8cC
MOV
ONE
MOV
MOV
MoV
MOV

INITY
ORXSVC,ADZRIV
OPR7,
IS
oTXSVC, 80271V
oPR7,.80271S

QR
o

8IS
8IS
8IS

nOv8

MTPS

SNAP ;

CLR

684 :

664 :

(RO)»
oST0P RO

ORIE,SDZCSR
OTIE,8DZCSR
OMSENAS
, BDZCSR

LINE,802TCR
ONLESS)

0EC
BNE

684
.-4

BNE
AP
INC
BNE

34
out
664
674

1ST8

3s:

1,R0

14
R1,802LPR
R1
RO
INIT
6700, RO

8EQ
MOV

ERROR
ERROR
P

~-SMRESET-o0nccscsossnscesosvnsconssans

tCLEAR DEVICE AMD SET MAINT B8IT IF I MODE

INIT:

MOV

esscasscasscassssss

PAR,R)

105737

000000

1LOAD THE MUMBER OF THIS TEST

RSTART: MOV

001002

000137
003237
001362
104007
104011
000137

033, 4TSTNM

END

1s:

001462

4683

022070
022072
022076

001364
001366

001422

021760
021766
021774

4690

160114

021740
021742
021744
021750
021732
021736

{

SCOPE

MOV

RXTCR

7
1)
FINI

1 TRANS INTR SVC ROUTINE

1SET IMAGE OF TCR BITS
iPICK UP PARAMETER
1 sPICK (P INXT POINTER
1SHOWLD THIS LINE BE SET WP
INO
1SET UP LINE PARAM REGISTER
0%7 ‘EM ALL ?
!

sCLEAR TRANS DATA POINTER & REC POINTERS
sFINISHED ?

1SET UP REC INTR VECTOR

1STATUS
sSET UP TRANS INTR VECTOR

1STATUS

$SET REC INTR ENABLE

1SET TRANS INTR ENABLE

1SET MASTER SCAN ENABLE
sSET TCR BITS...UP UP AND AWAY !
sALLOW INTERRUPTS

1SET FOR DELAY

sWAIT FOR ALL RECIEVERS TO FINISH
]

18TRANSMITTER FAILED TO INTERRUPT

1sRECEIVER FAILED TO INTERRUPT

ES8
CZOZA -H0
. P11
CZ0ZAM
4706

4707

4708
4709
4710
ani
4712
ans
4714

ans

4716

a”n7
4718
4719
4720
4721
4722
4723
4724
4125
4726
4727

4728
4729
4730
a713)
4732
4733
4734
4735
4736
4737
4738
4739
4740
4741
4742
4743
4744
4745
4746
4747
4748
4749

4750
4751
4752
4753
ATS4
47SS
4756
4757
4758
4759
4760
2761

MACY11 30A(10352)
19-JUN-84 15:45
005777

117703

157712

022132
022136

042703
0103504
010337
012702

177770

022140
022144
22130
022132
022134
022136
022160
022164
022166
022170
022172

022200
022204
022206
022212

100401
104003

105303
100402
006302
000774
030237
001001
104010
006304
116477
105264
001002
040277
000002

017704
010403
000303
042703
010337
032777
001401

157616
177770
001372
020000

001001
104011
013703

006303

001405
016305
042704

8DZCSR

xyY
3

RS.R4
R3,SAVLIN
o1 ,Re
RS

ASL

8IT

R2,LINE

ERROR

B8R

BNE

ASL
MOVe

157666

INCB
BNE
Ss:

RS
0tC<?>

MOV
MOV
MOV
DEC8

8IC

RTI

. o8

Ra
TOO(R4
) ,802TOR
TOO(R4)
Ss
R2,8DZ7TCR

tREC INTR SVC ROUTINE

RXSVC:

1578

[)¢

SDZCSR
o4

R4
SDZROLF

R4 .R3
R3
#tC<7> RS
RS, SAVLIN

OS?.OAL.IJZCSR

157570

. o8

01 .R2

Ss:

R2,.LINE

64:

SAVLIN,R3

001372
001442

177400

1SAVE 17

1STRIP JAUNK

1 SAVE

1ADJAJST LOCATION FOR ERROR PRINTOUT
1SET UP POSITION POINTER
lggSIT THIS LINE ?

1 YES

sNO, INVALID LINE!!!?
1MAKE POMER OF 2
1LOAD CHARACTER
1SET UP NEXT CHARACTER
sLAST CHARACTER ?
;1YES ,CLEAR TCR BIT

1REC DONE ?
s YES
1FALSE INTERRUPT

$1SAVE 17

1STRIP JUNK

1SAVE LINE NUMBER

l'SOILO ALARM?

1SILO ALARM SHOULD NOT =}
tOATA VALIO SET?
1 YES
...DATA VALID WAS'NT SET
sYOU LOSE

23
, R4
! PARERN
RRU
! FRMERR
SOV

070000

001442

1sTRANSMITTER FAILED

001364

1 TRANS INTR ?

[]

012702
105303
006302
000774
030237

3s:

157644

157622

005704
100401
104023
032704
001401

8IC

001364

001422
001422

TSY

ol
ERROR

MOVe
SHDZCSR,R3
tNOM TEST FOR LINE @ ETC

001372
000001

105777
100401

TXSVC:

157720

022116
022122
022124
022126

SEQ 95

19-JUN-84
16:22 PAGE 95
CZOZA D211 OEVICE DIAGNOSTICS.

8IC

RS
R4
TRO(R3)
‘
TRO(RS),RS
0tCc<377> R4

tRECEIVER ERROR FLAG/S WERE SFT
1SET UP POSITION POINTER

tRE POSITION POINTER
1GO 'ROUND AGAIN
sLINE VALID ?
; YES

1INVALIO LINE ¢
tGET THE LINE NUMBER AGAIN

tUSE R3 AS A POINTER IN THE DATA TABLE
.oggs THE DATA CHARACTER COMPARE ?
1Y

1 SAVE EXPECTED
1CLEAR JUNK

F8
CZDZA -0
CZ0ZAM. P11

4762
4763
4764
476S 022344
4766 022346
4767
4768
4769
4770
4771

4772
4773

4774

477TS
4776

4777
4778
4779
4780
4781
4782
4783
4784
4785
4786

022352
022356
022360
022364

022370

022372
022376

104005
005263
105763
001002
040237
012716

001442

106427
104413

000340

000002

001372
000001
001364

022420

022763

000400

005237

001372

013777
005077
013777
005077

002074
157416
002100
157410

022426
022430

022432

022436
022440
022442

4791
4792
479
4794

022444
022452
022456
022464

022444

001405
001401
104027

005723
106302
103363

4795 022470 104400

479

022472
022044

005003
005037
012702
030237

022416

022472

000000

ERROR
INC
1578
BNE
8IC
MOV

2s:

001442

022400
022402
022406
022412

4787
4788
4789

4790

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

SEQ %6

19-JUN-84 16:22 PAGE 96
CZOZA 0Z13) DEVICE DIAGNOSTICS.

RTI

tFINISH UP ROUTINE

HPR7
nTPS
DEVICE.CLR

18:

CLR
CLR
MOV
817
. X°]
ow
8EQ
ERROR

R3
SAVLIN
1 ,R2
R2.LINE
24
400, TRO(RS)
.ol
27

sSTOP ALL INTERRUPTS
tCLEAR ALL INTERRUPTS AWAY

24:

INC

SAVLIN

sVALIO LINE ?
1NO
tRECEIVED A BINARY COUNT PATTERN ?
1 YES
s THE LINE FAILED TO RECEIVE A FULL
1BINARY COUNT PATTERN
1SET UP FOR NEXT LINE

ouT:

001442

157420

tR2 » LINE @ BY BIT POSITION
1R& =« ACTUAL DATA
tRS o EXPECTED DATA
1oNO, DATA DOES NOT COMPARE
S
1SET UP FOR NEXT CHARACTER
TRO(RS)
TRO(RS) ;ALL CHARS DONE?
. 6
+ZERO LINE OONE INDICATOR.
R2 .RXTCR
tRESET THE BACKGROUND TIMING LOOP
OSNAP , (SP)

FINI:

157412

RXTCR:

TST
ASLB
8CC

(R3).
R2
1¢

MOV
CLR
MOV
CLR

OZR1S,8DZRIV
SOZRIS
DZT1S,802T1IV
80271S

AOVANCE

1ADD 2
1SET UP NEXT LINE POINTER
+F INISHED ?

tRESTORE TRAPCATCHER

1GO TO THE NEXT TEST

sRX IMAGE OF TCR BITS

4798

{

4799

-$X]-eesccasassssassssssancsssnnse

4800
4801
4802
4803
4804

1600006660000606080000660¢ TEST 34 0000000880080808000000000800000
1eDZ11 RELATIVE TIMING TEST.
s oEACH SELECTED LINE WILL IN TURN RUN 16. CHARS
1oAT ALL BAUD RATES AND THEN THE MIGHEST BAUD
solITH ALL OMAR LENGTHS. EACH NEW PARAMETER SHOWLD

4806
4807

joTHE TIME IS CHECKXED AGAINST THE LAST PARAMETER USED
s AND A LOMER TIME IS EXPECTED ON THE CURRENT PARAMETER.

s sDECREASE IN TIME FROM THE PREVIOUS PARAMETERS SELECTED.

4805
4808

1 SPARAMETERS ARE;

1o EIGHT BITS/PER/CHAR - TWO STOP BITS AT

4809

SO0, 7S, 110, 134.5, 150, 300, 600, 1200, 1800, 2000
2400, 3600, 4800, 7200, 9600 BAUD.

4810
4811

1o
e

4813
4814
4815

SEVEN, SIX, FIVE BITS/PER/CHAR.
e
;oAFTER EACH LINE HAS FINISHED ALL THE ABOVE PARAMETERS
toTHE MEXT SELECTED LINE IS THE TESTED.

1o THEN, 9600 BAUD - TWO STOP BITS AT

4812

4816
4817

1:e

TEST 34

' -$X7l-oscsscnscsnsascsnsccnssnsvsns

G8
MACY11 30A(1032)

CZDZA -0

CZOZANM. P11
4818
4819

4820
4821
4822

4823

4824
4825
4826

4827

19-JUN-84 15:435

19-JUN-84

16:22

CZDZA D211 OEVICE DIAGNOSTICS.
1100000800000 0600060000008000000000000000000040484600000000460000000000

022474
022476

000004
012737

0223504
022312
0223520
022326
022332
022536
022542
022530
022336
022564
022566
022574

012737
012737
012737
005037
0035037
005037
012737
012737
033737
001027
012737
012700
003020
022700
001374
005237
042737
053737

022600
022602
022606
022410
022614
022622

022630
022634

TST34:
001122

001226
001360
001362

001372
001374
010070
001216
010070
001422

001216

001364

14:

023202

24:

001374
001374
025214

02,0 TIMES
3S
, NEXT
OTST
034 ,L0CK
OFFSET

817

+IS THIS LINE ACTIVE?
1 IF SO, GO GET STARTED
WSSO!EIW!;BQSYOo 76 ;LOAD PARAMETERS TEMPORARILY
INT TO THE DATA AREA
0700,
(RO).
sCLEAR A DATA WORD
0STOP,RO
1FINISHED ?
o°6
1NO
XMTLIN
1POINT TO THE NEXT LINE TO TRANSMIY
0,7
1MAKE SURE TEMPORARY PARAMETERS POINT 70 O
,
KMTLIN74
tADD DESIRED LINE NUMBER
OFFSET
sTHPO
1POINT TO THE NEXT LINE
14
1PROCESS THE NEXT LINE

MOV
MOV

ONE
MOV

MoV

8IC
8IS
LR

ASLS

001370

MoV
MOV
MoV
CLR
CLR
CLR

”

023202
023202

023202
157170

8CC
ADVANCE

END

OCLASHM

U H

001372
001372

023202
023202

001400

névomssozexwmosro 7¢ ;BUILD TEMPORARY PARAMETERS
m.LM

s TEST TO SEE IF THIS TEST GETS REPEATED
-VMRESET-cscsessnssnasssassesssnscanss

tCLEAR DEVICE AND SET MAINT BIT IF I MOODE

sssscesssesssasnsss

74
ORCVON,

TS7

MODE

1ZERO PARAMTERS FOR TX LINE
sLOAD PARAMTERS FOR TX
1 STAGGERED?

ROR
8CC

74
984

1R IF LINE JAS EVEN

99¢

ROL
BIS
MOV
MOV
8IC
8I1C

74
ORCVON,
7¢,.80ZLPR
74,SAVLIN
0tC<7>,SAVLIN

cLC

023202
137124

tPOINT TO THE START OF THE MNEXT TEST
1SET FOR LOOP
(RESET THIS VARIABLE
¢RESET LINE NUMBER INDICATOR
tUSE THIS WORD TO TELL WHAT LINE TRANSMITTED
sUSE $THPO AS A BIT POINTER

81C

aLC

984 :

SAVLIN
mm

0 MACRO

8PL

994 :
100¢:

eccccensesccsacsnane

MoV

023202

1LOAD THE NAUMBER OF THIS TEST

034,0TSTNM

END O MACRO

INC

001216

010000

SCOPE

MoV

CLR
oe

001462

3s:

SRR L

SEQ 97

PAGE 97

SEC

8IS

MOV
MOV
CLR

cre
BNE
CLR
CLR
CLR
CLR

7¢ ,802LPR
100¢

07,78

,
XMTLIN74

74 ,REGIST
€700,R0
(RO).
#STOP ,RO
. -6
R2
R3
sTHPY
$THP3

I1PREPARE TO MKE LINE EVEN
1 CONT INUE
1PREPARE T0 MAKE LINE 000
1SET ALTERED LINE
1SET AX ON
1LOAD RX PARAMETERS

1ADJNUST LUCATION FOR ERROR PRINTOUT
1STRIP JUNK
1CLEAR OLD LINE ¢
1SET LINE UP AGAIN

1SAVE PARAMETERS FOR PRINTOUT
1POINT TO THE DATA AREA
1CLEAR A DATA WORD
1FINISHED ?
1NO

lUSE R2 TO COUNT TOTAL NUMBER OF TRANSMISSIONS
tUSE RS TO COUNT TOTAL NUMBER OF RECEPTIONS
+INITIALIZE THE TIMER
1 INITIALIZE THESE BITS ALSO

H&
CZ0ZA-H0
CZ0IMAM . P11
4874

MACY11 S0AC1052)
19-JUN-84 15:45

023014

012737

000020

001376

4877
4878

023036
023044

013777
013777

030306
030306

157030
157026

4880

023060

052777

040140

136754

4875
4876

4879
4881
4882
4883

4884
4885
4886
4887

4888

4889
4890
4891
4892
4893
4894
4895
4896

4897
4898
4899
4900
4901
4902

4903
4904

023022
023030

023052

023066
023072
023100
023102

012777
012777

02463C
025002

113777

001216

106427
032777
001407

000000
000100

023106
023110
023114

005237
001371
105237
001366

001220

023120
023124
023126
023134

004737
104401
062737
013700

007652

023160
023162
023170

001602
162737
000625

023202

000000

023116

023140
023144
023150
023152

023172
023200

104011

042700
022700
001010
032737

062737
000621

SEQ 98

19-JUN-84 16:22 PAGE 98
CZDZA DZ11 DEVICE OIAGNOSTICS.
MOV

020, XMTCNT

1SET HMOW MANY CHARACTERS TO TRANSMIT

MOV

CZPRT,B8DZRIS
OZPRT ,8DZT1IS
$THPO,8D02TCR

1START THE VALID LINE

MTPS
8ITv
8eEQ

0
ORIE,BDZCSR
S¢

137046
137034

MOV
MOV

136776
156742

MOV
MOV

8IS

44:

INC
BNE
INCS
BNE

001224

ERROR

S¢:

000002
023202

025214

000030

023202

000010

023202

000400

023202

JSR
SCOP1
ADD
MOV

170377
007000

8IC
oy
BNE

78:

OTIE!RIE !MSENAB,B80ZCSR

TP
44
sTHPS
44
11

PC.SERV.G
02 OFFSET
74 ,RO

817

0tC<17¢400>,R0
9<16¢400> ,RO
64
08IT4.BITS. 78

ADO
B8R

€400,74
3s

8EQ
SuB
B8R

6¢:

OXMTSRV, 80271V
ORXISR1,8DZRIV

tLOMER THE PRIORITY TO ALLOMW INTERRUPTS
1IS ROUTINE OONE?
tWHEN ALL IS DONE RX IE IS CLEARED IN ISR.
1COUNT TIME
tCONTINUE TEST
1DOUBLE COUNT
sCONTINUE TEST

s INTERRUPTS NOT FINISHED

1<t6>?
sLOOP?

24
BITS,
74
3

;1
3

-PARTST -essssscscsccssssnsssssasssassass
~$Xl-ossssencessssnsssussnssssnsss

4905

100666006080806805080088¢ TEST 35 00040000880000400040820000808000

4907

1¢ FOR ALL 0DD LINES SELECTED AND THAT ODD PARITY WORKS FOR ALL

4906

1¢ THIS TEST VERIFIES THAT EVEN PARITY WORKS

4908
4909

1o EVEN LINES SELECTED.
1oTHE MAIN FUNCTION OF THIS TEST IS TO VERIFY

4915

1oAT THE SAME TIME!

4910
4911
4912
4913
4914

1oTHAT “PE~ (PARITY ERROR) CAN BE FLAGGED BY
1oTHE UARTS. THIS TEST WILL NOT BE DONE UMLESS
1sYOU ARE IN “STAGGERED” MODE.
1840(8) CHARS ARE USED FOR THIS TEST.
1oALL SELECTED LINES WILL BE ENABLED

4916

4917

s:eo

4918

4919

4920
4921

492%

023206

000004

012737

000035

023222
023226

005737
100112

001122

4928
4929

023232
023236

013701
042701

TST3S:
§

001370

4926 023230 104417
4927

-0XZ-esessssscsussssscansanssanass

$110068605880880880808008480408048800000820000048042840080000080400400

023204

4922 023214 012737 02345 001360
4923
4924

TEST 35

001366
000200

SCOPE

MOV

END O MACRO

MOV
TST
BPL

OCLASM

1LOAD THE NUMBER OF THIS TESTY

#TST36,NEXT

iPOINT TO THE START OF THE NEXT TEST

sessssesssassssases

MODE
64

END O MACRO

MOV
8IC

035,8TSTNM

115 THIS STAGGERED MODE?
4IF NOT, DON'T DO THIS TEST
'

mset-..-..---.--.....-------.--.-

{CLEAR DEVICE AND SET MAINT BIT IF I MODE

esescssancascsscsss

PAR,R1
#0DDPAR ,R1

JUSE R1 TO BUILD PARAMETERS TO BE LOADED
tMAKE SURE 00D PARITY ISN'T SET

18
CZDZA-HO

CZDZA. P11
4930
4931
4932
4933
4934
4935
4936
4937
4938
4939
4940
4941
4942
4943
4944
4945
4946

4947

4948
4949
4950
4951
4952
4953
4954
4953
4956
4957

4958
4959
4960
4961
4962
4963
4964
4965
4966
4967
4968
4969
4970
4971
4972
4973
4974
4975
4976
4977

MACY11 30A(1052)
19-JUN-84 15:45
052701
012702
030237
001411

032701
001002
032701
010177
042701
005201
106302
103361
003037
005002
005037
005037
0035003
012737
012700
005020
022700
001374
005000
012777
012777
013777
013777
032777

113777
106427
032777

001410
104414
005237

102770
105237
100365

104011

104400

000100
000001
001364

24:

8IS
MOV
8IT
BEQ
8IT
BNE
8IS
MOV

OPARITY R1
o1,Re
R2,.LINE
34
#8IT0,R1
24
#000PAR ,R1
R1,80ZLPR

{MAKE SURE PARITY IS TURNED ON
tUSE R2 AS A LINE POINTER
+11IS THIS A VALID LINE?
1 IF NOT, SKIP TO THE NEXT LINE
11S THIS LINE AN 000 LINE?
+IF IT'S 0DO, USE EVEN PARITY
+IF IT'S EVEN, USE 000 PARITY
1LOAD THE LINE PARAMETER REGISTER

3s:

INC

+POINT TO THE NEXT LINE

1¢:

024632
04634

#0DDPAR ,R1

ASLB

CLR

001376

001462

024636

8IC

8cC
CLR
CLR
CLR

001372

001422

SEQ 99

16:22 PAGE 99
19-UUN-84
CZDZA 0211 DEVICE OIAGNOSTICS.

156514
156502

030306
030306
040140

156476
156474

001364

156436

000100

156410

156430

024632

COUNT)

64:
s

+IF ME'RE NOT OONE, GO CHECK THE NEXT LINE
tCLEAR THE LINE NMUPBER INDICATOR
tUSE R2 TO COUNT TOTAL NUMBER OF TRANSMISSIONS
1 112-10-84 ECB REV 1

t 112-10-34 ECB REV I

tUSE RS TO COUNT TOT.
“UMBER OF RECEPTIONS
s TRANSMIT A BINARY COUNT PATTERN(00-40)
1POINT TO THE DATA AREA
tCLEAR A DATA WORD
1FINISHED ?
+NO
1CLEAR OFFSET

MOV
MOV

OXMTSRY,8DZTIV
OPARESE .BDZRIV

;SET UP THE TRANSMITTER INTERRUPT VECTOR
;SET UP THE RECEIVER INTFRRUPT VECTOR

8IS

DZPRT,8DZRIS
OZPRT,B0ZT1S

MTPS

8IY

8eEQ
DELAY
INC

~S$INTSEV-snscccccssssevsnnscssssenases

1SET THE INTERRUPT VECTOR STATUS
1SET TRANSMITTER INTERRUPT PRIORITY

sssasscescccesassass

LINE,SDZTCR

tENABLE ALL SELECTED LINES

#RIE,BDZCSR

tWHEN RX DONE; RIE WILL =0

€0

COUNTO

MACRQ

tALLOM INTERRUPTS

18R IF ALL DONE
t 33 2-10-84 ECB REV I

S¢

INCB
COUNT1
S4
8PL
ERROR
11
ADVANCE

END

ORIE! TIE!MSENAB,B02ZCSR ;ENABLE THE DEVICE

END O MACRQ

8vs

024634

tMOVE THE BIT POINTER IN R2 TO THE NEXT LINE

R3
€40, XMTONT
#T00,RO
(RO)»
#STOP RO
.-6
RO

MOV8

S¢:

14
SAVLIN
R2
COUNTO

CLR
MOV
oV
CLR
a4
BNE
CLR

MoV
MOV
1

1SET UP THE NEXT PARITY TO EVEN

1oRX FAILED TO FINISH (INTERRUPT)
1 ADVANCE LOOP

sssassasssssassesese

-:;szSY-...........-.-----.-.---...--.--

-CovSENSEescEcsNaAsEERssERRERSE

100066666008466006480848600¢ TEST 36 000000008000080888000000000000

1¢THIS TEST VERIFIES THAT ODD PARITY WORKS FOR ALL ODD LINES
1o 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

joTHE UARTS. THIS TEST WILL NOT BE OONE UNLESS
1sYOU ARE IN “STAGGERED” MOOE.

1040(8) CHARS ARE USED FOR THIS TEST,
soALL SELECTED LINES WILL BE ENABLED
1oAT THE SAME TIME!

TEST 36

-$X]-oscesensnssscssssssssssescass

CZDZACZ0ZAH.P11
4986

4987

4988

4989

4990

023456

023460

023466

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

012737

4991
4992

023474
023500

005737
100112

4994

023502

104417

4996
4997
4998
459
S000

023504
023510
023514
023320
023524

013701
042701
052701
012702
030237

4993

4995

S0U1
S002
S003
5004
S005
S006
S007
S008
S009
5010
5011
5012
S013
5014
S015
5016
3017
5018

5019
5020
S021
5022
S023

023530
023532
023536
023540
023544
023550
023554
023556
023560
023562

023566
023570
023574
023600
023602
023610
023614
023616
023622
023624

001411
032701
001402
032701
010177
042701
005201
106302
103361
005037

005002
005037
005037
005003
012737
012700
005020
022700

001374
005000

1100088040248004800000000808800800400808000040000400000400400840400000

000036

001122

023730

001360

001370

001366
000200
000100
000001
001364
000200
156302
000200

3¢:

024632
024634
001376

001462

S028
5029
SO050
5031
S032
S033

023664
023672
023676
023704
023706
023710

113777
106427
032777
001410
104414
005237

001364
000000
000100

156164

5035
5036
S037
S038
5039

023716
023722
023724
023726

105237
100365
104011
104400

024634

024632

END O MACRO

MOV

OCLASH

156156

156136

~$MRESET -vsescosescscnsnsnssesssnnses

1CLEAR DEVICE AND SET MAINT BIT IF I MOOE

R2
COUNTO
COUNT1
RS
€40, XMTCNT
#700,RO
(RO).
#ST0P,RO

8IS

sPOINT TO THE START OF THE NEXT TEST

1IS THIS STAGGERED MODE?
sIF NOT, DON'T DO THIS TEST

ssscascassssesassss

CLR
CLR
CLR
CLR
MOV
MOV
CLR
c

MOV
MOV
t

OTST37 ,NEXT

PAR,R1
#0D0PAR .R1
OPARITY,R1
1,Re
R2,LINE

8€EQ
BIT
BEQ
8IS
MOV
8I1C
INC
ASLB
8CC
CLR

tLOAD THE NUMBER OF THIS TEST

=sssssssesssasassee

MOV
8IC
8IS
MOV
8IT

MOV
MOV

136224
136222

036, $TSTNM

MOOE
64

END 0 MACRQO

BNE
CLR

S026

102770

001372

000040
001422

SCOPE

MOV

TST
8PL

2s:

136242
136230

023714

000001

024636
024450
030306
030306
040140

5034

1¢:

012777
012777
013777
013777
052777

$S027

T1ST36:

023626
023634
023642
023650
023656

5024
5025

SEQ 100

19-JUN-84 16:22 PAGE 100
CZOZA 0211 DEVICE DIAGNOSTICS.

tUSE R1 TO BUILD PARAMETERS TO BE LOADED
tMAKE SURE O0DO PARITY ISN'T SET
.mce SURE PARITY IS TURNED ON
tUSE R2 AS A LINE POINTER
+IS THIS A VALID LINE?

34
#8IT0,R1
2¢
#COOPAR ,R1
R1,80ZLPR
S0DDPAR ,R1
R1
R2
14
SAVLIN

1IF NOT, SKIP TO THE NEXT LINE
1IS THIS LINE AN 0DD LINE?
+IF IT'S EVEN, USE EVEN PARITY
+IF IT'S 000, USE ODD PARITY
1LOAD THE LINE PARAMETER REGISTER
1SET UP THE NEXT PARITY TO EVEN
1POINT TO THE NEXT LINE
tMOVE THE BIT POINTER IN R2 TO THE NEXT LINE
1 IF WE'RE NOT OONE, GO CHECK THE NEXT LINE
1CLEAR THE LINE NUMBER INDICATOR

.-6
RO

+NO
tCLEAR OFFSET
' ~$INTSET -sssenscessensnssnssassasnnsnsns
;SET UP THE TRANSMITTER INTERRUPT VECTOR
;SET UP THE RECEIVER INTERRUPT VECTOR

tUSE R2 TO COUNT TOTAL NUMBER OF TRANSMISSIONS
t 112-10-84 ECB REV I
+ 312-10-84 ECB REV I
;USE R3 TO COUNT TOTAL NUMBER OF RECEPTIONS
1 TRANSMIT A BINARY COUNT PATTERN(00-40)
1POINT TO THE DATA AREA
1CLEAR A DATA WORD
1FINISHED ?

OXMTSRY,80ZTIV
OPARESE ,BDZRIV
DZPRT,8DZRIS
1SET THE INTERRUPT VECTOR STATUS
OZPRT,EDZT1S
1SET TRANSMITTER INTERRUPT PRIORITY
ORIE!TIE!MSENAB,B8DZCSR ;ENABLE THE DEVICE

-- END 0 MACRQ sscssscscssssssssssns

S¢:

MOVE
MTPS
8I1v
8EQ
ODELAY
INC
8vs

LINE,SDZTCR
#0
#RIE,BDZCSR
64
COUNTO
5S¢

1ENABLE ALL SELECTED LINES
1ALLOW INTERRUPTS
+WHEN RX DONE; RIE WILL =0
18R IF ALL DONE
i 13 2-10-84 ECB REV I

INCB
COUNT1
8PL
S¢
ERROR
11
joRX FAILED TO FINISH (INTERRUPT)
64:
ADVANCE
1 ADVANCE LOOP
; -- END O MACRQ escsussessssasssssss

K8
P11

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

SEQ 101

19-JUN-84
16:22 PAGE 101
CZOZA DZ11 OEVICE DIAGNOSTICS.
-$XZl-one+ansensssssssscnasnssnssss

19000008080046440800004800¢ TEST 37 srssesrcssseseesesscsssssssens
t1e

1o ECB 21-FEB-84
1o BAUD RATE TIMING TEST,
THIS TEST ADDED IN OROER TO TEST CRYSTAL
1o SPEEDS.
IT LOOXS FOR EITHER A KW1lL OR KXWiiP.
IF EITHER IS AVAIL.
1o THEN THE TEST IS RAN. IF NEITHER AVAILABLE, THEN TEST IS NOT RAN.
t1e

1¢ ADDED NUMBERS IN TTABLE AND NOW TEST ALL LINES AT ALL BAUD RATES
1o INSTEAD OF JUST LINE O AT ALL BAUD RATES.
L

s:e

«§Xl-sensssasssssanscnssssssssssses

TEST 37

1 0 0 0280808 808800080008080000000900040000008000800808008480088008040¢

TST37:

023730
023732

000004
012737

000037

001122

023740

012737

004712

001360

023746
023752
023756
023764
023770
023776

106427

024010
024014

013700
012737
012701
012737
012737
005037
005037
012711

177546
024076
024106
024104
006100

5095

024066
024076
000340
172540
177777

024060

012711

000133

024064

000450

024066
024070
024074

022626
010037
104400

024076
024102

005237
000002

000100
000102

024104
024106
024110

000000
000000
000000

10¢:
000104
000106

204 :

024104

037,4TSTNN

1LOAD THE NUMBER OF THIS TEST

MoV

OSEOP ,NEXT

1POINT TO THE END-OF -PASS HANDLER

MTPS

1OROP PRIOPITY TO O

END O MACRO

000472

022626
01273
012737
012737
012701
012761

SCOPE

MOV

scssessesssssaassass

MOV
MOV
MOV
MOV
MOV
CLR
CLR
MOV

804 ,RO
0104 ,004
0177546,R1
OCLKSRV , 90100
0340,80102
BCOUNT
CCOUNT
#100,(R1)

TCCONTY

(ny
MOV
MOV
MOV
MOV
MOV

(SP)e+,(SP)e
0204 ,004
OCLKSRY, 90104
4340, 80106
0172540,R1
e-1,2(R1)

MOV

#133,(R1)

B8R

TCCONT

(ny
(SP)e+,(SP)e
RO, 904
MOV
ADVANCE

1SAVE CONTENTS OF LOCATION 4.
1SET YO TRAP IF NOT KW1iL
1GET KW1ilL ADORESS.
1SET FOR INTERRUPT,
1PRORITY 7 ON INTERRUPT.
tOUR OWN CLOCK TICK COUNTER
1CHAR SENT COUNTER
1 THIS WILL CAUSE A BOMB 70 OCCUR IF
1 THE KW1lL DOES NOT EXIST

1BUT IF ITS THERE, THEN MWE'RE STARTED.

tSTART TEST

sREADJUST STACK
1SET TO TRAP IF NO KWilP
1SET FOR INTERRUPT,
tPROITY 7 ON INTERRUPT,
t1XW11P ADDRESS.
;1SET THE @ OF COUNTS FOR INTERRUPT (1)
tNOTE, IF XKW11P DOES NOT EXIST, THEN
1.3 UILL 80MB FROM THIS PLACE.
1SET INTERRUPT ENABLE,UP COUNT, REPEATED
s INTERRUPT .LF CLOCX, "O RUN.
ISYMY TEST.

tREADJUST STACK, NO CLOCKS AT ALL!
1RESTORE LOCATION 4
1GET OUT,

CLKSRV: INC

CCOUNT

1CLOUK INTERRUPTS TO MERE, UPDATE COUNT,

CCOUNT:
BCOUNT:
OCOUNT:

O
O
O

1 INCREMENTED BY CLKSRV. #CLOCK TICKS.
tUSED BY TCCONT AS TIMER.
tUSED BY TCCONT AS TIMER.

RTI

WORD
.WORD
.WORD

s THEN EXIT,

L8
CZOZA -H0
CZ0ZA. P11

MACY11l 30A(1052)

19-JUN-84 15:45

19-JUN-84

16:22

SEQ 102

PAGE 102

CZDZA DZ11 CEVICE DIAGNOSTICS.
e

S096
5097
5098
5099
5100
S101
5102
5103
5104
5105

3
3
3
:
3

5106

5107
5108
5109
5110

S111
S112

5116
5117
Si18
5119

7.. 9.
11., 13.
13., 15.
1S5., 17.

1 COUNT
s COUNT
. COUNT
1 COUNT
1 COUNT

MORD
LMORD
LMORD
LMORD
LMORD

29., 32.
S59., 62.
119., 122.
179., 182.
199., 202.

1 COUNT
s COUNT
s COUNT
s COUNT
s COUNT

LMORD

239., 242.

s COUNT
s COUNT
s COUNT
s COUNT
1 COUNT

. WORD
.MORD
.MORD
.MORD

LMORD
LMORD
MORD
LMORD

:
]
3
3

5113
S114
5115

359.,
A79.,
T719.,
959.,

362.
482.
722.
962.

CHARS
CHARS
CHARS
CHARS
CHARS
CHARS

CHARS

FOR 50 BAUD
FOR 73 BAUD
FOR
FOR
FOR

FOR
FOR
FOR
FOR
FOR
FOR
FOR
FOR
FOR
FOR

T
33: BE BEECE

S.,

gEEEE BEEEE EEEEE

:
3
3
i

WORD

$i11 4

(TTABLE:

K[AKKK KKKKK KIKKKK

+ THESE NUMBER WMERE WORKING GREAT ON A POP-11/24 RUNNING AT 60 HERTZ

H
K4

; THESE MUMBER WHMERE MODIFIED SO THEY WOULD WORX ON
: SO HERTZ MACHINE (TESTED ON POP-11/70) AS MELL AS 60 HERTZ.
:

9600 BAUD THERE IS ABOUT 17¢ ERROR.

0000335
000073
000167
000307
000357
000347
000737
001317
001677

024206

000014
000021

000114

000334
000364

001104
001544
002204

ENDTTB

S.. 7.
7., 12.
11., 17.
13., 20.
15.. 21.

sCOUNT
1COUNT
1COUNT
;COUNT
tCOUNT

OF
OF
OF
OF
OF

CHARS
CHARS
CHARS
CHARS
CHARS

ot FOR
ouT FOR

29 . 40.
59.. 76.
119., 148.
179., 220.
199., 244,

1COUNT
;1COUNT
tCOUNT
1COUNT
1COUNT

OF
OF
OF
OF
OF

CHARS
CHARS
CHARS
CHARS
CHARS

FOR
FOR
FOR
FOR
FOR

239.,
359.,

292.
436.

959..

1136.

1COUNT
;COUNT
1COUNT
1COUNT
1COUNT

OF
OF
OF
OF
OF

CHARS
CHARS
CHARS
CHARS
CHARS

479.,
719.,

580.
868.

1END OF TTABLE

TTABLE:

FOR

ouT FOR
ot FOR

EEEEE E8EEE

000007
000013
0000135
000017

000007

55555 3383 BRAAS

; THE LOMER THE BAUD RATE THE LESS THE ERROR.

FOR
FOR
FOR
FOR
FOR

; CHECK OUT THE CLOCK
3

5149
5150
5151

024206
024212
024216

010037
005037
012737

000004
024104

1777350

TCCONT:

024106

MOV

CLR
MOV

RO, 504

CCOUNT

€-30,8COUNT

1RESTORE LOCATION 4.
1START WITH LINE CLOCK AT ZERO COUNT
130-18MS LOOPS TO WAIT

M8
CZDZA -0
CIoZmn . P11

$152
$1SS
$154
$1SS
$156
157
1S58
5159

5160

024224
024230
024232
0:4236
024240
024244
024246
024250

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

10s:

003737 024104
001010
005237 024110
001372
005237 024106
001367
005011
104400

CCOUNT
TST
204
ONE
OCOUNT
INC
10¢
BNE
BCOUNT
INC
10¢
BONE
(R1)
CLR
ADVANCE

sWAIT FOR COUNT TO GO TO 1 TO AVOID
sUSING THAT DANGEROUS FIRST COUNT!
18UT AS A SAFE GUARD,
1DON'T HANG MHERE
1CLEAR CLOCK
1CLOCK NOT WORKING RIGHT- ABORT TEST
1NOT THE FALT OF THE DZ2!

: START XMITTING CHARACTERS TO ALL 8 LINES AT ALL BAUD RATES.
: IF THE NUPBER OF CHARACTERS TRANSMITTED IS BETWEEN THE
: THO NUMDERS IN TTABLE THEN THE LINE IS O, ELSE ERROR

5163
S164
5165

5166
S167

SEQ 103

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

20¢:

MOV
MOV
MOV

#50,8DZCSR
#30,R0O
#1,R3

1SET MSE AND MAINT.
1SET BAUD RATE S0, 8 BIT CHAR LEN
tHOLOS CURRENT LINE, START AT LINE O

155562
024112

30¢:

Move
MOV

R3,80ZTCR
OTTABLE .R2

1ENABLE THE NEXT LINE TO XMIT
1GET TABLE OF EXPECTED RESWLTS

010077
005037
005037

155546
024106
024104

404 :

MOV
CLR
CLR

RO, 8DZLPR
OCOUNT
CCOUNT

tUPDATE THE BAUD RATE AND NEXT LINE
1REUSE TIMER AS XMIT OMAR COUNTER
sCLEAR CLOCK INTERRUPT COUNTER

024314
024322
024324
024330
024332
024340
024344
024346
024350

022737
001413
005777
100371
112777
005237
102363
005011
104400

000074

S04:

o
#60. ,CCOUNT
8EQ
604
TST
8DZCSR
oPL
S0¢
MOVe
€101 ,8D0ZTDR
INC
BOCOUNT
aveC
S04
CLR
(R1)
ADVANCE

100 TTMMIS LOOP FOR 60 CLOCK TICKS
sEXIT WMEN THAT OCCURS.
sREADY TO XMIT A OHAR?
tND, THEN MAIT
1007 A CHAR
sUPDATE XMIT COUNT, SHOULD NOT OVERFLOW.
1IF NO OVERFLOM, CONTINUE
+IF OVERFLOM, CLOCKX COULD BE BAD, CLEAR 17
+ADORT THMIS TEST IF CLOCX 10-2.°

5189

024352

023712

024106

604 :

BCOUNT . (R2)

sIF COUNT < LOW

S191

024360

023762

024106

(0,

OCOUNT ,2(R2)

1IF COUNT > M1

8cC

30¢

168
5169
21;0

024252
024260
024264

012777
012700
012703

000050
000030
000001

5172
gl;z

024270
024274

110377
012702

S17S
S176
gg;

024300
024304
024310

S179
S180
5181
5182
S183
S184
S185
5186
gi:z

mn
1

S190

5192
5193
5194
5195
5196
S197
5196
5199

S200

5201
552285

5204

WSZOE

024356

024366
024370
024374
024400
024404
024406
024412
024414

024416

024420
024422

1C3422

101018
062700
062702
022702
001335
042700
005200
106303

155562

024104

155512

000101
024106

155526

000002

. )¢
ADD
ADD
o
ONE
8IC
INC
ASLS

000400
000004
024206

007400

103324

005011
104400

704

T04
#400,R0
o4 ,R2
SENDTTE. . R2
408
#7400.R0
RO
R3

CLR
(R1)
ADVANCE

THEN

'
THEN ERROR
INEXT BAUD RATE
sGET NEXT PAIR OF NUMBERS
1HIT END OF TTABLE?
1NO, CONTINUE TESTIMG THIS LINE
;ORING THE BAUD RATE BACK TO 50
sAND GET NEXT LINE NUMBER
1MOVE ONTO THE NEXT LINE

+IF NOT DONE WITH ALL LINES THEN CONTINUE

1ELSE STOP CLOCX
1AND DO THE NEXT TEST

; ERROR - COUNTER NOT IN THE RANGE OF THE NUMBERS IN TTABLE
]

5207

N8
CZDZA -0
CZDZAM.P11

MACY11 30A(1052)
19-AN-84 15:45
0035011
011237

5208
5209
5210
3211
Sele
S213
5214
Se15
5216
5217
5218
5219

016237

042700
010087
104030
004737
104400

70%:

024104
000002
177770
001372

SEQ 104

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

024110

CLR

MOV
MOV
eIC
MOV

ERROR

(R1)

(R2),CCOUNT
2(R2) ,0COUNT
01tC<7>,RO
RO, SAVLIN
30

PC.SERV.G
JSR
ADVANCE

007652

1STOP CLOCK.

tMOVE LOM COUNT FOR ERROR MESSAGE
tMOVE HIGM COUNT FOR ERROR MESSAGE
1STRIP EVERYTHING BUT LINE NUMBER
tMOVE LINE NUMBER FOR ERROR MESSAGE
+COUNT TOO HIGH OR LOW

1 <G>
100 NEXT TEST

tRECEIVER SERVICE ROUTINE(PARITY TEST OMLY)
017704
010401
000301
042701
010137
005704
100401

155362

PARESE
:

10¢:

010000
001400

1GET THE CHARACTER
:COPY THE RECEIVED INFORMATION
1GET THE LINE NAMBER IN THE LOMER BYTE

MoV
TST

R1,SAVLIN
R4

tFILL LOC. FOR ERROR PRINTOUT
tWAS DATA VALID?

ASL
817
BNE
MOV
MOV

R1
OPARER . R4
114
OZRBUF ,REGIST
R4,RS

)
ERROR

8IC

000377
001442

110000

001442

118:

001442
177400

177400
12¢:

001442

024632

155226

000100

R4 ,R1

8IC

177770
001372

104023

032704
001013
013737

MOV
MOV
SWAB

155212

SOZROVF R4
0tC<7>,R1

104
23

s ISOLATE THE LINE NUMBER

1BRANCH IF YES
tERROR
- DATA VALID NOT SET!

m.xun IT ON A WORD BOUNDARY
tPARITY ERROR SHOULD BE SET. IS IT?
+IF SO, GO CHEOK CHARACTER
;SET UP FOR THE ERRCOR MESSAGE

o377,RS

IS8
8IS
ERROR
crPs
8EQ
MOVS
8IC
8IC

TRO(R1),RS
1GET THE CORRECT CHARACTER
covnuowm RS ;BUILD WHAT WAS EXPECTED
1oERROR- DID NOT GET CORRECT INFORMI\TION
TRO(QI).
UDECK THE CHARACTER. IS 1T CORRECT’
12¢
1IF SO, GO SET UP NEXT CHARACTER
TRO(R1).R3
;:LOAD THE CHARACTER FOR ERROR REPOR "ING
0*C<377>,RS
tCLEAR SIGN EXTEND
0tC<377> R4
(REMOVE THE JUNK FROM R4, THE ACTW. CHARACTER

INC
INC
CLR
CLR
8IT
BNE
0
BNE
8IC

TRO(R1)
R3
COUNTO
COUNT1
OTIE,SDZCSR
134
R2,R3
134
#RIE,SDZCSR

ERROR

gYI
13¢:
COUNTO:
COUNT1: 0

1DATA ERROR

1SET UP THE NEXT CHARACTER
1ADD TO THE TOTAL RECEIVED COUNT
sRESET COUNTERS TO NEXT
IRECIEVER INTERRUPT
1ARE TRANSMISSIONS OONE?
+IF NO, GO RECEIVE SOME MORE
+ARE ALL CHARACTERS RECEIVED?
+IF NO, GO RECEIVE SOrME MORE
1DISABLE RECEIVER INTERRUPTS
1GO BACK TO RECEIVER WAIT LOOP

i TRANSMITTER INTERRUPT SERVICE

024636
024642
024644

117701
100411
013700

155202
001372

XMTSRV:

MOV8
8MI
MOV

SHDZCSR,R1
14
SAVLIN,RO

1GET THE LINE NUMBER. IS THE TRANSMITTER
tREALLY READY? IF SO, GO L OAD THE CHARACTER
1tADJUST LOCATION SAVLIN

5264

5263

5267
5268
5269
5270

Se71
Se72

024630
024634
024660
024662
024666
024672
024674
024 702

19-AN-84 15:45
042701
010137

104003

010087
042701
006301
116177
003261

177770

8IC
a'ad

o*Cec?> R}
R1,S A IN

1ISOLATE THE LINE NUMBER
1FOR ERROR PRINTOUT

001372

MOV
8IC

RO, SAVL IN
0tCe?> M1

IRESET SAVLIN TN PREVIOUS VALUE
1ISOLATE TME LINE NUBER

001372

ERROR

177770

001422
001422

155164

TDO(R1),8DZTOR

TOO(R1)

1oTRANSMITTER NOT READY- FALSE INTERRUPT
PAE SURE IT NEFERENCES
A WORD BOUNDARY

;LOAD THE CURRENT CHARACTER FOR THIS LINE

1SET P MEXT CHARACTER FOR THIS LINE

10000000000000000006000000°000000000000000006000000000000000000

2876 .

SeTs
5276
S277
5278
5279

AR
Y

00,75
012700
006201
003301
100402
006300
000774

140077
001003
02777

001376

001422

155116
040000

155072

t(REV., FO: DELETED

oe
ONE

XMTONT, TOO(R1)
4

;MAVE ME OONE ALL PATTERNS ON THIS LINE?
sIF NOT, KEEP ON TRANSMITTING

ASL

s MOVE htPOINTER TO TME NEXT LINE

8:C
TM

#TIE.EDZCSA
R2

2¢:

MOV
ASR
DEC
oI

3¢:

TM
8IC8
e

000001

01.%
R}
Rl
s

24
RO.EDZTCM
as

tSET UP A DESELECTION POINTER
1GET THE LDME NUPRER AGAIN
s REDUCE m COUNT. WAS TMIS THE LINE?
IF SO
OISABLE TME EMABLE BIT FOR I7

160 OECK THE MEXT LINE
IDISABLE TME LINE POINTED T0 BY RO
+IF MORE LINES ARE ACTIVE
. GO CONTINUE TRANSMIT

1IF NOT, DISAGLE TRANSMITTER INTERRUPTS
{UP THE MUIDBER OF TRANSMISSIONS
(REV. FO)

s 0000000000000 00000000000000000000000000000000000000000000000000000

as:

005202

H 0000000000000 0000000000000000000000000000000000000000000000000000

RTI

000002

{RETURN TO THE TIMING LOOP

s RELATIVE TIME BUILOING ROUTINE
024734
024762
024766
024772

012737
006037
006037
003337

024776

001371
000207

105

100000000000000000000000000000000000000000000000000000000000000

5273

S274

SEQ

19 JUN-84
16:22 PAGE 103
CZOZA 0Z11 OEVICE DIAGMOSTICS.

235

CZDZA-H0
. P11
CZOZA

MACY11 SOA(1032)

001224
001222

001222

SUVILD:
14:

MOV
ROR
ROR
OEC

o4, sTIP2
sTPS
el
T2

tROTATE 4 BITS BACK INTO $THP1
;GET THE BI1S FROM $THPS, THE MHIGM BYTE
1OF THE RELATIVE TIME COUNTER. PUT THEM BACK
sINTO $THMPL1 USING THE CARRY BIT WITHW

BNE

+REDUCE COUNT. ALL BITS BACK? IF NOT, GET MORE

RTS

tROTATE INSTRUCTIONS

:flim 7O CALLING TEST

INC

C9o
CZDZA -0
- CIOZAM.P11

5323

105777
100401
104004
017704

100401
104023
032704
001403
013700
104002
010401
000301

RXISR1:

135034
153030

16:

070000

002046

LK
177770

001442

0014842
177400

177400

001372
001372

001442

000020

001442

S¢:

024754
023214
023214

TSTB

3895 TR

023006
023010
023012
023016

64:

002102

(ala)

025002

33 §5§3§§2226§

5308
5309
5310
S$311
5312
S$3:3
S314
S315
5316
S317
5318
5319
5320
S321

IRECEIVER SERVICE ROUTINE

=0 =4

$30?

SEQ 106

19-2N-84
16:22 PAGE 106
CZOZA 0211 OEVICE DIAGNOSTICS.

o®

S302
$303
S304
5305
5306

MACY11l SOA(1032)
19-AN-84 15:45

S0ZCSR
14

SOZROLF , R4
2
23

001220

000140

M TRO(RY)

moum.as
0tC<377>
RS
0*C<377>
R4
R1,SAVLIN
.;umm
TRO(R1)
R3

020, TRO(R1)
Ss
R2.R3
64

PC.BUILD

TER

1GET THE LINE NUIMBER OF THE RECEIVER ERROR
sALIGN 1T CURRECTLY FOR REPORTING
160ATA ERROR
1SET UP THE NEXT EXPECTED OCHARACTER
INCREMENT THE

TME

TIMING

CONTINUE TIMING AND ALLOW INTERRUPTS
lCT THE RELATIVE TIME (SIGNIFICANT BITS)

OFFSET
RO
;GET POINTER
$THPL, THTBL(RO) : SAVE THIS TEST'S TITME
OFFSEY
JFIRST TEST?

GO OMECX TTME TDE

.xr NOT,

YHTI('O).OMI

.xs mxs TIME WMAT IT SHOWLD BE?
;IF SO, GO TO TME MNEXT TEST
IPLACE WMAT WAS EXPECTED IN RS
1GET TME LINE NUMBER OF THE RECEIVER
ul;h(! SURE IT'S THE LINE NUMBER

R1,SAVLIN

SAVLIN

154630

1ERAOR- DATA vuioMASN'T SET

2
. R1
R4
L}
0*CeTr
R
1

THTI.(.O).RS

002102
001372
001372

1SAVE N naxm INFORMAT
10N
PROCESS 17
+IF IT WAS VALID

mwm:'m Laod sARE ANY ERROR FLAGS SET?

-(RO)

002102

IS TME RECEIVER REALLY READY?
sIF SO, GO SERVICE IT
1 oERROR- RECEIVER DOME FLAG ISN'T SET

INT
10 TME PREVIOUS

[] IMNING ERROR
ORIE ! MSENAS , BDZCSR ‘DIS&E THE DEVICE
TO THE PROGRAM
IRE

TIME TAKEN

D9
CZDZA -0
CZOZAM . P11

MACY11 30A(10%2)
19-JUN-84 15:45

SEQ 107

19-AN-84 16:22 PAGE 107
CZDZA DZ11 DEVICE DIAGNOSTICS.
10211 ECHO/CABLE TEST

$349

$350

1sSTARTING PROCEOURE
1 oLOAD PROGRAM

5351
5382
5353
5354

535S

1oLOAD ADORESS 000210
1 oPRESS STARY
1 oPROGRAM WILL TYPE DZ11 ECHO/CABLE TEST

$357
$358
5359
$360
5361
5362
5363
5364
5365

RESPECTIVELY
|OYYPE IN €E OR €
1 6PROGRAM WILL TYPE “VECTOR ADORESS-"
1oTYPE IN THE ADDRESS OF THE RECEIVER INTERARUPY VECTOR
1oFOR THE D211 TO BE TESTED, FOLLOWED BY <CARRIAGE RETURN>
1oPROGRAM WILL TYPE ~“CONTROL REGISTER ADDRESS-~
1oTYPE IN TTMME ADDRESS OF THE SYSTEM CONTROL REGISTER
1oFOR THE DZ11 TO BE TESTED, FG.LGED BY <CARRIAGE RETURN>
1oPROGRAM WILL TYPE “LINE m
|OYYFE IN THE LINE MUMBER TO BE TESTED (IN OCTAL)

S373

$356

1oPROGRAM WILL TYPE

5366
$367
5368
5369
s$370
S3N11
S$372

IO TEST- ECHMO OR CABLE

1o, FOLLOMED BY <CARRIAGE RETURN>
mm WILL TYPE “BAUD RATE-"
|OTYPE IN TME BAUD RATE OF THE DZ11 TERMINAL
1o. FOLLOMED BY <CARRIAGE RETURN>
1oTHE FOLLOWING BAUD RATES ARE ACCEPTED IN DECIMAL
1
S0
1
75

5374

S37S
5376
5377
5378
S379
5380
5381
$382
5383
S384
5385

1
1e
;@
1e
ie
1o
;e
1
)
1
e

233:_6,

110

135S

1%0
300
600
1200
1800
2000
2400
3600
4800
7200
9600

(ROUNDED OFF

1oALL OTHERS ARE REJECTED

g;gg

s sPROGRAM WILL TYPE “ECHMD”

5390

5391

1PROGRAM INITIALIZATION

5393
5394

1SET UP PROCESSOR STACK
1SET UP POMER FAIL VECTOR

5392

~CABLE TEST* TO INDICATE THAT TESTING HAS STARTE

;1LOCK OUT INTERRUPTS

tCLEAR PROGRAM FLAGS AND COUNTS

ggg
S397
S398
$399
S400
S401
S402
5403
S404

134.5)

025216
025222
025226
025234
025240
025244
025250
025254

012706
106427
012737
005037
005037
005037
105037
005037

001120
000340
025216
027412
001242
001132
001123
027416

001126

XSTART: MOV
MTPS
MO¢
CLR
CLR
CLR
CLRS
CLR

OSTACK , SP
PR7
OXSTART ,SLPADR
STFLG
$PASS
SERTTL
$ERFLG
LAST

1SET UP PROCESSOR STACK
;LOCK OUT INTERRUPTS
;SET UP IN CASE OF POMER FAIL
1CLEAR TEST START FLAG
1CLEAR PASS COUNT
1CLEAR ERROR COUNT
1CLEAR ERROR FLAG
1tCLEAR LAST ERROR PC

ES
CZDZA-HO
CZOZAH P11

MACY1l 30A(1032)
19- JUN-84 15:45
032777
0014635
012701
012702
010221
005022
022122
020127
001372
104403

000001

19-JUN-84

16:22

PAGE 108

CZDZA DZ11 OEVICE DIAGNOSTICS.

153672

VEC):

VECZ:

000300
000302

18:

001000

oIt

8EQ
MOV
MOV
CLR
oe
o
ONE

INSTR

, BSHR
#SM00

OTHER
0300, R1
0302.R2
(R2)e
(R1)e,(R2)e
R1, #1000
14

MVECTOR
PARAM
300
770

.BYTE
.BYTE

OZRIV
3

INSTR

MREGAD
PARAN

002046
002046

.BYTE
.8YTE

002052
002056
002056

002060
002066
002066
002062

153510

OTHER:

160000
163700
DZCSR
7
1

MOV
ADD
MOV
MOV
ADD
MOV
ING
MOV
ADD
MOV
8IT
8€Q

INSTR

0ZCSR,DZRBUF
02.0ZROUF
F
. DZLPR
OZROU
OZROUF ,DZTCR
02,02TCR
0ZTCR,HDZTCR
HOZTCR
DZTCR,DZTOR
02.0ZT0R
DZTOR.D2MSR
1
. BSWR
#SM0
XBEGIN

MMHICH
PAWCH

BAUD:

WOHFLG
INSTR
MSPEED

PARMD

027412

SEQ 108

.BYTE
.BYTE
LINEX:

0.
9600.
LINESP
0

DEVICE.CLR
STFLG
CLR
INSTR
MLINE
PARAM

0
7

1IF SWOO+«1, GET NEW VECTOR
1AND CSR

{RESTORE TRAPCATCHER
1IN FLOATING VECTOR AREA
1UPDATE THE POINTERS

1 INPUT ADORESS OF DEVICE VECTOR
-~
1MESSAGE "VECTOR ADORESS
1CONVERT STRING TO OCTAL
sLOW LIMITY
sHIGH LIMITY

sLOCATIONS TO OE FILLED
1LSB MASK
tNIBER OF LOCATIONS
1 DPUT ADDRESS OF DEVICE CSR
1MESSAGE “CONTROL MREGISTER ADORESS-"
1CONVERT STRING TO OCTAL
LOW LY
I LIMIT
1LOCATIONS TO OE FILLED
1ILSE MASK
tNUMBER OF LOCATIONS
sDEGIN BUILDING DEVICE ADORESSES
1FORM TME READ BRFFER ADDRESS
REMEMBER THAT THIS IS ALSO LIMNE PARAMETER REG.
10EGIN BUILDING TRANSMITTER CONTROL REGISTER
FORM THE TRANSMITTER CONTROL REGISTER POINTER

10EGIN FORMING TRANSMITTER DATA REGISTER
tFORM THE TRANMSMITTER DATA REGISTER
;RESELECY OF TEST?

1IF NOT, SKIP ASKING WNICH ONE
1 INPUT WMIOH TEST YOU ARE RUNNING
sECHO OR CABLE
1SET FLAG
1 THIS FLAG
1INPUT BAUD RATE
JMESSAGE “BAUD RATE-*
1CONVERT DECIMAL STRING TO OCTAL
sLOW LIMIT
sHIGH LIMIY
tLOCATION TO BE FILLED
1LSB MASK
1NUMBER OF LOCATIONS

tCLEAR DEVICE
1CLEAR PROGRAM START FLAG
1 INPUT LINE NUMBER
1MESSAGE "LINE NMBER-"
1CONVERT STRING TO OCTAL
LOW LIMIY
JHIGH LIMITY

F9o
MACY11 30A(1052)

CZOZA-HO

CZOZAH P11
5461
5462
5463
5464
5465
5466

025520
025522
025523
0235524

67
5468
5469
S470
S471
S472

5473

19-JUN-84 15:45

.BYTE

004537

027214

106427
012706
0035037
005737
001413
012737
005737
001017
005137

000340
001120
027414

025576

XBEGIN:

026266
027412

027412
027745

000001

027434
027432
027430
001366

MTPS

MOV
CLR

8EQ
MOV
1S7
BNE
cor

001126

TV
€

001126

027412
027729
153276

104413
012737
013777
013737
053737
013777
012777
005004
012705
05777
100404
104414
005304
001372
104003
005004
112377
0013635
004737
122777
001731
104413

.8YTE
JSR

TS7

027410

023630
027412

025612
025614

025670

SAVL IN

001372

000
001

24:

MOV
TST
BNE

1s:

001122
154210
001366
001366
154162
154134

TESTL:

24:

106427
012737
104413

000340

153214

OTESTZ, SLPADR

STFLG
14
STFLG
i'.tm.i

OTEST1, SLPADR

SSLPADR

+MTERM

DEVICE.CLR

MoV
MOV
MOV

01,TSTNM
NUMTCR, BDZTCR
NUMLIN,PAR

sLOCK OUT INTERRUPTS
1SET UP PROCESSOR STACK
1CLEAR TIMEOUT
1ECHO OR CABLE TEST ?
1ECHO
s1CABLE TEST
1ARE YOU LOOPING ?
1 YES
tNO
1 TYPE CABLE TEST
1SET UP ECHO TEST
tARE YOU LOOPING ?
1 YES
sNO
1 TYPE ECHO TEST
1START TESTING

MOV
MOV
CLR
MoV

PAR,BDZLPR
OMSENAS , BDZCSR
R4
QUICK RS

TST

8MI

1CLEAR 0211

SPEED ,PAR

1SET TCR BIT
1SET PARAMETERS
1SET BAUD RATE
1LOAD PARAM.
1SET SCANN ENABLE

80ZCSR

1 TROY?

1SET MESSAGE BUFFER

18R IF YES
IWALT

0€eC
BNE

R4
3¢

CLR
MOVe
BNE
JSR
BEQ

R4
(R3).,80ZTOR
3¢
PC,SERV.G
0377,85WR
TESTL

tRE-D0 QUICK BROWN?
1BR IF REPEAT PATTERN

MTPS

PR7

1LOCK OUT INTERRUPTS

ERROR

(o) ]

OEVICE.CLR

MOV

OXEOP ,NEXT

026724

001360

013737
053737

027432
027430

001366
001366

OEVICE.CLR
MC/
NUMLIN, PAR
SPEED,PAR
8IS

032737
013777

010000

001366
154036

8IS
MOV

001366

sLOCATION TO BE FILLED
1LSB MASK
INUMBER OF LOCATIONS

1 THIS TEST WILL ACCEPT 1 CHARACTER AT A TIME
1(IN INTERRUPT MODE) AND TRANSMIT THAT SAME CHARACTER,
tONE LINE AT A TIME, ANY LINE O THRU 7 (OCTAL)

DELAY

154136

PR7

#STACK, SP
LOCKUP
WCHFLG

con

8IS

3s:

1
RS,SET

STFLG
14
STFLG

TYPE

027762
154132

007652
000377

SEQ

PAGE 109
16:22
19 AN-84
CZDZA 0211 DEVICE DIAGNOSTICS.

ORCVON,PAR
PAR,BDZLPR

[}

:<'G>7

1SELECT LINE 0 & SET INTERRUPT ENABLE
1SET LINE SPEED AND
tCHARACTER LENGTH (TRANS. € REC.)
tMAKE SURE RECEIVER IS TURNED ON
1ILOAD THE LINE PARAMETER REGISTER

109

G9S
l CZDZA -0

CZ0ZAM.P11

MACY11l 3OA(10%2)

19-AN-84 15:45
012777
013777

S$S517
S518
5519

106437

012777
104402
105777
100375

S53e1

005777
004737
000137

026070

026110

105777
100401
104004
017737
100401

104023

032737
001401
104025

113737
113737

042737
042737

000337
023737
001401
104015
012777
123727
001004
104413
012716
000002
003003
013777
005777

100403
005203
001373
104003
113777
012777
005077

000002

026070
027436
030310

000140

027612
153112

SEQ 110

16:22 PAGE 1 10
CZDZA 0211 OEVICE DIAGNOSTICS.

19-JUN-84

154050
154044

MOV
MOV

154000

MOV
TYPE

14:

O0LESS]

1ST8

lOTKS

II' SOMBODY MITS A XKEY- GET NEW LINE o

8T8

1CLEAR CHAR

ePL

JSR

007652

;SET UP INTERRUPT SERVICE
1AND LEVEL

nres

187

153106

OINTSVC,8DZRIV
PRIO,BDZRIS

0235500

N, 4

153746

INTSVC: ;51'{8

1ALLOW INTERRUPTS

ORIE INSENAB, wzcsa 1SET RECEIVER INTERRUPT ENABLE
MCHAR
s TYPE "ANY CHARACTER”

PC.SERY.G
LINEX

1LOOP MHERE

tMAKE SURE IT WASN'T <G>
:

1 THE FOLLOWING IS THE RECEIVER INTERRUPT SVC ROUTINE
QECSR

1 TEST REC. FLAG

«®

153742

020000

027440
027440
177600
174377
027440
001372

ERROR

SDZROUF ,RECDAT

1ERROR - INTERRUPT NOT CAUSED BY FLAG

027440

MOV

027440

ERROR
BIT

23
OBITIS RECOAT

tNON- VALIO CHARACTER
;OHECK FOR FRAMING ERROR

ERROR

iEITHER SOMBODY MIT THE

027442
011272
011272
027440

MOve
MOVe

RECDAT, TBUF
RECDAT , INB\F

8I1C

03174377 ,RECDAT

027440

oMl

8EQ

8IC

SHAB

. o8

0tCc177> ,INBUF

RECDAT

SAXLIN.RECDAT

tOR IF NO ERROR

1 "BREAK KEY” OR YOU HMAVE AN ERROR!

sNOVE CHARACTER TO OQUTPUT AREA
tMOVE CHARACTER TO CHECX FOR *C

;STRIP JUNK PLUS PARITY

;SAVE OMLY LINE

;1DO0ES THE LINE @ COMPARE?

«®

011272

153642
000003

027442

000140

153572

15
MMSENAB ,BDZCSR
INBUF , 03
14

1oWRONG LINE NUMBER
;START THE TRANSMITTERS SCANNER

'R?;

OXEOP,(SP)

1CRUNCH STACK

CLR

sINITIALIZE DELAY

oMl
INC

29
R3

1IF YES BRANCH
1 INCREMENT DELAY

DEVICE.CLR

026724

027434
153606

ERROR
MoV
cP8
BNE

153626

153614
153562

1¢:

10¢:

28:

MOV
ST
BNE
ERROR
MOVe
MOV
CLR
RTI

NUMTCR,8DZTCR
8DZCSR
104

s1NO

1IS IT A ¢C 2

;ENABLE THE LINE
1 TRANSMITTER READY?
1DELAY DONE
?

3
s TRANSMIT READY NOT SET!
1 TRANSMIT THE CHARACTER
TBUF ,8DZTOR
JRESTART THE RECEIVER
ORIE !MSENAB,8DZCSR

8DZTCR

1CLEAR TCR BIY

;1THIS TEST TRANSMITS A BINARY COUNT PATTERN

026266
026272
026300

106427
012737
012737

NUMBER

000340
026724

001122
001360

;VIA INTERRUPT MODE TO THE RECEIVER
t...THE LINE UNDER TEST MUST BE TERMINATED WITH THE TEST CONNECTOR
TEST2:
MTPS
#PR7
1OISABLE INTERRUPTS
MOV
02,8TSTNM
OXEOP ,NEXT
MOV

H9
CZOZA -0
CZOZAN. P11
5573
5574
S575
5576
5577

026 306

MACY11 3S0A(1052)

19-AN-84 15:45

SEQ 111

16:22 PAGE 111
CZDZA DZ11 OEVICE DIAGNOSTICS.

19-JUN-84

DEVICE.CLR

104413

1oTEST TO VERIFY THAT SETTI'G OTR FOR A GIVEN LINE

ioWILL BRING UP

~CO” AND

"RING~ FOR THE SAME LINE

1oTHE DIST PNL MUST HAVE JUMPER FROM DTR TO RQST TO SEND

012737
113777
005005
153705
000305
133705
104414
017704
020504
001401
104022

5578

S579
5580
5531
5582
5583
55684
5585
5586
5587
5588
5589
5590
5591
5592
5593
5594
5595
5596

104401
104413
013737
053737
052737
052777
012777
013777
012777
013777
003001
005002
013777
106437
013777

5597
5598
5599
5600
5601
5602
5603

026470
026472
026476
026306
026512
026514
026516

026524
026530

026534
026336
026540

026530
026552
026560
026562

105777
100006

005777
004737
000137
003237
001364
104011

104413
000137
005037
105777
100401
104004
017737
100401

104023

032737
001401
104024

026316
027434

001362
153534

1s:

027434

:65" ORDER FOR THIS TEST TO WORK!
€14,L0CK
1LOOP
MOVe
NUMTCR, 8HDZTCR
1SET DTR

CLR
81S8
SWAB
8ISB

RS
NUMTCR, RS
RS
NUMTCR,RS

MoV
o, 4
B8EQ

WOZMSR,RA
RS, R4
]

DELAY

153514

ERROR

027430
027432
010000
040140

027436
026704
027436
001366
030310
027434

001366
001366
001366

24:
3s:

8IS

153372
SPIN:

027414

1¢:

QUITS:

026724
027414
153306

SPEED,PAR

NUMLIN,PAR

OTIEIRIEN

1PUT IN HIGH BYTE
}

tMAIT FOR CABLE DELAY
1READY MODENM BITS

tARE THEY 0OK?

18R IF YES
1IS THE TEST CONNECTOR ON?
1MAS RIGHT LINE BEEN SELECTED?
1IF SO- YOU MAVE A PROBLEM!
l{%fl BITS NOT RIGHT
L

sINIT D211
1SET LINE SPEED
1SELECT LINE ¢ € REC.
INTERRUPT ENABLL
1ENABLE THE RECEIVER FOR THIS LINE

OTIE IRIE !MSENAS ,B8DZCSR ;SET TRANSMITTER INTERRUPT ENABLE

SOINTREC,8DZRIV
PRIO,SD0ZRIS
OINTRAN,8D2TIV
PRIO,80ZT1S
R1
R
PAR,BD2LPR
OMLESS]
NUMTCR,B8DZTCR

1SET UP INTR SERVICE
+SET UP LEVEL
1SET UP INTR SERVICE
1SET UP LEVEL
sRX DATA POINTER- SET 70 O
sTX DATA POINTER- SET 70 O
1SET THE PARAMETERS AND TURN ON RECEIVER
1ALLOW INTERRUPTS

lSET UP TCR BIT

1 YOU RETURN MERE AFTER EVERY RECEJVER INTERRUPT
TST8
84TKS
1IF SOMEBODY MITS A KEY- GET A NEW I.INE @

BPL
1ST

152470
007652

153302

MOV

MOV
MOV
MOV
MOV
CLR
CLR
MOV
MTPS
MOV

153400

152474

SCoP1
DEVICE.CLR

8IS

153432
153434
153430
153444
153440

1BUILD EXPECTED

JSR
JP
INC
BNE

94 TKB

PC.SERV.G
LINEX
LOCKUP
SPIN

;18R IF NO KEY MIT
1CLEAR CHAR
tMAKE SURE IT MASN'T <G>
1SW02=1

1INC TIMEOUT FLAG
1IF NOT 0 RETURN SPINNING

1 oRECEIVER FAILED TO INTERRUPT

XEOP
LOCKUP

wmur .RECDAT

1CALL FOR END OF PASS
1CLEAR TIMEOUT FLAG
1 TEST REC DONE
1 YES
1oFALSE INTERRUPT
1 SAVE WCRO

ERROR

joNON VALID CHARACTER

ERROR

I1NO
16YES

ERROR

DEVICE.CLR

INTREC « CLR

TST8

enl

ERROR

027440

MOV

027440

8Iv
8EQ

8MI

80ZCSR

OBITM RECDA.

1DATA OVERRUN ?

CHECK CABLE/TERMINATOR

104015
120127

001003
012716
000403

105201
012716
000002

005777
100401

104003
110277
105202

000002

027440

8IC
MCY8
eIC

177400
027440
177400

174377
027440

001372

027440

000377

026516
026464

153132

153146

1s:

24:

INTRAN:

LIRS L

001401

010000

8IT
BEQ
ERROR
eIt
8EQ
ERROR

[ ]

023737

027440

]

104005

042737
000337

020000

w
=
P
)

026704
026710
026712
026714
026720
026722

042704
020504
001401

CZDZA DZ11 OEVICE OIAGNOSTICS.

[ B

026630
026632
026634
026642
026646
026654
026656
026660
026664
026666
026672
026674
026676
026702

032737
001401
104025
032737
001401
104026
110105
042705
113704

19-JUN-84

OOETIS.RECDAY

81IT12,RECOAT
o4

1FRAMING ERROR

1 NO
s oYES

1PARITY ERROR ?
1NO

"YES

.R4
0*C<377>

1SET EXPECTED
tCLEAR HIGH BYTE
1GET FOUND
tCLEAR MIGM BYTE

. o4
S
0174377 ,RECOAT

1DATA ERROR
1SAVE ONLY LINE MUMBER

R1,RS

0tC<377>
,R3

RECDAT R4

RS.R4

1OK?

RECDAT
SAXLIN.RECDAT

R1,0377
14
oQUITS, (SP )
24
R1

OSPIN, (SP)

wzcsa

(O0ES THE LINE ¢ COMPARE ?
' YES

1oWRONG LINE @
1LAST CHARACTER ?
s NO
1CRUNCM STACK

tUPOATE EXPECTED DATA
1 CRUNCH STACK

1 TEST TRANSMIT FLAG

=
0

026564
026572
026574
026576
026604
026606
026610
026612
026616

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

-4

P11

SEQ 112

PAGE 112

16:22

R2,8DZTOR
R2
1RETURN

1oFALSE INTERRUPT

s TRANSMIT A CHARACTER

tUPDATE TX DATA

J9
CZDZA-HO
CZDZAM.P11

MACY11l 30A(1052)

19-JUN-84 15:45

19-JUN-84

16:22

CZDZA DZ11 OEVICE DIAGNOSTICS.

5661
5662

1END OF PASS
tRESTART TESTY

5663

S664

5665

5666

026724

XEOP:

104402

5667

5668
S669
5670
5671
5672
5673
S674

SEQ 113

PAGE 113

026740

5675
5676

S677
5678
5679
5680

XBEGIN

027130
027132
027134
027136
027137

PARMD: MOV
MOV
MOV
MOV
MOV8
MOVE

CLRS

28:

1¢:

R3,(SP)

crP8

(R4),#'0

CLR
MOV
crP8
BEQ
BLT

c8
B8GT

000060

tCLEAR ERROR FLAG

3¢

(R4),0'9
3¢

¢'0,(R4)
R2
(R4). ,R2
R2,RS

BEQ
ASL
MOV

44
RS
RS,.R2

ADD
B8R

R2,RS
13

ASL
ASL

34:

PS
SINBUF R4
€15.(R4)
3¢

8IC8
CLR
BIS8
ADD

cHP8

000015

027062

1CLEAR LAST ERROR PC

$ERFLG

1CONVERT DECIMAL ASCII STRING TO OCTAL
(SP),RS
(R3).,68
(RS).,7¢
(R3).,8%
(R3).,9¢
(R5).+,108

000071

569

LAST

RSTRT:

000060

5683

S684
5685
5686
5687

1 TYPE NAME OF TEST

CLR

027416
001123
025530

011272
000015

5681
5682

TYPE

MPASS

INSTER

#15,(R4)

RS
RS

;1SAVE X2
1 X4
s X8

;sTIMES 10

2¢

s TEST TO SEE IF NUMBER IS WITHIN LIMITS
027064
027070
027072
027076
027100
027104

020537
101373
020537
103770
133705
001365

027132

cp
B8HI1
c

027130

8LO

eITe

027136

BNE

RS,7¢
3¢
RS,6¢

3¢

94.RS

1STORE NUMBER AT SPECIFIED ADDRESS
027106
027112
027114
027120

013704
010524
062705

105337

027134
000002
027137

S¢:

MOV
MOV
ADD
DECB

8¢.R4
RS, (R4).
”2.RS
10¢

<9
CZDZA-HO
CZ0ZAM.P11
$717
5718
$719

$720
5721
S22
S723

3725

027124
027126
027130

027132
027134
027136
027137

MACY11 30A(1052)
19-JUN-84 15:45
001372
000002
000000

64:
KE
8¢:
94:
10¢:

000000
000000
000
000

S731

027140

017605

027160
027162

001002
105015

027174
027176
027202
027206
027210
027212

001005
112715
062716
000002
104404
000752

S732
S733

027144
027152

5736
S737

027164
027166

S734
S$S735

S738
S739
S740
S741
5742
S743
S744
5745

142737
122737

000406
122737

000000

000040
000105
000103

011272
011272
011272

177777
000002

027214
027222
027226
027232
027236
027240
027242
027244

013737
013700
005037
012702
005300
100402
006302
000774

001372
001372
027434
000001

5760

027252

010237

027434

027246
027256
027262

3765
5766

027264
027266
027270
927274

5768

027302

5767

5769

$770
$771
$772

BNE
CLRS

1$:

B8R
() )

BNE
MOV
ADD
RTI
INSTER
B8R

&(SP),RS

840, INBUF
@' E, INBUF
14
(RS)

24
@' C, INBUF
3s
¢-1,(RS)
02,(SP)

.PANCH

1SET FOR LOWER CASE INPUT
IS IT "E” ?
1000

+IS IT “C* ?
13177
;RETRY

: THIS ROUTINE CONVERTS LINE SPEED (LINESP) AND
;LINE NUMBER (SAVLIN) FOR DZLPR, DZTCR AND DZCSR
tREGISTER USAGE.

S7TS1
ST52
S753
S754
S755
5756
S7T57
5758

5763
5764

8IC8
CP8

3¢:

S747
S748
g;;g

5761
3762

0
0
.BYTE O
.BYTE O

. PANCH : MOV

24:

5746

S759

BNE
RTI
0

1+COMPARE THE FIRST CHARACTER IN THE TELLTYPE INPUT
{BUFFER TO THE CHARACTERS "E~ AND “C*,
1 IF THE CHARACTER IS "E” CLEAR THE FLAG
1IF THE CHARACTER IS “C” SET THE FLAG

5726
5727
5728
S7129

5730

SEQ 114

19-JUN-84 16:22 PAGE 114
CZDZA 0Z11 DEVICE DIAGNOSTICS.

027300

027306

027432

SET:
XTCRO:
XTCR1:

012701

027310

SET1:

022137
001407

027426

1s:

005721
001373
104402
012705

027336
025462

011137

027430

000402

000205

MOV
MOV
CLR
MOV
DEC
8MI
ASL
B8R

SAVLIN,NUMLIN
SAVLIN,RO
NUMTCR
#1,R2
RO
SET1
R2
XTCR1

;SAVE SAVLIN
1COPY THE LINE NMUMBER FOR LOOP CONTROL
1SET A DEFAULT OF LINE O OR NO LINES
1SET A BIT POINTER TO THE FIRST LINE
1REDUCE THE INDICATOR.IS IT MINUS YET?
+IF SO, R2 POINTS TO THE RIGHT LINE
1IF NOT, MOVE THE POINTER TO THE NEXT LINE
1GO SEE IF THIS LINE IS THE ONE

MOV

R2,NUMTCR

1COPY THE CORRECT BIT POINTER

TST
BNE

(R1).
1
+MINVAL
#8AUD RS

1IS IT THE END OF TABLE?
1NO
1 INVALID BAUD RATE,BEGIN AGAIN
1JUMP TO BAUD THRU RS

(R1),SPEED

1SET UP BAUD RATE

MOV

cHP
8EQ

TYPE
MOV

24:

MOV

RTS

OTABLE2
Rl

(R1)+ ,LINESP
44

3¢

L9
CZDZA-HO
CZ0ZA.P11

MACY11 SOAL1)52)
19-JUN-84 15:45

$773

1 THE FOLLOWING IS A TABLE OF LEGAL BAUD RATES (8 BITS/CHAR)

S774 027310 000062
$77S 027312 010070
S776 027314 000113
S777
S778

027316
027320

S786
S787
$S788
S789

027340
027342
027344
027346

S779
S780
5781
S782
5783
S784
5785

S7T90
$S791
S7T92
S7T93
S794
S795
S7T96
S797
5796
S7T99
5800
S801
5802
S803

S804

5806

027322
027324
027326
027330
027332
027334
027336

027350
027352
027334
027358
027360
027362
027364
027366
027370
027372

027374
027376
027400
027402

027404

TABLE2: .WORD
.WORD
WORD

30,
10070
75,

130 BAUWD
'
1 75 BAUD

.WORD
.WORD

1200.
13430

11200 BAUD
tONE STOP BIT

.WORD
.WOFD
.WORD
.WORD
.WORD
.WORD
.MOPD
.WORD
.WORD
.MORD
.WORD

010470
000136

011070
000207
011470
000226
012070
000454
012430

001130
013030
002250
013430

003410
014030
003720
Clead0
004340
015030
007020
015430
011300
016030

016040
016430
022600
017070

177777

SEQ 115

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

.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
LWORD
.WORD
.WORD

1800.
14030
2000.
14430
2400.
13030
3600.
135430
4800.
16030

.WORD

17070

.MORD
MORD
.WORD

000000

10470
110.
11070
133.
11470
150.
12070
300.
12430
600.
13030

.MORD

7200.
16430
9600.

-1,0

’
1110 BAUD
1 TWO STOP BITS
1134.3 BAUD
s TWO STOP BITS
1150 BAUD
1 TWO STOP BITS
1300 BAUD
1ONE STOP BIT
1600 BAUD
1ONE STOP BIT
11600 BAUD
1ONE STOP BIT
12000 BAUD
1ONE STOP BIT
12400 BAUD
tONE STOP BIT
13600 BALD
1ONE STOP BIT
14800 B8AUD
tONE STOP BIT

1 7200 BAUD
1ONE STOP BIT
19600 BAUD
:

1 TABLE TERMINATOR

5807
S808
S809
5810

027410
027412
027414
027416

000000
000000
000000
000000

WOFLG:0
STFLG: O
LOCKUP: O
LAST:
O

1ECHO OR CABLE FLAG
1PROGRAM START FLAG
s TIMEOQUT FLAG
tLAST ERROR PC

S814

027426

000156

LINESP: 110.

1DEFAULT BAUD RATE

5811
5812
5813

5815
5816

027420
027422
027424

027430

000000
000000
000000

TOATA:
O
RDATA:
O
BYTONT: O

006307

SPEED:

6307

;OEFAULT 110 BAUD, 8 BITS/CHAR,
1FOX, 2 STOP BITS

Ssg{z

027432

000100

NUMLIN: 100

1OEFAULT VALUE, REC. INTERRUPT ENABLED

5819
5820

027434
027436

000001
000240

NUMTCR: 1
240
PRIO:

sDEFAULT VALUE,TCR BIT O
1OEFALT DEVICE PRIORITY 5

S823

027444
027466
027522
027536
027564
027574

053200
041600
050200
044600
046200
041200

5821
5822

027440
027442

000000
000000

041505
047117
051501
053116
047111
052501

047524
051124
020123
046101
035105
020104

RECDAT: 0
TOUF:
O

MVECTO:
MREGAD:
MPASS:
MINVAL:
MLINE:
MSPEED:

.ASCIZ
.ASCIZ
_ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ

<200>/VECTOR ADORESS- /
<200>/CONTROL REGISTER ADORESS- /
<200>/PASS DONE./
<200>/INVALID BAUD RATE - /
<200>/LINE: /
<200>/BAUD RATE - /

M9
CZDZA-HO
CZOZA1.P11
027612
027¢Se
027720
027745
027762
027771
00066

MACY11 SOA(1052)
19-AN-84 15:4S
030131
044510
031105
040503
117 n
0423510
L7 mm

SEQ 116

19-JUN-84
16:22 PAGE 116
CZDZA D0Z11 OEVICE DIAGNOSTICS.
020103
044503
044313
046102
177412
050440
177412

MCMAR:

MUHICH:
MTERM:
MCABLE:
MQUICK:
.EVEN

.ASCIZ

.ASCIZ
_ASCIZ
.ASCIZ
.ASCII
ASCII
ASCII

<200>/TYPE A CHAR, ON D211 TERMINAL /

<200>/WMICH TEST ? ECHO OR CABLE (E OR C) /
<200>/TERMINAL ECHO TEST /

<200>/CABLE TEST /
<377><1%><377>¢377><12><377><«377>
/7THE QUICK BROMN FOX JAMPED OVER THE LAZY DOGS BACK 0123456789/
<3775<1%5><377><377>¢12><377><377>¢377><0>

; FEEEEEEECES EE SEREEERE

1:0888000808008000800800000080000080000000008280000008008450000800

IUTILITIES

$1:0080880808000000008000080080000000080080008000880000000000000

030100
030104
030110
030114
030120
030124
030132
030140
030146
0301352
030136
030162
030166
030172
030176

030306
030306
030306
030306
030306
030306
000001

000037
002072

1 THIS UTILITY CALCULATES PRIORITY LEVEL,SETS UP CSR’'S,SETS UP VECTORS.
OZLEV: ASL
OZPRY
1UILD nmlmv IN THIS LOCATION
ASL
OZPRY
.usnc ARITHETIC SHIFTS, ROTATE

ASL

ASL
ASL
MOV
SUB
8IC
MoV
ADD
MoV
ADD
MOV
ADD
;o))

030310
030310
030310

002074

002076
002100

DZPRT

OZPRT
DZPRT
OZPRY ,LESS]
01 ,LESS]
037,LESS]
OZRIV.RO
2 ,R0
RO,DZRIS
2 ,.R0
RO,DZTIV
02.R0
RO,D2TIS

'
a

TTME PRIORITY LEVEL PAST

TTME BIT POSITIONS CORRESPONDING TO TME COMDITINN CODES
move TMIS TO LESS1
stCREATE THE NEXT LOMEST PRIORITY
;INSURE THAT THE TNZVC BITS ARE CLEAR
1PLACE THE BASE VECTOR ADORESS IN RO
1CALCULATE THE RECEIVER INTERRUPT STATUS ADOR.
1STORE 1T MERE
1CALCULATE THE TRANSMITTER INTERRUPT VECTOR
1STORE IT MERE
sCALCULATE THE TRANSMITTER VECTOR STATUS ADDRESS
1STORE IT HERE

s THIS SEGMENT SETS UP POINTERS FOR THE GIVEN DZ11. $BASE IS THE BASE ADORESS
;OF THE CEVICE
MOV
$8ASE RO
;COPY THE ADDRESS BEING LOADED
MOV
RO,DZCSR
§ XXXO0
INC
RO
MOV
RO,HDZCSR
I XXX1
RO
INC

DZPRT:
LESS1:

MOV
MOV
INC
MOV
MOV
INC
MOV
INC
MoV
INC
MOV
[ 0
INC
MOV
MOV

RO, DZRBUF
RO,DZLPR
RO
RO, HDZRB\F
RO.HDZLPR
RO
RO,DZTCR
RO
RO, MDZTCR
RO
RO ,DZMSR
RO,DZTDR
RO
RO, HDZMSR
RO ,MDZTOR

PRS
PR4

sLEVEL TO ALLOW INTERRUPTS

RYS

§ XXX2
§ XXX2

§ XXX3
§ XXX3

$ XXX4
$ XXXS

| XXX6
$ XXX6
P XXX7
1 XXX7

N9
CZDZA-H0
CZoZAM.P11
$870

LR
LR L §

S871
S872
5873
5874
S873
5876
S877
S878
5879
S881

MACY1l 30A(1052)

19-JUN-84 15:45

16:22 PAGE 117
19-JUN-84
CZOZA 0Z11 OEVICE DIAGNOSTICS.
.ERRTAB:

1 ERROR eaaoao T ABLE

1 ERROR

030312
030314
030316

000000
000000
000000

030320
030322
030324

030540
032045
032276

EML

1 ERROR

030326
030330
030332

030613
032070
032310

EM2
o2
oTe

1 ERROR

030334
030336
030340

030641
032123
032326

EM3

1 ERROR

030342
030344
030346

030700
032123
032326

EM4

1 ERROR

030350
030332
030354

030727
032135
032334

1 ERROR

030356
030360
030362

0307356
032135
032334

: ERROR

030364
030366
030370

031014
032123
032326

1 ERROR

030372
030374
030376

031055
032123
032326

1 ERROR 10

030400
030402
030404

031117
032123
032326

1 ERROR 11

030406
030410
030412

031155
032123
032326

1 ERROR 12

030414
030416
030420

031214
032123
032326

s ERROR 13

030422
030424
030426

031245
032123
032326

1ERROR 14

030430
030432
030434

031277
000000
000000

s ERROR 15

0
0

OM1
om

OH3
oT3
OH3
oTs

SEQ 117

B10
CZO2ZA -+0
CZ0ZA. P11
5926
S9?
5928
S99
S930

5931

5932
5933
5934
5933
36

5937

5938
5939
5940
5941
5942
5943
5944
5945
5946
5947
5948
5949
59350
5951
5952
5933
5954
3935
5956
5957
5958
5959
5960
5961
5962
5963
5964
5965
5966
5967
5968
5969
5970

MACY11l 30A(10%2)

19-JUN-84 15:4S5

19-JUN-84
16:22 PAGE 118
CZDZA D211 OEVICE OIAGNOSTICS.

030436
030440

031341
032123
03232%

EM16
OM3
oTs

030444
030446

031412
032123
032326

A
ors

oNo4S2
030454
030436

031450

EM20

032123
032326

o3
ors

030460
030462
030464

031511
032164
032352

EM21

030466
030470
C30472

031541
032133
032334

1ERROR 22

030474
030476
030300

031603
032123
032326

1ERROR 23

030302
030304
030506

031633
0321”3
032326

030510

031661
032123

030442

030430

0303512
030514

032326

030516
030320
030322

031711
032123
032326

030524
0303526
030530

031740
032123
032326

030332
030534
030536

032010
032243

032374

EML17

1ERROR 17

1ERROR 21

oTs

S0 118

C10

$971

$972

030540

030613
030641

030700
030727
030736

031014

031033
031117
031133

031214

031245
03127?
031341
031412
031450
031511
031341
031603
031633
031661

031711
031740

032010
032045
032070
032123
032135
032164
032243

032276
032300
032302
032304
032308

MACY1l SOA(1032)
19-N-04 15:45
047200

020117
042322
031124
041303
0403504
030332
040322
047123
042322
047123

§§ §§§§g 3REIINUNY
Sonnthmbni g3

CZOZA -0
P11
CZoZ.An

031200

086111

044323
041301
042322
032101
041303
042322
047313

046123

21, -8
ems:;
(2, 1
(1,
(1, ¥

1ERROR MESSAGES
.ASCIZ2
«200>/N0 SLAVE SYNC RESPONSE FROM DZ11 REGISTER/
.lSCIZ <200> MEGISTER R/W FAILURE?
.ASCI2 <200>/TRANSMIT READY (TROY) MOT SET/
.ASCI2 <200>/RECEIVER DONE NOT SET/
.ASCI2 <200>/70ATA COMPARISON ERROR/
ASCI2 ¢200>/70211 «RECEIVER BLFFERe ERROR/

(1, N
(1,, N
€nM10;
(3,18 1
tua;,

.ASCI2
LASCI2
.ASCI2
ASCI2
ASCIZ

1 3,}

s
En16:
7.
&R0:

(3,-3

ASCIZ

ASCIZ
.ASCI2
.ASCI2
ASCI2

ASCIZ2

o2:

.ASCI2

(3, ¥
oes:
13,-. %

ASCIZ2

(3,72 N

(2, -2
€EM30:
) B
o R:
O s
OMe ;
oSoG :

.EVEN

DT1:

.ASCI2
ASCI12

ASCI2
.ASCI12
.ASCI2

.ASCI2
.ASCI2
.ASCI2
.ASCI2
.ASCI2
.ASCIZ

001

<200>/PARITY ERROR OCCURRED/
<200>/FUULL BINARY COUNT PATTERN NOT RECEIVED<200>/78AUD0 RATE TIMING TEST ERROR/
<«200>/TRAP PC 0211 REG/
<200>/7EXPECTED FOUND REGISTER/
<200>/LINE NO./
«200>/EXPECTED FOUND LINE/
PARAMETER/
<200>/TX LINE PREVIOUS TIME ACTUAL TIME
LINE/
COUNT
LOW
«200>MIGH

.BYTE

6.1

3
.BYTE

6.4

.BYTE

6.1

.BYTE

6.1

OTs:

1
.BYTE
SAVLIN

3.1

0v4:

3
.BYTE

IREGS
SREGA

001

<g00> /FRAMING ERROR OCCURRED/

6,3

ot2:

032326
032330
032332

<200> AMNEXPECTED TRANSMITTER INTERRUPT/
<200>/RECEIVER FAILED TO INTEAMUPT/
<200> /UNEXPECTED RECEIVER INTERRUPT/
<200>/7811.0 ALARM SET TOD SOON/
<200>/7STL0 ALARM FAILED TO SET/
<200>/ACTION DETECTED ON INVALID LINE./
<200>/READING OZA\F DID MOT CLEAR SILO ALARMY/
<200>/0ATA VALID SMOWLD NOT OE SET/
<200>/RECEIVER DONE SMOLD NOT BE SET/
/
<200>/RELATIVE TDMING ERROR.
<200>/M0DEN SIGNAL ERROR ON CABLE TEST/
<200>/DATA VALID IS NOT SET!/
<200>/0ATA OVERRUN IS SET!/

.BYTE

SREGO

001

<200>/TRAMSMITTER FAILED TO INTERRUPT/

50‘YA TABLES FOR ERROR MESSAGES
SREGL

032310
032312
032314
032316
032320
032322
032324

032334
032336
032340
032342
032344

16:22 PAGE 119
19-JN-804
CZDZA 0211 DEVICE DIAGMNOSTICS.

SREGO

SREGS
.BYTE
$REGA

6.4

6.1

SEQ 119

D10
CZOZA -0
P11
CZDZ.AM

MACY11l 3S0A(1052)

19-JUN-84 15:45

032346
032330

003
001372

032332
032554
032356
032360
032362
0352364
032366
032370
032372
032374
032376
032400
032402
032404
032406
032410
032412
032414

000004

003
001372
006
001214
006
001220

006
001400
000004
006

SEQ 120

120
19-JUN-84
16:22 PAGE
1
CZDZA 0211 DEVICE DIAGNOSTICS.

.BYTE
SAVLIN

001

oTS:
011

.BYTE
SAVLIN
.BYTE
SREGS
.BYTE
sTrPL

0T6:

024110
006

024104

006

024106
001

6.9.
6,7

.BYTE
:EGIST

6.1

.BYTE
OCOUNT
.BYTE
CCOUNT
.BYTE
BCOUNT
.BYTE

6.1

SAVLIN

001372

3.5

1FOR BAUD RATE ERROR MESSAGE

6.1
6.1

1.1

tHIGH COUNTER

1LOW COUNTER

tACTUAL XMIT COUNT

+THE LINE NUMBER ERROR OCCURED ON

1 TABLE OF DELAY TIMES FOR INDIVIDUAL BAUD RATES

330

150
40

o Pt g

1 TIME FOR
1 TIME FOR

1 TIME FOR

1TIME FOR
1TIME FOR

S50 BAD
7S BAD

110 BAUD

134 BA'D
150 BAUD

8 §E5ETes
i 33333333

OLYTBL: 2430
1560
1120

1 TIME
s TIME
1TIME OF DELAY FOR 19200 BAUD

1DELAYS WERE COMPUTED TO ALLOM MAXIMUM TIME AT EACH BAUD RATE
tFOR ALL TESTS TO FUNCTION CORRECTLY ON A POP11/45 WITH BIPOLAR
jMEMORY. ‘M€ TIMES WERE ALSO TESTED ON AN 11/40 AND 11/10.
032456
001512

001512
100000

000001

CORMAX :
.END

. *MANTO
100000

E10
CZOZA -0
CZDZAM.P11
ABASE - 160010
ACDM1 = 000000
ACDM2 = 000000
ACPUOP= 000000

001412

ACTIVE

ADOMO = 000000
ADOM1 « 000000
ADDM10= 000000
ADOM11= 000000
ADDM12= 000000

ADDM13= 000000
ADOM14= 000000
ADOM1S= 000000
ADDM2 = 000000
ADOMWS = 000000
ADOM4 = 000000
AODMS = 000000
ADOMWS = 000000
ADOM? = 000000
ADOMS = 000000

7966
1208
1208
12v8

1208
1251
1232
1223

1208
1208
1208
1208
1208

1233
1254
1263
1264
1265

13116

1208
1208
1208
1208
1208
1208
1208
1208
1208
1208

1642«

1208
1208
1208
2334¢

1262
1214
1250
2371e

= 000000

5038
1208

5087
1219

1208
1208
1208
1208
1208

1240
1243
1246
1230
1238

ADVANC= 104400

AENV = 000000
AFATAL= 000000
AMWOR1= 000000
AMWVOR2AWVOR3=
AM0OR4=
AWS1=AetS2=

000000
000000
000000
000000
000000

AWS3= 000000
AWts4= 000000

1521¢

1208
1208
1208

1208
1208

ASGAD= 000000
ASGLG= 000000

1208
1208

APASS = 020000

1208

AMSGTY=
ATYP1=
MTTYP2=
ATYP3=
AMTYP4=

000000
000000
000000
000000
000000

APRIOR= 000000

1208
1208
1208
1208
1208
1208

2816«

3080

23814

3377

1208

1215

AVECT

000300

7960

3603

3650

3659

3810

4413

2563

AUNIT = 000000

1907

3589

1213

2275¢

012264

2829+

1210
1231
1239
1242
1245

2234

AUT0.S

2826

1216
1217

2147

1208

2825¢

1241
1244

APTSPO= 000100

AUSHR = 000000

2824

1220
1211
1236

22740

1208
1208

2819«

5187

22764
2232

ASHMREG= 000000
ATESTN= 000000

2817

51359

2152
2145

22734

- USER SYMBOLS

1249

APTCSU= 000040
APTENV= 000001

APTSIZ= 000200

SEQ 121

1266
1267
1263
1255
1256
1257
1238
1259
1260
1261

000000
000000
000000
006645

ADDWS =
ADEVCT=
ADEVY =
ADRONT

ANV

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

19-JUN-84 16:22 PAGE 122
CROSS REFERENCE TABLE

1221
1212

1222

29240

5202

52158

4538

4795

4843

4970

F10
CZOZA-HO
CZ0ZA. P11
AVECT1- 000000
AVECT2= 000000

8AUD
BCOUNT
S8INWRD
=
8170
81700 =

8IT01
8IT02
81703
8IT04

=
=
=
=

025462
024106
007120
000001
000001

000002
000004
000010
200020

8IT0S = 000040

8IT06 = 000100
81707 = 000200
B8ITO8
8IT09
8IT1
BI710

=
=
=
=

MACY11l 30A(1052)

19-JAUN-84 15:45

1208
1208

S446¢0
5066
2457¢
913¢
903¢
9020
901¢

8948¢

19-JUN-84
16:22 PAGE 123
CROSS REFERENCE TABLE
1247
1248
5766
5093¢
993
913

8IT6
8I77
8IT8

8IT9

=
=
=
=
=
=
=
=

024076
104412
104411
032456
024632
024634
000400

5176

5184+

5189

5191

995

997

999

1036

10385

3433

5972
4934

1056

1031

1077
1030

972
973
974

1079

1026

975
997
1002

1010
1011

1028

1030

1028

1031

1021

1022

1023

1024

1032

1047

1066

1078

2083

2834
3433

2967

4896

4898

1060

2936

3019
987

1018

1020

1022

1024

1019

1020

1023

1024

4896

1003

= 001000

CLKSRY
ONVRT =
CONVRT=
CORMAX
COUNTO
COUNT1
CoO0
=

5156

995
964

010000
020000
040000
100000
000004
000010
000020
000040

000014
000400
001000
002000
004000
010000
020000
040000
100000
005372
024754
027424
024104
007116

5150«

Q0
909

000400
001000
000002
002000

= 000100
= 000200
= 000400

B8PTVEC=
BRXO
=
BRX1
=
8R2
=
BRX3
=
BRX4
=
BRXS
=
BRX6
=
BRX7
=
BRW
BUILD
BYTONT
CCOUNT
ORONT

-- USER SYMBOLS

912
911

8ITi1 = 004000
8IT12
8IT13
eITi4
8IT15
8IT2
8IT3
BIT4
BITS

SEQ 122

2103¢
5333

2423

1551¢
59726

4944¢
4945

1063¢

5089+
2436+

5149

1992
1917

1997

4965+
4967

S033s
S03Se

5152

S246¢
K247«

S177e

5179

5209+

5972

2542

2544

2546

2617

32540
5255¢

3017

G610
CZOZA -0
CZOZAM. P11

Co1
coe
C03
Cos
COS
Co6
Co?

=
=
=
=
=
=

=
CR
=
cRLF
CSRMAP
CYQLE
OATABP

001000
002000
004000
010000
027000
040000
100000

000015
000200
012272
011342
007312

MACY11 30A(10S2)

19-JUN-84 15:45

1065¢
10660
1067¢
1068¢
1069¢
10704
826¢
829¢

2220
2220

1968

2805¢

29270

DATAHD 007500
DCLASM= 104417

= 00002)
OCLR
OCOUNT 024110
ODISP = 177570

9450
S0%4e
835¢

OH1
o2
oM3

032045
032070
032123

OH4
oS
OH6
DISPLA
DISPRE
OLYONT
OLYTBL

032135
032164
032243
001162
000174
007214
032416

OONFLG

OSWR
OTRO
DTR1
OTR2
DTR3
OTR4
DTRS
DTR6
OTR7
oT1
oT2

=
=
=
=
=
=
=
=
=

o073

074
0TS
oT6
OVALID=
DZACTV
0ZCRO

25374
3836

4018

2478
5210

3100
5972

3475

1557¢
3941

3431
3982

36135

2332¢
15540
3693
S617

2379¢
3150
3985

3188

4152

3621

4116
4964

3226

4238

4171

4260

4377

4436

4227

3705

3763
4297

3788
4305

3487

3495

3665

3671

$032

5498

4776

3302
5454

3343
5487

3394
5508

3473
5511

5912

5916

5920

5928

5921

2984+

4141

5584

4575

4846

3865

3890

3517
5551

3548
SS73

3591
5593

5932

5936

5948

5952

5929

5933

5937

5949

5953

2988¢

2993

3012

4407

5876

5900
S944

5904
59720
$972¢

2573

1943

2490

001420

3956

3978¢

032326

5901
5963
5945

5905
59720
5972

177570
000400
001000
002000
004000
010000
020000
040000
100000
032276
032310
0352334
032352
032374
100000
001404
001500

-- USER SYMBOLS

2561¢
3926

4926

8484

006642
DEVADR
DEVICE= 104413

SEQ 123

10640

2531
2530«
15660

DELAY = 104414

16:22 PAGE 124
19-UJUN-84
CROSS REFERENCE TABLE

3764

1370¢

1932+
170%

1933
1812

2495¢

4691

5909

5913

5917

4033

4513

5236

2803
2990

2811

2893«

H10
CZOZA -0
CZDZAM.P11

OZCR1
OZCR10
OZCR11
DZCR12
DZCR13
OZCR14
OZCR1S
DZCR16
OZCR17
0ZCR2
OZCRS
OZCRe
DZCRS
0ZCR6
DZCR7
DZCSR

001514
001640
001654
001670
001704
001720
001734
001750
001764
0013530
0013544
001560
001574

MACY11 S0A(1052)

19-JUN-84 15:45

1379¢
14420
1431¢
1460¢
1469¢
1478¢
1487¢
1496¢

19-JUN-84
16:22 PAGE 125
CROSS REFERENCE TABLE

305S

2478
3787
4031¢
4236+

3786
4108+

4454+«

030100
(02052

OZAvO
0LVl
0ZLV10
0ZLv1l
0ZLv12
0ZLv1S
0ZLvi4
OZLV1S
0ZLV16
OZLV17
ozLve
oZLvV3
0ZLv4e
oZLVS
OZLV6
ONLvV?
DZMSR
OZNuM
DZPRT

001504
001520
001644
001660
001674
001710
001724
001740
001754
001770
001534
001550
001564
001600
001614
001630
002062
001410
030306

OZRBUF

002046

OZRIS

002074

DZRIV

002072

DZTCR

002056

5073

1639

4876+
1581¢
4035e

-- USER SYMBOLS

1813

001610
001624
002042

DZLEV
DAAPR

SEQ 124

3807

4111

4476

313S
3814

3173
3855+

4126¢

4132¢

4706

4518
4731

4303

3249

3287

4191
4315e
4548«

4194
4356+
4553

5427

5430

4177

4266+

5604+

4383¢
5852+

3211

3859
4136

4314
4544+«
4739
5346+

3863

4627
5168+
5548¢

4684+

5362«

5597

3528
4860¢
1766+

3842«
S005e

3930
S17Se

4025

2974

3383

5861

4130

4131

4189

4190

4215

4216

5831

5832

3653
2932

4685«

3285

5432

5655
4094+«

$492¢

S847e
5516¢

3431
3937«
4389«
4595«
4958+

$493¢

2034¢
4878

4100e

4956

4106

5439«
2973
4107

33518

3094
5307

3971
8.

3992
5430

4061

4287

5433

4325
5533

4514

Se21

3833
Se3e

4032

4734

3792

4130¢
$518¢

4189«

4215e
5838«

4273

4387

4358+

4594

4680

4791

4792+

4877«

4357+

4593«

4679+

5598+

4622+

4791

5517

3858+

3901
4547«

3936+
4605«

3954«
46430

3962¢
4686+

3549
1803¢

3390

5599«

49587

5828«

2031
5023+

4105

4129¢

4188+

4214+

4272+

4101¢

4184+

4286+

3700+
4349

3756+
4396»

4460

S419
3372

3797+

5431e

4532+

5830«

5432

4273
5833

5623

I10
CZDZA-MO
C20ZA4.P11

MACY11l 30A(1052)

19-JUN-84 15:45

4726

5606

002066

DZTOR

DZTIS

002100

02TIV

002076

oZv

o000

0013502
001516
001642
001656
001672
001706
001722
001736
001752
001766
001332
001546
0013562
001376
001612
001626
002000
001300
001414

EM10
ems

031155
031214

EM1S
EM16
em7
e
Ereo
el
ere2
eres
eres
eres

031277
031341
031412
030613
031450
031511
031541
031603
031633
031661

eniae

Er2é6

e
EM3
EM30

13, ]

ers
EM6
EM7
Ers
EM9
ENDTTB=

031245

031711

031740
030641
032010

030700

030727
030756
031014
031055
031117
024206

1585¢

4556¢

15910
S025e
1590¢
S600e¢
21N
13710
1380¢
14430
1452¢
14610

19-JUN-84

16:22

SEQ 1235

PAGE 126

CROSS REFERENCE TABLE -- USER SYMBOLS
4960

S028¢

S172¢

S283¢

5433«

S434+¢

5435

5437

S489e

5555

5563«

3558¢
4625¢
4131¢

3767«
4723«
4190¢

3816e
5183¢
4216¢

3869«
5270
4275

3959«
S437e

4037¢

41340

$561e¢

4472

4359

5438+
4360«

4128¢

4187¢

4213

4274e

4359«

5022+

1716

1720

3033

1685
13670
2833e

2817
1642

20826
1682

2930
1912

2819

2829

1633¢

1634«

4879+
5857«

3551e
4613

4107

S601e

4104¢
5840¢

5842¢

5439
4682+

4219¢

4301¢

4793

47944

4405«
5658+
4878+

45450

4681+

4793

4875+

4954+

2879

2927

2933

5503

14700
14790

59720
59726
59720
597260
597260
$972¢
5972¢
$972¢
$972¢
$972¢
597260
5972¢
59726
5972¢
5972¢
5972¢
5972¢
5972¢
59726
$972¢
$972¢
59726
59720
5972¢
5195

3375

4832

3587

3651

5862+

4957

J10
CZOZA-H0
czZozmi.P11
ERRMSG
ERRVECERTABO
EVEPAR=
EXITER
FINI
=
FIVE

007466
000004
007636
000000
007572
022444

FIVES =
FRIMERR=
HALTS

002070
006640
000011
011272

0L _415
021724
021750
104404
104403
006440

026704
026524
026070

IOTVEC- 000020
027416
LESS1
030210

LINESP
LINEX
LINEO
LINEL
LINELO
LINELL
LINEL2
LINELS
LINE14
LINELS
LINELG
LINEL?
LINE2

LINES
LINES
LINES
LINEG

19-JUN-84 15:45

000012
006566
001364

027426
025500
001506
001522

001646
001662
001676
001712
001726
001742
001756
001772
001536
001552
001566
001602
001616

16:22 PAGE 127
19-JUN-84
CROSS REFERENCE TABLE

2352¢
2071e

2073»

973¢

4745

5310

1318¢
15760
1580¢
15840
15780
1582¢
15862
2331e
8264
2287
5737
1317¢
4669¢
46760
1533¢
1530¢

1853¢
3945

4709

2544

2349
2070
2584¢

4702

4790¢

2529

9160

10140
2572

1001¢
1005¢

2514

HORFLG
HOZCSR

LIMITS
LINE

MACY11l S0A(1052)

5446

SEQ 12¢

-- USER SYMBOLS

2076¢

25754

1908

1910
5261

5849«

3620¢
4065«
23780

3664+
5865«

3670

5435«

S436¢

5579

5859«

27439

2744

2749

2754

27708

5541

5542«

5549

1666+

1677

1687«

1837«

1903

2926+

2760
1711

5699
1725

5742

1776

1785

1844

1879

1938

2845

S414

5422

1632+
58104
4687«
2220

3034+«
S605«

5833«

S834¢

5835«

5868¢
3935

4023
4597

4033
4666

5732

S733

2308
$600
5598

5517
9210
S404+
4183+
827¢
2347
1296¢

4101

4686
S451

54540
1373¢
1382¢
1445¢
1454¢

3398

41084
4753

S814¢
5613
1849

5519«

3655

3698

4780

4278
4830

1860

1888

3744

4381
4932

3754

4391
4960

3840

4440

3856

4455

5028

4579

4092

4669

K10
CZDZA-HO
CZDZAN.Pi1

LINE?

001632

LOBITS
LOCK

006644
001362

LOCKUP
LOLIN
=
LPO
=
LP1
=
LP2
=
LP3
=
LP&
=
LPS
=
LP6
=
LP7

027414
006636
000000
000001
000002
000003
000004
00000S
000006
000007

MAINT =
MANTO
MANT1
MANT10
MANT11
MANT12

MANT13
MANT14
MANT1S
MANT16
MANT17
MANT2
MANTS
MANT4
MANTS
MANT6
MANT?
MASTEX

MBADLN
MCABLE
MCHAR
MCSRX
MOATA
MEPASS
MERRPC
MERRX
MERR2
MERR3
MINVAL
MLINE
MOCK

000010
001512
001526
001652
001666
001702

001716
001732
001746
001762
001776
001542
001556
001572
001606

011075
027745
027612
010716
011376
010535
011043
010743
010574
010643
027536
027564
010667

010771
001417

MPASS
MPASSX
MPFAIL

027522
010732
010472

R
MREGAD

010560
027466

MQUICK

14364
23330
1293¢
3586+
5468+

2330

9920
993¢
9940
995¢
99640
997¢
998¢
999¢
o440
137S5¢
13640
1447¢

SEQ 127

16:22 PAGE 126
19-JUN-84
CROSS REFERENCE TABLE -- USER SYMBOLS

2363
2112

3647
5614«

2361

2101
17719

2380¢
2114
3737
5619
2377¢

3054+

2501e

2538

3907«

4014e

3136
2991

3476
5972

3489

2101
2037+

2485

2747¢

3445

3446

3476

2752

1858

3833¢
5809¢

4071»

3066+
4433«

4572

3072

3326+
4649

3355
4824+

3374¢
578

3413.

2752s
3770

2757
3872

4015

4040

4330

4500

4850

4923

3489

3695

3701

37538

3855

3937

4031

4108

3060+

1456¢
1465¢
14740
1483¢
14920
1501¢
1510¢

1393¢

14020

001622
001636
010766

MEW
MNTFLG

MODE

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

001370

2730
27740

3594

3648

027762

000040

L10
CZDZA-HO
CZOZAM.P11
MSPEED

027374

MTERM
MTITLE
MTSTN

027720
001000
010754

001360

MVECTO
MVECX
MMHICH

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

027444
010724
027652

NOLIST= ssssss U

4132
$026

3447

5481
11506
2541

4191
5346
58236
5823¢

4389
5548

4404
5562

30S1e

3098s

5134

4454
5597

3547¢
4432¢

33835
AST71e

3396
4662¢

3646
4823e¢

3692¢
4922¢

3736¢
4990¢

3832¢
35058

$S12
3353
4021

$595
SS9

4929

S7S51s
$S81
4936

S817¢
5583
4938

S606
4997

5753
S004

5760
S006

5819¢

3927

3979

4020

4090
1940

3172¢

NLIN 027432
NUMTCR 027434

5490
5489

025214

4825+

025442

5406

S440¢

OVRRUN= 040000

9740

4525

4745

$310

;:g‘.l

4928

4996

S490¢

S491e

S492

1698

1713

1727

1787

1846

1881

4053
2341

474S
2343

S230
23530

5236
2360

$310
2362

2364

4235

4350

4355

ODOPAR= 000200
OFFSET

ONESTO= 000000

OTER

ouv

022372

PAR

001366

PARAM = 104405
PARAML

1012¢

4697

12990

15366

4840¢
4775¢

2836+

006506

23366

PARESE 024460
PARITYe 000100

4955
10106

S023
4021

13740
1383¢

1796¢

PARER = 010000
PARERR 006562
PARID = 104415

PARO
PARL

001510
001524

PAR17
PAR2

001774
001540

PARS
PARS
PARG

001570
001604
001620

PAR1O
PAR1Y
PAR12
PAR1S
PAR14
PARIS
PAR16

PAR3

PAR7

00165C
001664
001700
001714
001730
001744
001760

001554

001634

PAUCH = 104416

PIRQ
= 177772
PIRQVE= 000240
POPRO = 012600

POP1SP= 005726

POP2SP= 022626
PRIO

PRO
PR1

027436

s 000000

= 000040

9720
2339
15600

14460
14556
14640
1473
14820
14910
1500¢

1509¢
13920

2354

SA448

4891e

3742

Sel1e
4930

5335

3838

$337

S348¢

$S512¢

4998

1884

1889

3030

4205

1899

1401¢

1410¢
1419¢
1428¢

1437¢

1563¢

833¢
9274
9364

9340

9384

5518

850¢

851¢

4553

2580

3516
4374e

1011¢

4544

2300

3472¢
4257¢
798

4276
5520

2846

5443

1292¢

4217
5493

1665
27300

58234
27300
S823%¢

5415
1993

SEQ 128

19-JUN-84 16:22 PAGE 129
CROSS REFERENCE TABLE -- USER SYMBOLS

S444

1656

5599

S601

$820¢

3210

S5513¢

3248¢

4595

3286+

4685

3323+

4880

3371¢

4958

3430e

3923+
5510¢

4013¢
5572«

4085+

4168+

4173

4262

4379

4438

4577

2847

5416

S424

5458

S551Se

5516

5594¢

S5595¢

5596+

M10
CZDZA -0
CZ0ZAH . P11
PR?
PR3
PRY
PRS
PRG

PR7

=
s
=
«
=

000100
000140
000200
000240
000300

= 000340

s 177776
PS
= 177776
PSM
PUSHRO= 010046
PUSM1S= 005746
PUSH2S= 024646

PURVEC= 000024

MACY11 SOA(1052)
19-JUN-84 15:45
852¢
853¢
8540
855e¢
8560

as7¢

$509¢

830¢
8310
935¢
9330
937¢

SEQ 129

N-84 16:22 PAGE 130
CROSS REFERENCE TABLE -- USER SYMBOLS

S868
5867

1118

5570e

1122

1629+

1959

3053

4283

4594

4680

2721e

4682

477S¢

S398e

5466~

831

026516
QUITS
RCVYON = 010000

S617¢
101S¢

S649
3928

1638¢

2692¢

2693e

2702¢

2708¢

2720¢

4829

4832

4848

4859

5515

5596

ROONE = 000200
RECDAT 027440

9480
$533¢

3433
5536

3757
$540

3786
5541

3807
5543¢

3859
55449

3888
5545

4055
5623¢

4136
5626

4221
5629

4303
5632

4410
637

S642¢

4032¢

4865

S232¢

5972

4356

4595

4683

4880

4882

4958

027422

ROATA

REGIST

RESREG
RESTAR
RESVEC=
RESOS =

001400

007514
012106
000010
104410

RIE

= 000100

RINGO
RING1
RINGZ
RING3
RINGA

= 000001
= 000002
= 000004

RLO
Rl
RL2
RL3
RLA
S
RL6

=
=
=
=
=
=
=

= 000010
= 000020

RINGS = 000040
RINGS = 000100
RIMNG7 = 000200

RL?

RSTART
RSTRT

RUN

RXISR1
RXSYC

RXTCR

SAVLIN

922¢

S812¢
S643¢

13040

5644

3853s

25620
2872¢

4962

5026

5030

5252

3489

4132

4217

43195

1643+

2811

2814«

281Ss

2822¢

2823e

4695

4769«

A4T96¢

4446

4458

4498

3750«
4029¢
4534¢

3768
4038

5798+
4067e

3799
A4098¢

3846¢
4181es

3870
4270

39C 2
4280¢

3903
4342

3925
4387+

3969
4393s

5461
1309¢
1305¢
15420

554>
1639«
2386+
2519

S644
1804¢
2586

S5010¢

S212¢

5225«

5263

5265

S5267e

5323«

5324

5343«

S5344e

947¢

1055¢
1056¢
1057¢

2562

3250

021714
026740

46670
S5669¢

9325002
022214

4876
467

53040
47310

001372

13010
3907S¢

3696+
3990«

022472

001411
001402

SAVOS = 104407

5346

$520

5562

5597

1060¢
1061¢
1062¢

9600
9810
9420
983¢
96840
985¢
9464

001406

3476

1058¢
1059¢

000000
000400
001000
001400
002000
002400
003000

s 003400

Saz21¢

2559
2725
9176
1545¢

987¢

1307¢

4666+

4861¢
SAVNUM
SAVPC

1637e

4862+

3715e
3994s

4942¢

S7S1
2001e

4585+

$752
2003¢

4603

5972
2983«

464Ss

4713¢

4738

4756

47788

4786

4826+

N1O
CZOZA-HO
CZ0ZA1 . P11
crOP1 = 104401

SERV.G

007652

SET.PS

011440

027214
SET
SETAPT 012112
SETFLG* 104406

MACY11 30A(1052)
19-JUN-84 15:45
15?’:0

ggg;

3352

3400

3626

3676

3796

3817

3898

2054

230’

2590¢

2613

4889

Selse

5505

5525

5612

4476
3476

4482
4454

4518
4544

4617
4553

4627
4595

4739

5513

5594

S768¢

5815¢

1628
S455e

1958
5472

2581
Sa/4e

5397
S478

5467
S480¢

S808¢

5464
1669
1539¢
1117

STS516@
2879¢
1778

SILOAL= 020000
SILOEN= 010000

9509
949¢

3433
3212

46900
243550

4770

5609¢

5615

1003¢
1007¢

1002¢
10064

SIx
SIXS

= 000010
= 000050

SPEED

027430

5491

STACK = 001120
027412
STFLG

821¢
S400e¢

SNAP
SPACNT

022044
007117
026464

SPIN

STKLMT= 177774

STOP

001462

SWR

001160

SVO05

SUREG

0066354

000176

832¢

3850

4450

4589

4677

4835

4868

4950

5018

1178¢
2065
264Se

1653
2083
2646¢

1657¢
2110
2647«

1675
2117
2654«

1679
2508
2700

1799
2513
2713+

1833
2571
2841

1905
2576
2912¢

1922
2578
5405

885
884

1675
2841

S405
5440

1799

1833

114206

S¥0

= 000001

SWo2
SW03
SWO4
SWOS
SW06
SW07
SW08

=
=
=
=
=
=
=

000004
000010
000020
000040
000100
000200
000400

8736
8724
8716
87C¢
869¢
868¢
8676

=
=
=
=
=
=
=
=
=
=
=

000002
002000
004000
010000
020000
040000
100000
000004
000010
000020
000040

884¢
8654
8649
863¢
862¢
861¢
8604
883¢
882¢
8sie
8804

SW00
SW01

SW09

S\l
SW10
S¥1ll
SW1l2
SH13
SWi4
SW15
SW2
SW3
SW4
SWS

SW6
SW?
SKH8
SW9
$110
$1200
S134

= 000001
= 000002

= 001000

=
=
=
=
=
=
=

000100
000200
000400
001000
001000
003400
001400

5652

1339¢

2390¢

885¢

8756
8740

866¢

879¢
878¢
877¢
8764
1013¢
1024
¢
10204

4533

4554

4644

1927
2590
5440

1932
2614
5506

1935
2615+

1962
2640+

ST.9¢

5756

SEVEN = 000020
SEVENS= 000060

4066

eT77e

027246

SET1

SEQ 130

19-JUN-84 16:22 PAGE 131
CROSS REFERENCE TABLE -- USER SYMBOLS

1657

883
882
881
880
879
878
877
876

1935
1922
2576
2110

2578
2117
2513

2508

B1ll
CZDZA -0
CZ0ZAH. P11

TCOONT
TORO
=
TOR1
=
TCR2
=
TORS
=

TOR4
TORS
TOR6
TCR7

TDATA
T0O

=
=
=
=

T01

002000
004000
007400
0044CO
003000
002400
0035400
006000
000000
003000
006400
000400
007000
027310
000014
027442

4829

USER SYMBOLS

4832

S7740

3361
3325

027420
001422

TD4

001432

3822¢
51480

4723

4724+

3899«

4134

4219

4866

4448
4948

4472

4473

4587

S271e

4513
S27s

3476

4108

4126

4191

4206

4211

4314

4356

4548

4553

3703

3761

3814

4111

4194

4466

4607

3869

4675

38835

4833

5016

$270

4614+

001430

105
T06
T07
TEIGHT
Toe
TEST1
TEST2

001434
001436
001440
002140
011334
023630
026266

TFIVE

002146

< (40000

TKVEC
TLAST

= 000060
- 023730

TL1
T2

= 000400
= 001000

LS
TL4
LS
w6
L7
THTBL

SE0 131

000020
000040
000100
000200

00142¢

PAGE 132

CROS S REFERENCE TABLE

001424

16:22

1021¢

024206
000001
000002
000004
000010

TDR2

TIE

19-JUN-84 15:43

19-AN-84

=
$150
$1800 =
$19200+
$2000 =
$2400 =
=
$300
$3600 =
S4820 =
=
$S0
S60C =
$7200 =
=
STS
$9600 =
TABLE2
TBITVE=
TOF

MACY11 S0A(1032)

S487¢
SS700

5507

4938

5026

5248

5283

5597

5972¢

= 000000

=
=
=
=

001400
002000
002400
003000
= 003400
002102

TPYEC = 000064
TRAPVE= 000034
TROY
¢ 100000

1596¢

5336

5340

5342

9240

1635e

1636+
3442

3695

9320

3438

4623

Cll
CZ0ZA-%0
CZ0zm4 . P11

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

TRTVEC. 000014

9190

4758

4760

4766

2036

2634

2870

3048¢

015280
015404
015742
016270
016622
017100
017410
017736

3646
3692
57%
3832
5923
4013
4085
4168

3689%¢
5733¢
3829¢
3920¢
4010¢
40820
41650
42540

020370

4237

43710

021304

4432

TRO

001442

gg&.

TR1
TR2
TRY
TMe
RS
TRé

001444
001446
001450
001452
001454
001458

TST1

013046

13320
1333¢
13340
133350
13360
13370
1338¢
16130
16160

TR?
TSEVEN
TSIX

001460
002142
002144

013764
Ol4122
014304
014422
01435352
014642
014726
015122
013236

1ST10
TST11
TST12
TST1S
TSTA4
TST1S
TST16
TST17
1ST2

TST20
7S721
1S122
1ST23
TST24
TS12S
TST26
TST27
TST13

013322

1ST30
TST31

020556

TST32
TST33
1ST34

TSTSS
TST37
1574

TSTAO =

3206
3323
3371
3430
3472
3516
3547
33583
305.

3098
4374

4922

49870

sesens U

4990
35134
S0s%8

013506
013600
013672

3172
3210
3248

1157

005140

1965¢

TXSYC
TYPDAT

022116
007502

024112

TWOSTO= 000040

TYPE

TYPHSG
1110
11200

« 104402

007372
002106

002120

50536
35169¢

1013¢

4829

1527¢

1665

2038¢

47060
2333

23584

5244¢

5318

5320

5326¢

1924

1929
2536

1964
2337
2043

1969
2540
2R63

1990
2541
2868

1991
2343
2993

1993
2545
S473

4832

1743

1866

1999

2163

2283

5321

5665

576S

2331

2333
16010

25360

16064

S240

5972

1967¢

2347

5481

S238

3207¢
32450
3263¢

S173

1996

23S

4919

S125¢

4681
2535

47182

45680

023456
023730
013414

USER SYMBOLS

44290

46590
48194

4823

4767

SEQ 132

3131¢

4571
4662

T1STS
1576
1877

TYABLE

33200
3368¢
34270
3469¢
33513¢
35440
3382¢
36430
3095¢

021666
022474

023204

7ST36

19-JUN-84 16:22 PAGE 133
CROSS REFERENCE TABLE

2336

2616

1867

2318

2618

1911

2411

2676

2444

2722

280/

D11
CZDZA-H0
CZ0ZA . P11
002110
002112
002122
002124
002126
002114
002130
002132
002102
002116
002134
002104
002136
012654
025260
025270

71354
7150
71800
12000
12400
1300
13600
74800
TS50
1600
17200
TS

7 3600
VECMAP
VEC1
VEC2
MO 5
MRDCNT
WTBS.F
XBEGIN
Bx
XCSR

XEOP

MACY1] SOA(1052)
19-AN-84 15:45

007470
02553
007260

5469
2445¢

026724

5510

5582

005072

2553¢
S4664
2511

1992

202440

005114
011050
001376

2000
1911
130%¢

2033¢
27306
4874«

MTSRY
XPASS
XSTARYT

024636
005106
025216

4873
1997
1146

4954
2030¢
5$397¢

XTCRO
XTCR1
XTSTW
XVEC

027222
027236
007644
005100

= 160210

STS2¢8
S7SSe
2542
1994

= 000500

1368¢

r 44

= 000020

001374

XSTATQ

011140

SAPTHD
SASTAT=
SATYC
$ATY]
SATYS
SATYS
SAUTOB

$BASE

$80ADR
$800AT

$COW1
$COM2
$CHARC

13020

1918

1368¢
1485¢

1485¢
1368¢
1485¢

4827

273060

S$758
25870
20270

S807¢
2453¢
5669
2513%¢
2546

5572

5618

S665¢

4947«

S015e

5278

4837+
5022

4839

S261¢

4864

5399

1377¢
14949

1386¢
1503¢

139%¢
15120

14040

1413¢

1422¢

14310

1440¢

14490

1458

14670

14760

1503¢
1386¢
1503¢

15120
1395¢
1512¢

14130

14220

14310

1440¢

14490

1458¢

14670

14760

14940
1377¢
149490

14040

1413%¢

1422¢

1431¢

1440¢

1449¢

1458¢

14674

14760

2880

2990+

5846

1377¢

1386¢

1395%¢

001462
eesese U
006030
006004
006012
006022

1350
2254
2225
22230
2150

13560
2269
2227¢

001310

1249¢

1705

2830¢

12510
12524
2167

2904

2991

2177

2164

2212+

22176

11916

11926

1193¢

11940

001154

22269
117Se

001142
001146

11700
1172¢

001314
0C1316
006000

SCMTAG
001120
$CHi
= 000006

- USER SYMBOLS

3002¢

XERR .
XHEAD
XMTONT

XMTLIN

SEQ 133

1602¢
1603%¢
1607¢
16084
1609¢
16040
1610¢
1611
1599¢
1605¢
1612¢
1600¢

1613¢
2994
S4A05¢
S407¢
5445
2419
2550
S441
2509

027410
007114

19-JAUN-84 16:22 PAGE 134
CROSS REFERENCE TABLE

1158¢
11906

22240
2566

119%5¢

11%6¢

E1ll
MACY11 30A(10S52)

CZOZA -+0

CZOZAM P11
» 000014
« 000006
« 000004
001262

SCRAP = 177777

SCRLF
$D0MO
$00M1
$00M10
$00M11

$00M12
$00MW13
sO0M14
$O0M15
$00M2
$00us
S$O0MS

19-JUN-84 15:45

1190¢
11880
11966

12230
7964

32740
33420
399%¢

001231
001320
001322
001344
001346
001350
001352
001354
001356
001324
001326
001330
001332
001334
001.36
001340
001342

$00M6
$00M7
$00M8
SO0
S$OEVCY
$0EW
001312
$O0OAGN
$E
= 000041

$ENDAD
S$EMDCY
SENV
S$ENVM
S$EQP
S$EOPCT
SERFLG
$ERMAX

$ERROR
$ERRPC
SERRTB
SERTTL
SETABL
SETEND
SFATAL

45720

1133

005042
001254
001255
004712

2011¢

001.23
001135
007230
001136
001360
001132

1161¢
1167¢
1125
11680
1287¢
1165¢
12180

001360
001236
006250
001176
001175
001140
001144

$FFLG
$FILLC
$FILLS
$GDAOR
$GDOAT
$GETA2
$HD
= 000001

1219¢

1965¢

12716
12110
2223
1186¢
1185¢
1169¢
1171¢
2013¢

16:22 PAGE 135
CROSS REFERENCE TABLE

19-JUN-84

1191¢
1190
1197¢

1192¢

11930

11940

1198¢

1199¢

1200¢

30410
32010
3568¢

30460
33120
3579

3088¢
3318¢
3630¢

3093%¢
3359%¢
3¢410
41570

40080

40740

4080¢
48004

SEQ 134
--

USER SYMBOLS

1195¢

11960

3122¢
3366¢
36816

3129¢
3417¢
36870

48174

2547

42320
49740
2676

1811

1927

2892

2993

3371

3372¢
3692

3134

3135¢

3172
34310

4169¢
4922

4257
49239

4990

4374
49919

34730
3832
43750
5058

2106

2518e

2532

2548+

1802¢
2009
3051
3287¢
3385
40140
4662
1663

1808«
2014
3052¢
3323
3587¢
4085
46630
2016¢

c\4S
166/

2232
2147

2563
2234

1969+

2079

2081e¢

2517

1644+
1362
2260+

2226¢
2170
2220

809

2507¢

37310

3198¢
34670
38210

42430
4917¢

46370
2220
2891

S038
2012
1641
2106
1633
1645¢

37210

31670

41630
49050

46510
2166
1814

e4ll
2928

3160¢

2536

4168

48240

1988+

2055

2515

2035

2575«

5402«

2254
2220

2263

2271

2537

3430
3693¢

37%6

43629
4983¢

2643

3173¢

3472
3738¢

43694

So41¢
2863

3210

3506¢
3827¢

32366
33110
39110

44150

44270

32110

3248

4432

44338

5403e

5668+

50353¢

3316
3834¢

35176
3923

50594

32434
3537¢
3918¢

4559¢

32490

3547
39240

4571

F11
CZOZA-HO
CZ0ZAn . P11
$HIBTS
S$ICNT
$ILLUP
$INTAG
S$SITEMB
SLF
SLFLG
SLPADR

001462
001124
010464
001135
001134
001232
006247
001126

SLPERR

001130

$MADR1
$MADR2
$MADRS
$MADR4

001266
001272
001276
001302

SMAIL
sAMS1

001234
001264

srarS3
sS4

001274
001300

srArS2

$FBADR
SFFLG
$MSGAD
$MSGLG
$MNSGTY

SHTYP1L
sMT P2
$MTYPS
tHTYP4
$SMXCNT

$NULL

001270

1357¢
11620
2692
11760
11666
1203¢
2264¢
11636
3596
11640
12360
12400
12436
12464

1209¢

12300
1238¢

2145

5471

1338

1968+

2246¢

2258

001301
005374

1245¢
2091

2105¢

2810

3198
3366
35480
3821

3205
3372¢
33568
3827

32110
3417
3580
38340

001265
001271
001275

= 000037

001174

005336

1231¢
1239¢
1242¢

7966

010320
010454

001230
001200

001202
001204
001206
001210
001212
001214

2096

2105

2580s

2582

2861e

2862

2870e

<872

3093

3099¢

3122
3281

3129
3287¢

3135¢
3312
33511
3693¢

3160

3167

3173¢

4339

4157
4566
4991¢

5482

3041

3046

30526

3236
3423
3587¢
3911

2262¢

3088

3243
34310
3630
3918

32490
3438
3641
39240

41690
4631
5033

4243
4657
5039¢

4232
45630
5972¢

4258¢
4800

4362
4817

3047¢

30946

51300

31686

32064

32440

11840

2172

2220

35810
46580

36420
48180

36886
49180

37320
49664

38284
50544

12130

1640e

1995«

1998+

2005«

1637

2692¢

27120

1866

2220

2318

20868

2395«
2394«
2393+
2392¢
2391¢
2390«

2400
2401
2402
2403
2404
2405

5972
5972

2060

2702

001470

5477

4163
45720
S041

010372

SRCGO
SREGL
SREG2
SREGS
$SREG4A
$REGS

2093

S399s

22694

2725¢

SREGAD

1362

3597

2265¢
2243

010460

SUES

2094e

2365

2230
2240e¢
2245e
2238

$PURAD

IPWRUP

1970

2323+
2220
22700
1647«

1358¢
2224¢
12166
12176
12106

001242

$PWRDN
SPURMG

2105

2088
271270

12410
1244¢

$PASS

$PASTH

2090+

2087«
2708

001464
006246
001250
001252
001234

$NWTST= 000000

SOVER

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

SEQ 135

19-JUN-84 16:22 PAGE 136
CROSS REFERENCE TABLE -- USER SYMBOLS

1360¢

1123
2723¢

120106

1188¢

11900
11916
11920
11930
11946
1195¢

2062

1630

27084

2066

2077

$972
5972

2089

39196
2095¢

2006+

3274
3467
3648¢
3999

4369
48240
32824

34730

3681

4375¢
4905

3319¢

40094

4081¢

2023

2032

3687

4014¢

4415
4917

3367¢

41640

3318
33517¢
3721

4074
4427
492%¢

4080
44330
4974

34260
42530

43700

2106

S401+

3468¢

33240
3537
3731
4965

3512¢

44284

3359

5738¢

35434

45678

G611
CZDZA-M0
CZ0ZAM.P11

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

005070

SRTNAD

2022¢

$SUREG
$ SURMC=
$TESTN
STIMES

001256
000000
001240
001226

11816

4988¢

S036¢
2231
2176

SUNIT
SUNITH
SUSWR

001246
001472
001260

S$VECT2

001306

1248¢

= 000021

9540

= 0015.4

2208

12150
1361¢
1222¢

12470

933¢

2037

15140
13539
1559¢

20156
2065

1112¢
1204

5488+
2183

2295

2598

2612

2619

2626

A884¢

5296s

5336

5340

3206

32080

3244

32460

3094

3099

3130

3132¢

3168

3170¢

2093
3321¢
4083¢

2139¢
2169

2289

5297

2092¢
3284
4011e¢

005440
005652

2600

8294

2045
3246¢
3921¢

$TYPE
$TYPEC

2593

2734

2641

1646+
3208¢
3830+

2311

1915

23510

11600
3170
3734¢

2297

1914¢

2309

001122

2291

3314
4430

1817¢

2220

1359¢

2220

3470
4372

4872¢

2220

2205

46600
2209¢

2049
3132

2732

2139

4638
1765¢

30490

3383
4660

2048
3096

1913

1187¢

3047

3545
4569

2047
3049

4879

1805«

3369¢
3688
41660

808¢

2198

2046
2726

4841«

1804

3367
36440
4164

$TSTNM

$$GET4= 000000
$40CATs ssssss U

1816¢

3428
4235

2023
2103

4830

1803

33216
3642
40830

11826

005176

1810e¢

S609
4828+

2191

3319
3538306
4081

001170

= 000020

2220

$Se2
45S1e

2664
20%9

2063

32840
3381
4011¢

$TPS

2662
4546+

2061

3369
4166

3262
3545¢
4009

45690
11836

$XTSTR

S611
2196

2088

1783

3321
4083

5295«

001172

¢XON

1747

3204
4011

4886¢

$TPB

$XOFF = 000023

5056

3246
3921

4873+

= 00040

001304

808
2077

1199¢

$TN

$VECT1

s524
2189

1790

11966

006002

4822«

1744

001222

$TYPEX

2810¢

é%:go

sTMP2

001466

2105

2657
1751

001216

$TSTH

2091s

2626
1748

sTHPO

001177

2021
2095

2621
11804
265%
11960

$TPFLG

2013
2083

2082+

001164

001224

2004
2082

2093«
2004e¢

$TKS

sTIP3

1982
2081

2912

001166

001220

1201
2080

1221¢
2049
12120
12000

4988

$TNB

$TMP1

1200
2079

3208
3830

7964
2065

= 164000

27290

3170
3734

$SWR

- USER SYMBOLS

2711e

1133¢

2701«
1631
2004
2074

SEQ 136

2710e

2709
2052¢
2053
2092¢
1138

$SAVRG 010470
$SCOPE 0035122
$SETUP= 000000
$SVLAD 005320
$SVPC = 000040

19-JUN-84 16:22 PAGE 137
CROSS REFERENCE TABLE

4818
2220

5371e

48200
2311e

3644
4820

3690
4920

3426
3690¢
4253

34280
3732
4253560

3468
37340
4370

34700
3828
43720

3512
5830¢
4428

35140
3919
44300

3543
3921¢
4567

2093
3369¢
4166+

2106
3428¢
4255¢

2589
3470¢
4372¢

2830
3514¢
4430¢

2859
3545
4569+

3049
3583+
4660«

3096¢
3644+
4820+

3132¢
3690
4920

2881

2884

3033

4918
2512¢

49200
2643¢

4986

4988¢

5054

50566

2188¢

2213

2215

2218¢

1720

1734¢

173Se

1736+

1737¢

1738«

1739«

1749

2193

1739

2061

2220

2293

2595

2623

2659

2299

2303

2602

2605

2630

2633

1521
15416
1560

1523¢
1542
1562¢

1524
15440
1363

15266
15435
1565¢

1527
1547¢
1566

1529¢
1548
1568¢

1530
1550¢

1532¢
1551

1533
1553#

1535¢
1554

1536
1556¢

1538¢
1557

1113
1306¢

1116¢
13080

11206
13210

1133
1346

11340
1%47¢

11360
13490

11380
13516

11400
13666

11430
13700

1145¢
13710

11490
1372¢

11570
1373¢

gzg

2068¢

2200

2207

2220

H11
CZOZA-wO
.P11
CZOZAM

MACY11 30A(1052)

19-JUN-84 15:45

13740
1393¢
14150
14340
1453¢
14720

14910
15100
2730¢
4291

.ADVAN
-BEGIN

.DCLAS
.DELAY
.DEVIC
.ERRTA
. INSTR
.INST1
.PARAM
.PARIOD
.PAMCH
.RESOS
. SAVOS
.SCOP1
.SETFL
.START

007216
004624
006744
006740
007164
007176
007144
030312

006426
006252
006272
006274
006446
026744
027140

006706

006646
005122
005376
011152
002150
007122
002002
005422

.TRPTA
.TYPE
.$ASTA= sessss
= 001462
.4X

4618
4836
5633

1522
1958¢
1552
1549
1567
1558
1535
2526
1534
1531
22850

SEQ 137

19-JUN-84 16:22 PAGE 138
CROSS REFERENCE TABLE -- USER SYMBOLS
1375¢
1397¢
141606
1433

14540
14730
14920

1678
27716

4310
4624
4869
5640
25000

24120
2411e
24840
2488¢
24764
S871¢0
23160
2281¢
2319
22864
23270
S672¢
57310

24000
23864
20540
21100
27426
16264
1635
2470
2117¢
22217
1351

1379¢
1398¢
14170
14364
14350
14740
149606
1902¢
2773¢

4343

4647

4931

5645

S743
3034

2761
1647
2465¢

13004
1399
1416¢
1437¢
14364
1478¢
1497¢
2023
27754
4347
4694
3019

5656

1381¢
14004
14190
1438¢
14600
1479¢
1498¢
2103
2783

4451
4707
S142

58234

1382¢
1401¢
14200
14420

14610

1480¢

13834
14020

14240

14436
14620
14810
1500¢
2220
2933

4462
4732

5534

1384¢
14064
1425¢
14440
14630
14820
1501¢
22726

1388¢
1407¢

4477

4496
4743

4740

5537

142640
144346
14640

14830
1505¢

5546

13910
14100
14290
14510

1392¢

14110

14700
1489¢

1433¢
14520
14710
1490¢

2704
3831

4288

5627

4783
5630

4598
4768

2728

I11
MACY11l 30A(1052)

CZOZA-HO
P11
CZDZ. AM

COMMEN
ENDCOM
ERROR

19-JUN-84 15:45
928¢
928¢
822¢

19-JUN-84

3141
3332
3532
3868

3268
3486
391

4149

4121
4311

4348
4640

4612

Se13
5560

4784

ESCAPE
GETPRI
GETSWR
MAT
NEWTST

PAGE 140

CROSS REFERENCE TABLE

3105

5532

928¢
928¢
928¢
92846
92084

16:22

3147
3340
3335
3893
4198
4333

4700

Se28

5588

3206

3130
3828

3168
3919

2267

2713

2714

2229

2250

2694

2700

3131

3169
3920

3642

4009

3154
3350
3362
3897
4203

4403
4701

5237
5616

3244

4081

SEQ 138

-- MACRO NAMES

3179
3383
3619
3944

4209
4412

4708

5243
5622

3282

4164

3412

3976
4230

3991
4232

4471

35266
5625

5628

4721

3319
4253

3217

3192
3399

3185
3391
3623
3970
4225
4463

4733

3367

4478
4741

$309
S631

3426

3223
3437

3708

4289
4487
4744

5313
5634

4370

4428

4567

3230

3255

3712

3739

4292
4517
4747

4300

5641

4520
4753
5345

3261
3766
4119

4308
4531
4765

5501

5657

3512
4658

4818

4918

35543

3581

POP

PRGEND
PRGFRT
PUSH
REPORT
SC
SCOPE

SC1
SETPRI
SETUP
SKIP
SLASH
SPACE
STARS
SWRSV

TYPBIN
TYPDEC
TYPNAM
TYPNUM
TYPOCS
TYPOCT
TYPTXT

$BUFFE
$CYCLE
$EOP
$GETFL
$GETPA
$HEADE
$ INTSE
$ JUNK

SLINEV
SLVLTS

7960

928¢

7964
7964
92684
79640
7964
823¢
3582

4919

796¢
9284
9284
9284
928¢
92846
9284
3094
3732
9284
9284
9284
9284
928¢
9284
9284
9284

7964
7964
7964
7964
7964
7964
7964
7964
1494
7964
7964

3689
5055

3733

1153

4010

4082

4165

3283

3320
4254

3368
4371

4429

3427

3469
4568

3513
1659

3544
4819

1352
3367

1980

2042

4428

4567

4658

2222
5543

2690

4370

2124
3512

4818

4918

2706
3642

4986

4966

PASEND

140

1449

1458

1467

1476

1485

3207

3245

3168
3919

1204

1207

1343

4009

4081

4164

13435
3319
4253

1973
1775
1694

1709

1724

1784

1842

1877

1937

2844

4102

4127

4185

4212

1395

4933
1404

5021
1413

1422

1431

3738
4072

3834

4086

4169

4258

4375

4434

4573

4155

1131
3130
3828

3581

2766
2795

1368
1503

1377

1386

J11
MACY11l 30A(1052)

CZOZA-HO
CZOZAH P11

19-JUN-84 15:45
7960

3739

$MRR
$MRRW
srRD
$MSG
SPARTS

7960
7960
7960
79640
7960

3120
3504
2730
4903

$SETFL

7964

$MRESE

$SCOPEt
$STAG
$STAGF
$TCR
$TLINE
$ TRPOE
$TSTN

S$UNIBU
$VARIA
$XZ

$SOMRE
ssOMTTMM
$ SESCA
$ SNEWT

$ $ SKIP

.EQUAT
.HEADE
.SETUP
.$ACT1
. $APTB
.$APTH
. SAPTY
. $CATC
. $CMTA
. $EOP
. $ERRO
. $POME
. $SCOP
. $TRAP
.$TYPE

4993

7960

7966
7964
796¢
7964
7964

1563
7960

3641
4985

7964

7964
7966
3311
3640

4242
4984

1151¢
11510
9284
928¢
3642

4966
9284

7964
7964
7960
7964
7966
79640
79646
79640
7964
7964
7964
7964
7966
7966
7964

3415

2036
2736
3769

3310
3679
1521
1566
3046

3687
5053
3039
1148
3040
3317
3680

4251

5040
1190
1196
3047
3688
5054
818

799

1129
1205¢
1341
2220
1151
1978
2040
2121

19-UUN-84
16:22 PAGE 141
CROSS REFERENCE TAGLE

SEQ

139

-- MACRO NAMES

4170

4237

4259

4376

4435

4574

4663

4844

4925

1533

1536

1539

1542

1545

1548

1551

1554

1557

1560

4080

4163

3281

3318
4252

4369

3366

3425
4427

3467

4008

4566

3511
4657

4817

4917

3121
3424

3128
3457

3159

3166

3235
3541

3242
3567
4079

3273
3578

4414

4426

4558

3917
4650

3536

3280

3910
4565

3197
3510

1192
1198

1193

1194

1195

3130
3828

3168
3919

4009

4081

3835

4017

4087

4151

3158
3535

3196

3234

3272

4039

4329

4499

1524

1527

1530

3093
3731

3129

3167
3918

3045
3358

3087
3365
3720
4368

3092
3416
3730

4972

3871

3357

3686
4361

5052
1191
1197
3094

3732

3827

1199

3243

3244

3282

4164

3319

4253

4656

3367

4370

4007
4799

4073
4816

3426

3468
4567

4428

3542

4156

4904

4916

3512
4658

4818

3543

3580

4162
4973

3581

4918

K11

16:22 PAGE 142
MACY11 SOAC1052) 19-JUN-84
CROSS REFERENCE TABLE -- MACRO NAMES

CIDZA-HO

19-JUN-84 15:45

CZCZAH.P11

ABS.

032456

ERRORS DETECTED:

000
O

F
H P11
H/CR
: TOC=CZDZA
ZOZA
/SOL/NL
CZDZAH,C

RUN-TIME: 24 19 2 SECONDS

RUN-TIME RATIO:

CORE USED:

38K

132/46+2.8

(75 PAGES)

S€Q 140