Digital PDFs

AH-8681D-MC

January 1979

81 pages

Original

4.6MB

view download

OCR Version

3.9MB

view download

Document:	CZDUBD0 DU11 OFF-LINE RECEIVER TESTS JAN 1979 bw
Order Number:	AH-8681D-MC
Revision:	000
Pages:	81
Original Filename:	CZDUBD0__DU11__OFF-LINE_RECEIVER_TESTS__AH-8681D-MC__JAN_1979_bw.pdf

OCR Text

OFF-LINE RECEIVER TESTS

CZDUBDO

AH-8681D-MC

JAN 1979

FICHE1 OF
1

MADE
IN USA

copvricHT 7378

EOTO0EN

OZOUB-C MACY11 30A(1052)
21-NOV-78
@4 VIR
R
20-NOV-78 16:48

15:36

PAGE
1

S£Q 0001

[DENTIFICATION
PRODUCT

THE

INFORMATION

CODE:

AC-8680D-MC

PRODJCT NAME:

(ZDUBDO DU11

RELEASE DATE:

JUN

MAINTAINER

DIAGNOSTICS

THIS

THIS DOCUMENT.

DOCUMENT

OFFLINE

RECEIVER

TESTS

1978

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 E£RRORS
THAT MAY APPEAR

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

OIGITAL

EQUIPMENT CORPORATION ASSUMES NO RESPONSIBILITY FOR THE USE Of

RE. JABILITY OF

ITS

SOFTWARE

(C)

1973,

ON EQUIPMENT

THAT

IS NOT

SUPPLIED BY DIGITAL.

978 BY DIGITAL EQUIPMENT CORPORATION

0Z0UB-C MACY11_30A(1052)
21-NOV-78
CZDUTIT
. HLO
20-NOV~78 16:48

15:36

PAGE 2

SEQ 0002

GENERAL DESCRIPTION
THIS DIAGNOSTIC

CAN CHAIN 16 DUT1'S,

THIS MEANS

THAT

16 DEVICES CAN BE SEQUENTIALLY EXERCISED.
THE DIAGNOSTIC
MAKES ONE PASS BEFORE PROCEEDING TO THE NEXT DEVICE,
AQETEgNTINUES EXERCISING ALL DEVICES
H
.

IN THIS FASHION UNTIL

THE DU11 OFFLINE RECEIVER TESTS VERIFY THAT
CHIP/LOGIC WORKS PROPERLY

THE

RECEIVER

REQUIREMENTS

PDP=11 FAMILY STANDARD COMPUTER WITH OR WITHOUT HARDWARE
REGISTER (LOC. 177570)

DUT1

SYNCRONOUS/ISOCRONCUS OPTION

ONE CONSOLE

2.2

SWITCH

TELETYPE OR EQUIVALENT

STORAGE
THE PROGRAM LCADS AND RUNS

IN 8K OF MEMORY.

LOADING PROCEDURE
THE

STANDARD PROCEDURE

TO BE USED.

FOR LOADING ABSOLUTE BINARY

TAPES

STARTING ADDRESS
4K

FOR ABSOLUTE LOADER

8K
12K
16K
20K
24K
28k
6.
CPEPLE I

017500

037500
057500
077500
117500
137500
157500

STARTING PROCEDURE
L4443+ 4344444444444 4 4434434444444 04300043400
00

NOTE :

4 0034404009404 0 004444

BEFORE PROCEEDING IT IS IMPORTANT
TO REALIZF

ONE DOESNOT

HAVE THE DU11 SET UP TO THE
DEFAULT PARAMETER. ( SEE SECTION

8 OF THIS DOCUMENT)

, THEN ONE MUST

0ZDUB-C MACY11 30A(1052) 621§N0V-78
CZDUN1.HLO
20-NOV~78 1

15:36

PAGE 3

SEQ 0003

SET SWOO = 1, AND ANSWER THE PARAMETER

QUESTION ROUTINE.
LR

6.1

XIS R

YTV

TR IV PPN

CONTROL SWITCH SETTINGS

NOTE:

SOFTWARE SWITCH REGISTER IS DEFINED AS LOC. 176, WHILE
THE SOF TWARE DISPLAY REGISTER IS DEFINED AS LOC. 174.

4.1.1

AFTER PROGRAM LOAD (INITIAL PROGRAM START)
ALL CONSOLE SWITCHES DOWN

4.1.2

TO MODIFY DEVICE VECTOR AND CONTROL REGISTER ADDRESSES
AFTER PROGRAM RESTART OR TO RUN MULTIPLE DEVICES

SW00=1
4.1.3

TO START PROGRAM AT SELECTED TEST AFTER A PROGRAM RESTART
(ONLY IN SINGLE DEVICE TESTS)

SW01=1
4.1.6

7O LOCK ON SELECTED TEST AFTER A PROGRAM RESTART
(ONLY IN SINGLE DEVICE TESTS)

SW02=1

4.2

NOTE1: IN GENERAL
SWO1
NOTEZ2: WITHOUT SW01=1
STARTING ADDRESS

WILL BE USED WHEN SW02=1 [S USED
‘1OCK ON TEST'' WILL DEFAULT TO TEST 1

THE STARTING ADDRESS FOR ALL

TESTS

000200

THE RETARTING ADDRESS FOR ALL TESTS
IS
THE STARTING ADDRESS TO ENTER A SELECTED
THE STARTING ADDRESS TO LOCK ON TEST IS

6.3

PROGRAM AND/OR OPERATOR ACTION

4.3.1

INITIAL PROGRAM START

4.3.1.71

000200
TEST IS
000200

000200

LOAD PROGRAM INTO MEMORY WITH ABSOLUTE LOADER

4.3.1.2 LOAD ADDRESS 000200

4.3.1.3 CLEAR CONSOLE SWITCHES
4.3.1.4 PRESS START

4.3.1.5

THE PROGRAM WILL

NOTE:IF THE
WILL BE

TYPE ‘DU11

(ZDUB-D TAPE B'‘ (ONCE ONLY)

SOF TWARE SWITCH REGISTER IS S C.ECTED
C
THEN THE
TYPED AFTER THE PROGRAM IDENTIF] ES I ITSELF:

FOLLOWING

DZOUB-C MACY11_30A(1052)
21-NOV-78
CZDUTT.HLO
20-NOV~78 16:48
SWR=XXXXXX NEW=

15:36

PAGE 4

SEQ 0004

(REFER TO SECTION 5.

FOR OPERATOR'S OPTION)

«.3.1.7 THE PROGRAM WILL TYPE 'R’* TO INDICATE
TO START

4.3.2

,AND

THEN TESTING WILL BEGIN

THAT

IT IS ABOUT

PROGRAM RESTART WITH ALL SWITCHES DOWN
4.3.2.1

4.3.3

TESTING

THE PROGRAM WILL TYPE ‘R'' AND WILL COMMENCE

TESTING

PROGRAM RESTART WITH SW00=1

4.3.3.1

LOAD ADDRESS

000200

6.3.3.2 SET SW00=1
4.3.3.3 PRESS START
NOTE:IF

THE SOFTWARE

SWITCH REGISTER IS SELECTED THEN THE FOLLOWING

SURSXKKK NEW= | (REFER 10 SECTION 5. FOR OPERATOR'S OPTION)

4.3.3.4 THE PROGRAM WILL TYPE '* 1ST DEVICE: RECEIVER CONTRCL REGISTER
ADDRESS'® AND WAIT FOR AN INPUT FROM THE TELETYPE KEYBOARD
4.3.3.5 TYPE

IN THE ADDRESS OF

THE FIRST RECEIVER CONTROL

TESTED

I7 AN INCORRECT ADDRESS IS TYPED ,THE PROGRAM WILL
AND WILL THEN REPEAT THE MESSAGE OF 4.3.3.4

TYPE """’

4.3.3.6 THE PROGRAM WILL TYPE ‘VECTOR ADDURESS-'' AND WAIT FOR AN
INPUT FROM THE

TELETYPE KEYBOARD

4.3.3.7 TYPE IN THE BASE RECEIVER INTERRUPT VECTOR ADDRESS
FOR THE DU11 TO BE TESTED FOLLOWED BY A <CARRIAGE RETURN>

IF AN INCORRECT ADDRESS IS TYPED

AND WILI

,THE PROGRAM WILL

THEN REPEAT THE MESSAGE OF 4.3.3.6

TYPE '*2**

4£.3.3.8 THE PROGRAM WILL TYPE ''ARE YOU RUNNING MULTIPLE DEVICES ?''
(Y OR N)='' AND WAIT FOR AN INPUT FROM THE TELETYPE KEYBOARD
4.3.3.9 TYPE

IN THE APPROPRIATE ANSWER

<CARRIAGE

RETURN>

[F AN INCORRECT ANSWER IS GIVEN,

AND WILL

THEN REPEAT

YES OR NO FOLLOWED BY A

THE PROGRAM WILL

THE MESSAGE OF

4.3.3.8

IF A "NO'' ANSWER IS GIVEN: JUMP TO SECTION
4.
If A "YES'" ANSWER IS GIVEN:THE NE.TM QUESTION

TYPE

'7"

DZOUB~C MACY11

CZDUNT . HLO

_30A(1052)

27-NOV-78

20~NOV-78 16:48

15:36

PAGE
5

SEQ 0005

4.3.3.10

THE PROGRAM WILL TYPE 'LAST DEVICE:RECEIVER CONTROL
REGISTER ADDRESS-'' AND WAIT FOR AN INPUT FROM THE TELETYPE KEYBOARD

¢.3.3.1

TYPE IN THE ADDRESS OF THE LAST RECEIVER CONTROL REGISTER
ADDRESS OF THE DU11 TO BE TESTED FOLLOWED BY A <CARRIAGE RETURN>

If AN INCORRECT ANSWER IS TYPED ,THE PROGRAM WILL TYPE ***'
AND WILL THEN REPEAT THE MESSAGE OF 4.3.3.10
NOTE :ALL ADDRESSES SHALL BE CONTIGUOUS
4.3.3.17 1

iF AN "OUT OF RANGE'' ADDRESS IS TYPED

IE. MORE THAN 16 (10)

DEVICES AWAY

(UPWARDS)..... THE

PROGRAM WILL TYPE 'OUT OF RANGE:RETYPE LAST DEVICE RXCSR ADDRESS-''
AND WAIT FOR AN INPUT FROM THE TELETYPE KEYBOARD

6¢.3.3.11.2

TYPE IN "HE ADDRESS OF THE LAST RECEIVER CONTROL

TO BE

TESTED FOLLOWED

IF AN INCORRECT ANSWER IS TYPED ,THE PROGRAM WILL
AND WILL REPEAT THE MESSAGE OF 4.3.3.11.1

TYPE ‘"'

If A DEVICE ADDRESS LOWER THAN 1ST DEVICE ADDRESS IS TYPED...........
«...SCHOOLS QUT......... THERE IS NO PROTECTION FOR THIS.

THE PROGRAM WILL DEFAULT TO TWO DEVICES ACTIVE (UPWARDS FROM
1ST DEVICE ADDRESS).THE SAME APPLIES TO IDENTICAL ADDRESSES
TYPED FOR FIRST AND LAST DEVICE.

OBSERVE LOCATION @ ACTREG:

SEE SECTION 7.2

4.3.3.12

THE PROGRAM WILL TYPE 'DU PRIORITY LEVEL-'' AND
WAIT FOR AN INPUT FROM THE TELETYPE KEYBOARD

4.3.3.1

TYPE IN THE APPROPRIATE DEVICE PRIORITY LEVEL OF THE
DU11 OR DUI1'S TO BE TESTED FOLLOWED BY A <CARRIAGE RFTURN>
(ENSEE)TMTIIE\LL !‘S‘ULTIPLE DEVICES MUST BE AT THE

AND
6.3.3.14

6.3.3.15

[

AN INCORRECT LEVEL

TYPED

SAME PRIORITY

,THE PROGRAM WILL

REPEAT THE MESSAGE OF 4.3.5.12

321\7581\58

TYPE

THE PROGRAM WILL TYPE '# OF SYNC (HARS
(1 OR 2)=-'' AND WAIT FOR AN INPUT FROM THE

'***

TELETYPE

TYPE IN THE APPROPRIATE ANSWER '"1°' OR '2'' FOLLOWED
gg ?HEC/S\RNF:é»;\GE RETURN>. (NOTE :ALL MULTIPLE DFVICES MUST

AN INCORRECT ANSWER IS TYPED

AND WILL REPEAT

THE MESSAGE OF

,THE PROGRAM WlL.

4.2.3.14

TYPE "'

OZDUB~C MACY11_30A(1052)
21-NOV-78
CZDUTT.HLO
20-NOV-78 16:48

6£.3.3.16

15:36

PAGE 6

SEQ 0006

THE PROGRAM WILL TYPE '' IS SEC XMIT JUMPER #6 IN ? (Y OR N)="'

AND WAIT FOR AN INPUT FROM THE

¢.3.3.17

TYPE

TELETYPE KEYBOARD

IN THE APPROPRIATE ANSWER YES OR NO FOLLOWED

BY A <CARRIAGE RETURN>.(NOTE
MUST BE THE SAME)

THAT ALL MULTIPLE DEVICES

IF AN INCORRECT ANSWER IS TYPED ,THE PROGRAM WILL
END wilLL REPEAT THE MESSAGE OF 4.3.3.16

6£.3.3.18

THE PROGRAM WILL TYPE ‘IS SEC REC JUMPER # 5 IN ?

(Y OR N)="" AND WAIT FOR AN INPUT FROM THE

4£.3.3.79

TELETYPE KEYBQOARD

TYPE IN THE APPROPRIATE ANSWER YES OR NO FOLLOWED

BY A <CARRIAGE RETURN>.

(NOTE:

ALL MULTIPLE DEVICES MUST BE

IF AN INCORRECT ANSWER IS TYPED ,THE PROGRAM WILL
AND WILL REPEAT THE MESSAGE OF 4.3.3.18
4.3.3.20

4.3.3.2

# &

IN?

¢«.3.3.23

TYPE

(NOTE:

ALL MULTIPLE DEVICES MUST BE
TYPE

SAME)

'7'*

THE PROGRAM WILL TYPE “'ARE YOU RUNNING IN MAINT,

TYPE IN THE APPROPRIATE ANSWER YES OR NO FOLLOWED BY

A <CARRIAGE

RETURN>.

(NOTE:

ALL MULTIPLE

AN INCORRECT ANSWER IS TYPED
REPEAT

THE MESSAGE OF

DEVICES MUST BE

,THE PROGRAM WilLL
4.3.3.22

THE PROGRAM WILL TYPE 'R'' TO INDICATE
HAS STARTED AND WILL COMMENCE TESTING AT TEST

THAT
1

THIS WILL ONLY WORK WHEN A SINGLS DEVICE

1S SELECTED

...1T WILL NOT WORK IF MULTIPLE DEVICES ARL SELECTED

IF MULTIPLE PEVICES WERE PREVIOUSLY SELECTED,LOAD 000200,
2?2 EE%E%T SWO0=1 AND ANSWER "NO'* TO THE MULTIPLE DEVICE QUESTION

¢.3.4.7 L0AD 000200

THE

TYPE ''2**

PROGRAM RESTART WITH SW01=1

NOTE:

THE

MODE EXTERNAL ? AND ...... DO YOU HAVE THE EXTERNAL MODEM
BYPASS JUMPER CONNECTOR ON ? (Y OR N)-'' AND WAIT FOR AN
INPUT FROM THE TELETYPE KEYBOARD

6.%.4

TYPE '%*'

IN THE APPROPRIATE ANSWER YES OR NO FOLLOWED

BY A <(ARRIAGt RETURN>.

AND WILL

4.3.3.24

THE SAME)

THE PROGRAM WILL TYPE ''IS OPT CLR ENABLE JUMPER
(Y OR N)="" AND WAIT FOR AN INPUT FROM THE TELETYPE KEYBOARD

IF AN INCORRECT ANSWER IS TYPED ,THE PROGRAM WIL.
AND WILL REPEAT THE MESSAGE OfF 4.3.3.20

4£.3.3.22

TYPE '7*'

SAME)

OZ0UB~C MACY11 30A{105¢)
21-NOV-78
CZDUTT . HLO
20-NOV~78 16:48

15:3¢

PAGE

SEQ 0007

4.3.4.2 SET SWO1=1
4.3.6.3 PRESS START
NGTE:1F THE SOF TWARE SWITCH REGISTER IS SELEC TED THEN THE FOLLOWING
WILL BE TYPED AFTER THE PROGRAM IDENTIFIES ITSELF:
SWR=XXXXXX NEW=
(REFER TO SECTION 5. FOR OPERATOR'S OPTION)

4£.3.4.4

THE PROGRAM WILL TYPE “TEST PC-"" AND WAIT FOR AN INPUT

FROM

TYPE

THE

¢.3.4.5

TELETYPE KEYBOARD

IN THE ADDRESS OF

THE

TEST AT WHICH THE PROGRAM

STARTED FOLLOWED BY A <CARRIAGE RETURN>

4.3.4.6 THE PROGRAM WILL
TESTING AT

NOTE:

THE

TYPE 'R’ TO INDICATE

SELECTED

CARE MUST BE

TEST

THAT

TAKEN WHEN THIS FEATURE

IT tHAS STARTED

IS USED

.SINCE THERE IS NO PROTECTION AGAINST SELECTING AN ADDRESS

THAT

4£.3.5

IN THE MIDDLE

PROGRAM RESTART WITH SW02

NOTE:

TEST

THIS wil. ONLY WORK WHEN A SINGLE DEVICE

SEE NOTE

4.3.5.1

IN 4.3.4 FOR MORE DETAILS

IS SELECTED

LOAD ADDRESS 000200

4.3.5.2 SET SW02 -1
NOTE: IT MAY BE ADVANTAGEOUS

TO SET SWO1-1

(OPTIONAL)

4.3.5.3 PRESS START
NOTE :I1F THE SOF TWARE SWITCH REGISTER IS SELECTED THEN THE FOLLOWING
WILL BE TYPED AFTER THE PROGRAM IDENTIFIES ITSELF:
SWR=XXXXXX NEwW=
(REFER TO SECTION 5. FOR OPERATOR'S OPTION)
4.3.5.4

THE PROGRAM WILL TYPE ‘10CK ON SELECTED TEST ? (Y OR N)-"'
AND WAIT FOR AN INPUT FROM THE TELETYPE KEYBOARD

4.3.5.5 TYPE

IN THE APPROPRIATE ANSWER YES OR NO FOLLOWED BY A

<CARRJAGE

RETURN>

IF A NO ANSWER IS GIVEN:

AND THE PROGRAM WILL
TESTING AT TEST 1

TYPE

THIS LOCK ON TEST WILL BE
'R'' TO INDICATE

THAT

IGNORED

[T HAS

STARTED

4.3.5.6 IF A YES ANSWER WAS GIVEN:THE PROGRAM WILL ACT AS FOLLOWS...
THE PROGRAM WILL TYPE 'R'' TO INDICATE THAT IT HAS STARTED
TESTING AT TEST 1 AND WILL REMAIN IN TEST 1 UNTIL HALTED

IF ANY " 7Y IS STRUCK ON THE TELETYPF ,THE PROGRAM

WILL FREEZE Oi- "4 NEXT TEST UNTIL A KEY IS STRUCK ON
THE TELETYPE A “ 50 FORTH THRU THE PROGRAM. IF SW01 =1
[T
WILL PERFORM AS (N SECTION 4.3.4
ALLOWING ONE TO FREEZE

ON A SELECTED TEST RATHER THAN DEFAULTING TO TEST

0Z0UB-C MACY11 30A(1052)
21-NOv-78
CZDUIT .0
20-NOV~78 16:48
6.4

15:36

PAGE 8

SEQ 0008

STATUS MAP

THE STATUS MAP |S AN AREA OF THE DU11
WHICH WILL ALLOW
THE TRANSFER OF PARAMETERS

YOU WISH TO TEST

A DUI1

DIAGNOSTICS,
BETWEEN DIAGNOSTICS.

, WHICH IS NOT AT THE DEFAULT

VALUES ,YOU NEED ONLY GO THROUGH THE
AND ANSWERING ROUTINE ONCE.

TEDIOUS QUESTIONING

THE FOLLOWING COMBINATIONS OF
AcLOW YOU ACCESS TO THE STATUS MAP.

SWITCH REGISTER SETTINGS WILL

Sw07=1

START AT 200

NOTE :

THE DIAGNOSTIC WILL

AND BYPASS ALL OF

IT IS

GO TO THE STATUS MAP

THE QUESTIONING ROUTINE.

EXTREMELY IMPORTANT THAT EITHER YOU HAVE

JUST ANSWERED THESE QUESTIONS DURING A PRIOR
DIAGNOSTI(
OR THAT YOU HAVE MANUALLY ENTERED THE CORRECT VALUES

FOR VECTOR ADDRESSES ETC.,IN THE AREA DESIGNATED
FOR THE STATUS MAP. IT IS IMPORTANT THAT
THIS
B8E PERFORMED

BEFORE

STARTING AT 200.

THE DIAGNOSTIC HAS NO METHOD
TO DETERMINE
THAT THE STATUS MAP HAS INDEED
BEEN LOADED CORRECTLY.
THE DIAGNOSTIC ASSUMES THAT WHEN SWO7=1 THE VALUES IN
THE STATUS MAP ARE THE VALUES TO BE USED .
THESE VALUES CAN BE THE WRONG VALUES
, BUT THE
DIAGNOSTIC WILL NOT REALIZE THAT A MISTAKE HAS BEEN MADE.

IF BOTH SWO7 AND SWOO {SWITCH REGISTER SWITCHES)

ARE SET

,(EQUAL

TO 1),

THE PROGRAM WILL

IGNORE

SW0O AND

SEEING SWO7 SET,
THE VALUES FROM THE STATUS MAP WILL BE
USED. TO USE THE DEFAULT VALUES FOR THE DU11°'S
THE OPERATOR MUST SET SW00=0 AND SW07=0.

IS EXPLAINED IN GREATER DETAIL
OF THIS DOCUMENT.

IN SECTION

THE USE OF

4.3

THE FIRST TIME A PROGRAM IS LOADED OR THE FIRST TIME
A PROGRAM IS ALTERED VIA THE PARAMETER RESELECTION QUESTION

AND ANSWER ROUTINE,
A PARTIAL STATUS MAP WILL BE PRINTED.
THIS MAP WILL BE PRINTED ONCE FOR ANY COMBINATION OF SWITCHES

EXCEPT SWO1. RESTARTING THE PROGRAM WILLNOT PRINT QUT A

MAP UNLESS

THE PROGRAM PARAMETERS ARE BEING RESELECTED

BY PUTTING SWOO0=1.(ON)

THE MAP WILL

STATUS MAP

1300/ 177777

LOCK LIKE:

Sw00

DZDUB-C MACY11_30A(1052)
21-NOV-78
CZDUTT.H
O
20~NOV-78 16:48

15:36

PAGE 9

SEQ 0009

1302/ 000000

13047 V77777
THE BYTES ARE DEFINED AS FOLLCWS:

1300

THE NUMBER OF SYNCHRONOUS CHARACTERS REQUIRED FOR

SYNCHRONIZATION.
SEC
TRANSMIT JUMPER
SEC RECEIVER JUMPER
OPTIONAL JUMPER

1301
1302
1303

1304

MULTIPLE DEVICES (NO=0 , YES=

1305

AND

EXTERNAL MODEM BYPASS?

THE BYTE

IS O ,

IS 377 ETC.

(NO=0

,YES=

THE JUMPER IS NOT CONNECTED

THE JUMPER SHOULD BE CONNECTED.

OPERATINC PROCEDURE

THE DIAGNOSTIC IS RUN ON A CPU WITHOUT A SWITCH

REGISTER THEN A SOF TWARE SWITCH REGISTER IS USED WHICH ALLOWS
THE USER THE SAME SWITCH OPTIONS AS THE HARDWARE SWITCH REGISTER.

IF THE HARDWARE SWITCH REGISTER DOES NOT EXIST OR IF ONE DOES
AND IT CONTAINS ALL ONES (177777) THEN THE SOF TWARE SWITCH
REGISTER (LOC. 176) IS USED.
:
CONTROL
THIS PROGRAM ALSQ SUPPORTS

THE DYNAMIC LOADING OF

TYPE CONTROL G <“G>;

TTY.

THE

SOF TWARE

THIS CAN BE ACCOMPLISHED BY

THIS WILL ALLOW THE

SWITCH

TTY TO ENTER DATA INTO

LOC. 176 AT SELECTED POINTS WITHIN THE PROGRAM.
2) THE MACHINE WILL THEN TYPE: SWR=XXXXXXNEW= (XXXXXX IS THE OCTAL CONTENTS
OF

THE SOFTWARE

3) AFTER THE
OF

5. 1

THE

SWITCH REGISTER.)

"°'NEW='' HAS BEEN TYPED THEN THE OPERATOR CAN DO ONE

FOLLOWING AT

THE

TTY:

TYPE A NUMBER TO BE LOADED INTO LOC. 176 FOLLOWED BY A <(CR>.
(ONLY NUMBERS BETWEEN O-7 WILL BE ACCEPTED AND ONLY 6 NUMBERS
WILL BE ALLOWED)
IF A <CR> IS THE FIRST KEY DEPRESSED THE SOF TWARE SWITCH
REGISTER CONTENTS WILL NCT BE (HANGED.

IF A CONTROL U <*U> IS DEPRESSED THEN THE PROGRAM WILL SEND YOU
BACK TO STEP 2.

OPERATIONAL

SW15 =1
SWi4
1
Swi3
1
Sw11 =1
SW10
1

SwiTCH SETTINGS

HALT ON ERROR
LOOP ON CURRENT TEST
INHIBIT ERROR TYPEOUT
INHIBIT ITERATIONS
ESCAPE TO NEXT TEST ON ERROR

0ZDUB-C MACY11_30A(1052) 622§N0V-78
CZDUT1.HLO
20-NOv~78
Swo8
SwQ7
Sw02
Sw01
Sw00

=1
=1
=1
=1
=1

15:36

PAGE 10

SEQ 0010

LOOP ON ERROR
USE STATUS MAP PARAMETERS
LOCK ON TEST
RESTART PROGRAM AT SELECTED TEST
RESELECT VECTOR AND CONTROL REGISTER ADRESSES
SPARAMETERS AFTER A PROGRAM RESTART

TO INHIBIT "END OF

PASS’'’' TYPEOUT - TURN TELETYPE OFF

ERRORS
ERROR HALTS
THERE

ARE

NOTE:

THE
THE

FOUR DISTINCT

THE SOFTWARE

THE OPERATOR

TYPEOUTS

SWITCH REGISTER IS TO BE CHANGED AFTER A HALT

IS REQUIRED TO TYPE A <G> BEFORE

FOLLOWING WILL BE

SWR=XXXXXX

ERROR

NEW-

TYPED:

(REFER TO SECTION 5.

PC+2 = ERROR P(
WHERE PC +2 IS THE ADDRESS OF

REFER TO THE ABOVE

THE

CALL

DEPRESSING CONTINUE.

FOR OPERATOR OPTION)
TO THE ERROR HANDLER +2

'HLT''
IN DIAGNOSTIC FOR ERROR DESCRIPTION

CHECK ADDRESS @ RXCSR:

TO LOCATE

THE DEVICE PRESENTLY UNDER

TEST WHEN RUNNING MULTIPLE DEVICES

PC +2 = REGISTER ERROR P(
REGISTER

EXPECTED

16XXXX

16XXXX IS THE ADDRESS OF

WHERE

YYYYYY

THE FAILING DEVICE REGISTER

THE EXPECTED CONTENTS OF

1S THE ACTUAL

CONTENTS OF

PC +2 = RECEIVER ERROR PC

EXPECTED
YYYYYY

THAT REGISTER

ACTUAL
172111

WHERE

16XXXX IS THE ADDRESS OF

WHERE

YYYYYY IS THE EXPECTED DATA (ONTENTS OF

WHERE 7222177

6.1.4

2221127

WHERE

WHERE 727777

6.1.3

ACTUAL

YYYYYY

THE FAILING RECEIVER

1S THE ACTUAL DATA CONTENTS OF

(RXDBUF)

THAT REGISTER

PC +2 = TRANSMITTER SRROR P(
REGISTER
EXPECTED
16XXXX
YYYYYY

ACTUAL
122111

WHERE

16XXXX IS THE ADDRESS OF

THE FAILING TRANSMITTER (TXCSR)

WHERE

YYYYYY

THE EXPECTED CONTENTS OF

WHERE

777711

THE ACTUAL

CONTENTS OF

THAT REGISTER

ThAT REGISTER

0ZDUB-" MACY11 30A(1052) 6ZZENOV-78
CZDUT1.HLO
20-NOV-78 1

15:36

PAGE 11

SEQ 0011

6.1.5

ERROR DESCRIPTIONS
SEE LISTINGS FOR DETAILS OF ERRORS

6.2

ERROR RECOVERY

6.2.1

Sw15 =0
[F THE PROGRAM IS RUN WITH SW15 =0 ,NO OPERATOR ACTION IS

REQUIRED

6.2.2

TO CONTINUE

TESTING

SWi15 =1
[F THE PRCGRAM IS RUN WITH SW15 =1

AFTER THE PROGRAM HAS HALTED

CONSOLE "‘CONTINUE SWITCH''

NOTE:

6.2.3

THE PC + 2 OF

,PRESS

_TO CONTINUE TESTING
THE PROCESSOR

THE "HLT'' WILL BE DISPLAYED

IN THE DATA LIGHTS

ILLEGAL INTERRUPTS
IF AN INTERRUPT OCCURS TO A VECTOR ADDRESS NOT SELECTED
DURING PROGRAM INITIALIZATION, THE PROGRAM WILL HALT IN
THE

TRAPCAT(CHER.

THE ADDRESS AT WHICH THE PROGRAM

HALTS IS 2 GREATER THAN THE ADDRESS TO WHIZH THE INTERRUPT
OCCURED. THE PROGRAM MUST BE RESTARTED AT 000200 TO

RECOVER FROM THIS ERROR.

6.2.4

ADDITIONAL TROUBLESHOOTING AIDS
ERRCNT: & PAS(NT:
CHECK THESE TWO TAG LOCATIONS FOR TOTAL # OF ERRORS AND PASSES RESPECTIVELY.
LOADING 000200 AND RESTARTING WILL CLEAR THESE LOCATIONS.

6.3

END OF PASS ROUTINE
THIS TYPEQUT IS MENTIONED HERE
IT IS IN THE FORM:
END OF PASS TAPE
16XXXX = DEVICE
WHERE

WHERE

16XXXX

TO INHIBIT

THE

FOR CONVENIENCE

TAPE LOADED

IS THE DEVICE'S BASE REGISTER ADDRESS

THIS

TYPEOUT -

TURN

TELETYPE OFF

RESTRICTIONS

MULTIPLE DEVICES
UP TO 16(10) DEVICES MAY BE TESTED. HOWEVER,
MUST HAVE CONTIGUOUS ADDRESSES AND VECTORS
NOTE: IF ALL DEVICES UNDER TEST HAVE THE SAME
YOU CAN CHANGE 'ZERO:
ADD
#10,BASEIV

(VECTORS)'' TO "ZERO:

ADD

#0,BASEIV"

THEY
INTERRUPT VECTOR
JNEXT BLOCK

THEREBY THE VECTOR ADDRESSES WILL NOT BE

UPDATED AFTER EACH PASS.
7.2

DISQUALIFYING DEVICES WHEN RUNNING MULTIFPLS DEVICES

0ZDUB~C MACY11

CZDUTIT.HLO

30A(1052)

21-NOV-78

15:36

20-NOV~-78 16:48

PAGE 12

SEQ 0012

WHEN RUNNING MULTIPLE DEVICES
AN ACTIVE BIT IS SET
FOR EACH DEVICE RUNNING UNDER TEST
IE. BIT O FOR

DEVICE O

,BIT 15 FOR DEVICE 15

TO DISQUALIFY DEVICES:

7.2.1

7.2.c

IfF

DEVICE O IS TO BE DISQUALIFIED

PROGRAM WITH SWOO =1

IF HOWEVER, DEVICES 1

ARE

,SIMPLY RESTART

AND OMIT THE FIRST DEVICE.

THRU 15 OR ANY COMBINATION THEREOF

TO BE DISQUALIFIED....LOAD THE LOCATION OF ACTREG:

OBSERVE THE ACTIVE BITS (ACTIVE =1, NONACTIVE = 0)
AND DEPOSIT O WHERE THOSE DEVICES ARE TO BE DISQUALIFIED
7.2.2.1

TO RESTART...LOAD 000200 IN SWR AND DEPRESS START....
THE PROGRAM WILL

CONTINUE WITH THE DEVICE

IT WAS

IN BEFORE HALTING.

7.2.2.2 c...... OR ..... LOAD 000200 WITH SWOO =1 AND DEPRESS START....
ANSWER THE QUESTION :1ST DEVICE : ETC...........
....THE PROGRMM WILL CONTINUE WITH DEVICE O
7.2.2.3 1F ALL DEVICES ARt DISQUALIFIED BY MISTAKE
THE PROGRAM
WILL TYPEOUT
AN ERROR MESSAGE....... LOAD & START AT 0002C0

7.3
7.3.1

CABLE DELAYS
NOTE: EXTERNAL LOOP BACK TESTS ONLY

(MODEM CABLE WITH H315 CONNECTOR ON)

TO PROVIDE SUFFICIENT DELAY FOR CLOCK SIGNAL OVER THE CABLE,

LOCATION ‘HOLD:"* MUST BE MODIFIED TO ACCOMODATE FOR FASTER MACHINES.
ORESENTLY "HOLD:'* =20

IS SUFFICIENT TIME ON AN 11/20 MACHINE.

IF RUNNING ON AN 11/40 OR AN 11/45 “HOLD:'* MUST BE PATCHED TO 40

BASICALLY DON'T TRY TO EXCEED 10k TO 12k RATE USING THE EJA DRIVERS
7.4

TO USE

THE

°'XOR"’ TESTER

,THE BRANCH AROUND

CODE MJST BE PAT(HED TO A "NOP'',

THE

“XOR'‘

(SEE LISTINGS FOR DETAILS)

DEFAULT PARAMETERS:
1ST DEVICE:

RECEIVER CONTROL REGISTER ADDRESS- RXCSR:

VECTOR ADDRESSARE

YOU RUNNING MULTIPLE

DEVICES

?- NO

LAST DEVICE: RECEIVER CONTROL REGISTER ADDRESS-

DU PRIORITY LEVEL# OF

LEVEL

SYNC (HARS SELECTED -

IS SEC XMIT 'UMPER # 6 IN ?IS SEC REC JUMPER # 5

IS OPT CLR ENABLE

IN 7=

VES
YES

JUMPER & & N 2=

DURIV:

770

MULTD:

LASTADD:

DUPRT:

LEVEL S

SYI(NO:

377

SExm]T:

37/

SEREC:

377

YES OT(LR:

160040

377

DZ0UB=C MACY11 30A(1052)
21-NOV-78
CZDUTT1. MO
20-NOV~78 10:48
DO YOU HAVE

15:36

PAGE 13

THE EXTERNAL MODEM BYPASS JUWPER

CONNECTOR ON (H315)-

VES

1
SEQ 0013

JMRBY:

377

PROGRAM DESCRIPTION

9.°

THIS PROGRAM PERFORMS THE OFFLINE RECEIVER SECTION TESTING
OF THE DEVICE
SEE LISTING FOR DETAILS

10.

FLOW CHARTS: RECEIVER FLOW,TRANSMITTER FLOW,TRANSMITTER £ RECEIVER FLOW

LISTINGS

DZDOUB-C MACY11 30A(1052)
2] -NOV°78
CZDU11.PAR
21-NOV-78 15:1

674
675

000000* 000000G

15:36

PAGE 15

SEQ 0014

DZDUB-C MACY11_30A(1052)

15:36

PAGE 18

.ENABLE ABS

;DU11 DZDUB-C TAPE B
;COPYRIGHT 1973, DIGITAL EQUIPMENT CORP., MAYNARD, MASS. 01754
s STARTING PROCEDURE

;
PROGRAM
;LOAD

sPRESS START
;PROGRAM WILL TYPE 'DU11 DZDUB-C TAPE B ‘'

;PROGRAM WILL TYPE 'R'' TO INDICATE

=
e )

000010

706
707
708

000002
000001

Swo1=2
Sw00=1

000604

LINHIBIT ITERATIONS
LESCAPE TO NEXT TEST ON ERROR
.LOOP WITH CURRENT DATA
.LOOP ON ERROR

704

Sw06=100
SW05=40
SW04=20
Sw03=10

000040
000020

L HALT ON ERROR
.LOOP ON CURRENT TEST
LINHIBIT ERROR TYPEOUT

Sw15=100000
SW14=40000
SW13=20000
SW12=10000
SW11=4000
SW10=2000

100000
040000
020000
010000
004000
002000
001000
000400

;SWITCH REGISTER OPTIONS

000200
000100

705

THAT TESTING HAS STARTED

;AT THE END OF A PASS, PROGRAM WILL TYPE 'END OF PASS TAPE B''
;AND THEN RESUME TESTING

700
701

702
703

SEQ 0015

Hnnn

676
677
678
679
680
681
682
683
684
685
686
687
688
689
690
691
692
693
694
695
696
697
698
699

_21-NOV-78

31-0CT-78 13:59

—

CZDUBD .P11

SW02=4

=1, USE STATUS MAP

;LOCK ON TEST SELECT
JRESTART PROGRAM AT SELECTED TEST
JRESELECT VECTOR AND CONTROL REGISTER
;ADDRESS AFTER PROGRAM RESTART

DZDUB-C MACY11_30A(1052)
21-NOV-78
CZouBD.P11
31-0C7-78 13:59

15:36

PAGE 19

SEQ 0016

sREGISTER DEF INITIONS
RO=X0
R1=X1

;GENERAL REGISTER
;GENERAL REGISTER

R2=%2
R3=%3

sGENERAL REGISTER
+GENERAL REGISTER

R4=24

;GENERAL REGISTER

R5=%5
SP=26

sGENERAL REGISTER
sPROCESSOR STACK POINTER

PC=X7

;PROGRAM COUNTER

;LOCATION EQUIVALENCIES
177570
177570
177776

001700

DSWR=177570
DLIGHTS=177570

PS=177776
STACK=1100

sHARDWARE SWITCH REGISTER LOC.
;HARDWARE DISPLAY REGISTER LOC.

;PROCESSOR STATUS WORD
sSTART OF PROCESSOR STACK

. INSTRUCTION DEF INITIONS
005746
005726
010046
012600
024646
022626

100000
040000
020000
010000
00400C
002000
001009
000400
000200
000100
000040
000020
000010
000004
000002
000001

PUSH1SP=5746

POP1SP=5726
PUSHRO=10046
POPRO=12600
PUSH2SP=24646
POP2SP=22626
LEQUIV
EMT,HLT

sDECREMENT PROCESSOR STACK ! WORD =TST -(SP)

s INCREMENT PROCESSOR STACK 1 WORD =TST (SP)+
;SAVE RO ON STACK =MOV RO,-(SP)
;RESTORE RO FROM STACK =MOV (SP)+,R0
;DECREMENT STACK TWICE =CMP -(SP),-(SP)
s INCREMENT STACK TWICE =CMP (SP)+,(SP)+
;BASIC DEFINITION OF ERROR CALL

10000

BIT11=4000
B1710=2000
BIT9=1000
BI78=400
BI77=200

BIT76=100

BIT5=40
BIT4=20
BIT3=10
BIT2=4
BIT1=2
BIT0=1

;PROCESSER LEVELS
LEVEL7=340
LEVEL6=300
LEVEL5=240
LEVEL4=200
LEVEL3=140
LEVEL2=100
LEVEL1=040
LEVELO=000

’

DZDUB-C MACY11_30A(1052)
_21-NOV-78
CZouBD.P11
31-0C7-78 13:59

766
767
768
769
770
m
772
773
774
775

776
77
778

779

780
781
782
783

784

15:36

PAGE 20

SEQ 0017

sREGISTER DEF INITIONS
100000
040000
020000
010000
004000
002000
001000
0004
000200
000100
000040
000020
000010
000004
000002
000001

:RXCSR BIT DEFINITIONS

pSC=BIT1S

;DATA SET CHANGE

CTS=BIT13
CARDET=B]T12

:CLR TO SEND
:CARRIER DETECT

RING=BIT14

*RING

RECACT=BIT11

SREC ACTIVE

RXDONE=B]T7

*REC DONE

DSINTE=BITS
SYNSCH=B] T4
STD=8IT3

‘DSC INTR ENABLE
*SYNC SEARCH
:SEC XMIT DATA

SRD=8IT10
DSR=BIT9
STPSYN=BIT8

RINTEN=BIT6

RTS=BIT2
DTR=BIT1
VOID=BITO

:SEC REC DATA
:DATA SET RDY
:STRIP SYNC
*REC INTR ENABLE

*REQ TO SEND
:DATA TERM ]DY

sRXDBUF BIT DEF INITIONS

785
786
787
788
789
790
791
792
793

100000
040000
020000
010000

PARER=BIT12

SPARITY ERROR

001000
00040C

PAREN=B]T9
EVPAR=B] T8

;PARITY ENABLE
:EVEN PARITY SENSE

030000

SYNINT=30000

:SYNC EXTERNAL MODE

795
796

000000
000000

1SYMOD=0

*I1SOC MODE

SI1X=2000

SWORD LENGTH 6 BITS

794

797
798
799

300
801
802
803
804
805
806
807
808
809
810
811

8i2
813
814
815
816
817
818
819
820

020000

002000
004000
006000

000000
001000
001400

100000
040000
020
002000
000400
000200
000100
000040

RXERR=BIT15
OVRRUN=BIT14
FRMERR=BIT13

;REC ERROR
*OVERRUN
:FRAME ERROR

:PARCSR BIT DEFINITIONS
-PARCSR WRD DEF INITIONS

SYNEXT=20000

FIVE=0

SSYNC INTERNAL MODE

SWORD LENGTH S BITS

SEVEN=4000

:WORD LENGTH 7 BITS

E IGHT=6000
NOPAR=(
ODDPAR=1000
EVEPAR=1400

*WORD LENGTH 8 BITS
*NO PARITY
:0DD PARITY
*EVEN PARITY

DNA=B]T1§

:DATA NOT AVAILABLE

CLK=BIT13
BITW=BIT10
MRESET=BIT8

S CLK
‘BIT WINDOW
*MASTER RESET

-TXCSR BIT DEFINITIONS

MTDATA=BIT14

TXDONE=B]T7
TXINTE=BIT6

DNAINTE=RITS

SEND=B] T4

*MAINT DATA

SXMIT DONE
*XMIT INTR ENABLE

:DNA INTR ENAB

: SEND

000020
000010
000001

HDXEN=RIT3
BREAK=B] T0

*HDX/F
DX
:BREAK

000000
004000
010000
014000

USER=0
MINT=4000
MEXT=10000
SYSTST=14000

;USER MODE
*MAINT INT MODE
*MAINT EXT MODE
*SYSTEM TEST MODE

;TXCSR WRD DEF INITIONS

;TRAPCAT(r
ER FOR

ILLEGAL

INTERRUPTS

0ZDUB-C MACY11_30A(1052)
21-NOV-78
CZouBD.P11
31-0CT1-78 13:59

15:36

PAGE 21

SEQ 0018

s STANDARD INTERRUPT VECTORS

873
874
875
876

000024
016104
000340
015634
000340
015602
000340

.24

;POWER FAIL HANDLER

LPFAIL

;SERVICE AT LEVEL 7
;ERROR HANDLER
JSERVICE AT LEVEL 7
:GENERAL HANDLER DJSPAT(CH SERVICE
;SERVICE AT LEVEL 7

340

LHLT

340

. TRPSRV

340

;SOFTWARE SWITCH REGISTER
000174
000176
000200

000174
000000
000000
000167

001100

=174
¢

001214

DISPREG: .WORD 0
SWREG:
.WORD 0
JMP

.START

;SOFTWARE DISPLAY REG.
;SOFTWARE SWITCH REGISTER
;GO TO START OF PROGRAM

.~1100

INDIRECT POINTERS
001100
001102
001104

177570
177570
177560

001112

177566

001106
001110

177562
177564

SWR:
177570
LIGHTS:177570
TKCSR:

TKDBR:

TPCSR:
TPDBR:

177560

177562

177564
177566

sSWITCH REGISTER POINTER
;DISPLAY REGISTER POINTER

sTELETYPE KEYBOARD CONTROL REGISTER
;TELETYPE KEYBOARD DATA BUFFER

sTELEPRINTER CONTROL REGISTER

;TELEPRINTER DATA BUFFER

:PROGRAM CONTROL PARAMETERS
001114
001116
001120
001122
001124
001126
001130
001132
001134

000000
000000
000000
000000
000000
000000

RTRN:
NEXT:

0
000000

ERRCNT:
LSTERR:

LOCK:
ICOUNT:
LPCNT:

TSTNO:
:
PASCNT

QOO0 OOOOO

839
840
841
842
843
844
845
846
847
848
849
850
851
852
853
854
855
856
857
858
859
860
861
862
863
864
865
866
867
868
869
870
871
872

000024
000026
000030
000032
000034
000036

:SCOPE ADDRESS FOR LOOP ON TEST
;ADDRESS OF NEXT TEST TO BE EXECUTED
sADDRESS FOR LOCK ON CURRENT DATA
;NUMBER OF ITERATIONS THAT CURRENT TEST WILL BE EXECUTED
JNUMBER OF ITEREATIONS COMPLETED
sNUMBER OF TEST IN PROGRESS
JNUMBER OF PASSES COMPLETED
;TOTAL NUMBER OF ERRORS
;PC OF LAST ERROR CALL

;PROGRAM VARJABLES
001136
001140
001142
001144
001146
001150
001152
001154
001156
001160
001162

000020
000000
000000
000000
000000
000000
002000
000000
000000
000000
000000

HOLD:
SHIFT:
:
COUNT
TEMP]:
TEMP?:
TEMP3:
:
TEMPS
TEMPS
:

SAVRO:
SAVR1:
SAVR?:

leolelololelolololole]

824
825
826
827
828
829
830
831
832
833
8 34
835
836
837

; TEMPORARY STORAGE=DELAY TIME FOR CABLES
; TEMPORARY STORAGE= # OF
s TEMPORARY STORAGE= # OF

; TEMPORARY STORAGE

; TEMPORARY STORALS

; TEMPORARY STORAGE
; TEMPORARY STORAGE

2RO STORAGE
;R1 STORAGE

;R2 STORAGE

SHIFTS PER (HAR
TIMES A (HAR WILL BE

SENT

001164
001166
001170
001172
001174

15:36

PAGE 22

SAVR3:

SAVRG:
SAVRS:
SAVSP:
SAVP(:

OOOOO

DZDUB-C MACY11_30A(1052)
_21-NOV-78
CZbuBD .P11
31-0C7-78 13:59

SEQ 0019
;R3 STORAGE

;R4 STORAGE
;RS STORAGE
s STACK POINTER STORAGE

sPROGRAM COUNTER STORAGE

DZDUB-C MACY11_30A(1052)
21-NOV-78
CZDUBD.P11
31-0CT~-78 13:59

882
883
884
885
886
887
8398
ggg
891
892

893
834
895
8%
897
898
899

300
901

914

PAGE 23

001176
001177
001200
001201
001202
001203

377
377
377
377
000
377

SYNCNO:
SEXMIT:
SEREC:
OPTCLR:
MULTD:
JMRBY:
.EVEN

001204
001206
001210
001212
001214
001216

000000
000000
000000
000000
000000
000000

BASEADD :
KEEPADD :
LASTADD:
BASE]V:
KEEP]V:
ACTREG:

001220

000000

ROTADD :

902

903
904
905
906
907
908
909
910
911
912
913

15:36

918
919
920

gg;

001222
001224
001226
001230
001232
001234
001236
001240
001242

000000
000000
000000
000000
000002
003006
000C00
003006
000000

001244
(001245
001246

001247

000
000
000

000

;PROGRAM MULTIPLE DEVICE PARAMETERS
0
;PROG CONTROLLED 1ST DEVICE ADDR

0
0
0
0
0

;SAVED 1ST DEVICE ADDR
cLAST DEVICE RXCSR ADDR
;PROG CONTROLLED IV
;SAVED INTR VECTOR
JACTIVE REGISTER ,,,MODIFY THIS
;LOCATION TO DISQUALIFY OR QUALIFY
;DEVICES

(1= RUN,,,0= DON'T RUN)

JROTATING POINTER FOR ACTREG..POINTS

;TO DEVICE PRESENTLY UNDER TEST WHEN RUNNING MULTIPLE DE

AN RNANRNRRARND

THESE ARE STORAGE FOR THE STATUS MAP PRINT OUT
FLAG:0
; FLAGS FOR STATUS MAP PRINT OUT (SSP)
HOLDO: O
; HOLDS
RO IN STATUS MAP PRINT
HOLD1:0
; R1 ETC.
COUNT1:0
; FOR COUNTING 3 WORDS
TABLE
: 2
; FOR CONVRT ROUTINE
3006
0
3006
0
IR

AR A RN AR RN

AN RN RN AN

INIFLG:
STFLG:
ERRFLG:
LOKFLG:

.BYTE
.BYTE
.BYTE

.BYTE

0
0
0

;PROGRAM INITIALIZATION FLAG
JTEST START FLAG
JERROR O(CCURED FLAG

;LOCK ON CURRENT TEST FLAG

.EVEN

925

IRRARR AN

001300
001301
001302
001303
001304
001305

001300
000001
000001
000001
000001
000001
002001

332
937

PARAMETERS
;A OF SYNC CHARS REQ'P FOR SYNC'ZATION
JSEC XMIT JUPER. "IN'
;SEC REC JUMPER °'IN
,
;JOPTIONAL JUMPER CLR "'IN'
:NO_MULTIPLE DEVICE FLAG
.
;EXTERNAL MODEM BYPASS JUMPER
''IN

;PROGRAM (ONTROL FLAGS

923
924
926
927
928
929
930
931
932
ggz

sPROGRAM CONVERSATIONAL
.BYTE
377
.BYTE
377
.BYTE
377
.BYTE
377
.BYTE
0
.BYTE
377

AR AR AN AN AN YA RANRV AN AN

915

SEQ 0020

.=1300
STATUS: NOSYN(C: .BLKB 1
MITSEX: .BLKB 1
RESEC: .BLKB i
C(LROPT: .BLKB 1
DMULT: .BLKB 1
BYJMR: .BLKB 1

; MULTIPLE
001306

000001

STATUS

MAP

ARRARNY

;SYN(C CHARS
JXMIT JUMPER
JREC SEC JUMPER
;OPTIONAL JUMPER
JMULTIPLE DEVICE FLAG
JEXTERNAL MODEM

DEVICE PARAMETERS

ADDBASE: .BLKW 1

JPROG CONTROLLED 1ST DEVICE ADDR

DZDUB-C MACY11_30A(1052)
21-NOV-~78
CcZousD.P11
31-0CT1-78 13:59

15:36

PAGE 24

SEQ 0021

sSAVED 1ST DEVICE ADDR
cLAST DEVICE RXCSR ADDR

ADDKEEP: .BLKW 1
ADDLAST: .BLKW 1
IVBASE: .BLKW 1
IVKEEP: .BLKW 1
REGACT: .BLKW 1
ADDROT: .BLKW 1

PRTDU
RIVDU
TIVDU:
TISDU:
RISDU:

BLKW
BLKW
.BLKW
.BLKW
.BLKW

cPROG CONTROLLED 1V

cSAVED INTR VECTOR
sACTIVE REGISTER

sROTATING POINTER

1
1
1
1
1

;DUTT
sDUT1
;DUTT
sDUIT
;DUTT

L1ESS: .BLKW 1
CSRRX: .BLKW 1
CSRHRX: .BLKW 1

BUFRXD: .BLKW 1
BUFHRXD: .BLKW 1
CSRPAR: .BLKW

CSRHPAR
: .BLKW
CSRTX: .BLkKW 1
CSRHTX: .BLKW 1
BUFTXD: .BLKW 1
BUFHTXD: .BLKW 1
BASEDU: .BLKW 1
.EVEN

PRIORITY
REC _INTR VECTOR
XMIT INTR VECTOR
XMIT INTR STATUS
REC_INTR STATUS

sPRIORITY TO ALLOW INTR

¢ DEFAULT OR ALTERED PARAMETERS

;DUT1 RXCSR BASE ADDR

;DEFINITIONS FOR TRAP SUBROUTINE CALLS

;POINTERS

TO SUBROUTINES CAN BE

FOUND

;IN THE TABLE IMMEDIATLY FOLLOWING THE DEFINITIONS

001366

.TRPTAB:
.'ttttt.ttttitt.t"fittt't'it"Qtt'tttfi"fitttfit‘.ttttQt.t.tttt.tittt.ttttt"i

"tttttttttitttttt*tttfittttittttitttttt.tttttttfitttttttttttttt.fit.t.tt'fi"t

.SCOPE

001370

104400
014366
104401
014552

C01372

014572

.TYPE

001366

104402

.SCOP1

001374

. INSTR

001376

. INSTER

001400

.PARAM

001402

. SAV05

001404

-RESO5

001406

. CONVRT

001410

.CNVRTY

001412

LSETFLG

001414

.(KSWR

SCOPE-TRAP+0

sCALL T0 SCOPE LOOP AND ITERATION HANDLER

SCOP1=TRAP+1

s CALL 10 LOOP ON CURRENT DATA HANDLER

TYPE=TRAP+?2

s CALL

10 TELETYPE OUTPUT ROUTINE

INSTR=TRAP+3

s CALL

T0 ASCII

INSTER=TRAP+4

s CALL

PARAM=TRAP+5

s CALL T0 NUMERICAL DATA INPUT ROUTINE

SAVO5-TRAP+6

s CALL TO REGISTER SAVE ROUTINE

RESOS-TRAP+7

s CALL T0 REGISTER RESTORE ROUTINE

CONVRT=TRAF+10

s CALL

10 DATA OUTPUT ROUT INE

CNVRT=TRAP+11

s CALL

T0 DATA OUTPUT ROUTINE WITHOUT

SETFLG-TRAP+1?2

s CALL

TO FLAG SET ROUTINE

(KSWR=TRA/"+13

s CALL

10 ALLOW SWREG

STRING

INPUT ROUTINE

INPUT ERROR HANDLER

TO BE

(R/LF

LOADED FROM

TTv

DZDUB-C MACY11_30A(1052)

21-NOV-~78
31-0C7-78 13:59

CcZouBD.P11

001416

104414
016324

PAGE 25

.CNTLU

D
d
d
b
d
d
d

012767

~
~
o

VO ~NOWNEBWN=O

005067
012767
012767
105767
001004
104402
105167
012767

000340

001100
016104
177460
177575
177454
177566
177446
177444
000001
001420

176350

.START:

#340,PS

AN ARARNR A ARSI AR AANAR

ARS

000024

#.PFAIL ,an26
LPCNT
STFLG
PASCNT

ERRFLG
ERRCNT
LSTERR

177430
177410

#1,TSTNO
#.START ,RTRN

177534
016424
177522
177570
177570
000002
00000
001566
177777

sLOCK OUT INTERRUPTS
;SET UP STACK
:SET UP POWER FAIL VECTOR
;CLEAR # OF ITERATION COMPLETED LOCATION
:CLEAR START FLAG
;CLEAR PASS COUNT
s CLEAR ERROR FLAG
;CLEAR ERROR COUNT
;CLEAR LAST ERROR POINTER
;SET UP FOR TEST 1
;SET UP FOR POWER FAIL BEFORE
sTESTING STARTS
JHAS INITIALIZATION BcEN PERFORMED

#STACK,SP

INIFLG

ONCE
JMTITLE

177350

177344

:
ONCE

177316

#DSWR
, SWR
#DLIGHTS LIGHTS

#64$,an4

;SET UP FOR TIMEOUT

#-1,3SWR

;REFERENCE HARDWARE

658"
66$

648

(SP)+, (SP)+

65%:

#SWREG, SWR
#D1SPREG,LIGHTS

66%:

(SP)+, a4,
(SP) +,a#6
w62
MAP

sADJUST STACK
;POINT TO SOF TWARE SWITCH REG
JPOINT TO SOFT DISPLAY REG

JRESTORE VECTORS

;IS SWREG USED
; BRANCH TO CHECK FOR STATUS MAP

MAP

SRR RN RN AR AR AR AR NN R RAR RN AR R RN

SWITCH REGISTER

JUNDER MONITOR

#SWREG, SWR

CNTLU

TITLE MESSAGE

;1F NOT SET FLAG AND DO
cRELOAD HARDWARE SWITCH REGISTER INTO POINTER
;RELOAD HARDWARE DISPLAY REGISTER INTO POINTER
;SAVE VECTORS

a6, ~(SP)
k. -(SP}

000004

1040

;TYPE

INIFLG

177250

O 00NN
NN =

AN AR AR NN RN AN AN R AR

OF SWREG FROM TTY

sLOCK OUT INTERRUPTS
;SET UP PROCESSOR STACK
;SET UP POWER FAIL VECTOR
;CLEAR PROGRAM CONTROL FLAGS AND COUNTS
sTYPE TITLE MESSAGE

177302
177276

RERRRRRRR

;CALL TO ALLOW LOADING

sPROGRAM INITIALIZATION

d
d
d o

CNTLU=TRAP+14

:ttt!'tttt.t..'t'.'t.t't"tt"ttttfl*tt'tttttttttttttttfitit*ttttttttttttttt

—ed

)
d wd
b
b cnd

— ed emd cned and e

—d

b wd wnd

olelolelelelelols
o]

SEQ 0022

T NRRR R AR R AN AN RN TR N AR AN

ge8RSS88SE

995
996
997
998

15:36

AR R AN AN

AN AARARNRN

R R AN R

; CODE FOR STATUS MAP
;

CODE ADDED FOR REV. E OF DIAGNOSTICS
.THEN YOU USE THE STATUS MAP PREVIOUSLY
SETUP, OR REENTER QUESTIONING ROUTINE

S IF Swo7= 1
;

032777
001537

000200

177236

8JT #SWO7, aSWR

BeQ $67
;

; 1S SW07=1?
IF NOT, GO TO TEST FOR SW00=1

;

NOW SET UP MAP VALUES FOR PROGRAM
THESE VALUES FROM THE STATUS MAP WILL BE USED

IN THE

DZDUB-C MACY11_30A(1052)
_21-NOV-78
CZDUBD.P11
31-0CT~-78 13:59

1050

15:36

1051

001644

116767 177430 177324

1053

001660

116767

1055
1056
1057
1058
1059
1060

001676
0017202
001710
001716
001726
001732

116767
116767
016767
016767
016767
016767

177404
177377
177372
177366
177362
177360

1
1
1

001746
001756
001762

016767
016767
016767

177350
177334
177220

1052

1056

1061
1

001652

001666

001740

001770

177317

MOVB MITSEX

116767

177411

177305

MOVB CLROPT

016767

177416

177354

177332

177312

MOVB DMULT
MOVB BYJMR
MOV ADDBASE
MOV ADDKEEP
MOV ADDLAST
MOV IVKEEP

-MULTD
- JMRBY
-BASEADD
-KEEPADD
.LASTADD
KEEPIV

177244
177230
177214

MOV ADDROT
MOV IVBASE,
MOV KEEPADD

ROTADD
BASEIV
, BASEADD

1084
1085
1086
1087
1088
1089

002142
002150
002152
002156
002162
002166

032777
001002
000167
005037
012700
012701

000001

176730

012702

010110
005011

1093

002202

060200

1095

002206

022701

1094

1096
1097
1098

002206

060201

002212
002214
002216

002771
104403
016500

1100
1101

002222
002224

160000
167776

1103
1104
1105

0022
002231
002232

1099

1102

002220

002226

MOV REGACT

016572

016566
016562
016556
016064
020110
016204
016474
016470
016464
016460
016454
016450
016444
016440
016434
016430

002172

MOV RIVDU,

: SEC REC JUMPER

"OPTCLR

SOPTTONAL JUMPER

:MULTIPLE DEVICE
*EXTERNAL MODEM
*PROG 1ST DEVICE ADDR
= SAVED 1ST DEVICE ADDR
> LAST DEVICE RXCSR ADDR
: SAVED INTR VECTOR

ACTREG

DURIV

MOV RISDU.
DURIS
MOV TIVDU,
DUTIV
MOV TISDU.
DUTIS
MOV L1ESS,
LESS1
MOV @#PRTDU,
@#DUPRT
MOV
BASEDU, DUBASE
MOV CSRRX,
RXCSR
MOV CSRHRX,
HRXCSR
MOV
BUFRXD, RXDBUF
MOV
BUFHRXD ,
MOV
CSRPAR,
MOV
CSRHPAR,
MOV
CSRTX,
TXCSR
MOV
CSRHTX,
MOV BUFTXD,
TXDBUF
MOV BUFHTXD,
HTXDBUF
JMP _BEGIN

000452

001222
000300
000302

$67:
1%:

000004

BIT
#SWO0
BNE
1%
JMP .BEGIN
CLR a#FLAG
MOV
#300,R0
MOV
#302.R1

MOV

#4 R2

ADD

R2.RO

MOV
CLR

ADD

001000

*ROTATING POINTER
; BASE INTR VECTOR
:RELOAD BASEADD

. REC INTR VECTOR

- REC INTR STATUS
- XMIT INTR VECTOR
* XMIT INTR STATUS
- PRIORITY TO ALLOW INTR
* PRIORITY RELOADED

HRXDBUF
PARCSR
HPARCSR

HTXCSR
;BRANCH TO BEGIN TESTING

8LT
INSTR
MRE GAD

,aSWR

; RESELECT VECTOR $ CONTROL REG?
: BRANCH
TO QUESTIONING
: GO TO
LOAD STATUS MAP ETC.
. CLEAR FLAG SO STATUS MAP PRINTS OUT
*RESTORE VECTOR AREA TO TRAPCATCHER
:START AT LOCATION 300

R1.(RO)
(R1)

R2.R1

#1000,R1

PARAM

020246

176746

BYTE
.BYTE

JOUTPUT MESSAGE & GET
*ME SSAGE
‘LOW LIMIT
SHIGH LIMIT

DUBASE

1
1
MOV

;END AT LOCATION 776
INPUT STRING

;CONVERT STRING

160000
167776

016010

*ACTIVE REGISTER

"tfitttttttttttfitttttttt"ttttttttttt*tttttfil*tttttfittfitt

104405

501
001
016767

* XMIT ~ JUMPER

177300
177273
177266
177262
177256
177254

177250

; SYNC CHAR

CSEXMIT

,SEREC

177332
177320
177314
177312
001324
177324
177272
177266
177262
177256
177252
177246
177242
177236
177232
177226
000466

002176
002200

PROGRAM.

,SYNCNO

MOVB RESE(

016767
016767
016767
016767
013737
016767
016767
016767
016767
016767
016767
016767
016767
016767
016767
016767
000167

1090

: OPERATION OF THIS

MOVB NOSYNC

177423

001776
002004
002012
002020
002026
002036
002042
002050
002056
002
002072
002100
002106
0021146
002122
002130
002136

1091
1092

SEQ 0023

116767

1
1
1
1
1070
1071
1072
1073
1074
1075
1076
1077
1078
1079
1080
1081
1082

1%3

PAGE 26

“STORE AT THIS LOCATION

DUBASE ,KEEPADD ; SAVE

*MASK
JHOW MANY TIMES + 2

DZDUB-C MACY11_30A{1052)
21-NOV-78
CZDuUBD.P11
31-0C7-78 13:59

1106
1107
1108
1109
1110
1111

002240
002244
002252
002254
002256
002260

004767
016767
104403
016456
104405
000300

002264

020570

1112

002262

1114
1115
1116
1117
1118
1119
1120
1121
1122
1123
1124
1125
1126
1127
1128
1129

002266
002267
002270
002276
002304
002306
002310
002312
002314

001
004
016767
016767
104403
016561
104412
001202
105767

002320
002322
002326
002332
002336
002336
002340
002342
002344
002346
002350
002352
002353

100406
005067
005067
000167

002354
002362
002366
002374
002376
002402
002404
002412
002420
002422

012767
005067
056767
000241
006167
103421
062767
026767
101362
056767

002430
002436
002444
002446
002454

012767
016767
000414
016767
104403

1113

1130
1131
1132
1133
1134

1135
1136
1137

1138
1139
11640
1141
1142
1143
11644
1145
1146
1147
1148
1149
1150
1151
1152
1153
1154

1155
1156
1157
1158
1159

1160
1161

002456
002460
002462
002464

002466

002470
002471

015650
176736

15:36

PAGE 27

JSR
MOV
INSTR
MVECTO
PARAM
300

176732

000776

sMESSAGE
:CONVERT STRING
;LOW LIMIT

DURIV

;STORE AT THIS LOCATION

176662

MULTD

176670
176666
000140

B8M]
CLR
CLR
JMP

888
ACTREG
ROTADD
OUTMUL

016274
016266

176716
176706

.BYTE
BYTE

JHIGH LIMIT

1
4
MOV
MOV
INSTR
MMULT
SETFLG
MULTD
TST8

888:

104403

001
001

000001
176630
176626

s SAVE
:SET UP FOR ROTATION
sOUTPUT MESSAGE & GET INPUT STRING
sMESSAGE
;SET FLAG BASED UPON INPUT STRING
; THIS FLAG
;ARE THERE MULTIPLE DEVICES
;ON THE SYSTEM ?
sYES,ASK NEXT QUESTION

JUMP AROUND NEXT QUESTION
sOUTPUT MESSAGE & GET INPUT STRING

LASTADD

sSTORE AT THIS LOCATION

sMESSAGE
. CONVERT STRING
JLOW LIMIT
JHIGH LIMIT

BYTE
1
sMASK
BYTE
1
:HOW MANY TIMES + 2
:THE FOLLOWING ROUTINE SETS UP ACTREG FOR THE FIRST TIME

176636

1%:

176622

2%:

176616
000010

176572

177572

176566

000001
176544

176562
176540

4$:

176534

176530

3s$:

176572

DURIV,KEEPIV
DURIV,BASEIV

sMASK
sHOW MANY TIMES + 2

INSTR

MLASTD
PARAM
160000
167776

001210

176564

017023
104405
169000
167776
001
001

PC,DUADDR
KEEPADD ,BASEADD ;RESTORE FOR ROTATION
;OUTPUT MESSAGE & GET INPUT STRING

776

016640
104405
160000
167776

001210

SEQ 0024

MOV
CLR
8IS
CLC
ROL
8(s
ADD
M
BHI
BIS

MOV
MOV
BR
MOV
INSTR

MRANGE
PARAM
160000
167776
BYIE
BYTE

LASTADD

1
1

#1 ,ROTADD
:SET _UP POINTER
ACTREG
CLR ACTIVE REGISTER
ROTADD ,ACTREG
;MAKE THIS DEVICE ACTIVE

ROTADD
:SET UP POINTER
3s
;ARE YOU OUT OF RANGE ?
#10,BASEADD
:SET UP BASE ADDRESS
LASTADD ,BASEADD ;IS THIS THE LAST DEVICE ?
2%
:NO DO IT AGAIN
ROTADD ,ACTREG ~ ;THIS ASSUMES THAT THERE ARE AT
SLEAST TWO DEVICES WHEN YOU ANSWER YES TO
JMULTIPLE DEVICE QUESTION
#1,ROTADD
sSET _UP FOR LATER USE IN END OF PASS ROUTINE
KEEPADD ,BASEADD ;DITTO
OUTMUL
;CONTINUE QUESTIONS
KEEPADD ,BASEADD ;RESTORE
sOUTPUT MESSAGE & GET INPUT STRING

sMESSAGE
s CONVERT STRING
JLOW LIMIT
JHIGH LIMIT
;STORE AT

THIS LOCATION

sMASK
JHOW MANY TIMES + 2

n
£H
V
n

002513

000167
104403
017307
104405
000004
000007
020110
000
001
004767

15:36

177656

PAGE 28

OQUTMUL:

JMP

SEQ 0025

;00 IT AGAIN

INSTR

;OUTPUT MESSAGE & GET INPUT STRING

MLEVEL

MESS GE

PARAM

;CONVERT STRING

DUPRT

;STORE AT THIS LOCATION

4
7

.BYTE

BYTE

015320

LOU LIMIT
HIGH LIMIT

1
JSR

MAS

cHOW MANY TIMES + 2

PC.,DULEV

; COMPARE THE FIRST CHARACTER IN THE TELETYPE INPUT

ABA

BUFFER TO THE CHARACTERS '"1'* AND *2'".
;IF THE CHARACTER IS ‘"'’ CLEAR THE FLAG
;IF THE CHARACTER IS '2" SET THE FLAG
INSTR

D d wd D D ed e
D e D e b e d

) D nd ed ed D D ) d D D D
e D b D
b D DD DD D D
D
D D d =D d

R R R AR R B IF VN ANININIIDEIRAR o
WA

DZOUB-C MACY11_30A(1052)
21-NOV-78
cZouBD .P11
31-0CT7-78 13:59

000061

015146

3%:

000062

015130

177777

176416

FEISIVIISE S8 R R RS L8 R

D e oD d b - d d b d ed e el
— e b ol ed e e e o d d d e

176436

1s$:

2%:
(%:

MSYNC

(MPB

sOUTPUT MESSAGE & GET INPUT STRING

#'1, INBUF

BNE
CLRB
B8R

18
SYNCNO
(33

BNE
MOvVB
BR

#-1,SYNCNO
48

CMP8

INSTER

B8R

NOP

sMESSAGE

JIS IT 1 2

;000

#'2, INBUF

JIS IT 2 2

;377
RETRY

INSTR

;sOUTPUT MESSAGE & GET INPUT STRING

SETFLG

;SET FLAG BASED UPON INPUT STRING

MWIREG

s MESSAGE

SEXM]T

;THIS FLAG

INSTR

;OUTPUT MESSAGE & GET INPUT STRING

SETFLG
SEREC
INSTR

;SET FLAG BASED UPON INPUT STRING
;THIS FLAG
;OUTPUT MESSAGE & GET INPUT STRING

SETFLG

;SET FLAG BASED UPON INPUT STRING

INSTR

;OUTPUT MESSAGE & GET INPUT STRING

MWIRES

s MESSAGE

d ed e

MWIRES

s MESSAGE

) d

MEXTJ

)

OPTCLR

JMRBY

;THIS FLAG

:MESSAGE

;SET FLAG BASED UPON INPUT STRING

;THIS FLAG

NOWNESWN—=O

b ok
b md
o

e e
el e

NORNINLNLNUNIADN

wd S

SETFLG

JTEST START AND RESTART
002630

012767

000340

1751640

.BEGIN: MOV
°

AANNNE

#340,PS

LQAD

STATUS

MAP

YHE VALUES NOW BEING LOADED

.' USED [N TH]S PROGRAM AND

002636
002644

0327 7
0011

000200

176234

cLOCK QUT

tt-ttt

INTO THE

WILL BE

INTERRUPTS

STATUS MAP WILL BE

PASSFD

TO ANY

:OTHER DUTT PROGRAMS LOADED IMMEDIATELY FOLLOWING THIS PROG.
BIT #SW07
L8SWR
; SW07 SET , IF YES BRANCH
BNE HEREU

0ZDUB-C MACY11_30A(1052)
21-NOV-78
CZDUBD .P11
31-0C7-78 13:59
116767
116767
116767
116767
116767
116767

176324
176317

15:36

PAGE 29

176424

MOVB SYNCNO

176417
176412
176405

,NOSYNC

MOVB SEXMIT
MOVB SEREC
MOVB OPTCLR

“MITSEX
RESEC
- CLROPT

:SYNC CHARS

SXMIT JUMPER
:SEC REC JUMPER
:OPTIONAL JUMPER

176400

MOVB MULTD

“oMULT

* MULTIPLE DEVICES

176366
176362
176356
176354

MOV BASEADD
MOV KEEPADD
MOV LASTADD
MOV KEEP]V

- ADDBASE
- ADDKEEP
_ADDLAST
_IVKEEP

:PROG CONTROLLED 1ST ADDR
*SAVED 1ST DEVICE ADDR
:LAST DEVICE RXCSR ADDR
“SAVED INTR VECTOR

MOV ACTREG
MOV ROTADD

"REGACT
~ ADDROT

*ACTIVE REGISTER
*ROTATING POINTER

MOV DURIV

-RIVDU

176373

016767
016767
016767
016767
016767
016767
016767
013737
016767
016767
016767
016767
016767
016767
016767
016767
016767
016767
016767
016767
016767
016767
016767
016767

SEQ 0026

MOVB JMRBY

1726344

‘BYJMR

MOV BASEIV

176342
176336

001324

MOV @#DUPRT

176326
176314
176310
176306
176326
176274
176270
176264
176260
176254
176250
176244

MOV
MOV
MOV
MOV
MOV
MOV
MOV
MOV
MOV
MOV
MOV
MOV

176326

176240
176234

- IVBASE

CaMPRTDU

DURIS
DUTIV
DUTIS
LESS?
DUBASE
RXCSR,
HRXCSR,
RXDBUF.
HRXDBUF,
PARCSR,
HPARCSR,
TXCSR,

"RISDU
STIVDU
STISDU
"L1ESS
_BASEDU
CSRRX
C SRHRX
BUFRXD
BUFHRXD
CSRPAR
CSRHPAR
CSRTX

MGV HTXCSR,
MOV TXDBUF.

176230

SEXTERNAL MODEM

: RELOAD BASE INTR VECTOR
-pUT1 PRIORITY

;REC INTR VECTOR

* REC INTR STATUS
. XMIT INTR
VECTOR
> XMIT
INTR
STATUS
* PRIORITY TO ALLOW INTR
*RXCSR BASE ADDRESS

CSRHTX
BUF TXD

MOV HTXDBUF,

BUFHTXD

'-tnt'ttttttttttt.'tttttt"'tttt'tttttttt

: THE FOLLOWING CODE WILL PRINT
:

:
:
*
*
:

THE

CONVERSATIONALLY SET JUMPER

SETTINGS FROM THE STATUS MAP
ON THE FIRST PASS OF
THIS DIAGNOSTIC OR
JUST AFTER THE QUESTIONING
AND ANSWERING .

001222

HEREU:

000116
017646
000001

SETFG:

~nN

=
W

176042
176040

OMNONIN
NN

Oooogoooo
Prar?
o> 1,61 o Qrur PurGur
Pur

‘-tttttttttttttttfitttttttttttttttttttfitt

000003
000002
001300
000002
001306

000002°*
176006

TST a#FLAG

TEST

JMP THRU
TYPE , MSTATUS

*
*

AROUND IF PASS > 1
PRINT 'STATUS MAP'

*
*

SAVE RO
SAVE R1

;

(BUFF1)=STATUS

BEQ

001222

SETFG

ADD #1, Q#FLAG

MOV RO, HOLDO
MOV R1. HOLDI

176034

MOV #3,

COUNT1

MOv #BUFF1, RO
MOV #STATUS,

FILBUF: MOV R1, (ROS+

ADD #2° .R1
CMP R1, #STATUS+6
BNE FILBUF

UP:

MCY #BUFF1

MOV RO

TABLE+4

1ST PASS

IF FIRST PASS SET FLAG/PRINT

: SET FLAG ON 1ST PASS
,

*COUNTER FOR WORDS PRINTED
ETC.

* LOAD BUFF AS ABOVE

* PREPARE STATUS ADDRESS
: CHECK IF 3 WORDS LOADED
: BACK
TO LOAD NEXT ADDRESS
*

LOAD FOR PRINT OUT

:LOAD ADDRESS

TO PRINT

DZDUB-C MACY11_30A(1052)
_21-NOV-78
CZDUBD.P1
31-0CT~78 13:59

1276
1275
1276
1277
1278
1279
1280
1281
1282
1283
1284
1285
1286
1287

003230
003234
003240
003244
003250
003252
003256

012067
104410
104402
005367
001365
016700
016701

176006
001232
017110
175760

003262
003266
003272
003274

012706
005737
001056
105767

001100
000042

1288

003300

001407

1291

003316

000444

1293
1294
1295
1296
1297
1298
1299
1300
1301

003326
003330
003332
003334
003336
003340
003344
003346
003356

001416
104403
017244
104412
001247
105767
001407
012767
012767

1304
1305
1306
1307
1308
1309
1310
1311
1312

003372
003400
003406
003410
003412
0034146
003416
003420
003422

016767
032777
001410
104403
017231
104405
003446
013610
001114

1314

003425

001

1316
1317
}%}g

002430
003436
0034642

1289
1290

1292

1302
1303

1313

1315

003302
003310

003320

003362
003364

003424

003426

115:36

175746
175744
THRU:

175702

011240
011234

011140
011134

032777

000004

175552

000240
000240

011074
011070

011156

011056
011052
175472

001

000403

012767
104402
000177

5%:

1%:
2%:

BYTE

BYTE
003446
017225
175446

175456

3$:
i$:

1320
1321
1322
1323
1324
1325

1329

#STACK, SP
;SET UP STACK
NG2
*1S PROGRAM UNDER MONITOR CONTROL
3$
MULTD
;DON'T ALLOW LOCK ON TEST IF RUNNING
-MULTIPLE DEVICES

§s

;IF NO,TEST FOR LOCK ON TEST

$JUMP AROUND IF YES

MOV
MOV

BRW, TTST
BRX.TTST+2

BIT

#B1T2,aSwWR

B8R

BEQ
INSTR
MLOCK
SETFLG
LOKFLG
TSTB
BEQ
MOV
MOV

BR
MOV

MOV
BIT
BEO
INSTR
MTSTPC
PARAM
TST1
TLAST
RTRN

LOKFLG
1$
ANOP, TTST
NOP.TTST+2

2$
BRW, TTST

BRX.TTST+2
#SW01,aSwR
3%

B8R

MOV
TYPE
JMP

:CHECK FOR LOCK ON TEST

;OUTPUT MESSAGE & GET INPUT STRING
*ME SSAGE
*SET FLAG BASED UPON INPUT STRING
‘ThIS FLAG
+1S LOCK ON TEST OPTION SELECTED
;SET UP TO LOCK

LOCK NOT SELECTED, SET UP FOR NORMAL SCOPE LOOP
F SW01=1, GET STARTING PC
;OUTPUT MESSAGE & GET INPUT STRING
*MESSAGE

*CONVERT STRING

‘LOW LIMIT
THIGH LIMIT
*STORE AT THIS LOCATION

*RESTORE NORMAL SCOPE LOOP
DITTO

*MASK

#TST1,RTRN
MR
SRTRN

*HOW MANY TIMES ¢ 2
;START AT TEST 1
‘TYPE R
*START TESTING

::THIS TEST VERIFYS WORD LENGTH SELECT OF THE
*:RECEIVER SECTION,IT USES THE ERROR FLAGS
2370 DETERMINE THAT IT WAS SELECTED CORRECTLY
* 2 (OVRRUN,RXERR)
: :MODE
: ISYMOD
s sLENGTH:SIX

;ggg

1328

MOV
TST
BNE
TSTB

BEQ

175703

011152
000002

SEQ 0027

MOV (RO)+, TABLE+10
LOAD CONTENTS
CONVRT , TABLE
; PRINT ADDRESS/CONTENTS PAIR
TYPE, MCRLF
: CR AND LF
DEC COUNTI
:COUNT WORDS PRINTED
BNE UP
: GO PRINT NEXT ADDRESS/CONTENTS
MOV HOLDO,RO
MOV HOLD1. R1
.'Qtttt*t'tt.ttt"'fittttttttttt*tt

016767
016767

000406
016767

PAGE 30

::CHAR: 25

003446
003454

012767

000001

003710

175452
175434

TST1:

MOV

#°,TSTNO

#TST2 NEXT

sSAVE THIS

;GO TO THIS TEST WHEN THRU

DZDUB-C MACY11_30A(1052)

CZDUBD.P11

HEEREES%

000400
000000
000400

003504

012777

064001

003512

012777
052777

002000
000020

003526
003534

042777
052777

020000
020000

003542
003550
003556
003562
003566

042777
052777
016703
012700
012767
012767
004767
105777

020000
020000
014766
000025
000010
000252
014442
014732

n
o
~
&»

S
W

052777
012777
052777

003602
003606

15:36

003616
003622
003624
003626

017701
020001
001401
104002

PAGE 31
BIS
MOV
BIS

SEQ 0028
#MRESET ,@TXCSR
;MASTER RESET
#1SYMOD ,aPARCSR ;SET THE MODE
#MRESET ,@TXCSR
;MASTER RESET

;SET MAINT DATA,(CLK ,BREAK,BMAINTENANCE MODE
MOV

#MTDATA!
CLK!MINT !BREAK,aTXCSR

;SET MODE ,# OF BITS,PARITY SENSE,RLOAD SYNC REG
MOV
BIS

#1SYMOD!SIX!NOPAR!Q,aPARCSR
#SYNSCH, @RXCSR
;SET SYNC SEARCH

BIC
BIS

#CLK,@TXCSR
#CLK,aTXCSR

sPOKE CLK DOWN
:POKE CLK UP

8IC
BIS
MOV

#CLK,@TXCSR
#CLK,aTXCSR
RXDBUF ,R3

POKE CLK DOWN
:°CKE CLK UP
*SET UP FOR ERROR MESSAGE

MOV

#2585, TEMP1

*DATA CHAR

:POKE CLK TO GET RECEIVER INTO SYNCROIZATION....

sPOKE CLK TO GET LOGIC INTO SYNCRONIZATION

MOV
MOV

JSR
TSTB

PC.RPOKE
SSHIFT
@RXCSR
;RXDONE ?

HLT

;RXDONE

BM]

MOV

014726

#25,R0°
;EXPECTED
#8. SHIFT
;4 OF SHIFTS

CMP
BEQ
HLT

64$

012767
012767
004767

000010
000252
014400

175302
175300

003650
003656
003664
003670

012767
012767
004767
012700

000010
000252
014360
140025

175262
175260

003674
003700

017701
020001
001401
104002

014650

003630
003636

003704

RO,R1
65$
2

IN THIS CHAR

SET

;ACTUAL

:COMPARE EXPECTED VS. ACTUAL
;RECEIVED DATA DID NOT MATCH

*EXPECTED DATA = CHECK MAINT DATA
:0OR RECEIVER LOGIC

MOV

#8. SHIFT

:# OF SHIFTS

JSR

PC . RPOKE

SSHIFT IN THIS CHAR

MOV

#252, TEMP1

*DATA CHAR

;NOW SHIFT IN A SECOND CHARACTER WITHOUT READING RXDBUF
MOV

#8.

SHIFT

;4 OF

SHIFTS

MOV

#252, TEMP1

MOV

#140000'25,R0

PC . RPOKE

*SHIFT

MOV

SRXDBUF ,R1

*RXERR € OVRRUN
*ACTUAL

HLT

JSR

cMP
BEQ
ccs

104400

SHOULD BE

@RXDBUF ,R1

N
~
o
n

b —t el

d ad

)

WINN
N WNINWN
NNNNN NN
000 NOVWNES
W=00

— —

003462
003470
003476

W
~
o
o

WO O
VOO NOWNEB NN =O VRNV

b
b
D
D
D
)

d —d ard md

d ad od

d e

D e

WWN NN
NN NN W

Ed e

D oh e

d e ad cd e

d e

NN
NN NN

R KRR R R R R
AR AAAAAARANN
RNV
S

1330
1331
1332

_21-NOV-78

31-0C7-78 13:59

SCOPE

RO,RT
66%

*DATA CHAR

IN THIS CHAR

-EXPECTED DATA PLUS

~:COMPARE EXP VS. ACT

;SPECIFICALLY LOOK AT RXERR &

*OVRRUN BITS...THEY BOTH SHOULD BE SET

;o THIS TEST VERIFYS WORD LENGTH SELECT OF THE
;;RECEIVER SECTION,IT USES THE ERROR FLAGS
;70 DETERMINE THAT [T WAS SELECTED CORRECTLY
2 2 (OVRRUN,RXERR)
: 1SYMOD
< sMODE
LENGTH:SIX
::CHAR:
5S¢

DZOUB-C MACY11_30A(1052)
21-NOV-78
CZDUBD.P11
31-0CT-78 13:59

1386
1387
1388
1389
}gg?
1392

}ggz

1395
1396
1397
1398
1399

15:36

003710
003716
003724
003732
003740

012767
010767
052777
012777
052777

000002
004152
000600
000000
000400

175210
175172
014626

003746

012777

064001

014604

003754
003762

012777
052777

002000
000020

014572
014554

042777
052777

020000
020000

014562
014554

004004
004012
004020
004024

042777
052777
016703
012700

020000
020000
014524
000052

014546
014540

1407
1408
1409

006036
0046044
004050

012767
004767
105777

000324
014200
014470

175100

1411

004056

104000

16413

004060

017701

1410

1412

1414
1415
1616
1417
1418
1419
1620

1421

1422
1423
16424
16425
1626
1427
1428
1429
16430

16431

1432
1433
1434
1435
1436
1437

1438

1439

1440
1441

004030

004054

004060

004064
004066
004070

012767

100401

020001
001401
104002

000010

012767

000010

004106

004767

014136

006112
004120
004126
004132

012767
012767
004767
012700

000010
000324
014116
140052

004136
004142

017701
020001

014406

004146

106002

004144

004150
00415C

012767

001401

104400

000324

BIS

MOV

175020
175016

;SAVE THIS
;GO TO THIS TEST WHEN THRU
;MASTER RESET
:SET THE MODE

:MASTER RESET

MATDATA ! CLK 'MINT 'BREAK , @TXCSR

BIS
#CLK.@TXCSR
‘POKE CLK UP
:POKE CLK TO GET LOGIC INTO SYNCRONIZATION
BIC
#CLK,@TXCSR
;POXE CLK DOWN
BIS
#CLK.@TXCSR
‘POKE CLK UP
MOV
RXDBUF ,R3
:SET UP FOR ERROR MESSAGE
MOV
#52.R0°
:EXPECTED

MOV

65%:

#8._ SHIFT

4 OF SHIFTS

MOV
JSR
TSTB

#324 , TEMP1
*DATA CHAR
PC.RPOKE
SSHIFT IN THIS CHAR
@RXCSR
;RXDONE ?

HLT

;RXDONE

MOV

TMM
BEQ
HLT

175036

#2,TSTNO
#TST3 NEXT
MMRESET ,@TXCSR
#1SYMOD
. @PARCSR
MMRESET.RTXCSR

;SET MODE .# OF BITS,PARITY SENSE,RLOAD SYNC REG
MOV
#1SYMOD !'SIX 'NOPAR !0, 3PARCSR
BIS
#SYNSCH.@RXCSR
:SET SYNC SEARCH
;POKE CLK TO GET RECEIVER INTO SYNCROIZATION....
BIC
#CLK.@TXCSR
;POKE CLK DOWN

64$:

175040

SEQ 0029

;SET MAINT DATA,CLK,BREAK ,EMAINTENANCE MODE

BM]

014464

004072
004072

004100

175102

MOV
MOV
8IS

MOV

014612

003770
003776

1406

TST2:

014614

1400
1401
1602
1403
1406
1405

PAGE 32

MOV

SHOULD BE

SRXDBUF ,R1
RO,R1
65$
2

SET

sACTUAL

;COMPARE EXPECTED VS.

ACTUAL

:RECEIVED DATA DID NOT MATCH
*EXPECTED DATA - CHECK MAINT DATA
:OR RECEIVER LOGIC

#8. . SHIFT

MOV

#3224, TEMP1

BEQ

66$

:# OF

SHIFTS

‘DATA CHAR

JSR
PC,RPGKE
SSHIFT IN THIS CHAR
;NOW SHIFT IN A SECOND CHARACTER WITHOUT READING RXDBUF
MOV
#8. SHIFT
;¥ OF SHIFTS
MOV
#324, TEMP1
‘DATA CHAR
JSR
PC,RPOKE
SSHIFT IN THIS CHAR
MOV
#140000'52,R0
:EXPECTED DATA PLUS
*RXERR € OVRRUN
MOV
SRXDBUF ,R1
*AC TUAL
cTMP
RO,RT
~;COMPARE EXP VS. ACT

HLT

€6%:

;SPECIFICALLY LOOK AT RXERR &
*OVRRUN BITS...THEY BOTH SHOULD BE

SCOPE
;:THIS TEST VERIFYS WORD LENGTH SELECT OF THE
S:RECEIVER SECTION,IT USES THE ERROR FLAGS

$TO DETERMINE THAT IT WAS SELECTED CORRECTLY
*: (OVRRUN,RXERR)

*MODE
: 1S vTMOD
;s LENGTH:SIX

SET

DZDUB-C MACY11 30A(1052)
21-NOV-78
CZDUBD.P11
31-0CT-78 13:59

15:36

1446
16445

004152
006160

012767
012767

000003
004414

14647
gzzg

004176
004202

012777
052777

000000
000400

000400

014364

004210

012777

064001

016342

004216

012777

002000

000020

014330

014312

004232
004240

042777
052777

020000
020000

014320
014312

004246
004254
0046262
004266

042777
052777
016703
012700

020000
020000
014262
000077

014304
014276

004767
105777

13736
014226

1646

1450

}225

1453

1454

1455
1456
1457
1458
1459
1460
1461
1462

1463

16464
1465

1466
1467

1468

1469
1470
1471
1472
1473
1474
1475
1476
1477
1478
1479
1480
1481
16482
1483
1484
1485
1486

1487
1488

1489

1490

1491
1492
1493
1494
1495

1496

1497

004166

0042246

052777

004272
004300

012767
012767

004316

100401

004306
004312

000010
000376

174746
174730

017701
020001
001401
104002

014222

004334
004334
004342
004350

012767
012767
004767

000010
000376
013674

174576
174574

0043564
004362
004370
004374

012767
012767
004767
012700

000010
000376
013654
140077

174556
174554

004400

017701

014144

004406

004410
004412
004412

#3,TSTNO
#TSTSL NEXT

MOV
8IS

#1SYMOD ,@8PARCSR :SET THE MODE
MMRESET ,@TXCSR
:MASTER RESET

MMRESET.QTXCSR

:SAVE

SEQ 0030

THIS
;GO TO THIS TEST WHEN THRU

;MASTER RESET

;SET MAINT DATA,CLK,BREAK,ZMAINTENANCE MODE

MOV

;SET MODE

;POKE

648
:

MMTDATA ' CLK 'MINT 'BREAK , @TXCSR

,# OF BITS.PARITY SENSE.RLOAD SYNC REG

MOV

#1SYMOD ' SIX 'NOPAR! 0, @PARCSR

MOV

#77.R0O

BIS
#SYNSCH,3RXCSR
;SET SYNC SEARCH
;POKE CLK TO GET RECEIVER INTO SYNCROIZATION....
8IC
#CLK,@TXCSR
:POKE CLK DOWN
BIS
#CLK.RTXCSR
:POXE CLK UP
CLK TO GET LOGIC INTO SYNCRONIZATION
BIC
#CLK,3TXCSR
:POKE CLK DOWN
BIS
#CLK.aTXCSR
:POKE CLK UP
MOV
RXDBUF ,R3
*SET UP FOR ERROR MESSAGE

;EXPECTED

MOV
MOV

#8. . SHIFT
#376, TEMP1

BM]

64%

MOV
CMP
BEQ
HLT

SRXDRUF ,R1
sACTUAL
RO,R1T
~;COMPARE EXPECTED VS. ACTUAL
65$
2
;RECEIVED DATA DID NOT MATCH
SEXPECTED DATA - CHECK MAINT DATA
:OR RECEIVER LOGIC

JSR
TSTB

HLT

65$:

:# OF SHIFTS
*DATA CHAR

PC.RPOKE
SSHIFT IN THIS CHAR
@RXCSR
;RXDONE ?
:RXDONE SHOULD BE SET

MOV
#8. . SHIFT
;# OF SHIFTS
MOV
#376, TEMP1
:DATA CHAR
JSR
PC,RPOKE
*SHIFT IN THIS CHAR
;NOW SHIFT IN A SECOND CHARACTER WITHOUT READING RXDBUF
MOV
#8. SHIFT
:# OF SHIFTS
MOV
#376,TEMP1
:DATA CHAR
JSR
PC.RPOKE
SSHIFT IN THIS CHAR
MOV
#140000!77
,R0
;EXPECTED DATA PLUS

MOV

SRXDBUF ,R1

BEQ

66$

CMP

001401

104002

104400

MOV
MOV

BIS

174640
174636

104000

020001

TST3:

014352
014350

004320
004322
004322
004326
004330
004332

004404

PAGE 33

HLT

66%:

*RXERR £ OVRRUN

- ACTUAL

RO,RT

~:COMPARE EXP VS. ACT

;SPECIFICALLY LOOK AT RXERR &

SOVRRUN BITS...THEY BOTH SHOULD BE

SCIPE
;:THIS TEST VERIFYS WORD LENGTH SELECT OF THE
SRECEIVER SECTION.IT USES THE ERROR FLAGS
$:TO DETERMINE THAT IT WAS SELECTED CORRECTLY
. s (OVRRUN ,RXERR)

SET

DZDUB-CP??CY11 30A(1052)
21-NOvV-78
cZbuBd
31-0C7~-78 13:59

15:36

PAGE 34

SEQ 0031

E
: 1 SYMOD
: ;MOD
SIX
s JLENGTH:
:;CHAR:D

S
N
S
N
U
U
G
S
G
S
U
U S
N QU S
S
S
QU S S
U
G
G
S
S
S
S
VA
vV uviuviviiviiviuiivivivivivivivivic
i
i

1506

VNN

VIV

NONONIANININOMNININ)
= b D
DD =

004414
004422
004430
004436
004464

012767
012767
052777
012777
052777

000004
004656
000400
000000
000400

014122
014110
014106

004452

012777

064001

0164100

004460
004466

012777
052777

002000
000020

014066
014050

004474
004502

042777
052777

020000
020000

014056
014050

004510
004516
004524
004530
004534

042777
052777
016703
012700
012767

020000
020000
014020

014042
014034

004550
0045564

004767
105777

004542

012767

000000
000010

000200

013474
013764

174504
174466

TST4:

BIS

017701

#4,TSTNO
:SAVE THIS
#TSTS NEXT
:GO TO THIS TEST WHEN THRU
#MRESET,ATXCSR
:MASTER RESET
#1SYMOD
. @PARCSR :SET THE MODE

MMRESET.@TXCSR

MOV

;SET MODE

MMTDATA!
CLK 'MINT !BREAK . @TXCSR

.# OF BITS,PARITY SENSE,ELOAD SYNC REG

MOV
BIS

#1SYMOD ' SIX 'NOPAR'(,@PARCSR
#SYNSCH,ARXCSR
;SET SYNC SEARCH
;POKE CLK TO GET RECEIVER INTO SYNCROIZATION....
BIC
#CLK,@TXCSR
:POKE CLK DOWN
BIS
#CLK . @TXCSR
‘POKE CLK UP
;POKE CLK TO GET LOGIC INTO SYNCRONIZATION
BIC
#CLK,RTXCSR
;POKE CLK DOWN
BIS
#CLK.@TXCSR
‘POKE CLK UP
MOV
RXDBUF ,R3
“SET UP FOR ERROR MESSAGE
MOV
MOV

174376

17437¢

#0.R0O ~ :EXPECTED
#8. SHIFT
:# OF SHIFTS

MOV

#200, TEMP

TSTB

@RXCSR

;RXDONE

HLT

;RXDONE

SHOULD BE

JSR

BM]

MOV

013760

PC,RPOKE

64$

SRXDBUF ,R1

012767
012767
004767

000010
000200
013432

004632
004636

2767
2767
004767
012700

000010
000200
013412
140000

004642

917701

013702

174334,
174314

174312

IN THIS CHAR

>
SET

:ACTUAL

ggiR1

; COMPARE EXPECTED VS.

HLT

:RECEIVED DATA DID NOT MATCH

MOV

174332

*DATA CHAR

SSHIFT

ggg

004576
004604
004612

:MASTER RESET

;SET MAINT DATA,CLK,BREAK ,ESMAINTENANCE MODE

004564

MOV
MOV
BIS
MOV

MOV
JSR

ACTUAL

*EXPECTED DATA - CHECK MAINT DATA
*OR RECEIVER 1 0GIC

#8. SHIFT

:# OF SHIFTS

PC ,RPOKE

SSHIFT

#200, TEMP1

*DATA CKAR

IN THIS CHAR

;NOW SHIFT IN A SECOND CHARACTER WITHOUT READING RXDBUF
MOV
#8. SHIFT
;X OF SHIFTS

MOV

PC,RPOKE
#140000'0,R0

MOV

SRXDBUF ,R1

HLT

cTMP
BEQ
.

06Y:

#208, TEMP1

JSR
MOV

RO,R1
66$

*DATA CHAR

YSHIFT IN THIS CHAR
:EXPECTED DATA PLUS
*RXERR & OVRRUN
*AC TUAL

;COMPARE EXP VS. ACT

;SPECIFICALLY LGOK AT RXERR &

*OVRRUN BITS...THEY BOTH SHOULD BE

SCOPE

JoTHIS

TECT VERIFYS WORD LENGTH SELECT OF

;cRECEIVER SECTION,IT USES THE ERROR FLAGS

THE

SET

DZDUB-C MACYi1_30A(1052>
_21-NOV-78
czZbuBD. P11
31-0(7-78 13:59

15:36

PAGE 35

1554
1555
1556

::TO DETERMINE THAT IT WAS SELECTED CORRECTLY
* 2 (OVRRUN,RXERR)
2 :MODE
: 1SYMOD

1557

J:LENGTH:SEVEN

}ggg

*:CHAR:125

1560
1561
1562
1563
}22@

004656
004
004672
004700
004706

012767
012767
052777
012777
052777

000005
005120
000600
000000
000400

174242
174224
013660
013646
013644

1566
1225

004714

012777

064001

013636

004722
004730

012777
052777

004000
000020

013626
013606

004736
004744

042777
052777

020000
020000

013614
013606

004752
004760
004766

042777
052777
016703

020000
020000
013556

013600
013572

000011

174136

1569
1570
1571
1572
1573
1574
1575
15726
1577
1578

1579
1580

004772

012700

000125

005012

004767

013232

004776

012767

TSTS:

1583
1584
1585
1586
1587
1588
1589
1590
1591
1592
1593
1596

005016
005022
005024
005026
005026
005032
005034
005036

017701
020001
001401
104002

013516

005040
005040

012767

000011

1.96
1597
1598

005054

004767

013170

005060

1600

1595

005046

105777
100401
104000

012767

MOV
MOV

174070

012767

000011

174052

005074

004767

013150

005104

017701

1605
1606

005112
005114

001401
104002

1608
1609

005116
005116

1601
1602

1603
604

1607

005100

005110

012700

020001

106400

65%:

~125 RO EXPECTED
SHIFT

SHIFTS

;DATA CHAR

TSTR
BM]
HLT

@RXCSR
648
;RXDONE

MOV
CMP
BEQ
HLT

SRXDBUF R
;ACTUAL
RO,RT
~;COMPARE EXPECTED VS. ACTUAL
65$
2
;RECEIVED DATA DID NOT MATCH
*EXPECTED DATA - CHECK MAINT DATA
‘OR RECEIVER LOGIC

MOV

PC .RPOKE

#9.

;RXDONE

SSHIFT

IN THIS CHAR

SHOULD BE SET

SHIFT

#6652, TEMP?

MOV

#65? renp1

140125

013440
'

# OF

wssé TEMP1

MOV

1599 005066 012767 000652 174050

;SAVE THIS
:GO TO THIS TEST WHEN THRU
:MASTER RESET
:SET THE MODE
-MASTER RESET

MOV
JSR

64$:

000652

#5,TSTNO
#TST6,NEXT
MMRESET,@TXCSR
#1SYMOD .@PARCSR
MMRESET.@TXCSR

:SET MODE .# OF BITS,PARITY SENSE.ZLOAD SYNC REG
MOV
#1SYMOD ' SEVEN'NOPAR
!0, aPARC SR
BIS
#SYNSCH,8RXCSR
;SET SYNC SEARCH
;POKE CLK TO GET RECEIVER INTO SYNCROIZATION....
81C
#CLK.3TXCSR
;POKE CLK DOWN
BIS
#CLK.@TXCSR
‘POKE CLK UP
;POKE CLK TO GET LOGIC INTO SYNCRONIZATION
BIC
#CLK,@TXCSR
;POKE CLK DOWN
8IS
#CLK.@TXCSR
“POKE (LK UP
MOV
RXDBUF ,R3
“SET UP FOR ERROR MESSAGE

013522

174072

MOV
MOV
8IS
MOV
BIS

;SET MAINT DATA,CLK,BREAK,EMAINTENANCE MODE
MOV
MMTDATA' CLK 'MINT 'BREAK , @TXCSR

1581 005004 012767 000652 174132

1582

SEQ 7032

;¥ OF

SHIFTS

*DATA CHAR

JSR
PC, RPOKE
JSHIFT IN THIS CHAR
;NOW SHIFT IN A ssco~o CHARACTER WITHOUT READING RXDBUF
MOV
SHIFT
;4 OF SHIFTS
JSR

MOV

a1aoooo'125 RO

“SHIFT

MOV

SRXDBUF ,R1

*ACTUAL

BEQ
HLT

65$
’

CMP

6CS:

‘DATA CHAR

PC.RPOKE

S(OPE

RO,RT

IN THIS CHAR

:EXPECTED DATA PLUS
*RXERR €& OVRRUN

'COMPARE EXP VS. ACT
;SPECIFICALLY LOOK AT RXERR €

SOVRRUN BITS...THEY BOTH SHOULD BE SET

DZDUB-C MACY11_30A(1052)

(ZDUBD.P1N

21-NOV-78

31-0C7-78 13:59

15:36

PAGE 36

SEQ 0033

1610

;;THIS TEST VERIFYS WORD LENGTH SELECT OF

1612
1613
1614
1615

$3TO DETERMINE THAT
<+ (OVRRUN ,RXERR)
* *MODE
: 1SYMOD

1611

$:RECEIVER SECTION,IT USES THE ERROR FLAGS

:;CHAR:S?2
005120
005126
005134
005142
005150

012767
012767
052777
012777
052777

000006
005362
000600
000000
000400

174000
173762
013416
013404
013402

005156

012777

064001

013374

005164

012777

004000

013362

1633
1634
1635
1636
1637
1638

005200
005206

042777
052777

020000
020000

013352
013344

005214
005222
005230
005234
005240

042777
052777
016703
012700
012767

020000
020000
013314
000052
000011

013336
013330

1640
1641

005254
005260

004767
105777

012770
013260

1624

}ggg

1627

1628

1629
1630
1631
1632

1639

1642

1643
1644
1645

1646

1647

1648
1649
1650
1651
1652
1653
1654
1655
1656
1657
1658
1659
1660

1661

1662
1663
1664

1665

IT WAS SELECTED CORRECTLY

+:LENGTH: SEVEN

}2}9

1618
1619
1620
1621
}gsg

THE

005172

005246

005264

005266
005270
005270
005274

005276
005300

005302
005302
005310
005316

052777

012767
100401

000020

000524

173672

173670

020001

;SET MODE

005336
005342

173610
173606

005346

017701

013176

020001
001401
104002

BM]

HLT

0060011
000524
012705
140052

#1SYMOD ! SEVEN'NOPAR
!0, aPARCSR

#5224, TEMP1

JSR
TSTB

1C4002

012767
012767
004767
012700

MMTDATA! CLK 'MINT 'RREAK , TXCSR

MOV

BEQ

005322
005330

THIS
:GO TO THIS TEST WHEN THRU
:MASTER RESET
:SET THE MODE
:MASTER RESET

;POKE CLK TO GET LOGIC INTO SYNCRONIZATION
BIC
#CLK,@TXCSR
:POKE CLK DOWN
BIS
#CLK.@TXCSR
*POKE CLK UP
MOV
RXDBUF ,R3
*SET UP FOR ERROR MESSAGE
MOV
#52.R0
;EXPECTED
MOV
#9, SHIFT
;8 OF SHIFTS

001401

173630
173626

:SAVE

8IS
#SYNSCH,8RXCSR
;SET SYNC SEARCH
:POKE CLK TO GET RECEIVER INTO SYNCROIZATION....
BIC
#CLK,@TXCSR
:POKE CLK DOWN
BIS
#CLK.@TXCSR
*POKE CLK UP

000011
000524
012726

#6,TSTNO
#TST7 NEXT
#MRESET,@TXCSR
#1SYMOD ,@PARCSR
MMRESET.TXCSR

,# OF BITS,PARITY SENSE.ZLOAD SYNC REG

MOV

012767
012767
004767

005352
005354
005356

MOV

648
:

013254

MOV
MOV
BIS
MOV
BIS

;SET MAINT DATA,CLK,BREAK,EMAINTENANCE MODE

013344

104000

017701

TST6:

PC ,RPOKE
@RXCSR
;RXDONE

*DATA CHAR
;SHIFT
2

IN THIS CHAR

;RXDONE SHOULD BE SET

SRXDBUF ,R1

:ACTUAL

RO,R1

~;COMPARE EXPECTED VS.

:RECEIVED DATA DID NOT MATCH
SEXPECTED DATA - CHECK MAINT DATA
:OR RECEIVER LOGIC

65$

65%

ACTUAL

MOV
#9. . SHIFT
:# OF SHIFTS
MOV
#524, TEMP1
*DATA CHAR
JSR
PC.RPOKE
SSHIFT IN THIS CHAR
:NOW SHIFT IN A SECOND CHARACTER WITHOUT READING RXDBUF
MOV
#9. SHIFT
:# OF SHIFTS
MOV
#524 , TEMP
:DATA CHAR
JSR
PC ,RPOKE
SSHIFT IN THIS CHAR
MOV
#140000'52,R0
:EXPECTED DATA PLUS
*RXERR & OVRRLN

MOV

MP
BEQ
HLT

SRXDBUF ,R1
RO,R1
66$
Z

*ACTUAL

~:COMPARE EXP VvS. ACT

;SPECIFICALLY LOOK AT RXERR &

JOVRRUN B TS...THEY BO"H SHOULD BE SE”

DZDUB-C MACY11_30A(1052)

CZDUBD .P11
1666
1667
1668

005360
005360

21-NOV-78

31-0CT-78 13:59

15:36

PAGE 37

66$:

104400

1669
1670
1671
1672

LICHAR: 177

1676
1677
1678
1679

005362
005370
005376
005406

012767
012767
050777
012777

000007
005624
000400
000000

173536
173520
013754
013142

1682
;ggz

005420

012777

064001

013132

005412

052777

000400

_
005426
005434

012777
052777

004000
000020

013120
013102

005442
005450

042777
052777

020000
020000

013110
013102

005456
005464
005472

042777
052777
016703

020000
020000
013052

013074
013066

1696
1697
1698
1699

005502
005510
005516
005522

012767
012767
004767
105777

000011
000776
012526
013016

173430
173426

1701
1702
1703
1704,

005530
005532
005532
005536

104000

017701
020001

1706
1707
1708
1709
1710
1711
1712
1713

005542

104002

1705

1714

1715

1716
1717
1718
1719
1720
1721

005476

005526

005540

005544
005544
005552
005560

005564

005572

012700

100401

000177

TST7:

013140

1685
1686
1687
1688
1689
1690
1691
1692
1693
1696

1700

THE

*LENGTH: SEVEN

}g;g

1695

SCOPE
::THIS TEST VERIFYS WORD LENGTH SELECT OF

*:RECEIVER SECTION,IT USES THE ERROR FLAGS
$TO DETERMINE THAT IT WAS SELECTED CORRECTLY
: : (OVRRUN ,RXERR)
: ;MODE
: 1 SYMOD

1673

}gg?

SEQ 0034

BIS

012767

#177
R0 ;EXPECTED

BM]

648

MOV
cTMP

BRXDBUF ,R1
-ACTUAL
RO,R1
;COMPARE EXPECTED VS. ACTUAL

MOV
MOV
JSR
TSTB

HLT

000011

005600
005604

012767

004767
012700

000776

005610
005614
005616

017701
020001
001401

012734

012444
140177

173366
173364

173346

173344

-MASTER RESET

MOV

BEQ

000011
000776
012464

MRESET.ATXCSR

;SET MODE ,# OF BITS,PARITY SENSE,ZLOAD SYNC REG
MOV
#1SYMOD ! SEVEN'NOPAR
' 0, 3PARCSR
BIS
#SYNSCH,@RXCSR
;SET SYNC SEARCH
;POKE CLK TO GET RECEIVER INTO SYNCROIZATION....
BIC
#CLK,3TXCSR
:POKE CLK DOWN
BIS
#CLK . @TXCSR
‘POKE CLK UP
;POKE CLK TO GET LOGIC INTO SYNCRONIZATION
BIC
#CLK . @TXCSR
sPOKE CLK DOWN
8IS
#CLK.@TXCSR
‘POKE CLK UP
MOV
RXDBUF ,R3
“SET UP FOR ERROR MESSAGE

001401

012767
012767
004767

#7.TSTNO
:SAVE THIS
#TST8 NEXT
;GO TO THIS TEST WHEN THRU
MRESET,ATXCSR
;MASTER RESET
#]SYMOD ,@PARCSR :SET THE MODE

;SET MAINT DATA,CLK,BREAK,EMAINTENANCE MODE
MOV
MMTDATA ! CLK 'MINT 'BREAK, @TXCSR

€4$:

013012

MOV
MOV
BIS
MOV

#9. . SHIFT
X776, TEMPT
PC ,RPOKE
@RXCSR
;RXDONE

SRXDONE SHOULD BE SET

65$
2

65$:

MOV
MOV
JSR
:NOW SHIFT IN A

MOV

MOV
JSR
MOV

MOV
(MP
BEQ

;4 OF SHIFTS
‘DATA CHAR
SSHIFT IN THIS CHAR
?

:RECEIVED DATA DID NOT MATCH
SEXPECTED DATA - CHECK MAINT DATA
*OR RECEIVER LOGI(

#9. . SHIFT
;4 OF SHIFTS
#776, TEMPY
*DATA CHAR
PC .RPOKE
“SHIFT IN THIS CHAR
SECOND CHARACTER WITHOUT READING RXDBUF

#9.

SHIFT

#776., TEMP

PC ,RPOKE
#140000'177,R0

;4 OF SHIFTS

‘DATA THAR

“SHIFT IN THIS CHAR
:EXPECTED DATA PLUS
*RXERR & OVRRUN
SRXDBUF ,R1
*AC TUAL
Ro.RT
“:COMPARE EXP VS. ACT
66%

0ZDUB-C MACY11_30A(1052)
_21-NOV-78
cZouBD . P11
31-0CT7-~-78 13:59
1722
1723
1724

1725
1726
1727
1728
1729
1730
1731

005620

104002

005622
005622

104400

15:36

PAGE 38
HLT

66%:

};%%

005624
005632
005640
005646
005654

012767
012767
052777
012777
052777

000010
006066
000400
000000
000400

173274
173256
012712
012700

1740
};2;

005662

012777

064001

012670

005670
005676

012777
052777

004000
000020

012656
012640

005704
005712

042777
052777

020000
020000

012646
012640

005720
005726
005734
005740
005744

042777
052777
016703
012700
012767

020000
020000
012610
000000
000011

012632
012624

005760
005764
005770
005772
005774
005774
006000
006002
006004

004767
105777
1004601
104000

012264
012554

017701
020001
001401
104002

012550

006006
006006

012767

000011

1770
1771
1772

006022

004767

012222

1774
1775
1776
1777

1755

1756
1757
1758
1759
1760
1761
1762
1763
1764
1765
1766
1767
1768

1769

1773

JSPECIFICALLY LOOK AT RXERR £
JOVRRUN BITS...THEY BOTH SHOULD BE SET

SCOPE
;sTHIS TEST VERIFYS WORD LENGTH SELECT OF THE
;;RECEIVER SECTION,IT USES THE ERROR FLAGS
2:TO DETERMINE THAT IT WAS SELECTED CORRECTLY
; : (OVRRUN ,RXERR)
3
E:I1SYMOD
::LENGTH:SEVEN

:;CHAR:0

1734
1735
1736
1737
};%g

1743
1744
1745
1746
1747
1748
1749
1750
1751
1752
1753
17564

SEQ 0035

005752

006014

006026

012767

000400

012767

000011

006042
006046

004767
012700

012202
140000

006052

017701

012472

006034

012767

000400

T1ST8:

012676

173166

173164

BIS

173122
173104

173102

#8,TSTNO
NTSTO NEXT
MRESET,@TXCSR
#1SYMOD ,8PARCSR
#MRESET ,8TXCSR

;SAVE THIS
;G0 TO THIS TEST WHEN THRU
;MASTER RESET
;SET THE MODE
;MASTER RESET

;SET MAINT DATA,
,BREAK ,EMAINTENANCE
CLK MODE
MOV
MMTDATA!CLK 'MINT !BREAK ,8TXCSR

JSET MODE ,# OF BITS,PARITY SENSE.LLOAD SYNC REG
MOV
#1SYMOD ! SEVENNOPAR
! 0,aPARCSR
BIS
#SYNSCH,aRXCSR
;SET SYNC SEARCH
;POKE CLK TO GET RECEIVER INTO SYNCROIZATION....
BIC
#CLK,3TXCSR
JPOKE CLK DOWN
BIS
#CLK,aTXCSR
;POKE CLK UP
;POKE CLK TO GET LOGIC INTO SYNCRONIZATION
BIC
#CLK,8TXCSR
;POKE CLK DOWN
BIS
#CLK,3TXCSR
;POKE CLK UP
MOV
RXDBUF ,R3
;SET UP FOR ERROR MESSAGE
[ 01
#0,RO
;EXPECTED
MOV
#9. SHIFT
;A OF SHIFTS

MOV

648

173124

MOV
MOV
8IS
MOV

65%:

#400, TEMP1

:DATA CHAR

JSR
TSTB
8M]
HLT

PC ,RPOKE
JSHIFT
aRXCSR
;RXDONE ?
64%
;JRXDONE SHOULD BE SET

MOV
(MP
BEQ
HLT

SRXDBUF ,R1
;ACTUAL
RO,R1
;COMPARE EXPECTED VS. ACTUAL
65%
2
:RECEIVED DATA DID NOT MAT(CH
JEXPECTED DATA - (HECK MAINT DATA
;OR RECEIVER LOGIC

MOV

#9.

MOV

,SHIFY

#400, TEMP1

IN THIS CHAR

;W OF SHIFTS

:DATA CHAR

JSR
PC,RPOKE
JSHIFT IN THIS CHAR
;NOW SHIFT IN A SECOND CHARACTER WITHOJUT READING RXDBUF
MOV
#9., SHIFT
¥ OF SHIFTS

MOV

4400, TEMP1

JSR
MOV

PC ,RPOKE
#140000'0,R0

MOV

aRXDBUF ,R1

:DATA CHAR

JSHIFT IN THIS CHAR
JEXPECTED DATA PLUS
JRXERR & OVRRUN
JACTUAL

0ZDUB-C MACY11_30A(1052)
21-NOvV-78
CZDUBD .P11
31-0C7-78 13:59

1778
1779
1780
1781
1782
1783

006056
006060
006062
006064
006064

15: 36

PAGE 39

020001
001401

CMP
BEQ
HLT

104002

66%:

104400

~
o

I
R PSR al\l
3%

D —

=20

Pust et
o

Pt Pt Putr St St Pt P

O NOAVB WA =OVB NN

R RROTR

ng
) —

sSPECIFICALLY LOOK AT RXERR &

¢OVRRUN BITS...THEY BOTH SHOULD BE SET

SCOPE

THAT

IT WAS SELECTED CORRECTLY

;MODE : ] SYMOD

;s LENGTH:EIGHT
i HAR:125

) e
D ed
d
) e e
D e
D e

2:TO DETERMINE

012767
012767
052777
012777
052777

000011
006330
000400
000000
000400

012436
012434

012777

064001

012426

012777
052777

006000
000020

012414
012376

042777
052777

020000
020000

012404

042777
052777
016703

020000
020000
012346
000125
000012

012370
012362

173032
173014
012450

D
d
) ed ced
D
e
e
e
D

)

D e

0000 00 00 00 00 00 00 00 00

d
b e
d el
b e
d
—

;COMPARE EXP VS. ACT

::(ngRUN.RXERR)

001252
012022
012312

012376

TST9:

MOV

#9,TSTNO

;SAVE THIS

BIS

MMRESET ,@TXCSR

;MASTER RESET

MOV

MOV
BIS

#TSTI10 NEXT

MoV

#1SYMOD ,@PARCSR ;SET THE MODE
#MRESET,aTXCSR
;MASTER RESET

#MTDATA!
CLK 'MINT 'BREAK ,@TXCSR

:StT MODE .4 OF BITS,PARITY SENSE,QLOAD SYNC REG

MOV

BIS

#1SYMOD
' E1GHT !NOPAR 0, @PARCSR
#SYNSCH.@RXCSR

BIS
#CLK.@TXCSR
‘POKE CLK UP
;POKE CLK TO GET LOGIC INTO SYNCRONIZATION
BIC
#CLK,@TXCSR
;POKE CLK DOWN
BIS
#CLK. arxcsn
*POKE CLK UP

MOV

RXDBUF ,R3

*SET UP FOR ERROR MESSAGE

MOV

#10.

:# OF SHIFTS

JSR
TSTB
BM]
HLT

PC,RPOKE
“SHIFT IN THIS CHAR
@RXCSR
;RXDONE ?
64$
sRXDONE SHOULD BE SET

MOV
P

SRXDBUF ,R1
sACTUAL
RO,R1T
:COMPARE EXPECTED VS.

HLT

MOV

012306

BEQ

#125.R0 ;EXPECTED
(SHIFT

#1252 TEMP1

65$

000012
001252
011740

172642
172640

140125

‘DATA CHAR

ACTUAL

;RECEIVED DATA DID NOT MATCH

SEXPECTED CATA - CHECK MAINT DATA

172662
172660

;SET SYNC SEARCH

;POKE CLK TO GET RECEIVER INTO SYNCROIZATION..
BIC
#CLK,STXCSR
;POKE CLK DOWN

000012
001252
011760

;GO TC THIS TEST WHEN THRU

;SET MAINT DATA, CLK ,BREAK, RMAINTENANCE MODE

172724
172722

e
N
S
LS

00 0o 0o

22£P1

;;THIS TEST VERIFYS WORD LENGTH SELECT OF THE
scRECEIVER SECTION,IT USES THE ERROR FLAGS

1785
1786

1833

SEQ 0036

*OR RECEIVER LOGIC

MOV

#1C,

JSR

PC ,RPOKE

MOV

SHIFT

#1255 TEMP1

;4 OF SHIFTS

‘DATA THAR

SSHIFT IN THIS CHAR

;NOW SHIFT IN A seco~o CHARACTER WITHOUT READING RXDBUF

MOV
MOV

JSR
MOV

01252 TEMP1
SHIFT

FC.R
a14oooo'125 RO

*DATA CHAR
;4 OF

SHIFTS

*SHIFT IN THIS CHAR
:EXPECTED DATA PLUS

DZDUB-C MACY11_30A(1052)
_21-NOV-78
CZDUBD.P11
31-0C7-78 13:59

W
rJ
nJ

b d

006314
006320

006324
006326

017701
020001
001407

PAGE 40

012230

104002

668

104400

b
b
D

000012
006572
000400
000000
000400

012777

064001

006374
006402

012777
052777

006000
000020

006410

042777

020000

052777

020000

006424
006432

042777
052777

020000
020000

HLT

RO,R1

;COMPARE EXP VS. ACT

JSPECIFICALLY LOOK AT RXERR &

JOVRRUN BITS...THEY BOTH SHOULD BE SET

MOV

;POKE

012044

006526
006532
006540

012767
012767

0000 12
0015 24

#1SYMOD ' E IGHT INOPAR !0, 3PARCSR
#SYNSCH.BRXCSR
:SET SYNC SEARCH

BIC
8IS

#CLK,aTXCSR
#CLK.RTXCSR

:POKE CLK DOWN
‘POKE CLK UP

BIC
BIS
MOV

#CLK,BTXCSR
#CLK.BTXCSR
RXDBUF ,R3

;POKE CLK DOWN
‘POKE CLK UP
*SET UP FOR ERROR MESSAGE

MOV
MOV

#10. . SHIFT
#1524, TEMP1

:# OF SHIFTS
*DATA CHAR

HLT

;RXDONE

CLK TO GET LOGIC

JSR
TSTB
8M]

#252
RO ;EXPECTED

PC,RPOKE
*SHIFT
@RXCSR
:RXDONE ?
64$
SHOULD BE

SRXDBUF ,R1

ALT

cMP
BEQ

172400
172376

INTO SYNCRONIZATION

MOV

000012
001524
011516

MMTDATA!
CLK 'MINT 'BREAK ,aTXCSR

MOV
BIS

MOV

012050

012767
012767
004767

sSAVE THIS
;GO TO THIS TEST WHEN THRU
;MASTER RESET
#I1SYMOD ,aPARCSR ;SET THE MODE
#MRESET ,aTXCSR
;MASTER RESET

;POKE CLK TO GET KECEIVER INTO SYNCROIZATION....

(VLN

006512

#10,TSTNO
#TST11 _NEXT
#MRESET ,9TXCSR

;SET MODE ,# OF BITS.PARITY SENSE,ELOAD SYNC REG

—d ek

017701

MOV
MOV
BIS
MOV
8IS

;SET MAINT DATA,CLK,BREAK ,RMAINTENANCE MODE

—

~N
o

105777

“ST10:

WA
=O 000N
NS WN =2 OV

012767
012767
052777
012777
052777

sgEsEizis FIITRBRRATY
Bmwombwm—ao ; ERRRRRERS
:
7 :
d
) e
d
v
d e
d

66$

SCOPE
;2THIS TEST VERIFYS WORD LENGTH SELECT OF THE

D
D
)
) ed ed

D ed

00 00 00 00 00 00 00 00

006330
006336
006344
006352
006360

b —d o
b wnd ol
) cnd e

BEQ

JRXERR € OVRRUN
JACTUAL

::CHAR: 252

006500

aRXDBUF ,R1

JJRECEJVER SECTION,IT USES THE ERROR FLAGS
2:TO DETERMINE THAT IT WAS SELECTED CORRECTLY
;s (OVRRUN ,RXERR)
DE
: ]SYMOD
2 :MO
2sLENGTH:EIGHT

006464
006470

SEQ 0037

MOV

(TM

b ed

000000

V1V,IIIIIIIIINS
19,1
wg W
~
NI NS WN=O0

1834
1835
1836

15:36

RO,RT
65$

IN THIS CHAR

SET

;ACTUAL

~;COMPARE EXPECTED VS. ACTUAL
:RECEIVED DATA DID NOT MATCH
*EXPECTED DATA = CHECK MAINT DATA

*OR RECEIVER LOGIC

MOV
MOV
JSR

#10. ,SHIFT
#1524 TEMP1
PC,RPOKE

;4 OF SHIFTS
*DATA CHAR
‘SHIFT IN THIS CHAR

MOV
MOV

#i0, SHIFT
#1524 TEMPY

;4 OF SHIFTS
‘DATA CHAR

;NOW SHIFT IN A SECOND CHARACTER WITHOUT READING RXDRUF

DZDUB-C MACY11_30A(1052)
21-NOV-78
CZDuBD.P11
31-0CT-78 13:59

006546
006552

QU S
G

140252

JSR
MOV

PC ,RPOKE
#160000!252,R0

01770}

011766

MOV

SRXDBUF ,R1

BEQ

66$

668

WU S
W
S
U QU S

064001

D D

012777
052777

006000
000020

042777
052777

020000
020000

QU
W
U S
WD
G
U

TST11:

D D

012777

NONONOINOININOIND)
NOAWNES
NN =

QU S

006630

QU
W
W

000013
007034
000400
000000
000400

T U QU QAT QT WU W

012767
012767
052777
012777
052777

JSPECIFICALLY LOOK AT RXERR &
;OVRRUN BITS...THEY BOTH SHOULD BE SET

MOV

#11,TSTNO

sSAVE THIS

BIS
MOV
8IS

MMRESET ,aTXCSR

:MASTER RESET

MOV

#TST12 NEXT

;G0 TO THIS TEST WHEN THRU

#1SYMOD ,@PARCSR ;SET THE MCDE
#MRESET ,@TXCSR
;MASTER RESET

#MTDATA ! CLK !MINT !BREAK ,@TXCSR

;SET MODE ,# OF BITS,PARITY SENSE,RLOAD SYNC REG
MOV
BIS

#1SYMOD ! EIGHT !NOPAR!0,aPARCSR
#SYNSCH,@RXCSR
;SET SYNC SEARCH

BIC
BIS

#CLK,aTXCSR
#CLK,aTXCSR

;POKE CLK DOWN
;; POKE CLK UP

#CLK,3TXCSR
#CLK,aTXCSR

;POKE CLK DOWN
;POKE CLK UP

;POKE CLK TO GET RECEIVER INTO SYNCRCIZATION....

s POKE CLg TO GET LOGIC INTO SYNCRONIZATION

042777

RXDBUF ,R3

*SET UP FOR ERROR MESSAGE

#377 R0 :EXPECTED
#10. . SHIFT
#1776, TEMP1
PC ,RPOKE
2§§CSR
sRXDONE

U
Yy U W
O

aRXDBUF ,R1
sACTUAL
ggiR1
s COMPARE EXPECTED VS. ACTUAL

156
154

NN
nory

—

000012
001776
011254

X OF SHIF1S
*DATA CHAR
JSHIFT IN THIS CHAR
?

sRXDONE SHOULD BE SET

64%:

VB WO

;COMPARE EXP VS. ACT

;SET MAINT DATA,CLK,BREAK ,RMAINTENANCE MODE

000000

G
e S
g
S

RO .R1

;:THIS TEST VERIFYS WORD LENGTH SELECT OF THE
JcRECEIVER SECTION,IT USES THE ERROR FLAGS
:TO DETERMINE THAT IT WAS SELECTED CORRECTLY
s+ (OVRRUN ,RXERR)
2 2MODE : ]1SYMOD
JLENGTH:EIGHT
::CHAR:377

WU WU S

HLT

JSHIFT IN THIS (CHAR
EXPECTED DATA PLUS
JRXERR £ OVRRUN
JACTUAL

SCOPE

006572
006600
006606
006614
006622

RRRRREL

[

SEQ 0038

011476

PAGE 41

004767
012700

00000000

\O\O\OOS\OOO\OOOOO\O\OOO\OOOOO
& S X SRR
Booowo«mbwm- 323323388 E2LK 333

1890
1891
1892

15:36

65%:
JSR

sRECEIVED DATA DID NOT MATCH
SEXPECTED DATA = CHECK MAINT DATA
;OR RECEIVER LOGIC

#10. ,SHIFT
#1776, TEMP1

PC.,RPOKE

;4 OF SHIFTS
;DATA (CHAR

JSHIFT IN THIS CHAR

JNOW SHIFT IN A SECOND CHARACTER WITHOUT READING RXDBUF

?%DtB-C MACY11_30A(1052)
_21-NOV-78
DUBD.P11
31-0CT-78 13:59

15:36

PAGE 42

SEQ 0039

1946 006774 012767 000012 172136

MOV

#10.,SHIFT

;4 OF SHIFTS

1949

MOV

#14600001377,R0

-EXPECTED DATA PLUS

1947
1948

007002
007010

012767
004767

001776
011234

1950
1951
1952

007020
007024

017701
020001

011524

007030

104002

1953

007026

007032
007032

012700

MOV
JSR

140377

001401

1980
1981
1982
1983
1984
1985

1986
1987

SCOPE
:;THIS TEST VERIFYS WORD LENGTH SELECT OF

007034
007042
007050
007056
007064

012767
012767
052777
012777
052777

000014
007276
000400
000000
000400

172064
172046
011502
011470
011466

007072

012777

064001

011460

007100

012777

006000

011446

007106

052777

020000
020000

011436
011430

007130
007136
007144
007150

042777
052777
016703
012700

020000
0720000
011400
000000

011422
011414

004767
105777

011054
011344

007154
007162

012767
012767

007200

100401

007214

104002

007212

007216

007224

000012
001000

T<T12:

THE

: ISYMOD

:CHAR:0

171756
171754

104000

¢SET MODE

B:S

012767

001000

171714

171712

#1SYMOD ! E1GHT !NOPAR'0,aPARCSR
#SYNSCH,3RXCSR

:SET SYNC SEARCH

81C
#CLK,@TXCSR
:POKE CLK DOWN
8IS
#CLK.BTXCSR
:POKE CLK UP
;POKE CLK TO GET LOGIC INTO SYNCRONIZATION
BIC
#CLK,3TXCSR
;POKE CLK DOWN
BIS
#CLK.ITXCSR
*POKE CLK UP
MOV
RXDBUF ,R3
*SET UP FOR ERROR MESSAGE
MOV
#0.RO * ;EXPECTED

MOV
MOV

#10., SHIFT
#1000, TEMP1

BM]

64$

MOV
CMP

aRXDBUF ,R1
JACTUAL
RO,RT
;COMPARE EXPECTED VS. ACTUAL

HLT

JSR
TSTB

HLT

BEQ

000012

;SAVE THIS
;:GC TO THIS TEST WHEN THRU
;MASTER RESET
;SET THE MODE
;MASTER RESET

:POKE CLK TO GET RECEIVER INTO SYNCROIZATION....

001401

012767

#12,TSTNO
#TST13 NEXT
W#MRESET ,@TXCSR
#1SYMOD ,@PARCSR
#MRESET ,8TXCSR

,# OF BITS,PARITY SENSE,8LOAD SYNC REG

MCV

64$:

011340

MOV
MOV
BIS
MOV
BIS

;SET MAINT DATA,CLK
,BREAK ,EMAINTENANCE MODE
MOV
#MTDATA! CLK !MINT !BREAK ,@TXCSR

011430

042777
052777

1996

2001

000020

007114
007122

017701
020001

2000

;SPECIFICALLY LOOK AT RXERR &
*OVRRUN BITS...THEY BOTH SHOULD BE SET

007202
007204
007204
007210

1998
1999

66§

2 JLENGTH:EIGHT

1991
1992
1993
1994

1997

HLT

007170
007174

1995

*RXERR £ OVRRUN
SRXDBUF ,R1
*AC TUAL
RO,R1T
;COMPARE EXP VS. ACT

JsRECEIVER SECTION,IT USES THE ERROR FLAGS
;sTO DETERMINE THAT IT WAS SELECTED CORRECTLY
2 (OVRRUN,RXERR)

1988
1989

1990

‘DATA CHAR
‘SHIFT IN THIS CHAR

MOV
CMP

668:

104400

ERRERRERELT
$geggggecy
BQ\JO\J'J\LNN—*O

) wmed —d
b
b
b
e emd e
—

969

#1776, TEMP
PC ,RPOKE

BEQ

1954
1955
1956
1957
1958

007014

172134

65%

;4 OF SHIFTS
‘DATA CHAR

PC .RPOKE
“SHIFT IN THIS CHAR
@RXCSR
;RXDONE ?
:RXDONE SHOULD BE SET

65$

:RECEIVED DATA DID NOT MATCH

JEXPECTED DATA - CHECK MAINT DATA

*OR RECEIVER LOGIC

MOV

20, SHIFT

#1000, TEMP1

;8 OF SHIFTS

*DATA CHAR

DZDUB-C MACY11_30A(1052)
_21-NOV-78
CZDUBD .P11
31-0CT-78 13:59

2002
2003

007232

004767

011012

2004

007236

012767

000012

2006

007:52

007256

004767

012700

010772

2009
2010

007262
007266

017701
020001

2012
2013
2014
2015
2016
2017

007272

104002

15:36

171674

2005 007244 012767 001000 171672

2007

2008

2011

007270

007274
007274

PAGE 43

JSR
PC ,RPOKE
;SHIFT IN THIS CHAR
;NOW SHIFT IN A ssco~o CHARACTER WITHOUT READING RXDBUF

MOV

140000

MOV

#140000'0,R0

011262

MOV
CTMP

@RXDBUF ,R1
*ACTUAL
RO,R1
:COMPARE EXP VS. ACT

HLT

JSR

001401

BEQ
66%:

104400

012767
012767
052777
012777
052777

000015
007524
000400
020000
000400

171622
171604
011240
011226
011224

2030
ggg;

007334

012777

064001

011216

007342

012777

020600

011204

2036
2037
2038

007350

052777

000020

2039
20640
2041

007356
007364
007372
007376
007402

042777
052777
016703
012700
012767

020000
020000
011152
000025
000005

2043

007416

004767

010626

20462
2064

007410
007422

2045 007426

20466
2047

2048

2049
2050
2051

007430
007432

007432

007436
007440
007442

012767
105777

100401

000025

011174
011166

:EXPECTED DATA PLUS
;RXERR & OVRRUN

;SPECIFICALLY LOOK AT RXERR £
SOVRRUN BITS...THEY BOTH SHOULD BE SET

SCOPE
::THIS TEST VERIFYS WORD LENGTH SELECT OF THE
$:RECEIVER SECTION,IT USES THE ERROR FLAGS

017701

020001
001401
104002

000005

2057

007460

004767

010564

012767

;SET MODE

000025

HAR:25

BIS

#SYNEXT!F
IVE 'NOPAR !0, @PARCSR
#SYNSCH,@RXCSR

;SET SEARCH SYNC

MOV
MOV
MOV

RXDBUF ,R3
;SET UP FOR ERROR MESSAGE
#25,R0°
;EXPECTED
#5 SHIFT
:# OF SHIFTS

JSR

PC,RPOKE

MOV
TSTB

64%:

HLT

MOV

CMP
BEQ
HLT

171464

:SAVE THIS
;GO TO THIS TEST WHEN THRU
;MASTER RESET
:SET THE MODE
-MASTER RESET

;POKE CLK TO GET LOGIC INTO SYNCRONIZATION
BIC
#CLK,@TXCSR
:POKE CLK DOWN
BIS
#CLK.@TXCSR
‘POKE (LK UP

BMI

171466

#13,TSTNO
#TST14 NEXT
MRESET ,@TXCSR
#SYNEXT .@PARCSR
MMRESET.3TXCSR

,# OF BITS,PARITY SENSE,ZLOAD SYNC REG

MOV

171526

011112

012767

MOV
MOV
8IS
MOV
BIS

;SET MAINT DATA,CLK.,BREAK,EMAINTENANCE MODE
MOV
MMTDATA CLK 'MINT 'BREAK ,aTXCSR

171530

104000

007444
007444

007452

011166

TST13:

011116

2052
2053
2054
2055

2056

66$

:DATA CHAR

*SHIFT IN THIS CHAR

: : (OVRRUN ,RXERR)
..MODE SYNEXT
..LENGTH FIVE
007276
007304
007312
007320
007326

2035

PC ,RPOKE

$:T70 DETERMINE THAT IT WAS SELECTED CORRECTLY

2024
2025
2026
2027
gggg

2034

;# OF SHIFTS

»1006 TEMP1

2019
2020
2021

2033

SHIFT

MOV

2018

2053

SEQ 0040

65%

#25 TEMP1
@RXCSR

64%

*DATA CHAR

“SHIFT IN THIS CHAR

;RXDONE ?

SRXDONE SHOULD BE SET

SRXDRUF ,R1
RO,RT
653
2

;ACTUAL

;COMPARE EXPECTED VS. ACTUAL
JRECEIVED DATA DID NOT MATCH

JEXPECTED DATA = CHECK MAINT DATA
:OR RECEIVER LOGIC

MOV

#S SHIFT

;4 OF SHIFTS

-SR

PC .RPOKE

JSHIFT IN THIS (HAR

MOV

#28 TEMPT

‘DATA CHAR

0ZDUB-C MACY11_30A(1052)
21-NOV-78
CZDbuUBD. P11
31-0C7-78 13:5

2058
2059
2060
2061

007464

012767

15:36

171446
171444

PAGE 44

SEQ 0041

s NOW SHI;& IN A SECON?FgHARACTER WITHOUT READING RXDBUF

017701
020001
001401

MOV
JSR
MOV

025 TEMP1
p1£0000.25.no

*DATA CHAR
SSHIFT IN THIS CHAR
:EXPECTED DATA PLUS

MOV

aRXDBUF ,R1

*ACTUAL

TMP

BEQ

104002

“8

104400

SHIFTS

*RXERR £ OVRRUN

RO,RT

~;COMPARE EXP VS. ACT

;SPECIFICALLY LOCK AT RXERR &

66$

HLT

# OF

*OVRRUN BITS...THEY BOTH SHOULD BE SET

SCOPE

;:THIS TEST VERIFYS WORD LENGTH SELECT OF THE
$:RECEIVER SECTION,IT USES THE ERROR FLAGS
$:TO DETERMINE THAT IT WAS SELECIED CORRECTLY
+ 2 (OVRRUN,RXERR)

2 2MODE : SYNEXT
SSLENGTH:FIVE

;:CHAR:12
012767
012767
052777
012777
052777

000016
007752
000400
020000
000400

012777

064001

010770

012777
052777

020000
000020

010756
010740

042777
052777
016703
012700
012767
012767
004767
105777

020000

010746
010740

wf\.\—aogm\laag

e ——d
——d

#16,TSTNO

8IS
MOV
BIS

#MRESET,aTXCSR
;MASTER RESET
NSYNEXT .@PARCSR :SET THE MODE
MMRESET.@TXCSR
:MASTER RESET

MOV

#TST15 NEXT

MOV

THIS

;GO TO THIS TEST WHEN THRU

MMTDATA ' CLK 'MINT !BREAK , @aTXCSR

MOV
BIS

ASYNEXT 'F IVE '\NOPAR' 0, aPARCSR
#SYNSCH,@RXCSR
;SET SEARCH SYNC

BIC
BIS

#CLK,ATXCSR
#CLK .aTXCSR

;POKE CLK TO GET LOGIC INTO SYNCRONIZATION

;POKE CLK DOWN
*POKE CLK UP

MOV
MOV

RXDBUF ,R3
SSET UP FOR ERROR MESSAGE
#12,R0°
EXPECTED

MOV

#12, TEMP1

MOV

010664

SHIFT

JSR
TSTB

PC,RPOKE
@RXCSR
:RXDONE

HLT

:RXDONE

BMI

MOV

CMP
BEQ
HLT

64$

RO,R1T
65$
2

;4 OF

SHIFTS

*DATA CHAR

SSHIFT
?

SHOULD BE

SRXDBUF ,R1

000005
000012
010336

;SAVE

:SET MODE .# OF BITS,PARITY SENSE,ELOAD SYNC REG

=000

b e
cd
b
b
—

ST NT,N7, 81,87,
§Y,NY,¥1,§1,.N}

017701

MOV

:SET MAINT DATA,CLK,BREAK ,BMAINTENANCE MODE

121
171300

100401
104000

2103

TST14:

IN THIS

CHAR

SET

:ACTUAL

~;COMPARE EXPECTED VS.

ACTUAL

;RECEIVED DATA DID NOT MATCH

*EXPECTED DATA - CHECK MAINT DATA

:0R RECEIVER LOGIC

MOV

MOV
JSR

. NOW SHIFT

#S, SHIFT

#12, TEMP

;4 OF

SHIFTS

‘DATA CHAR

P, RPOKE
JSHIFT IN THIS CHAR
IN A SECOND CHARACTER WITHOUT READING RXDBUF

N=20 000NN

P
G il S

i i

PNOPON)
= 2 Db

NINIAININININININ)

S 44

DZDUB-C MACY11_30A(1052)
21-NOV-78
(zbusd P
31-0C7-78 13:59

007712
007720

012767

000005
000012
010316

15:36

PAGE 45

171220
171216

SEQ 0042

MOV

#S SHIFT

;¥ OF SHIFTS

JSR

PC,RPOKE

*SHIFT IN THIS CHAR

MOV

#12, TEMPY

‘DATA CHAR

140012

MOV

010606

MOV
CMP

*RXERR £ OVRRUN
SRXDBUF ,R1
*ACTUAL
RO,R1
;COMPARE EXP VS. ACT

HLT

BEQ
"
104400

#140000'12,R0

66$

:EXPECTED DATA PLUS

;SPECIFICALLY LOOK AT RXERR &

“OVRRUN BITS...THEY BOTH SHOULD BE SET

SCOPE

::THIS TEST VERIFYS WORD LENGTH SELECT OF

THE

*:RECEIVER SECTION.IT USES THE ERROR FLAGS
$:TO DETERMINE THAT IT WAS SELECTED CORRECTLY
: : (OVRRUN ,RXERR)
DE
: SYNEXT
* *MO
SLENGTH:FIVE
012767
012767
052777
012777
052777

000017
010200
0004
020000
000400

010010

012777

064001

007752
007760
007766
007774
010002

VIV
— —

;:CHAR:3?
TST15:

MOV
MOV
BIS
MOV
BIS
MOV

8IS

#SYNSCH,IRXCSR

. SET SEARCH SYNC

8IC

#CLK,ATXCSR
#CLK,3TXCSR

cPOKE CLK DOWN
sPOKE CLK UP

#37, TEMP1

:DATA CHAR

;POKE CLK TO GET LOGIC INTO SYNCRONIZATION

RXDBUF ,R3
“SET UP FOR ERROR MESSAGE
#37.R0
;EXPECTED
#5 SHIFT
;¥ OF SHIFTS

WRy—=
538¥CS&;?3>0«>8ynuununnunnuwg
ele RNTe SV, PNVIT,N]

2150

b o

d —d

PC ,RPOKE
2§§CSR
SRXDONE

012767

000005

—

000005
000037
010110

[ le]

012767
012767
004767

65%:
JSR

170772

IN THIS CHAR

aRXDBUF ,R1
sACTUAL
ggiR1
; COMPARE EXPECTED VS. ACTUAL

010436

JSHIFT
?

JRXDONE SHOULD BE SET

64%:

nd wd o
=D
d e

MMTDATA!CLK
!MINT !BREAK ,aTXCSR

:SET MODE .4 OF BITS,PARITY SENSE,GLOAD SYNC REG
H#SYNEXT !F IVE !NOPAR!0Q,@PARCSR
MOV

042777
052777

;SAVE THIS
;GC TO THIS TEST WHEN THRU
:MASTER RESET
:SET THE MODE
:MASTER RESET

;SET MAINT DATA,CLK,BREAK,BMAINTENANCE MODE

012777
052777

MNUMNNLNLNLALALNLNLPLALNLALNI
NV NLNLNIN)

#15,TSTNO
#TST16,NEXT
MMRESET,3TXCSR
#SYNEXT.@PARCSR
MMRESET.RTXCSR

JRECEIVED DATA DID NOT MATCH
JEXPECTED DATA = CHECK MAINT DATA
;OR RECEIVER LOGIC

#S,SHIFT

:# OF

PC.RPOKE

SSHIFT

#37 TEMPY

SHIFTS

:DATA CHAR

IN THIS

CHAR

cNOW SHIFT IN A St "OND CHARACTER WITHOUT READING RXDBUF
MOV

#5,SHIFT

JH OF

SHIFTS

D%DUB*C MACY11_30A(1052)
21-NOV-78
DUBD .P11
31-0CT-78 13:59

010146
010154
010160
010164
010170
010172
010174

#37 ., TEMP1

1460037

MOV

#140000!37 RO

010360

MOV

aRXDBUF ,R1

BEQ

66§

17C770

JSR

CMP

104002

66%

104400

HLT

JEXPECTED DATA PLUS

JRXERR £ OVRRUN
sACTUAL

;COMPARE EXP VS. ACT

JSPECIFICALLY LOOK AT RXERR &

;OVRRUN BITS...THEY BOTH SHOULD BE SET

SCOPE

;oTHIS TEST VERIFYS WORD LENGTH SELECT OF THE
;;RECEIVER SECTION,IT USES THE ERROR FLAGS

Slhr
S
-S

010230

012767
012767
052777
012777
052777

000020
010426
000400
020000
000400

010336
010324
010322

010236

012777

064001

010314

010244
010252

012777
052777

020000
000020

010302
010264

010260

042777
052777
016703

JSHIFT IN THIS CHAR

RO R1

THAT

;. (OVRRUN ,RXERR)
E
: SYNEXT
; JMOD
;sLENGTH:FIVE
JsCHAR:O

;DATA (CHAR

PC ,RPOKE

csTO DETERMINE

Sl Sk
i S-Sl
i S-Sl

2200

SEQ 0043

MOV

000037
010070

8 SYRIREC28BBIRAR

017701

020001
001401

PAGE 46

[o ]

A ALNINIALAINI
AL NI NININI NI NININ)

010176
010176

012767

15:36

170720
170702

010272
010264

007724
010214

MOV
MOV
8IS

MOV
8IS

MOV
MOV

BIS

BIS
MOV
MOV
MOV
MOV
JSR
B8M]
HLT

MOV

(MP
EEQ
HLT

170544

#SYNEXT ,@PARCSR ;SET THE MODE
#MRESET ,ATXCSR
;MASTER RESET

MMTDATA!CLK!MINT !BREAK,aTX(SR

#SYNEXT !F IVE !NOPAR!(0,aPARCSR

#SYNSCH,aRXCSR

;SET SEARCH SYNC

#CLK,aTXCSR
#CLK ,@TXCSR

sPOKE CLK DOWN
;POKE CLK UP

;POKE CLgIEO GET LOGIC INTO SYNCRONIZATION

64%:

170542

;SAVE THIS
<GO TO THIS TEST WHEN THRU
;MASTER RESET

;SET MODE .4 OF BITS,PARITY SENSE,S&LOAD SYNC REG

TSTB

170564
170562

#16,TSTNO
#TST17 NEXT
MMRESET,8TXCSR

;SET MAINT DATA,CLK,BREAK,EMAINTENANCE MODE

170626
170624

010210

000005
000000

TST16:

IT WAS SELECTED CORRECTLY

65%:

RXDBUF ,R3
:SET UP FOR ERROR MESSAGE
#0,RO
EXPECTED
#5,SHIF
;A OF SHIFTS
#O.TEMP1
;DATA (HAR
PC ,RPOKE
sSHIFT IN THIS CHAR
2§§CSR
sRXDONE ?
JRXDONE

SHOULD BE

SET

aRXDBUF ,R1
sACTUAL
22§R1
s COMPARE EXPECTED VS.

MOV
MOV
JSR

45,SHIFT
#0,TEMP

MOV
MOV

., SHIFT

PC ,RPOKE

ACTUAL

JRECEIVED DATA DID NOT MAT(H

JEXPECTED DATA - CHECK MAINT DATA
;OR RECEIVER LOGIC
4 OF SHIFTS
;DATA (HAR
JSHIFT

THIS

CHAR

JNOW SHIFT IN A SECOND CHARACTER WITHOUT READING RXDBUF
#0,TEMPI

R OF

SHIFTS

sDATA (HAR

DZDUB-C MACY11_30A(1052)
21-NOV-78
C2DuUBD P11
31-0C7-78 13:59

010402
010406

004767

010412
010416
010420
010422

017701
020001
001401

010424
010424

012700

15:36

PAGE 47

007642

JSR

140000

MOV

010132

MOV

CMP

BEQ

104002

66%

104400

HLT

SEQ 0044
PC ,RPOKE

#140000'0,R0

JSHIFT IN THIS CHAR

JEXPECTED DATA PLUS

JRXERR £ OVRRUN
@RXDBUF ,R1
:ACTUAL
RO,R1
;COMPARE EXP VS. ACT

66$

SCOPE

JSPECIFICALLY LOOK AT RXERR &

sOVRRUN BITS...THEY BOTH SHOULD BE SET

;s THIS TEST VERIFYS WORD LENGTH SELECT OF THE
JJRECEIVER SECTION,IT USES THE ERROR F_AGS
;2TO DETERMINE THAT 1T WAS SELECTED CORRECTLY
. (OVRRUN ,RXERR)

T
E
: SYNEX
;. JMOD
s sLENGTH:SIX

:
;:CHAR25

012767
012767
052777
012777
052777

000021
010654
000400
020000
000400

170472
170454
010110
010076
010074

012777

064001

010066

012777
052777

022000
000020

010054
010036

042777
052777
016703
012700

020000
020000
010022
000025
000006
000025
007476
007766

010044
010036

017701
020001
001401

TST17:

;SET MODE

BIS
MOV
MOV
MOV

012767
012767
004767

000006
000025
007414

170316
170314

TEST WHEN THRU

#SYNEXT!SIX!NOPAR!Q,aPARCSR
#SYNSCH,@RXCSR

;SET SEARCH SYNC

#CLK,aTXCSR
#CLK,ITXCSR

;POKE
;POKE

CLK DOWN
CLK UP

#6 SHIFT

4 OF

SHIFTS

PC.RPOKE

YSHIFT

65%:

RXDBUF ,R3
“SET UP FOR ERROR MESSAGE
#25.R0°
EXPECTED

MOV

#25, TEMPY

T1ST8B

g§§CSR

JSR

104002

170336
170334

THIS
G0 TO THIS
;MASTER RESET
;SET THE MCDE
;MASTER RESET

;POKE CLgIEO GET LOGIC _INTO SYNCRONIZATION

BMI
HLT

:RXDONE

‘DATA CHAR

IN THIS

CHAR

;RXDONE SHOULD BE SET

MCv
(MP

ARXDBUF ,R1
;ACTUAL
22‘R1
: COMPARE " EXPECTED VS.

HLT

MOV
MOV
JSR

#25 TEMP

‘DATA CHAR

MOV

226 TEMPI

:DATA CHAR

BEQ

000006
000025
007434

:SAVE

,# OF BITS,PARITY SENSE.,LLOAD SYNC REG

MOV
8IS

64%:

012767
012767
004767

#17,TSTNO
NTST18 NEXT
#MRESET ,9TXCSR
#SYNEXT ,aPARCSR
#MRESET ,@TXCSR

JSET MAINT DATA,CLK,BREAK ,ZMAINTENANCE MODE
MOV
AMMTDATA!CLK!MINT
'BREAK ,aTX(SR

170400
170376

007762

MOV
MOV
BIS
MOV
BIS

ACTUAL

:RECEIVED CATA DID NOT MATCH
SJEXPECTED DATA = (HECK MAINT DATA
;OR RECEIVER LOGIC

#6 SHIFT

:# OF

SHIFTS

PC . RPOKE
“SHIFT IN THIS CHAR
JNOW SHIFT IN A SECOND CHARACTER WITHOUT READING RXDBUF
MOV
#6 SHIFT
;4 OF SHIFTS

JSR

P(C,RPOKE

JSHIFT IN THIS (HAR

DZDUB-C MACY11_30A(1052)
21-NOV-78
CZDUBD P11
31-0CT-78 13:59

15: 36

PAGE 48

SEQ 0045

010634

012700

140025

MOV

#160000:25,R0

010640
010644
010646
010650

017701
020001
001401

207704

MOV
cMP
BEQ
HLT

010652
010652

104002

663%:

104400

SCOPE

;o THIS

;EXPECTED DATA PLUS
;RXERR & OVRRUN
@RXDBUF ,R1
sACTUAL
22§R1
;COMPARE EXP VS. ACT

sSPECIFICALLY LOOK AT RXERR &
sOVRRUN BITS...THEY BOTH SHOULD BE SET

TEST VERIFYS WORD LENGTH SELECT OF

THE

s;RECEIVER SECTION,IT USES THE ERROR FLAGS
:.TO DETERMINE THAT IT WAS SELECTED CORRECTLY
;- (OVRRUN,RXERR)
T
E
: SYNEX
; JMOD
JILENGTH:SIX

;;CHAR:S52
012767
012767
052777
012777
052777

000022
011102
000400
020000
000400

007662
007650
007646

012777

064001

007640

012777
052777

022000
000020

007626
007610

042777
052777
016703
012700
012767
012767

020000

007616
007610

170244
170226

1ST18:

MOV

#18,TSTNO

;SAVE

81S
MOV
8IS

MRESET ,aTXCSR

;MASTER RESET

MOV

;SET MODE

gWN
on

QOO

FIAR

H#SYNEXT!SIX!NOPAR!Q,aPARCSR
#SYNSCH,aRXCSR
;SET SEARCH SYNC
sPOKE

CLK UP

26, SHIFT

;R OF

SHIFTS

RXDBUF ,R3
:SET UP FOR ERROR MESSAGE
#52.R0°
EXPECTED

455, TEMP1
PC ,RPOKE

SSHIFT

IN THIS CHAR

aRXDBUF ,R1
JACTUAL
22§R1
; COMPARE EXPECTED VS. ACTUAL

65%:

;RXDONE

‘DATA CHAR

JRXDONE SHOULD BE SET

64%:

140052

;POKE CLK DOWN

#CLK,aTXCSR

2§§CSR

AN =D et D
(oo
¥ Neole)

b
b
D
b
b

MMTDATA!CLK!MINT !BREAK,aTXCSR

#CLK,aTXCSR

170152

000006
000052
007166

;SET THE MODE
;MASTER RESET

;POKE CLK TO GET LOGIC INTO SYNCRONIZATION

170150

000052
007206

;60 TO THIS TEST WHEN THRU

,# OF BITS,PARITY SENSE,RLOAD SYNC REG

MOV
BIS

elelalelelels

anaan

Sdd
2

OO0

—aOaS

#SYNEXT ,@PARCSR
#MRESET ,@TXCSR

THIS

;SET MAINT DATA,CLK,BREAK ,8MAINTENANCE MODE

011000

OO0

#TST19 NEXT

JRECEIVED DATA DID NOT MATCH

;EXPECTED DATA = CHECK MAIN) DATA
;OR RECEIVER LOGIC

MOV
MOV
JSR

#6,SHIFT

MOV
JSR
MOV

#52, TEMP1

#52, TEMP

;4 OF

SHIFTS

‘DATA THAR

PC ,RPOKE
*SHIFT IN THIS CHAR
NOW SHIFT IN A SECOND CHARACTER WITHOUT READING RXDBUF
#6 SHIFT
MOV
;4 OF SHIFTS
FC.RPOK E
#140000!52,R0

*DATA CHAR

SSHIFT IN THIS CHAR
;EXPECTED DATA PLUS

DZDUB-C MACY11_30A(1052)
21-NOV-78
CZDUBD .P11
31-0CT-78 13:59

2338
2339
23%0

2341

2342
233
2344
23S
2346
2347

011066
011072

0177017
020007

011076

104002

0110764

011100
011100

15:36¢

PAGE 49

007456

001401

MOV
CMP

:RXERR €& OVRRUN
SRXDBUF ,R1
*ACTUAL
RO,R1
;COMPARE EXP VS. ACT

HLT

BEQ
668:

104400

SEQ 0046

66$

;SPECIFICALLY LOOK AT RXERR &
SOVRRUN BITS...THEY BOTH SHOULD BE SET

2348

SCOPE
;:THIS TEST VERIFYS WORD LENGTH SELECT OF THE
:;RECEIVER SECTION,IT USES THE ERROR FLAGS
$:T0 DETERMINE THAT IT WAS SELECTED CORRECTLY

2350
2351

: 2MODE
: SYNEXT
J:LENGTH:SIX

2349

¢ : (OVRRUN,RXERR)

g%g%

2354
2355
2356
2357
Sggg

SiCHAR:77
011102
011110
011116
011124
011132

012767
012767
052777
012777
052777

000023
011330
000400
020000
000400

170016
170000
007634
007422
007420

011140

012777

064001

007412

011146
011154

012777
052777

022000
000020

007400
007362

2368
2369
2370
2371

011162
011170
011176
011202
011206

042777
052777
016703
012700
012767

020000
020000
007346
000077
000006

007370
007362

2373
2374
2375
2376
2377
2378
2379
2380
2381

011222
011226
011232
011234
011236
011236
011242
011244
011246

004767
105777
100401
1046000

007022
007312

2383
2384
2385
2386

011250
011250
011256

2360

23%3
2364
2365
2366
2367

2372

2382

2387
2388
2389

2390
2391
2392
2393

011214

011264

012767

017701
020007
001401
104002

012767
012767

004767

000077

006760

011270

012767

000006

011310

012700

140077

011276
011304

012767
004767

000077
006740

MOV

167640

:SAVE THIS
;GO TO THIS TEST WHEN THRU
;MASTER RESET
-SET THE MODE
:MASTER RESET

MMTDATA ! CLK 'MINT 'BREAK , @TXCSR

BIS
MOV
MOV
MOV

#CLK.TXCSR
SPOKE CLK UP
RXDBUF ,R3
*SET UP FOR ERROR MESSAGE
#77 RO
;EXPECTED
#6,SHIFT
:# OF SHIFTS

JSR
TSTB
BM]
ALT

PC,RPOKE
SSHIFT IN THIS CHAR
@RXCSR
;RXDONE 2
64$
:RXDONE SHOULD BE SET

MOV

64$:

167642

#19,TSTNO
#TST20 . NEXT
MMRESET .3TXCSR
#SYNEXT .aPARCSR
MMRESET.3TXCSR

;SET MODE ,# OF BITS,PARITY SENSE.ZLOAD SYNC REG
MOV
#SYNEXT
! SIX'NOPAR 0, aPARCSR
BIS
#SYNSCH,aRXCSR ;SET SEARCH SYNC
;POKE CLK TO GET LOGIC INTO SYNCRONIZATION
BIC
#CLK,aTXCSR
:POKE CLK DOWN

167722

167662
167660

MOV
MOV
BIS
MOV
BIS

;SET MAINT DATA,CLK,BREAK,EMAINTENANCE MODE

167724

007306

000006
000077

~ST19:

65%:

MOV
cMP
BEQ
HLT

#77 . TEMP1

‘DATA CHAR

SRXDBUF ,R1
:ACTUAL
RO,RT
~;COMPARE EXPECTED VS. ACTUAL
65$
2
;RECEIVED DATA DID NOT MATCH

JEXPECTED DATA = CHECK MAINT DATA
:OR RECEIVER LOGIC

MOV
MOV

JSR

6, SHIFT
877, TEMP1

PC.,RPOKE

;¥ OF SHIFTS
‘DATA CHAR

SSHIFT IN THIS CHAR

;NOW SHIFT IN A SECOND CHARACTER WITHOUT READING RXDBUF
MOV
#6, SHIFT
;4 OF SHIFTS

MOV
JSR

MOV

477 TEMP?
PC ., RPOKE

#°70000'77,R0

:DATA CHAR
SSHIFT IN THIS CHAR
:EXPECTED DATA PLUS
JRXERR £ OVRRWN

DZDUB~C MACY11_30A(1052)
21-NOV-78
CZDUBD.P11
31-0CT-78 13:59

239

011314

017701

2395

011320

020001

2397
2398
2399
2600
2401

011324

104002

2396

011322

011326

15:36

PAGE 50

007230

SEQ 0047

MOV

SRXDBUF ,R1

BEQ

66§

cMP

001401

HLT

66%:

104400

24602

:COMPARE EXP VS. ACT

;SPECIFICALLY LOOK AT RXERR &
;OVRRUN BITS...THEY BOTH SHOULD BE SET

SCOPE
::THIS TEST VERIFYS WORD LENGTH SELECT OF THE

;;RECEIVER SECTION,IT USES THE ERROR FLAGS

2603

::TO DETERMINE THAT IT WAS SELECTED CORRECTLY

2604

: : (OVRRUN,RXERR)

5285

;:CHAR:0

2605
2606
2609
2610
2611
2612
52}2
2615

gzgg

2618
2619
2620
2621
2622
2623
26264
2425
2626
2627
2428
2629

2430

2631
2632

2633

2635

2636
2437
2438
2639
26460

2 :MODE
: SYNEXT
S:LENGTH:SIX
011330
011336
011344
011352
011360

012767
012767
052777
012777
052777

000024
011556
000400
020000
000400

167570
167552
007206
007174
007172

011366

012777

064001

07164

0113764
011402

012777
052777

022000
000020

007152
007134

011410
011416
011426
011430
011434
011442
011450
011456

042777
052777
016703
012700
012767
012767
004767
105777

020000
020000
007120
000000
000006
000000
006574
007064

007142
007134

011462
011464

104000

011460

100401

011464

017701

011472

001401

011470

011474

020001

2442
2643

011512

004767

006532

2645

011526

2446

011516

011532

012767

006767

2647

011536

012700

2649

011542

017701

2448

MOV
MOV
BIS
MOV
BIS

000000

MOV

000006

000000

006512

167414

167412

THIS
;GO TO THIS TEST WHEN THRU
;MASTER RESET
:SET THE MODE
:MASTER RESET

#MTDATA'! CLK 'MINT 'BREAK ,@TXCSR

BM]

648

MOV

@RXDBUF ,R1

BEQ

65$

HLT
MP

167434

;SAVE

;SET MODE .# OF BITS,PARITY SENSE,SLOAD SYNC REG
MOV
#SYNEXT!'SIX'NOPAR!(Q,aPARCSR
BIS
#SYNSCH,3RXCSR
;SET SEARCH SYNC
;POKE CLK TO GET LOGIC INTO SYNCRONIZATION
BIC
#CLK,@TXCSR
:POKE CLK DOWN
BIS
#CLK.@TXCSR
:POKE CLK UP
MOV
RXDBUF ,R3
;SET UP FOR ERROR MESSAGE
MOV
#0,R0
;EXPECTED
MOV
#6,SHIFT
:# OF SHIFTS
MOV
#0 . TEMPI
:DATA CHAR
JSR
PC,RPOKE
SSHIFT IN THIS CHAR
TSTB
SRACSR
;RXDONE ?

66$:

167432

#20,TSTNO
#TST21 NEXT
MMRESET ,8TXCSR
#SYNEXT ,@PARCSR
#MRESET.QTXCSR

;SET MAINT DATA,CLK,BREAK,SMAINTENANCE MODE

HLT

000006

2644

TST20:

104002

012767

011506

167476
167474

007060

011476
011476

2661

;ACTUAL

RO,RT

65%:

;RXDONE SHOULD BE SET
;ACTUAL

RO,RT

:COMPARE EXPECTED VS. ACTUAL

;RECEIVED DATA DID NOT MATCH
:EXPECTED DATA - CHECK MAINT DATA

:OR RECEIVER LOGIC
MOV

#6,SHIFT

;# OF SHIFTS

MOV

#0. TEMP1

:DATA CHAR

MOV

#6,SHIFT

:# OF

JSR
PC .RPOKE
SSHIFT IN THIS CHAR
INOW SHIFT IN A SECOND CHARACTER W]THOUT READING RXDBUF
MOV
JSR

#0, TEMP1

PC .RPOKE

SHIFTS

:DATA CHAR

SSHIFT

IN THIS CHAR

140000

MOV

#140000'0,R0

;EXPECTED DATA PLUS

067002

MOV

@RXDBUF ,R1

SAC TUAL

:RXERR & OVRRUN

DZDUB-C MACY11_30A(1052)
_21-NOV-78
C2DUBD.P11
31-0CT=-78 13:59

2650

2651

2652
2653
2654
2655
2456
2657
2658

0115646

PAGE

020001

011550

001401

011554
011554

104400

011552

15:36

CMP

BEQ

104002

ALT

668:

2459

011556
011564
011572
011600
011606

012767
012767
052777
012777
052777

000025
0120064
000400
020000
000600

167342
167324
006760
006746
006744

2470
gz;;

011614

012777

064001

006736

473
2674
2675
2476
2677
2478
2679

011622
011630

012777
052777

024000
000020

006724
006706

011636
011644
011652

042777
052777
016703

020000
020000
006672

006714
006706

2481

011662

012767

000007

167250

2483
2484
2485
2486
2487

011676
011702
011706
011710
011712

004767
105777
100401
104000

2489

011716

020001

011722

104002

2490

2491
2492

2493
2694

011656
011670

011712

011720

011724

012700
012767

017701

000125
000125

006346
006636

000007

2497
2498
2499

011740

004767

006304

2501
2502
2503
2504
2505

;SPECIFICALLY LOOK AT RXERR &
SOVRRUN BITS...THEY BOTH SHOULD BE SET

SCOPE
:;THIS TEST VERIFYS WORD LENGTH SELECT OF THE
*SRECEIVER SECTION.IT USES THE ERROR FLAGS
$2TO DETERMINE THAT IT WAS SELECTED CORRECTLY

011744

011752

011760
011764
011770
011774

012767

000125

012767

000007

004767
012700
]
017707
020001

006264
140125

012767

MOV
MOV
BIS
MOV
8IS

#125.R0 ;EXPECTED

MOV

2125, TEMP1

JSR
TSTB
8M]
HLT

000125
006554

167166

167164

65%:

A7, SHIFT

4 OF SHIFTS

‘DATA CHAR

PC . RPOKE
SSHIFT IN THIS CHAR
@RXCSR
:RXDONE 2
648
;RXDONE SHOULD BE SET

MOV

SRXDBUF ,R1

BEQ

65$

CMP

167204

:SAVE THIS
;GO TO THIS TEST WHEN THRU
;MASTER RESET
:SET THE MODE
:MASTER RESET

MOV
MOV

64$:

167206

#21,TSTNO
#TST22 NEXT
OMMRESET,@TXCSR
NSYNEXT.@PARCSR
MMRESET.ATXCSR

;StT MODE .# OF BITS,PARITY SENSE,BLOAD SYNC REG
MOV
NSYNEXT ! SEVEN'NOPAR
' 0, 3PARC SR
BIS
#SYNSCH,@RXCSR ;SET SEARCH SYNC
;POKE CLK TO GET LOGIC INTO SYNCRONIZATION
BIC
#CLK,3TXCSR
;POKE CLK DOWN
8IS
#CLK.@TXCSR
SPOKE CLK UP
MOV
RXDBUF ,R3
SSET UP FOR ERROR MESSAGE

HLT

012767

2500

:SET MAINT DATA,CLK,BREAK,EMAINTENANCE MODE
MOV
MMTDATA! CLK 'MINT 'BREAK, @TXCSR

001401

011724

011732

TST21:

167246

006632

2495

2496

;COMPARE EXP VS. ACT

;;CHAR:12S

2664
2665
2666
2667
gzgg

2488

RO,P1

66$

: :MODE
: SYNEXT
::LENGTH:SEVEN

Stg%

2682

SEQ 0048

* 2 (OVRRUN.RXERR)

2660
2661

2480

;ACTUAL

RO,R1T

~;COMPARE EXPECTED VS.

:RECEIVED DATA DID NOT MATCH
*EXPECTED DATA - CHECK MAINT DATA

ACTUAL

*OR RECEIVER LOGIC
MOV

N7 SHIFT

MOV

#1285, TEMP

MOV

#1255, TEMP1

M OF

SHIFTS

*DATA CHAR

JSR
PC.RPOKE
SSHIFT IN THIS CHAR
;NOW SHIFT IN A SECOND CHARACTER WITHOUT READING RXDBUF
MOV
#7 SHIFT
;M OF SHIFTS
JSR
MOV
MOV
(MP

PC .RPOKE
#140000!125,R0

*DATA CHAR

SSHIFT IN THIS CHAR
:EXPECTED DATA PLUS
:RXERR & OVRRUN
@ vDBUF ,R1
*ACTUAL
RO,RT
:COMPARE EXP vS. ACT

0ZDUB-C MACY11_30A(1052)
21-NOvV-78
CZDUBD.P11
31-0CT-78 13:59

2506
2507
2508
2509
2510
251N
2512
2513
2514
2515
2516
2517
2518
2519
2520
2521
2522
2523
2524
2525
2526
2527

2528
2529

2530
2531

2532

2533
2534
2535
2536
2537
2538
2539
2540
2541
2542
2543
2 4
2545
2546
2547
2548
2549
2550
2551
2552
2553
2554
2555
2556
2557
2558
2559
2560
2561

011776
012000
012002
012002

15:36

PAGE S2

001401

8EQ

104002

HLT

66$:

104400

SEQ 0049

66$%
2

sSPECIFICALLY LOOK AT RXERR &

¢OVRRUN BITS...THEY BOTH SHOULD BE SET

SCOPE

;:THIS TEST VERIFYS WORD LENGTH SELECT OF THE
;cRECEIVER SECTION,IT USES THE ERROR FLAGS
;:TO DETERMINE THAT IT WAS SELECTED CORRECTLY
2 : (OVRRUN RXERR)
DE
: SYNEXT
2 sMO
s LENGTH: SEVEN
:;CHAR:S2

012004
012012
012020
012026
012034

012767
012767
052777
012777
052777

000026
012232
000400
020000
000400

012042

012777

064001

012050
012056

012777
052777

006476
006460

012064

042777
052777
016703
012700
012767

006466
006460

012072
012100
012104
012110
012116
012124
012130
012134
012136
012140
012140
012144
012146
012150

167114

TST22:

MOV
MOV
BIS
MOV
BIS

:SAVE THIS
;GO TO THIS TEST WHEN THRU

#MRESET ,@TXCSR
;MASTER RESET
#SYNEXT ,@8PARCSR ;SET THE MODE
#MRESET,8TXCSR
;MASTER RESET

;SET MAINT DATA,CLK ,BREAK,SMAINTENANCE MODE
MOV
#MTDATA ! CLK!MINT
!BREAK ,@TXCSR

;SET MODE ,# OF BITS,PARITY SENSE,RLOAD SYNC REG
MOV
BIS
8IS
MOV

MOV

:
€68

104002

012152
012152
012160
012166

012767
012767
004767

000007
000052
006056

166760
166756

012172
012200
012206
012212

012767
012767
004767
012700

000007
000052
006036

166740

012216
012222
012224

017701
020001
001401

006326

166736

6°%:

#CLK,@TXCSR

#CLK.BTXCSR
RXDBUF ,R3

#52.R0°

#7 ,SHIFT

#52, TEMP1

PC,RPOKE
@RXCSR
:RXDONE

HLT

;RXDONE

MOV

648

;POKE

CLK DOWN

*POKE CLK UP
:SET UP FOR ERROR MESSAGE

SEXPECTED

JSR
TSTB

8MI

017701
020001
001401

NSYNEXT ! SEVEN!NOPAR'
0, dPARCSR
#SYNSCH,3RXCSR
. SET SEARCH SYNC

s POKE CLSIEO GET LOGIC INTO SYNCRONIZATION

167022
167020

140052

#22,TSTNO
#TST23 NEXT

;4 OF SHIFTS

*DATA CHAR

“SHIFT
?

SHOULD BE

ARXDBUF ,R1

IN THIS CHAR

SET

:ACTUAL

é?fi

2?§R1

: COMPARE EXPECTED VS. ACTUAL

HLT

;RECEIVED DATA DID NOT MATCH

MOV

N7 ,SHIET

;4 OF SHIFTS

JSR

PC ,RPOKE

sSHIFT

MOV

*EXPECTED DATA - CHECK MAINT DATA
*OR RECEIVER LOGIC

#55, TEMP1

*DATA CHAR

IN THIS CHAR

sNOW SH!;&VIN A SECOND CHARACTER WITHOUT READING RXDBUF

MOV
JSR
MOV

MOV
MP

BEQ

#7 . SHIFT

;4 OF SHIFTS

PC.RPOKE
#140000'52,R0

YSHIFT IN THIS CHAR
-EXPECTED DATA PLUS

#52, TEMP1

‘DATA CHAR

*RXERR £ OVRRUN

SRXDBUF ,R1
*ACTUAL
RC,R1 . :COMPARE EXP VS.

66$

ACT

21-NOV-78
31-0C7-78 13:59

0ZDUB-C MACY11_30A(1052)

CZDUBD.P11
2562

012226

2564
2565

012230
012230

15: 36

PAGE 53

104002

HLT
66%:

104400

SEQ 0050
2

sSPECIFICALLY LOOK AT RXERR &

sOVRRUN BITS...THEY BOTH SHOULD BE SET

SCOPE

;s THIS TEST VERIFYS WORD LENGTH SELECT OF THE
s;RECEIVER SECTION,IT USES THE ERROR FLAGS

::TO DETERMINE THAT IT WAS SELECTED CORRECTLY

s s (OVRRUN,RXERR)
: :MODE:SYNEXT
..LENGTH SEVEN
HAR:177

2574
2575
2576
2577
2578

012232
012240
012246
012254
012262

012767
012767
052777
012777
052777

000027
012460
000400
020000
000400

006304
006272
006270

2581

012270

012777

064001

006262

2584
2585
2586
2587
2588
2589

012276
012304

012777
052777

024000
000020

006250
006232

012312
012320
012326

042777
052777
016703

166666
166650

006240
006232

TST23:

MOV

#23,TSTNO

;SAVE THIS

BIS

WMRESET,@TXCSR

:MASTER RESET

MOV
MOV
8IS
MOV

s POKE

#SYNEXT
! SEVENINOPAR !0, @PARCSR

MOV
MOV

0177 RO ;EXPECTED
#7 ,SHIFT
:# OF SHIFTS

TSTB

@RXCSR

;RXDONE

HLT

;RXDONE

SHOULD BE

#SYNSCH,@RXCSR
;SET SEARCH SYNC
CLEIZO GET LOGIC INTO SYNCRONIZATION
#CLK,aTXCSR
;PG
E CLK DOWN
BIS
#CLK ,aTXCSR
+POKE CLK UP
MOV
RXDBUF ,R3
;SET UP FOR ERROR MESSAGE

012767
012767
004767

2609
2610
2611
2612

012420
012426
012434
012440

012
012767
004767
012700

2614
2615
2616
2617

012444
012450
012452

012454

017701
020001
001401

MOV

P
BEQ
HLT

104002

012400
012400
012406
012414

#MTDATA!CLK!MINT
!BREAK ,@TXCSR

MOV
8IS

MOV
JSR
64%:

2603
2604
2605
2606
2607

#SYNEXT .@PARCSR :SET THE MODE
#MRESET ,@TXCSR ;MASTER RESET

;SET MODE ,# OF BITS,PARITY SENSE,8LOAD SYNC REG

BM]

012376

;GO TO THIS TEST WHEN THRU

;SET MAINT DATA,CLK,BREAK ,EMAINTENANCE MODE

166574
166572

2601

#TST24 NEXT

65%:

#177.TEMP
PC,RPOKE
64$

SRXDBUF ,R1

RO,R1T
65$
2

‘DATA CHAR
SSHIFT IN THIS CHAR

SET

;ACTUAL

~;COMPARE EXPECTED VS. ACTUAL
;RECEIVED DATA DID NOT MATCH

;EXPECTED DATA - CHECK MAINT DATA

;OR RECEIVER LOGIC

MOV

N7, SHIFT

JSR

PC,RPOKE

:DATA (HAR
sSRIFT IN THIS CHAR

MOV
MOV

07‘SHIFT
#1°7,TEMP1

¥ OF SHIFTS
;DATA (HAR

MOV

#1400001177.R0

MOV

#2177, TEMP

;¥ OF

SHIFTS

:NOW SHIFT IN A SECOND CHARACTER WITHOUT READING RXDRBUF

140177

006100

JSR

PC ,RPOKE

MOy

ARXDBUF ,R1

8EQ

(MP

HLT

JSHIFT

IN THIS CHAR

EXPECTED DATA PLUS

RXERR £ OVRRUN
:ACTUAL

RO,R1

;COMPARE EXP VS. A(T

JSPECIFICALLY LOOK AT RXERR §

DZOUB-C MACY11_30A(1052)

CZDUBD.P11
2618
2619
2620
2621
2622
2623
2624
2625

012456
012456

_21-NOV-78

31-0CT-78 13:59

15:36

PAGE 54

66%:

104400

2626

012460

012767

000030

2632
Sggz

012502
012510

012777
052777

020000
000400

006044
006042

2635
gggg

012516

012777

064001

006034

0125264
012532

012777
052777

024000
000020

006022
006004

012540
012546
012554
012560
012564
012572
012600
012604
012610
012612
012614
012614
012620
012622
012624

042777
052777
016703
012700
012767
012767
004767
105777
100401
104000

020000
020000
005770
000000
000007
000000
005444
005734

006012
006004

017701
020001
001401
104002

005730

012626
012626
012634
012642

012767
012767
004767

000007
000000
005402

166304
166302

012646
012654
012662
012666

012767
012767
004767
012700

000007
000000
005362

166254
166262

012672
012676

017701
020001

005652

012702

104002

2671

2672
2673

SCOPE
;:THIS TEST VERIFYS WORD LENGTH SELECT OF THE
;;RECEIVER SECTION,IT USES THE ERROR FLAGS
::TO DETERMINE THAT IT WAS SELECTED CORRECTLY
;. "OVRRUN ,RXERR)
; sMODE
: SYNEXT
;JCHAR:0

2629

2638
2639
2640
2641
2642
2643
2644
2645
26466
2647
2648
2649
2650
2651
2652
2653
2654
2655
2656
2657
2658
2659
2660
2661
2662
2663
2664
2665
2666
2667
2668
2669
2670

;OVRRUN BITS...THEY BOTH SHOULD BE SET

:;LENGTH: SEVEN

gggg

2630
2631

SEQ 0051

012466
0124746

012700

012767
052777

001401

012706
000400

140000

166440

166422
006056

166346
166344

TST24:

MOV

#24 ,TSTNO

MOV
8IS

#SYNEXT ,8PARCSR ;SET THE MODE
JHRESET.OTXCSR :HASTER RESET

MOV
BIS

#TST5 NEXT
#MRE SE T STXCSR

;SAVE THIS

;GO TO THIS TEST WHEN THRU
;MASTER RESET

;SET MAINT DATA,CLK,BREAK ,SMAINTENANCE MODE
MOV
MMTDATA! CLK 'MINT 'BREAK ,8TXCSR
;SET MODE ,# OF BITS,PARITY SENSE,RLOAD SYNC REG
MOV
#SYNEXT
! SEVEN!NOPAR 0, @PARCSR
BIS
#SYNSCH,8RXCSR
;SET SEARCH SYNC
;POKE CLK TO GET LOGIC INTO SYNCRONIZATION
BIC
#CLK,3TXCSR
;POKE CLK DOWN
8IS
#CLK,STXCSR
:POKE CLK UP
MOV
RXDBUF ,R3
;SET UP FOR ERROR MESSAGE
MOV
#0,RO
;EXPECTED
MOV
#7,SHIFT
;# OF SHIFTS
MOV
#0, TEMP1
:DATA CHAR
JSR
PC ,RPOKE
;SHIFT IN THIS CHAR
TST8B
@RXCSR
;RXDONE ?
BM]
648
HLT
;RXDONE SHOULD BE SET
64%:
MOV
aRXDBUF ,R1
sACTUAL
CMP
RO,R1
;COMPARE EXPECTED VvS. ACTUAL
BEQ
65%
HLT
2
;RECEIVED DATA DID NOT MATCH
;EXPECTED DATA - CHECK MAINT DATA
;OR RECEIVER LOGIC
65$:
MOV
#7,SHIFT
;# OF SHIFTS
MOV
#0, TEMP1
:DATA CHAR
JSR
PC ,RPOKE
:SHIFT IN THIS CHAR
;NOW SHIFT IN A SECOND CHARACTER WITHOUT READING RXDBUF
MOV
#7,SHIFT
;8 OF SHIFTS
MOV
#0,TEMP1
DATA CHAR
JSR
PC ,RPOKE
:SHIFT IN THIS CHAR
MOV
#140000'0,R0O
:EXPECTED DATA PLUS
;RXERR & OVRRUN
MOV
aRXDBUF ,R1
;ACTUAL
(MP
RO R
;COMPARE EXP VS. ACT

BEQ
HLT

66$
é

sSPECIFICALLY LOOK AT RXERR &
sOVRRUN BiTS...THEY BOTH SHOULD BE SET

DZDUB-C MACY11_30A(1052)

CZDUBD.P11
2674
2675
2676
2677
2678

012704
012704

21-0v-78

31-0CT=78 13:5

15:36

PAGE 55

668:

104400

2679
2681

SEQ 0052

SCOPE
;:THIS TEST VERIFYS WORD LENGTH SELECT OF THE
S:RECEIVER SECTION,IT USES THE ERROR FLAGS
2370 DETERMINE THAT IT WAS SELECTED CORRECTLY

: 2 (OVRRUN,RXERR)
*LENGTH:EIGHT

2680

*:MODE:SYNEXT

ggg%

5 CHAR: 125

2684
2685

012706
012714

012767
012767

000031
013134

000400
020000
000400

005630
005616
005614

ggg;

012744

012777

064001

005606

2693
2694
2695

012752
012760

012777
052777

026000
000020

005574
005556

2697
2698
2699

012766
012774
013002

042777
052777
016703

020000
020000
005542

005564
005556

2686
2687
gggg

2690

269

012722
012730
012736

052777
012777
052777

166212
166174

TST25:

MOV
MOV
BIS
MOV
BIS

#25,TSTNO
#T1ST26 ,NEXT

:SAVE THIS
;GO TO THIS TEST WHEN THRU

MRESET,TXCSR :MASTER RESET
#SYNEXT .@PARCSR :SET THE MODE
MMRESET.@TXCSR :MASTER RESET

cSET MAINT DATA,CLK
BREAK ,EMAINTENANCE MODE
MOV

MMTDATA! CLK 'MINT {BREAK , @TXCSR

;SET MODE ,# OF BITS.PARITY SENSE.LLOAD SYNC REG
MOV
#SYNEXT ' EIGHT NOPAR'0,
@PARCSR
BIS
#SYNSCH,aRXCSR
;SET SEARCH SYNC
;POKE CLK TO GET LOGIC INTO SYNCRONIZATION

BIC
8IS
MOV

#CLK,3TXCSR
#CLK.ATXCSR
RXDBUF ,R3

;POKE CLK DOWN
*POKE CLK UP
:SET UP FOR ERROR MESSAGE

2702 013020 012767 000125 166116

MOV

a125,rsnp1

*DATA CHAR

2705

BM]

2700
2701

013006
013012

012700
012767

2703
2704

013026
013032

004767
105777

2706
2707
2708
2709

013040
013042
013042
013046

104000
017701
020001

2711
2712
2713
2714
2715

013052

104002

2710

2716

2717
2718
2719

2720

2721
2722
2723
2726
2725

2726

2727

2728
2729

013036

013050

100401

000125
000010

005216
005506

001407

000010

013070

004767

005154

012767

000125

013074

012767

000010

013110
013114

004767
012700

005134
140125

013120
013124

017701
020001

013126

013130

013132

012767

HLT

MOV
cMP

000125

_658:
166056

166054

166036

166034

0125 Rb SEXPECTED
HIFT
:# OF SHIFTS

PC ,RPOKE
JSHIFT IN THIS CHAR
BRXCSR
;RXDONE ?

64$

;RXDONE SHOULD BE SET

SRXDBUF ,R1
;ACTUAL
RO,R1
;COMPARE EXPECTED VS. ACTUAL

BEQ

65$

MOV

#8. SHIFT

HLT

012767

013102

JSR
TSTB

648

005502

013054
013054

013062

MOV
MOV

166120

MOV

:RECEIVED DATA DID NOT MATCH
*EXPECTED DATA - CHECK MAINT DATA
*OR RECEIVER LOGIC

#125. TEMP1

;& OF SHIFTS

*DATA CHAR

JSR
PC ,RPOKE
SSHIFT IN THIS CHAR
;NOW SHIFT IN A SECOND CHARACTER WITHOUT READING RXDBUF
MOV
#8. SHIFT
;# OF SHIFTS

MOV
JSR
MOV

005424

MOV
CMP

001401

BEQ

104002

HLT

66$:

#125 renp1

PC ,RPOKE
c1~oooo'125 RO

‘DATA CHAR

“SHIFT IN THIS CHAR
:EXPECTED DATA PLUS
RXERR £ OVRRUN
SRXDBUF ,R1
* AC TUAL
RO,RT ' :COMPARE EXP VS. ACT

6
6$

;SPECIFICALLY LOOK AT RXERR &

*OVRRUN BITS...THEY BOTH SHOULD BE SET
j

0ZDUB-C MACY11_30A(1052)
_21-NOV-78
CZ0UBD .P11
31-0C7-78 13:59

013132

15:36

2730
2731
2732
2733
2734
2735
2736
2737
2738
2739
27640
27641
27642
27643

013134
013142
013150
013156
013164

012767
012767
052777
012777
052777

000032
013362
000400
020000
000400

165764
165746
005402

2746

013172

012777

064001

005360

2749
2750

013200
013206

012777
052777

026000
000020

005346
005330

2752
2753
2754
2755
2756
2757
2758
2759
2760
2761
2762
2763
2764
2765
2766

013214
013222
013230
013234
013240
013246
013254
013260
013264
013266
013270
013270
013274
013276
013300

042777
052777
016703
012700
012767
012767
004767
105777
100401
104000

020000
020000
005314
000252
000010
000252
004770
005260

005336
005330

017701
020001
001401
104002

005254

PAGE 56

104400

SEQ 0053

SCOPE

scTHIS TEST VERIFYS WORD LENGTH SELECT OF

THE

;;RECEIVER SECTION,IT USES THE ERROR FLAGS
;.TO DETERMINE THAT IT WAS SELECTED CORRECTLY
: : (OVRRUN ,RXERR)
; :MODE : SYNEXT
:E
:ILENGTHIGHT
.
:252
TST26:

005370
005366

MOV

#26,TSTNO

BIS
MOV
BIS

NMRESET ,@TXCSR
;MASTER RESET
#SYNEXT ,@8PARCSR ;SET THE MODE
#MRESET ,@TXCSR ;MASTER RESET

MOV

H#TST27 ,NEXT

#MTDAT
!MINT A!CLK
!BREAK ,@TXCSR

;SET MODE ,# OF BITS,PARITY SENSE,SLOAD SYNC REG
MOV
BIS

#SYNEXT 'EIGHT 'NOPAR !0, aPARC SR
#SYNSCH,@RXCSR
:SET SEARCH SYNC

BIC
BIS
MOV

#CLK,@TXCSR
#CLK.@TXCSR
RXDBUF ,R3

;POKE CLK TO GET LOGIC INTO SYNCRONIZATION
#252 RO SEXPECTED

MOV

#2520 TEMP

‘DATA CHAR

@RXCSR

:RXDONE

;RXDONE

SHOULD BE

MOV
JSR

BMI

HLT

MOV

#8.

SHIFT

PC,RPOKE

648

SRXDBUF ,R1

000010
000252
004726

165630
165626

2774
2775
2776
2777

013322
013330
013336
013342

012767
012767
004767
012700

000010
000252
004706
140252

165610
165606

2779
2780
2781
2782

013346
013352
013354
013356

017701
020001
001401
104002

005176

2784
2785

013360
013360

104400

;4 OF SHIFTS

SSHIFT

IN THIS CHAR

SET

;ACTUAL

g?g

295R1

: COMPARE EXPECTED VS.

HLT

:RECEIVED DATA DID NOT MATCH

ACTUAL

*EXPECTED DATA = CHECK MAINT DATA

012767
012767
004767

;POKE CLK DOWN
‘POKE CLK UP
*SET UP FOR ERROR MESSAGE

MOV
TSTB

013302
013302
013310
013316

;GO TO THIS TEST WHEN THRU

sSET MAI“SVDATA.CLK.BREAK.IHAINTENANCE MODE

165672
165670

2769
2770
2771
2772

sSAVE THIS

*OR RECEIVER LOGIC
MOV

#8.

JSR

PC,RPOKE

SSHIFT

MOV

#252, TEMP1

*DATA CHAR

MOV

#140000'252,R0

-EXPECTED DATA PLUS

MOV

aRXDBUF ,R1

BEQ
HLT

66$
2

MOV

SHIFT

4252, TEMP1

;4 OF

SHIFTS

*DATA CHAR

IN THIS CHAR

:NOW SHIFT IN A SECOND CHARACTER WITHOUT READING RXDBUF
MOV
#8. SHIFT
;¥ OF SHIFTS
JSR

TMMP

6C$:

SCOPE

PC . RPOKE

RO,R1

“SHIFT IN THIS CHAR

*RXERR € OVRRUN
*ACTUAL

;COMPARE EXP VS. ACT

;SPECIFICALLY LOOK AT RXERR &
;OVRRUN BITS...THEY BOTH SHOULD BE

SET

DZDUB-C MACY11_30A(1052)
_21-NOV-78
CZDUBD.P11
31-0CT-78 13:59

15:36

PAGE 57

2786
2787

;:THIS TEST VERIFYS WORD LENGTH SELECT OF THE
::RECEIVER SECTION,IT USES THE ERROR FLAGS

2788

$:T0 DETERMINE THAT IT WAS SELECTED CORRECTLY

2789

:; (OVRRUN,RXERR)

2790

* SMODE
: SYNEXT

2791

SLENGTH:EIGHT

5773%

2794

SEQ 0054

::CHAR:377

013362

012767

012767
052777
012777
052777

013610
000600
020000
000400

165536

165520
005154
005142
005140

TST27:

2797
g;gg

013370
013376
013404
013472

2800
5385

013420

012777

064001

005132

;SET MAINT DATA,CLK,BREAK ,EMAINTENANCE MODE
MOV
MMTDATA ! CLK 'MINT 'BREAK ,@TXCSR

013426
013434

012777
052777

026000
000020

005120
005102

013442
013450
013456

042777
052777
016703

020000
020000
005066

005110
005102

2811

013466

012767

000010

1656444

2813
2814
2815
2816
2817
2818
2819
2820
2821
2822
2823
2824
2825

013502
013506
013512
013514
013516
013516
013522
013524
013525

017701
020001
001401
104002

005026

013530
013530

012767

000010

2827

013544

004767

004500

2795

2803
2804
2805
2806
2807
2808
2809

2810

2812

2826

2828
2829

2830

2831
2832
2833
283,
2835

2836

2837
2838
2839
2840

2841

013462

013474

013536

013550

012700

012767

004767
105777
100407
104000

012767
012767

000033

000377

000377
004542
005032

000010

013556

012767

000377

013574
013600

017701
020001

004750

013564
013570

004767
012700

013602

001401

013606
013606

104400

013604

648

004460
140377

65%:

165400

16536

165360

#27,TSTNO

:SAVE THIS

#TST28 NEXT
;GO TO THIS TEST WHEN THRU
#MMRESET,@TXCSR
;MASTER RESET
#SYNEXT.@PARCSR :SET THE MODE
MMRESET,@TXCSR :MASTER RESET

MOV

#3727
R0 ;EXPECTED

MOV

#3707, TEMP1

MOV

000377

MOV
BIS
MOV
BIS

:SET MODE ,# OF BITS.PARITY SENSE,CLOAD SYNC REG
MOV
#SYNEXT 'EIGHT 'NOPAR'0,
aPARCSR
BIS
#SYNSCH,@RXCSR
;SET SEARCH SYNC
;POKE CLK TO GET LOGIC INTO SYNCRONIZATION
BIC
#CLK,3TXCSR
:POKE CLK DOWN
BIS
#CLK.@TXCSR
SPOKE CLK UP
MOV
RXDBUF ,R3
:SET UP FOR ERROR MESSAGE

165442

165402

MOV

JSR
TSTB
BM]
HLT
MOV
P
BEQ
HLT

MOV

MOV
JSR

#8. SHIFT

:# OF SHIFTS

*DATA CHAR

PC ,RPOKE
JSHIFT IN THIS CHAR
@aRXCSR
;RXDONE 2
64$
:RXDONE SHOULD BE SET
aRXDBUF ,R1
sACTUAL
RO,R1
;COMPARE EXPECTED V5. ACTUAL
65§
2
;RECEIVED DATA DID NOT MATCH
SEXPECTED DATA = CHECK MAINT DATA
:OR RECEIVER LOGIC
#8. SHIFT

;# OF SHIFTS

PC . RPOKE

SSHIFT IN THIS CHAR

#377, TEMP1

:DATA CHAR

;NOW SHIFT IN A SECOND CHARACTER WITHOUT READING RXDBUF
MOV
#8. SHIFT
;4 OF SHIFTS

MOV
JSR
MOV

MOV
cTMP

BEQ

104002

HLT

66$:

SCOPE

#377, TEMP1

PC,RPOKE
#140000'377,R0

‘DATA CHAR

SSKIFT IN THIS CHAR
:EXPECTED DATA PLUS
*RXERR & OVRRUN
BRADBUF ,R1
*ACTUAL
RO,R1T
~;COMPARE EXP VS. ACT

66$
2

;SPECIFICALLY LOOK AT RXERR &
*OVRRUN BITS...THEY BOTH SHOULD BE SET

soTHIS TEST VERIFYS WORD LENGTH SELECT OF THE

DZDUB-C MACY11_30A(1052)
_21-NOV-78
CZDUBD.P11
31-0CT-78 13:59

15:36

©AGE 58

2842
2843

SEQ 0055

;;RECEIVER SECTION,IT USES THE ERROR FLAGS

$3TO DETERMINE THAT IT WAS SELECTED CORRECTLY
;s (OVRRUN ,RXERR)

2844

2845

2 JMODE
: SYNEXT

2846

:LENGTH:EIGHT

g&g

::CHAR:0

2849
2850

013610
013616

012767
012767

000034
014036

2852
gggz

013632
013640

012777
052777

020000
000400

000600

004726

2855
gggg

013646

012777

064001

004706

;SET MAINT DATA,CLK,BREAK,EMAINTENANCE MODE
MOV
MMTDATA' CLK 'MINT 'BREAK ,8TXCSR

2858
2859
2860

013654
013662

012777
052777

]
026000
000020

004672
004654

;SET MODE .# OF BITS,PARITY SENSE.ZLOAD SYNC REG
MOV
#SYNEXT 'EIGHT 'NOPAR'0,
@PARCSR
8IS
#SYNSCH,@RXCSR
;SET SEARCH SYNC

2862
2863
2864

013670
013676
013704

042777
052777
016703

020000
020000
004640

004662
0046654

2866
2867
2868
2869
2870
2871
2872
2873
2874
2875
2876
2877
2878
2879
2880
2881
2882
2883
2884
2885
2886
2887
2888
2889
2890

013714
013722
013730
013734
013740
013742
013744
013744
013750
013752
013754

012767
012767
004767
105777
100401
104G00

000010
000000
004314
004604

165216
165214

017701
020001
001401
104002

004600

013756
013756
013764
013772

012767
012767
004767

000010
000000
004252

165154
165152

013776
014006
014012
014016

012767
012767
004767
012700

000010
000000
004232
140000

165134
165132

014022
014026

017701
020001

004522

2892

014032

104002

289
2895

014034
014034

2851

2861

285

2891

2893

013624

013710

014030

052777

012700

001401

104400

000000

165310
165272

TST28:

MOV
MOV

#28,TSTNO
#_EOP NEXT

MOV
BIS

#SYNEXT .@PARCSR :SET THE MODE
MMRESET ,8TXCSR ;MASTER RESET

8IS

004714
004712

MRESET,3TXCSR

;SAVE THIS
:GO TO THIS TEST WHEN THRU

;MASTER RESET

;POKE CLK TO GET LOGIC INTO SYNCRONIZATION
BIC
8IS
MOV

64$:

#CLK,@TXCSR
#CLK.@TXCSR
RXDBUF ,R3

:POKE CLK DOWN
*POKE CLK P
*SET UP FOR ERROR MESSAGE

MOV

#0,R0

MOV
cTMP
BEQ
HLT

SRXDBUF ,R1
sACTUAL
RO,R1
~:COMPARE EXPECTED VS. ACTUAL
65$
2
:RECEIVED DATA DID NOT MATCH
SEXPECTED DATA - CHECK MAINT DATA
:OR RECEIVER LOGIC

MOV
MOV
JSR
TSTB
BM]
HLT

65%:

;EXPECTED

#8. SHIFT
:# OF SHIFTS
#0. TEMP
:DATA CHAR
PC . RPOKE
SSHIFT IN THIS CHAR
@RXCSR
;RXDONE 2
64
;RXDONE SHOULD BE SET

MOV
#8. SHIFT
;¥ OF SHIFTS
MOV
#0. TEMP1
*DATA CHAR
JSR
PC.RPOKE
SSHIFT IN THIS CHAR
;NOW SHIFT IN A SECOND CHARACTER WITHOUT READING RXDBUF
MOV
#8. SHIFT
;¥ OF SHIFTS
MOV
#0. TEMP
:DATA CHAR
JSR
PC . RPOKE
SSHIFT IN THIS CHAR
MOV
#140000'0,R0
:EXPECTED DATA PLUS
*RXERR & OVRRUN
MoV
SRXDBUF ,R1
*ACTUAL
cMP
RO,R1
:COMPARE EXP VS. ACT

BEQ
HLT

66%:

SCOPE

66$
2

;SPECIFICALLY LOOK AT RXERR &

SOVRRUN BITS...THEY BOTH SHOULD BE SET

DZDUB~-C MACY11_30A(1052)
_21-NOV-78
czDuBD.P11
31-0C7-78 13:59

15:36

PAGE 59

2896
2897
2898
2899
2900

JEND OF PASS
;TYPE NAME OF TEST
sUPDATE PASS COUNT
;CHECK FOR EXIT TO ACT-11

ggg;

SRESTART TEST

2903
2904

01464036
014040

2907
2908
2909
2910

014052
014056
014060
014064

2905
2906

014066
014072
014076

104402
017200
1064410
104402
105767
001511
005767
001007
104402
016700
000000

014100
0164104
014112
014120
014122
014126

000167
062767
062767
000241
006167
103410

165314
000010
000010

014130

036767

165064

165060

000167
012767

000034
000174
000001

165042

2%:

165024
1650246
000002

165020
165020

165000

004040

MOV
MOV
JSR
BR
REPLAY: MOV
JSR
MOV
ADD
MOV
ADD
MOV
ADD
MOV
MoV

014042
014046

.EOP:
014274
016721

165124
165132

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

014156
014164
014172
014176
014200
014206
014212
014220
014226
014234
014242
014250
014256
014264
014272

000207

2964
2945
5829

014274
014276
014300

000001
006
020544

002

005067

164626

ggz%

2948

2949

2950
2951

SEQ 0056

014136
014140
014144
014150

014302

014306
014312

001762
004767

016767
016767
004767
000441
016767
004767
016767
062767
016767
062767
016767
062767
016767
016767

005067
005267

016733
165120

165072
165072

RUNIT:
2ZERO:

165072

003702
164774
000002
164760
000002
164744
000002
164730
004300

164734
164612

004350
164764
004336
164750
006324
164734
004312
164720

TYPE
MEPASS
CONVRT
TYPE
TSTB
BEQ
TST
BNE
TYPE
MOV
HALT
SSELECT
JMP
ADD
ADD
CLC
ROL
B(CS

MULTD
ccc
ACTREG
RUNIT

JARE YOU RUNNING MULTIPLE DEVICES ?
sNO,JUMP AROUND
JARE ANY DEVICES ACTIVE ?
JYES

ROTADD
2%

;UP DATE ROTATING POINTER
;IS IT THE LAST DEVICe
;TO BE TESTED IN THIS PASS ?
;TEST THIS DEVICE FOR ACTIVE STATUS

MCOW
ACTREG,RO

:NO
;DISPLAY ACTREG
;SELECT SOMETHING TO RUN @ ACTREG:
SWITCHES & HIT (ONTINUE (PUT SWOO =1)
.START
;START OVER AGAIN...... YOU DESELECTED EVERYTHING
#10,BASEADD
sNEXT BLOCK (ADDRESSES)
#10,BASEIV
sNEXT BLOCK (VECTORS)

ROTADD ,ACTREG

JMP
MOV

RESTRT
#1 ,ROTADD

RTS

CCC:

,OUTCRY
DEVICE

BIT

BEQ
JSR

OUTCRY:

;TYPE NAME OF TEST

RUNIT
PC,REPLAY

KEEPADD ,BASEADD
KEEPIV ,BASE]V
PC REPLAY
cCC
BASEADD , DUBASE
PC,DUADDR
BASE]V,DURIV
#2 ,BASEIV
BASEIV,DURIS
#2 ,BASE]V
BASEIV,DUTIV
#2 ,BASEIV
BASEIV,DUTIS
DURIV ,BASEIV
PC

1
BYTE
RXCSR

6,2

(LR

LSTERR

(LR
INC

ERRFLG
PASCNT

;IF NOT ACTIVE, TRY NEXT ADDRESS
;CALCULATE NEW PARAMETERS

JYES IT WAS ACTIVE,TEST THIS DEVICE
;OK! ,NOW SET UP ROTATING
;POINTER FOR NEXT MULTIPLE PASS
JRESTORE BASE ADDRESS
sRESTORE BASE INTERRUPT VECTORS
:CALC NEW PARAMETERS
;JUMP AROUND REPLAY

;SET UP FOR NEW ADDRESSES

;CREATE NEW ADDRESSES
; CREATE DURIV

;CREATE DURIS
s CREATE DUTIV
;CREATE DUTIS
;RESTORE

JCLEAR LAST ERROR P(

;CLEAR ERROR FLAG
JUPDATE PASS COUNT

0Z0UB-C MACY11_30A(1052)

CZDUBD.P11
2952
2953
2954
2955
2956
2957

2958
2959
2960
2961
2962
2963

014316
014324
014330
014332
01433
014336
014340
014342
014344
014352
014354
014362

216N0V-78

31-0CT-78 13:5
016777
013701
001405
000005
004711
000240
000240
000240
012767
106413
012767

000167

164606
000042

15:36

PAGE 60

164556

LOGICAL:

000340

163424

003646
167060

164532

JWP

014366

2974

014406

000424

014370
014374

013746
012737

000004
014414

012637

000004

005737

2975
2976

014412
016414

000404
022626

2978
2979
2980
2981

014422
014426
014432
014436

014416

012637

000403
016767
016716
000002

2982
2983
2984

014440
014440
014442

2986

014452

000432

2990

0146466

000412

2987
2988
2989

.SCOPE:
,***» START OF
BR

014366

014402

2985

014450

014454
014460
014462

104413
032777
001407

177060

164466
164456

040000

104430

004000

164402

164420
164414

164410

3000

014540

016716

164350

000002
001407
009432

2%:
3¢

TIST:

164420

164526
164400
000005

014544
014546
0 550

164462

164424

032777
001006
005267
026767
101412
105067
005067
012767

2001
2002
3003

1$:

105777
100027
017700

016767

164360

1%:

2%:
164370
164354

1 ¥
BRW:
BRX :

3005
3007

JSR

:DISPLAY PASS COUNT
:CHECK FOR ACT=-11 OR DDP
:1F NOT, CONTINUE TESTING

PC, (R1)

#340,PS
#TST1,RTIRN
TST1

;PREVENT INTERRUPTS (PRIOD:
;CHECK FOR “G

CODE FOR THE X OR TESTER #weaws
4
:IF RUNNING ON THE X OR TESTER CHANGE
:THIS INSTRUCTION TO A ‘NOP''(NOP=240)
s ,-(SP)
:SAVE CONTENTS OF ERROR VECTOR
218, NG
:SET FOR TIME OUT

177060

STIME OUT ON

B8R
(TMMP

2s
(SP)+,(SP)+

;GO TO NEXT TEST
:CLEAR THE STACK AFTER A TIMEOUT

BR
MOV
MOV
RTI

3s
NEXT ,RTRN
RTRN, (SP)

:LOOP ON PRESENT TEST
:SET UP NEXT TEST IN RTRN
JSET UP STACK FOR RTI

MOV

43:

014470
014476
014500
0145046
014512
014514
014520
014524
014532

MOV
MOV

000004

2991
2992
2993
2996
2995
2996
2997
2998

2999

PASCNT 3L IGHTS
w62 ,R1
RESTRT

;SCOPE LOOP AND INTERATION HANDLER

2967
2968
2969
2970
2971
2972

2977

NOP

NOP
NCP
RESTRT: MOV
CKSWR
MOV

gggg

2973

MOV
MOV
BEQ
RESET

SEQ 0057

MOV

(SP)+, a4

(SP)+,anb

swxxw END OF CODE FOR THE
CKSWR
BIT
#SW14,aSwR
BEQ
18

B8R

;RESTORE ERROR VECTOR

X OR TESTER senenw
:CHECK FOR “G
:LOOP ON CURRENT TEST ?

TSTB
8PL
MOV

TK(SR
3s
aTKDRR,RO

8IT
BNE
INC
CMP
BLOS
CLRB
(LR
MOV

#SW11,3SWR
23
LPCNT
LPCNT, I COUNT
3s
ERRFLG
LPCNT
#5,ICOUNT

:SET UP ITERATION COUNT

MOV

RTAN, (SP)

;SET UP STACK FOR RTI

B8R

MOV

RT]
140’
432

NEXT,RTRN

STEST TTY FLAG

:CLR DONE BIT

;IF A TTY KEY IS STRUCK GO TO NEXT TST
;INHIBIT ITERATIONS ?

;CHECK FOR ITERATION CNT FINISH

;SET UP NEXT TEST

104473

.STOPT:

(KSWR

IN RTRN

:RESTORE 'BEQ 1%'' INSTRUCTION
;RESTORE '‘BR 3%'* INSTRUCTION

JCHECK FOR FREEZE ON CURRENT DATA
014552

X OR ?

;RESTORE ERROR VECTOR

JCHECK

FOR “G

OO ~NOAN
LW = O

DZDUB=-C MACY11_30A(1052)
21-NOV-78
(ZbuBD .P11
31-0C7-78 13:59

016554
014562
014564
014570

032777
001402
016716
000002

001000

15:36

PAGE 61

SEQ 0058

164316

164330

8IT
1%:

BEQ
MOV

RTI

:§U09.QSUR
LOCK, (SP)

;TELETYPE OQUTPUT ROUTINE

014572
014574
014600
014606

010546

014610
014612
014616
014620

000002
000002

.TYPE:

000002

1%:

2%:

164272
164266

014624
014626
014630

3%:

MOV
MOV
ADD
TST8

RS,=-(SP)
a2(SP) ,RS
n2,2(SP)

(RS)

;LOOK FOR 'O’

TSTB

aTPCSR
2$

;TEST DONE BIT

13
(SP)+ RS

;DO IT AGAIN UNTIL "0

BEQ

8PL
MOvVB
BR
MOV
RTI

(R5)+,aTPDBR

:TYPE

CHAR

JASCII STRING INPUT ROUTINE
014632
014634
014636
014644

000004
000002

014652
014654
014656

000010
000004

. INSTR: MOV
MOV
MCY
ADD

JINSTT: 6YPE
.MSG:

017700
000007
164212

1%:

164206
000200
000025

# INSUF
, R4,

TSTR

@TKCSR

MOV
BPL

BNE

164156

200%:

BR
CMPB

2%:

MOVB
TSTB

BEQ
BPL
DEC
BNE

B8R

.INSTE: MOV
MOV
CINSTS: TYPE

000002

#7.R3
18

@TKDBR. (R4)
#200. (R&)
(R4) .#25

2008

TYPE .MCRLF

000015
164154
164150

a4 (SP)
, .MSG
#2.4(SP)

MOV

MOVB
BICB
CMPB

017110

R3,-(SP)
R& .= (SP)

CINST1
(R4)+ 415

INSTR?

aTKDBR,aTPDBR
aTPCSR

23
R3
13

.INSTG

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

016246

MQM
ST

017110

TYPE ,MCRLF

BEQ
400%:

8R
INSTR?: MOV
MOV
RT1

SHRDSW

4008

CINST1

(SP)+ R4

(ZP)+.R3

>
JIS IT <*

IS SEEN

DZDUB-C MACY11_30A(1052)
21-NOV-78
CZouBD.P11
31-0CT1-78 13:59

3064
3065
3066
3067

PAGE 62

015002

010546

.PARAM: MOV

3072
3073
3074

015022
015026
015032

010446
016605
012567
012567

3078

015050

122714

017700
000015

3080

015056

121427

000060

MOV

MOV
MOV
MOV
MOV
mMovB
MOvB
MOV

012567
112567
112567

MOV

000060
3086
3087
3088
3089
3090
3091
3092
3093

015100
015104
015106
015110
015112
015114
015116
015122

122714
001414
006305
006305
006305
000760
122714
001003

3095
3096
3097
3098
3099
3100
3101
3102
3103

015130
015132
015134

001023
104404
000742

3104
3105
3106
3107
3108
3109

3110
3111
3112
3113
3114
3115
3116
3117
3118
3179

015124

005737

000015

PARERR:

016246
120%:

020567
101365
020567
103762
136705
001357

000046

LIMITS:

000036

(R4) ,#60
PARERR
(R4) ,#67
PARERR

8158
(MPB

(R4)+ ,RS
#15,(R4)

BEQ
ASL
ASL
ASL
BR

PARERR

#60, (R4)

LIMITS
RS
RS
RS

(MPS

#15,(R4)

BNE

1208

TST
BNE

a#RDSW
PART]

B8R

PARM1

INSTER

CMP
BH]

cmp

8LO
8178
BNE

000036

# INBUF
, R4

BLT
(MPB
86T

JTEST

015136
015142
015144
015150
015152
015156

4(SP) RS
(R5)+,LOLIM
(RS)+ ,HILIM
(R5)+,DEVADR
(R5)+,LOBITS
(R5)
+ ,ADRCNT
22.4(SP)
#15,(R4)

BI(CB

000015

RS,=(SP)

Ré ,-(SP)

CMPS

BEQ

000067

3096

SEQ 0059

;CONVERT ASCII STRING TO O(CTAL
015004
015006
015012
015016

3069
3070
3071

15:36

TO SEE

;1S

016704
010524
062705

105367

001372
0126
012605
000002
000000
000000

000026

000002

1%:

000017
PART]:

NUMBER

IS WITHIN LIMITS

RS, HILIM
PARERR

RS,LOLIM

PARERR
LOBITS,RS
PARERR

CLim:

HILIM:

MOV
MoV
ADD
DECB

DEVADR
R4
RS, (R4)+
#2 ,R5
ADRCNT

MOv

(SP)
+ R4

BNE

MOV

RT]

0
0

(SP)+ RS

(HARA(CTER A <(R>

;1S CKSWR ROUTINE BEING USED

;STORE NUMBER AT SPECIFIED ADDRESS

015160
015164
015166
015172
015176
015200
015202
015204
015206
015210

FIRST

DZOUB-C MACY11_30A(1052)

CZDUBD.P11
3120
3121
%}g%

015212
015214

21-NOV-78

31-0CT-78 13:59

15:36

000000
000000
015215

PAGE 63

DEVADR: 0
LOBITS: O
ADRCNT=LOB]TS+1

%}%@
%}gg

:SAVE PC OF TEST THAT FAILED AND RO-RS
015216

016667

000004

163750

.SAVOS: MOV

g}gg
3130
3131
3132
3133
3134
3135
%}%9

015224
015230
015234
015240
015244
015250
015254

010567
010467
010367
010267
010167
010067
000002

163740
163732
163724
163716
163710
163702

Sv0S:

015256
015262
015266
015272
015276
015302
015306

016700
016701
016702
016703
016704
016705
000002

163674
163672
163670
163666
163664
163662

015310
015312
015314
015316
015320
015322
015324
015326
015332

104402
017110
010046
010146
010346
010446
010546
017601
016767

000012
0024602

3160
3161
3162
3163
3164
3165
3166

015346
015352
015356
015362
015
015372
015376

012167
112167
112167
013167
016704
116705
012700

000154
000152
000147
000144
000140
000132
017740

042703
062703
110320

177770
000060

042704
006204
006204
005305

100000

015340

062766

3167

015402

010403

3171

015416

006204

3172
3173
3174
3175

RS,SAVRS
R4, SAVR4
R3,SAVR3
R2,SAVR2
R1,SAVR1
RO, SAVRO

.RESOS: MOV
MOV
MOV
MOV
MOV
MOV
RTI

SAVRO,R0
SAVR1,R1
SAVR2,R2
SAVR3,R3
SAVRS R4
SAVRS RS

;CONVERT OCTAL NUMBER TC ASCII AND OQUTPUT TO TELEPRINTER

3150
3151
3152
3153
3154
3155
3156
3157
3158

3168
3169
3170

MoV
MOV
MOV
MOV
MOV
MOV
RTI

;RESTORE RO-RS

%}23

3159

4(SP) ,SAVP(

:SAVE RO-RS

g}gg
3140
3141
3142
3143
3144
3145
%}29

SEQ 0060

015404
015410
015414
015420
015424
015426
015430

000002

163610

000012

.CONVR: TYPE
MCRLF
.CNVRT: MOV
MOV
MOV
MOV
MOV
MOV
MOV

ADD

1%:
2$:

3%:

RO,-(SP)
R1.,-(SP)
R3,-(SP)
R4 ,-(SP)
RS,-(SP)
312(SP) ,R1
TEMP, TEMP3

#2,12(SP)

MOV
MOVB
MOVB
MOV
MOV
MOVR
MOV

(R1)+,WRDCNT
(R1)+,CHRCNT
(R1)+,SPACNT
a(R1)+ ,BINWRD
BINWRD ,R4
CHRCNT RS
#TEMP,RO

BIC
ADD
MOVB

#17°7770.R3
#060,R3
R3, (RO)+

MOV

ASR

BIC
ASR
ASR
DEC

R4, R3

Ré

#100000,R4
Ré
R
RS

SHIFT

FOR NEXT #

:CLUGE TO STOP BIT 15 PROPAGATING.
:DITTO
:DITTO

DZDUB~C MACY11_30A(1052)
21-NOV-78
CZouBD.P11
31-0CT1-78 13:59

015432
015434
015440
015442
015446
015450
015454

015456

001
0
1
1
001374
1057
001405
2

PAGE 64
BNE

020000

(%:

000062
000055

000040
000043

5%:

—

W
[A®]
W

o
N

—

163440

002226

3199
3200
3201

015530

3212

3213
3214
3215
3216
317
3218
3219
3220
3221
3002
3923
3024
3225
3026
3227
328
3229
3230
3231

BEQ

BNE
(LRB

5%
(R3)

MOVB
DECB
TYPE

015532

MOV
MOV

000002

RT]

-(R0),(R3)+
CHRCNT
SPACNT

#040, (R3) +
SPACNT

WRDCNT
1%

TEMP3,TEMP
(SP)+,R5
(SP)+ R4

(SP)+,R3

(SP)+ R}
(SP)+,R0

WRDCNT: 0
CHRCNT: O
SPACNT=(CHRCNT+1

000000

BINWRD:

3203
3204
3205

3210
3211

MOV

015524

3206
3207
3208
3209

BNE

MOVB
DECB

MOV

3197

#MMDATA,R3

MDATA
DEC
BNE
MOV
MOV

000024

SEQ 0061

MOV

TSTB

6%:

KRS 2ETEIRAR

uas

aan

AN AN NN AN AN NN AN N N N NN

3176
3177
3178
3179
3180
3181
3182

15:36

;COMPARE THE FIRST (HARACTER IN THE TELETYPE
;BUFFER TO THE CHARACTERS ‘N'' AND "'Y''.

INPUT

;1F THE CHARACTER IS 'N'°' CLEAR THE FLAG
;IF THE CHARACTER IS ‘'Y'' SET THE FLAG
015534
015540
015546
015550

015552

015554
015562
015564
015570
0155764
015576
015600

017605
122767
001002
105015

000000
000116

002132

122767
001005
112715
062716
000002
104404
000755

000131

0021°6

000406

177777
000002

SETFLG:MOV

1%:
2%:
3%:

a(SP) RS

CMP8
BNE
CLRB

#°'N, INBUF
1
(RS)
;000

CMPB
BNE
MOVB
ADD

#'Y, INBUF
3
#-1,(RS)
n2,(SP)

RT]

INSTER

P 3

LSETFLG

JIS IT N2

JIS IT 'Y
2
;377

JRETRY

;TRAP DISPATCH SERVICE

;ARGUMENT OF TRAP IS EXTRACTED
SAND USED AS OFFSET TO OBTAIN POINTER
;sTO SELECTED SUBROUTINE

015602
015606
015610
015614
015616
015622
015626

011646
162716
017616
006316
062716
062716
017616

000002
000000
177001

001366
000000

.TRPSR: MOV
TRPOK:

(SP) ,-(SP)

JGET PC OF

a(SP), (SP)

;GET TRP

8I(

#177001, (SP)

;CLEAR UNWANTED BITS

MOV

a(SP), (SP)

;SUBROUT
INE ADDRESS

SUB

#2,(SP)

ASL

(SP)

MOV
ADD

#."RPTAB, (SP)

;=PC OF

RETURN

TRAP

JMULTIPLY

TRAP ARG BY

;POINTER

TO SUBROUTINE

ADDRESS

0ZDUB~C MACY11_30A(1052)
21-NOv-78
CZDuBD .P11
31-0CT7-78 13:59

3232
3233

015632

15:36

PAGE 65

000136

JMP

SEQ 0062
a(SP)+

;GO 7O SUBROUT INE

;ERROR HANDLER
015634
015636
0152644

104413

032777
001061
021667
001404
011667
105067

02000C

163234

LHLT:

CKSWR

#SW13,3SWR

163262

HALTS
{gP).LSTERR

163254
1€3362

(SP) ,LSTERR
ERRFLG

1%:

cCHECK FOR “G
;INHIBIT ERROR TYPE OUT ?

000002

177001
020514
000040
000046
000054

#177001,R4

# .ERRTAB
R4

163312

(R&
+ ,ERRMSG
)
(R&)
+ ,DATAHD
(R4) ,DATABP
ERRFLG

000042

DATABRP

TYPMSG

TYPMSG:

177777

163270

#-1,ERRFLG

ERRMSG: 0

000004

TYPDAT

DATAHD
TYPDAT

DATAHD:

000004

TYPDAT
:

DATABP

RESREG

DATARBP:
RESREG:
HALTS:

163064

000002

aSwR
EXITER

2(SP) ,RO
EXITER:

sCHECK FOR *G

163074
000400

163034

ERRCNT
1§w08.QSUR

002000

163024

#SW10,aSWR

JESCAPE TO NEXT ON ERROR ?

163034
001100

163030

NEXT ,RTRN

;SET UP FOR NEXT TEST

163020

#CTACK,
SP
aRTRN

;LOOP ON ERROR ?

JREINITIALIZE

DZDUB-C MACY11_30A(1052)

cZousD.P11

_21-NOV-78

31-0C7-78 13:59

3288
3289
3290
3291
3292

016074
016076
016100
016102

000002
000001
096
001174

3295
3296
3297
3298
3299
3300
3301
3302
3303
3304
gggg

016104
016106
016110
016112
016114
016116
016120
016126
016130
016136
016140

010046
010146
010246
010346
010446
010546
016746
010667
012767
000000
000777

15:36

161666

PFAIL: MOV
MOV
MOV
MOV
MOV
MOV
MOV
MOv
MOV
HALT
$:
BR

%%8;

3309
3310
3311
3312
3313
3314
3315
3316

3317
3318
3319
3320
3321
3322
3323
3324

3325

3326
3327
3328
3329
3330
3331

RO,=(SP)
R1,-(SP)
RZ.=(SP)
R3,~(SP)
R4 ,=(SP)
RS,=(SP)
264,-(SP)
SP,SAVSP
W#RESTART, 24
18

;SAVE RO-R5 ON PROCESSOR STA(CK

s SAVE STACK POINTER
;SET UP FOR POWER UP TRAP
JHALT ON POWER DOWN NORMAL

;PROCESSOR WILL TRAP HERE WHEN POWER IS RESTORED

016142
016146
016150
016152
016154
016156
016160
016162

016170
016176
016202
016206
016212
016214
016216
016220

016222

016226
016230
016234
016240
016242
016244

016706
012605
012604
012603
012602
012601
012600
012767

012767
012706
005067
005267
001375
104410
016240
104402

017113

005067
005067
000177
000001
006
001114

163024

0161046
000340
001100
001532
001526

161634
161600

RESTAR: MOV
MOV
MOV
MoV
MOV
MOV
MOV
MOV

18:

016246

000000

016250
016254
016256
016264

005737
001042
022767
001036

MoV
MOV
CLR
INC
BNE
CONVRT
PF TAB
TYPE

MPFAIL

163016
162700
162654

PFTAB:

002

3334

3335
3336
3337
3338
3339
3340
3341
3342
3343

SEQ 0063

2%:
RTI
ERTABC: 1
.BYTE
6.2
SAVP{
sENTER HERE ON POWER FAILURE

002

161700
163042
016142

PAGE 66

CLR
CLR
JMP
1
BYTE
RTRN

SAVSP, SP
(SP)+,RS
(SP)+,R4
(SP)+ ,R3
(SP)+,R2
(SP)+,R1
(SP) +,R0
#.PFAIL ,264

#340,PS
#STACK,
SP
TEMP
TEMP
1%

000176

.CKSWR:

162614

:SET UP FOR POWER FAILURE

ERRFLG
LSTERR
aRTRN
6,2

JCHECK SWITCH REGISTER ROUTINE.

(HECKS FOR “G TO ALLOW CHANGING

TST
BNE
(MP
BNE

;SOFTWARE SWITCH RFGISTER PRESENT
;NO, GET ouT

;0F LOC.176.
;LOCATIONS USED:
RDSW:
.WORD

000042

JRESTORE STACK POINTER
;RESTORE RO-RS

L2
ouT
#_ JREG,SWR
out

0ZDUB-C MACY11_30A(1052)
21-NOvV-78
CZouBD .P11
31-0C7-78 13:59

016266
016272

105777

016274
016302
016310
016316
016320

15:36

PAGE 67

162612
162606
177600

000007

TSTB

176352
176344
176336

0 16376
0 16246
0 16403
0 }6370
016413

BPL
MOV

BIC

CMPB

SEQ 0064
aTKCSR

sYES,WAIT FOR

JREADY, GET CHARACTER
;JAND STRIP OFF
s THE GARBAGE

ouT
aTKDBR, .MSG

#177600, .MSG
#7,.MSG

SIS IT A <*6>

BNE
out
TYPE ,$CNTG
.CNTLU: COM
S#RDSW
TYPE
, SMSWR
CNVRT, SWREGC

INSTR
. SMNEW

177777

001
017110
016246

.BYTE
ouT:

053505

SMNEW:

.ASCIZ

042012
055103
020103
041040

030525
052504
060524
006440

.EVEN
MTITLE:

.ASCIZ

<15><12><12>/DU11

042526
040440

052103

MVECTO:

.ASCIZ

<15><12>/VECTOR ADDRESS~-/

MREGAD:

.ASCIZ

<15><12>/1ST DEVICE:

MMULT:

.ASCIZ

<15><12>/ARE

MLASTD:

.ASCIZ

<15><12>/LAST DEVICE:RECEIVER CONTROL REGISTER ADDRESS~/

H o000

NN
= —

ONON

22222328

b md md =
b
) md

S#RDSW

000
051127

016574

—

CLR

RT]

043536
051412
000
047040
000

020122

elelelolelelele]

0,1

TYPE ,MCRLF

1
SWREGC:
BYTE
6,2
SWREG
$CNTG:
L.ASCIZ
SMSWR:
L.ASCIZ

002

035105

SWREG

042522

<15><12>/*G/
<15><12>/SWR= /
NEW= /
CZDUB-C TAPE B /<15><12>

RECEIVER CONTROL REGISTER ADDRESS=-/

042101
026523
042522
051040
043516
044524
042504
020123
047440
000055
052123
041511
042503

YOU RUNNING MULTIPLE DEVICES ?

(Y OR N)=/

DZDUB-C MACY11_30A(1052)

N—

—

3
3

/=DEVICE

053517

MCOW:

.ASCIZ

<15><12>/HOW NOW BROWN COW? ...SELECT SOMETHING TO RUN @ACTREG/

Lo}

N
~

.ASCIZ

g
NNO
= O = NN

=SNVO
NN = =

=y~

N
~no

<15><12>/0UT OF

MQOM:

RANGE:RETYPE LAST DEVICE RXCSR ADDRESS=-/

o
o

N
O

MRANGE: .ASCIZ

=~
~
o

o
~
o

&S
OO~N

N
WO

?O
o
HSO~N

o
N
o
o
N

DEVICE:

051523

ASCIZ

MCRLF:
MPFAIL:

.ASCIZ
.ASCIZ

<15><12>
/
POWER FAILURE, PROGRAM RESTART AT TEST

052514
051120

042522
043517

051101

020124

020054
040522
052123
052101

005015

047105

020104

MEPASS:

.ASCIZ

<15><12>/END

051012
8

000
888822

MR:

JASCIZ

<15><12>/R/

045503

MLOCK:

.ASCIZ

<15><12>/LOCK ON SELECTED TEST?

MLEVEL:

.ASCIZ

<15><12>/DU PRIORITY LEVEL=~/

MSYNC:

LASCIZ

<15><12>/# OF SYNC CHARS SELECTED ( 1 OR 2)=/

N
N

o
H
N

pard

(¥,]

82226;

815

n
~

(=)

nN
W

043117 050040 gzgggé

6 042523
3
5

}

2
1

322

SEQ 0065

—

7225

PAGE 68

o
»n
N — NONNON
— [V
PV PR
PN
—
N n oG
N W WHROWN

o
W
o

—

EENRASVRESToR
o~

\lm\l\l\l\l\l\l\l\l\l
Nm_n_a_n_a:_a_s_a_a_n_a

NNNN

000055

15:36

VIR

N—=N—a
N

?o § o RORSVR RERRRORIRV/R SR

g
N

-—

puerd

Qo Gy Guur Puur P

leololelolelalolololololalelolols]

017102

puar GourQur uur Giner Gt Guur Qi Gy Gaeer G

b e e o

[aV 158
1,V ] POPINY —b = —d e
(V.
P 1 VY]

3426

OoNONO

053
047
05104
042
051
oWV

OWO

eléle]
-—
—

(oYo T
NNN

016662
016670
016676
016704
016712
016720

KRR QPR RRRRRRRRRY

N =2O YO NI N WN—=O CES
8

3400
3401
3402
3403
3404
3482

2 -NOV-78

31-0C7-78 13:

R R
S
£22

CZDUBD.P11

MTISTPC:

.ASCIZ

042105

2>/END 0

OF PASS T

TAPE 8

IN PROGRESS/

<15><12>/TEST P(C~/

;

€S

OR N

N)=/

037524

051117
000
8%2;53

054524

046040

053105

005015

020043

043117

0ZDUB~C MACY11_30A(1052)

CZDuUBD .P11
3456
3457
3458
3459
34660
3461
3462
3463

017342
017350
017356
017364
017372
017400
017402
017410

_21-NOV-78

31-0CT-78 13:59
051440
044103
042523
042105
047440
000055
005015
041505

047131
051101
042514
024040
020122
051511
054040

2465
3466
3467

017616
0176424
017432
017440

020126
051105
047111
047440

052512
021440
020077
020122

3469
3470
3471
3472
3473
3474

017450
017456
017464
017472
017500
017506

051511
051040
046525
032443
024040
047040

3476
3477
3478

017515
017522
017530

005015
041505
045040
020122
037516
051117
000
015
050117
020122

044412
020124
047105

15:36

PAGE 69

SEQ 0066

020103

024462
051440

MWIREG:

.ASCIZ

<15><12>/1S SEC XMIT JUMPER #6 IN?

(Y OR N)=/

MWIRES:

.ASCIZ

<15><12>/1S SEC REC JUMPER #5

020123
046103
041101
046525
032043
024040
047040

MWIRESG:

(ASCIZ

<15>712>/1S OPT CLR ENABLE JUMPER #4

020123
042524
047117

MEXTJ:

LASCIZ

<15><12>/1S THE

024516
051440

IN?

(Y OR N)=/

026451
IN?

(Y OR N)=/

TEST CONNECTOR INSTALLED ?2(Y OR N)=/

051117
040524
037440
020122

3493
3496
3495
349

(017654
017662
017670
017676

0064
052123
020040
020040
000015

052101
046440
020040

020040
051525
050101
005040

MSTATUS:

.ASCIZ

<12> <15>/

STATUS

MAP

/ <12> <15

.EVEN

;BUFFERS FOR INPUT-0OUTPUT

3501
3502
3503

017700
017740
020000

000040
000040
000040

INBUF:
TEMP:
MDATA:

.BLKB
.BLKB
.BLKB

40
40
40

"tt*ttttttitttfitttattttttt'**tttfifitttt**itttt*t*i*ttttttitfiii

3509
3510
3511

020040
020044
020050

006367
006367
006367

000044
000040
000034

SUTILITIES

AR AR R AR RN R RN

R R RN AR

AR AR

RNNR AR RNNANNATRRRAANNNN

JTHIS UTILITY CALCULATES PRIORITY LEVEL

DULEV:

ASL
ASL

AS|

DUPRT
DLPRT

DUPRT

JSHIFT LEFT
;

0ZDUB-C MACY11_30A(1052)
21-NOV-78
CZDuBD .P11
31-0C7-78 13:59

3512
3513
3514
3515
3516
3517
3518
%g}g

020054
020060
020064
020072
020100
020106
020110
020112

006367
006367
016767
162767
042767
000207
000240
000200

3522

020114

016767

3523
3524

3539
3540

020122
020126

020244
020246

000030
000024
000020
000001
000037

15 :36

PAGE 70
ASL

ASL

000020
000012
000004

000422

005267
016767

000207
000000

DUPRT

;

MOV
SuB

DUPRT ,LESS1
#1 _LESST

RTS

BIC
DUPRT:
LESST:

SEQ 0067

LEVELS
LEVEL4

#37
. LESST

INC

DUBASE

INC

DUBASE

MOV

000402
000400

:CLEAR TNZVC

:LEVEL TO ALLOW INTERRUPTS

:NEW DU ADDRESSES
DUADDR: MOV
DUBASE ,RXCSR

000412

JMOVE THIS TO LESS1
;CREATE LESS?

IXXX0

DUBASE ,HRXCSR

JXXX1

MOV
MOV

DUBASE ,RXDBUF
DUBASE ,PARCSR

IXXX2
IXXX2

000364
000362

MOV
MoV

DUBASE ,HRXDBUF : XXX3
DUBASE ,HPARCSR
;XXX3

000352

MOV

000342

MOV

000332

MOV

000322

MOV

INC

DUBASE:

DUBASE

INC

DUBASE

INC

DUBASE

INC

DUBASE

INC

DUBASE

RTS

DUBASE , TXCSR

JXXXG

DUBASE ,HTXCSR

2 XXX5

DUBASE , TXDBUF

IXXX6

DUBASE ,HTXDBUF ; XXX?7

JTHIS UTILITY POKES THE MAINT DATA BASED UPON THE

3545

020250

042777

3553
35564
3555
3556

020320
020326
020332
020334

052777
005367
001346
000207

3558

020336

016767

000302

3567

020400

BIC

MMTDATA,aTXCSR

ROR
ROR
ASR

TEMP1
TEMP2
TEMP?

CLR

8IC
8IS

000240
000232

8IC
BIS
DEC

BNE

RTS

160602

160564
160562
177762

006067
103404

RPOKE:

cINFORMATION CONTAINED IN TEMP1 AND IT IS
JSHIFTED IN BY THE CONTENTS Of SHIFT

160550

oDD8:
4%:

1%:

TEMP?

;FORCE CARRY
;PICK UP CARRY IN BIT 15
JSHIFT INTO BIT 14

MITIS, TEMP?
TEMP2 ,aTXCSR
#CLK,aTXCSR
#CLK,aTXCSR
SHIFT

JCLR BIT 15
;POKE MAINT DATA

<POKE
:

(LK

RPOKE

;THIS ROUTINE CALCULATES OCD PARITY FOR AN 8 BIT (HAR
MOV
TEMP1,TEMP?
;SAVE TEMPI
CLR
TEMP3
MOV
#8.,(PC)+
0

ROR
ADC
DEC

TEMP?
TEMP3
43

ROR
B(S

TcMP3
2%

BNE

DZDUB~C MACY11_30A(1052)
21-NOV-78
CZDUBD . P11
31-0CT-78 13:59

3568

020402

3570
3571
gg;g

020412

3569

052767

000400

160534

042767

000400

160524

020410

000403

020420

000207

3575
3576
3577
3578
3579
3580
3581
3582

020422
020430
020434
020440
020442
020446
020452
020456

016767
005067
012727
000000
006067
005567
005367
001371

3584
3585
3586
3587
3588
gggg

020464
020466
020474
020476

103004
052767
000403
042767

020504

000207

3591
3592
3593

020506

062716

020512

000002

3595

020514

020600

3574,

3583

3594

020460

15:36

006067

PAGE 71

BIS

2%:
38

160516
160514
000010

160516

160464
160450

000400

160440

2%:
3%:

000002

MOV
CLR
MOV
0
ROR
ADC
DEC
BNE

TEMP1, TEMP2
TEMP3’
#8..(PC)+

TEMP3

BCC
2s
BIS
#BIT8, TEMPI
;SET EVEN PARITY
BR
3s
BIC
#8178, TEMP1
:CLR ODD PARITY
:TEMP1 NOW HAS EVEN PARITY CHARACTER
RTS
PC

TRPREG: ADD

#2.(SP)

RT]

.ERRTAB:

SERROR HLT TABLE

EMO

:ALLOW IT TO ''CRUNCH'' INTO HLT BACK
;IN MAIN PART OF THE PROGRAM

;HLT O

020516
020520
020522
020524
020526
020530
020532
020534
020536
020540
020542

000000
000C00
020614
020765
021006
020656
020765
021006
020720
020765
021006

020544
020546
020550

160040
160041
160042

0
0
EM1
;HLT 1
DH1
DT1
EM2
;HLT 2
DH1
DT1
EM3
;HLT 3
DH1
DT1
:DEFAULT DU ADDRESSES
RXCSR:
160040
HRXCSR: 160041
RXDBUF: 160042

3612
3613
3614
3615
3616
3617

020554
020556
020560
020562
020564
020566

160042
160043
160044
160045
160046
160047

PARCSR: 160042
HPARCSR:
TXCSR:
160064
HTXCSR: 160045
TXDBUF: 160046
HTXDBUF :

020570

000770

DURIV:

020574
020576

000774
000776

DUTIV:
DUTIS:

3618
3619
3620

3621
3622
3623

020552

020572

160043

000772

HRXDBUF :

DURIS:

:SAVE TEMP1

TEMP?
TEMP3
48
18

3596
3597
3598
3599
3600
3601
3602
3603
3604
3605
3606
3607
3608
3609
3610

3611

;SET ODD PARITY

BIC
#RIT8, TEMP1
:CLR EVEN PARITY
;TEMP1 NOW HAS ODD PARITY CHARACTER
RTS
PC

ROR

000400

#8178, TEMPY

;THIS ROUTINE CALCULATES EVEN PARITY FOR AN 8 BIT CHARACTER

EVENS:
4%:
1¢:

160500
160476
177762

B8R

SEQ 0068

BIT ERROR (GENERAL)
REGISTER ERROR
RECEIVER ERROR

TRANSMITTER ERROR

160043

160047

-DEFAULT DU VECTORS
770
;REC INTR VECTOR
772

SREC INTR STATUS

774
SXMIT INTR VECTOR
776
SAMIT INTR STATUS
:ERROR MESSAGES

a2\ N—d

O
PO

044507
020040

020765
020772
021000

050130
020104
040525

041505
040440
000114

000003
006
001164
006
001156
006
001160
000001

004

EMO:

LASCIZ

/ = ERROR P(C/

EM1:

LASCIZ

7/ = REGISTER ERROR PC/<15><12><1>/REGISTER

EM2:

JASCIZ

/ = RECEIVER ERROR P(C/<15><12><1>/REGISTER

FM3:

LASCIZ

/ - TRANSMITTER ERROR PC/<15><12><1>/REGISTER

051105

021006
021010
021012
021014
021016
021020
021022

SEQ 0069

VO
N

020756
020764

052103

PAGE 72

—

[=lele]

RICDR

OO
ON
S =20\

15:36

§O

036440
051117
036440
05151
051105

lole)
N &

020600
020606

—

DZDUB-C MACY11 30A(1052)
21-NOV-78
CZ0uUBD.P11
31-0C71-78 13:59

DH1:
.EVEN

DT1:

;DATA HEADERS FOR ERROR MESSAGES
CASCIZ

DATA

BYTE

/EXPECTED

TABLES FOR ERROR MESSAGES

6,4

004

SAVR3
.BYTE

:REGISTER
6,4

062

BYTE

6,2

SAVRO

.END

SAVRT

ACTUAL/

.EXPECTED DATA

;ACTUAL DATA

DZDUB-C MACY11_30A(1052)
_21-NOV-78
CZDUBD .P11
31-0(7-78 13:59

15:36
PAGE 74
CROSS REFERENCE

002520

11774

ADDBAS
ADDKEE
ADDLAS
ADDROT
ADRCNT=
A10070=
BASEAD
BASEDU
BASEIV

001306
001310
001312
001322
015215
seawsean GX
001204
001364
001212

1057
1058
1059
1062
3113«

8688

002336

9374
9384
9394
9434
3074
676
8924
9604
8954
2941+

BINWRD 015532
BITw = 002000
BIT0 = 000001

3164

BI.1

= 000002

3163«
8074
7554

BIT10 = 002000
BIT11 = 004000
BIT12 = 010000

7654
744H
7634

BIT14 = 040000
BIT15 = 100000

7614
7604

2912

2922

1057+
1071
1063+

1107+

1144

1145

1151«

1153«

1224

2916+

2928+

2932

1228

2917+

2929+

2934

2935+

2936

2937+

2938

2939+

2940

3570

3585

3587

8144

2031
2746

1289
1290
6764

9534
9594
9524
9584
9334
7714
2908
3161«
9924
806#
1458
1625

1750

1921

2092
2313
2581
2807
9314

806
804

3550

3568
1509

2251

1567

1625

2306

2361

1683

2416

1741

247

2526

2581

2636

1915

1973
2691

1403
1574
1761
1866

1651
1576
1747
1867

1799

1857

1303
1304
1266
1075
1081
1074
1080
1056

2931
3165
2961
1335
1460
1631

1751

1922

2093
2361
2587
2808
1054

2037
2258
2526
2752

2038
2306
2532
2753

ONN00
N N

75a
7504
7494

772
771
770
769
768
781
780
779
778
777
776
775
774
1335
2086
2801

= NN

7484
7678
746N

001303

2909

8U\w
O
NN
N =
—t P
NN

= 000200
= 000400
= 001000

CLROPT

1229

PINIAIN)
b b —d 2

BIT?
BIT8
BIT9

BRW
014546
BRX
014550
BUFF1
00000CR
BUFHRX
001346
BUFHTX
001367
BUFRXD
001344
BUF TXD
001360
BYJMR
001305
CARDET= 010000
ccC
014302
CHRCNT , 015530
CKSWR = 104413
CLK
020000

1147~

783
782
773

7534
754

BREAK = (000001

1140w

754Lm

= 000004
= 000010
= 000020
= 000040
= 000100

1139+

11284

BIT2
BIT3
BIT4
BITS
BIT6

1061+

1124

7420

SEQ 0070

POPNVMNIN)
= b 2
NSO
&S NVVVWOMO
NO
O~ 00 N = SN NN

BIT13 = 020000

8974

TABLE =-- USER SYMBOLS

WNOPON)
= — e
NON SN NOCOONNN
N\ONO
00O 00— 0
W= WO OO0

001216

WION £ = O 00 ON VWA
NP
ND0 =N
NN
ON O COWONNO

ACTRES

DZDUB-C MACY11_30A(1052)
21-NOV-78
CZouBD .P11
31-0C7-78 13:59
104414
104411
104410

9944

"nn

—

(gn]

001142
001230

001354
020000
AARNNN

016004
015772
015212

3353
1275

9544

1076

675
3254+
3253+
3072«

3257
3264
3110

32714

3602
1032

36464

9504
9564
7704

wnunuwnnwnn

—

020114

020246
020040
020110
020572
020570
020576
020574

1023
1055

00
016030
003204
000000
001222
020000

1070+
1066«
1065«
1068+
1067«
7994

9204

1012«

016010

36244
36264
36324
36384
1013«

3252«
3260
35754
802#

32634
32854

3274

32794

7914

1268¢
7964

9054
787#

3238

2932+
3536

3522
3535+

3523+
3536

3524
3537«

3525«
3538

3526
35404

1231

3510«

3511«

3512+

3513«

3514

35184

1116

1232

2934+

2941

36194

1860

1976

269

2749

2804

2996+

3242+

3255

3261+«

3326+

2144

2199

1022

3603
2933
1102
3531
35094
1169
1233
1113
1235
1234
1802

3595
3598
3601
3604
8614

2606
35224
1105
3532

1072
1078

7254
932#
804#
8114
768#

3600
1106
1071«
3530
1172

3322

1265*

34064

7784
7740
7244
7824

3270

3259

1077
1073
1079

2906

5599
8354

SEQ 0071

1039

9884
9864
868#
9084

9554
9514
9S7#

G 6
15:36 PAGE 75
CROSS REFERENCE TABLE =-- USER SYMBOLS

1271
2034

1087+

3273

2936+

2940+
2938+

2280+
2950+

1262

2859

3527

3528+

3529

0ZOUB-C MACY11_30A(1052)
21-NOV-78
CZDuBD .P11
31-0CT1-78 13:59

LEVEL3=

LEVELS=
LEVELS=
LEVELG=

LEVEL?=

X
MITSE

g38s SURERREIR

§OOO ST
28888282
oogen
~
N
~
O

MEPASS
=
MEXT
MEXTJ
=
MINT

001120

[elalal
AL
= —2

MAP
MCOW
MCRLF
MDATA

7644
7634
7624
7614
7604
759#
7584

001301

3073«

1023+
31014

3105

2911

3408#

3010

3043

1204

34844

9294

1129

1154

1164

1178

1389

1396
1795

1447
1802

1454
1853

1505
1860

1107

1151

1153

1225

1159

1226

29%4
3239

2997+
3241

3327«

3151

3360

34284

1199

1203

1294

1621
1976

1628

»
»

AV
A DA
Y
= HON)
(W, LV, b NIV, (V]

ggwmww
~NO0
~ 0o

1744

119N

2929
3516~

3519«

2952+

3122

1038

1276

8174
2031
2746

1118

3519

1297
3103
1009+
1014
1069

3177
2904
8184

35014

3518

8564
29564
9214
3070
858«
8624
IR
1036

1060

—

1056+
1058+
1060+
1059+
1236

888
8934
8964
8944
1069
7654

S4L1A

8464
3087

—d el c—

LIGHTS
LIMITS
LOBITS
LOCK
LOGICA
LOKFLG
LOLIM
LPCNT
LSTERR
L1ESS

30614
1331
1686
1063

SEQ 0072

3213

AN =D =

LEVELO=
LEVEL1= 000040
LEVELZ=

3354

3046
7954
1679
9404

TABLE == USER SYMBOLS

3209

3218

LASTAD
LESST

3077

HEON

KEEPAD
KEEPIV

1184
1018
1188
1097

001314

1307

36174

IVBASE
IVKEEP
JMRBY

1180
9184
9784
9764

1247

014774

2994

INSTR?

ISYMOD= 000000

8574

1081«

ICOUNT
INBUF
INIFLG
INSTER=
INSTR = 104403

36134

HPARCS
HRXCSR
HRXDBU
HTXCSR
HTXDBU

1263+
12647
1243
1239
1241
1245

31194

HOLDO
HOLD1

1258#
3101

WV =2 220NN W

HILIM
HOLD

813«

1217
3071
8664
9064
9074
1077«
1073
1075«
1079«

HOXEN = 000018
HEREU

15:36
PAGE 76
CROSS REFERENCE

3188
34384

1335
2086
2801
1052

1509

2251

1567

2306

1625

2361

1799

2526

1857
2581

1915

2636

1973

2691

DZDOUB-C MACY11_30A(1052)
21-NOv-78
CZ0ouBD.P11
31-0C7-78 1 3:59
MLASTD
MLEVEL
MLOCK
MMULT

016640
017307
017244
016561
017113
017104
017225
017023
016500

MPFAIL
MaM
MR
MRANGE
MREGAD
MRESET= 000400

MSTATU
017646
MSYNC
017334
MTDATA= 040000

MTITLE
MTSTPC

MULTD
MVECTO
MwWIRES
MWIRES
MWIRES
NEXT

016424
017231
001202
016456
017515
017450
017402
001116

NOPAR =

NOSYNC
ODDPAR=

opD8

1317
1155
1098

8084
678
2028
2611
2743
1261
1179

1127
7864
9804
30764
1076«
1628

QOO
Q==
VNN
=2 NN

2228
—

SERaR=gs

OVRRUN=
PARAM =
PARAM1
PARCSR

1330
1680
2081
2413
2796

SEQ 0073

33774
34764
34694
36620

1051

10224

1054~
3343
2944H

1446

1506

21N
2523

2631

1796

34924
34554

1329«
2080«
2795+
1338
2089
2804

8
3341
2905

TABLE =-- USER SYMBOLS

36420
34184
3380#

8554
2025«
2740
8004
2034
2749

1019

34294
3,274

1335
2086
2801
33724
3443
1055+

1109
1200
1196
1192

33974
36514
364650
33894

8054
2031
2746
1020
1308
8874

35584

OUTCRY
OUTMUL

POP1SP=

3325
3056

9284
8014

ONCE
OPTCLR
out

PAREN
PARER
PARERR
PART
]
PASCNT
PF TAB

1130
1165
1295
1119

15:36
PAGE 77
CROSS REFERENCE

1567

1445~

1503«

1915

2581

2465+

1735«

1793+
2520«

2575+«

2144
2859

2199

2254

1686

2419

1744

1802

1860

1396

1454

1512

1851«

1909+

2630+
1918

1967+

2685+
1976

2474

2529

2584

2639

2694

1505+
1860+

1512+
1911+

1563
1918«

1570+

1621+
1976+

1218+

1202

3345

1221

3349

33614

1110

1131

1156

1166

1309

3355

1331+

2027«
2364%
2742%

2034+
2412«
2749+

2082+
2619+
2797+

1338+
1737+

2089+
2467+
2804«

1389+
1744
»

2137+
24674
2852+

1396+
1795+«
2144

1447+
1802+~

1454+
1853«

3079
3095
860
3323

3081
3115#
1011x
33294

3083

30924

3102

2951+

2952

3278

1857

2526

2410+

1099
3097
1242

7344
7324

2356
2688

2245+
2999

1677

1620
1970

2303
26,86

2190+
2979

11634

7904
788#

1564
1968

2135
2850+

1152

1679+

2301
2633

1799

2306

1387+

1562
1912

1686+

2522+
2859+

2192«
2529+
3527+

3104

5°06

2199+
2577
36124

2247
2584+

225+
2632+

2302+
2639~

1969+

2309+
2687«

2357~
2694+

0ZDUB~-C MACY11_30A(1052)
21;NOV-78
CZDUBD.P11
31-0C7-78 13:5

POP2SP= 022626

7364

PRTDU
001324
PS
= 177776

944a
7264

PUSH1S= 005746

7314

PUSHRO= 010046

PUSH2S= 024646
RDSW
016246
RECACT= 004000

REGACT
REPLAY
RESEC

001320
014200
001302

RESREG
RESTAR
RESTRT

016006
016142
014344
RESO5 = 104407
RING
= 040000
RINTEN= 000100
RISDU
001334
RIVDU
001326
ROTADD
001220
RPOKE
020250

RTRN

001114

RTS
RUNA

= 000004
= wxwean

RUNC
RUND
RUNE
RUNF
RUNIT
RXCSR

=
=
=
=

RUNB

RXDBUF

= 000000

wenenr
wawewe
wewene |y
wxeesn |J
014104
020544

020550

RXDONE= 000200
RXERR = 100000

SAVPC

SAVRO
SAVR1
SAVRZ
SAVR3

001174

001156
001160
001162
001164

J
6
15:36
PAGE 78
CROSS REFERENCE TABLE =-- USER SYMBOLS

1070
1006
3275

1231+
1211+

2960+

3317«

3094

33374

3351«

3361«

942on
2924
9304

1061
2930
1053

1229+
29324
1220+

984k

3272
1233«
1232+
1126+
1368
1640
1886
2116

1138«
1408
1654
1890
2153

1140
16422
1658
1930
2167

1372

1316

1318

7334
7354

3057
7724

3269
3303
2925

7694
7774
984

954
9004
1350
1596
1832
2098

2332
2556
2813

Sgg?l

7814
1

32724
33094
2954

1066
1065
1062+«
1364
1600
1872

2112
2336
2593
2827

1016~

29604

2373
2607
2831

21
21
21
21
2910
1072+«
1641

53
53
57
57
57
57
29164
1238
“687«

69
69
72
72
2923
1339«
1699

1076«

1240

1346

2035+«
2374
2750%
1545
1810

2048
2284
2534
2763

27
785a

8814

8744
8754
8764
8774

2044
2420+
2759
1578
1819

69
69

2387
2611
2868

2391
2648
2882

147
147
150
150
150
150

663
663
668
668
668
668

1351
17645«

1397«
1757

1142«
1426
1698
1944
217N

1147
1466
1712
1948
2208

2962+

2979+

2428
2662
2886

1409
1803+

1150
1480
1716
1988
2222

1230
1484
1756
2002
2226

2919«
1524
1770
2006
2263

2922
1538
1774
2043
2277

2926+
1542
1814
2057
2281

1582
1828
2061

2538
2772

2318
2552
2776

2442
2666
35454

446
2703
3555

2483
2717

2497
2721

2501
2758

2980

2999~

3000

3285«

3287

3328

1455«
1815

1467
1861«

1513«
1873

1525
1919«

1571«
1931

1583
1977+«

1629+
1989

2090+
2429
2805+

2099
26475«
2814

2145«
2484
2860+

2154
2530
2869

2200+
2539
2946

2209
2585
3522+«

2255+
2594
36084

2264
2640

2310
2649

2319
2695«

1587
1835

1603
1868

1636
1877

1645
1893

1661
1926

1694
1935

1703
1951

1462

1471

1487

1520

2204
2433
2669
3526«

1719
1984

2213
2449
2699
36104

2064
2314
2543
2779

2094
2323
2559
2809

3126+

3291

3135«
3134+
3133«
3132«

SEQ 0074

3140
3141
2142
3143

1355

2103
2339
2589
2818

3655
3657

3653

1371

2119
2369
2598
2034

1404

2149
2378
2614
2864

1413

2158
2394
2644
2873

1429

2174
2424
2653
2889

1752
1993

2229
2479
2708

1761
2009

2259
2488
2724

2365+
2704
1529

1777
2039

2268
2504
2754

DZDUB-C MACY11_30A(1052)
21-NOv-78
czbuBD .P11
31-0CT1-78 13:59
SAVRG
001166
SAVRS
001170
SAVSP
001172
SAVOS = 104406
SCOPE = 104400
SCOPT1 =
SEND
=
SEREC
SETFG
SETFLG=
SEVEN =
SEXMIT
SHIFT

104401
00002 0
001200
003144
104412
004000
001177
001140

=
SIX
SPACNT= 015531
SRD
= 002000
STACK = 001100

STATUS

0013090

SVO05

015224

STD
= 000010
STFLG
001245
STPSYN=

SWR

SWREGC
SW00 =
SWO01
=
SwW02
=
sw03 =
SW04
=
SWO05
=
Swo6 =
SWw07 SW08 =
SWw09 =
SWw10 =
SW1l1
=
SW12
=
SW13 =
SW14
=
SW15
=
SYNCNO
SYNEXT=

001100
016370
000001
000002
000004
000010
000020
000040
000100
000200
0004
001000
002000
004000
010000
020000
040000
100000
001176
020000

SYNINT= 030000
SYNSCH= 000020

K 6
15:36 PAGE 79
CROSS REFERENCE TABLE =-- USER SYMBOLS

8794
8804

3144
3145
3309

2070
2785

1435
2180
2895

8124
885#

1198

8784

9824
9704
9724

1259
990#
798#
884#
8674
1580+«

1826+
2059+
2316+
2550+
2774

SEQ 0075

1725
2455

1193
1628
1194
1362+
1598«

1205

2474

2584

2639

1420+
1656+
1928«
2165+

1464
1710+
1946+

1478+
1714+
1986+

2389
2646
2880+
2254

7974

3162*
7734

1841

2206+
2440%
2664+
3554
2364

2220+
244
2701

1216

1292

2565

2620

2675

1957

2015
2730

1482+
1754«

1522+
1768+

1536+
1772«

1540+
1812+

1899

2000~
2224+
2481«
2715+

2004+
2261«
2495+
2719+

2041+
2275%
2499+
2756+

2055+
2279+
2536+
2770+

1305

2984

2991

3008

2419

7274
9284
7804
919#
7754

1027

1046

1037

3365

1084

1216

1186+

2082
2419
2797

2137
2474
2852

2247
2584

2254
2632

2302
2639

2309
2687

1455

1571

1803

1861

1919

1977

DZDUB-C MACY11_30A(1052)
_21-NOV-78
CZouBD .P11
31-0C7-78 13:59

SYSTST= 014000

TABLE
TEMP
TEMPT

001232
017740
001144

2035
2750
8194

9094
3158
BOOH
1581«
1827«

2060+

TEMP2
TEMP3
TEMP4
TEMPS
THRU
TISDU
TIVDU
TKCSR
TKDBR
TLAST =
TPCSR
TPDBR
TRPOK
TRPREG
TSTNO

001146
001150
001152
001154
003262
001332
001330
001104
0011€C6
0134510
001110
001112
15614
020506
001126

TST1
TST10
TST11
IST12

2200

2255

2310

1273+
3166
1349+

1274«
3191«
1363«
1599+
1871+

1275
3319«
1367+
1639
1885+

3320+«
1407+
1653«
1889+

35024
1421%
1657+«
1929+

1595+
1831+
097+

2111+

2115«

2372+
2606*
2830

2152«

23B6x
2610%
2867+

3346+
3158+«

3548+
3191

3549«
3559«

3550+
3563«

3344
3047

3346

2331«
2555+
2812«

2335«
2592+
2B26*

3048
3047~

1015+«
2024%

1328+
2079+

1386*
2134x

1444+
2189+

003446
006330
006572
007034

1310
1793
1851
1909

1316
18504
19084
19664

13284

2962

2963

007524
007752
010200

2025
2080
2135

010654
011102
003710
011330
011556
012004
012232
012460

2245
2300
1329
2355
2410
2465
2520
2575

TIST17

010426

TST25
012706
TST26
013134
TST27
013362
1ST28
013610
TST29 = wewann |y
TST3
004152

TST4
TSTS
TST6

2145
2860

12834
1068
1067
2987
2989
28974
3020
3022+«

007276

TST18
TST19
TST2
T1ST20
TST21
1ST22
TS123
TST24

2090
2805

8704
8714
8724
8734
1260
9474
964
8474
8484
1311
8494
8504
32284
35914
8594
1966%

TST13
TST14
TST15
TST16

2317+
2951%
2775%
3587+

L 6
15:36 PAGE 80
CROSS REFERENCE TABLE -- USER SYMBOLS

004414
004656
005120

2684x

2739«

1967

202644

2190

22444

2630
2685
2740
279%
2850
1387
1445
1503
1561

1235«
1234«

3037
3039

2794+

20794
21344
2189

22994
23544
13864
24094
24644
25194
25744
26294

26844
2734
2794M
28494
14440

15024
15604
1618#

2897

2849+

SEQ 0076

2365

2420

2475

2530

2585

2640

2695

1425%

1465+

1479+

1483«

1523«

1537+

1541«

2166+

1697+«
1943x
2170«

1711«
1947«
2207

1715«
1987«
2221+

1755«
2001+
2225+«

3551
3566%

3558+
3576+«

3562+
3580%

3575«
3583«

3579«

1502%
2244%

1560+
2299+

1618+
2354%

1676+
2409%

1734
2464%

2390
2647+
2881+

2427+
2661+
2885«

2441%
2665+
3547+

2445+
2702«
3558

2482«
2716%
3568+«

1769+
2005%
2262+

1773~
2042+
2276*

1813«
2056+

1792«
2519%

1850%
2S74n

1908+
2629

2496+
2720+
3570«

2500+
2757«
3575

2280+

2537
2771«
3585+

DZDUB-C MACY11_30A(1052)
21-NOV-78
CZDuUBD.P11
31-0CT-78 1 3:59

1817
TST8
TST9

005362
005624
006066

TTST
TXCSR

014450
020560

TXDBUF
TXDONE=
TXINTE=
TYPDAT
TYPE
=

TYPMSG

uP
USER =
VOID
=
WRDCNT
ZERO
$CNTG
=

020564
000200
000100
015774
104402

015744

003224
000000
000001
015526
014112
016376
000036

1619
1677
1735
1289«
1078«

16764
1734w
17924
1290«
1244

2081~
2202«
2358+
2478
2636%

2083«
2203«
2361«
2521«
2642*

1400
1515«
1625«
1738«
1852«
1925«

= 000015

$67
.

002142
- 021024

.BEGIN
.CKSWR
.CNTLU
.CNWVRT
.CONVR
.EOP
.ERRTA

002630
016250
016324
015314
015310
014036
020514

SEQ 0077

1399+
1509+
1622+
1736+
1809+
1924+

1402«
1516~
1631«
1741~
1854+
1968«

2038+

2796%

2798«

2356+
2477+
2633+
2753«
3551«

3258

3265

3552«
1080~
809#
8104

9744
3187
3256
127
8164
7834
3160«

29174
3350
6764
1677
20264

26410

SMNEW
016413
MSWR
016403
N
= 000034

15:36 PAGE 81
CROSS REFERENCE TABLE -~ USER SYMBOLS

3553«
1246

1020
3262
32594

3043

3055

33664
1329
16784
2080

26114

20264
2409
27414
9624
994N
1047
8214
9394
95N

2079
24114
2794
970
9964
10844
8244
9404
9534

2850
3251

3033

3189«

2795
33694
33674
1328

1082
993
995
989
987

2911

1278

2741
3354
3352
6764
1676

2196+

16784

1086
33404
33514
31524
31504

29034
35954

9334

35014

3059

3150

DZOUB-C MACY11_30A(1052)
21-NOV-78
C Z0UBD . .P11
31-0C7-78 13:59

HLT
-INSTE
JINSTG
-INSTR
<INST1
.MSG

015634
014750
014754
014632
014652
014654

-RESOS
.SAV05
.SCOPE
.SCOPT1

015256
015216
014366
014552

PARAM
PFAIL

LSETFL
LSTART
.TRPSR
-.TRPTA
LTYPE

015002
016104

015534
001420
015602
001366
014572

827

979
3052
977
30334
3031«
981
825
985
983

N 6
15:36 PAGE 82
CROSS REFERENCE TABLE =-- USER SYMBOLS

32364
3053+
30554
30294
3044
30344

3060
33646+

3347«

1008

32954

3316

30674

991

31404
31264
29674
30074
32084

9674
975

3230
30154

971

973

837
829

10064
32254

3219
1016

2915

3348

SEQ 0078

OZDUB-C MACY11_30A(1052)
_21-NOV-78
CZouBD.P11
31-0C7-78 13:59

HLT

PRGEND
PRGFRT

PUSSYF

RSETUP

TSETUP
$BEGIN

$SBINAR

7374

1353

1358

1374

1411

2177
2452
2727

2211
2486
2761

2216
2491
2766

2232
2507
2782

2266
2541
2816

1606
1896

1643
1933

6764
6764

2896
677

6764

1330

6764
6764

1207

676

2136

6764

211

$BUF FE
$CABLE
$CATCH
$CLRVE
SCONVR
SONA
$EOP
SGETFL
$GE TPA

6764
6764
6764
6764
6764
6764
6764
6764
6764

2896
1118
1097

SHLT

6764

3233

$INSTR
$1S08
SMATCH

$MRR

S$SMRRW

SMRW

6764
6764
6764

1648
1938

. 138§

1664
1954

15:36 PAGE B4
CROSS REFERENCE TABLE =- MACRO NAMES
1701
1991

1416

1706
1996

2271
2546
2821

1432

1722
2012

2287
2562
2837

1469

1759
2046

2321
2596
2871

1474

1764
2051

2326
2601
2876

SEQ 0079

1490

1780
2067

2342
2617
2892

1527

1817
2101

2376
2651

1532

1822
2106

2381
2656

1548

1585

1590

1838
2122

1875
2156

1880
2161

2397
2672

2431
2706

2436
271

.
1446

1504

1562

1620

2246

2301

2356

261

2466

1191
1108

1195
1128

1199
1154

1203
1163

1294
1307

2521

1678

2576

1736

2631

1794

2686

1852

2741

1910

2796

1968

2026

2081

2851

3498

820
1022
3147

3026

6764

MSG

6764

3372

$POKER

6764
2146

1343
2201

1401
2256

1459
23N

1517
2366

1575
2421

1633
2476

1691
2531

1749
2586

1807
2641

1865
2696

1923
2751

1981
2806

2036
2861

2091

$RESET

6764
1736

1330
1738

1332
1794

1388
1796

1390
1852

1446
1854

1448
1910

1504
1912

1506
1968

1562
1970

1564
2026

1622

1678

1680

2413
2851

1620
2028

2466
2853

2081

2083

2136

1861

1919

1977

$SYNCR

2138
2576

2191
2578

2193
2631

2246
2633

2248
2686

2301
2688

2303
2741

2356
2743

2358
2796

2411
2798

6764

1339

1397

1455

1513

1571

1629

1687

1745

1803

2468

2521

2523

DZDUB-C MACY11_30A(1052)
_21-NOV-78
CZ0UBD.P11
31-0CT-78 13:59
$TRPDE
$TRPSR
$TSTNO

$TYPE
SUNIBU
$VARIA
SWORDF
SWORDO

$SWORDP
. ABS.

6764
6764
6764

970
3220
1328

6764
6764
6764
6764
6764
2126

3012

2134

6764

21024

ERRORS DETECTED:

2189

972
1386

2244

974
1444

2299

15:36 PAGE 85
CRCSS REFERENCE TABLE =- MACRO NAMES
976
1502

2354

978
1560

2409

980
1618

2464

982
1676

2519

984
1734

2574

SEQ 0080
986
1792

2629

988
1850

2684

1908

2739

992

994

1966
2794

2024
2849

2079

1958

2016
2841

2071

840
1320

2181

1378

2236

1436

2291

1494

2346

1552

2401

1610

2456

1668

2511

1726

2566

1784

2621

000
O

CZDUBD.BIN,CZDUBD.
SEQ/CRF /SOL/NL : TOC=CZDU11.HLO/EG:RUNB, (ZDU11.PAR,(2DU11.KET,(ZDUBD.P11
RUN-TIME: 8 12 1 SECONDS
RUN-TIME RATIO: 92/22=4.0
CORE USED:
19k
(37 PAGES)

1842

2676

1900

2731

2786