Digital PDFs

AH-8899F-MC

November 1979

103 pages

Original

4.2MB

view download

OCR Version

4.3MB

view download

Document:	CZLACF0 LA36 LA36 TERM DL11 KL11 NOV 1979 bw
Order Number:	AH-8899F-MC
Revision:	000
Pages:	103
Original Filename:	CZLACF0__LA36__LA36_TERM_DL11__KL11__AH-8899F-MC__NOV_1979_bw.pdf

OCR Text

LA36 TERM DL & KLY

CZLACFO

A 8899F M

sevmign:

LICHE

ESEOAD
MADE

(ISA

—

JoACEG (AS6

kW
o

LRV]

bbbumuwmummuwmmmmmmmmmm..a_._._-.a_._._.._.. —

N—-OOONOU‘J‘WN—-OOONOJ'&U‘N-‘OO@NO Ak MV LT RV 7. Y. S

JoACE

TERM

(DL

£ KL 1)
“3-JUN-79 1 5:33%

MACY1T

30A€1052)

13-4UN=79

15:35

PAGE

SE0 000
-REM_

IDENTIFICATION

PRODUCT

(ODE:

AC-8898F
-M(C

PRODUCT

NAME:

CZLACFQ LA36

DATE:

AUGUST

MAINTAINER:

UIAGNOSTIC

TERM

(DL11

& KL1T)

1978
GROUP

THE INFORMATION IN THIS DOCUMENT 1S SUBJECT TO CHANGE
WITHOUT
NOTICE
AND
SHOULD
NOT
BE
CONSTRUED
AS
A COMMITMENT BY DIGITAL EQUIPMENT
CORPORATION.
DIGITAL EQUIPMENT CORPORATION ASSUMES NO
RESPONSIBILITY
FOR ANY ERRORS THAT MAY APPFAR IN THIS MANUAL.
THE SOFTWARE DESCRIBED IN THIS DOCUMENT 1S FURNISHED TO THE
PURCHASER
UNDER
A LICENSE FOR USE ON A SINGtE COMPUTER SYSTEM AND CAN BE COPIED
(WITH INCLUSION OF DIGITAL'S COPYRIGHT NOTICE) ONLY FOR
USE
IN
SUCH
SYSTEM, EXCEPT AS MAY OTHERWISE BE PROVIDED IN WRITIN
G BY DIGITAL.

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

(C)

1974,1979 BY

DIGITAL

EQUIPMENT

CORPORATION

CILACFD LA3G TERM (DL1T & KL 1)
CILACE P
13=JUN=-79 15:33

MACY11

30AC1052)

13-0UN-79

15:35

PAGE

SEQ 0002

45
PAGE

47
48
49

HISTORY

50
51
52
5%
954
22

1.9

DECO CZLAC-F=0

1.1.0

C(LOSED PROBLEM REPORT AA3318

1.1.1

58
59
60

11 WAS REPORTED THAT A

DL11-A

OPERATED

110

BAUD

CAUSED

FAILURE
IN
THE
AREAD ROUTINE BECAUSE THE 200 MSEC.
DELAY IS
NOT OF SUFFICIENT DURATION TO ALLOW
SETTING
OF
THE
RECEIVER
REGISTER
STATUS
“'DONE’' BIT
THROUGH
THE
MAINTENANCE
BIT
FACILITY,

THE

TIME DELAY WAS

INCREASED FROM 200 10 600 MSEC.

62
6
66

1.2.0

CLOSED PROBLEM REPORT

1.2.1

TESTS 56.57.60.61.62.63.64.65,AND 66 DO NOT RUN
PROPERLY
WHEN
RUN
ON
AN
LSI-11.
THIS PROBLEM WAS RESOLVED BY CHANGING THE

68
69

AA3643

BRANCH AFTER THE CHAIN COMMAND TO
GO
BACK
10
TEST
FOR
THE
LSI-11
SWITCH IN ORDER TO EFFECT THE APPROPRIATE ACTION DURING

EACH TEST.

72
;S

1.2.2

SECOND TIME-OUT IN TEST 64 ALLOWS EXCESSIVE WAIT
FOR
OPERATOR
RESPONSE.
THE TIME DELAY WAS REDUCED FROM ''177777" 10 "'600"".

75
76

1.2.3

COMMON ROUTINE TYPE DOES NOT SAVE THE CONTENTS OF RO
RESULTING
IN
THE
LOSS
OF
THIS
[INFORMATION
AND
CONSEQUENT
FAILURE.

INSTRUCTIONS WERE

;g
80

INCLUDED YO SAVE

THE

CONTENTS OF

INTO THE ROUTINE AND TO RESTORE THEM UPON EXIT.
1.2.64

LOSS

STACK

CONTENTS

INCORRECT SEQUENCE OF

FOR

NON-LSI=-11

RO ON

(OMPUTERS

ENTRY

DUE

INSTRUCTIONS IN TEST 65 WAS ALSO REPORTED

IN PROBLEM REPORY AA3803.

REFER 710

1.3.1.

gfi

87
88

1.3.0

CLOSED PROBLEM REPORT

1.3.1

TESTING OF NON-LSI-11 COMPUTERS RESULTS IN THE PROGRAM
HANGING
UP
BECAUSE
THE STACK GETS POPPED AWAY IN TEST 65.
THE BRANCH

AA3803

AFTER THE TEST FOR THE LSI=11

90
91

SWITCH IN TEST 65

SHOULD

THE
CHAIN COMMAND FOR PROPER EXIT FROM THE TEST FOR NON-LS]-11
MACHINES.
THIS CHANGE SUPERSEDES THE CHANGE RELEASED
IN
DEPO

MD=11=-DZLAC-D-1,

1.4.0

PROBLEM REPORT

96
97
98
99

1.6.1

PROCESSORS WITHOUT HARDWARE SWITCH REGISTERS ARE
NOT
ABLE
10
LOOP
ON
ERROR
WI!TH
THIS
PROGRAM,
INSTALLED *G FUNCTION 10
PERMIT
(HANGING
SWITCH
REGISTER
SETTING
DURING
DIAGNOSTIC
TESTING,

AA2390

MACY1T

30A(1052)

13-JUN-79

15:35

PAGE 3
SEQ 0003
PAGE

(=]

—

TABLE

CONTENTS

WP
= O
£~
<

LOADING PROCEDURE AND

—O

STARTING PROCEDURE
STARTING ADDRESSES
SWITCH REGISTER CONTROL WITH 1/0 TESTS
SWITCH REGISTER CONTROL WITHOUT 1/0 TESTS

NN
— O

W LN

[ASIAVT
N}, 63
no

ADDITIONAL

ABSTRACT

jogliealegllele o e Ro o e Ne Yo Ne Ne Ne Mo Ne No Neo No Mo e SNV IV I NS N s~

s
s
e
s
a4
s
s
e
*

NNy —

— = = 000NN
NN —
N
O

SPONNVNINININ
bt
b D s sttt b et . s e D
.
.
.

PRCGRAMS

INITIALIZATION

KEYBOARD CONTROL WITH 1/0 TESTS
KEYBOARD CONTROL WITHOUT 1/0 TESTS

KEYBOARD CONTROL
CONTROL 6

REQUIREMENTS

EQUIPMENT AND ASSIGNMENTS
STORAGE
PRELIMINARY PROGRAMS

OPERATING PROCEDURE
SWITCH REGISTER CONTROL

.
.
.

CIZLACFQ LA36 TERM (DL11Y R KL IRD.
CILACF.PYY
13~JUN-79 15:33

TEST DESCRIPTIONS
PRINTING TESTS

TESTO
TEST]
TEST?
TEST3
TEST4
TESTS
TESTE

TEST?7

~
=
=
-

= OVERPRINT TEST

TEST10
TESTI
TEST12
=
TEST17
ECHO TESTS
TEST20
=

TESTZ21
TEST2?2

DATA PATH TEST
PRINTABLE CHARACTER TEST
NON-PRINTABLE CHARACTER TEST
CARRIAGE RETURN TEST
MULTIPLE LINE FEED TEST
SINGLE LINE FEED TEST
BACKSPACE TEST

PRINTING FREQUENCY
RIBBON FEED TEST
PRINTER BELL TEST
LIFE TEST

SWEEP

TEST

CHARACTER ECHO TEST

= LINE ECHO TEST, FAST RATE
- LINE ECHO TEST, SLOW RATE

TEST23
- CHARACTER/CODE ECHO TEST
TEST24
= SELECTED FATTERN ECHO TEST
TEST25
- BELL ECHO TEST
STANDARD /0 TESTS

MACY11

30A(1052)

13-JUN-79

15:35

PAGE

SEQ 0004

NPT NN

NNNTNNN
NN

NNBNP NN

e el el

)

O 000~

NOOOOOOO‘O‘O‘O‘\I‘U‘\I‘\J‘\J‘\I‘ SN
—O

nd [

CZLACFO LA36 TERM (DL 2 KL 1)
CILACF.P1
13-JUN-79 1 5: 33

PAGE

1.0

ABSTIRACT

THIS

DIAGNOSTIC

d LoReR
o RVoRTe Rl o 200 ]
-~ [« RV F
P

200
201
202
203
204

DIVIDED

INTO THREE

BASIC

SECTIONS:

A CHECK OF

THE

A CHECK OF

THE PRINTING CHARACTERISTICS AND CONTROL LOGIC.

AN ECHO PORTION DESIGNED TO CHECK

PATTERNS

THE

CONSOLE

DIAGNOSIS OF

USED BY

THE

TERMINAL

PRINTING

INTERFACE

LOGIC.

THE KEYBOARD AND 10 AID

PROBLEMS.

TESTS

WERE

CHOSEN

FOR

EASE

vISUAL

VERIFICATION,
THE
ECHO TESTS WERE DESIGNED FOR MAXIMUM FLEXIBILITY,
WITH TEST 26 ALLOWING ANY DESIRED PATTERN 10 BE USED.

2.0

REQUIREMENTS

2.1

EQUIPMENT AND ASSIGNMENTS

THE

DIAGNOSTIC

1S WRITTEN

TO RUN ON ALL MODELS

THE

PDP-11

(COMPUTER

WITH EITHER A KL11 OR DL11 CONSOLE TERMINAL INTERFACE.
THE DIAGNOSTIC
1S PRESEY TO TEST UP_TO 16 ADDITIONAL TERMINALS (ON
DL11°S)
ASSIGMNED
BETWEEN
ADDRESSES
776500
AND 776676.
THIS PRESET QUANTITY (16) AND
PRESET ADDRESS (776500) CAN BE CHANGED BY DEPOSITING THE
QUANTITY
IN
DLNR ~ AND THE STARTING ADDRESS IN DLADR.
FOR EXAMPLE, TO ALLOW FOR UP
TO 31 ADDITIONAL TERMINALS, THE ADDRESS 775610 COULD
BE
PLACED
INTO
DLADR
AND THE OCTAL EQUIVALENT OF 31, [.E., (37) WOULD BE PLACED INTO
DLNR.
THE
NUMBER
OF
ADDITIONAL
DL11'S
ACTUALLY
TESTED
WiLL
BE
ADJUSTED

198
199

AUTOMATICALLY

DOWNWARD

BASED

UPON

THE

FIRST

DL11

ADDRESS

(WITHIN THE IMPLIED RANGE) FOUND TO BE UNRESPONSIVE.
THUS I+ THERE !S
NO
DL11
PRESENT
TO
MATCH
THE
ADDRESS
1IN
DLADR ONLY THE CONSOLE
TERMINAL WILL BE TESTED.
THEREFORE,
ALL
DL11'S
IN
EXCESS
OF
THE
CONSOLE
TERMINAL
MUST
HAVE
CONTIGUOUS ADDRESS ASSIGNMENTS WITH THE
LOWEST ADDRESS CORRESPONDING TO THE VALUE IN DLADR.
THE CONSOLE TERMINAL (ASSIGNED STANDARD) CAN BE REASSIGNED BY
PLACING
THE
ADDRESS
OF
17S
RECEIVER
STATUS
REGISTER
INTO CONADD AND ITS
RECEIVER INTERRUPT VECTOR INTO CONVEC.
THIS REASSIGNMENT CAN BE
MADE
TO
A
TERMINAL
WITHIN THE SET OF TERMINALS IMPLIED BY DLNR AND DLADR
WITHOUT ADVERSE EFFECT.
NOTE THAT A TERMINAL WITH A SLOWER SPEED
(IFf
ANY)
WILL
DETERMINE
THE
SPEED
AT
WHICH
ALL OF THE TERMINALS ARE
TESTED.
SUCH A TERMINAL SHOULD GENERALLY BE EXCLUDED FROM
THE
TEST,
OR TESTED SEPARATELY.
(RERER TO THE SYMBOL DEFINITIONS IN THE LISTING
FOR THE ABOVE MENTIONED LOCATIONS.)

2.2

STORAGE

THE DIAGNOSTIC PROGRAM USES ALL OF
AREA USED BY THE ABSOLUTE LOADER.

MEMORY

WITH EXCEPTION OF

THE

CZLACFO LA36 TERM (DL 4 KL 1)
CILACF.PYI
i3-JUN-79 1 5: 33

AN 1,91
VY I
LA
nroro DIND 2

b by s

LaV 1 N VT ST RYNY Y V) n

RO
TN VNS
O el

[=]

205
206
207
208

MACYTT

30AC1052)

13-JUN-79

15:35

PAGE

Sta 000°
PAGE

2.3

2.4

PRELIMINARY PROGRAMS

ANY APPLICABLE PDP-11 DIAGNOSTICS SHOULD BE RUN ON THE PROCESS
OR.
ANY
ERRORS
ARE
ENCOUNTERED DURING THE INTERFACE CHECK, REFER 10
APPROPRIATE INTERFACE DIAGNOSTIC FOR
FURTHER
HELP
IN
LOCATING
PROBLEM 1F NEEDED.

IF
THE
THE

ADDITIONAL PROGRAMS

THIS DIAGNOSTIC IS FOR VERIFICATION OF BASIC TERMINAL FUNCTIO
NS
ONLY.
IF
THE
TERMINALS
UNDER
TEST
HAVE
HARDWARE
OPTIONS INSTALLED RUN
DIAGNOSTIC MAINDEC-11-DZLAF-A , THE LA36 TERMINAL OPTIONS TEST.

3.0

LOADING PROCEDURE AND INITIALIZATION

LOAD THE LA36 DIAGNOSTIC PROGRAM
TAPE
BEFORE
STARTING
THE PROGRAM, REFER TO

"DLY''.

NrororoNrOrOrO
N
Al el Y AV LY, IV TP T
NOOO O VNS iy —

FOLLOWING
NORMAL
THE DESCRIPTION OfF

TIME DELAYS USED BY THE PROGRAM ARE

FUNCTION

PROCEDURES.
THE ROUTINE

THE

CPU

MODEL
AND
MEMORY
TYPE
AND
SHOULD
BE
SET-UP
BEFORE
RUNNING [HE
DIAGNOSTIC.
THE ROUTINE 1S PRESET FOR A PDP-11/05 WITH
CORE
MEMORY.
REFER
TO
SECTION
2.1
FOR
NON-STANDARD
TERMINAL ADDRFSSES AND FOR
TESTING MULTIPLE DL11 INTERFACES.

1F A HARDWARE SWITCH REGISTER DOES NOT EXIST, THE PROGRAM
WILL USE THE
CONTENTS
OF
LDCATION
176
AS
THE
VALUE OF THE SWITCHES.
WHEN THE
PROGRAM STARTS UP, IT WILL ASK FOR A VALUE TO BE
ENTERED
BEFORE
THE

PROGRAM WILL

THE

CPU

PROCEED.

IS AN LSI=11,

SPECIAL

TESTS

ARE

4.0

STARTING PROCEDURE

&.1

STARTING ADDRESSES

11/03 BE

RUN ON THE

SURE

TO SET

DLVI1

SWITCH REGISTER BIT

INTERFACE.

200(8)

= RUN WITH SWITCH REGISTER CONTROL

2064(8)

= RUN WITH SWITCH REGISTER CONTROL

210(8)

- RUN WITH KEYBOARD CONTROL

214(B)

- RUN WITH KEYBOARD CONTROL

- PERFORM CONSOLE

- SKIP CONSOLE

TERMINAL

PERFORM CONSOLE

= SK1P CONSOLE

TERMINAL

TESTS,

1/0 TESTS.

TERMINAL

1/0

1/0 TESTS.

/0 TESTS.

9 10

CILACFO LA3G TERM (DL1Y 8 KL [RY
CILACE P11
13=JUN-79 15:3
5: 3

259
260
261
262
263
264
265
266
267

MACYT1

30A€1052)

13-JUN-79

15:35

PAGE

SEQ 000+
PAGE

4.2

SWITCH REGISTER CONTROL WITH
A,

gE}1EHE
W

SWITCH REGISTER

1/0

TESTS

TO 200(8)

AND PRESS

SET SWITCH REGISTER BIT 9 TO A
1
IF
THE
LSI-11, 11/03,
REFER TO SECTION 5.1.5.

268
269

THE

LOAD

ADDRESS

PROCESSOR

SET THE SWITCH REGISTER BITS 7-0 EQUAL TO THE PAPER WIDTH
[N
TERMS
OF
THE
NUMBER
OF COLUMNS (OCTAL).
REFER TO SECTION

5.1.8.

SET THE SWITCH REGISTER BIT
START
SWITCH.
A
MESSAGE

NUMBER OF

DL11'S BEING

8 EQUAL TO 1 OR 0 AND
PRESS
THE
WILL
BE
PRINTED INDICATING THE

TESTED.

REFER

IF BIT 8 WERE ZERO
WHEN
STARTING,
THE
EXECUTED
SEQUENTIALLY,
AFTER THE ENTIRE
ARE EXECUTED.

SECTION

5.1.6.

PRINTER
TESTS
ARE
SERIES OF 1/0 TESTS

IF BIT B WAS SET WHEN
THE
START
SWITCH
WAS
PRESSED.
THE
ENTIRE
SERIES OF 1/0 TESTS WILL BE FXECUTED AND THE CPU WILL
HALT AT LOCATION SELHLT.
THE PROGRAM WiLL
THEN
BE
WAITING
FOR CONTROL VIA THE SWITCH REGISTER,

4.3

SWITCH REGISTER CONTROL - WITHOUT

1/0 TESTS

SAME

SET

204(8).

SECTION 4.2

EXCEPT

IN STEP

THE

SWITCH

REGISIER

CZACFO LA3G TERM (DL 4 KL 1)
CILACF.P1Y
13-JUN-79 1 5: 33

30AC1052)

12-JUN-79

H
15:35

PAGE

SEQ 0007
PAGE
4.4

KEYBOARD

- WITH

1/0

TESTS

gEITENE
WITCH,

SET THE SWITCH REGISTER BITS 7-0 EQUAL TO THE PAPER WIDTH
|IN
;E$"§
OF
THE
NUMBER
OF COLUMNS (OCTAL).
REFER TO SECTION

SET

SWITCH REGISTER

TO 210(8)

SWITCH REGISTER BIT 9

LSI=11,

11/03.

TO A

AND

PRESS

REFER T0 SECTION S.1. 5.

THE

LOAD

PROCESSOR

ADDRESS

SET SWITCH B AND PRESS THE START SWITCH.
A MESSAGE
WILL
BE
PRINTED
INDICATING THE NUMBER OF DL11'S BEING TESTED.
REFER
TO SECTION 5.1.6.

IF BIT B WAS
JERO
WHEN
STARTING,
THE
EXECUTED
SEQUENTIALLY
AFTER
THE ENTIRE
ARE EXECUTED.

(=]

NI ()

CONTROL

WA — O 000~

L4 L8 L Lt Lt L W U L L N N

PCPOMNIAY
s s
b s a2 —

293
294
295
296
297
298
299
300
301
302
303
304
305
306
307
308
309

MACYTT

BIT

B WERE

SET

WHEN

THE

START

PRINTER
TESTMS
ARE
SERIES OF /0 TESTS

SWITCH

WAS

THE

SWITCH

PRESSED,

THE

ENTIRE
SERIES
OF 1/C TESTS WILL BE EXECUTED FOLLOWED BY THE
SELECT TEST MESSAGE.
THE PROGRAM WILL THEN BE WAITING FOR
A
gEST
SELECTION
VIA ANY TERMINAL KEYBOARD.
REFER TO SECTION

4.5

KEYBOARD CONTROL - WITHOUT

3AHE gS SECTION 4.4
14 (8).

5.0

EXCEPT

/0 TESTS

IN STEP

SET

OPERATING PROCFDURE

THE PROGRAM (AN BE CONTROLLED
IN
EITHER
OF
TWwO0
METHODS:
BY
THE
CONSOLE
SWITCH REGISTER OR FROM THE KEYBOARD OF THE TERMINAL(S) UNDER
TEST.

CZLACFO LA36 TERM (DL 14 KL 11)
CILACF.P1Y
13=JUN-79 1 5: 33

336
337
338
339
340
341
342
343

344
345
346
347
348
349
350

MACYTT

30A(1052)

13-JUN-79

15:35

PAGE

SEa 0008
PAGE

5.1

SWITCH REGISTER CONTROL

THE VARIOUS SWITCHES AND THEIR FUNCTIONS ARE LISTED
BELOW.
SWITCHES
MAY
BE
CHANGED
AND
SET
AS DESIRED EXCEPT AS NOTED IN THE SPECIFIC
SWITCH DESCRIPTIONS.
REFER TO THE DETAILED
SWITCH
DESCRIPTIONS
FOR
FURTHER, MORE COMPLETE INFORMATION.

SWITCH NUMBER

351
352
3

Y
¥
S

DESCRIPTION

1(UP)
0(DOWN)
1(UP)

1(UP)
O(DOWN)

= DRIVE ONLY CONSOLE TERMINAL
= DRIVE ALL TERMINALS

1(UP)

O(DOWN)

5
356
357
358
359
360
361
362
363
364
365

O(DOWN)

5.1.1

HALT AT END OF TEST
CONTINUE TEST SEQUENCE
CONTINUE

ON ERROR

- HALT ON ERROR

LOOP ON

INDIVIDUAL

NORMAL TEST

TEST

SEQUENCE

1(UP)
0(DOWN)

CPU TYPE IS AN LSI-11,
- ALL OTHER PDP-11'S

1(UP)
0 (DOWN)

= RUN TEST ONCE AND HAL~
LOOP ON TEST SEQUENCE

5-0

TEST NUMBER SELECTION

7-0

NUMBER OF

COLUMNS AT

11/03

START-UP

SWITCH 15

WITH SWITCH 15 IN THE UP POSITION, THE PROGRAM WILL HALT AT THE END OF
THE
CURRENT
TEST,
REPLACING
SWITCH
15
10
THE DOWN POSITION AND
PRESSING CONTINUE WILL CONTINUE THE NORMAL TEST OPERATION.
DURING THE
HALT, ANY OF THE CONTROL SWITCHES MAY BE CHANGED OR SET AS DESIRED.

5.1.2

SWITCH 14

PLACING SWITCH 14 IN
THE
UP
POSITION
WwILL
CAUSE
THE
PROGRAM
CONTINUE
ON
ERRORS DURING ANY OF THE 1/0 TESTS ONLY.
WITH SWITCH

OOWN,

TESTS
CAUSE

UP,

THE PROGRAM WILL HALT

(AT

WITH
THE
LOCATION OF
THE PROGRAM TO CONTINUE

ERRHLY)

THE ERROR
IF SWITCH

PRESSING CONTINUE WILL CAUSE

ON ANY ERRORS DURING

THE

T0
14

1-0

IN RO.
PRESSING CONTINUE WiLL
14 IS DOWN.
WITH
SWITCH
16

THE PROGRAM T0O LOOP ON THE FRROR.

CILACFO LA36 TERM (DL
KL 11)
CILACE P
13-JUN-79 1 5: 33

MACY11

30A(1052)

NC N WO

NN
— OOV

PAGE

NOTE
ERROR HALTS CAN OCCUR
ONLY
DURING
THE
1/0 TESTS.
THE TERMINAL IS CONNECTED 10
A SERIAL LINE
AND
THERE
[S
NO
ERROR

398
399

Lol
ol olo TR
R ol o NV N NP
naro NN LA R PR

1
15:35

PAGE

396
397

625
426
627
428
629
630
431
432
633
634
635
436
437
438
639
440
441
4462
443

SEa 0009

390
391
392
393
394
395

400
401
602
403
404
405
406
407
408
409

13-J4UN-79

INFORMATION RETURNED TO THE PROGRAM FROM

THE
TERMINAL.
THEREFORE
THE
PROGRAM
CANNOT
REPORT
ERRORS
OCCURRING IN THE
TERMINAL.
ERRORS
DETECTED
DURING
THE
INTERFACE
TESTS WILL RESULT IN HALTS AS
DESCRIBED ABOVE.

5.1.3

SWITCH

PLACING SWITCH 13 IN THE DOWN POSITION WILL
MULTIPLE TERMINALS DURING THE PRINTER TESTS
ONLY THE CONSOLE TERMINAL IS DRIVEN.

*+ NOTE:
SWITCH 13 SHOULD ONLY
FOR A TEST SELECTION.

5.1.4

CAUSE
ONLY.

C(HANGED WHEN

THE
IF

THE

DRIVING
OF
ALL
SWITCH 13 IS UP,

PROGRAM

#AITING

sSWItTCH 11

PLACING SWITCH 11 UP AT ANY TIME WILL CAUSE THE PROGRAM TO LOOP
ON THE
CURRENT
TEST
AS
LONG
AS SWITCH 11 REMAINS UP.
REPLACING SWIT(H 11
DOWN WILL
CAUSE
THE
PROGRAM
TO
RESUME
NORMAL
OPERATION
AT
THE

COMPLETION CF

5.1.5

THE

TEST.

SWITCH 9

PLACING SWITCH 9 UP AT THE START OF THE TEST WILL CAUSE
AN
AUTOMATIC
CHANGE
IN
THE
DELAY
TIMING, AND THE EXECUTION OF SPECIAL DLVl [/0
TESTS.
THE DLV11 HAS NO MAINTENANCE MODE AND WILL CAUSE
THE
PROGRAM

TO HANG

5.1.6

TESTED AS A DL11,

SWITCH 8

WITH SWITCH 8 IN THE DOWN POSITION THE PROGRAM WILL CONTINUE
T0
LOOP
THROUGH THE PRESENT TEST SEQUENCE.
PLACING SWITCH 8 UP WILL CAUSE THE
PROGRAM TO HALT (AT SELHLT) AT THE COMPLETION
OF
THE
CURRENT
TEST.
AFTER THE HALT, SET THE CONTROL SWITCHES AS DESIRED AND SET SWITCHES 5
TO O YO THE NEXT DESIRED TEST NUMBER, AND THEN PRESS CONTINUE 1O START
THE

TEST,

CILACFO LA36 TERM ‘DL £ KL 1R D)
CZULACE.P1Y
i3-JUN-79 1 5: 33

MACYT1

30A€1052)

13-JUN-79

1
15:35

PAGE

Sec 0010

444

PAGE

645

446

647
448
449
450
491
45?2
453
654
455

WHEN STARTING THE DIAGNOSYIC
RATHER
THAN
AUTOMATICALLY

THE OPERATOR CAN SELECT A
SPECIFIC
TEST
STARTING
THE
PRINTING
TEST SEQUENCE BY

SETTING SWITCH 8 UP BEFORE STARTING THE DIAGNOSTIC.
UPON
COMPL
T 1ON
E
OF
THE
1/0 TEST SEQUENCE (I1F BEING RUN) THE PROGRAM WILL EITHER HALT
AT SELHLT WAITING FOR A TEST SELECTION
VIA
THE
SWITCH
REGISTER
OR
PRINT
THE
SELECT TEST MESSAGE AND WAIT FOR A TEST SELECTION FROM ANY
KEYBOARD.
REFER TO SECTION & FOR FURTHER INFORMATION.

456

45/
458
459
460
461
462
463

464

5.1.8

466

AT START-UP ONLY, SWITCHES 7 TO O ARE USED
NUMBER
OF
COLUMNS
THE
DIAGNOSTIC 1S TO

465

467
468
469
470

5.1.7

SWITCHES 5

10 0

TO O ARE USED TO SELECT

CONTROL.

TEST

SWITCHES 7 TO O

NUMBERS

ARE

SPECIFIC
ALWAYS

TESTS

WHEN

IN OCTAL.

UNDER

SWITCH

(AT START-UP ONLY)
TO SET
TEST.

THE DESIRED
MAXIMUM
IF THE NUMBER SET IS

GREATER THAN 132(10) OR LESS THAN 30(10), THE PROGRAM WILL DEFAULT
TO
132010).
THE
VALUE
SET
MUST
BE
IN OCTAL FORM.
THUS, FOR NORMAL
CPERATION LEAVE SWITCHES 7 1O O DOWN TO TEST THE FULL 132(10) COLUMNS.

CILACFO LA36 TERM (DLI1T L KL 1)
CILACE
. P11
13-JUN-79 1 5: 33

471
472
473
474
675
476
477
478
479
480
481
482
483
484
485
486
487

488
489
490
491
492
493
494
495
496
497
498
499

MACY11

OO0
~NO
W

(VI

IV IV AT SV A IV TV IV TV S

NORIPIPOPONIN)
mt =2 bt s
s
so
[o O B RV EEST @ LV Jo - LNTs XV N FPT ¥ — 0

IO IV, IV, TV, IV, 1V,

508

13-4UN-79

15:35

PAGE

SEa 0011
PAGE

5.2

KEYBOARD CONTROL

THE PROGRAM WILL BE UWNDER KEYBOARD CONTROL WHENEVER THE
DIAGNOSTIC
IS
STARTED
AT
LOCATION
210
OR
214.
SWITCHES
ON THE CONSOLE SWITCH
REGISTER WILL HAVE NO EFFECT WHEN UNDER TERMINAL
CONTROL
EXCEPT
FOR
Eg;}gg
15.
THE
1/0
TESTS
(CANNOT
BE SELECTED WHEN UNDER KEYBOARD
L.

TO STOP A TEST AT

KEYBOARD.

SWITCH 13
;DSESTE",
Y

ANY

ANY TIME,

TERMINAL MAY

TYPE THE '‘RUBOUT'' OR "'DELETE' KFY
STOP

TEST

AND

SELECT

THE

TEST

ANY
If

NUMBER

AT THIS TIME, TYPE THE DESIRED
FOLLOWING CONTROL CHARACTERS:

THE

1S DGWN.
WHEN A TEST 1S STOPPED BY
TYPING
A
"'RUBOUT"" OR
THE
TEST
WILL TERMINATE AND THE FOLLOWING MESSAGE WILL BE
SELECT

(PERIOD)

500
501
502
503

505

30A€1052)

NUMBER

= RUN THE SELECTED
TEST SELECTION.
=

TEST

LOOP ON

TYPED.

START

THE

TEST

SELECTED

TEST

FOLLOWED BY ANY ONE

ONCE

AND RETURN FOR

TEST

SEQUENCE

WITH

UNTIL

THE

ANOTHER

'‘RUBOUT'

SELECTED

CONTINUE
TO
LOOP
ON
THE PRINTING TEST
UNTIL A "RUBOUT' IS TYPED.

THE "'L'' OR *'S'' MAY BE EITHER UPPER OR LOWER CASE, BUT

THE

TEST

TEST.

SEQUENCE

NUMBER

MUST ALWAYS BE A 2 DIGIT OCTAL NUMBER.
THE TEST NUMBER AND TERMINATOR
ARE ECHOED BY THE PROGRAM, THUS EACH CHARACTER WILL BE
PRINTED
TWICE

THE

TERMINAL

IS IN HALF

DUPLEX.

“S' WILL ONLY RUN THE TEST ONCE

FOR ALL ECHO TESTS,

(THE SAME AS IF

THE ‘'L’' AND

TYPING A PERICD).

FOR

ALL
OPTION TESTS, THE ''S"" WILL ONLY RUN THE TEST ONCE (THE SAME AS IFf
TYPING A PERIOD), HOWEVER, TYPING AN 'L’ WILL
CAUSE
THE
PROGRAM
TO
LOOP
ON
THE
SELECTED
TEST.
If
AN
ERROR 1S DETECTED IN THE TEST
SELECTION (ILLEGAL TEST NUMBER OR CONTROL CHARACTER), A QUESTION
MARK
IS PRINTED AND THE MESSAGE WILL BE REPEATED.

5.3

"G FUNCTION

THE PROGRAM WILL SENSE “G COMMANDS WHEN STARTED @ LOCATION 200 OR 204.
CONSOLE
SWITCH
REG.
VALUES WILL BE ENTERED FROM THE 1TY AT START UP
TIME WITH THE OLD VALUE INDICATED.
TO CHANGE A
VALUE
TYPE
*G.
If
TEST
WAS
STARTED @ LOC 200, AT THE END OF A PRINT TEST THE NEW VALUE
(AN BE ENTERED.
IF TEST WAS STARTED AT LOC 204, DATA CAN
BE
CHANGED
BEFORE
TEST FINISHES.
“U ALLOWS INCORRECT DATA ENTRIES 70 BE DELETED
AND A NEW ENTRY STARTED.

CZLACFO LA36 TERM (DL)1I £ KL 1)
CILACF.P1Y
13-JUN-79 1 5: 33

MACY1T

30A€1052)

13-JUN-79

1
15:35

PAGE

SEa 0012

A (O RV IV IV TV IV TV 1V )
RN (Ve IV IV IV TV TV

N—=OD® NV
D

PAGE

6.0

TEST DESCRIPTIONS

6.1

PRINTING TESTS

THESE TESTS ARE DESIGNED AS A TEST OF THE PRINTING MECHANISM
AND
THE
ASSOCIATED
CONTROL
LOGIC.
AT
THE BEGINNING OF EACH TEST, TME TEST
NUMBER WiLL BE PRINTED INDICATING WHICH TEST IS BEING EXECUTED AND, If
THE TEST IS A FUNCTION OF THE NUMBER OF COLUMNS, THE NUMBER
OF COLUMNS
BEING TESTED WILL BE INDICATED.
A
DETAILED
DESCRIPTION
AND
SAMPLE
PATTERNS FOR EACH PRINTING TEST FOLLOWS:

S
o

543
544

547

D OGO

Wiy —On

At
ALY ALY 1YY, ]ACAAY ARV )
A A ALY TV TV YV TV Y ALY
o

548

6.1.1

TEST O - DATA PATH TEST

THIS TEST IS USED TO TEST THE DATA LINES TO AND THROUGH THE
INTERFACE
AND
TO
THE
TERMINAL.
AN ALTERNATING BIT PATTERN IS SENT WHICH WILL
PRINT ALTERNATING *°S AND U'S IN A CHECKERBOARD PATTERN TO THE MAX]MUM

COLUMN
WIDTH.
THE STARTING CHARACTER FOR EACH LINE
A TOTAL CF FOUR LINES ARE PRINTED.

1S ALTERNATED AND

WITH THE AUTO LINE FEED OPTION SET TO PRODUCE AN AUTOMATIC
LINE
AFTER
EVERY
RECEIVED
CARRIAGE
RETURN,
THERE
WILL BE A BLANK
BETWEEN EACH PRINTED LINE.

FEED
LINE

EXAMPLE:
*UrUrUrUsUrUsUrUrUrUrUrUrUrUrL
UsUrUrUrUsUrUsUsUrUtUrUrey
ry
rUrUrUsUsUrUerUrUrUrUrysyrUryry
UrUrUrUeyeeUeryeysyeleyeyeyr

6.1.2

OOONO
NS W

(U W L IV IV IV 1V
NNNNN
NN

THIS

TEST
TEST

- PRINTABLE CHARACTER TEST

PRODUCES A CHECK OF

ALL 94(10)

PRINTABLE

CHARACTERS.

THE

CHARACTERS
ARE PRINTED IN GROUPS OF THREE WITH THREE GROUP5 PER _INE,
SEPARATED BY THREE SPACES
BETWEEN
GROUPS.
THE
FIRST
COLUMN
WILL
CONTAIN
ALL ASCI1 CODES FROM 040 TO 077.
COLUMN TWO WILL CONTAIN ALL
ASCIT CODES FROM 100 TO 137 - PRIMARILY THE CAPITAL LETTER
SET.
THE
LAST
COLUMN
WILL CONTAIN ALL ASCII CODES FROM 140 TO 176 - PRIMARILY
THE

SMALL

LETTER

SET.

WITH THE AUTO LINE FEED OPTION SET TO PRODUCE AN AUTOMATIC
LiNE
FEED
AFTER
EVERY
RECEIVED
CARRIAGE
RETURN,
THERE
WILL BE A BLANK LINE

BETWEEN EACH PRINTED LINE.

CILACFO LA36 TERM (DL11T L KL 1)
CILACF
.P
13-JUN-79 1 5: 33

580
581
582
583
584
585
586
587
588
589
590
591
592

MACYT]

BAA

PAGE

AAA

B8B

BBB

$6%
XXX

0DD
EEE

DODD
EEE

888
tre

FFF
666

ccC

FF§
GGG

(((
)))

HHH
111

e
+44

JJJ
KKK

JIJ
KKK

ree
===
“ee
///

LLL
MMM
NNN
00G

LLL
MMM
NNN
ooC

111

Qaa

qaaQ

000
222
333

444

606
607
608
609
610

saa

"""

597
598
599
600
601
602
603
604
605

634

T
15:35

:
EXAMPLE

596

627
628
629
630
631
63¢
633

PAGE

593

621
622
623
624
625
626

13-JUN-79

SEC 0013

594
595

611
612
613
614
615
616
617
618
619
620

30A(1052)

555

PPP

RRR
SSS
TTT

uuwu

666
777

Vv
WWW

111

888
999

xXxx
YYy

«<<
z=s=

PPP

RRR
SSS
111

uuu

vy
W
XXX
YYY
222

A\
111

227

6.1.3

TEST 2 - NON-PRINTABLE CHARACTER TEST

THIS TEST CHECKS ALL NON-PRINTABLE CHARACTERS
THAT
HAVE
NO
FUNCTION IN THE LA36 TERMINAL OR THE LA36 OPTIONS (SUCH AS CR,

& BEL).

FIRST

THE ASCII

CONTROL
LF, BS,

CODE WILL BE PRINTED FOLLOWED BY THE MNEMONIC

AFTER
A
FEW
SEPARATING
SPACES.
FOLLOWING THE MNEMONIC, THE ACTUAL
CONTROL CHARACTER WILL BE SENT THREE TIMES AND NOTHING
SHOULD
HAPPEN
AT
THE
PRINTER.
THIS
PATTERN
1S REPEATED, THREE TIMES ON A LINE,

UNTIL ALL OF

THE NON-PRINTING CHARACTERS HAVE BEEN TESTED.

WITH THE AUTO LINE FEED OPTION SET TC PRODUCE AN AUTOMATIC
LINE
FEED
AFTER
EVERY
RECEIVED
CARRIAGE
RETURN,
THERE
WILL BE A BLANK LINE

BETWEEN EACH PRINTED LINE.

CILACFO LASO TERM (DLTY & k1Y)
CILACE . P1Y
i3~JUN-79 15:33

635
636
637
638
639
640

MACY1T

30AC1052)

001

035

644

DLE

031

646

664

SOH

020

645

661
662
663

PAGE

EXAMPLE:

023
026

15:35

PAGE

642
643

656
657
658
659
660

SEQ 0014

641

647
648
649
620
651
652
653
bgg

13-J4UN-79

6.1.4

TEST

STXx

02V

DC1

006

022

ACK

DC2

DC3
SYN

024
027

DC&
ETB

025
030

NAK
CAN

G6S

036

037

177

002

032

SuB

034

3 - CARRIAGE RETURN TEST

THIS TEST CHECKS THE CARRIAGE RETURN FROM ALL
EVEN
NUMBERED
COLUMNS
AND THE SPACING OF THE SOLENOID HEAD FROM THE LEFT MARGIN.
IT IS ALSO
A GOOD CHECK FOR PROPER OPERATION OF THE POSITION DECODER.
THE TEST PRINTS A FULL LINE OF ALTERNATING 0°'S
AND
SPACES,
STARTING
WITH
A
0.
AT THE END OF THE LINE THE PRINT HEAD IS RETURNED 10 THE
LEFT MARGIN WITH A CARRIAGE RETURN.
THE SPACES ARE THEN FILLED IN
By
SPACING
THE
PRINT
HEAD OUT FROM THE LEFT MARGIN 10 THE FIRST SPACE,
PRINTING AN ''X'', AND EXECUTING A CARRIAGE
RETURN.
THIS
PATTERN
IS
REPEATED
UNTIL
THE LINE 1S COMPLETED.
CHECK T0 SEE THAT ALL X'S ARE
IN THE MIDDLE OF THE SPACE BETWEEN THE TWO ZEROES ON
EITHER
SIDE
OF
IT.

665

666

667
bbg

EXAMPLE
:

0x0X0xXx0X0Xx0x0X0OX0X0X0X0X0X0X0xX

670
671
672
673
674
675
676
677
678
679

682
683
684
685
686
687

WITH THE AUTO LINE FEED OPTION SET TO PRODUCE AN AUTOMATIC
LINE
FEED
AFTER
EVERY
RECEIVED CARRIAGE RETURN, THIS TEST WILL PRINT A LINE Of
0'S AND SPACES, THEN PRINT A DIAGONAL LINE OF X'S.
TO CORRECTLY CHECK
THE ENCODER, THE AUTO LINE fEED OPTION SHOULD BE DISABLED.

EXAMPLE:
000000000

CZLACFO LA36 TERM (DL11T 4 KL 1)
CZLACF.P1Y
13=-JUN=-79 1 5: 33

688
689
690
691
692
693
694
695
696
697
698
699
700

NN NN NNNNNN~N
N~ ~
LS, V], %7, N7, V7 v -—i—‘_—l—‘—‘—.—-b_..—l —
NN
—O N~
NP
o

701
702
703
704
705
706
707
708
709

726
727
728
729
730
731

MACYTT

30AC1052)

13-JUN-79

15:35

PAGE

SEQ 00'5
PAGE

6.1.5

TEST & - MULTIPLE LINE

FEED TEST

THIS TEST CHECKS THE LINE FEED CAPABILITY OF THE
PRINTER
BY
SENDING
VARIOUS
GROUPS
OF
LINE FEEDS INTERSPACED WITH REFERENCE LINES.
THE
NUMBER PRINTED AS THE REFERENCE LINE
INDICATES
THE
NUMBER
OF
LINE
FEEDS
THAT FOLLOW.
THE FIRST AND LAST LINES ALSO CONTAIN A STRING OFf
DASHES AS REFERENCE POINTS FOR MEASURING THE
THE TWO DASHED LINES, 1.E., 63(10) LINES.

TOTAL

DISTANCE

BETWEEN

WITH THE AUTO LINE FEED OPTION SET TO PRODUCE AN AUTOMA
TIC
LINE
FEED
AFTER EVERY CARRIAGE RETURN, THE NUMBER PRINTED
WILL INDICATE ONE LESS
THAN THE NUMBER OF LINE FEEDS (THE NUMBER OF BLANK
LINES) THAT FOLLOW.
THE TOTAL DISTANCE BETWEEN THE TWO DASHED LINES WILL
THEN BE 69 LINES.

EXAMPLE:

02
04

16
\

/
\

15 BLANK LINES

31 BLANK LINES

CILACFO LA36 TERM (DL11 £ KL i
CILACF PN
13-JUN-79 1 5: 33
732
733
734
735
736
737
738
739
740
741
742
743
744
745
746
747
748
749
750
751
752
753
754
755
756
757
758
759
760
761
762
763
764
765
766
767
768
769

MACYTT

30A(1052)

13-JUN-79

15:35

PAGE

SEQ 0016
PAGE

6.1.6

TEST

5 - SINGLE LINE FEED TEST

THIS TEST 1S DESIGNED TO CHECK THE TIMING OF SINGLE LINE
FEEDS AND THE
CAPABILITY
OF
DOING
LINE FEEDS IN ALL COLUMNS.
TWO REFERENCE LINES
ARE USED BY THIS TEST (AND TES! 6) WHICH ALSO CAN BE
USED
1O
EASILY
CHECK THE NUMBER OF COLUMNS THE PRINTER IS PRINTING.

THE

FIRST

REFERENCE

TESTING

LINE

132(10)

CONTAINS

COLUMNS.

130(10)

ZEROES

LESS THAN

FOLLOWED

132

TW0 2°'S

(OLUMNS,

THE LINE

WILL CONTAIN
0°'S FOR TWO LESS THAN
THE
MAXIMUM
NUMBER
OF
COLUMNS
FOLLOWED
BY
THE
TWO
2'S.
THIS
REFERENCE
LINE IS A QUICK CHECK
FOR 132(10) COLUMNS 1F TESTING THE FULL
132(10) COLUMNS.
THE
SECOND

REFERENCE LINE PRINTS A STRING OF NUMBERS ( 1
THE MAXIMUM COLUMN.
THIS LINE, AGAIN, CAN BE
THE NUMBER OF COLUMNS.

THE

LINE

FEED TEST

0'S

AND

IS ACCOMPLISHED BY:

TWw0 2'S;

THEN

TO
9 & 0 ) REPEATED 10
USED AS A QUICK CHECK Of

PRINTING

EITHER

THE

SENDING

FIRST

REFERENCE

60(10)

3°'S,

TESTING 132(10) COLUMNS, OR WAITING 1.8 SECONDS FOR AN LCV,
If TESTING
LESS
THAN 132(10)
COLUMNS.
IF
TESTING
132(10)
C(COLUMNS, NOTHING
SHOULD HAPPEN, EXCEPT FOR AN LCV, AT THE END OF THE
LINE.
THE
3'S
SHOULD
BE LOST AND NEVER PRINTED.
AFTER THE LCV, WITH THE PRINT HEAD
AT THE EXTREME RIGHT, A CARRIAGE RETURN
LINE
FEED
WILL
BE
SENT
FOLLOWED BY REPEATED BACKSLASHES ''\'' AND LINEFEEDS TO PRINT
A DIAGONAL
LINE DOWN THE PAPER.
WHEN A
BACKSLASH
IS
PRINTED
IN
THE
MAXIMUM
COLUMN, A CARRIAGE RETURN WILL BE SENT IMMEDIATELY AFTER THE LINE
FEED
AND THE SECOND REFERENCE LINE OF SEQUENT]AL NUMBERS WILL
BE
PRINTED.
AFTER
COMPLETING THE LINE, A CARRIAGE RETURN - LINE FEED WILL BE SENT
AND THE PROGRAM WILL WAIT ONE SECOND FOR THE CARRIAGE RETURN
FUNCTION
TO
COMPLETE.
AFTER
THE DELAY, THE REFERENCE LINE WILL BE REPEATED,
THE LAST LINE BEING GUARANTEED TO BE
CORRECT.
ANY
TIMING
PROBLEMS
DURING
THE
LINE
FEEDS
WILL SHOW AS MISPRINTS OR MISSING CHARACTERS
DURING THE FIRST
16(10) CHARACTERS
OF
THE
MIDDLE
REFERENCE
LINE.
ALSO,
ANY
PAPER FEED PROBLEMS WILL CAUSE MISALIGNMENT OF THE SLASHES
FORMING THE DIAGONAL LINE.

CZLACFO LA36 TERM (DL 11 4 KL Ay
CILACF.PYY
13=-JUN=79 1 5: 33

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

MACY11

30A(1052)

13-JUN-79

15:35

PAGE

SEQ 0017
PAGE

:
EXAMPLE

Q00000000000000000000000000022

785
786
787
788
789

790

791
792
793
794
795
796
797

798

799

800
801
802
803
804
805

123656789012345678901224567890
123456789012345678901234567890

WITH THE AUTO LINE FEED OPTION SET TO PRODUCE AN AUTOMATIC
AFTER EVERY RECEIVED CARRIAGE RETURN, THERE WILL BE A BLANK
PLACE A CARRIAGE RETURN IS EXECUTED.

LINE

FEED

EVERY

CILACFO LA36 TERM (DL1Y 8 xL11)
CILACF.PYY
i3-JUN-79 15:33

MACY11

30A(1052)

13-JUN-79

2
15:35

PAGE

SE@ 0018
PAGE

THIS TEST IS DESIGNED TO TEST THE PRINT TIMING AS IN TEST S5 AS WELL
THE BACKWARD AND FORWARD MOVEMENT OF THE PRINT SOLENOID HEAD.

EXAMPLE:

0000000022

1234567890
1234567890
6.7.7

THE
A

TEST

6 - BACKSPACE

CONSISTS OF

CARRIAGE

THE

RETURN-LINE

TEST

SAME

FOLLOWING PATTERN:

FORWARD SLASH

BACKSPACE
BACK SLASH
THIS

PATTERN PRODUCES

FIRST

FEED.

REFERENCE

FULL

LINE

LINE
IS

IN TEST

THEN PRINTED

THEN

USiNG

THE

‘''/"

"\
A LINE

ALL

X'S.

THE

TWO

SLASHES

SHOULD

C(ROSS

WITH THE AUTO LINE FEED OPTION SET TO PRODUCE AN AUTOMATIC
LINE
AFTER
EVERY
RECEIVED
CARRIAGE
RETURN,
THERE
WlilL BE A BLANK

FEED
LINE

EXACTLY
AT
THE
MIDDLE, PRODUCING THE X CHARACTER.
WHEN THE LiNE IS
COMPLETED A CARRIAGE
RETURN-LINE
FEED
IS
SENT
AND
THE
LAST
TwWG
REFERENCE
LINES
ARE
PRINTED AS IN TEST S.
ANY TIMING PROBLEMS WitL
SHOW IN THE FIRST 16(10) CHARACTERS
OF
THE
MIDDLE
REFERENCE
LINE;
AGAIN AS IN TEST 5.

BETWEEN EACH PRINTED LINE.
EXAMPLE:

00000000000000000000000000002°

JOCXOOEOC0CC0O0C00O0CX000EXK
X

123456789012345678901234567890
123456789012345678901236567890

CZLACFQ LA36 TERM (DL 11 £ KL i)
CILACE.PY
i3-JUN-79 1 5: 33

870
871
872
873
874
875
876
877
878
879
880
881
882
883
884
885
886
887
888
889
890
891
892
893
894
895
896

897
898
899

900
901
902
903
904
905

MACYTT

30AC1052)

13-JUN-79

15:35

PAGE

SEQ 0019
PAGE

6.1.8

TEST

7 - OVERPRINT

TEST

THIS TEST 1S DESIGNED 10 CHECK THE
SPACING
AND
REPEATABLE
PRINTING
CHARACTERISTICS
OF
THE
PRINTER.
THREE ROWS OF CHARACTERS ARE EACH
OVERPRINTED TWO TIMES.
THE ROWS CONSIST OF THE
FOLLOWING
CHARACTERS
ALTERNATED ACROSS THE LINE:
ROW 1
ROW 2

M-SP
SP-a

ROW 3
THE

RESULTING

0VERP?%NTED
CHARACTERS.

g-sp

PATTERN

CHARACTERS

WILL

SHOULD

(HECKERBOARD

PATTERN

AND

ALIGNED PROPERLY WITH THE

THE

INITIAL

:
EXAMPLE
MMMMMMMMMMMMM MM
dddddaradddaaadaod

ggeggeegceeeeeeegsete
WITH THE AUTO LINE FEED OPTION SET
AFTER
EVERY ~ RECEIVED
CARRIAGE

TO PRODUCE AN AUTOMATIC
LINE
FEED
RETURN,
THE
LINES
WILL
NOT
BE

OVERPRINTED.
THERE WILL BE THREE LINES OF EACH (HARACTER WITH A BLANK
LINE
BETWEEN
EACH GROUP OF CHARACTERS.
THE CHARACTERS IN EACH GROUP
SHOULD BE

:
EXAMPLE

THE

SAME

COLUMNS.

916
917
918
919
920

923
922
923
924
925

MACYTT

30AC1052)

6.1.9
THIS

PAGE

TEST
TEST

10 - PRINTING FREQUENCY SWEEP TEST

PRINTS

THE

CHARACTER

''W'' REPEATEDLY,

30(10)

CHARACTERS

PER

THE

LAST

NEW DELAY

= OLD DELAY

TWO LINES

DO JUST

REVERSE.

NEW DELAY

THE

OLD DELAY/16
THE

OLD DELAY/128
TIME

INTERVAL

DELAY/16 - OLD

DELAY/128

BETWEEN

CHARACTERS
IS
DECREASEC
FROM
1.8
SECONDS TO
30(10) MILLISECONDS
USING THE FOLLOWING FORMULA TO AGAIN CREATE A LOGARITHMIC DECREASE:
OLD DELAY

LOOK FOR POSSIBLE MISALIGNMENT
CHARACTERS AS AN INDICATION Of

- OLD

OF THE
CHARACTERS
TIMING PROBLEMS.

SPACES

BETWEEN

WITH THE AUTO LINE FEED OPTION SET TO PRODUCE AN AUTOMAT
IC
LINE
AFTER
EVERY
RECEIVED
CARRIAGE
RETURN,
THERE
WILL BE A BLANK

BETWEEN EACH PRINTED LINE.

FEED
LINE

:
EXAMPLE
HHHHHHHHHHHHHHHHHHHHHHHHHHHHHH

HHHHHHHHHAHHHHHHHHHHHHHHHHHHHH
HHHHHHHHHHHHHHHHHHHHHHHHHHHHHN

HHHHHHHHHHHHHHHHHHHHHHHHHHHHHH

6.1.10
THIS

TEST

CHECKS

- RIBBON FEED
THE

TEST

RIBBON FEED MECHANISM BY

PRINTING A SINGLE

COLUMN

OF
24
LINES
OF X'S DOWN THE LEFT HAND MARGIN OF THE PAGE.
VISUALLY
CHECK FOR PROPER OPERATION OF THE RIBBON FEED
MECHANISM
DURING
THIS
TEST,

WITR THE AUTO LINE FEED OPTION SET TO PRODUCE AN AUTOMATIC
LINE
AFTER
EVERY
RECEIVED
CARRIAGE
RETURN,
THERE
WILL BE A BLANK

BETWEEN EACH PRINTED LINE.

EXAMPLE:

Dt 2

943
944
945
946
947
948
949
950
951
952
953
954
955
956
v57
958
959
960
961
962
963
964
965
966
967
968

15:35

LINE
FOR
FOUR
LINES.
DURING THE FIRST TWO LINES, THE TIME INTERVAL
BETWEEN CHARACTERS
1S
INCREASED
FROM
30(10)
MILLISECONDS
1O
1.8
SECONDS USING THE FOLLOWING FORMULA TO CREATE A LOGARITHMIC INCREAS
E:

942

PAGE

926

927
928
929
930
931
932
933
934
935
936
937
938
939
940
941

13-JUN-79

Sta 0029

. D

CZLACFO LA36 TERM (DL1Y 8 K L 1
CZLACF
. PN
13=JUN=-79 °5: 3 3

FEED
LINE

969
970
971
972
973
974
975
976
977
978
979
980
981
982

983
984
985
9R6
987
988
989
990
991
992
993
994
995
996
997

O OO0 N NN
—
N

b
2
e
AN 129,
%) b

Yy S

—

998
999
1000
1001
1002
1003
1004
1005
1006
1007
1008
1009
1010

jolels] COOODOOOO

708

CILACTO LASS TEPM (DL 4 KL 1M
CILACF. PN
13-JUN-79 1 5: 33

102%

MACYTT

30A(1052)

13-JUN-79

15:35

PAGL

SEa 0021
PAGE

6.1.11

TEST

12 - PRINTER BELL

TEST

THIS TEST CHECKS THE PRINTER BELL BUFFER TO INSURE
THAT
EIGHT
BELLS
ARE
DISTINCTLY
HEARD,
EVEN
WHEN SENT AT THE MAXIMUM TRANSFER RATE.
THE PROGRAM SENDS
8
BELL CODES AT THE MAXIMUM RATE
T0
THE
PRINTER
THEN WAITS 2.5 SECONDS TO ALLOW THE OPERATOR TO HEAR
THE BELLS.

6.1.12
THIS

TEST

1S NOT

THIS

TEST

17 = LIFE TEST

RUNS CONTINUOUSLY

PART OF

THE

PRINTS 2 LINES OF

CONTINUOUSLY.

THE

AND

1S RUN AS AN

STANDARD PRINTING TEST

SECOND

EACH PRINTABLE

LINE

INDIVIDUAL,

SEQUENCE.

CHARACTER AND

SPECIAL

THEN

TEST.

REPEATS

EACH CHARACTER 1S OVERPRINTED 4

TIMES TO CONSERVE PAPER.
AT THE END OF EACH COMPLETE PASS THROUGH THE
CHARACTER
SET,
A
MESSAGE IS PRINTED INDICATING THE NUMBER OF PASSES
EXECUTED.
1f ANY CHARACTER (EXCEPT ''RUBOUT'') IS TYPED ON THE KEYBOARD
DURING
THIS
TEST, THE PATTERN WILL CHANGE AND RESTART WITH THE TYPED
CHARACTER.
THIS WILL ONLY HAPPEN IF KEYBOARD CONTROL IS !N USE.

EXAMPLE:
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAA

AAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
B8B8BBB8BB88B8B38BBBB8BBBBBBBBRAAA
BBBBBBBBBBBBBBBBBBBBBBBBBBBBRB

THE

AUTO LINE

FEED OPTION

1S SET

TO PRODUCE

AN AUTOMATIC LINE

FELD

AFTER EVERY RECEIVED CARRIAGE RETURN, THE TEST WILL PRINT SIX LINES Of
EACH CHARACTER WITH A BLANK LINE BETWEEN THE FIRST AND SECOND LINES AS
WELL AS BETWEEN EACH GROUP OF CHARACTERS.

EXAMPLE:
AAAAAAAAAAAAAAA

AAAAAAAAAAAAAAA
AAAAAAAAAAAAAAA
AAAAAAAAAAAAAAA
AAAAAAAAAAAAAAA
AAAAAAAAAAAAAAA

8BBB88BBBBBBBBAA
B8888BBBBBBBBBBA
888B88888B8BBBRBB
B88BBBBBBBABF
368
88888888B8BBBBB8
88838BBBBBBBBEB

1024
1025
1026
1027
1028
1029
1030
1031
1032
1033
1034
1039
1036
1037
1038
1039
1040
1041
1042
1043
1044
1045
1046
1047
1048
1049
1050
1051
1052
1053
1054
1055
1056
1057
1058
1059
1060
1061
1062
1063
1064
1065
1066
1067
1068
1069
1070
1071
72
NN
N NN
~NOM N

SOQOOO

09 I

CZLACFO LA36 TERM (DL £ KL 1)
CILACF
.P
i3-JuN-79 1 S: 33

MACYT1

30AC1052)

13-JUN-79

15:35

PAGE

SEQ 0022
PAGE

6.2

ECHD TESTS

THESE TESTS ARE DESIGNED AS A TEST OF
THE
KEYBOARD
AND
AN
AID
IN
ISOLATING
TROUBLES
WITHIN
THE
TERMINAL.
AT THE BEGINNING OF EACH
TEST, THE TEST NUMBER WILL BE PRINTED INDICATING WHICH
TEST
1S
BEING
EXECUTED.
TYPING
A
“RUBOUT'"
OR
‘''DELETE'"
AT ANY TIME, WHETHER IN

KEYBOARD CONTROL OR NOT, WILL
TEST
TERMINATION
MESSAGE.

EXIT THE CURRENT ECHO TEST AND
PRINT
A
IFIN KEYBOARD CONTROL, THE SELECT TEST

MESSAGE WILL BE PRINTED AND THE PROGRAM WILL AWAIT A TEST
USUAL.
IN SWITCH REGISTER CONTROL, THE PROGRAM WILL HALT

WAITING FOR

EACH TEST

6.2.1

CONTROL

TEST

VIA THE

FOLLOWS:

SWITCH REGISTER.

DETAILED

TO THE

PRINTER,

THE LA36 TERMINAL

AVAILABLE,
TYPING
THE TERMINAL DURING

6.2.2

TEST

DESCRIPTION

20 - CHARACTER ECHO TEST

THIS TEST 1S DESIGNED TO OPERATE THE TERMINAL
IN
MODE.
ANY CHARACTER TYPED ON THE KEYBOARD (EXCEPT

ECHOED

SELECTION AS
(AT SELLHLT)

1S IN HALF

A
CARRIAGE
THIS TEST,

A
SIMULATED
LOCAL
A "'RUBOUT'') WiLL BE

DUPLEX WITH THE AUTO LINE

RETURN MAY

21 - LINE ECHO "EST,

CAUSE

GARBLED

FEED

OPTION

RESPONSE

FAST RATE

THIS TEST CONTINUALLY SENDS FULL LINES OF
ANY
CHARACTER
UP
T0
THE
MAXIMUM
COLUMN
WIDTH.
THE TEST PRINTS A ''0'' CHARACTER WHEN STARTLD
UNTIL A KEY IS TYPED ON THE KEYBOARD.
THE PROGRAM WILL THEN SEND
THE
TYPED
CHARACTER
UNTIL
ANOTHER
CHMARACTER
IS
TYPED
OR THE TEST IS
TERMINATED BY TYPING A ''RUBOUT''.
THE CHARACTERS
ARE
TRANSMITTED
AT
THE MAXIMUM RATE WITH A CARRIAGE RETURN-LINE FEED INSERTED AFTER EVERY

132(10) PRINTABLE CHARACTERS.
1F

THE

LA36 1S IN HALF

DUPLEX WHEN RUNNING THIS TEST,

LOST OR GARBLED WHENEVER A CHARACTER

CHARACTERS

TYPED ON THE KEYBOARD.

MAY

WITH THE AUTO LINE FEED OPTION SET TO PRODUCE AN AUTOMATIC
LINE
FEED
AFTER
EVERY
CARRIAGE RETURN, THERE WILL BE A BLANK LINE BETWEEN EACH
PRINTED LINE.

6.2.3
THIS

TEST
TEST

22 - LINE ECHO TEST,
IDENTICAL

TEST

INSERTED
BETWEEN EACH CHARACTER
L{V BETWEEN C(HARACTERS,

SLOW RATE
21

EXCEPT

A DELAY

TO ALLOW THE

1.8

SECONDS

HEAD 'O PERFORM AN

1078
1079
1080
1081
1082
1083
108¢
1085
1086
1087
1088
1089
1090

OOCOO

N=OOVONPND
W~ O OO
N WA =000 NG P I~ PO —

_._-_.—.—o—a_‘—a—‘_a—n-—0.—....—0—&—._._._;—-_-_-_‘_.4—0-—-_._._a_.—n

1091
1092
1093
1094
1095
1096
1097

ANANANTIVPON VURNININIPONINY
b = b s b st s 2 e OOV

-—.—.—.—-‘—l—‘-—._‘—fi—l—‘—-‘—l-—h—‘—.—-—l—.-.—d—i_‘—‘—n—‘—d

010

CILACFO LA36 TERM (DL L KL 1)
CILACF.PYN
i3-JUN-79 1 5: 33

MACY11

30A(1052)

13-JUN-79

15:35

PAGE

SEQ 0023
PAGE

6.2.4
THIS

TEST 23 - (HARACTER/CODE ECHO TEST
TEST

WILL

THE

OCTAL

CODE

THE CHARACTER OR THE MNEMONIC OF

RECEIVED BY

WITH THE

AUTO LINE

EVERY

FEED OPTION SET

RECEIVED

CARRIAGE

BETWEEN EACH PRINTED LINE.

THE

PROCESSOR

FOLLOWED

THE CHARACTER EVERY TIME A KEY

PRESSED ON THE KEYBOARD.
THE PARITY OF
INDICATED
AS
EITHER
ODD
OR
EVEN.
CHARACTERS FOR THE LINE TO BE PRINTED.

AFTER

THE
RECEIVED
C(ODE
WILL
BE
ALLOW
SUFFICIENT TIME BETWEEN

TO PRODUCE

KETURN,

AN AUTOMATIC

THERE

WILL BE

LINE

A BLANK

FCED

LINE

EXAMPLE:

301
263
215
240
6.2.5

A
3
(R
SP

00D
00D
EVEN
EVEN

TEST 24 - SELECTED PATTERN ECHO TEST

THIS TEST 1S DESIGNED TO GIVE MAINTENANCE THE
}HE%REOrTEPSTTERNS FOR ISOLATING ANY SPECIFIC

N TH

TYPE
WILL

LD.

ANY
BE

INPUTTED.

FLEXIBILITY
TO
CMOOSE
PROBLEMS WHICH MAY ARISE

CHARACTERS (EXCEPT CONTROL-C AND RUBOUT) AND
EACH
CHARACTER
ECHOED
AS
TYPED.
A
MAXIMUM OF 256(10) CHARACTERS MAY BE

NO CARRIAGE RETURNS OR

LINE

FEEDS

ARE

INSERTED

PROGRAM,
ALL
CHARACTERS
MUST
BE
INPUTTED
BY
THE
OPERATOR.
TERMINATE THE INPUT STRING TYPE A (ONTROL-C,
THE
PROGRAM
WILL
CONTINUALLY
ECHO
THE
INPUTTED
PATTERN.
T0 STOP THE PRINTING,

THE

10
THEN
TYPE
CONTROL=C.
THE PROGRAM WILL STOP PRINTING THE PATTERN AND
WILL
WAIT
FOR
EITHER
ANOTHER
PATTERN
INPUT TERMINATED BY A CONTROL-C, OR THE
SAME PATTERN MAY BE USED AGAIN BY TYPING CONTROL-C.
TO EXIT THE
TEST
AT ANY TIME, TYPE A '‘RUBOUT'.
WHEN
~ANY
CHARACTER

6.2.6

OPTIONS
ARE
AVAILABLE,
SEQUENCES ARE SELECTED.

CAREFUL

WHAT

(HARACTERS

TEST 25 - BELL ECHO TEST

THIS TEST 1S DESIGNED
OCCURRED ON THE LINE.
TYPE

1O TEST THE BELL ON COLUMN
THE TEST PRINTS A MESSAGE:

ANY PRINTABLE

CHARACTER AND LISTEN FOR BELL

TYPING

HAS

voveveevenn.

AFTER THE TEST MESSAGE 1S PRINTED, TYPE ANY PRINTABLE CHARACTER ON THE
KEYBOARD.
THE CHARACTER WiLL BE ECHOED AND THE BELL SHMOULD RING.
THE
MESSAGE WILL THEN BE TYPED AGAIN.
TYPE THE 'RUBOUT'' KEY TO
TERMINATE
THE TEST AT ANY TIME.

ClL

—

0011

CILA

A36 TERR (DL1" & KL11)
13-JUN-79 15:33

MACY11

30AC1052)

13-JUN-79

2
15:35

PAGE 24

SEQ 0024

PAGE

6
7

6.4

8
9
0

THESE

STANDARD

1/0 TESTS

TESTS ARE DESIGNED AS A BRIEF

INTERFACE

LOGIC.

EACH CHECK

;

LTITLE

;LA36 DIAGNOSTIC (DL11 & KL11

8
9
0

sAUTHORS :

ROBERT

:
:

RALPH A, SCHAUBER
JOHUN V. CHATALIAN

2
3

1163
}}6;
6
1166
1}6;
116
1169
11;?
11
1172

11;3
1174

1175
11;?
IR
1178
1179

1180
1181
1182
1183

THE

CONSOLE

TERMINAL

TEST AND

CZLACFO LA36 TERM (DL11 & kL1

5
6
1157
1158
}:Sg
é
}}6;

THE SWITCH REGISTER CONTROLS MAY BE USED.
A DESCRIPTION OF EACH
TEST
1S
GIVEN
IN
THE PROGRAM LISTING.
ANY ERRORS ENCOUNTERED DURING THE
170 TESTS WILL CAUSE A HALT AT LOCATION "‘ERRHLT'' IF SWITCH 14
IS DOWN.

CHECK

IS STRUCTURED AS AN INDEPENDENT

Ww.

;15
:
:
;14
;
:
;13
;
;
[
B

;

.
:
H
;
:
:
;
;
;

LSBTTL

BAKER

QUENNEVILLE

:
JSWITCH

INTERFACE)

DIGITAL EQUIPMENT CORP., MAYNARD, MASS. 01754

SWITCH REGISTER OPTIONS
POSITION

FUNCTION

upP (1)
DOWN (0)

HALT AT COMPLETION OF CURRENT
CONTINUE NORMAL TEST SEQUENCE

P (1)
DOWN (0)

CONTINUE ON ERROR
HALT ON ERROR

CRIVE ONLY

(1)

DOWN (0)

upP

(1)

CONSOLE

DRIVE ALL TERMINALS
LOOP ON

INDIVIDUAL

TEST

TERMINAL

TEST

DOWN (0)

NORMAL TEST SEQUENCE

upP (1)
DOWN (0)

CPU TYPE IS AN LSI-=11, PDP-11/03%
ALL OTHER PDP=-11 CPU'S

upP

(1)

HALT

TO SELECT

05-00

TEST

# SELECTION

07-00

# OF

COLUMNS AT

DOWN (0)

TEST AT END OF

LOOP ON TEST SEQUENCE

START=-pP

CURRENT

TEST

CLLACFO LA3Z6 TERM

0012

CILACF . P11

(DL1T

& xiL1D)

MACYY1

13-JUN=-79 15:33

30AC1052)

SPECIAL OPERATIONAL

;}gg

.SBTTL

1186

:1.--

1187
1188

15:35

INFORMATION

PAGE

SEQ 0025

SPECIAL OPERATIONAL INFORMATION

THE STANDARD CONSOLE TERMINAL INTERRUPT VECTOR AND REGISTER

:
:

}}38

ADDRESSES ARE USED. TO REDEFINE THE LOCATION OF THE CONSOLE
TERMINAL THE SYMBOLIC LOCATIONS ''CONADD'TM" AND ''CONVEC'TM SHOULD

;

BE CHANGED BEFORE START UP.

:2.--

BEFORE START UP REFER 1O THE DESCRIPTION OF THE ROUTINE "‘DLY".

}}gz

SHOULD BE SET UP BEFORE RUNNING THE DIAGNOSTIC.

1195

:3.-=

1191

1192

}}gg

1198

};gg

1201

1202
1203

;582

1206

1207
1208
1209
1210

}5};

1213

1214
1215
1216
1217
1218
1219
1220
1221

1222
1223
1224

13-JUN-79

TIMING IS A FUNCTION OF

THE PDP-11

MODEL AND MEMORY

TYPE AND

1F CPU IS A PDP-11/03 , LSI-11 SET SWITCH REGISTER

;

BIT 09 TO A 1. SPECIAL TESTS ARE RUN ON THE DLY11.

SYSTEMS WITHOUT A WARDWARE SWITCH REGISTER SHOULD USE

MEMORY LOCATION 176 AS A SOFTWARE

:5.-=

SWITCH REGISTER.

THIS DIAGNOSTIC IS FOR VERIFICATION OF BASIC TERM]NAL

:
:

FUNCTIONS ONLY. IF THE TERMINAL UNDER TEST HAS HARDWARE
OPTIONS INSTALLED RUN DIAGNOSTIC MAINDEC-11-DILAF-A. THE

:6.--

CONTROL G FUNCTION PERMITS CHANGING THE SOFTWARE SWITCM REGISTER

LAS6 TERMINAL OPTIONS TEST.

:
:
:
:

AT ANY TIME AFTER A
TEST.
ALSO, AT TEST START, IF THERE IS
NO HARDWARE SWITCH REGISTER, A MESSAGE WILL ASK FOR SOF TWARE
SWITCH REGISTER SETTINGS WHICH MUST BE PROVIDED VIA TTY KEYBOARD.
CONTROL U ALLOWS RESTARTING THE PROCESS

THE NUMBER MUST BE A SIX DIGIT OCTAL VALUE.

AN ERROR WAS MADE.

’
;
;CHGF1
:CHGF2
:CHGF3
:CHGF&
:CHGFS
;CHGF&
;CHGF7

=
-

ECO HISTORY
NEW STORAGE LOCATIONS FOR REFERENCE IN *G MODE.
CHANGE START UP FOR ENTERING SOF TWARE SWITCH REGISTER INFO.
CMECK FOR *G BETWEEN TESTS.
CLEAR INTERRUPT ENABLE BIT TO PREVENT PREMATURE INTERRUPIS.
ROUTINE TO CHECK PRINTOUT, UPDATE SOF TWARE SWITCH REG.
NEW MESSAGES FOR SOF TWARE SWITCH REG ROUTINES.
COMBINING LSI-11 TE3TS T0 ELIMINATE CLEARING DONE BIT IN XS

MACYT1 30A(1052)
SYSTEM EQUATES

.SBTTL

231
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266

001000
002000
004000
010000
020000
0460000
100000
000000
040000
004000
005726
022626
0003490
000200
000200
001000

W NNNNNNNNNYNO
DOV NP N
NN
OO

000400

SYSTEM EQUATES

yrumsy
L
g

1714
1T
POPSP=5726
POPSP2=22626
PRTY7=340
PRTY4=200
ACRLF =200
LSI11=B119
PROGRAM TRAP EQUATES

104000

104001
104002
104003
104004
104095
104006
104007
104010
104011
104612

o
(=]
<

000200

250

tFonuunnnd

2649

000040
000100

PAGE

SYSTEM EQUATES

000001
000002
000004
000010
000020

15:35

SEQ 0026

el e ol e ol
et
el
e g
0 v L b b e etk e O CONO
N
NN — O
w DN
N —O
W NN
i
e
A
e
A R
"W on
-l N
[=l=l=le]
~mm
O [=4

0 O O 00 Co 0O 0 T 0 00 0 O 00 0

242
243
244
245
246
24 7
248

000002
000003
000004
000005
000006
000007
177776

v Ll e

240
241

RO-20
R1=%1
R2=%2
R3=13
R4=X4
R5=%5
SP=%6
PC=%7
PSW=177776

000001

-— (=] m e

232
233
234
235
236
237
238
239

000000

13-JUN=79

&z w o €0

— o

227
228
229
230

NN
NI NN NN

0013

CILACFO LA36 TERM (DL11 14 KL M)
CZLACF.P1Y
13-JUN-79 1 S: 33

TYPE=EMT+0
ERROR=EMT+1

EHALT=EMT+?
STRDRV=EMT+3
STPCHV=EMT
+4

CHAIN=EMT+5

CHALT=EMT+6
TYPEM=EMT+7

DELAY=EMI+10

TIVCTL=EMT«1]
CRLF=EMT+12

;SCOPE SWITCH
;TEST LOOP SWITCH
;POP STACK ONCE
;POP STACK TWICE
;PRIORITY LEVEL DEFINITIONS

;FLAG FOR LSI-11,11/03

CILACEQ A6 TERM (DL1YT R (1)
CIUACE P
13-JUN-79 15:33

1281

1282
1283
1284
1285
1286

1287

1288
1289
1290
1291

1064013

MACY11 30A(1052)
SYSTEM EQUATES

13-4UN-79

SCRLF=EMT*13

104014
104015
104016
104017
104020

Lr=EMT+14
PRINTC=EMT+15
PRTHDR=EPT+16
PRNT=EMT+17
READ=EMT+20

104022
104023
106024
104025

CR=EMT+22
BTOASC=EMT+23
FORWD=EMT+24
READC EMT+25

104021

AREAD=EMT+21

15:38

PAGE

S€0 0027

CILACFO LA36 TERM (DLI1 & ki 1)
CILACF P
13-JUN=-79 15:33
1292
1293
1294
1295

1296

1297
1298
1299
1300
1301
1302
1303

N NW

s —a —‘—D—l—.‘—‘_‘
b h —a

N N UM N N N P

OCWNP
NS NN OV~
WL NN —

(Y LY RV
TV (W

b et d o e D el d =B b e el P e
b el e
IV RV L IV IV L
v RV IV IV IV RV TV V"]
X TV \NAMAMIN NN
NN OB RO RO N A

Oom\:ou\bum-‘oo [¢ ]

1304
1305
1306
1307

000000
000002

000004
000006
000010
000012
000014
000016
000020
000022
000024
000026
000030
000032

000042

000046

000052

PAGE 28

SEQ 0028

.SBTTL

TRAP CATCHER & STARTING ADDRESSES

000000

.ENABL
LASECT

ABS,AMA

000000

.=0

000002
000000
000006
000000
000012
000000
000016
000000
000022
000000
000026
000000
003010
000340

MACHER:

.42

;UNASSIGNED TRAP

.42

:SP OVERFLOW, BUS ERROR TRAP

.42

;RESERVED INSTRUCTION TRAP

.42

; TRACE

.42

:TRAP TO CALL

.42

;POWER FAJL

EMTINT
PRTY?

JEMT

HALT

HALT
HALT
HALT
HALT

HALY

000042

=42

000000

000046

.=46

011524

LOGICAL

000052

.52

010000

000174

=174

000174
000176

000000
000000

000200
000204
000210
000214

000137

000137
000137
000137

DISPREG:
SWREG:

0019026
000754
000772
001010

000000

.WORD

JMP
JMP
JMp
JMP

000600
000600

MACY11 3 0A€1052)
13-JUN=79
15:35
TRAP (AT CHER € STARTING ADDRESSES

STARY
START!
START?
STARTY

TRAP

IOx

TRAP

: SOFTWARE

DISPLAY

:SOFTWARE SWITCH REGISTER
:START
;START
;STARY
;START

UP WITH 1/0 TESTS RUNNING
UP, SKIP ALL 1/0 TESTS
UP TERMINAL CONTROL WITH 1/0 TES'S
UP TERMINAL CONTROL WITHOUT [/0 TESTS

.=600
SPBOT:

;BOTTIOM OF

STA(K

CZLACFO LA36 TERM (DL £ KL IRY
CZLACF P11
13-JUN=79 1 5: 33
1341
1342
1343
1344
1345
1346

MACY1T 30A(1052)
13-JUN-79
SYMBOL DFFINITIONS
.SBTTL

000602
000604
000606

SYMBOL

15:35

CONVEC:
DLADR:

SEQ 0029

DEFINITIONS

CONADD: 177560

177560
000060
176500

PAGE

:ADDR OF CONSOLE RECEIVER STATUS REG

60
176500

:CONSOLE TERMINAL INTERRUPT VECTOR
:ADDRESS OF FIRST DL11, DEFAULT 10 DL11-A,B

ek
i
b
b e
nd
e
d
i
d
D

0o Qo
00 00 00 00 00~~~
N~ ~ NN~
~O N S NN = OO
NN
IN —

b
b et et

N AN LN A

LN LN LN NN AN NN [V LV 1V TV

;1f OL11-C,D,E,, THEN
;SET T0 175610 FOR FIRST 16 (OF 31) OR
;SET 1O 176000 FOR LAST 16 (OF 31)

1388
1389
1390
1391
1392
1393
1394
1395

1396

000610
000612
000614
000616
000620
000622
000624
000626
000630
000632
000634
000636
000640
000642
000644
000646
000650
000652
000654
000656

000660
000662
000664
000666
000670
000672
000674
000676
000700
000702
000704
000706
000710
000712
000714
000716

000020

DLNR:

177560
177562

TKS:
TKB:
TPS:

177564

177566
000060

000200
000064
000200
000000
000000
000000
000000
000000
000000
000000
©00000
000000
000000
033000
000000
000000
000000
000000
000000
000251
000000
000000
000000
000000
000000
000000
000000
000000
177570
(00000

TPB:
TKVTIR:

177570
€00000
€00000
000000
000000
000000
000000

:# OF

177560
177562
177564

LEVEL:
DLCNT:
ICTR:

REPT:

BRCTR:
COUNT3:

XCSR:
TIMER:
SPCNT:
CURTST:
TEMP(H:
PARITY:
PCHAR:

LFCNT:
INCHK:
TEMP:
SR:
(NTR:

COUNT:
FILL:
MODE :
(NT:

;CURRENT

:TEMP STORAGE

BINARY

FOR

TESTS EO21

:COUNTER FOR ROUTINE ''AREAD"
;COUNTER FOR ROUTINE ''PRINT(C''

OPEN
251
OPEN
OPEN
OPEN
OPEN
OPEN

& EO022

;ADDRESS OF MULTIPLE DL11 STATUS
;1 MSEC COUNTER FOR ROUTINE '‘DELAY'’
:COUNTER FOR TEST ROUTINE ''PT3'"
;ADDRESS OF CURRENT TEST

:TEMP STOR FOR ECHO TESTS
;PARITY FLAG FOR RECEIVED CHAR
:CHAR CODE WITH PARITY BIT

OPEN
OPEN
OPEN
177570
OPEN
oseevrsevrvsnnnn

:COUNTER FOR TEST ROUTINE ''PT4"
:CHECK FOR INPUT FLAG
; TEMPORARY WORKING STORAGE
:SW REG ADDRESS
;TIME COUNTER FOR L>I=11 TESTS
:DISPLAY REGISTER
; TEMPORARY KYBD BUFFER STORAGE
s TEMPORARY WORK LOCATION

;LOOP COUNT FOR TEST
;LERO FILL SWITCH
sNUMBER OF DIGITS 10 TYPE
;1TERATION COUNY

TR TCSRORNRRNRPRAROROIRROSROSRERIRRRUETSGETYTYE

[

PAPER WIDTH,

;LEVEL OF EXECUTION
:# OF MULTIPLE DL11S
:1/0 TEST ITERATION COUNT

OPEN

QPEN
OPEN
GPEN
OPEN

INITIALLY ASSUMED

;C.T. RECEIVER PRIORITY LEVEL
:C.T. TRANSMITTER INTERRUPT VECTOR
:C.T. TRANSMITTER PRIORITY LEVEL
;ADDRESS OF FIRST ACTIVE DL11
;CONSOLE TERMINAL CONTROL SWITCH
:CONTAINS CURRENT TEST NUMBER
:CONTAINS ADDRESS OF NEXT TEST
;CONTAINS ADDRESS OF TEST SCOPE ENTRY
:CONTAINS TEST PROGRAM INDICATORS

OPEN
OPEN

DISPLAY: 177570
118:
OPEN
TEMPST: OPEN

TO BE

RECEIVER STATUS REG
RECEIVER BUFFER
TRANSMITTER STATUS REG

;CONSOLE TRANSMITTER BUFFER
:C.T. RECEIVER INTERRUPT VECTOR

OPEN
OPEN
OPEN

(HGFl

DL11°S

;CONSOLE
;CONSOLE
:CONSOLE

177566
60
TKLVL:
PRTY4
TPVIR:
64
TPLVL:
PRTYS
FSTDL:
OPEN
CNTLSW: OPEN
RTNNO:
OPEN
NXTST:
OPEN
SCOPTR: OPEN
PRGID:
OPEN
CRBUF:
OPEN
CTRA:
QPEN
WIDTH:
OPEN

Jeveneee

000720
000722
000724
000726
000730
000732
000734

;OR SET OTHER DESIRED START ADDRESS

16.

CILACFO LA36 TERM (DL1T R xL1DY
CZLACF P
13-JUN-79 15:3%
1397

MACY11 30A€1052)
13-4UN-79
SYMBOL DEFINITIONS

15:35

PAGE

30
St 0030

CZLACFOQ LA36 TERM (DL1! % KL11)
CZLACE P
i3-JUN-79 1
33

MACY11

.SBTTL

1600

1603

1604

1415

000736
000742

000744
000746
000750
000752
000754
000762
000770
000772

005737
001403

011600
005740
000000
000002
012737
012737
0004264
012737

000654

CHLT:

177777
104006

005356
001772

104011

001772

012737
000415
012737
012737
000406
012737
012737
012706

104011
177777

001772
005356

005406
104006
000600

005356
001772

1425

001046

013746

000006

16428

1429
16430
16431
1432

1433
1436

1435
1436
1437
1438
1439
1440
16441
1442
14643
1464
14645
1446
1447
1448
1«49
1450
1451
1452
1453

A NEW TEST

001052
001056

001064
001072
001074
001076
001100
001106
001114
001122
001126
001132
001140
001142
001146

001152

001156
001162

001166
001174

001200
001206
001212
001216
001222
001230

013746
012737

022777
00140%
000412
022626
012737
012737
012737
012637
012637
022737
001002
004737
013701

012721

013721
005777

012777
005037

012737
005037
005037
005037
012737
004737

151

31
SEQ 0031

005406

005356

#177777 ,AT0X
NCHALT ,WALTF
STARTX
#YTYCTL ,WALTF

JERREREEEREERORY

000004
001076

(HGF2:
000004

177777

177622

000202
000176

000672
000714

000174
000004
000006
000176
013752
000622
014176
000624
177426
000100
000710
000006
000644
000634
000654
00356
(003776

000720

648
65%:
66%:

000714

67%:
60%:

MOV

000004

000024

THE

;TEST
;PUT

STARTED

CURRENT

;BRANCH

(PU

0O,

LEVEL

DO NOT

ADDRESS OF

HALT

CALLER

INTO RO

sRETURN FROM INTERRUPT
;FORCE END OF /0 TESTS
;FORCE SR CONTROL
;FORCE

TERMINAL

CONTROL

#AT1,ATOX
STARTX
WTTYCTL WALTF
#177777,A10x
STARTX
#ATY ATOX
#CHALT WAL TF
#SPBOT,SP

;FORCE ALL 1/0 TESTS
;FORCE SR CONTROL
;SET STACK POINTER

6,-(SP)

;SAVE

FORCE

ALL

;FORCE
;FORCE

TERMINAL CONTROL
END OF 1/0 TESTS

1/0 TESTS

CURRENT

VECTOR

MOV
MOV

&,-(SP)
643 304

Cmp
BEQ
BR
(mp
MOV
MOV
MOV
MOV
MOV
cmp
BNE
JSR
MOV

#-1,8SR
sREFERENCE HARDWARE SWITCH REGISTER
659%
JIF 1T = =1,USE SOFT SW REG
66%
;THEN USE HARDWARE SW REG
(SP)+,(SP)+
;CORRECT THE STACK, NO HDWE Sw REG
#202,TIMER
;ADJUST TIMER FOR LSI-1
#SWREG, SR
JPOINT T0O SOFT Sw REG
FOISPREG,DISPLAY
;POINT TO SOFT DISP REG
(SP)+ ., a04
sRESTORE VECTORS
(SP)+,a86
#SWREG, SR
s15 SOFT SWREG SELECTED
60%
:1f NOT,BR OVER NEXT OPER
PCLONTLY
;SOFT SW REG INPUT ROUTINE
TKVIR,
R

MOv

177416

EXPECTED TO BE

aSP,R0O
-(R0O)

MOV

MOV
B8R
START3: MOV
MOV
BR
START:
MOV
MOV
STARTX: MOV

WILL BE

SELHLT

MoV
187
HALT
SELHLT: RTI
START1: MOV
MOv
BR

START2:

IN SWITCH REGISTER CONTROL

LEVEL

BEQ

001000
001006
001010
001016
001024
001026
001034
001042

1426
1427

PAGE

WILL BE ADVANCED TO THIS COMMON MALT WHERE

IereReree

1416
1417
1418
1419
16420
1421
1422
16423

1624

3
15:35

PROGRAM INITIALIZATION & CONTROL

; COMMON HALT-=-WHEN

16402

1408
1409
1410
1411
1412
16413
16414

Jresteene

1401

1607

13-JUN-79

PROGRAM INITIALIZATION & CONTROL

?ggg

1405
16406

30A(1052)

MOV
187
MOV
(LR

MOV
CLR
(LR
(LR
MOV
JSR

;'0"".""""

#TTINTS, (R1)+

TKLVL,(R1)¢
oTKB
¥i00,a1k$
INCHK

#6 ,MACHER
PRGID
(NTLSW
LEVEL
W#PFALL,24
PC,LONIT

SSET UP LOC.

;MEMORY TRAP

& FOR NON-EXISTANT

VECTOR ADDRESS

10 LOC

;sPRIORITY 10 LOC 62
:CLEAR DONE FLAG

sSET TTy INTERRUPT ON
SALLOW INPUT (HECKING

JCLEAN UP
INITIALIZE PROGRAM FLAGS
JINITIALIZE TERMINAL CONTROL SWilrm
SINITIALIZE LEVEL
;SET ADDR POWER FAIL ROUTINE
;SET UP CONSOLE TERMINAL ADDRE S

CILACFO LA36 TERM (DL £ XLy
CZLACF.P1Y
i3-JUN-79 1 5:33%
1454
1455
1456
1657
1458
1459
1460
1461

1462
1463
1464
1465
1466

1467
1468
1469
1470
16471
1472
1473
1474
1475
1476
1477
1478
1679

1480

MACY11 30A(1052)
13-JuN-79
15:35
PROGRAM INITIALIZATION & CONTROL

PAGE

32
SEQ 003/

“"'.'.Q"'

;READ

THE

PAPER WIDTH,

NUMBER

(OLUMNS,

;FROM SWITCH REGISTER POSITIONS 0-7. SAVE AND
;CONVERT TO 3 ASCII CHARACTERS. A WIDTH GT13?

:OR LT730 COLUMNS (DECIMAL) WILL BE ABORTED 10 132.
:THE SWITCHES MAY BE (HANGED ONCE
;MESSAGE HAS STARTED 1O PRINT

THE

PROGRAM TITLE

THE

DL11

COUNT

:.l""""

001234
001240
001244
001250
001252
001256
001260
001264
001270
001274
001300
001302
001304
001306
001312
001314
001316
001320

017701
042701
020127
003003
020127
101002

012701
010137
012700
012702
106023
000401
000410
012700
104015

177454
177400

000204

000035

1%:

000204
000652
014627
000003

2%:
1%:

4%:

000000

5¢:

104007

014376
012737

000240

001302

MOv
BIC
(mMpP
Bu1
CMpP
BHI
MOv
Mov
MOV
mMov

BTOASC
BR
BR

MOV
PRINTC
TYPEM

aSR,R1
#177400,R1
R1,8204

’$

R1,#35

¥204,R1
R1,WIDTH
#HDRO,RO
’3,R2

5%
6%

#0,P0

(SR)

INTQ R]

;TEST

NO.

COLUMN GT132

;SAVE ONLY BITS 0-7

;COLUMNS GT132, DEFAULY 10 132
;CHECK IF NO. COLUMNS LT 30
;NOT LT 30 NOR GT 132

;COLUMNS LT

:SAVE NO.

;ADDR

TO STORE

:CONVERT NO.
:TRANSMIT
:TYPE

#NOP, 4%

30 OR GT

COLUMNS

;00 A 3 CHAR.

JNULL

STARTM

mMov

;PUT

CODE

132,

IN WIDTH

ASC11

DEFAULT

COLUMN VALUE

(ONVERSION

COLUMNS 10 ASCII

PROGRAM

TITLE

f{RST

TIME

RUN

CILACFO LA36 TERM (DL11 14 KL iH
CZLACF P
13-JUN-79 1 5: 33
1481
1482
1483
1484
1485
1486
1487
1488
1489
1490
1491
1492
1493

1494

1495

1496
1497
1498
1499
1500

1501
1502
1503
1504

W~ OV~
NNy - OO0
GNP

)

D e

D o

ol o

AR ARV ALV RV LV SV RV, LV SV YV I SV TV

B e
el

NURCIUNOPNUNON)
— —
s
e
—_——

1508

MACY11 30A(1052)
1 3-JUN-79
15:35
PROGRAM INITIALIZATION & (ONTROL

PAGE

33
SEQ 0033

;l'.t.t""

sTHIS NEXT

PART

CHECKS

THE

PRESENCE

DL11-A OR DL11-C

:STARTING AT 776500. A MESSAGE WILL BE PRINTED INDICATING THE NUMBER
;PRESENT. THE PRINTER DIAGNOSTIC WILL ADDRESS EACH Of
;THE MULTIPLE DL11S IN THE SYSTEM IF SWITCH 13 IS DOWN (0).
:"!"""t

001326
012737
001334
013700
001340
013701
001344
005037
001350
005710
001352
012737
001360
010037
001364
000401
001366
005710
001370
062700
001374
005237
001400
005301
001402
001407
001404
000770
001406
005301
001410
001404
001412
062700
001416
000754
001420
022626
001422
013701
001426
012700
001432
012702
104023
001436
001440
104007
001442
014551

001406
000606
000610
000656

001420
000632

000004

00004

6%:

ENDS:

CLR
1S7

MOV
MOV

1¢:

000010
000656

MOV

MOV
MOV

2%:

END2A:
000010

BR
151

ADD

INC
DEC
BEQ
BR

DEC
BEQ

ADD

END?2:

000656
0146564

END& :

000002

POPSP?2

Moy

MOV

MOV
BTOASC
TYPEM

NEND2A MACHER

DLADR,RO
DLNR,R1

DLCNTY

;INITIALIZE

TIME

OUT

TRAP

:ADDRESS OF FIRST DL11
:SET DL CHECK COUNT

10 RO

JINITIALIZE DLONT

(RO)
NEND2 ,MACHER
RO,FSTOL
2%
(RO)
#10,R0

;1S DL PRESENT?
:YES, RESET TIME OUT TRAP
:STORE ADDRESS OF FIRST DL11
; CONTINUE
;15 DL11 PRESENT
;POINTER AND DL11 ADDRESS

;DECREMENT

DLOINT

END4&

: INCREMENT COUNT OF
DL

DL11'S

CHECK

COUNT,

:BRANCH IF DONE

1%
R1
END4
#10,R0
END3

:CHECK PRESENCE OF NEXT
:DONE DL CHECK?
JYES, EXIT
:NO, CHECK NEXT DL
; CONTINUE

DLCNT R
#OLTIST,RO

JGET # DL1Y'S
;ADR OF ASCII CHAR

" ,R2

DL11

;DL11 NOT PRESENT

STORAGF

;¥ OF ASCI1 CHARS
s CONVERT NUMBER

: TYPE

DL11S

DONE?

MESSAGE

cRERRANOTETRNY

CEXECUTE THE STRING OF CONSOLE TERMINAL 1/0 TESTS

<THEN EITHER HALT AT LOCATION SELHLT OR CONTINUE
;PRINTER TESTS AS A FUNCTION OF SR BIT 8,

WlTH

:l.'l!t'!t'

001444
001450

001454
001462
001464
001472
001474

106024
000177

000636
000654
005356

177777

005354

000640

177176

(LR
(LR
cmMp

BEQ

MOV
f ORWD
JMP

RINNO

LEVEL
ATOX 2177777
SKI1P

FATO, NXTST
aCURTST

;SET

JSET
;SEE

ROUTINE

LEVEL - 0
IF 1/0 1S TO BE

SADDRESS OF FIRST

SKIPPED

1/0 TEST

¢SET UP TEST PARAMETERS
;60 1O 1/0 TEST ROUTINE

ACFO LA36

(DL11

& KL 1t

13-JUN-79 15:33

:CHAINN=--

THIS PORTION IS THE

N=OOV®NO
N WOV~

AV 1V, ]

TV~
"wNNNN~NN~ o
[Wy—y DWW
NN
NN — O

PAGE

SEQ 0034

"""l"l"

:
:

—A—‘—‘—J—J—‘—.-—.—n—‘-fl—.—‘—i
ALY
AlY RV TV TV ) A YAlV IV IV IV I

AN AL AR ALY V. TV T

il —

RV IV TN

oo GO NN
N NNES S
£

a-‘—.—.-—.—-‘_‘.—‘—.-—b—l—‘—.—‘—-fl_‘_—.—. — o

U R

LV SV YV _ 1)SRV

T el il il —l) —— k] el el el ol

[alV o RV AW RN

MACYIT 30A(1052)
13-JUN-79
15:35
PROGRAM INITIALIZATION & CONTROL

ard e ol 1Y, IV 1. V] ST
l‘:bbbbwunfl
W
= QOO NN
) —~ & O 00~y

P15

TERM

FOR ALL

THREE

COMMON RE TURN

CLASSES OF

TESTS.

1--1F AN _ERROR OCCURRED DURING AN 1/0 TEST THE
OPERATOR CAN CAUSE THAT TEST 10 BE LOOPED
WITHOUT ANY FURTHER
SETTING THE '‘SCOPE'*
RESETTING SR BIT 14
ERROR HALT TO OCCUR

2-=1F

ERROR HALTS BY
BIT (#14) ON THE
10 0 WILL

AGAIN

SR-1,

ALLOW THE

STILL EXISTS.

THE OPERATOR 1S IN THE MAINTENANCE MODE,

(Bl:

8:1

AT START UP TIME), AND BIT 11=1, THE SELECTED PROGRA
M WiLL
FIRST HALT. THEN HIT CONTINUE AND PROGRAM WILL LOOP CONTINU
OUSLY.

BIT 8=0, AND BIT

11=0,

THE SELECTED PROGRAM WILL BE

= 0, THE CLASS OF

TESTS SELECTED WILL BE CON-

ADVANCED TO THE NEXT

8 AND 11

:'I".""'

001500
001500
001504
001512
001514
001516
001522
001524
001532
001534
001542
001544
001550
001552
001560
001564
001566
001574
001576
001600
001604
001606
001610
001616
001620
001624
001626
001630
001634
001636
001642
001644
001650
001652

004737
032737
001401
104011
005737
100016
032777
001407
022737
001403
017716
000002
042737

005737

001405
032777
001405
000002
005337
001407
000002
032777
001402

000137
022626
000240
005777
100003

113700
000000

005737

001420

012737

013700
000001

000634

CHAINN:

1%:

040000

177162

V77777

000642

ITS

CLASS.

AS LONG AS BITS

UOSLY SEQUENCED THROUGH.
If BIT 8=1, AND B1T 11=0, THEN THE CPU WILL HALT AT LOC
SELHLY AND WAIT FOR THE NEXT TEST NUMBER 70 BE SET IN
THE SWITCH REGISTER.,

100000
000654

000644

004000

177120

000660

JSR
BIT
BEQ

PC,CKSWR
#1,CNTLSW
1%

TS7

PRGID

TTIYCTL

BPL

BIT
BEQ
cmp
BEQ
MOV

177072

2%:
3%:

RT1}
BIC
TSt

BEQ
811
BEQ
RT]
DEC

BEQ
177076

001772

RT]

5%:

BI1
BEQ

6%:

POPSP?2

CHAINY:

177060

JMP

NOP
1ST

8PL

000636
00065¢4
000006

CHGF3:

000644

000400

TEST

1%:

000004

MOvB
HALT

187

BtQ

MOy

#SCOPSW,aSR
2%
#-1,SCOPIR
2%
aSCOPTIR,aSP

#B1T15,PRGID
LEVEL
4%
#N]TRSW,aSR
5%
I1CTR

6%
#B178,3SR
6%

WA]TF

aSR

RTNNG,RO

LEVEL

6, MACHER

;SEE IF A *G HAS BEEN GIVEN
JCHECK IF TERMINAL CONTROL
;BRANCH IF NOT

;GO TO TERMINAL CONTROL

sTEST

ERROR BIT

IN PRGID

;BRANCH IF ERROR BIT NOT SET

sERROR, CHECK IF SCOPE OPTION ON
;BRANCH IF NO SCOPING
;YES, CHECK IF OK TO SCOPE THIS TEST
sBRANCH IF NOT 0K
sPUT ADDR OF SCOPE ENTRY INTO STACK

;G0 TO SCOPE ENTRY IN TEST
;CLEAR ERROR IND. IN PRGID
sCHECK LEVEL
;BRANCH IF LEVEL=0

STEST LOOP SWITCH ON (1)
;BRANCH IF NO LOOP TESIT
;G0 BACK TO TEST
sDECREMENT TEST ITERATION COUNT

sBRANCH IF
;NOT

ZERO,

COUNT=0

REPEAT

TEST

FOR MORE

INPUT

;TEST IF SEQUENCE TEST (BIT8)
;BRANCH TO NEXT TEST 1fF BI118 ¢
;G0 WAIT

;POP 2 OFF

STACK

;THIS FORMERLY WAS RESE?
s(HECK SR

;BRANCH 1F NO HALT WANTED

sCURRENT TEST NUMBER 10 RC
SHALT (NOT FOR TEST SELECTION)

sTEST

THE

JBRANCH IF
JCLEAN UP

CURRENT

LEVEL

CZLACFO LA36 TERM (DL11 & kL1Y)
CILATF P
13-JUN-79 15:33
1583
1584
1585
1586
1587
1588

1589
1590

1591

1592

1593
1594
1595
1596
1597

1598
1599
1600
1601
1602
1603

001660
001664
001666
001674
001676
001704

012706

000600

02273%7
001004

177777

000640

005354

000640

1046024

001706

001712
001720
001722
001740
001732
001749
001746
001754
001760
001762
001766

176764

17reee

005237

MACYT1 30A(1052)
13-JuN-79
15:35
PROGRAM INITIALIZATION & CONTROL

000640

000400

176764

000200
007374
000006
000600

000644
000640
000004

MoV
f ORWD
CMp

BNE

2%:
3%:
SK1P:

JMP
(mMp

NEXT1:

SEQ 003¢

sSET UP STACK POINTER
;SET UP VALUES FOR NEXT
;END OF 1/0 TESTS (=-1)

#-1,NXTST
2%
FATO NXTST

;BRANCH IF

2CURTST
#-1,NXTST

+GO TO TESY
;END OF [/0 TESTS

TEST

NOT END

;RESET NXTST TO FIRSY 1/0 TESTY
:SET UP VALUES FOR NEXT TEST

(==1)

BNE
BIT
BNE

NEXT
#B1718,asR
NEXT]

;BRANCH IF NOT
sTEST IF WANT TEST
;BRANCH IF NOT

Mov
MoV
Mov
FORWD
JMP
INC

#PTO, NXTST
¥6 ,MACHER
#SPBOT,SP

;PROD TESTING, GO 1O PRINTER
sCLEAN UP
;SET UP STACK POINTER
:SET UP NEXT TEST PARAMETERS
;GO TO ROUTINE

BIS

176710

000654

MOV
fORWD

#5PBOT,SP

PAGE

#BI1T7,PRGID

aCURTST
LEVEL

SELECTION RIGHT

AWAY

:BYPASS SCOPING

TESTS

:t.""""

;WAIT
.

1604

®e

1605

FOR FURTHER

INSTRUCTIONS:

~LOAD PROGRAM NUMBER INTO BITS 0-5 OF THE SR
-SET SR BIT 11=1 10 LOOP ON SELECTED TEST
-SET SR BIT 11=0 AND BI1T 8=0 TO LOOP THROUGH
SEQUENCE OF SELECTED TESTS.
=SET SR BIT 11=0 AND BIT 8=1 TC HALT AGAIN AFTER
EXECUTING TEST ONCE

:t""'l’"l

001772
001774
002002
002006
002012
002016
002022
002024
002030
002032
002040
002042
002044
002052
002060
002062
002064

000006

000600
176702

000004

WAITF:

177700

BIC
CMP
BLOS
gLR

000037
000644
000241
006100
016037
023727

001744

104024
000177

000200
002616
000640

CHALT
MOV
MOV
MOV

000644
000640
001772

1%:

2%:

sOR TTYCTL IF START WAS AT
:CLEAN UP
¢SET UP STACK POINTER
;GET CURRENT Sw REG

210

R
8IS

#177700,R0
RO,#37
1$
S:GXD

;TEST IF PROG NO. IS 1/0 TEST
;BRANCH IF EQ OR LT 37. AN E(HO OR PRINTER
:1/0 TEST, CLEAR PRGID

#B117,PRGID

;BYPASS SCOPING

ROL
MOV

RO
:GET PROGRAM ADDRESS OUuT
PRGTAB(RO) ,NXTST;PROGRAM ADDRESS TABLE

cmMp

8ta
176606

#6 ,MACHER
¥SPBOT,SP
aSR,RO

fFORWD
JMP

NXTST,#WALTF

;CLEAR C BIT

;VEST IF LEGAL TEST NO.

WAITE

:BRANCH

dCURTST

;60 TO TEST

TLLEGAL

;SET UP TEST PARAMETERS

CILACFO LA36 TERM (DL ) KL 1)
CILACE P11
i3-JUN-79 1 5: 33

MACY11 30A(1052)
13-JUN-79
15:35
PROGRAM INITIALIZATION & CONTROL

PAGE

SEa 0036

:"i"l't"

JT11Y1-- THIS SECTION IS USED WHEN THE D 1AGN 0 STIC
IS BEING CONTROLLED BY
THE CONSOLE TERMINAL. IT IS EFfF ECTI v E ONLY WHEN THE DIAGNOS
TIC
STARTING ADDRESS IS 210 AND SR B I 8 WAS StT AT START
TIME,
THE RESPONSE TO THE MESSAGE ''SELECT TEST NO.'* MUST
BE THE 2

[

DIGIT OCTAL TEST NUMBER FOLLOWED BY
“L'* TO LOOP ON TEST
"'S$'' 70 LOOP ON SEQUENCE

ALL
AND
:"tttt""

002070
002072
002076
002100
002104
002110
002114
002116
002124
002126
002134
002136
002140
002146
002150

002154
002162
002166

002170
002172
002174
002200
002202
002210
002212
002216

002220
002222
002230
002234
002236
002240
002242
00224¢
002246
002250
002256
002260
002264
002266
002270
062276
002302

022626
105777
100013
017705

042705
020527
001004
042737
000413
032737
001401
000002
032737
001402
000137
012737
012700
104010
104007
015041
005037
104020
023727
001773
012700
104010
104017
117777

004737
000541
010005
006305
006305
006305
104020
023727
001773

012700
104010
104017
117777

004737
000516

1TY1:

176514

176510
177600
000177
0044C0

000634

004000

000634

1%:

000400

000634

2%:

001626
177777
000036

000710

17Y18:

000700

000040

1%:

176366

002552

POPSP2
1518
BPL
MOV

BIC
CMP
BNE
BIC
BR
BIT
BEQ

RT1

BIT
BEQ
JNP
MOV

DELAY
TYPEM
MESG3
CLR
READ

CMP
BEQ

000036

MOV
DELAY
PRNT
MOVB
JSR

176370

000700

000040

002552

MOV
ASL
ASL
ASL
READ
CMP

BEQ

000036
176320

2%:

MOV

1763¢2

""" 70 EXECUTE TEST ONCE

SPACES WILL BE IGNORED. AN ILLEGAL
THE RETYPING OF THE ABOVE MESSAGE.

MOV

000710

DELAY
PRNT
MOV8
JSR
BR

a31KS

1%
3TkB,RS
#177600,RS
RS.m77
1%
#6600, CNTLSW
11Y1B

ANITRSW,CNTLSW

#BITB,CNTLSW
11Y1B
CHAINY
#-1,INCHK
#30..RO

INCHK
TEMPCH, #40

1%
#30..R0

a1kB,a1PB
PC,TESTC

8%
RO,RS
RS
RS

INPUT

WILL

2%
#30. RO

a1kB,aTPB
PC,TESTC

FLAGGED BY

:POP 2 FROM STA(K

STEST

sMASK

BITS

ANY

INPUT

:BRANCH IF NOT
:GET CHAR

s CHECK IF RuBOUT
;BRANCH 1F NOT

;CLEAR LOOP BITS

;CHECK IF LOOP ON TEST
:BRANCH IF NO LOOP ON TEST
;LOOP ON TEST
:TEST IF LOOP ON SEQUENCE
;BRANCH IF NO LCOP ON SEQUENCE

;CHAIN

TO NEXT

TEST

;STOP INPUT CHECKING
;DELAY FOR HALF DUPLEX
:TYPE

MESSAGE

;ALLOW INPUT CHECKING AGAIN
;WALIT FOR INPUT
STEST IF CHAR IS A SPACE
;BRANCH IF YES
:DELAY FOR HALF DUPLEX
JREADY?

;ECHO CHAR
; CHECK ]F CHAR 1S 0K
:NO, ERROR
:0K, PUT CHAR INTO RS
;SHIFT INTO POSITION 5-3

TEMPCH, #40

;WAIT FOR NEXT (HAR
:CHECK IF A SPA(E
;BRANCH 1F SPACE
;DELAY FOR HALF DUPLEX

sREADY?

JECHO (HAR

¢CHECK IF CHAR 1S Ok
;ERROR IN CHAR

A '

1708

NS NN —=O 0
WNO NS W= OOV

WNNNNNN

runndd

002304
060005
002306
104020
002310
023727
002316
001773
002320 012700
002324
104010
1064017
002326
002330
002336
01
002344
002352
002354
002362
002364
002372
002374
002402
002404
002412
002414
002422
000403
002424
012737
002432
012737
002440
012706
002444
020527
103033
002450
002452
020527
002456
103007
002460
020527
002464
103404
002466
012737
002474
000402
002476
004737
002502
052737
002510
000241
002512
006105
002514
016537
002522
023727
002530
001403
002532
106024
002534
000177
002540
104017
112777
002542
002550
000601
—

1685
1686
1687
1688
1689
1690
1691
1692
1693
1694
1695
1696
1697
1698
1699
1700
1701
1702
1703
1704

-—l—.—.—‘—d—-‘—.‘—.—.—-‘—j—.—.—‘—‘—‘—‘—-‘-—‘—‘
SNONNSNNSNSNNSNN
NN~ NNNN NN
NN
NINUNOINOND —
P N
)

124

CZLACFO LA36 TERM (DL g KL kL)
CZLACF P11
13- JUN-79 1 S: 33

000700

000040

1%:

ADD
READ
CMP

RO,RS

Mov

#30.,R0

PRNT
MOvB
MoV
CMpP

a1KB,aTPB
#6001, CNTLSW
TEMPCH, #1146

BEQ

000036

DELAY

176260

004001
000700

176262

000634
000114

000700

000154

000700

000123

000700

000163

000700

000056

000001
000401
000006
000600
000040

BEQ
CMp
BEQ
CMP

BEQ
CMP
BEQ
CMp
BNE

000634

000634
000004

5%:

000020

000634

003776
000200

000644

002614
000640

000640
001772

000077

176050

8%:

TEMPCH, #154

TEMPCH,#123
3
TEMPCH,#163
3
TEMPCH, #56

SEQ 0057

;OK,RS NOW = OCTAL

;WAIT

FOR

TEST NO.

TERMINATION CHARACTER

;CHECK IF SPACE
;BRANCH IF SPACE

:DELAY FOR HALF

DUPLEX

sREADY?

;ECHO CHAR
;SET BITS 118 0

;NO,

AN """ 2

:NO,

AN *'s”

:NO,
sNO,

IS IT A "2
ERROR

;BRANCH IF VYES
;CHECK LOWER CASE

;BRANCH IF YES
;CHECK LOWER CASE

sYES SET ONLY BIT O IN CONTROL WD

MoV
MOV
MOV
cMp

#601,CNTLSW
¥6 ,MACHER
#5PBOT,SP
R5,#40

;SET BITS 88 0
; CLEAN UP
;INIT SP
;1S THIS AN 1/0 TEST
;BRANCH IF YES
;1S THIS AN OPTION TEST?
;SKIP IF YES
;1S THIS AN ECHO TEST
sBRANCH IF NOT
;FORCE ECHO TEST TO A SINGLE RUN
;LEAVE THIS TERMINAL AS CONSOLE
;RESET CONSOLE TERMINAL ADDRESS
:BYPASS SCOPING
:CLEAR C BIT

BR
JSR
BIS
cLe

ROL
MOV
cMp

176136

b33

M1, CNTLSW

MOV

6%:
7%:

TEMPCH, #40

PAGE

MOV

BHIS
CmMp
BHIS
(mMp
B8LO

000030

000001

MACYTT 30A(1052 )
13-JUN-79
15:35
PROGRAM [NITIAL 17 ATION & CONTROL

BEQ
FORWD
JMP
PRNT
MOVB
BP

8¢

R5,#30
6%
R5,#20
6%
N1, CNTLSW
7%
PC,CONIT

#B117,PRGID

PRGTAB(RS) ,NXTST;ADDR OF TEST 10 NXTST
NXTST, NWALTE
;CHECK IF TEST EXISTS

aCURTSY
#77,31PB
Tivig

;BRANCH IF NOT
:SET UP TEST PARAMETERS
;GO 1O TEST
:CHECK IF PRINTER IS READY

;SEND A "%
;TRY AGAIN

(=R el ENT. 3 AN SN (N

—

J\WWWWWW\NWW

SNNN
NN N N N~

125

CZLACFQ LA36 TERM (DL1Y & KL 1)
CILACF PN
13- 1UN-79 15:33

002552
002560
002562
002564
002572
002574
002576
002602
002606
002612

023727
103001
000207
023727
101401
000207
062716
013700
042700
000207

MACY11 30A(1052)
13-JUN=79
15:35
PROGRAM INITIALIZATION & CONTROL
sTESTC--CHECKS

THAT

TEMPCH, #60
1%
PC
TEMPCH, 467

00700

000060

TESTC:

000700

000067

1%:

000002
000700
177770

2%:

(mp
BHIS
RTS
CMP
BLOS
RIS

ADD

Mov

BIC

RTS

THE

SEQ 0038

INPUTTED CHARACTER

¥2,asP

TEMPCH,RO

#177770,R0

PAGE

IS BETWEEN O AND

INCLUSIVE

;CHECK IF NUMERIC AND EQ OR GT 0
;BRANCH [F OK
;ERROR RETURN
<CHECK IF EQ OR LT 7
:BRANCH [F Ok
;ERROR RETURN

:SET UP RETURN ADDRESS
;GET

CHAR

sSAVE ONLY

;NORMAL

THE

RETURN

DIGIT

NN N SNONSNSNSN
TN NN TN SN SN SN SN NN
TN N TN NN

002736
002740
002742
002744
002746
002750
002752
002754
002756
002760
002762
002764
002766
002770
002772

007374

007450

PT0
PT1
P12
P13
P14
PTS

39
SEQ

;DATA PATH TEST

o
(=]

£~
d i
e

PAGE

sPRINTER

007572
010166

PRGTAB:

— —

ORI
=
N~y

[

(VI

NN N NN N N~ ~
\n [V IV IV IV AV

002614
002616
002620
002622
002624
002626
002630
002632
002634
002636
002640
2
002642
3
002644
002646
002650
002652
002654
002656
002660
002662
002664
002666
002670
002672
002674
002676
002700
002702
002704
002706
002710
002712
002714
002716
002720
002722
002724
002726
002730
002732
002734

N
3
MACY11 30A(10 52 )
13-JUN-79
15:35
PROGRAM INITI AL 1ZATION & CONTROL

1741
1762
1743
1744
1745
1746
1747
1748
1749
1750
51

L 00000 ~O
0o Qo0o Qo 0o Qo 0o O 0o oD~
NS
— OO NO WV
LN — o0

026

CILACFO LA36 TERM (DL1 g KL1D)
CZLACF P11
13-JUN-79 15:33

;SPARE
;s SPARE
:SPARE

CHARACTER

;PRARE

: SPARE
;SPARE

:SPARE

;SPARE

;170 TEST
;170 TEST
s1/0 TEST
;170 TEST
;170 TEST
;170 TEST
;170 TEST
;1/0 TEST
:1/0 TEST
;170 TEST
;1/0 TEST
;1/0 TEST
;170 TEST
;1/0 TEST
;170 TEST
;170 TEST
;170 TEST
;170 TEST
;1/0 TEST
;170 TEST
sLS1 TEST

001772

TEST

sNON=PRINTING CHARACTER TEST
;CARRIAGE RETURN TEST
sMULTIPLE LINE FEED TEST
sSINGLE LINE FEED TEST
;BACKSPACE TEST
;OVERPRINT TEST
;PRINTING FREQUENCY SWEEP TEST
;RIBBON FEED TEST
;PRINTER BELL TEST
;SPARE
;SPARE
s SPARE
;SPARE
;LIFE TEST
sCHARACTER ECHO TEST
sLINE ECHO TEST, FAST RATE
sLINE ECHO TEST, SLOW RATE
sCHARACTER/CODE ECHO TEST
;SELECTIVE PATTERN ECHO TEST
;BELL ECHO TEST
; SPARE
:SPARE

; SPARE
;SPARE
:SPARE

NO.
NO.
NO.
NO.
NO.
NO.
NO.,
NO.
NO.

NO.
NO.
NO.
NO.
NO,
NO.
NO.
NO.
NO.
NO.
NO.
NO.

40
41
&2
43
44
4S
46
47
50

51
52
53
54
55
56
57
60
61
62
63
64

0C4Y

CILACFO LA3G TERM (DL g L1ty
CILACE.P1Y
13-JUN-79 1 5:1%
1797
1798
1799
1800
1801

002774
002776
003000
003002
003004
003006

MACYTT 30AC1052)
13-JUN=-79
15:35
PROGRAM INITIALIZATION & CONTROL

001772
001772
001772
001772
001772
001772

WAITF
WA]TE
WAL TF
WALTH
WAITF
WALTE

PAGE

SEQ 0040

s SPARE
SPARE
;SPARE

;SPARE

:SPARE

; SPARE

;ltttl"'!'

SEMTINT

SERVICE ROUTINE
LOCATION 30.

;tt.""t"

003010
003012

003016
003022
003026
003030
003032
003034
003036
003042
003046
003052
003054
003060
003062

003064
003066
003070
003072
003074
003076
003100

003102
003104

003106
003110
003112
003114
003116
003120
003122
003124

003126
003130
003132
003134
003136
003140
003142
003144
003146
003150
003152

000002
000000
000035

EMTINT: MOov
SUB

1%:

177001
003064
000000

2%:

MOV
(MPB
BLOS
HALT

ROL

BIC

ADD
MOV

CLR

003062
000136

003164
003406
003434
003444
003474
001500
000736
003252
003524
002070
003302
003230
003304
004412
003324
004402
004200
003726
003314
004074
003650
004272
003160
003160
003160
003160
003160
003160

EMTTAB:

MOV
RT1

JMP
TYP
ERR
EHLT
STLSRvV
STLSPV
CHAINN
CHLY
TYPM
DLY
TTY1
SCRLF
$SCRLF

SLF

SPRT(
$PRHDR

$PRNT
$SREAD
$AREAD
$(R
$BTASC
$FORWD
$READC
SPARET
SPARET
SPARET
SPARET
SPARET
SPARET

aSP,-(SP)
#2,asp
a(SP),asp
asP,#35

1%
aspP
#177001,asP
NEMTTAB,aSP
a(SP) ,asp
=(SP)
#3%,-(SP)
a(SP)+

FOR TRAPS

THROUGM

;PUSH STACKED PC

TO GET

A WORK

(COPY.

Q@)

;SUB 2 TO POINT TO CALLING TRAP INSTR.
;PLACE TRAP INSTR INTO THIS STACK WORK AREA.
;EXAMINE ITS RIGHT SIDE.
(Q)
;BRANCH IF WITHIN RANGE OF ESTABLISHED TABLE.
;ELSE HALT,
;MULT

INSTR BY 2 TO GET WORD DISPLACEMENT.

:STRIP OFF OP CODE AND LS BIT.
:ADD IN STARTING ADDRESS OF TABLE.
;FROM TABLE GET OUT DESIRED POINTER.
;PUSH A ZERO PSW.

:PUSH A PC

= TO #38 OF

THIS ROUTINE.

;D0 RT1 (POP-POP) TO ESTABLISH THE ZERO PSW.
;JMP TO ROUTINE LEAVING STACK AS FOUND.
;MESSAGE OUTPUT ROUTINE
:1/0 TEST ERROR ROUTINE
:UNCONDITIONAL HALT
;KEYBOARD VECTOR/PRIORITY SETUP

:PRINTER VECTOR/PRIORITY

SETUP

; COMMON TEST EXIT
;SR BIT 15 HALT
;MESSAGE OUTPUT ROUTINE, MULTI DEVICES
;DELAY ROUTINE
; CONSOLE TERMINAL CONTROL
;CARRIAGE RETURN-LINE FEED 1O ALL DL11'S
;CARRIAGE RETURN-LINE FEED TO CONSOLE
;LINE FEED ONLY (TO ALL)

;PRINT

CHAR

:PRINT TEST HEADER
;PRINTER READY
;READ CHAR

;1/0 TEST READ ROUTINE
s CARRIAGE RETURN ONLY (10 ALL)
:BINARY TO ASCII CONVERSION
:FORWARD ROUTINE ( BETWEEN TESTS )

;READ

CONSOLE

;SPARE

EMI1

; SPARE
; SPARE
; SPARE
. SPARE
;SPARE

EMT
EMT
EMT
EMT
EMT

KYBD ONLY

( ILACFQ LA36

CZLACF.P1Y
1853
1854
1855
1856
1857
18

003154
003156
003160
003162

TERM

(DL11

£ kLI
13-JUN-79 15:33

MACYTT 30A(1052)
13-JUN-79
15:35
PROGRAM INITIALIZATION § CONTROL

003160
003160
000000
000776

SPARET:

SPARET
SPARET

PAGE

SEQ 0041

;SPARE EMT
:SPARE EMT

HALT

SHALT

TRAP

SPARET

.SBTTL

COMMON ROUTINES USED BY LA36

JEMT

TO UNDEF INED

IS ATTEMPTED.

Qo 0o
o
o

}859
1861
1862
1863
1864
1865
1866
1867
1868
1869
1870
1871
1872
1873
1874
'875
1876
1877
1878
1879
1880

1881

1882
1883
1884
1885
1886

1887

1888
1889

1890
1891
1892

1893

1894

1895
1896
1897
1898

TESTS

""t"""'

STHIS SECTION CONTAINS MOST ROUTINES CALLED BY
:THE VARIOUS TESTS EITHER BY

TRAPPING THROUGH LOCATION

:30 OR BY SUBROUTINE CALLS (JSR PC,vee)
.

:"t't""'

STYPE-- A COMMON ROUTINE USED TO TYPE MESSAGES ON THE
CONSOLE TERMINAL ONLY. THE NULL CHARACTER
THE MESSAGE. CALLED THROUGH AN EMT TRAP,
CALLING SEQUENCE
TYPE
MESG
;ADDRESS OF MESSAGE

TERMINATES

’

:'l.t"t"'

003164
003166
003172
003200
003202
003204
003206
003210
003212
003214
003216
003220

003222
003226
003230
003232
003240
003242
003250

16601
?2766

000002
000002

TYP:

000002

1%:

012600
000002
104013
000771
104017
110077

000765

106017
11277
104017
112777

000002

2%:

3%:

175372

MOV

175360

000012

175350

$5CRLF:

. SAVE RO

2(SP) R
#2,2(5P)
(RY),RY
(R1}+ RO
2%
33
(SP)+,R0

SEXIT IF NULL (HAR
JYES, SEND (R-LF
;GET NEXT (HAR

MOVB

RO,a7PB

JLOAD PRINTER BUFFER W]TH (MAR

PRNTY

000015

RO,=-(SP)

MoV
ADD
MOV
Move
BM]
BNE
Mov
RT]
SCRLF
BR

PRNT

MOv8
PRNT
MOV
R1]

f715,a1P8
#12,37PB

;GET

POINTER

TO ADDR.

;ADDR. OF MESG
;GET (HAR

MESG.

10 R®

JBRANCH IF WANT AUTO CR-LF
:PRINT CHAR IF NOT NULL
;RESTORE RO

sPRINTER READY?

;60 GET NEXT

(HAR

;PRINTER READY?

JSEND (R

JPRINTER READY?
JSEND LF
JRETURN 10 (ALLER

CILACFO LA3G TERM (DL £ KL 1)
CILACF P11
i13-JUN-79 1 5: 33

NI — et et

—=OV®NC VW

—O

V00OV OOVOO

1899
1900
1901
1902
1903
1904
1905
1906
1907
1908
1909
1
1
1

MACY11 30AC1052)
13-JUN-79
COMMON ROUTINES USED BY LA36

15:35
TEST>

PAGE

SEQ 0042

SEXAXXAXXXX

:TYPM-==MULT] TYPE-A COMMON ROUTINE TO OUTPUT

A MESSAGE ON ALL DL11S [F TME MULTI TEST
SWITCH (BIT 13) IS RESET. THIS ROUTINE IS USED BY
THE PRINTER TESTS TO TYPE MEADINGS.
IF A UNIT
IS NOT READY, THE CHARACTER WILL NOT BE TYPED.

SXXXXXXXAXX

003252
003254
003260
003262
003264
003266
003270
003272
003274
003276
003300

000770

003302
003304
003310
003312

104022
012700
104015
000002

003314
003320
03322

012700

000002

TYPM:

1%:

BNE

000002
104012
000772
104015

104015
000002

MOV
ADD
Mov
MovB
BMI

2%:

3%:

000012

$CRLF:
SLF:

RTI
CRLF
BR

$(R:

:ADDR OF MESG T0 R1
:GET CHAR
;BRANCH IF WANT AUTO (R-LF

<RETURN
:YES, SEND
JNEXT CHAR

;GET

POINTER

;CONTINUE

70 ADDR OF

NOT NULL

CR-LF

PRINTC
BR

;PRINT CHAR
;G0 GET NEXT CHAR.

(R
Mov

¥12,R0

;SEND (R
;SET LF CHAR

PRINTC
RTI

000015

(SP) ,R1
#2,asP
(R*),R1
(R1)+,R0
2%

MOV

PRINT(
RT1

;SEND 7
:RETURN TO

#15,R0

:SET

CALLER

(R (HAR

JSEND IT
;RETURN

:'tt't""l

;ROUTINE

TO PRINT

TEST

HEADER

:"""""
003324
003330
003332
003334
003336
003342
003344
003346
003350
003354
003360
003362
003366
003372
003376
003400
003402
003404

013700
006200
006200
006200
042700
062700
104015
013700
042700
062700

104015
1064012
106014
000002

000000

000636

177770

000060

000636

177770
000060

$PRHDR:

MOV

PRINT(
TYPEM
HDRMSG
MOV
ASR
ASR
ASR

BI(C

ADD
PRINTC
MOV

BIC

ADD
PRINTC
CRLF
Lt
RT1

#0,R0

; TRANSM]T
;NUL CODE.
;PRINT MESSAGE

RTNNO,RO
RO
RO
RO

#177770,R0

#60,R0

RTINNO,RO

#177770,R0

#60,R0

sGET
SGET

TEST NUMBER
FIRST DIGIS

;MASK
;MAKE

FIRST
ASCII

DIGIT

;PRINY DIGIT
;GET TEST NUMBER AGAIN

SMASK LAST DIGIT
;MAKE ASCI]

;PRINT DIGIT
sCR-LF
+BLANK LINE
;RETURN

MESG

CILACED LAZH TERM (DL R KL1Y)
CZLACF P11
13=-JUN=-79 1 5:313

1990
1991
1992

SEQ 0043

:h'tt.'t"'

003406
003414
003416
003422
003424
003426
003434
003436
003440
003442

032777
001404
005737
100001
000002
052737

011600
005740
000000
000002

040000

175300

ERR:

000644
100000

000644

1%:
EHLT:

ERRHLT:

BIT
BEQ
1ST
BPL
RTI

Bl1S
Mov
TiT1

#¥SCOPSW,aSR
1%
PRGID
1%

;CHECK SCOPE SWITCH
;BRANCH IF NO SCOPE
:SCOPING WANTED, FIRST

;BRANCH AND
;SCOPE EX]T

#BIT15,PRGID
asSP,RO
=(RO)

:SET

ERROR

:ADDRESS

HAL

RTI

;RETURN

INDICATOR

OF
T0

ERROR?
ON FIRST ERROR

HALT

CALL
TEST

INTO RO
FOLLOWING

"'t""!'

STLSRV°-- THIS ROUTINE SETS UP KEYBOARD INTERRUPI
:
VECTOR AND PRIOITY. CALLING SEQUENCE

STRDRvV
AT20C

;LOCATION OF

NEW

INTERRUPT

VECTOR

[

003444
003452
003456
003462
003466
003472

OwiNwiru~
O NN~N~NO
OO
— N
N = = e O ~J

:"'I'.tt"

000000
000002
000622
000000
000624

003464

STLSRv:

STPRA:

MOV
ADD
MOV
MGV
:?V
I

8(SP),STPRA+?
¥2,35P
TKVIR,R1
#0,(R1)+
TKLVL,(R1) ¢

:SET

RETURN ADR AND VECTOR

Iesmerreey

éSTLSPV-- THIS ROUTINE SETS UP PRINTER INTERRUPT

1993
1994
1995

1996
1997
1998

VECTOR AND PRIORITY CALLING SEQUENCE

i}gggv ;LOCATION OF NEW INTERRUPT VECTOR

]

1999

".""'t"'

003474
003502
003506
003512
003516
003522

COO0OOOO
Lew B IR I
Yo Y
QO WPNIINN
N
O NNNNO
OO
— N
Nt
e —a O~y

2000
2001
2002
2003
2004
2005
2006

PAGE

ERRA-- COMMON ERROR RETURN FROM /0 TESTS. HALTS
:
WITH ADDRESS OF ERROR IN RO. TO CONTINUE
ON SAME TEST BUT NOT HMALTING ON ERROR,
SET THE SCOPE BIT (14) - | AND PRESS CONTINUE

OOOOOO

1988
1989

15 35
TESTS

"""""

Q=
s> —

1954
1955
1956
1957
1958
1959
1960
1961
1962
1963
1964
1965
1966
1967
1968
1969
1970
1971
1972
1973
1974
1975
1976
1977
1978
1979
1980
1981
1982
1983
1984
1985
1986
1987

MACY11 30A(1052)
13-JuN-79
(OMMON ROUTINES USED BY LA36

000000
000002
000626
000000
000630

003514

STISPV:

STPPA:

MOV
ADD
Mov
MOV
MoV
RTI

d(SP),STPPA+?
¥2,aspP
TPVIR ,R1
#O,(R1)+
TPLVL,(R1)
¢

:SET

RETURN ADR AND VECTOR

;RETURN

T0 CALLER

CALL

CILACFO LA36 TERM (DL £ KL in
CILACF PV
13=JUN=79 15:33

P4
MACYT® 30AC1052)
13-JUN-79
15:35
COMMON ROUTINES USED BY LA36 TESTS

2007

PAGE

SEQ 0044

(rteReReYeY

2008
2009
2010

:
LDELAY=--A COMMON ROUTINE TO DELAY PROCESSING
:
A GIVEN NUMBER OfF MSEC.

2012

;

MOV

;
;

THE DELAY IS EFFECTED BY
1$:
DEC
R

20N

;

2013
2014

:
:

2015
2016

2017
2018
2019
2020
2021
2022

;
:
:
.
;
:

CALLING SEQUENCE;

DELAY

#5,R0

BNE

;

2025
2026
2027
2028
2029
2030

JMACHINE
.
:
;LOOP: DEC R1
;
BNE LOOP
:
TIME=

FOR AN

gg;;

; SET TIMER

2033
2034
2035

SXXXXXXAXXX

2040
2047
2042

003524

003526
003532
003534
003536

003540
003542
003544

010146

013701
005301
001376
005300

@01372
012601
000002

000672

DLY:

1%:
2%:

THE

MSEC DELAY DESIRED

EXECUTION OF

THE

LOoP;

SINCE THE EXECUTION TIMES OF THE PDP11 LINE DOES VARY FROM
MACHINE TO MACHINE, THE VALUE AT SYMBOLIC LOCATION
"TIMER'' MUST BE CHANGED TO THE APPROPRIATE VALUE AS SHOWN BE.OW
BEFORE STARTING THE DIAGNOSTIC. "'TIMER' IS INITIALIZED

5852

2036
2037
2038
2039

;RO CONTAINS THE NUMBER OF

MOV

MOV
DEC
BNE
DEC

BNE
MOV
RTI

11/05,11/10(=251).

05810

35840

15820

LS1803
BIPOLAK

3.4
.99
2.5
1.76
5.9USEC 2.75

251

R1,-(SP)

TIMER,RY
R1
2%
RO
1%
{SP)+ ,R1

554

2.3
2.6
4.9

314

7.7

202

11/645 8§ 11/70
MOS

.30
.60
.90USEC

2127

;SAVE R

MOV 1 MSEC LOOP (N7 10 RI
;DECREMENT (OUNT
;BRANCH IF NOT ZERO
:DEC NO. OF MSEC DELAY

sDELAY AGAIN IF NOT ZERO
JALL DONE RESTORE R!

CORE

.51
.90
.98
1.13
1.69USEC

1237

755

2.03USEC

CILACEQ LA36 TERM (DLTT & KL 1)
CILACF.PY
13=JUN=7G 15:33
2043

MACY11

30A(1052)

13-JUN-79

gg&g

;

2049

PAGE 45
SEQ 0045

Jemetvereey

:
;PFAIL--POWER FAIL ROUTINE

&
15:35

COMMON ROUTINES USED BY LA36 TESTS

2044
2045

2046

SAVE ALL REGISTERS AND SET
INTO LOCATION 24

:RESTART-=POWER FAIL RECOVERY

RESTART

ADDRESS

RESTORE

SEQ 00«e

ALL REGISTERS AND GO 1O START?

PAGE

————

2050

MACYTT 30AC1052)
13-JUN-79
15:35
COMMON ROUTINES USED BY LA36 TESTS

CZLACFO LA36 TERM (DL1Y B K(11)
CZLACE.P1N
i3=JUN-79 15-33

CILACFO LA3G TERM (DL1T § « LY
CILACE P
i3-JUN-79 15:33

2051
2052
2053
2054
2055
2056
2057
2058
2099
2060

2061
2062

2063
2064
2065
2066
2067
2068
2069
2070
2071
2072
2073
2074
2075
2076
2077
2078
2079

1
MACYTT 30A(1052)
15-JUN-79
(DMMON RNOUTINES USED BY LA36

4
15:35
TESTS

PAGE

SEQ 0047

;.‘.'l..'.'

003546
003550

PFAIL:

003%52
003554
003556
003560
003562
003566
003572
003600
003602
003604
003606
003612
003614
003620
003622
003624
003626
003630
003632
003634

012600
000137

003640
003646

050200
000200

000024
003602
003604

000024
SAVR6:

RESTRT:

RO,-(SP)
R1,-(sP)
R2,=(SP)

R3,-(SP)

R4, =(5P)

RS,=(SP)

24,-(SP)

SP,SAVR6
#RESTIRT 24

;SAVE STACK POSITION
;STORE RESTART ADDRESS

003602
000024

001026

053517

MOV
MoV
MOV
MOV
MOV
MOV
MOV
MOV
MOV
HALY
_WORD
TYPEM

051105

1%:

MOV
MOV
MOV
MOV
MOV
MOV
MoV
MOV
JMP

STARY

LASCIZ

<ACRLF>/POMER/ <ACRLF>

.EVEN

SAVR6,SP
(SP)+,24
(SP)+ RS

JRESTORE
JRESTORE

(SP)+ R4

(SP)+ R}
(SP)+ ,RZ
(SP)+
R1
(SP)+ RO

STACK
PFAIL

POINTER
ADDRESS

CILACFD LAYG TERM (DLYT & xL11)
CILACF P
13-JUN=79 15:33
2080

MACY1T 30A(1052)
13-4UN=79
15:35
COMMON ROUTINES USED BY LA36 TESTS

PAGE

SEQ 00«8

iveeerevey

2081
2082

:
;FORWARD=--THIS ROUTINE TRANSFERS THE 2 OR & ARGUMENTS

gggz

;

FROM THE TEST ROUTINE. THEY ARE;

2085
2086

;
;
;

1- ROUTINE NUMBER
- ADDRESS OF NEXT

2087

3- ITERATION COUNT

gggg

2090

Ettltttt't'

2091
2092
2093
2094
2095
2096
2097
2098
2099

003650
003654
003660
003664
003670
003672
003676
003702

2101
2102
2103

003710
0037'¢
003724

2100

003706

013705
012537
012537
105737
100407
012537
012537
©€10537

000002

012737
012737
000766

000640
000636
000640
000644
000660
000642
nN00676

177777
00000'

000642
000660

TEST
(1/C TESTS ONLY)

L= SCOPE ENTRY ADDRESS (1/0 TESTIS ONLY)

$FORWD: MOV
MOV
MOv
1518
BM|
MoV
MOV
FORWDA: MOV

NXTST,RS
(RS)+ ,RINNO
(R5) ¢ NXTST
PRGID
fORWDB
(R5)+,1CTR
(R5) ¢+ ,SCOPTR
RS,CURTST

sADDR OF NEXT TEST 10 RS
:GET NUMBER OF NEXT TEST
;GET ADDR OF FOLLOWING TEST
sCHECK IF /0 TEST
;SKIP THE FETCH OF ITER CNT AND SCOPE
sGET ITERATION COUNT
;GET SCOPE ENTRY POINT
SENTRY POINT TO TEST IN CUR TST

FORWDB: MOV
MOV
BR

#-1,5COPTR
#1,1CTR
FORWDA

;FORCE NO SCOPE
;FORCE INTERATION COUNT OF

RT1

JEXLT

CILACFO LA36 TERM (DL1T B ki m
CZLACE P11
i3-JUN-79 15:33

MACY11 30A(1052)
13-JUN-79
15:35
COMMON ROUTINES USED BY LA36 TESTS

PAGE

SEQ 0049

:""t"."

;AREAD--A ROUTINE WHICH,

YR I

S AR

THE

THROUGH THE

MAINTENANCE BIT,

PRINTER BUFFER

OUTPUTS

AND READS THE

FACILITY Of
10

THE

KEYBOARD

STATUS DONE. 1F THE DONE IS NOT SET
WITHIN 600 MSEC, THE CPU WILL HALT WITH
THE LOCATION OF THE ERROR IN RO. PRESS
CONTINUE TO CONTINUE WITH TESTS.

;"'!tt""

003726
003734
003742
003746
003752
003754
003760
003762
003766
003770
003772
003774

012737
052777
005077
105777
100410
012700
104010
005337
001367
106002
000755
000002

000600
000004
174652
174640

000664
174654

$SAREAD:

1%:

000001

MOV
BIS
CLR
1518
BMI

#600,BRCTR
#e,31PS
alPB
aTKS
2%
#,RO

DEC
BNE
EHALT
BR
RTI

BRCTR
1%

MOV
DELAY

000664

2%:

$AREAD

;SET UP 600 MSEC DELAY
;SET MAINTENANCE BT
;LOAD PRINTER BUFFER
;CHECK DONE B17
;BRANCH 1F DONE
;ONE T0 RO
;DELAY 1 MSEC.
;600 MSEC OVER
;BRANCH [F NO

:TRY AGAIN
;RETURN TO TEST

MASLAAARE
S/

SCONIT==THIS ROUTINE SETS UP THE DEVICE ADDRESSES
H

AND INTERRUPT VECTORS FOR THE CONSOLE
TERMINAL.

;"'t'l""

004070
004072

W
~NNN~

WO
W
NNO
Y

013700
010037
005720
010037
005720
013737
010037
005720
|
3
1
3
1
3

leleolole]

003776
004002
004006
004010
004014
004016
004024
004030
004032
004040
004044
004052
004060
004066

1
062737

000207

000000
000000

000602
000612

(ONIT:
CONSET:

000614
000616
0C0616
006620
000620
000604
000604
000004

004070

MmOV
MOV
15T
MOV
187
Mov

MOov
TS1

004072

MOov

TPSS:
TPB5:

RO,TPS
(RO)+

. CONSOLE KEYBOARD STATUS ADDR T0 RO
;KEYBOARD STATUS ADDRESS (777560; 10 Txs
; INCREMENT RO BY TWO
:KEYBOARD DATA ADDR (777562) 10 1kB
; INCREMENT RO BY TWO
;SAVE TPS OF LAST TERMINAL

;PRINTER STATUS ADDR(777564)

s INCREMENT RO BY

TWO

TPB, TPBS

:SAVE TPB OF LAST TERMINAL

ADD
RTS

#6,TPVIR
PC

;PRINTER

WORD
.WORD

0
O

:LAST
:LAST

MoV
MOV
MOv

000622
000626
000626

CONADD, RO
RO, TKS
(RO)+
RO, TKB
(RO)+
TPS,TPSS

RO,7PB
CONVEC,TKVIR
CONVEC,TPVIR

10 TPS

:PRINTER DATA ADDR (777566) 10 1PB
:KEYBOARD INTERRUPT VECTOR (60) T2 TkvIR
INTERRUPT

VECTOR

TERM STATUS REG ADR
TERM BUFFER REG ADR

(64}

TPVIR

4
L
MACY11 30A(1052)
13-JUN-79
15:35
COMMON ROUTINES USED BY LA36 TESTS

CZILACFO LA36 TERM (DL 11 & KL1Y)
CILACF P
13-JUN=79 15:33

2154

2155
2156
2157
2158
2159
2160
2161
2162

eee

:
:BINARY TO ASCII CONVERSION (1 10 5 ASCII CHARACTERS)
CALLING SEQUENCE
;
MOV
ADDRESS OF LOC. TO STORE FIRST ASCI1 CHAR. INTO RO
MOV
BINARY NUMBER 70O BE CONVERTED INTO R1
MOV
NUMBER 10 BE CONVERTED AS A PNWER Of TEN INTO R2
BTOASC
:

2163

Jerrrrevr ey

2164
2165
2166
2167

004074
004100
004102

010237
006302
062702

2169
2170
2171
2172
2173
2174
2175
2176
2177
2178
2179
2180
2181
2182
2183
2186
2185

004106
004112
004116
006122
004124
004130
004132
004136
004144
004150
004154
004156
004160
004162
004164
004166
004174

014237
005037
163701
103403
005237
000772
063701
062737
113720
005337
001354
000002
000000
000000
000000
000001
001750

2168

PAGE

004160
004166

0046164
004162
004164
004162

004164
000060
004162
004160

(000G12
023420

“«

004162

000144

$BTASC: MOV
ASL
ADD

R2,CNVCIR
R2
¥ADTENP,R?

1%:

=(R2), TENPWR
DIGIT
TENPWR,R1
3%
DIGIT
2%
TENPWR,R1
#60,D01G17
DIGIT, (RO)+
CNVCTR
1%

MOV
CLR
2%:
SuB
BCS
INC
BR
3%:
ADD
ADD
MovB
DEC
BNE
RT1
CNVCTR: .WORD
DIGIT:
_WORD
TENPWR: .WORD
ADTENP: .WORD

;SAVE TEN POWER
;R2¢2
sCALCULATE ADDRESS OF

;STARTING TEN POWER

;POWER OF TEN VALUE 10 TEN PWR
sCLEAR CURRENT DIGIT
;SUBTRACT TEN POWER FROM BINARY VALUE
:BRANCH IF END

;RESTORE SUBTRACTED VALUE
; CONVERT (DIGIT) TO ASCI1
sPUT ASCI] CHAR INTO USER BUFFER
;FINISHED ALL CHARS. CALLED FOR
;BRANCH IF NOT FINISHED
JYES, EXIT
0
;CONVERSION CHARACTER COUNT
0
;CONVERTED CHARA{TER
0
;CURRENT TEN POWER
1.,10.,100.,1000.,10000.

SEQ 005

D0 0000 ~O 00 00 0o oo

oonwa«mbww—-oooowo

—d el

da T a1 L VT ST UY VY VT T
it

LA36 TERM (DL ) KL IR D)
1
13-JUN-79 1 5: 33

L)
MACY11 30A(1052)
13-JUN-79
15:35
COMMON ROUTINES USED BY LA36 TESTS

PAGE

$5)

SEQ 0051

SXXAAXXAAXX

;READ-- A COMMON ROUTINE WHICH CHECKS THE KEYBOARD

DONE

FLAC & SETS A FLAG

INDICATING CHAR PAR]TY

SXXXXXXXXXX

004200
004737
004204
005737
004210 001430
004212
013737
004220 013737
004226
105777
100005
004232
004234
013700
004240 004737
004244
000415
004246
005337
004252
001404
004254
062737
004262
000761
004264
105777
100350
004270
004272
85777
004276
004300
004306
004314
004322
004330
004336
004344
004346
004352
004360
004362
004364
004370
004372
004376
000770
004400
000002

003776
000656

000656
000632
17464436

$READ:

000666
000670

1%:

2%:

000670
004002
000666
000010

38:

000670

174322
174314

1764310
000700
177400
000700
177600
000700

000011
000377

000700
000704
000704
000703
000700
000004

000702

JSR
187
BEQ
MoV
Mov

1STB

BPL
MOV
JSR
BR

DEC
BEQ

ADD
BR
4%
1518
BPL
SREADC: TSTB
BPL
READ1:
MOVB
MovB
eic
MOvB

Bl1C

cMp

BtQ
MOV

18:

000703

000702

2%:

PC,CONIT
DLCNY
$READC
DLCNT,COUNT3
FSTDL,XCSR

aXCSR

3s
XCSR,RO
PC,CONSET
READ1

#10,XCSR
2%
aTKS
1%
aTkKS
SREADC
a8TKB,TEMPCH
TEMPCH,PCHAR
#1776400,PCHAR
TEMPCH, PARITY+1

#177600,TEMPCH
TEMPCH, #4

BIC

#377 ,PARLTY

BEQ

DEC

ASLB
8CC
comB
BR

RT1

PARITY+1
1%
PARITY

;TEST

IF ANY INPUT

;CONTINUE IF NO INPUT
;SET THIS OL11 AS CONSOLE

COUNT3
4%

SREAD
f1,R0

;RESET CONSOLE ADR AND VE(CTORS
sCHECK IF MULTI DL11'S AVAILABLE
;NONE, WAIT FOR CONSOLE INPUT
sSET DLY1 COUNT
:ADDRESS OF FIRST DL'1 INTO X(SR

;READ CHAR AND RETURN
;DECREMENT DL11 COUNT
;TEST CONSOLE WHEN DONE DLI1°'S

;NEXT DL11 ADDRESS
: CONTINUE
s CHECK CONSOLE
;WALT, NO INPUT
:CHECK KEYBOARD DONE FLAG
;BRANCH IF NOT SET
:SAVE CHARACTER
:SAVE CODE WITH PARITY BIT
;MASK UNWANTED BITS
;SAVE CHAR WITH PARITY BIT

;MAKE IT 7 BIT ASCI]

:DISREGARD EOT

:SET

SHIFT

COUNT

:DECREMENT

SHIFT

:CLEAR PARITY FLAG

;EXIT

IF DONE

COUNT

;SHIFT CODE
:CONTINUE IF BIT WAS Z2ERO
;CHANGE PARITY FLAG IF BIT WAS ONE
; CONTINUE

:SET, RET.

TO CALLER

SXXXXXXXXXX

;PRINT-- A COMMON ROUTINE

TO CHECK

THE

PRINTER READY

FLAG

SXXXXAXXXXX
004402
004406
004410

105777
100375

000002

1742170

$PRNT:

T1S78

BPL
RT1

aTPS

$PRNT

;CHECK PRINTER READY FLAG

sBRANCH IF NOT SET
:SET,

RETURN

2359

N
&
MACYT1 30A(1052)
13-JUN-79
15:35
(OMMON ROUTINES USED BY LA36 TESTS

( ILACFO LA36 TERM

CILACF P11

(DL1T & KL 1)
13-JUN-79 15:33

2237
2238
2239
2240
2241
22642
2263
2244
2245

PAGE

SEQ 0052

:t""""'

:PRINTC--SENDS A CHARACTER AT A TIME FIRST T0 THE
;

:
:
:
:

CONSOLE

DL11

THEN

TO ALL

MULTIPLE

DL11S

IFf

SR BIT 13 IS = 0. !f THE REFERENCED PRINTER
READY BIT IS NOT SET, THE CHARACTER WILL NOT BE
SENT TO THAT PRINTER. ENTER WITH CHARACTER IN RO.
CALL:
PRINTC

;tt"""
004412
004420
004426
006432
004434
004442
004446
004454
004456
004462
004464
004470
004476
004504
004510
004512
004520
004522
004530
004532
004536
004540
004546
004554
004562
004570
004572
004600
004602
004606
004614
004616
004624
004626
004632
004634
004642
004644
004652
004654
004662
004664
004672
006674
004702

013737
062737
105777
100375
062737
010077
032777

001003

005737
001002
000137
013737
013737
005737

001140
023727
002004
022737

001130
105777
100125
062737

017737

042737
023727
001006
023727
001002
000137
023727
001427
023727
001003
013703
000461

023727
001004
013737
000451
023727
001056
013737
000441
023727
00101

000602
000004

$PRTC:

174260

000002
174244
020000

1%:

000712
174240

000710

000636
104011

000666
000670

000002
1764116

177600

000700
000636
005226
000700

000636

2%:
3s:
4%:

000020

5%:

000670
000700
000700
000003

6$:

000021

000700

000662

000636

000022

000700

000662

000636

000021

7%:

9%:

aTEMP
1%
#2,TEMP
RO,QTEMP

;WAIT FOR CONSOLE READY
:SET ADR
;LOAD CONSOLE PRINTER BUFFER

#B17113,aSR

2%
DLCNT
3%

BNE

13%

TS7

INCHK

RTNNO,#20

BGE
cmp
BNE
TS18B
8PL
ADD
Mov
BlC

5%
FTTYCTL,WAITF
13¢
aXCSR
13%
#2,XCSR
aXCSR, TEMPCH
#177600,TEMPCH

BNE

BNE
JMP
cme
BEQ
CMP

TEMPCH, #3

RTNNO, #24

6%
20$
TEMPCH, #177
9$
RTNNO,#17

MOV

TEMPCH,R3

CMP
BNE

RTNNO, #21
8%

B8R

MOV

8%:

:SET

18%
DLCNT,COUNTS
FSTIDL,XCSR

BNE

000700

CONADD, TEMP

#4,TEMP

JMP
Mov
MOV

CMpP

000017

000636

BNE
TS1
BNE

cmp

00002¢4
000177

18718
BPL
ADD
MOV

CMP

001772

174132

ADD

BIY

000656

005122
000656
000632

MOV

12%

TEMPCH,REPY

CONSOLE

ADR

JCHECK SW 13

sSEND ALL TERMS IF
sCHECK IF MULTIPLE

;CHECK FOR

INPUT

SW13 DOWN
DLI1'S

THERE

sPUT NO. DL11°'S INTO COUNTS3
sADDR OF FIRST DL INTO XCSR

;CHECK

FOR

INPUT?

;PRINTING TEST?

;BRANCH IF NOT
sKEYBOARD CONTROL?
sSKIP INPUT CHECK IF NOT
sTEST 1F ANY INPUT
;CONTINUE IF NO INPUT
;SET BUFFER ADDRESS
;CHECK

;CONTINUE

CONTROL-C

IF NOT

;CHECK IF TEST 24

;CONTINUE

IF NOT CONTROL=-(

;CHECK IF RUBOUT

;YES,
JTEST

CHECK
177

:SAVE

CHARACTER

TEST NUMBER

;BRANCH IF NOT

; CONTINUE

;TEST 212
;BRANCH IF

:SAVE

NOT

CHARACTER

BR
CMP

129
RTNNO,#22

s CONTINUE
;TEST 227

BR
cmMp
BNE

12%
RINNO, #21
10%

s CONTINUE
JCHECK [F TEST 21
:NO, CHECK IF TEST 22

BNE
MOV

14%
TEMPCH,REPT

:CONTINUE IF NOT
: SAVE CHARACTER

CZLACFO LA36 TERM (DL1T R KL 1
CILACE.PYY
i3-JUN-79 15-33

2293
2296
2295
2296
2297

2298
2299
2300
2301
2302

2303
2304
2305
2306

2307

2308
2309
2310
2311
2312
2313
2314
2315
2316
2317
2318
2319
2320
2321
2322
2323
2324
2325
2326
2327
2328
2329
2330
2331
2332
2333
2334
2335
2336
2337
2338
2339
2340
2341
2362
2343
2344
2345
2346
2347
2348

004704
004706
004712
004714
004716
004720
004722
004726
004734
004736

022626
012700
104010
104007
014772
104005
000137
023727
001011
022626

004740
004744
004746
004750

012700
104010
104007
014772

000036

004754
004760
004766
004770
004772
004776
005002
005004
005010
005012
005020
005026
005034
005042
005050
005052
005056
005060
005066
005072
005076
00" 00
005106
005112
005120
005122
005126
005130
005136
005140
00546
005150
005154
005156
005164
005172
005200
005206
005214
005216
005224

000137
023727
001133
022626
000137
012700
104010
013700
000403
062737
062737
013737
062737
023737
001420
105777
100375
062737
010077
005337
001411
062737
000137
062737
000764
005737
001111
023727
002004
0227%7
001101
105777
100076
013737
062737
117737
042737
023727
001013
023727
001007

012234
000636

004752

104005

POPSP?2
MoV
DELAY
TYPEM
ECOEND

000036

012176
000636

000022

10%:

000024

!1$:

128:

000700
000002

000004
000712

000670

000670
000712

000712
000670

173576
000666
000002
004504
000002

13$:

14$:

i
15%:

173612

000002

CHAIN
JMP
cmp
BNE
POPSP2

000670
16%:
000670

000670

17%:

000710

18%:

000636

000020

104011

001772

173426

‘
19%:

000602
000002
173514
177600
000700

000712
000712
000700
000700
000003

000636

000024

#30.,R0

E021A
RTNNO, 22
11¢

MOV
DELAY
TYPEM
ECOEND

¥3C. RO

JMP
(mp
BNE
POPSP2
JMP
MoV
DELAY
Mov
BR
ADD
ADD
MOV
ADD
(Mp
BEQ
IST8
BPL
ADD
MOV
DEC
BEQ
ADD
JMP
ADD
BR
1§71
BNE
(mp
BGE
cme
BNE
1S18
8PL
Mov
ADD
MOVB
B1(
(MP
BNE
(Mp
BNE

E022A
RTNNO, #24
22%

CHAIN

013156
000036

000002
000602

MACY11 30A(1052)
13-4UN-79
15:35
(OMMON ROUTINES USED BY LA3S TESTS

PAGE

sASJUST STACK
:DELAY FOR HALF

SEQ 0053

DUPLEX

SYES, TEST 21
;PRINT TERMINATION MESSAGE
;CHAIN TO NEXT TEST
;REPEAT TEST IF LOOP ON TEST SW SET
;CHECK JF TEST 22
:NO, CHECK IF TEST 24
;ADJUST STACK

;DELAY FOR HALF DUPLEX

:YES, PRINT TERMINATION MESSAGE

TERM
#30..RO

TEMPCH,RO
14%
M2, XCSR
#2,XCSR
CONADD, TEMP
¥4, TEMP
TEMP XCSR
17%
aXCSR
15%
¥2,XCSR
RO,3XCSR
COUNT3
18%
#2 XCSR
3
#2,XCSR
16%
INCHK
26%
RTNNO, #20
19%
#TIYCTL WAITF
269
aCONADD
269
CONADD, TEMP
#2,TEMP
STEMP, TEMP(H
¥177600,TEMPCH
TEMP(H,#3
21%
RTNNO, #24
21%

;CHAIN TO NEXT

TEST

;REPEAT TEST IF LOOP ON TEST SW SET
JTEST 247
;WAIT FOR NEXT TEST IF NOT TEST 24
;RESET STACK
:TERMINATE TEST
;:DELAY FOR HALF DUPLEX
:SET NEW CHARA(CTER
s CONTINUE
;SET STATUS ADDRESS IN X(SR

;CHECK IF CONSOLE TERMINAL
;1S THIS DL
;TEST PRINTER READY
;WAIT FOR READY
;SET XCSR TO PRINTER BUFFER
:LOAD CHARACTER INTO BUFFER
;DECREASE COUNT OF DL11'S
;ALL DONE ,EXIT
;SET XCSR TO NEXT DL11 PRINTER STATUS
:GO TEST NEXT DL11 READY FLAG
:SET XCSR TO PRINTER BUFFER
;00 NOT LOAD BUFFER
;WANT INPUT CHECK?
:NO, BRANCH
;PRINTING TEST?
:BRANCH IF NOT
;KEYBOARD CONTROL?
:SKIP INPUT CHECK IF NOT
;TEST IF ANY [NPUT
;BRANCH IF NONE
:SET ADR
;MASK UNWANTED BITS
;CHARACTER = CONTROL-(C?
;CONTINUE 1f NOT
JTEST 247
;CONTINUE IF NOT

%ASb

005226
005232
005234
005236
005240
005244
005252
005254
005256
005264
005270
005272
005276
005300
005302
005310
005312
005316
005324
005326
005334
005342
005344
005352

TERM (DL & xL11)
13-JUN-79 15:33

012700
104010
104012
022626
000137
023727
001006
000607
012737
000137
010046
012700
104010
012600
023727
001002
013703
023727
001003
013737
023727
001003
013737
000002

000036

013030
000700
000001
002154

MACYT11 30A(1052)
13-JUN-79
15:35
(OMMON ROUTINES USED BY LA36 TEST>

20%:

000177

21$%:

000634

2¢2%:

¢3%:

000036
000636

000017

000700
C00636

000021

24$:

000700
000636

000662
000022

25%:

000700

000662

26%:

MOv
DELAY
(RLF
POPSP2
JMP
(mp
BNE
BR
MOV
JMP
MOV
MOv
DELAY
MOv
(Mp
BNE
MoV
(MpP
BNE
MOV
(mp
BNE
MoV
RTI

#30..R0

PAGE

;DELAY FOR HALF

SEa 0054

DUPLEX

:SEND CR-LF
JRESET STA(K
RETURN 10 TEST
;CHECK IF RUBOUT
;BRANCH [F NO

£0248B
TEMPCH #1177
23%
9%
1, ONTLSW
T1v1B
RO,-(SP)
#30.,R0

;CLEAR LOOP AND SEQUENCE BITS
;G0 WAIT FOR NEXT TEST
;SAVE RO
;DELAY FOR HALF DUPLEX

(SP)+ RO
RTNNO,#17
24%

;RESTORE RO
;CHECK IF TEST
;BRANCH IF NOT

TEMPCH,R}
RTNNO, #21
25%
TEMPCH,REPT
RTNNO,#22
26%
TEMP(H ,REPT

17
TEST 17
:STORE INPUTTED (HARA(TER
;CHECK IF TEST 21
;BRANCH IF NOT TEST 21
:STORE INPUTTED CHARACTER
;CHECK JF TEST 22
;BRANCH IF NOT TEST 22
:STORE INPUTTED CHARACTER
;RETURN TO TEST

CZLACFO LA36 TERM (DLIY & xL11)
CILACE P
i13-JUN-79 15:33

2374

0
b)
MACYTT 30A(1052)
13-JuN-79
15:35
COMMON ROUTINES USED BY LA36 TEST>

PAGE

SEQ 0055

CZLACFQ LA3Z6 TERM (DL £ kL)
CZLACF PN
13-JUN=79 1 5:33%

MACY1]

30A(1052)

13-JUN-79

170 LOGIC TESTS
LSBITL

15:35

PAGE

SEQ 0056

1/0 LOGIC

TESTS

:""."t"

:ONLY THE CONSOLE TERMINAL IS TESTED.
:UPON COMPLETION, THE CPU WILL EITHER WALT

:BITB 1S = 1 AND AWAIT FUTHER INSTRUCTIONS OR CONTINUE

;AND EXECUTE THE PRINTER TESTS CONTINOUSLY
;1F AN 1/0 TEST FAILS, THE CPU WILL HALT AT ERRHLT
;WITH THE ADDRESS OF THE ERROR IN RO (LOC 777700). PRESSING
;THE CONTINUE SWITCH WILL CAUSE THE 1/0 TEST 10
;CONTINUE WITH THE NEXT TEST. HOWEVER IF SWITCH 14
;WERE SET, OR IS SET BEFORE THE CONTINUE SWITCH IS

;PRESSED, THE FAILED TEST
;WITHOUT FURTHER HALTS

WILL

LOCP ON

ITSELF

;'.'tt""'

;ATO-=
.

TEST #40--TESTS THE ABILITY 10 REFERENCE THE
RECEIVER STATUS WORD (TKS) WITHOUT TRAPPING.

:"""'I"

005354
005356
005360
005362
005364
005372
005376
005400
005402
005404

000040
005406
000012
00537¢
012737
005777
104005
000774
104001
000774

AYO0:

ATOX:

005402
173214

000004

1%:

2%:
3%:

;TEST NUMBER
SNEXT TEST
:1TERATION COUNT
:SCOPE ENTRY

AT1
10.

1%
MOv

191

#3% MACHER
aTKS

:SET UP MACHINE ERROR TRAP
;REFERENCE RECEIVER STATUS WORD
:CHAIN TO NEXT TEST
sREPEAT TEST

:RECEIVER STATUS WORD

CHAIN

ERROR

;ERROR TRAPPED WHEN REFERENCING
(TxS)

"""l""'

JAT1==TEST
:

#41--TESTS

RECEIVER

THE

BUFFER

:t'tl"'t"

005406
005410
005412
005414
005416

005424
005430
005432
005434
005436

000041
005440
000012
0N5424
012737
005777
104005

000774
104001

000774

AT1:

005434
173164

000006

41
AT2
10.

1%:
2%:

3%:

MOv

181
CHAIN
8R
ERROR
B8R

ABILITY

(TKB)

WITHOUT

*TEST
JNEXT

#3% MACHER

alkB

REFERENCE
TRAPPING.

THE

NUMBER
TEST

;ITERATION COUNT
;SCOPE ENTRY

:SET UP MACHINE ERROR TRAP

;REFERENCE RECEiVER BUFFER
;CHAIN TO NEXT TEST

;REPEAT

TEST

:TRAPPED WHEN REFERENCING

;RECEIVER BUFFER

(1kB)

CZLACFO LA3S

CZLACF P

TERM (DL 2 KL 1)
i3-JUN-79 1 5: 33

MACY11

13-JUN-79

170 LOGIC TESTS

26422
2423
2424
2425

2426
2627
005440
000042
2428
005442
005472
2629
005444
000012
2430 005446
005456
2431
005450
012737
2632
005456
005777
2433
106005
005462
2434
005464
000774
104001
2435
005466
005470
2436
000774
2437
26438
2439
2440
2441
2462
005472
2443
000043
2444
005474
005524
24645
005476
000012
2446
005500
005510
2447
005502
012737
2448
005510
005777
104005
2449
005514
005516
2450
000774
104001
2451
005520
005522
2452
000774

30A(1052)

S
15:35

PAGE

SEa 0057

;"t"""'

JAT2-=TEST #462--TESTS THE ABILITY TO REFERENCE THE
;

TRANSMITTER

STATUS

:!'.'tt""

AT2:

005466
173134

000004

1%:
2%:

3%:

42
AT}
10.
1%
MOv
1ST7

CHAIN
BR
ERRCR

WORD

(TPS)

WITHOUT

TRAPPING.

;TEST NUMBER
JNEXT TEST
:1TERATION COUNT
:SCOPE ENTRY
;SET UP MACHINE ERROR TRAP
JREFERENCE TRANSMITTER STATUS

#3% MACHER
alPs

:CHAIN TO NEXT TEST
+REPEAT TEST
: TRAPPED WHEN REFERENCING

1%
2%

;TRANSMITTER

STATUS WORD

:tttt't""

;AT3==
;

TEST #43--TESTS THE ABILITY TO REFERENCE THE

TRANSMITTER

BUFFER

;""'lt"'

AT3:

005520
173104

000004
1%:

2%:

3%:

187

(HAIN
BR
ERROR

WITHOUT

TRAPPING.

;TEST NUMBER

Al4

10.
1%
Mov

(TPB)

SNEXT

#3% MACHER
aTPB

1%
2%

TEST

;1TERATION COUNT
;SCOPE ENTRY
:SET UP ERROR TRAP

;REFERENCE

TRANSMITTER BUFFER

;CHAIN TO NEXT TEST
SREPEAT TEST
: TRAPPED WHEN REFERENCING

:TRANSMITTER BUFFER.

CZLACFO LA36 TERM (DL11 § K| i
CZLACF P11
13-JUN-79 15:33

2653
2654
2455
2656
2457
2458
005524
2459 005526
2460
005530
2461
005532
2462
005534
2463 005540
2464
005564
2465
005546
2466
005554
005562
2467
2468
005564
2469 005566
2670
005570
005576
2471
005604
2472
2473
005606
005610
2674
005612
2675
2676
2677
2478
2479
2480
2481
2482
005614
2483
005616
2484
005620
005622
2485
2686
005624
005630
24687
2488
005634
2489
005636
2490
005644
2491
005650
005652
2692
2693
005654
4
005662
249
2495
005664
2696
005666
005670
2497

MACYT1

30A(1052)

13-JUN-79

170 LOGIC TESTS

15:35

PAGE

StQ 0058

:.."I""'

SAT4-;

TEST #44-~TESTS THE ABILITY TO
RECEIVER INTERRUPT ENABLE BIT.

SET

AND

CLEAR

THi

"""l""'

000044
005614
000032
005546
012746
012746
000002
052777
032777
001002

AT4:

ATS
10.
1%
MOV

000340
005546

000100
000100

173036
173030

104001

000410
042777
032777
001401

1%:

2%:
000100
000100

173014
*73006

104001
104005

3%:
6%
5%:

000755

;TEST

NUMBER

:?Y

s, -(SP)

NPRTY7,-(5P)

SNEXT TEST
;ITERATION COUNT
:SCOPE ENTRY
;SET PRIORITY 7

BIS
BIT

#B116,37KS
MB116,a7kS

;SET INTERRUPT ENABLE BIT
CHECK IF BIT IS SET

BNE

ERROR

BR
BIC
Bl
BEQ
ERROR
CHAIN

5%
#BIT6,aTKS
#B1716,aTKS
5%

;BRANCH

SET

;NOT SET, ERROR

sCHAIN TO NEXT TEST
;CLEAR INTERRUPT ENABLE BIT
;CHECK IF BIT IS CLEARED
;BRANCH IF CLEARED
:NOT CLEARED, ERROR
;CHAIN TO NEXT TEST
;DO TEST

AGAIN

;"."l’""

JATS5==
;

TEST #45--CHECKS THAT THE RECEIVER INTERRUPT
ENABLE BIT CAN BE CLEARED W]TH RESET INSTRUCTION.

NN RONTSD

000045
005672
000012
005636
012746
012746
000002
052777
105777
001775
000005
032777
001401
104001
104005

000762

ATS:

;TEST NUMBER

ATé

10.
1%

000340
005636

000100
172746
000100

SNEXT

172746

1$:

172730

’%:

MOV
MOV
R1I
B1S

NPRIY7,=(SP)
£1%,-(SP)

#B116,37«S

TEST

¢ 1TERATION COUNT
:SCOPE ENTRY

;SET

PRIORITY

INTERRUPT

ENABLE

1STB

aTP$

;BE

RESET
BT
BEO
ERROR

B176,a7xS
2%

;RESET
;TEST INTERRUPT ENABLE
;BRANCH [F CLEARED
;STILL SET,ERROR

3 )

JREPEAT

BEQ

(HAIN

SURE PRINTER

BIT

[S DONE

WITH DL'1S1

;BEFORE ALLOWING FOLLOWING RESET,

;(HAIN TO NEXT ROUTINE
TEST

BIT

MESSAGE

CZLACFQ LA3S6 YERM (DLYY £ K1)
CILACF . PTI
13-JUN=79 15:33

MACYTY 30A(1052)
170 LOGIC TESTS

2498

005672
005674
005676
005700
005702
005706
005712
005714
005722
005730
005732
005734

005736
005744
005752
005754
005756

005760

000046
005762
000012
005714
012746
012746
000002
052777
032777
001002
104001
000410
042777
032777
001401
104001
104005

TESTHL6--TESTS THE ABILITY TO SET AND (LEAR
TRANSMITTER INTERRUPT ENABLE BIT.

ATG:

46
AT?
10.
1%
MOV
MoV
RT1
BIS
B11
BNE
ERROR
BR

000340
005714

000100
000100

172674
172666

1%:

000100
000100

172652
172644

2%:

3s:

000755

2522

B1C
811
BEQ
ERROR
CHAIN

#PRIY7,=-(SP)
21%,-(SP)

#B116,a1PS
#B116,a1PS
2%
3

#B176,97PS
#B116,a1PS
3%
1%

;TEST NUMBER
JNEXT TEST
;ITERATION COUNT
:SCOPE ENTRY
;SET PRIORITY 10 7

;SET INTERRUPT ENABLE BI1
;CHECK THAT BIT IS SET
;BRANCH [F SET
sNOT SET, ERROR
sCHAIN TO NEXT TEST
sCLEAR INTERRUPT ENABLE BI7
SCHECK IF BIT IS CLEARED
sBRANCH IF CLEARED
:NOT CLEARED, ERROR
sCHAIN TO NEXT TES?
;D0 AGAIN

JetrERRRELY

JAT7=<

2524

;

2525

25640

PAGE

IrveeeeseNY

2523

2526
2527
2528
2529
2530
2531
2532
2533
2934
2535
2536
2537
2538
2539

S
15:35

;ATO==
;

2501

5259

JtrEeeeRteY

2499
2500

2502
2503
2504
2505
2506
2507
2508
2509
2510
2511
2512
2513
2514
2515
2516
2517
2518
2519

13-JUN=79

TEST

006030

000047
006032
000012
006004
012746
012746
000002
052777
000005
032777
001401
104001
104005

000765

AT7:

000340
006004
000100

172604

000100

172574

1%:

2%:

THE

ABILITY

T0O

INTERRUPT ENABLE BIT WITH RESFI

JemREter e

005762
005764
005766
005770
005772
005776
006002
0060064
006012
006014
006022
006024
006026

#47--TESTS

47
AT10
10.
1%
MOV
MoV
RTI]
BIS
RESET
817
BEQ
ERROR
CHAIN

#PRIY7,~(SP)
#18,-(SP)
¥B116.,8TPS

¥BIT6.3TPS
2%
1%

_LEAR

TRANSMITTER

INSTRUCT]ON.

:TEST NUMBER
JNEXT TEST
;ITERATION COUNT
;SCOPE ENTRY
:SET PRIOR]iY 10 7
;SET INTERRUPT BI1T
JRESET
CHECK IF BIT IS CLEARED
sBRANCH IF CLEARED
;ERROR, RESET DID NOT (LEAR B]T
;CHAIN TO NEXT ROUTINE

JREPEAT

TEST

CZLACFO LA36 TERM (DL1Y R k(1)
CILACE P
i13-JUN=79 15:33%

MACY11 30A(1052)
170 LOGIC TESTS

2541

2568
25649
2550
2551
2552
2553
2554
2555
2556
2557
2558

PAGE 60
SEQ 0060

Jevseeeeeee

006032
006034
006036
006040
006042
006050
006052
006054
006060
006062
006064
006066

000050
006070

000012
006042
032777
001005
000005
105777
100401
104001
104005
000765

AT10:

001000

172644

1%:

172536

2%:

2559

50
AT

10.
1%
BIT
BNE
RESET
1ST18
BM]
ERROR
(HAIN
B8R

sTEST NUMBER
JNEXT TEST

#LS111,a%R
2%
alPsS
2%

s1TERATION COUNT
:SCOPE ENTRY
;SKIP TEST IF AN LSI-11
sRESET
sCHECK TRANSMIT READY BIT
sBRANCH IF SET
;ERROR, RESET DID NOT SET READY BIT
;CHAIN TO NEXT TEST
;00 AGAIN

JrERRETREYTY

2560
2561

SAT11=~ TEST #51-=TESTS THAT THE TRANSM]ITTFR READY RESETS
:
BY LOADING THE TRANSMITTER BUFFER.

2562

2563
2564
2565
2566
2567
2568
2569
2570
2571
2572
2573
2574
2575
2576

15:35

(AT10-- TEST #50=-=CHECKS THAT RESET SETS THE TRANSM]ITTER
;
READY BIT AND THAT THE READY BIT CAN BE READ RELIABLY.

2544

2547

[rereevenee

2562
2543
2545
2566

13-JUN=79

JERRRRETERTY

006070
006072
006074
006076
006100
006104
006106
006110
006114
006120
006122
006124
006126

000051
006130
000012
006100
012700
104010
000005
005077
105777
100001
104001
104005
000764

AT1Y:

000226

1%:

17250«
172476
2%

51
AT1?2
10.
1%
Mov
DELAY
RESET
(LR
1518
8PL
ERROR
(HAIN
B8R

#226,R0

a1PB
aTPsS
2%
1%

;TEST NUMBER
SNEXT TEST
;ITERATION COUNT
:SCOPE ENTRY
sDELAY

150 MSEC.

sREPEAT

TEST

sRESET
;LOAD TRANSMITTER BUFFER
sCHECK TRANSM]T READY 87
;BRANCH IF CLEARED
;sNOT CLEARED, ERROR
;CHAIN TO NEXT TEST

CILACFO LA36 TERM (DL1Y £ KL 1)
CZLACE P
13-JUN=-79 15:33

MACY11 30AC1052)
1/0 LOGIC TESTS

2977

006130
006132
006134

006136

006140

006142
006144
006146

006152
006154
006160
006162
006170
006172
006174
006176

006200
006202

000052
006204
000012
006144
104004
006200
000005
005077
005046
012746
000002
052777
000240
104001
104005
000762
022626
000774

2620

2621

2622
2625

TRANSM]T READY BI1

;

CAUISE AN INTERRUPT

AT12:

52
AT13
10.

;TEST NUMBER
JNEXT TEST
sITERATION COUNT

STPCHY

JSET UP TRANSMITTER

1%:

172644

006162
000100

172426

2%:
3%:
6%:

(AN

4%
RESE1
(LR

(LR
MoV
RTI1
BIS
NOP
ERROR
CHAIN
BR

POPSP?
BR

;SCOPE ENTRY

alPS

;10 4%
;SEE CHAINY COMMENT
;DISABLE

TRANSMIT

INTERRUPT

VECTOR

INTERRUPI

=-(SP)
2% ,-(5P)

sSET PRIORITY TO ZERO

#B1T6,a1PS

sENABLE

;TRANSMIT READY DID NOT CAUSE INTERRUP!
sCHAIN TO NEXT TEST
;REPEAT TEST
; INTERRUPT OCCURRED, CLEAN STACK
sCHAIN 10 NEXT TEST

TRANSMIT

INTERRUPT

JRREEEORTEY

sAT13-- TESTHS3--TESTS THAT THE TRANSMIT READY DOES NOT CAUSE
:
INTERRUPT WHEN THE PROCESSOR 1S AT THE SAME LEVEL

2604

2619

¢!

SEQ 0001

2602
2603

2614
2615
2616
2617
2618

PAGE

JreeEeNENYY

2601

2605
2606
2607
2608
2609
2610
2611
2612
2613

15:35

tAT12-= TEST #52-<CHECKS THAT THE

2579

(teeeEeteny

2578
2580
2581
2582
2583
2584
2585
2586
2587
2588
2589
2590
2591
2592
2593
2594
2595
2596
2597
2598
5588

13-4UN-79

JENEETESERY

006204

006206
006210
006212
006214
006216
006220
006226
006230
006232
006236
006244
006246
006252

006254

006256

006260
006262

000035

006264
000012
006220
104004
006256
013746
012746
000002
005077
052777
000240
005077
104005

000761

022626

104001
000771

AT13:

000630
006232

172360
000100
172344

1%:

172352

2%:
3%:

AT14
10.
1%
STPCHY
4%
MOV
Mov
R11
CLR
BIS
NOP
(LR
CHAIN

s TEST

TPLVL ,~(SP)
#2%,-(SP)

alP$
#B1T16,3TPS
al1PS

1¢

ERROR
BR

POPSP?

NUMBER

JNEXT TEST
;s ITERATION COUNT
;SCOPE ENTRY
:SET UP TRANSMIT INTERRUPT
JVECTOR 10 4%
;SET PROCESSOR TO SAME LEVEL AS XM]TIER

;DISABLE TRANSMITTER INTERRUPTS
JENABLE TRANSMITTER INTERRUPTS
;0K, NO INTERRUPT OCCURRED

sCHAIN TO NEXT

sREPEAT

TEST

;INTERRUPT OCCURRED,ERROR,CLEAN
UP STA(K
;CHAIN TO NEXT

TEST

CZLACFO LA36 TERM (DL11 & xL11)
CILACF P11
i3-JUN-79 15:33

2624
2625
2626
2627
2628
2629
2630
2631
2632
2633
2634
2635
2636
2637
2638
2639
2640
2641
2642
2643
2644
2645
2646

2647

2648

MACY11 30A(1052)
170 LOGIC TESTS

13-4UN-79

15:35

PAGE

SE0 0062

:'.."t"'.

cAT14-;

;

TESTH56=-=TESTS
INTERRUPT WHEN

ONE

:'."'I""

006264
006266
006270
006272
006274
006276
006300
006304
006310
006314
006320

006322
006330
006332
006334
006336

006340
006344
006346

000054
006350
000012
006300

AT14:

104005

000754

LOWER THAN THE

S
AT1S
10.

172312
000630
000040
006322
000100

1$:

172266

28:

(LR
MOV
SUB
Moy
RTI

B1S

172252

4$:

:VECTOR 10 3%

INTERRUPT

3TPS
TPLVL,=(SP)
740, (SP)
#28,-(SP)

;DISABLE TRANSMIT INTERRUPTS
:SET PROCESSOR PRIORITY ONE
;LEVEL LOWER THAN TRANSMITTER

#B176,aTPS

;ENABLE TRANSMITTER

CLR
CHAIN
BR

ATPS

POPSP2

INTERRUPT REQUEST LEVEL

:SCOPE_ENTRY
SET _UP TRANSMIT

ERROR

38:

TRANSMIT

:TEST NUMBFR
INEXT TEST
:1TERATION COUNT

18
STPCHY

104004

006336
005077
013746
162716
012746
000002
052777
000240
104001
000401
022626
005077

THAT THE TRANSMIT READY DOES CAUSE AN
THE PROCESSOR IS AT A PRIORITY LEVEL

:NO

INTERRUPT,

;CHAIN 70 NEXT

INTERRUPTS

ERROR

TEST

: INTERRUPT OCCURED, OK, CLEAN STACK

;DISABLE TRANSMITTER
;CHAIN TO NEXT TEST

:REPEAT

TEST

INTERRUPTS

)50

CILACFO LA36 TERM (DL £ KL kL1
CILACE P11
13-JUN=79 1 5: 33

2649
2650
2651
2652
2653
2654
2655
2656
2657
2658
2659
2660
2661
2662
2663

2664

2665

MACY11

30A(i052)

170 LOGIC
M

TESTS

2666
2667
2668
2669
2670
2671
2672
2673
2674
2675
2676
2677
2678
2679
2680
2681
2682
2683
006450
2684
2685
006452
2686
006454
2687
006456
2688 006460
2689 006466
2690 006470
2691
006474
006476
2692
2693 006500
2694
006502
2695
006506
006510
2696
2697 006512
2698
006514

AT15:

1%
172226

006400
000100

172210

172200

006442
006436

172176

PAGE

TEST#95-=TESTS

NOT

BEEN

THAT

H?Y
R

TRANSMIT

READY DOES NOT

RESET,

;TEST NUMBER

AT16

10.
1%
STPCHYV
4%
(LR
CLR

THE

AFTER AN RTi WHEN THE READY BIT HAS

JREXT

TEST

alPs
-(SP)

J1TERATION COUNT
;SCOPE ENTRY
:SET TRANSMIT INTERRUPT VECTOR
;10 4%
:DISABLE TRANSMITTER INTERRLPTS
;SET PROCESSOR PRIORITY 10 ZERO

#2%,-(SP)

2%:

Eég

#B1716,37PS

;ENABLE TRANSMITTER

3%:

ERROR
CLR

3TPS

;ERRORY,
;DISABLE

4%:

5%:
6%:

104001

15:35

SEQ 0063

REINTERRUPY

:tl't"""

000055
006450
000012
006360
104004
006422
005077
005046
012746
000002
052777
000240
104001
005077
106005
000757
012777
012716
000002
000240
000764
022626

A EEEEE
RN

JAT15==

006250
006352
00635¢6
006356
006360
006362
006364
006370
006372
006376
006400
006406
006410
006412
006416
006420
006422
006430
006434
006436
006440
006442
006444
006446

13-JUN-79

000761

CHALIN

MOV
MOV
RY]

NOP
BR
POPSP2
ERROR
8R

INTERRUPTS

TRANSMITTER FAILED TO INTERRUPT
TRANSMITTER INTERRUPTS

sCHAIN TO NEXT TEST
sREPEAT

TEST

#6% ,2TPVIR
#5%,35P

: INTERRUPT OCCURRED, CHANGE INTERRUPT
sVECTOR TO 6% AND RETURN T0 S%
sRETURN FROM INTERRUPT

;CHAIN TO NEXT TEST
;ERROR2, TRANSMITTER REINTERRUPTED
JAFTER RT] WITH READY BIT LEFT ON.
sCLEAN STACK, CHAIN TO NEXT TEST.

:'l""""

;AT16-=TESTH#56--CHECKS THAT RESET CLEARS THE RECEIVER DONE BIT
;'tillt""

000056
006516
000012
006460
032777
001011
012700
104010
104021

000005

105777
100001
104001
106005
000761

AT16:

001000

172226

1%:

000226

2%:
172104

56
AT17
10.
)
817
BNE
MOV
DELAY
AREAD
RESEY
1518

BPL

3%:

ERROR

CHAIN
BR

#LSIV11,35R
3%
#226,R0

;TEST NUMBER
SNEXT TEST
;1TERATION COUNT
: SCOPE ENTRY
$SKIP TEST [F LSi-N

;DELAY

150 MSEC,

;ENABLE RECEIVER

aTKS

3%
¢

SRESET
;TEST DONE BIT

:BRANCH IF
:NOT

DONE

1S CLEARED

CLEARED, ERROR

;CHAIN TO NEXT
SREPEAT TEST

TEST

051

CILACFO LA36 TERM (DL 14 KL 1)
CILACE P
i3-JUN-79 1 5: 33

MACY11 30A(1052)
1/0 LOGIC TESTS

2699
2700
2701

13-4UN-79

"S5

15:35

PAGE

SEQ 00064

;.l."""'

JAT17-=
:

TESTHS7--CHECKS THAT

CLEARS

THE

:'.'!"""

006516
006520
006522
006524
006526
006534
006536
006542
006544
006546
006552
006556
006560
006562
006564

000057
006566
000012
006526

032777
001012
012700
104010
104021
105777

105777
100001
104001
104005
000760

AT17:

001000

172160

1%:

000226

2%:

172042
172034

3%:

57
AT20
10.
1%
BIT
BNE
Mov
DELAY

DONE

BIT.

#LSI11,a3R
3%
#226,R0

REFERENCING THF

;TEST NUMBER
sNEXT TEST
;1TERATION COUNT
; SCOPE ENTRY
:CHECX FOR LSI-11
;SKIP TEST IF SET
;DELAY

AREAD

1S1B
1518

a7k8
aTKS

BPL
ERROR

CHAIN

RECEIVER BUFFER

150 MSEC.

;ENABLE RECEIVER

;REFERENCE RECEIVER BUFFFR
;TEST DONE BI17

:BRANCH IF NOT SET
;DONE BIT IS SET, ERROR

;CHAIN TO NEXT TEST
;REPEAT

TEST

:Qttt""t'

;AT20-~ TESTH60--CHECK THAT THE RECEIVER DONE BIT IS ABLE 10
;

CAUSE

JARERNENNERSE

006566
006570

006572

006574
006576
006600
006602
006610
006612
006616
006620
006622
006626
006636
006634
006636
006644

006646
006650
006652
0006654
006656

000060
006660

AT20:

000012

006602
106003
006652
032777
001021
012700
104010
104021
005077
005046
012746
000002
052777
000240
104001
000401
022626
104005
000751

001000

172104

1%:

000226
171764

2$:

006636
000100

171746

3%:

4%:
5%:

60
AT21
10.
1%
STRDRV
43
BIT
BNE
Mov
DELAY

AREAD

CLR

CLR
HOY
RT

BéS

NOP

ERROR
BR
POPSP?2
CHAIN
BR

INTERRUPT.

#LSIT1,QSR

5%
#226,R0

aTks

:TEST NUMBER
SNEXT TEST
;1TERATION COUNT
: SCOPE ENTRY
:SET UP RECEIVER INTERRUPT
SVECTOR 10 48
sCHECK FOR LSI-11
:SKIP TEST IF SET
;DELAY 150 MSEC
;ENABLE RECEIVER

:DISABLE RECEIVER INTERRUPTS

={SP)
#3$,-(SP)

:SET

#B116,3TkS

;ENABLE RECEIVER INTERRUPT

5%
1%

PROCESS STATUS TO ZERO

;ERROR,RECEIVER FAILED TO INTERRUPI
;CHAIN TO NEXT TEST
:0K, CLEAN STACK
;CHAIN TO NEXT TEST
sREPEAT TEST

1052

CILACFO LA36 TERM (DLTT & KL 1)
CLZLACF PN
13-JUN-79 15:33

MACYT1

30A(1052)

13-4UN-79

170 LOGIC TESTS

2747
2748
2749

15:35

PAGE

SEQ 0065

reNetRANCOERY

(AT21-- TEST#61--TESTS THAT THE RECEIVER DONE DOES NOT CAUSE AN
:

INTERRUPT

WHEN THE

THE RECEIVER'S

;II'I'.""

006660
006662
006664
006666

006670
006672
006674
006700
006706
006710
006714

006716
006720

006724
006730
006734

006736
006744
006746
006752
006754
006756

006760

006762

000061
006764

AT21:

000012

006700
1064003
006756
005077
032777
001017

012700

104010
104021
005077
013746
012746
000092
052777

000240
005077

104005
000751
022626
104001
000771

CHGF4:
ADD?2:

000226

(LR
BIT
BNE
Mov

DELAY

171666
000624
006736

000100
171640

2s:

171646

3s:
ADD3:

AREAD

CLR

Mov
:?V
1

Bég
N
(LR

CHAIN

ADD1:

PgPS:Z
ERRO
BR

SAME

LEVEL

:1TERATION COUNT

;SCOPE ENTRY

igg?flv

172006

THE

JNEXT TEST

ADD?2

171712

1S AT

sTEST NUMBER

AT2?2
10.

001000

PROCESSOR

INTERRUPT REQUEST LEVEL.

:SET

aTkKs$
#LS111,aSR
ADD3
#226,R0

RECEIVER

TO ADDI

;DISABLE INTERRUPTS
;CHECK FOR LSI-1
;SKIP TEST IF SET

sDELAY

aTKS

VECTOR

;ENABLE

150 MSEC

RECE]VER

:DISABLE RECEIVER INTERRUPTS

TKLVL,=(SP)
N3%,-(SP)

:SET

#B116,aTKS

:ENABLE RECEIVER INTERRUPTS

atKs

;0K, NO INTERRUPT OCCURRED
:CHAIN TO NEXT TEST

ADD?2

PROCESSOR PRIORITY

;REPEAT TEST

;ERROR,

ADD3

RECEIVER

:BRANCH ADD3

TO SAME

INTERRUPTED,

LEVEL

AS RECEIVER

CLEAN STACK

CILACFO LA36 TERM (DL £ KL IR D)
CILACF P11
13=-JUN=-79 1 5: 33

2777
2778
2779
2780
2781
2782
2783
2784
2785
2786
2787
2788

2789

2790
27N
2792
2793
2794
2795
2796
2797
2798
2799
2800
2801
2802
2803
2804
2805
2806
2807

MACY11

30A(1052)

170 LOGIC

13-JUN-79

TESTS

15:35

PAGE

SEQ 0066

ceteRQERRERERTYS

;AT22-:

TESTH62--TESTS THAT THE RECEIVER DONE DOES CAJUSE AN
INTERRUPT WHEN THME PROCESSOR iS AT A PRIORITY ONE
LEVEL LOWER THAN THE RECEIVER'S INTERRUP!
REQUEST LEVEL

:"'."".'

006764
006766
006770
006772
006774
006776
007000
007006
007010
007014
007016
007020
007024
007030
007034
007036
007044
007052
007054
007056

007060
007062
007066
007070

000062
007072
000012
007000
104003

007060
032777
001025

012700
104010
104021
005077
013746
012746
000002
162737
052777
000240
104001
000401
022626
005077
104005
000743

AT22:

62
AT23
10.
1%

;TEST NUMBER
JNEXT TEST
;1TERATION COUNT
:SCOPE ENTRY

3]
BIT
BNE
MOV
DELAY

JVECTOR 10 4%
:CHECK FOR LSIM
;SKIP TEST IF SET

STRDRvV

001000

171706

1%:

000226

171566
000624
007036

2$:

000040
000100

3%:

;DELAY

CLR

31Ks

:?Y

#3%,-(SP)

Mov

SUB

Bé;
N

4%:
5%:

FLSITY QSR
5%
#226,R0

ARESD

ERROR

171524

;SET RECEIVER INTERRUPT

BR
POPSP?2

(LR
CHAIN
BR

;ENABLE

150 MSEC

RECE]VER

:DISABLE READER INTERRUPTS

TKLVL,=(SP)

;SET

¥60,PSW

;LOWER THAN READER

PROCESSOR PRIORITY ONE

#B176,aTKS

;ENABLE

;CHAIN TO NEXT TEST
:0K, CLEAN STA(CK

aikKS
1%

INTERRUPTS

;FAILED TO INTERRUPT

;DISABLE RECEIVER INTERRUPTS
;CHAIN TO NEXT TEST
;REPEAT TEST

LEVEL

CILACFO LA36 YERM (DLI! 8§ KL 1
CZLACF.PYY
i3=JUN-79 15:33

2808
2809
2810
2811
2812
2813
2814
007072
2815
007074
2816
007076
2817 007100
2818
007102
2819
007110
2820
007112
2821
007116
2822
007120
2823
007122
2824
007124
2825
007126
007132
2826
2827
007140
2828
007142
2829
007144
2830
007150
007152
2831
2832
007154
2833
007156
2834 007164
2835
007170
2836
007172
2837
007174
2838
007176
2839
007200
007202
2840

MACYI1

30A(1052)

170 LOGIC

13-9UN-79

TESTS

15:35

PAGE

StQ 0067

cttaSRROERRYS

;AT23-~ TEST#63--CHECKS THAT THE RECEIVER DONE DOES NOT
:

REINTERRUPT

BIT

:t'.l"""

000063

007204
000012
007102
032777
001015
012700
1064010

AT23:

001000

171604

000226

1%:

2%:

104001

005077
000005
104005
000752
012777
012716
000002
000240
000763
022626

104001
000760

63
AT24
10.
1%
BIT
BNE

MOV

DELAY
AREAD

104021
104003

007156
005077
052777
000240

IS LEFT

AFTER

SET.

#LSI1Y,aSR
3%

#226,R0

STRDRY

171460
000100

171452

171442

007176
007172

4%
CLR

ség

3%:

1714636

4%:

5%:
6%:

ERROR

CLR

RESET
CHAIN
BR
MOV
MoV
RTI

aTKS

#B116,aTKS

alKs
1%
#6%,3TKVIR
#5%,35P

RTI

INSTRUCTION WHEN

DONE

sTEST NUMBER
JNEXT TEST
;1TERATION COUNT
;SCOPE ENTRY
JCHECK FOR LSI-11
sSKIP TEST IF SET
;DELAY 150 MSEC
JENABLE RECEIVER
;SET RECEJVER INTERRUPT
JVECTOR 10 48
;DISABLE RECEIVER INTERRUPTS
;ENABLE KECEIVER INTERRUPT
:NO

INTERRUPT,

ERROR

:DISABLE RECEIVER INTERRUPTS

sRESET AFTER LAST INTERRUPT
sCHAIN TO NEXT TEST
JREPEAT TEST
s INTERRUPT, OK, CHANGE VECTOR
;CHANGE RET ADDR 10 5%
JRETURN

NOP
BR
POPSP?

0K, NO ADDITIONAL
;ERROR, ADDITIONAL

JCHAIN

ERROR

TO NEXT

TEST

INTERRUPT
INTERRUPT

10 6%

CZLACFO LA36 TERM (DL1Y | 9 KL 1M
CILACF L1
13-JUN-79 1 5: 33

2841
2842
2843
2844

MACY 50A(10?§)
1/0 LOGIC TES

13-JUN-79

6
15:35

PAGE 68

St0 0068

:""'Q".'

;AT24-~TEST#64--HAVE OPERATOR TYPE

2845
2846
2847
2848
2849
‘.
2850
2851
2852
007204
2853
007204
2854
007206
2855
007210
2856
007212
2857
007214
2858
007222
2859
007224
2860 007230
2861
007232
2862
007234
2863
007240
2864
007246
2865
007250
007252
2866
2867
007254
2868 007260
2869
007262
2870 007266
2871
007270
2872
007274
2873
007276
2874
2875
007300
2876
007302
2877 007304
2878
007312
2879
007314
2880
007316
007320
2881
2882
007322
2883 007330
2884
007334
2885
007336
2886 007340
2887
007342
2888
007344
2889 007352
2890 007354
2891
007356
2892
007362
2893 007364
007366
2894
007370
2895
2896
007372
[s-34

ALLOW

;"t'l""'

CHGF?7:
AT24:

000064

177777
000001

007214
032777
001455
005777
001401

001000

171472

-1
1
1%
B11
181

000716

2%:

171332

BEQ
ERROR
MOV

MOV
TYPE

3%:

MOV

104001

BR
ERROR

1064003
007322

5¢%:

STRDRV

052777
000240
000240

000100

171300

104001

022626
017737
105777
100001

171266
171256

000716

000771

#600,R0
#30,CNTR

a1KS

CNTR

4%
#600,R0

8%:

MOV

aTxB,(NTR
aTKS

7$%:

171240

POPSP?

1S1B
BPL
ERROR

10%:

11%:

: SCOPE ENTRY
SSKIP TEST IF

NOT AN LSI-11

:SHOULD BE i LEAR

;RECEIVER STATUS NOT -0
:1/2 SEC DELAY
;SET UP FOR 12 SEC WAIT
;MESSAGE TO TYPE
:1/2 SECOND

A CHARA(TER

;CHECK DONE BI1T
;SET - EXIT LOOP

;TIME HAS RUN OUT,..
sANOTHER 1/2 SEC
;CONTINUE WALT
sNO RECEIVER DONE, OR

:OPERATOR DID NOT RESPOND
;SET RECEIVER INTERRUPT

5%:

;70 8%
JENABLE

INTERRUPT

sRECEIVER DID NOT INTERRUPT
;CLEAN UP THE STACK

;READ DATA BUFFER

:SHECK THE DONE BIT

BIS

¥B1T16,aTKS

READING DATA BUFFER DID NOT CiEAR DONE
;SET RECEIVER INTERRUPT
JVECTOR T0 118
ENABLE INTERRUPT

NOP
(LR
CHAIN

atk$

STRDRY
1%

NOP

171230

#BIT6,aTKS

9%:
000100

FLSINT, QSR
10%
aTKS$

BIS
NOP
NOP
ERROR

104001

104003
007366
052777
000240
000240
005077
104005
000713
104001
022626

NUMBER

SLAST TEST
:1TERATION COUNT

DELAY

DEC
BEQ

000600

; TEST

OPMSG
1518
BM]

000716

12 SECONDS FOR OPERATOR RESPONSE.

8EQ

171362
000600
000030

001403
012700
000766

1%:

A CHARACTER ON THE

KEYBOARD, THEN CHECK FOR RECE]VER DONE.
CHECK THAT RECEIVER DONE CAUSES AN INTERRUPT
WHEN BIT 6 (INTERRUPY ENABLE) IS SET.
CHECK THAT READING TKB CLEARS DONE BIT AND
THAT DONE CLEARED DOES NOT CAUSE AN INTERRUPT.

BR
ERROR
POPSP?2
BR

10%

:0K, CLEAN UP
SEXIT TESTS

;OLV INTERRUPTED WilTH DONE C(LEARED
CLEAN UP THE STA(K
SEXTT TESTS

CLLACFO LA36 TERM (DL11T 4 KL 11
CILACE.PIN
i3=JUuN-79 1 5: 33

2897
2898

MACY11

30A01052)

1/0 LOGIC

TESTS

13-JUN-79

6
15:35

PAGE

SEa 0069

CILACFQ LA36 TERM (DL 11 £ KL i)
CILACF.PWY
13-JUN=79 1 5.33

2899
2900
2901
2902
2903
2904
2905
2906
2907
2908
2909
2910
2911
2912
2913
2914
2915
2916
2917
2918
2919
2920
2921
2922
2923
2924
2925
2926
2927

2928
2929
2930
2931
2932
2933
2934
2935

2936
2937
2938
2939
2940
2941
2942

MACY11

30A(1052)

LA36 PRINTER TESTS
.SBITL
+THE

13-J4UN-79

6
15:35

PAGE

Ska 007’

LA36 PRINTER TESTS

LA36 PRINTER

TESTS WILL BE EXECUTED

IN A

-CONTINOUS LOOP OUTPUTTING TO ALL MULTIPLE DL11'S
;1F SR BIT B IS SET 10 2ERQ AT START UP TIME.
IFf
;BIT 8 IS SET TO 1 AT START UP THEY MAY BE EXECUTED
;INDIVIDUALLY ONCE OR CONTINUALLY LOOPED, OR
;BECOME THE FIRST OF THE ENTIRE SEQUENCE OF PRINTER
;TESTS,
REFERENCE INTRUCTIONS IN THE INTRODUCTION

;FOR

PROPER MODE

OPERATION.

SXXXXXXXXXX

:PTO == DATA PATH TEST--fOUR LINES OF ALTERNATING
;

*
AND
WiDTH.

"'U'"

THE

ARE PRINTED,

PATTERN WILL

OUT

TO THE

APPEAR

GIVEN PAPER

fOLLOWS.

tUrUsyerUeyry
UrUrUrUeUeyr
tUsUelir(oyey
UrUsUrUryeys
JOONEX
XXX XX

007374
007376
007400
007402

007404
007406
007412
007416
007420
007424
007426
00743C
007432
007434
007436
007440
007442
007444
007446

000000
007450
104016
104007

014627
012703
012702
010300
013701

1064015
000300
005301
001374
000303
104012
005302
001365
104005
000757

P10:

025125
000004
000652

1%:

2%:

3%:

0
P11
PRTIHDR
TYPEM

HDRO
MOV
MOV
MOV
Mov

PRINTC
SWAB
DEC
BNE
SWAB

(RLF
DEC
BNE
CHAIN

B8R

:TEST NUMBER
SNEXT TEST

CPRINT COLUMN # MESG
2''ye R3Y
4, ,R?

R3,RO

WIDTH,R!

RO
R1
3%
RY
R?
2%

;SET FIRST (HAR PAIR
sSET LINE COUNT
;SET CHAR PAIR
;SET COLUMN COUNT
sPRINT CHAR
sSET NEXT (HAR
;DEC COLUMN COUNT

JFINISH

LINE

sSET NEXT LINE START
;SEND (R-LF
sDEC LINE COUNT
JFINISH TEST
cALL DONE, EXIT

JREPEAT

TEST

(HAR

CILACFO LA3E TERM (DL1Y & xL1))
CZLACE P11
13-JUN-79 15:33

2943
2944
2945
2946

2947
2948
2949
2950
2951

2952
2953
2954
2955
2956
2957
2958
2959

2960
2961
2962
2963
2964
2965
2966
2967
2968
2969
2970
297

2972
2973
2974
2975
2976
2977
2978
2979

MACY11

30AC1052)

LA36 PRINTER TESTS

13-J4UN=79

15:35

PAGE

Seq 007

SAXXXNXXXXX

PT1

== PRINTER CMARACTER

TEST

--- PRINTS ALL

PRINTABLE

CHARACTERS

SXXNXANNAX

007450
007452
007454
007456
007462
007466
007472
007474
007500
007502
007506
007512
007514
007516
007520
007522
007524
007526
007530
007534
007536
007540
007542

007546

007550
007552
007554
007560
007562
007566
007570

P11:

000040
000100
000140
007542

1%:

2%:

007542
000003
104015
005304
001375
104012
122122
105723

020327
103756
104005
000746
012704
104015
005304
001375
012700
104015

012700
104015
000207

3%:

1
P12

PRTHDR
MOV
MOV
MOV

MOvP

JSR
MOVB
JSR
Mov
MOVB
PRINTC
DEC
BNE
CRLF

(MPB

000200

000003

SPSP:
$:

000040

SP2:

000040

SPC:

;TEST
JNEXT

NUMBER
TEST

#.0,R1
#100,R2
#140,R3

sSPACE 10 R
.3 10 R2
;)\ 10 R3

P(,SPSP
R2,RO
PC,SPSP
#3,R4
R3,R0

;SEND TWO SPACES
;NEXT CHAR TO RO
:SEND TWO SPACES
;PRINT COUNT TO R4
:THIRD CHAR TO RO
;PRINT THE (HAR
:THREE TIMES ?
:BRANCH IF NOT
:CARRIAGE RETURN LINE

R1.RO

(R1)4+,(R2)+

;CHAR 10 RO

:NEXT CHARACTERS

1S18
(Mp
BLO
(HAIN
BR
MOV

1%
#3,R4

;CHECK 1F ALL DONE
;BRANCH 1F NOT
SEXIT TO NEXT TEST
JREPEAT TEST
:PRINT COUNT 10 R4

DEC

¢ THREE

MOV
PRINTC

#40,R0

sSPACE 10 RO
JSEND A SPA(E

PRINTC

BNE

MOv

PRINTC
RTS

(R3)+
R3,#200
2%

#40,R0
PC

;PRINT

;BRANCH

;SPACE

CHAR

TIMES?

NOT

10 RO

s SEND ANOTHER
sRETURN

FEED

CZLACED LA36 YERM (D1 £ xL i
CILACF.PIN
i3=JUN=79 1 5:33

2980
2981
2982
2983
2984
2985
2986
2987
2988
2989
2990
2991
2992

2993
2994
2995

2996
2997
2998
2999
3000
3001
3002
3003
3004
3005
3006
3007
3008
3009
3010
011
3012
3013
3014
3015
3016
3017
3018
3019
3020
3021
3022
3023
2024
3025
3026
3027
3028
3029
3030
3031
3032
3033
3034
3035

MACY11

30AC1052)

LA36 PRINTER TESTS

13-JUN=-79

6
15:35

PAGE

SE0 0072

SXAXXXXXNAX

P12 -- NON-PRINTING CHARACTER TEST.

THIS TEST
PRINTS THE OCTAL CODE FOLLOWED BY THE MNEMONIC
OF ALL NON-PRINTING (HARACTERS.
FOLLOWING EACH
MNEMONIC, THE PRINTER 1S DRIVEN BY THE NON-P
RINTING

(ODE

ALL

(00C THROUGH 037 PLUS

CONTROL

?ég%ng

CHARACTERS

SKIPPED, REFER

177)

(INCLUDING

TO THE

THOSE

DOCUMENT

FOR

OPTIONS

FOR A LIST

THOSE

SXXXXXXXXXX
007572
007574
007576
007600
007604
007610
007614
007620
007624

000002
010166
104016

007626
007630
007632
007634
007636
007640
007644
007646
007650
007652
007654
007656
007662
007664
007666
007670
007672
007674
007676

106012
104005
000740

007700
007706
007714
007722
007730
007736
007744
007752
007760
007766
007774
010002

030060
046125
051440
020062
030060
045503
0642040
020061
031060
031103
042040
020064

512:
007700
010141
000003
000010
000055

1¢:

’%:
3%:

4%:

2
P13

PRTHDR

MOv
MOv
MOV
MOV
(MPB
BEQ
MNVB
PRINT(
DEC

BNE

000003

001404
004737

1064015
000753
104012

5%:

007554

000747

’%:

031060
042514
0642040
020062
031060
031503
0647040

047040
020061
030060
054124
040440
020060

031060
030503
062040
020063
031060
032103

IDEZ:

R4
4%

(R3)+,RD
"3, R4

DEC
BNE
DEC
BEQ

R4
5%
R2
6%

:PRINT

TEST

HEADER

;ADDR OF IDENT 10 R1
;ADDR OF NON-PRINT-CODES TO R3
:NO. OF ID'S PER LINE T0 R?
:NO. OF (MARS PER ID 70O Ré
:ZERO TERMINATOR IN NP TABLE®
;BRANCH IF YES
;GET 1D CHARACTERS
;AND PRINT A
: GROUP OF

;8 CHARACTERS

:GET NP CODE FROM
+ AND
;TRY 10 PRINT |1

TABLE

: THREE
sTIMES
;MORE 10 GO ON THIS LINE
;BRANCH IF NO

PC,SP2

;SEND

3 SPACES

;BRANCH TO CONTINUE

BR
(RLF

;00 DO NEXT

LASCIT

/7000

Nut0OOY

SOMO02

ST/

LASCID

/006

ACKQ20

DLEG2Y

DCYV/

LASCLL

7022

DC2023

0C3026

D&/

CRLF

CHAIN

020060
030060
064117
051440
026066

MIDEZ,RI
#NPCODE ,R3
’3,R2
#10,R4
(R3),#55
7%
(R1)+,RO

MOvB
MOV
PRINT(

JSR
PRINTC

6%:

;TEST NUMBER
JNEXT TEST

(HAIN

LINE

TO NEXT

TEST

LINE

CILACFO LA36
CZLACF.P1

3036
3037
3038
3039
3060
3061

3042
30643
3044
30645
3046
3047

3068

3049
3050
3051
3052
3053
3054

3055
3056
3057
3058

3059

010010
010016
010024
010032
010040
010046

010054
010062
010070
010076
010104
010112

010120

010126
010134
010141
010144
010147
010151

010154
010157
010161
010164

TERM (DL'1 R k(L 11)
i13-JUN-79 15:33

031060
045507
051440
020067
031460
047101

042440
020062
031460
020123
043440
020066

031460

020123
042040
000
020
023
025
030
034
036
055

010166

020065
031060
047131
042440
020060
031460

020115
051440
020064
031460
020123
051040

020067

033461
046105
002
021
02¢
025
031
035
037

MACY'1 30AC1052)
13-4UN=79
LA3G PRINTER TESTS

047040
020066
031060
041124
041440
020061

6
15:35

PAGE

73
St0 0073

LASCIT

7025

NAKO26

SYNO27 E IR/

LASCIT

7030

CANORY

Em 032

SuB/

0571460
041125
04304C

LASCIT

/034

¢S C35

GS 036

RS /

052440

LASCIT

/037

DEL

.BY'E

0,2,6,20,21,22.23.264

027
032

.BYTE

25,25,27,30,31,82,34,35

177

BYTE

36,37,177,58

020065
031460
020123

020067
040
006
022

NP(ODE:

EVEN

177

CILACFQ LA36 TERM (DL11 8 L 1D
CILACF P11
13-JUN-79 15:33

MACYTT 3JOAC1052)
13-JUN-79
LA36 PRINTER TESTS

3060
3061
%82%

SXXXAXXXNXAX
:
;F13 == CARRIAGE RETURN TEST

3064
3065
3066
3067
3068
3069

M
;
;
:
;
;

3072
3073
3074

SXXXNXXXNXX

3084

3085
3086
3087
IN88
3089
3090
3091

3092
3093
309¢
3095
3096
3097
3098
3099
3100

010166
010170
010172
010174
010200
010204
010210
010212
010214
010216

010222

010224
010226
010230
010236
010242
010246
010250

010252
010256
010260
010262
010270
010276
010300
010302
010304

000003
010306
104016
005037
013701
012700
104015
005301
001404
004737

005301

001367
104022
012737
013701
004737
005301
001374

02700
104015
104022
062737
023737
103757
104014
104005
000733

P13:
000674
000652
000117

1%:
2%:

007562

000001
000674
007562

000674

000130
000002
0006764

000674
000652

4%:
5%:

SEQ 0074

THE ZEROES HAVE BEEN FILLED.

3
P14
PRTHDR
(LR
Mov
MOV
PRINTC
DEC
BEQ
JSR

DEC

b ¥

PAGE

THE LINE CONSISTS OF A STRING GF 0'S AND
X'S.
FIRST, THE 0'S ARE PRINTED OQuT TO THE LAST
COLUMN WITH A SPACE SEPARATING EACH.
THEN THE
CARRIAGE ]S SPACED TO [HE FIRST BLANK SPACE, AN X
IS PRINTED AND THEN RETURNED O THE MARGIN.
TH]IS
PROCESS 1S CONTINUE UNTIL ALL SPACES BETWEEN

;8;?

3075
3076
3077
3078
3079
3080
3081
3082
3083

6
15:35

BNE
(R
MOV
Moy
JSR
DEC
BNE

MoV
PRINTC
(R
ADD
cMp
8LO
LF
(HAIN
BR

SPCNT
WIDTH,R!
#117,R0
R1
3%
PC,SPL

#1,SPONT
SPCNT,RI
PC,SPC
R1
5¢
#130,R0

#2,S5P(NT
SPONT ,WIDTH
43
1%

;TEST NUMBER
JNEXT TEST
;TYPE HEADER
;CLEAR SPACE COUNTER
;POSITION COUNTER 10 Ri
;70" TO RO
;PRINT THE "'0''
;DECREMENT POSITION COUNTER
;sBRANCH IF 0
; SEND SPACE
;DECREMENT POSITION (OUNTER
;BRANCH ]F NOT ZERO
;SEND A (R
sSPACE, COUNTER SET 10 1
sNO. OF SPACES 10 R1
sSEND SPACE
JDECREMENT SPACE COUNTER
sBRANCH IF NOT ZERD
S INTO RO
SPRINT X"
;PRINT (R
s INCREMENT SPACE COUNT BY 2
; COMPARE POSITION COUNTER W!liH COLM.
;BRANCH IF LOWER
JSEND LE
sCHAIN TO NEXT TEST
REPEAT TEST

COUNT

CZLACFO LA3G TERM (DL1T B KL )
CILACF P11
13=JUN=-79 15:33

MACYT1 30AC1052)
13-JUN=79
LA36 PRINTER TESTS

15:35

PAGE

SEQ 0075

3101
3102
3103
3104
3105
3106
g}gg

SXIXXXXXNXX X
;
;P16 == MULTIPLE LINE FEED TEST -- 63 LINE FEEDS ARE
;
SENT WITH A REFERENCE LINE AT THE START AND END.
:
A NUMBER 1S PRINTED WHICH INDICATES THE NUMBIR Of
;
FEEDS THAT WILL BE ISSUED BEFORE THE NEXT
NUMBER OR REFERENCE LINE 1S PRINTED.

g}?g

S XAXXXXXXXX

3111
3112
3113
3114
3115
3116
3117
3118
3119
3120
3121
3122
3123
3124
3125
3126
3127
3128
3129
3130
3131
3132
3133
313,
3135
3136
3137
3138
3139
3140
31641
3142
3143
3144
3145
g\é?

010306
010310
010312
010314
010322
010326
010332
010336
010342
010344
010346
010350
010356
010362
010364
010366
010370
010372
010374
010376
010400
0106404
010410
010412
010414
C10416
010420
010422
010424
010426
010430
010434
010436
010440
010442
010446

0000064
010464
104016
012737
013701
012702
004737
013701
104014
005301
001375
006337
022737
001406
112200
104015
112200
104015
104022
000757
013701
004737
104014
104005
000737
112200
104015
112200
104015
005741
012700
104015
005301
001375
104022
000207

3148
3149
3150

010446
0104564
010462

030460
034060
030060

P14:
000001
000652
010446
010416
000706

000706
000100

000706

1%:

2%:
3%:

000706

000652
010416

4%:

REF :

000137

031060
033061

1%:

032060
031063

LINE3:

4
P15
PRTHDR
MOV
MOV
MOV
JSR
Mov
LF
DEC
BNE
ASL
Cmp
BEQ
MOVB
PRINTC
MOVB
PRINTC
CR
BR
MOV
JSR '
LF
CHAIN
B8R
MOVB
PRINTC
MOVB
PRINT(
157
MOV
PRINTC
DEC
BNE
(R
RTS

.ASCI!

/01020408163200/

#1,LFCNT
WIDTH, R
#LINE3,R?
PC,REF
LFCNT,R?
R1
3s
LFCNT
#B176,LFCNT
4%
(R2)+,R0

(R2)+,RO
2%
WIDTH, R
PC,REF

1%
(R2)+,R0O

(R2)+,R0

-(R1)
#137,R0
R1
1%

LINE

sTEST NUMBER
JNEXT TEST
s TYPE HEADER
sLINE FEED COUNT 10 1
;COLUMN COUNT 10 R1
;ADDR OF NUMBER FIELD 10 R?
sPRINT REFERENCE LINE
sLINE FEED COUNT 10 R1
;SEND LF
;DECREMENT COUNTER
sBRANCH IF NOT YET O
;DOUBLE LINE FEED (OUNT
sTEST IF COUNT ]S 32
:BRANCH IFf -32, END
;sNUMBER 10 RO
JPRINT 1T
;NUMBER 10 RO
JPRINT 17
;PRINT (R
;DRIVE THE LINEFEEDS
;COLUMN COUNT 10 R1
;SEND END REFERENCE LINE
;ADVANCE PAPER
;REPEAT TEST
;NUMBER T0 RO
;PRINY |7
;NUMBER 10 RO
sPRINT 1T
;DECREASE CLUNTER BY ¢
;DASH (=) 10 RO
JPRINT [T
;DECREMENT COLUMN COUNTER
;BRANCH IF NO ZERO
;PRINT (R

sRETURN

CILACFO LA36 TERM (DL L KL 1)
CILACF P11
13-JUN=79 1 5: 33

MACY11

30A(1052)

LA36 PRINTER TESTS

13-JUN-79

6
15:35

PAGE

SEq 0076

S AXXXNXXXKX

P15--

SINGLE LINE FEED TEST -TESTS THE
CAPABILITY FROM ALL COLUMNS.

LINE

FEED

SXXAXXXXXXX

000005
010670

104016

013701
005741
012700
1064015
005301
001375
012700
104015
104015

010552
010554

010556
010560
010562

010566
010572

010574
010576
010600
010602

023727
001404
012700
104010
000407
012700
012701
104015
005301
001375
104012

013701

012700
104015
106014
005301
001372
1064022
004737
106012
012700
104010
004737
104012
104005
000720
013701
012700
104015
005301
001407
005200

020027

01771
012700

000766

000207

PT1S:

000652

18:

2%:

MoV
PRINTC

181

000060

000062

000652

P16
PRTHDR
Mov

DEC
BNE
MOV

PRINTC
PRINTC
CmMp

000204

BEQ

;VTEST NUMBER
JNEXT TEST

;DECREMENT COLUMN COUNTER
sBRANCH IF NOT ZERO
;SEND A 2

#62,R0

WIDTH #132,

MOV
DELAY

#3410,R0

000063
000100

MOV
MOV
PRINTC

¥63,R0
#100,R1

DEC
BNE
CRLF
MOv

Rl
4%

000652
000134

5%:
6%:

MOV
PRINTC

LF
DEC
BNE
(R
JSR
CRLF
MOV
DELAY
JSR

010632
001750
010632

CRLF

000652
000061

PTSAL:
1%:

CHAIN
B8R
MOV
MOV

PRINTC
DEC

BEQ
INC

000071

(mp

BLOS

000060

MOV

P2 ¥

B8R

RIS

HEADER

;COLUMN COUNT T0 RI
;DECREASE By 2
;'0" 10 RO

003410

sTYPE

WIDTH,RI1
=(R1)
#60.RO

WIDTH,R1

#134,R0

6%
PC.PTSAL

#1750,R0
PC.PTSAL

1%
WIDTH,R1
#61,R0

RO
RO, #71
%
¥60,R0
1%
PC

:SEND O

¢SEND A SECOND TWO
: COMPARE COLUMN (OUNT
;BRANCH IF EQ 132
;DELAY 1.8 SEC

:3'S T0 RO

;64 TO COUNTER
;SEND CHARACTER
;DECREMENT COUNT
:BRANCH IF NOT ZERO
;SEND A CR,LF
;NO. COLUMNS 10 R1
:BACKSLASH T0 RO
SSEND [T

;PRINT

;DECREMENT COUNTER
;BRANCH IF NOT ZERO.
;SEND (R

;S"ND REF LINE M
sSEND A CR,LF

;DELAY *

C££(

;SEND A SECOND REF. LINE
SSEND A CR,LF
;CHAIN TO NEXT TEST
;REPEAT TEST
:COLUMN COUNT TO R1

1" 10 RO

;PRINT RO
;DECREMENT COUNTER
:BRANCH [F=0
: INCREMENT CHARACTER

;COMP CHAR TQ "'9''

;BRANCH IF

SRESET

CHAR

LOWER OR SAME
TO "'0*'

; CONTINUE
;FINISHED, RETURN TO CALLER

CZLACFO LA36 TERM

)64

CILACF.PYN

’

(DL1Y

13-JUN-79

& kL1'1)

15:33

3205
3206
3207
3208
3209
3210
321
25}%
3214
3215
3216
3217
3218
3219
3220
3221
3222
3223

3224
3225

3226
3227
3228
3229
3230
3231

3232
3233
3234
3235
3236
3237
3238
3239
3240
32641
3242
3243
3244
32645
3246
32647
3248
32649
3250
3251
3252
3253
3254
3255
3256
3257

MACY11

30AC1052)

LA3o PRINTER

TESTS

13-JUN-79

15:35

PAGE

77
Sea 0077

SAXXXXXXXXX
:PT6-BACKSPACE TEST =-- A REFERENCE LINE SUCH AS IN
:
TEST P15 IS PRINTED.
THE SECOND LINE CONSISTS
:
OF PRINTING A BACKSLASH, BACKSPACE AND FORWARD
:
SLASH COMBINATION QUT TO THE GIVEN COLUMN WIDTH.
:
THIS LINE IS THEN FOLLOWED BY THE SAME TWO REFERENCE
:
LINES AS PRINTED IN TEST P15.
SXXAAXXXXNXX
010670
010672
010674
010676
010700
010702
010706
010710
010714
010716

010720
010722

010726
010730
010732
010740
010742
010746

010750
010752
010756
010762
010764
010766
010770
010772
010776
011002
011004
011010
011012
011016
011020
011022
011024
011026

011030
011034
011036
011042
011044
011050
011052
01105

000006
011056
104016
104007
014627
013701
005741
012700
104015
005301

001375
012700

104015
104015
023727
001404
012700
104010

000407
012700
012701
104015
005301
001375
104012
013701
012700
104015
012700
104015
012700
104015
005301
001365
104014
104022
004737
104012
012700
104010
004737
104012
104005
000712

PT6:

000652

1$:

000060

2%:

BNE
MOv

000062
000652

PRINTC
PRINTC
cmp
BEQ
MOV
DELAY

000204

003410

000063
000100

000652
000134

000010
000057

010632
001750

010632

6
P17
PRTHDR
TYPEM
HDRO
MOov
1871
MOV
PRINTC
DEC

3s:
6%:
5%:

6%:

BR
Mov
mov
PRINTC
DEC
BNE
CRLF
MOV
MOV
PRINTC
Mov
PRINTC
MOV
PRINTC
DEC
BNE
LF
(R
JSR
CRLF
MOV
DELAY
JSR
CRLF
(HAIN
BR

;TEST NUMBER
sNEXTM TEST
;PRINT HEADLR
:PRINT COLUMN ¥ MESG

WIDTH, R
=(R1)
#60,RO
R1
2%
¥62,R0
WIDTH, #132,
3%
#3410,R0

5%
#63,R0
#100,R1
R1
3
WIDTH,RI
#1346 ,RO

#10,RO
#57,R0
R1
6%

PC.PT5AL
#1750,R0

PC,PTSAL
1%

:COLUMN COUNT 10 R1
;DECREMENT BY 2
;''0"' 1O RO
:SEND 0
;DECREMENT COLUMN COUNTER
:BRANCH IF NOT ZERO
;12" 10 RO
;SEND A 72"
:SEND A SECOND '2''
: COMPARE COLUMN COUNT
;DELAY

1.8 SEC

;3'S TO RO
;64 TO CHAR COUNT
:SEND CHAR
;DECREMENT CHAR COUNT
;CONTINUE 1F NOT DONE
;SEND A CR,LF
:COLUMN COUNT T0 F1
;BACKSLASH T0 RO
;SEND IT
sBACKSPACE T0 RO
SSEND IT
:FORWORD SLASH 10 RO
:SEND 17
+END OF PAPER
;BRANCH IF NO
+SEND LF
:SEND (R

;SEND REF LINE #1
sSEND A CR,LF
;DELAY 1 SEC

;SEND SECOND REf LINE
;SEND A (R,LF
¢CHAIN TO NEXT TEST
;REPEAT TEST

[
065

CILACFO LA36 TERM (DLY1T

CILACF . PN

3258
3259
3260
3261
3262
3263
3264
3265
3266
3267
3268
3269

3270
3271
3272
3273
3274
3275
3276
3277
3278
3279
3280
3281
3282
3283
3284
1285
3286
3287
3288
3289
3290
3291
3292
3293
3294
3295
3296
3297
3298
3299
3300
3301
3302
3303
3304
3305
3306
3307
3308
3309
3310
1IN
3312
3313

13=-JUN-79

& kLIV)

15:33

MACY11

30A(1052)

LA36 PRINTER TESTS

13-JUN-79

15:35

PAGE

78
SEQ 0078

S XXXXXXXXXX
:
;PT7-OVERPRINT TEST-- A ROW OF ALTERNATING M'S AND
:
SPACES ARE PRINTED, OUT TO THE LAST COLUMN AND OVFRPRINTED TWICE.
;
A SECOND LINE OF ALTERNATING SPACES AND '‘3'S'' IS THEN
:
SENT 3 TIMES AS THE FIRST LINE.
THIS IS FOLLOWED
:
BY A THIRD AND FINAL LINE OF ALTERNATING '8’
:
AND SPACES.
:
SXXXXXXXXNXX

011056
011060
011062
011064
011070
011074
011100
011102
011104
011106
011112
011114
011116
011122
011124
011126
011130
011132
011134
011136
011140
011142
011146
011152
011154
011156
011162
011164
011166
0111720
011174
011176
011200
011202
011204
011206
011210
011212
011214
011220
011224
011226

000007
011270
104016
012703
000002
013701
000652
012700
000115
104015
005301
001404
004737 007562
00530
001367
022703 000002
001003
104022
005303
000757
005703
001373
104012
005723
013701
000652
004737 007562
005301
001405
012700 000100
104015
005301
001367
022703 000002
001003
104022
005303
000757
005703
001373
104012
005723
013701
000652
012700 000046
104015
005301

011230
011232

001404
004737

007562

P17:
1%:
2%:
3%:

4%
5¢:
6%:

7%:
8%:

9%:
10%:
11%:

12%:
13%:

7
P110
PRTHDR
MOV
MoV
MoV
PRINTC
DEC
BEQ
JSR
DEC
BNE
cmep
BNE
(R
DEC
B8R
181
BNE
CRLF
TST
MOV
JSR
DEC
BEQ
MoV
PRINTC
DEC
BNE
tmp
BNE
(R
DEC
BR
181
BNE
CRLF
157
MOV
MOV
PRINT(
DEC

;TEST NUMBER
SNEXT TEST
JPRINT MESSAGE
;2 COUNT 10 R3
sNO. OF COLUMNS 10 R1
UM 10 RO
;SEND IT7
;END OF LINE
:BRANCH IF YES
;SEND SPACE
JEND OF LINE?
:BRANCH IF NO
;TEST R3
;BRANCH IF NOT FIRST TIME
;SEND (R
;DECREASE LINE COUNTER
;REPEAT LINE
;THIRD TIME?
;BRANCH IF NOT
JNEXT LINE
sREPEAT COUNTER T0 R3
sCOLUMN COUNT T0 R1
:SEND SPACE
;DECREASE COLUMN COUNT
;BRANCH IF O, END OF LINE
;U9 TO RO
;SEND 11
sDECREASE COLUMN COUNT
sBRANCH IFf NOT 0 (NOT END)
;END OF LINE, FIRST TIME?
;BRANCH If NOT
;SEND CR
;DECREASE LINE COUNTER
sREPEAT LINE
sTEST IF THIRD REPEAY
;BRANCH IF NOT
;DO NEXT LINE
sLINE REPEAT COUNTER 10 R3
:COLUMN COUNT T0 R1
;'8
TO RO
SSEND IT
;DECREASE COLUMN (OUNT

BtQ
JSR

14%
P(,SP(

;BRANCH 1f END
SSEND SPACE

#2,R3
WIDIH,R1
#115,RD

R1
43
PC,SPC
R1
£1
#2.,R3
6%
R3
2%
R3
5%

(R3)+
WIDTH,RI
PC,5PC
R1
9%
#100,R0
R1
8%
#2,R3
1%
R3
7%
R3
10%

(R3)+
WIDTH,RY
#46,R0

»r
o »

~ re

AN NN N NN

[aS 1,81 V1,91 ¥ N et
s s .,
NN
— OO0~

FO LA3G

P11

011236
011264C
011262
011246
011250
011252
011254
011256
011260
011262
011264
011266

TERM

(DLIT

& XxL1Y)

13=-JUN=79 15:33%
005301
001367
022703
001003
104022
005303
000757
005703
001373
104012
104005
000676

(00002

MACYT]

30A€C1052)

LA36 PRINTER TESTS

14%:
15%:

16%:

DEC
BNE
cnp
8NE
(R
DEC
BR
181
BNE
(RLF
CHAIN
BR

13-,UN-79

R
138
¥2,R3
16%

R3
12¢
R3
15%

15:35

PAGE

SEQ 0079
;OECREASE COLUMN COUNT
;BRANCH 1f NOT END
JVEST IF FIRST TIME
JBRANCH IF =2, FIRST TIMe
sSENT (R
;DECREASE REPEAT (OUNTER
;PRINT LINE AGAIN
;TEST IF END, R3=0
;BRANCH 1f NOT END
;SEND CR,LF
JCHAIN TO NEXT TEST
JREPEAT TEST

CILACFO LA36 TERM

CILACF.PYVI

(DL'1

& KL )

13-JUN-79 15:33

3326
3327
3328
3329
3330

MACYT1

30AC1052)

LA36 PRINTER TESTS

3133

:
;

3??3

MANNER.

PAGE

SEQ 0080

3337
3338
3339
33640
33641
3342
3343
3344
3345
3346
3347
3348

XXX
XXNX
011270
011272
011274
011276
011302
011306
011314
011320
011322
011326

011330
011332

011334
011336
011340
011344
011346
011350
011352
011354
011356
011360
011362
011364
011366
011372
011374
011400
0116402
011406

011410
011412
011416
011420
011422
011424

000010
011426
104016
012701
012702
012737
012700
104015
012700
104010

PT10:
000036
000170
000036
9000110

000036

1%:
011324

2$:

3%:

005301
001426

005302
001430
013704
006204
006204
006204
006204
010405
006204
006204
006204
060405
022702
003403
160537
000745
060537
000742

104012
012701
000746
104012
1046005
000724

4%:
011324

000074

011324
011324
000036

5¢.:

6%:
7%:

THE DELAY

IS THEN DECREASED IN THE SAME MANNER OUT

120TH CHARACTER. THIS DELAY IS CALCULATED AS FOLLOWS;

3369
3370
31371
3372
3373
3374

15:35

BETWEEN CHARACTERS OUT TO 60 CHARACTERS IN AN EXPONENTIAL

%g%g

3351
3352
3353
3354
3355
3356
3357
3358
3359
3360
3361
3362
3363
3364
3365
336
3367
3368

SXOONXXXXXX
;
+7410-- PRINTING FREQUENCY TEST-- 120 H'S ARE PRINTED
ON & LINES
.
50 PER LINE. THE TEST IS SUCH THAT BETWEEN THE FIRST AND SECOND
.
"W A 30 MSEC DELAY IS INTRODUCED. THIS DELAY IS THEN INCREA
SED

3332

3349
3350

13-5UN-79

NEW DELAY = OLD DELAY [+ OR -]

10
PT1I
PRTHDR
MOV
MOV
MOV
MOV
PRINTC
MOV
DELAY

DEC
BEQ

DEC
BEQ
MOV
ASR
ASR
ASR
ASR
MOV
ASR
ASR
ASR
ADD
cmp
BLE
SuB
BR
ADD
BR

CRLF
MOV
BR
CRLF
(HAIN
BR

#36,R1
#120.,R2
#30.,3%8+2
#110,R0

#30.,R0
R1
6%

R2
7%
3842 R4
R4
R&
R4
R4
R4 ,RS
R4
R4
R4
R4 ,RS
#60.,R2
5%
RS,3%+2
2%
RS,3%¢2
23

#36,R1
4%
1%

TO THE

(OLD DELAY/16 + OLD DELAY/128 )

sTEST NUMBER
SNEXT TEST
; TYPE MESSAGE
;SET R1=30
;SET CHAR COUNT - 120
;SET UP DELAY VALUE
;UMY T0 RO
;SEND IT

sDELAY

:DEC. COUNT OF CHARS PER LINE
;BRANCH 1F 0O, END OF LINE

;DECREMENT CHAR COUNTER
;BRANCH IF END
:GET OLD DELAY
;CAL 1/16 OF OLD DELAY

;SAVE 1716 IN RS
sCAL 1/128 OF OLD DELAY
;1716 +1/7128 10 RS
JTEST WHICH HALF OF THE 120 CMARS.
;BRANCH iF LT OR EQ 60
;6T 51, DECREASE DELAY BY 34 MEC.
;GO PRINT AGAIN
;LT HALF WAY, ADD DELAY OF 34 MEC.
;60 PRINT AGAIN

;SEND CRLF
;SET R1=30

JSEND CR,LF
sCHAIN TO NEXT TESY
sREPEAT TEST

CILACFQ LA36 TERM (DL1Y R KL 1
CILACF . P
13=JUN-79 15:33

3375
3376
3377
3378

MACYT11 30A(1052)
13-JUN-79
LA36 PRINTER TESTS

3381
3382
3383
3386
3385
3386

SXXNXNXXXXX

3389

3390

3391
3392
3393
3394
3395
3396
3397
3398
3399
3400
3401
3402
3403
3404
3405
3406
3407
3408
3409
3410
3611

3412

36413
3414
3615
3616
3617
1518
3419
3620

3621
3422

3423
3424
3425
3426

15:35

PAGE 81

SXXXXXXXXXX
;
:PT11-- RIBBON FEED TEST-- THIS TEST PRINTS A SINGLE COLUMN
Of
:
(26 LINES) DOWN THE LEFT MARGIN OF THE PAGE.

;ggg

3387
3388

011426
011430
011432
011434
011440
011444
011446
011450
011452
011454
011456

000011
011460
104016

012701
012700
104015
104012
005301
001372
106005
000766

011460
011462
011464
011466
011472

000012
007374
104016
012701
012700

011500
011502
011504
011506
011512
011514
011520
011522

005301
001375
104014
012700
104010
013700
001405
000240

011476

011524
011526

011530
011532
011534
011536

104015

004710
000240

000240
000240
104005
000753

1%:
2%:

,
-

000010
000007

003720

000042

11
PT12
PRTHDR

MOV
MOV
PRINTC
CRLF
DEC
BNE
CHAIN
BR

¥#30,R1
#130,R0
k1
2%

;TEST NUMBER
SNEXT TEST
s TYPE MESSAGE

;SET R1=24(10), LINE COUNT
;SET CHAR = X
;PRINT X
;SEND CR-LF
;DECREMENT LINE COUNT
;CONTINUE IF NOT DONE TEST
;CHAIN TO NEXT TEST
;REPEAT TEST

DOOXOXXXXX
:
:PT12-- PRINTER BELL TEST=-- THE LAST TEST IN THE
:
PRINTER TEST SEQUENCE.
THIS TEST OUTPUTS
;
EIGHT BELL SIGNALS TO THE PRINTER
:
:
SXXXXXXAXXNX
;
PT12:
12
;THIS TEST
P10
NEXT TEST
PRTHDR
;TYPE HEADER
PT12A:
MOV
f10,R1
; COUNTER TO R1
MoV
#7,R0
;BELL 10 RO

1$%:

X'S

VISUALLY CHECK THE RIBBON FEED MECHANISM FOR PROPER OPERATION.

PT11:

000030
000130

.
SEQ 0081

PRINTC

DEC
BNE
Lf
MoV
DELAY
MoV
BEQ
NOP

LOGICAL:JSR
NOP
NOP
NOP
HERE:
(HAIN
BR

;SEND 17

R1
1%

;DECREMENT COUNT
;BRANCH IF NOT ZERO

#3720,R0

;DELAY 2 SEC BEFORE RESTARTING

ans? RO
HERE

;CHECK IF UNDER ACT11 OR XXDP
;CONTINUE TEST SEQUENCE
;A RESET WAS FORMERLY HERE

PC,(RO)

PT12A

SUHAIN TO NEXT TEST
;REPEAT

TEST

CILACFO LA3S TERM (DL1Y R xL11)
CZLACF . P1Y
P3-JUN=-79 15:3%

3427
3428
3429
3430
3431
3432
3433

MACYT) 30A(1052)
13-JUN-79
LA36 PRINTER TESTS

JPIV7-=
;
;
;
;

3636
3437
3438
3639
3640
3441
3462
364643
3644
3645
34646
3447
3648
3449
3450
36451
3452
3453

SXXXXXXXXXX

3654

3455
36456
3457
3458
3459
3460
3461
34672
3663
3464
3665
3466
3467

3468
3469
3470
3471
3472
3473
34764

3475
3676
3477
3478
3479
3480
3481
3482

011626

011632
011636
011642
011646
011650
011652
011656
011660
011662
011664
011670
011672
011676

011702
011704
011710
011712
011714
011716
011720

011722
011724
011730
011732
Q11734

011740
011742
0117646

012700

013701
012702
104023
013701
010300
004737
104015
005301
003372
004737
104012
012702
013701

010300
004737
104015
005301
003372
104022
005302
001365
004737
104014
005203
022703
001341
004737
004737

PY178:
011600
012116
000652
000001

000001
014542
012116
000002

PT17:

012114

000652

011766

PT117D:
000031
012116

20%:

1¢:
2%:

012034

000005
000652
011766

012034

000177
01203
012034

Sta 0082

END OF PASS COUNT IS CLEARED WHMENEVER TEST IS RESTARTED

17
PT178
JMP
17
P1178
(LR
MoV
MOV
PRTHDR

PT17D
PASCNT
WIDTH,RG
#1,DIRIN

TYPEM

000041
012116
012116

PAGE

LIFE TEST
THIS TEST PRINTS 2 FULL LINES OF EACH PRINTABLE
CHARACTER AND OVERPRINTS THE SECOND LINE & TIMES.
THIS TEST IS CONTINUOUS RUNNING ONCE INITIATED,
LOOPING AUTOMATICALLY ON JTSELF.

;

000017
011540
000137
000017
011540
005037
013704
012737
104016
104007
014627
012703
005237
023727
001003
012737

15:35

SXXXXXXXXXX
:

g:;g

011540
011542
011544
011550
011552
011554
011560
011564
011572
011574
011576
011600
011604
011610
011616
011620

3%:
4%:

HDRO
MOV
INC
cMp
BNE
MoV
MoV
MOV
MoV
BYOASC
Mo
MoV
JSR
PRINT(
DEC
BGT
JSR
CRLF
Mov
mov
MOV
JSR
PRINTC
DEC
BGT
(R
DEC

BNE
JSR
LF
INC
(MpP

BNE
JSR
JSR

;TEST NUMBER
JNEXT TEST
s CONTINUE
JTEST NUMBER
SNEXT TEST
;sCLEAR PASS COUNT
JINITIALIZE R4
sAND DIRECTION OF PRECESS
:PRINT

#41,R3
PASCNY
PASCNT, #31
208
#1,PASCNT
#PASMES RO
PASCNT R
2 ,R2
WIDTH,R1
R3.RO
PC,CXPOS

R1
2%
PC,ADJRSG

5 ,R2
WIDTH,RI
R3,RO
PC,CKPOS

R1
4%
Re
b33
PC,ADJRS

R}
#177,R3

1%
PC,ADJRSG
PC,ADJRSG

COLUMN ¥ MESG

;SET START (CHAR
;DO 31 TIMES
;BRANCH IF NOT DONE
;START OVER
;SET MESG ADDR
;# T0 CONVERY
;¥4 DIGITS
sCONVERT PASCNTY TO ASCI]
sSET COLUMN COUNT
;GET CHARACTER
;TIME TO INSERY PASS # °
;SEND CHAR
;DECREMENT COUNT
;BRANCH ]F NOT DONE
;ADJUST R4 POINTER

;SET OVERPRINT COUNI
;SET COLUMN COUNT
;GET CHARACTER
;TIME TO INSERT PASS # ?
;SEND (HAR
;DECREMENT COUNT
;BRANCH IF NOT DONE
;SEND (R
:DONE OVERPRINTS ?

;NO. CONTINUE
;ADJUST R4 POINTER
;SEND LF
;SET NEXT CHAR
;DONE CHAR SET ?

;NO. CONTINUE
;OFFSET POINTER 3 PLACES
;70 RETAIN VISUAL AL IGNMENT

CILACFO LA36 TERM (DLIT £ kL11)
CZLACF.P1Y
i3-JUN-79 15:33

36483
3684
3485
3686
3487
3488

011752
011756
011760
011762
011764

004737
104007
014523
104005
000705

012034

MACY11 30A€1052)
13-4UN-79
LA36 PRINTER TESTS

JSR
T(PEM
ENDPAS
CHAIN
BR

PC,ADJR4

P117D

F7
15:35

PAGE 83

SEQ 0083

: THROUGH END Of PASS
sTYPE END OF PASS MESG

sREPEAT TEST

CILACFO LA3G

CZLACF.PY

3489
3490
3491
3492
3493
3496
3495
3496
3497
3498
3499
3500
3501
3502
3503
3504
3505
3506
3507
3508
3509
3510
3511
3512
3513
3514
3515
3516
3517

3518
3519
3520
3521
3522
3523

011766
011770
011772
011776
012000
012004
012006

TERM (DLYY | «L 1)
13-JUN-79 15:33

020407

MOV
PRINTC
mova
PRINTC
MovB
PRINT(
MOV
PRINTC

000040
000003
000002
1%:

012056
012060
012066
012070
012072
012076
012100
012102
012106
012112

005737
001013
005204
020437
101420
013704
005304
012737
000411
005304
020427
002401
000404
012704
005037
000207

012114
012116

(4P

BNE

014543

012032

012034

(xPD>:

014542

012026

30A(1052)

LA36 PRINTER TESTS

000040

012012
012014
012020
012022

012040
012042
012044
012050
012052

MACYT1

012114

ADJRG:

200005

R4 R
1%
#40,R0

1S 1T TIME TO INSERT PASS #
;BRANCH IF NO
;PRINT A SPACE

PASMES RO

;PRINT MSG OF

PASS (OUNT

PASMES+1
RN

;ADJUST R1 3 POSITIONS
;ADJUST RETURN PC OVER PRINT(

181

DIRTN
1%
R4
R4 ,WIDTH

;JEST DIRECTION OF PRECESS
;BR IF LEFT
; INCREASE POSITION (NTR
;1S R4 > WIDTH ?
:BR IF NOT GREATER
; CHANGE DIRECTION
10
.
:
LEFT,

Mov

BLOS
DEC

MOov

BR
DEC
cmp
BLT
B8R

WIDTH, R4

R4
#¥1,DIRIN

R4, HG

2%
3%

JLESS

A SPACE

;DECREASE POSITION (NIR

THAN 6

(LR
RTS

’S5, R4
DIRIN

:BR If YES
JELSE [x]7
;SET R4 10 POS 5
:CHA?GE DIRECTION 10 RIGHT
JEX

DIRTN:

.WORD

;DIRECTION OF

PASCNT:

.WORD

2%:

Mmov

3%:

000000
000000

012114

SEa 0084

#3,R
#2,(SP)
PC

000652

000004

PAGE 84

SUB

ADD
RS

INC
cmMp

1%:

15:35

sPRINT

000652

012114

#40,R0

BNE

000001

13-JUN-79

PRECESS

(0 LEFT)

CZLACFO LAS6 TERM (DLY1 R kL 1Y)
CILACE . PN
13-JUN=79 15:33

3524

MACYTT 30AC1052)
13-JUN-79
LA36 PRINTER TESTS

7
15:35

PAGE

St0 0085

CILACFO LA%6 TERM (DL1Y R &L 1
CILACF.PI
13=JUN-79 15:3%

MACY1T1 30A(1052)
LA36 ECHD TESTS

13-JUN-79

15:35

PAGE

SEQ 0086

3529
3526
3527
3528
3529

LSBYTL
LA3ZH ECHO TESTS
;
JXXXXXXXXXX
:
;E020-- (HARACTER ECHO TESY== ALL PRINTABLE AND

3531

;

31530

31532
3533%

3534
3539
3536
3537
3538

3539
3560
3561
3542
3543
3544
3545
3546
3547
3548
3549
3550
ggg;

012120
012122
012124
012126
012130
(i2134
012136
012144
012146
012150
012156
012160
012162
012164
012166

000020
012170
104016
106020
012700
104010
022737
001405
106017
117777
000763
104007
014772
104005
000757

:
;

A TIME.
A "RUBOUT'' WILL CAUSE THE TEST TO 8¢
TERMINATED.

1%:

0C0036
000177

000700

166440

166442

2%:

ARE USED TO DRIVE

TME PRINTER, ONE CHMARACTER Al

PRTHDR
READ
MOV
DELAY
CMP
8EQ
PRNT
MOVB
BR
TYPEM
ECOEND
CHAIN
BR

#30.,R0
#177,TEMPCH
2%
aTkB,alPB
1%

;TEST NUMBER
NEXT TEST
;TYPE HEADER
;GO WAIT FOR <EYBOARD INPUT
sDELAY FOR HALF DUPLEX
;CHECK IF RUBOUT
;BRANCH 1F YES
;NO, CHECK PRINTER READY
JREADY, ECHO CHARACTER

;PRINT
1%

TERMINATION MESSAGE

sCHAIN TO NEXT
JREPEAT TEST

TEST

JXXXXXXXXXN

3554

3555
3556
3567
3558

sE021-=
K
;
:

3559

3567
3568
3569
3570
3571
3872
3573

NON-PRINTING CHARACTERS TYPED ON THE KEYBOARD

:
SHXXXXAXANXX
:
£020:
20
£021

3553

3560
3561
3562
3563
3564
1565
3566

012'70
012172
012174
012176
012204
012210

000021
012226
104016
012737
013702
013700

012216
012220
012222
0122264

005302
003373
104012
000767

012214

104015

000060
000652
000662

000662

LINE ECHO TEST, FAST RATE=-~ THIS TEST WitL
CAUSE THE CONTINUAL PRINTVING OF ‘'0'" AT THE MAXIMUM
RATE UNTIL E]THER ANOTHER CHARACTER IS SELECTED
BY PRESSING A KEY ON THE KEYBOARD OR TERMINATION BY

RUBOUT.

:
SHXXXXAXRAX
;
E021:
21
£E022
PRTHDR
EO21A:
MOV

1%:
2%:

Moy
MoV
PRINTC
DEC
BGT
CRLF
BR

¥60 ,REPT
WIDIH,R?
REPT,RO
R?
2%
¢

;TEST NUMBER
SNEXT TEST
;TYPE HEADER
;CHARACTER TO BE REPEATED
sSET COLUMN COUNT
;:GET CHAR

sPRINT (HAR

;DEC COLUMN COUNT
;FPINISH LINE
JSEND A (R AND LF

THE

(Q)

CILACEO LA3ZG TERM (DL1Y & xL11)
CILACF.P1T
13-JUN=-79 15:33

MACYT1 30A(1052)
LA36 ECHO TESTS

13-4UN-79

17
15:35

PAGE

87
SEQ Om’

;2;;

SAXXNXXXAXX

31576
31577
31578

:E022-~ LINE ECHO TEST, SLOW RATE=-- SAME AS E021 EXCEPT
:
THAT A DELAY IS INTRODUCED BETWEEN (HARACTERS
M
TO PRODUCE A (Cv ACTION

3580

SXXXXXNXXXX

3579

3581
3582
3583
3584
3585
3586
3587
3588
3589
3590
3591
3592
315903
3594
3595

012226
012230
012232
012234
012242
012246
012252
012254
012256
012260
012264
012266
012270
012272

000022
012500
104016
012737
013702
013700
104015
005302
001404
012700
104010
000767
104017
000763

:
£022:

000060
000652
000662

000662

E022A:
1%:
2%:

003410

22
£023
PRTHDR
MOV
MoV
MOV
PRINTC
DEC
8tQ
MoV
DELAY
BR
CRLF
BR

#60,REPT
WIDTH,R2
REPT,RO
R?
1%
#3410,R0

P 3
1%

;TYPE HEADER
JLOAD 0 AS INITIAL (HARACTER
;SET COLUMN COUNT
JGET CHAR
;PRINT (HAR
;DEL COLUMN COUNT
;BRANCH 1F DONE LINE

;DELAY 1.8 SEC.
;OUTPUT NEW (HAR.
JSEND A (R AND (F

CILACFQ LA3G TERM (DLY1 & i 1)
CZLACF . PN
i3-JUN-75 15:33
3596

MACYIT

304(1052)

LA3S ECHD TESTS

:
;

3600

Jeesveere Ny

3618

3619
3620
3621
3622
3623
3624
3625
3626
3627
3628
3629
3630
3631
3632
3633
;bgg
6

3636

15:35

PAGE

St (088

Jeteevenrte

31597
?,238
3601
3602
3603
3604
3605
3606
3607
3608
3609
3610
3611
3612
3613
3614
3615
3616
3617

13-JUN-79

012274
012300
012304
012310
012314
012320
012324
012330
012334
012340
012344
012350
012354
012360
012364
012370

012374

012400
0126404
012410
01264146
0126420
012424
012430
0126434
0126440
0126444
0126450
012454
012460
012464
012470
0126476

052516
047523
052123
052105
047505
047105
041501
042502
051502
052110
0643114
052126
043106
051103
0647523
044523

046104

041504
041704
041504
041504
040516
054523
052105
040503
046505
052523
051505
051506
051507
051522
051525
050123

029114
020110
020130
020130
020124
020121
020113
020114
020040
020040
020040
020040
020040
020040
020040
020040

020105

020061
020062
020063
020064
020113
020116
020102
020116
020040
020102
020103
020040
020040
020040
020040
020040

MONIC:

THIS FOLLOWING TABLE 1S USED BY TEST E023

_ASCID
LASCI1
ASCIT
JASCIL
LASCII
LASCI]
LASCIL
LASCI1
LASCI1
LASCIT
LASCIL
LASCIL
JASCIL
LASCIT
LASCIT
JASCID

LASCI1

LASCIT
LASCIT
LASCIL
LASCID
CASCII
LASCIY
LASCID
LASCII
LASCIL
LASCIT
LASCYIL
LASCIE
LASCIL
LASCIL
LASCIT
LASCIL
EVEN

/NUL /
/S0HW /
/ST v
/ETX /
/EOT ¢/
/ENQ /
/ACK ¢/
/BEL /
/BS
/
/HuT
¢
/Ly
/vY
/FF
/(R
/
/50
7/
/81
7

/DLE /

/DCY
/DC2
/7DC3
/DCG
/NAK
/SYN
/ET1B
/CAN
/EM
/suB
/7ESC
/FS
/G6S
/RS
/us
/5P

7
7
v/
/
/
/
/
/
7
/
7/
7
7
7/
7
v/

CILACFC LA36 TERM (DL11

CIULACE . PYY

& ki IRE)

13=JUN=79 15:33

3637
3638
3639
3640
3661
3642
3543

13-JUN-79

7
15:35

PAGE B89

SEQ (0%

SXAAXXANX XX
:
:£023-- CHARACTER CODE TEST-- ANY CHARACTER SELECTED
;
WiLL BE ECHCED ALONG WITH ITS OCTAL CODE.
:
A MNEMONIC WILL BE PRINTED INSTEAD OF THE CHARACTER
:
IF 17 IS A NON-PRINTING CHARACTER.
;
THE PAKITY OF THE RECEIVED CODE WILL ALSO BE

;g:g

;

36406

3647
3648
3649
3650
3651
3652
3653
36564
3655
3656
3657
3658
3659
3660
3661
3662
3663
3664
3665
3666
3667
3668
3669
3670
3671
3672
3673
3674
3675
3676
3677
3678
3679
3680
3681
3682
3683
3684
3685
3686
3687
3688
3689
3690
3691
3692

MACYT1 30A(1052)
LA3Z6 ECHO TESTS

INDICATED AS EITHER EVEN OR 0ODD.

SXXXXXXAXXX

012500
012502
012504
012506
012510
012514
012516
012524
012526
012532
012536
012540
012542
012546

012552
012554

012556
012560
012566
012570
012574
012600
012604
012610
012614
012620
012624
012630
012632
012636
012642
012646
012650
012652
012654
012656
012660
012662
012666
012672
012676
012702
(12706
012712
012714

000023
013022
104016
104020
012700
104010
023727
103015
004737
113700
006300
006300
062700
004737

104000
015021
000753
023727
001421
012701
113721
112721
112721
112721
004737
012700
004737
000750
004737
012700
004737
104000
015021
104007
014772
104005
000712
012702
012701
062701
013700
042700
062700
110041
005302

:
E023:
1%:

000036

000700

000041

012662
000700

012274
012740

000700

2%:
000177

3$:

013012
000700
000040
000040
000040
012662
013012
012740

012662
013016
012740

000003
015023
000003
000704
177770
000060

4%:

STRLN:
1%:

23
€024
PRTHDR
READ
MOV
DELAY
CMp
BH1S
JSR
MOVB
ASL
ASL
ADD
JSR
TYPE
E023M
BR
(mp
BEQ
MOV
MOVSB
MOVB
MOVE
MOVB
JSR
MOV
JSR
B8R
JSR
MoV
JSR
TYPE
E023M
TYPEM
ECOEND
CHAIN
BR
MOV
Mov
ADD
Mov
BIC
ADD
mMove
DEC

#30.,R0

TEMPCH, #41
1%
PC,STRLN
TEMPCH,RO
RO
RO
#MONIC,RO
PC,MOVNUM
1%
TEMPCH, 177
4%
#MG24 R
TEMPCH, (R1)+
#60,(R1)+

#60,(R1)+
#40,(R1)+
PC,STRLN
#MG24 RO
PC,MOVNUM
2%
PC,STRLN
MG25 R0
PC.,MOVNUM

1%
#3,R2
#LINES,RY
"3 .R1
PCHAR,RD
#M77770,R0
#60,R0
RO,-(RV)
R?

sTEST NUMBER
JNEXT TEST
:TYPE HEADER
;G0 WAIT FOR CMARACTER
;DELAY FOR HALF DUPLEX

sTEST 1F CHAR 1S PRINTABLE
sBRANCH IF IT IS
sSTORE CODE INTO MESSAGE
;GET CODE AGAIN
;MULT BY 2
JMULT BY 4
;ADD ADDR OF MNEMONIC TABLE
MOV MNEMONIC TO MESSAGE
:TYPE CODE AND MNEMONIC
;ADDRESS OF MESSAGE
;60 WAIT FOR NEXT CHARACTFR
STEST IF CHAR 1S A RUBOUT
;sBRANCH IF RUBOUT

;STORE CODE INTO MESSAGE
;sADDR OF CHAR INTO RO
;MOVE CHAR INTO MESSAGE
:TYPE MESSAGE
sRUBOUT, CONVERT AND STOR CODE
;ADDR. Of DEL INTO RO
;MOVE DEL INTO MESSAGE
;TYPE MESSAGE
;ADDR OF MESSAGE

sCHAIN TO NEXT TEST
sREPEAT TEST
sCOUNT OF 3 10 R2
;ADDR OF MESG 10 R1
;POINT TO LAST SPACE IN MESG
sMOVE OCTAL CODE 10 RO
;SAVE LS OCTAL CHAR
SMAKE ASCII
;MOVE INTO MESG
;DECREMENT C(HAR COUNTER

CILACFO LA36 TERM (DL 8 KL 1)
CILACF.PIN
13=-JUN-79 1 5: 33

3693
3694
3695
3696
3697
3698
3699
3700
3701
3702
3703
3704

3705
3706
3707
3708
3709
3710
3711
3712
3713
3774
3715
3716
3717
3718
3719
3720
3721

0127
0127
0127
0127
0127
0127
0127
01274
01275
01275
0127
0127

001407
006237
006237
006237
000760
000207
012701
012702
112021

005302
001375
105737
001003
012700
000402
012700
012702

0127
0127
0127
012772
012776
013002
013004
013006
013010

005302
001375
000207

013012

020040

112021

MACYTT

BEQ
ASR
ASR
ASR

2%:

MCVNUM:

1%:

000702
015071
015075
000004

2%:
3% :

4%:

R1S

MOV
rov
MOVB

MG24:

PAGE 90

JBRANCH I1F X MOVED
:NOT THREE, SHIFT NEXY

#LINESA
R
04 ,R2
(RO)+,(R1)+
RZ
1%
PARITY

;ADDR OF LINES IN R1
;COUNY OF 4 10 R2
MOV & (H*RS 10 MESG AREA
;OECREMENT COUNTER
;BRANCH IF NOT ALL DONE
JTEST PARITY FLAG

:CHARACTER TO THE RIGHT

MOV
MOV

#00D RO
¥4 ,R2

MOVB
DEC

7
15 :35

2%
PCHAR
PCHAR
PCHAR
1%

2%
#EVEN,RO

B8R

Sea 0090

DEC
BNE
1518
BNE
MOV

BNE

020040

13-JUN-79

LA36 ECHO TESTS

000704
€00704
000704
015027
000004

30A(1052)

(RO)+,(R1)+
R2

;sCONVERY AND STORE NEXT (HAR
JRETURN TO CALLER

;BRANCH IF ODD PARITY
;SET ADDRESS FOR EVEN PARITY MESG

, CONTINUE
;SET ADDRESS FOR ODD PARITY MESG
;COUNT OF & T0 R2
sMOVE & CHARS 10 MESG ARFA
;DECREMENT COUNTER
;BRANCH IF NOT DONE
JRETURN

R1S

LASCIT

; SAVE CHARACTER (CODE

/DEL

:MNEMONIC FOR RUBCUT

EVEN

013016

042504

020114

MG2S:

LASCIY
EVEN

OCTAL

CZLACFO LA36 TERM (DLI1

)78

CILACE.PYY

i3-JUN-79

& KL1Y)

MACYT1

15:33

3725

3726

3727
3723
3729
3730
3731
3732
§Z§5
3756

3737
3738
3739
37640
3741
37642
3743
37644
3745

3746
3747
3748
3749
3750
3751
3752

g;g!
4

3757
3758
3759
3760

3761
3762
3763
3764

3765
3766
3767
3768
3769
3770
3771
3772
3773
3774

7
15:35

PAGE 9
SEQ 0091

CHARACTERS.

EACH WILL BE ECHOED

TO 256

AND STORED UNTIL THWE CNTL/C 1S SELECTED.

AT THAT TIME ALL CHARACTERS W'LL BE PRINTED AS

:
A CONTINOUS STRING UNTIL EITHER THE RUBOUT IS
:
SELECTED TO TERMINATE OR THE CNTL/C IS SELECTED
:
AGAIN.
A TERMINATING CNTL/C FOLLOWED BY ANOTHER
:
CNTL/C WILL ALWAYS CAUSE THE LAST INPUTTED STRING TC
:
BE PRINTED.
A TERMINATING CNTL/C FOLLOWED BY A CHARACTER OTHER THAN A
:
RUBOUT WILL CAUSE A NEW STRING TO BE INPUTTED.
SXXANXNXXXKAX
013022

013024

013026
913030
013032
013036
013040
013044
013046
013054
013056

013064
013066
013072
013074
013100
013102
013104

013112

000024

E026:

013570

104016
005001
012702
104020
012700
104010
022737
001440
022737

001413
020127
103361
113722
005201
104017
113777

009751

E024B:

013166

1%:

000036
000177

000700

000003

000700

000700
000700

165506

sTEST NUMBER

€025

PRTHDR
CLR
MOV
READ
MOV
DELAY
CMP
8EQ
CMP

BEQ
(mMpP
BHIS
Movs
INC
PRNT
MOvVB

000400

BR
H

%;25

SAXAAAXXX
XX
;8026-= SELECTED PATTERN ECHO TEST-- STLECT

3724

3735

13-JuN-79

LA36 ECHO TESTS

3722
3723

734

30A(1052)

SNEXT

TEST

#30..R0

;TYPE TEST HCADER
;CLEAR CHARACTER COUNT
;ADDRESS OF BUFFER TQ R?2
;WAIT FOR INPUT
;DELAY FOR HALF DUPLEX

M177,TEMPCH
TERM
#3, TEMPCH

;TEST IF RUBOUT
;BRANCH IF RUBOUT
;TEST IF CNTL-C

R1
#BUFR,R2

OUTPUT
R1,#256.
1%
TEMPCH, (R2)+
R1

TEMPCH,a1PB
1%

;BRANCH IF CNTL-C
;YES, CHECK IF CHAR CNT IS EQ, GT 256
;BRANCH IF YES, IGNORE CHAR
:STORE CHAR INTO BUFFER
: INCREMENT CHARACTER COUNT
:CHECK IF PRINTER READY
;ECHO CHAR

;GO WAIT FOR NEXT (HAR

;SECTION TO OUTPUT CONTINOUS STRING

013114
013120
013122
013126

013130
013134
013140
013142

013144
013150
013152
013156
013156
013160
013162
013164
013166
0'3170

020227
001403
113722
104013

012702
021227
001733
112200

020027
001767
104015
000772
104007
014772
104005
000721
000003
000400

013166

000700

013166
000003
C€00003

;

OUTPUT: (MP
BEQ
Move
SCRLF

1%:

2%:

TERM:

BUFR:

MOV
cmp
BEQ
MOvB

CMP
BEQ
PRINTC
BR
TYPEM
ECOEND
CHAIN
8R
3
BLKB

R2,#BUFR
1$
TEMPCH, (R2)+

#BUFR,R2
(R2),#3
£E0248B
(R2)+,RO

RO,#3
1%

E0248B
256.

:CHECK IF POINTER IS AT START OF
;YES, BRANCH
:NO, STORE “C IN TABLE
JSEND A CR LF
;BUFFER ADDRESS 10 R2
;CHECK IF FIRST CHAR ]S “C
:YES, LOOK FOR INPUT AGAIN
;GET CHARACTER
:DONE STRING?
sYES, RESTART STRING
;PRINT CHAR
s CONTINUE
;OUTPUT TERMINATION MESSAGE

;CHAIN TO NEXT TEST
SREPEAT TEST
SINITIALIZE FIRST CHAR AS CNTL=-C

;256 CHARACTER BUFFER

TABLE

IN TABIE

CILACFO LA3G TERM (DLYY B i 1)
CILACF.PYY
13=JUN=79 15:33

MACY1T 30A(1052)
LA36 ECHO TESTS

'3-JuUN-79

15:35

PAGE

SEQ 0092

3775

SXXXXXNXXNXX

3777

;£025-~ BELL ECHO TEST-- A MESSAGE 1S PRINTED AND

3776

3778
3779
3780
3781
3782
3783

g;gg
3786
3787
3788
3789
3790
3791
3792
379%
3794
3795
3796
3797
3798
3799
3800
3801
3802
3803
3804
3805
3806
3807
3808
3809
3810
3811
3812

:
:
:
;
:
:

THE TEST WAITS FOR SOME PRINTABLE CHARACTER
TO BE SELECTED ON THE KEYBOARD (GT040).
THIS
TESY IS VALID ONLY If THE PAPER WIDTH IS GT 64
COLUMNS.
IF LT64 COLUMNS AN ILLEGAL BELL TEST
MESSAGE IS PRINTED.

£025:

25
£020
PRTHDR
(MpP
BLO
TYPEM
E025MA
8R
TYPE
EQ25MA
READ
MOV
DELAY
cmp
BLO
cmp
BEQ
PRNT
MOVB
SCRLF
8R
TYPEM
E025MB
TYPEM
ECOEND
C(HAIN
BR

IXXXXXAXXXXX
013570
000025
013572
012120
013576
104016
013576
023727
013604
103427
013606
104007
013610
014645
013612
000402
013614
104000
013616
014645
013620
104020
013622
012700
013626
104010
013630
023727
013636
103770
013640
022737
013646 0014610
013650
104017
013652
113777
013660
104013
013662
000754
013664
104007
013666 014745
013670
104007
013672
014772
013674
104005
013676
000737

000652

000101

1%:

2%:

3%:

000036

000700

000040

000177

000700

164740

4%
5% :

WIDTH, #1071
4%
3%

#30.,RO

TEMPCH, #40
3%
#177,TEMPCH
5%

TEMPCH,RTPB
2%

JTEST NUMBER
SNEXT TEST HEADER
:PRINT HEADER
;TEST IF COLUMN COUNTIS EQ.GT 64
sBRANCH IF NOT
;TYPE TEST MESG
;WALIT FOR CHAR
sTYPE TEST MESG ON TERM (MAR RCVD ON
;WAIT FOR OPERATOR RESPONSE
;DELAY FOR HALF DUPLEX
;TEST IF PRINTABLE
sBRANCH IF NON-PRINTABLE
;CHECK IF CHAR 1S RUBOUT
;BRANCH IF YES
;CHECK IF PRINTER IS READY
sPRINT CHAR. (BELL SHOULD SOUND)
;SEND A CRLF
;REPEAY
;TYPE ERROR MESSAGE
;PRINT TERMINATION

SEXIT TO NEXT TEST
;REPEAT TEST

CILACFD LA3ZG TERM (DL11 R KL i)
CILACF.PYI
13=JUN=79 15:33

;g;z

MACYT1 30A€1052)
LA36 ECHO TESTS

13-JUN-79

15:35

PAGE 63

SEQ 0093

SXXXXNXKLAXANXXAXX

3815

;CHECK SWITCH REGISTER ROUTINE.

gg}g

:CHANGING OF LOGC 176.

3818
3819

SOOOONXXXXX
XXX
XX

3820

3821
013700
3822
013700
3823
013706
3824
013710
3825
013714
3826
013716
3827
013724
3828
013732
3829 013740
3830
013742
3831
013744
3832
013746
3833
013752
3834
013754
3835
013756
3836
013762
3837
013766
3838
013770
3839 013772
3860
013774
3841
0164000
3842
014006
3843
014012
3846
014014
3845
014022
3846
0164026
3847
014030
3848
0164036
3849
014044
3850
014052
3851
014054
3852
014056
3853
014064
3854
014066
3855
014070
31856
014076
3857
014100
3858
014106
3859 0164110
3860
014116
3861
014120
3862
014122
3863 014124
3864
014126
3865
014132
1866
014136
3867
014142
3868
014150

C(MECKS FOR “G TO ALLOW

(NeEREREYITSESRRIRELY

022737
001132
105777
100127
017737
042737
022737
001115
104000
015200
005077
104000
015206
017746
004737
022600
106000
015216
005037
012737
105777
100375
117737
105777
100375
113777
042737
122737
001001
000736
122737
001005
104013
022737
001033
122737
003004
122737
002003
104000
015226
000753
006337
006337
006337
142737
153737

000176

000714

CHGFS:
(KSWR:

164676
164672
177600
000007

000722
000722
900722

164646

CNTLU:

164732
014214

000724
000007
164600

000726

164574
164570

000722

000722
177600
003025

164562
000722
000722

)
0000%'5

000722

000007

000726

000060

000722

000067

000722

1%:

8%:

3s:
2%:

4$:

5¢:
000724
0C0724
0CC72¢4
000060
000722

6%:
000722
000724

CMP
BNE
1S1B
BPL
MoV
BIC
cmp
BNE
TYPE
{N1G
CLR
TYPE
SWR
mMov
JSR
cmp
TYPE
NEW
CLR
MOV
1518
BPL
MOVB
1STB
BPL
MOVB
BIC
(MPB
BNE
BR
‘CMPB
BNE
SCRLF
cmp
BNE
(MPB
86T
CMPB
BGE
TYPE
QUEST
BR
ASL
ASL
ASL
BI(CB
BISB

PSWREG, SR
out
arks
ouTt
91kB,T118B
#177600,718B
#7,11B
ouT

;SOF TWARE SW REG PRES?
;NO,GET OUT
JYES, 1S CHARACTER READY?
:1F NOT, GET Qut
;STORE BUFFER
;STRIP OFF GARBAGE
SIS IT A 26
s1F NOT GET Out
LECHOD *6

aTPB
;ALLOW SWR- TQ BE

TYPED

aSR,-(SP)
PC,TYPOC
(%6)+,R0

;MOV CONTENTS OF SWR
sOCTAL TYPE OUT ROUTINE
;CORRECT STACK POINTER
;ALLOW NEW= TO BE TYPED

TEMPST
#7,COUNT
aTKs
1%
91kB,TIB
artpPs
8%
T18,a1PB
#177600,118
#25,118
2%
CNTLU
#15,11I8
4%

;CLEAR TEMP STORAGE LOC
;SET UP TO ACCEPT 7 (HAR
;1S CHARACTER THERE?
s1F NOT,TRY AGAIN
;PICKUP CHARACTER
:CHECK PRINTER STATUS
;NOT READY, TRY AGAIN
sPRINT |17
;STRIP OFF GARBAGE
SIS IT A *u
;BRANCH IF NOT
;START OVER
SIS IT A <CR>
;BRANCH IFf NOY

#7,COUNT
7%
#60,118
5%
#67,118
6%

sWAS <CR> FIRST (MAR
:CHANGE SWREG IF NOT FIRST <(R>
;1S IT LESS THAN O
;60 TO ? ROUTINE 1F SO
1S 17 GREATER THAN 7
;60 10 ? ROUTINE IF SO
:SET UP FOR ? TYPEOU!

33
TEMPSY
TEMPST
TEMPST
#60,118
TIB,TEMPST

;START INPUT STRING OVER
;MULYIPLY BY 10
JCLEAR OFF ASCII
MOV (HAR TO TEMPST

3898
3899
3900
3901
3902
3903
3904

3905
3906
3907
3908
3909
3910
3911
3912
3913
3914
3915
3916
3917
3918
3919
3920
3921
3922
36213

8 L ol ol o

156
162
164
166
174
176

b
e

el e

2l oW W

i
D e

narno

e o

200
202

LR aE 2

3878
3879
3880
3881
3882
3883
3884
3885
3886
3887
3888
3889
3890
3891
3892
3893
3894
3895
3896
3897

jelelolalolo
oY)(=]

3869
3870
3871
3872
3873
3874
3875
3876
3877

o)
s

CZLACFO LA36 TERM (DLIT & kL11)
CILACF P11
i3-JUN-79 15:33

2312

014214
014222
014230
014236
014240
014242
014244
014250
014252
014256
014262
014266
014272
014274
014276
014300
014302
014304
014306
0164310
014312
014316
014320

014324
0146326

014330
014332
014334
014340
014344

014346
014352
014356
016360
014362
014364
016366
014370
014372
014374

005337
001756
000710
013777
000207

010046
010146
004737
012601
012600
000002

MACY11

164520

013700

000001
000006
000005

000730
000733
000734

7%:
ouT:

TYPON:

105777
100375
110377

105337
003350
002402
005204
000745
012605
012604

012603

000207

(LR

ROL

B8R

ROL
ROL
ROL
Mov
ROL

DECB
8PL
BIC
BNE

177770

181

000060
164252

5%:

164246

000734

7%:

6%:

BEQ
INC
BIS

1518
BPL
MOvB

DECB
BGY
BLT
INC
BR

MOv
MoV
MOV
RTS

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

PAGE

9¢

;ONLY WANT

6 NUMBERS AND <(R>

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

sRETURN TO PROGRAM
¢ INTERRUPT SERVICE ROUTINE
sSAVE RO AND R1

PLUFILL
#6 . MODE
+1

MOVB
MOVB
MOVB
MOV
MOV
MOv
Move
NEG
ADD
MOVB
MOvB
MOV

15 :35

;1F = 7 T00 MANY NUMBERS
;GET NEXT CHAR

TYPO(:

1%:

052703

COUNT

TEMPST 3SR
PC

000006
000732
000730
000010

100015
042703
001002
005704
001403
005204

DEC
BtQ
B8R

)}

SEQ 0094

Mov
RTS
TTINTS: Mov
Mov
JSR
MOv
MOv
RTI

000733

000732

13-JuUN-79

LA36 ECHO TESTS

000726
000724

30A(1052)

PC,(KSWR
(SP)+ ,R1
(SP)+ RO

; CHANGE

SWR

CONTENTS

;G0 TO SUBR TO SERVICE
;RESTORE R1 AND RO
:RETURN FROM

’5,(NT
R3,-(SP)
R4 ,-(SP)
RS ,=(SP)
MODE+1,R4
R&

’6 R4

R& ,MODE
FILL,R4

10(X6) ,RS
R3
RS
3%
RS
RS
RS
RS,R3
R3

MODE

7%
#177770,R3
4%
R&

R&
#60,R3
?1PS

R3,31PB
(NTM

2%
6%

JSET THE ZERO FILL
SWITCH
JSET FOR SIX(6) DIGITS
sSET THE ITERATION COUNT

;SAVE R3

JSAVE
;SAVE

;GET

R4
RS

THE NUMBER OF

:PICKUP THE INPUT NUMBER
;CLEAR THE OUTPUT WORD
:ROTATE MSB INTO ‘'C**
;60 DO MSB

;FORM

THIS

;GEY LSB OF

DIGIT

THIS DIGIT

;TYPE

THIS

DIGIT?

MAKE

THIS

DIGIT

OUT

NUMBER

;BR IF NO
;GET RID OF JUNK
;TEST FOR O
s SUPPRESS THIS O
;BR IF YES
;DON'T SUPPRESS ANYMORE (°'S
ASCII

;1S PRINTER READY FOR (MARA(CTER?
;1F NOT, TRY AGAIN

s TYPE

; COUNT BY 1
:BR 1f
;BR IF

NORE
DONE

10 DO

(SP)+ RS

;RESTORE RS
JRESTORE R4
;RESTORE R3

(SP)+ ,R3

DIGiTS TO TYPE

:SUBTRACT IT FOR MAX. ALLOWED
:SAVE 1T FOR USE
;GET THE ZERO FILL
SWIT(H

s INSURE LAST DIGIT

(SP)+ R4

INTERRUPT

TTY

SN'T
G0 DO THE LAST DIG 7

;RETURN

FROM

INTERRUPY

A BLANK

CILACFO LA36 YERM (DL1! & XL 1
CZLACE P
13-JUN=79 15:33%

001007
040514
040514
051105
030514
046113
040514
051105
020114
047516
200
104
020046
044440
040506
000
200
047440
051523
030060
000
200
046117
030060
023461

3944
3945
3946
3947
3948
3949
3950
3951
3952
3195¢
3954
3955
39564
3957
3958
3959
1960
3961
31962
3963
3964
3965
3066
3967
31968
3969
3670
3971

1972
31973
1974
3975
36976
3977
31978
3979

042504

052123

007
042524
000
060
046117
005200
124
047101

007600
043103
033063
020115
020061
030461
033063
v4é515
044504
052123

043501
04151

030514
046113
052116
042503

020061
030461
051105
005200

STARTM:

MESSAGES

15:35

PAGE 95
SEQ 0095

LSBTTL

MISC.

LASCIHI

<T2<2><ACRLE>CI7>/CZLACFO LA36

ASCL]

/LA36

TERMINAL

LASCIZ

/DLTT

B KU1V

DIAGNOSTIC MESSAGES

TERM

100051

05204C

040516

DIAGNOSTIC/<ACRLE>

INTERFACE/<ACRLF><12>

042412
020106
020040
030060

042116

ENDPAS:

LASCHI

<ACRLF><12>/END

005200

PASMES:

LASCI2

/0000/<ACRLF><12>

047503
020105
042040
020123
020122
005200
100002
052123

051516
020046
030514
047125
042524
000
005017
021440

DL11S:

<ASCILI

<AZRLF>/CONSOLE

pL11ST:

.ASC1Z

/00 DL1Y'S UNDER

HDRMSG:

LASCIZ

CT3C2>CACRLEF>CI7><I2>/TEST

030060
066525

041440
051516

HDRO:

LASCIZ

/0C0O COLUMNS/<ACRLF><12>

020105
051120

EO25MA:

LASCI

/TYPE

LASCHZ

/AND LISTEN FOR BELL..vvuivnnnnnnn.

£025MB:

LASCIZ

<ACRLF>/NOT

ENOUGH

COLUMNS/<ACRLF>

ECOEND:

LASCI2

CALRLE>/ECHO

TEST

TERMINATED/<ACRLF>

EQ23M:
LINES:

LASCL
LASCII

000
050131
020131
040524
044103
0642524

020104
047105
041040
027056
027056
027056
047516
052517
046117
000200
044103
052123
044515
015023

055103
020060
052040
062050
020046

13-JUN-T79

3924
3925
3926
3927
3928
3929
31930
3931
3932
31933
393
3935
3936
3937
3938
3939
3940
3941
3942
3943

MACYTT 30A(1052)
MISC. DIAGNOSTIC

100104
040

020040

040520

ANY

PASS

TEST/<ACRLF><12>

PRINTABLE

(HARACTER

046102

051101
020122
044514
043040
0646105
027056
027056
000
020124
046107
046525
020117
052040
040516
000
040

JRESG FOR

TESY

£024

(DL1Y

¢ KL11)/<ACRLF>

CILACFD LA3G
CZLACE.P1

3980
3981

3982
3983

3986
3985
3986
3987
3988
3989
3990
3991
3992
3993
3994
3995
3996
3997

3998
3999

4000
4001
4002

015027
015034

YERM (DLIY & xL11)
i3=JUN-79 15:33

040
020040

015041
015046
015054
015062
015070
015071
015075
015101
015106
015114
015122
015126
015132
015140
015146
015154
015162
015170
015176

200
0642516
051505
061115
000
105
117
124
047101
051101
000122
051525
052106
051640
020110
052101
051117
051104
000007

015200

020040

020040
100040

MACYTT 30AC1052)
13-JUN-79
MISC. DIAGNOSTIC MESSAGES

020040
000

4005

4006
4007
4008
<009
4010

4011

015206

015214
015216
8;5224
5226

020040

000040
020040
000040
037440

_ASCI1Z

PAGE

/<ACRLF>

MESG3:

.ASCIZ

<ALRLE><17><12>/SELECT

042526
042104
050131
020131
041501

116
04C
020105
044103
042524

EVEN:
0DD:
OPMSG:

LASCIL
LASCI1
.ASCIZ

/EVEN/
/0DD /
/TYPE ANY CHARACTER/

020105
040527
044527
042522
046440
020131
030440

047523
042522
041524
020107
046505
042101
033067

NOSWR:

.ASClZ

/USE

JCHGFE

043536

errerentrevener

000040

CNTG:

.ASCIZ

053523

036522

042516

036527

000040

SWR:

NEW:

QUEST:

SOFTWARE

G /

ASCIZ

SWR

LASCIZ

NEW

.ASCIZ?

eEIERCEYEITRYSY

LEND

StQ 009¢

042523
052040
052516
020040

(NS

000001

8
15:35

005017
052103
020124
051105

6,003%

4004

LiNESA:

TEST NUMBER

SWITCH REG AT MEMORY ADDR

—

176/<7>

CZLACFOQ LA36 TERM (D1t % KL )
CZLACE. P
i3-JUN-79 15:33
ACRLF

ADD1

000200
006756

ADD?2

006700

ADD3

ADJRG
ADTENP
AREAD =

AT0
AT0X

ATY
AT10
AT

006746

012034
004166
104021

005354
005356

005406
006032
006070

AT12
AT13

006130
006204

AT15

006350

AT14

006264

AT16
A117
AT2

006450
006516
005440

;sgal
2758

2756

2761

3464
2167
12874

1524
1612+«

1416
1781
1782

1783
1784
1 785
1 ;86

}

MACYI1 30AC1052)
13-JUN-79
15:35
PAGE 98
CROSS REFERENCE TABLE -- USER SYM3OLS
ggg;

3926

3932

3937

3942

3945

SE0 0097

3947

3949

5953

39%¢

3970

3974

253

2530

2956

257%

27748

27608

2773

3476
21848
2692

5481

3482

3483

3504#

2712

2735

2764

2794

1774
25464
25644

2397

26124

1522

2397s

27714

1587
1416

1421
2528
2547

2776

1773
1419«

2565
2583

25824
26064

2631

26554

2607

23964
1421+

2822

26304

AT21
AT22

006660
006764

87
788
1 775
1 789
1790
1791

AT24
A13
ATG
ATS
AT6

007204
005472
005524
005614
005672

1793
1776
1777
1778
1779

000001
000002
002000
004000
010000
020000
040000
100000
000004
000010
000020
000040
0001C0

126424
12434
12524
12532
12544
12554
12564
12574
126444
126454
12464
126474
12480
2593

1562

1968

2465
2616

2466
2641

2470
2665

2671
2740

2489
2769

2493
2800

2510
2826

2511
2877

2515
2888

2516
3123

13740
12894
3739
12754
2596
3019

21160
1473
3757
2298
2619
3099

2123+
1510
1761
2307
2647
3134

3457
37738
2402
2669
3192

2618

2433

2449

2674

2496

29519

2530

15500
15758

1830
1656

AT120

006566

A123

007072

AT7

005762

BI1T0
BIT1
BIT10
BIT11
BIT12
B1713
Bl1114
BIT15
BITZ2
BIT3
BI14
BITS
Bl116

=
=
=
=
=
=
=
=
=
=
=
=

BI17
B118
B119

= 000200
= 000400
= 001000

BRCTR
000664
BTOASC= 104023
BUFR
013166
(HAIN = 104005

(wAINN
(HAINY

001500
(01626

1792

1780

126494
1250
12514

3811

2656
2685
2413

26844
27044
26274

2726
2754

27534
2784w

2815
2428
2446
2459
2483

28534
26434
24584
24824
2503#

2705

2785

2504

27254

2814a

25274

1260

2254

1259

1594
157
1266

1621
1592

1718
1654

2697
3256

27
3324

2745
3373

2772
3393

2806
3425

2831
3486

2892
3550

2941
Se83

2989
LA

CHALT

(MGF2
(HGF
3

(HOF
S

CHGFS
CHGF7

(HLTY
(xPOS
(KSWR

CNT

(NTG
CNTLSW
CNTLU
(NTR
CNVCTR
CONADD
CON1T
CONSET
CONVEC
COUNT

COUNTS

(R
(RBUF
CRLF

TERM (DL
i3-Jun-79 1

Ll o

CILACFO LA36
CILACE. P

106006

1413

001046
001500
006574

013700
007204
000736
011766
013700
000734
015200
000634
013752

END3

END4

€020
£021
EN2TA
£022
E022A
023

15:35

1422

sta 0098

1612

3469
3822#
3885«

4004
1449+

3833#
2863
2178+
2137

1651

1654

2339

236

2201
2147
3841
2196+
1921

2327
3129

3288

2938
3369

1526
1659

1628

1717

1916

0 =2 PN

MWN\J’;J\IQNW wn

YO O —= LN

b —d —a
b

£~ 00N 0D AU NI NN OD

ANt —d ed —d N\

3549

19694
18094
1825#

39424
15064
15024
1505
1503

35374
3538
35668
3564
35854
3583

1704

3145

3185

2964
3372

3016
3390

2122
2866

1725

2194

15074
3787
1563#

35824
3648

3682

3770

1706

1715«

2357«

3249

3300

3318

3673

3018

3187
3594

3191

3238

5251

2099+
2295
5N

2304
3189

2350

2361

2569
3417

2691
3542

2196

2256

2259

3810

39744

3465

2182#
35214

1435«
1435
1489
1491
1490

20354
3947#
39494
2306
2125

1693

1690
2821

2734
3653
2173
3504

004162
012114
000720
000174

000656
000610
003524
014551
DL11S]
014564
E COEND
014772
EHALT = 104002
EMLT
003434
EMTINT
003010
EMTTAB
003064
ENDPAS
014523
END2
END2A

13-JUN=79

1831

000716
004160
000602
003776
004002
000604
000726
000666
1046022
000646
104012

000606

30AC1052)

(ROSS REFERENCE TABLE =-- USER SYMZOLS Gt 99

:33

CTRA
000650
CURTST
000676
DELAY = 104010

plGly
DIRIN
DISPLA
DISPRE
DLADR
DLCNT
DLNR
Ly
pL 1S

MACYT1

3253

5348

CILACED LA3G TERM (DLIT § ki11)
CILACE.PIY
i3-JUN-79 15:33

tE023m
€024
E024B
£025
EO25MA
E025MB

ERR
ERRHLT
ERROR EVEN

FILL
FORWD =
fORWDA
fORWDB
FSIDL
HDRMSG
HDRO
HERE

ICIR
10€Z
INCHK

01502°
013022
013030
013570
014645
014745

003406
003442
104001
015071

000730
104026
003702
003710
000632
014613
014627
011534

000660
007700
000710
000654
= 104014
000706
010446
015023

LEVEL
Lf
LFCNT

LINES
LINES
LINESA
(15027
LOGICA
011524
LSI11 - 0C100¢C
MACHER

MESGY
MG24
MG2S
MODE

000004

015041
013012
013016
000732

MONIC
012274
MOVNUM
012740
NEW
015216
NEXT
001746
NEXTI
001766
NITRSW= 004000

3663
1761
2353
1762
3792
3808

1826
19724
12710

3680
3649
37384
3736
3795
39704

39784
37354
3763
37864
39554

3772

2404

26420

2435

2622
2880

13938
12904
2099«
2096
13618
1939
1471
3419

3883+«
1525
2103
2101»
1494+
3953
2928
34254

13728
2996
1384#
13704
12824
13834
3116
3686

3699
1321
12664

1302#

1661
3667
3677
13944

39874

1568+
30244
1446
1406
1952
3114+
31462
3979«

39804
34218
2550
16447

39824
3673
37198
3884

3602¢
3661
3839
1591
1593
1260¢

3660
3674
4007
15964
16004
1565

010141
000640

2997
13640

3051
1524

OPEN

= 000000

OPMSG
o
OUTPUT

015101
014174
013114

12584
1373
1390
2865
3823

1361
1374
1391
39894
3825

13814
34630
3454
13828

22142
34500
3494
2212+

NOSWR

NPCODE
NXT1ST

(0]s]1]

PARITY
PASCNT
PASMES
P{HAR

015124

015075

000702
y1211e
(014542
000704

39934

3708

3746

100

S¢a 0099

19634

2595
2873
3706

MACYTY 30A(1052)
13-3UN-79
15:35
PAGE
CROSS REFERENCE TABLE ~-- USER SYMBOLS

39884

37574

2643
2885

2667
2894

2451

2468

2473

2677

2696

2116

1598

1427

1724

24695

2742

2513

2775

3893
1584

1588

2197

2260

3218

3448

2097+«

2102+

1657«
16450«
3098
3118

1662+
1521+
3119
3122«

2261
1963
3133
3123

2333
1580
3182

1600+
3248

3415

3477

2688

2708

2731

2760

2790

2818

2857

1488+

1493+

2518

2802

2538

2828

2555

28%9

2574

2861

39564

1582+

1596+

1613

1707«

2600

2616

2651

37154

3889

3892«

3678

3699#

3903«

1651

1585

1587+

1590

1595«

1624

1625

1721«

1722

2092

2094

1362
1375
1392

1363
1376
1393

1364
1378
1394

1365
1379
1395

1366
1380

1367
1381

1368
1382

1369
1382

1370
1384

137
138%

1829

38738

2219«
3651
3496
2213«

2222«
3453
3945#
1688

2224+
3455

3704
35234

3694

3695+

36G6e

1372
1387

PII7D
P12
P13
P14
P15

011600
007572
010166
010306
010464

P16

010670

P1SAL

P17
QUEST
READ
=
READC =
READ?
REF
REPT
RESTRT
RINNO

SAVRe
SCOPSW=
SCOPTIR
SCRLF =
SELHLY

SKIP
SPARET
SPBO
SPL
SPCNT
SPSP

Sp2
SR

SY‘R'

010632

011056
015226
104020
104025
0u4300
010416
0006062
003604
000636

003602
040000
000642
104013
000752

001722
003160
000600
007562
000674
007542

00755¢
000714

001026

34384
3440

1743
1744
1745
1746

3186
1747

1748

3862

12864

12914

2202
3117

13734
2062
13634

2309
2061+

1259#
13654
12814
1407
1523
1847
13400

3181
3389

1668

1358
1313

1360
26462

1741

29244
29494
33394
33844
34074

3565

2799+
2925
3270
3340
3385
3426
344614
3639
34490
2950
2994
3075
3112
3190
3157
32158

3584

3442
3487
29934
30744
LARRY
31564
3194#
32140
32694

2598

2621

2665

1619¢

1621+

1718«

1965

19¢8¢

2095

1923
3080

3093

1927

1937

1950

2933
3139
3243
3499
3545
320

2961
3142
3245
3569
3751
3341

3222
3461

3226
3470

1691
2995
3650

3076
3737

2486

2507

1726

1946

3128
3235
3495

3137
3261
3497

1894
3158

32'6

1896

325

1676

1686

3540

3651

3740

3796

22114
3132
2285
20654

31364
2289+

2368+

2371

3566¢

3568

5585+

3587

2335
20644

2347
2067

1578

1940

1947

2093

2263

2274

2279

2283

1853

185¢

1855#

1856

1576
1822

5835

<009
1663

1520«

1556
1558
1888
14114
15924
1848
1623

2363

2366

3760

2098+
3805

2101

1849
1583

1850
1597

1963
1560

3083
3077«
2958
3013

3089
3087«
29718

2550
1332

2688

2708
2075

1429

14210

1434

2676

2972
3162
3275
3588
3803
3386

2976

2978
3167
3309

3409

LIYAS

2287

2291

2300

3166
3295
3767

3408

3250

29774
1378#
2956
29754
13864

=»

00—

2926

2352

3278
3088

2369

3854

NIVt
B s

011550

1742
1749
1750
1751
36100
1756

SEQ 0100

23N

DO
00
O D N

011540

P17

1595

PAGE

2302

M
—s s

P1178

12644
12638
12384

15:35

2293
2895
1594

463
2760
—

011460

011466

3539

3008

1642

— O

P12

PT112A

12854
12844

2881
1562+

PRIY&G = 000200
PRTIY? - 000340
PSW
= 177776
P10
007374
P11
007450
P110
011270
P11
011426

3003
3175
3346

Ta48e

1721
1477

104017
104016

13664
1624
12834

1506

2804

—

PRNT
PRIMDR=

000644
002614
104015

2774

13-JUN-79

2054

—

PRGID
PRGTAB
PRINTC=

022626

1451
12614
1262#

30AC1092)

(ROSS REFERENCE TABLE =-- USER SYMBOLS ¢t 101
10

=
POPSPZ2=

003546
005726

MACY11

Nl £ = O NWVoD
N
[¥ale) _‘o_a_.bwwN

PFAIL
POPSP

TERM (DL1Y & LI
i3=-JUN=79 15:33

CILACFO LA36
CILACF
. PIN

159¢

CILACFD LASHG TERM (DLTT & kL1
1)
CILACF.PYY
13=JUN=79 15:33

1420

1423%8

2610

2634

2659

104003

2757
3676

2788
36854

2823

2875

2886

000712
000700

2249+

1438

3822
2250

2252+

2253«

2319«

79
14

33
34

1677

2215

3859

3868

1645

1669

1682

1692

2140+

22N

2417

2713

2882

3826

1988
1643

2766
2119
2736
2867
2147

2207
2759«
2883

2209
2765
2888+

2401
2769
2891+«

24657
2771«
3824

2466
2795
3842

2470¢
2800«

2825

3832«

2796
2138+
2740.
2877+
2833
1727+
3847«

1861

1895+

1897«

2118¢

2145

21460

2571y

2612
21462
2589

2637
21430
2593«

2234
2615¢

2432
2h1be

2690
2618+

2510+
2636+

251
2641

2515«
2646

2516
2661+

2536
2668

2148e

2146

2671

1418

1553

2265

16574

1728

2358

3662

3679
1660
3807

1938

3833
2296

3838
230%

3861
2927

3217

3447

3684

3548

1772

1752

1753
1794

1754
1795

1758
1796

5194

3219

3208

3078

TM~

3830
2065

—

16422+
1766
1800

3809

24BQr

2337

3791

3794

3913«

151

1692

3804+

[ —Y

1986
1682+

2714
2859

—

000652

3857

001772

3852

wlDTnw

003252
014214
014230

2211e
2343
3745

O~NOO

wA]T#

106007

2289
3668

TYPH
1YPO(
TYPON

1734

TYPEM

2285
3665

[W VY & I
gy

TPSS
004070
TPVIR
000626
TTINTS
014176
TIYCTL= 104011
1ARD
002070
TTviB
002154
TYP
003164
TYPE
= 104000

2281
3657

3849

— o~

004072
000630
000616

2277
3654

3848«

wo
o N
— N DN

1PBS
TPLVL
1PS

2342¢

1731

3872

AN
et

000622
000620

2341

1702

3847

TKVIR
1PR

2321

1700

3844

17318

3827+
2036

-0~

000624
000612

2320+

3828

2354
3759
3864
2175
37694

-~ OO
—
[Vl
ST .1,V

TRLVL
TKS

1698

2272
3543

AN vod ot

000614

1696

2271«
237
3804
3868+

=B et =

1xB

1694

2270+
2368
3801
38¢6

O NN
S
WO~
—
NN
OD

000724
004164
013156
0025952
000722
000672

PAGE

2216
2365
3799
3865«
2183#

TEMPST
TENPWR
TERM
TESTC
118
TIMER

1687

O — ~wN

29
28

D0~
DO ~

TEMP
TEMPCH

012662
015206
000176

15:35

(ROSS REFERENCE TABLE -- USER SY‘&DLS 6 I 102

Mttt

STRLN
SWR
SWREG

13-JUN-79

N
(V]

014376
001042
000754

STARTZ2
000772
STARYT3Z
(001010
STLSPVY
003474
STLSRV
003444
STPCHV= 104004
STPPA
003512
STPRA
003462

STRDRV=

30AC1092)

NI 0000 MmN
S

STARTM
STARTX
START1

MACY1IY

CILACEQ LASG
C7CACE
. P1Y

XCSR

SAREAD
$BIASC
$(R

SCRLF
$FORWD

TERM (DL1Y R ki11)
i3-JUN-79 15:33

3239

000670

13764

2325

003726
004074
003314

1842
1844
1843
1835
1845
1837
1839
1840
1838
1841
1846
1836
1298#

003302
003650

SLf
003304
$PRHDOR
003324
$PRANT
004402
SPRIC
004412
SREAD
0046200
SREADC
004272
$SCRLE
003230
.
= 015232

ABS.

015232

ERRORS DETECTED:

30594

MACYTT

30AC1052)

CROSS REFERENCE

3273
2197«
2326+
21164
21654

3290
2198
2329.
2126

3507
2200
2331,

13-JUN-79

TABLE

15:35

PAGE

-- USER SYM3OLS

103

S€a 0102

3444
2205+

3458
2260+

3467
2267

3507
2269+

3509
2270

3567
2317

3586
2318

3789
2321

2323

1306

1308

1310

1314

13154

13194

13234

1327#

1338¢

19264
1921»

2092#
19224
19364

2234n
2248
21938
2195
18944
1300

37744

2235
2217
2209#

2210

1302

1304

000
0

CZLACF .BIN,CZLACF.LST/CRF/SOL/NL:TOC-CZLA
. P11
CF
RUN-TIME: 12 25 1 SECONDS
RUN-TIME RAT]O: 142/40=3.5
CORE USED:
7«
(13 PAGES)